2008/07/23

Wassrの発言をだらだら見るScript

Wassrの発言をだらだら眺めるscript。 クライアントアプリはいくつかあるようだけど、コマンドラインで使うようなものは 見当たらなかったので、Rubyの scriptをいくつか眺めながら作ってみる。

頻繁にサーバにアクセスしても負荷の問題があるので、適当にsleepするように してあるが、発言のタイミングは予測できないもの。すべての発言をもれなく表示する というわけにはいかず、多少取りこぼす。
まぁ、ちゃんと追いかけたい人の発言は「購読」して、他のソフトで補完するということで。

ターミナルの漢字コードはutf8を前提。

cat-wassr.rb

#!/usr/bin/ruby

require 'open-uri'
require 'rexml/document'
require 'date'
require 'kconv'

sleep_min = 30
sleep_max = 900


$last_time = DateTime.parse("1970-01-01T00:00:00+09:00")
sleep_time = sleep_min

def printWassr
  doc = REXML::Document::new(
                             open("http://api.wassr.jp/statuses/public_timeline.rss") {|f|
                               f.read
                             }
                             ).root
  counter = 0
  entry_time = 0
  doc.elements.to_a('//item').reverse.each {|item|
    if (item.elements['dcterms:modified'].nil? ||
        item.elements['author'].nil? ||
        item.elements['description'].nil?)
      next
    end
    entry_time = item.elements['dcterms:modified'].text
    if ($last_time > DateTime.parse(entry_time))
      counter += 1
      next
    end

    puts "#{item.elements['author'].text}\t#{entry_time}\n" + \
    item.elements['description'].text + "\n\n"
  }
  $last_time = DateTime.parse(entry_time)
  return counter
end

def update_sleep_time(sleep_time, skip_entry_num)
  if skip_entry_num < 1
    sleep_time / 2
  elsif skip_entry_num > 1
    sleep_time += sleep_time*skip_entry_num/20
  else
    sleep_time
  end
end

while true do
  sleep_time = update_sleep_time(sleep_time, printWassr)
  if sleep_time < sleep_min
    sleep_time = sleep_min
  elsif sleep_time > sleep_max
    sleep_time = sleep_max
  end
  puts "------------ #{sleep_time} sec ----------------"
  sleep sleep_time
end



0 件のコメント :

コメントを投稿

Comments on Google+: