はてなブックマークの人気エントリーもターミナルでみたいよね

自分のブログの人気エントリーは、はてなブックマークのエントリーリストにサイトのURLを投げることで見ることができます。例えば、このブログ（hp12c）における人気エントリーを見るにはブラウザで以下にアクセスします。

http://b.hatena.ne.jp/entrylist?sort=count&url=http://melborne.github.io

人気記事上位20件が表示されます。ここでsortのパラメータにeidを渡すとブクマされたすべての記事から新着20件が表示され、またhotを渡すとブクマ3件以上の新着20件が表示されます。

ところでこれには対応する非公式のAPIがあってプログラムからアクセスが可能です¹。

小粋空間: JSONP: 2012年6月アーカイブ

そうとなればRubyでアクセスしない手はないですよね。ちょうどこのブログはギットハブにおける諸事情によりドメインが途中で変わってしまい、ブクマが分散してるのでその総数を知りたいという事情もありますし。

参考：ギットハブにはてブとはてスタを殺されたので、このブログの人気記事一覧を作りました。

そんなわけで…

ターミナルで簡単にはてブの人気エントリーリストを出力するツール「HatebuEntry」を作りましたので公開します。

melborne/hatebu_entry

hatebu_entry | RubyGems.org | your community gem host

ターミナルでの使い方

gem install hatebu_entryでHatebuEntryをインストールすると、hatebu_entryというコマンドが使えるようになります。これを実行すると次のようなメッセージが出力されます。

% hatebu_entry
Commands:
  hatebu_entry get URL         # Get Hatena bookmark entries for URL
  hatebu_entry help [COMMAND]  # Describe available commands or one specific command
  hatebu_entry merge *URLs     # Merge counts for same entries on several URLs
  hatebu_entry version         # Show HatebuEntry version

getコマンドで対象のURLに対する人気エントリーが取得できます。http://d.hatena.ne.jpを見てみます。

% hatebu_entry get http://d.hatena.ne.jp
 6691: 僕は自分が思っていたほどは頭がよくなかった - しのごの... (http://d.hat...
 5785: 「 2 」か「 9 」で割ってみる - ナイトシフト (http://d.hatena.ne.jp/nig...
 5605: 読みやすい文章を書くための技法 - RyoAnna’s iPhone Blog (http://d.hate...
 4483: この「いじめ対策」はすごい！ - 森口朗公式ブログ (http://d.hatena.ne.jp...
 4167: 知らないと損する英語の速読方法（1） - 一法律学徒の英語... (http://d.ha...
 3973: パワポでもここまでできる！米財務省から学べる美しい資... (http://d.hate...
 3967: デジタル一眼レフカメラの基礎から実践まで - #RyoAnnaBlog (http://d.hate...
 3853: 『忙しい人』と『仕事ができる人』の２０の違い (http://d.hatena.ne.jp/fa...
 3717: MacBook Air 11インチ欲しい！とは - はてなキーワード (http://d.hatena.n...
 3715: おさえておきたいメールで使う敬語 - かみんぐあうとっ (http://d.hatena.n...

（ここでの表記上、URLの一部を省略しています）

デフォルトで10件ですが、--pagesオプションで取得件数を増やせます。1で20件、2で40件になります。--sortオプションには先に書いたhot, eidが渡せます。

% hatebu_entry get http://d.hatena.ne.jp -p1 -s hot
    6: 公式Twitterアカウント運用についてのアドバイス - とかいろいろ (http://...
    7: 産経新聞、整理・校閲部門を一部分社化　社員は出向 - edgefirstのメモ (h...
    3: 市場と闘い続けた視点 - LittermanによるFamaへのインタビュー - 投資の消...
   19: JAGATセミナー　電子書籍の最新事情とEPUB制作環境の進展 - ちくちく日記 ...
   16: 研究職を考えたきっかけは「育英会」の奨学金 - 殺シ屋鬼司令 (http://d.h...
    3: スティーブン・キングの新作『11/22/63』は残酷なまでの切なさに満ちた傑 ...
   18: 意味がなさすぎる「日本を元気にする国民運動」 - シェイブテイル日記 (ht...
  433: 文科系の大学生にプログラミングを教えて思ったこと - UEI shi3zの日記 (h...
    5: 『GATCHAMAN CROWDS』　中村健治監督　ヒーローものはどこへ行くのか？　 ...
    7: やなせたかし先生、あなたが僕のアンパンマンでした。 - 琥珀色の戯言 (ht...
    4: 「1964年のジャイアント馬場」中間報告。「プロレススーパースター列伝」 ...
   21: 昆虫研究界に新エースあらわる - むしブロ (http://d.hatena.ne.jp/horika...
    4: 洋書も左から右へ並べるようだ - 最終防衛ライン２ (http://d.hatena.ne.j...
    5: 10月15日 - finalventの日記 (http://d.hatena.ne.jp/finalvent/20131015/...
   76: 汝はヒーローなりや？／『ガッチャマンクラウズ』の宿題 - デマこいてんじ...
    4: 3つでやめるルール - laiso (http://d.hatena.ne.jp/laiso/20131015/p1)...
   19: はてなブックマーク人気エントリにおけるコメント率の変化 - Life like a ...
   22: 東京国立博物館『京都―洛中洛外図と障壁画の美』、西洋美術館『ミケラン ...
    3: 『BE BLUES!』高校編、桜庭さん再登場で一気におもしろい - 水星さん家 (h...
   20: 愛された子の副作用 - 傘をひらいて、空を (http://d.hatena.ne.jp/kasawo...

mergeコマンドは別のドメインにおける同じ記事のブックマーク数をマージして出力します。このブログの以前のURLhttp://melborne.github.comと現在をマージしてみます。まずは比較のため以前のURLを普通に出力してみます。

% hatebu_entry get http://melborne.github.com
 1377: これからRubyを始める人たちへ (http://melborne.github.com/2012/04/09/t...
  633: 知って得する！５５のRubyのトリビアな記法 (http://melborne.github.com/...
  514: Rubyのcaseを〇〇(言語名)のswitch文だと思っている人たちにぼ... (http:/...
  442: 知って得する21のRubyのトリビアな記法 (http://melborne.github.com/2011...
  435: Ruby脳が理解するJavaScriptのオブジェクト指向 (http://melborne.github....
  269: 今年の冬休みに電子書籍であなたがRubyを習得しなければい... (http://mel...
  236: Ruby、君のオブジェクトはなんて呼び出せばいいの？ (http://melborne.git...
  187: Rubyを使って「なぜ関数プログラミングは重要か」を読み解... (http://mel...
  178: Ruby脳が理解するJavaScriptのオブジェクト指向（その２） (http://melbor...
  145: Ruby標準添付ライブラリcsvのCSV.tableメソッドが最強な件につ... (http:/...

次に現在のURLとマージした結果を出力します。

% hatebu_entry merge http://melborne.github.com http://melborne.github.io
 1414: これからRubyを始める人たちへ (http://melborne.github.com/2012/04/09/t...
  670: 知って得する！５５のRubyのトリビアな記法 (http://melborne.github.com/...
  613: Rubyのcaseを〇〇(言語名)のswitch文だと思っている人たちにぼくから一言 ...
  545: 知って得する21のRubyのトリビアな記法 (http://melborne.github.com/2011...
  435: Ruby脳が理解するJavaScriptのオブジェクト指向 (http://melborne.github....
  269: 今年の冬休みに電子書籍であなたがRubyを習得しなければいけないたった一 ...
  236: Ruby、君のオブジェクトはなんて呼び出せばいいの？ (http://melborne.git...
  187: Rubyを使って「なぜ関数プログラミングは重要か」を読み解く（改定）─ 前...
  180: Ruby標準添付ライブラリcsvのCSV.tableメソッドが最強な件について (http:...
  178: Ruby脳が理解するJavaScriptのオブジェクト指向（その２） (http://melbor...
  159: 30分のチュートリアルでJekyllを理解する (http://melborne.github.com/20...
  150: Jekyllいつやるの？ジキやルの？今でしょ！ (http://melborne.github.io/2...
  144: 第2弾!知って得する12のRubyのトリビアな記法 (http://melborne.github.co...
  111: メソッドの使い方もRubyに教えてほしい (http://melborne.github.io/2013/...
  106: 一生涯はてな記法しますか？それともMarkdownしますか？ (http://melborne...
   98: RubyによるMarkdownをベースにしたEPUB電子書籍の作り方と出版のお知らせ ...
   96: 東京の地下鉄をGviz（Ruby Graphviz Wrapper）で描く (http://melborne.gi...
                                  .
                                  .
                                  .

マージされた結果のブックマーク数が増えているのがわかると思います。まあこのコマンドに用のある人は少ないでしょうけど。

Rubyでの使い方

Rubyで先のgetコマンドを使いたい場合は、HatebuEntry.newにURLを渡して#entriesを呼びます。

% irb
IRB on Ruby2.0.0
>> require 'hatebu_entry' #=> true
>> hent = HatebuEntry.new('http://melborne.github.io') #=> #<HatebuEntry:0x007f8ad9b1e110 @params={:url=>"http://melborne.github.io", :sort=>"count", :of=>0}>
>> hent.entries
=> [#<struct HatebuEntry::Entry link="http://melborne.github.io/2013/05/20/now-the-time-to-start-jekyll/", count=150, title="Jekyllいつやるの？ジキやルの？今でしょ！">, #<struct HatebuEntry::Entry link="http://melborne.github.io/2013/09/04/is-that-a-yet-another-rdoc/", count=111, title="メソッドの使い方もRubyに教えてほしい">, #<struct HatebuEntry::Entry link="http://melborne.github.io/2011/06/22/21-Ruby-21-Trivia-Notations-you-should-know-in-Ruby/", count=103, title="知って得する21のRubyのトリビアな記法">, ...（省略）... #<struct HatebuEntry::Entry link="http://melborne.github.io/2013/09/27/auto-attr-set-in-ruby/", count=59, title="RubyistたちのDRY症候群との戦い">, #<struct HatebuEntry::Entry link="http://melborne.github.io/2012/10/29/rubys-new-control-structure-by-tap-and-break/", count=46, title="TapがRubyの新たな制御構造の世界を開く">, #<struct HatebuEntry::Entry link="http://melborne.github.io/2012/05/13/first-step-of-jekyll/", count=41, title="30分のチュートリアルでJekyllを理解する">]
>> puts hent.entries #=> nil
  150: Jekyllいつやるの？ジキやルの？今でしょ！ (http://melborne.github.i...
  111: メソッドの使い方もRubyに教えてほしい (http://melborne.github.io/20...
  103: 知って得する21のRubyのトリビアな記法 (http://melborne.github.io/20...
   99: Rubyのcaseを〇〇(言語名)のswitch文だと思っている人たちにぼ... (htt...
   87: 分別のあるRubyモンキーパッチャーになるために (http://melborne.gith...
   72: ((Rubyで) 書く (Lisp) インタプリタ) (http://melborne.github.io/201...
   62: ええ、ハッキリ言います。私はRubyのArray#unshiftが嫌いです。 (http:...
   59: RubyistたちのDRY症候群との戦い (http://melborne.github.io/2013/09/...
   46: TapがRubyの新たな制御構造の世界を開く (http://melborne.github.io/2...
   41: 30分のチュートリアルでJekyllを理解する (http://melborne.github.io/...

sortオプションはnewの第２引数として渡します。pagesは#entriesの引数として渡します。実装上、引数なしの場合は先の非公式API（JSONPを返します）にアクセスしていますが、引数を渡して20件以上を取得する場合はhtmlページを取得してnokogiriでパースしています。

mergeはHatebuEntry::Entry.mergeを使います。こんな感じで。

ent1 = HatebuEntry.new('http://melborne.github.com').entries(1)
ent2 = HatebuEntry.new('http://melborne.github.io').entries(1)

merged = HatebuEntry::Entry.merge(ent1, ent2)

puts merged