組み合わせたらいい感じにできそうなことは知っているんだけど、実際にやったこと無いからやってみたシリーズです。
今回は
- Ruby
- ImageMagick
- RMagick
- PhantomJS
- Capybara
を組み合わせて、シンガポールのhaze情報のページからPSI情報を取得してみました。自由研究の成果はこんな感じです(11:00くらいからウェブページのレイアウトが変更されたみたいで日時が表示されなくなりました。。。):
WikipediaによるとHazeとは
ヘイズ (haze) とは、現代の気象用語としては煙霧を意味する英語だが、伝統的には広く靄、塵煙霧など、微粒子により視界が悪くなる大気現象全般を含む。原因は微細な水滴のほか、黄砂、工業などの煤煙、スモッグ、山火事・焼畑などがある。
というように書かれていますが、下の方をよく見ると発生原因として以下が挙げられています:
インドネシアのスマトラ島やカリマンタン島などにおけるプランテーションでの野焼きや森林火災など。人為的な着火による処理の対象としては、パームヤシ農園や、製紙用パルプ材の植林地などでの残渣が主である。インドネシアにおける大手パーム油企業による野焼き規制は強化されているが、2015年現在改善の兆しはない。
インドネシア、お前か。。。健康的にかなり良くないもので、ひどい時は外に出たくないくらいです:
ヘイズは人体に対して深刻な被害を及ぼす危険性がある。目、鼻、喉などの粘膜や、皮膚のかゆみ、気管から肺などの呼吸器系や循環器系への健康被害が報告されている。特にぜんそくや心臓疾患がある場合は注意が必要であると外務省・現地日本大使館から案内されている。
指標は以下のとおりで今日の午前中はUnhealthyでしたが、まぁ軽い方でしたね。。。
シンガポールのhaze情報のページからPSI情報をスクリーンショットとして取得し、アニメーションGIFに合成します。下の赤で囲んだ部分を切り取ります:
ヘッドレスブラウザのPhantomJSをRubyから呼び出してスクリーンショットを取得しました。関係する部分だけを書くと、こんな感じです:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
| #!/usr/bin/env ruby
require 'capybara'
require 'capybara/poltergeist'
URL = 'http://www.haze.gov.sg/haze-updates/psi'
YYYYMMDDHHMM = Time.now.strftime('%Y%m%d%H%M')
STOREDIR = "#{File.expand_path(File.dirname(__FILE__))}/screenshots"
screenshot_file_name = "#{STOREDIR}/#{YYYYMMDDHHMM}.png"
################################################
# Get Screenshots
################################################
begin
Capybara.register_driver :poltergeist do |app|
Capybara::Poltergeist::Driver.new(app, {:js_errors => false, :timeout => 1000 })
end
browser = Capybara::Session.new(:poltergeist)
browser.visit URL
browser.save_screenshot(screenshot_file_name, full: true)
rescue Exception => e
puts e.message
exit 1
end
|
スクリーンショットはウェブページ全体を取得しているので、そこから指定範囲を切り出します。ImageMagickを使いました。使用例はこんな感じです:
% convert <em>screenshot.png</em> -crop '330x340+640+490' output.png
ImageMagickでできることを確認したら、Rubyから同じコマンドを呼び出してあげました。
これだけだと日時情報がなくてわかりづらかったため、日時情報の画像を生成してみました。こんな感じです:
% convert -background none label:"2015/10/03 15:00" -pointsize 18 sample01.png
できあがるのはこんな画像です:
2つをくっつけてみました:
% convert output.png sample01.png -gravity southwest -composite sample02.png
こうなりました:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
| #!/usr/bin/env ruby
require 'capybara'
require 'capybara/poltergeist'
require 'rmagick'
URL = 'http://www.haze.gov.sg/haze-updates/psi'
YYYYMMDDHHMM = Time.now.strftime('%Y%m%d%H%M')
OUT_STR = Time.now.strftime('%Y/%m/%d %H:%M')
STOREDIR = "#{File.expand_path(File.dirname(__FILE__))}/screenshots"
screenshot_file_name = "#{STOREDIR}/#{YYYYMMDDHHMM}.png"
crop_file_name = "#{STOREDIR}/#{YYYYMMDDHHMM}_crop.png"
caption_file_name = "#{STOREDIR}/#{YYYYMMDDHHMM}_caption.png"
result = "#{STOREDIR}/#{YYYYMMDDHHMM}_result.png"
################################################
# Get Screenshots
################################################
begin
Capybara.register_driver :poltergeist do |app|
Capybara::Poltergeist::Driver.new(app, {:js_errors => false, :timeout => 1000 }) #追加のオプションはググってくださいw
end
browser = Capybara::Session.new(:poltergeist)
browser.visit URL
browser.save_screenshot(screenshot_file_name, full: true)
rescue Exception => e
puts e.message
exit 1
end
################################################
# Crop & Date-time image generation
################################################
begin
original = Magick::Image.read(screenshot_file_name).first
crop = original.crop(285, 490, 340, 365)
crop.write(crop_file_name)
caption = Magick::Image.new(170, 30) {
self.background_color = 'none'
}
draw = Magick::Draw.new
draw.annotate(caption, 0, 0, 4, 4, OUT_STR) do
self.pointsize = 14
self.gravity = Magick::SouthWestGravity
end
caption.write(caption_file_name)
rescue Exception => e
puts e.message
exit 2
end
################################################
# Composite
################################################
begin
save_image = crop.composite(caption, Magick::NorthWestGravity, Magick::OverCompositeOp);
save_image.write(result)
rescue Exception => e
puts e.message
exit 3
ensure
File.delete screenshot_file_name
end
################################################
# Post processing
################################################
begin
File.delete crop_file_name
File.delete caption_file_name
rescue Exception => e
puts e.message
exit 4
end
exit 0
|
作成したスクリプトを5分おきに実行して、しばらく放ったらかしてから以下のコマンドを実行してアニメーションGIFを作成しました。どうやら「+repage」してあげないと、切り取り前の画像サイズをもってしまっているようで、すごく1024×600超の画像サイズのアニメーションGIFが出来上がってしまいました。。。
1
2
3
4
5
6
7
| % ls -1 | xargs -I % -n 1 convert % -trim +repage %.trim
% rm *.png
% for i in `ls -1`
do
mv ${i} ${i/.trim/}
done
% convert -limit memory 1 -limit map 1 -delay 15 20151004*_result.png anime.gif
|