ただのにっき

◆1 GPSケータイとカシミール3Dでルート情報作成(1)

hvsGpsMailというサービスが最近公開された。GPSケータイでこのページを表示しっぱなしにしておくだけで、定期的に位置情報を指定アドレスにメールしてくれるというものだ。原理的にはHDMLのrefreshを使ってreloadしているだけなので、自前のCGIを書いてもいいんだが、どれくらい使い物になるのか判断できるまで、しばらくこれを使わせてもらおう。

何に使うのかというと、ツーリングのルート情報を保存したいのである。新しいバイクも来ることだし(笑)。これを使えば、ケータイをポケットに放り込んでおくだけで、移動中の位置情報を逐一自宅に送信してくれる。高速移動中ということもあり、どれくらいの頻度でデータを取ればそれっぽいルートになるのか、実験してみたい。そこそこのモノが出来るなら、GPS専用機なんてわざわざ買わなくても済むので、ありがたい(けっこう高いしね)。

で、取得したデータをどうやって地図上に反映するかというと、有名なカシミール3Dを使うわけだ。メールを処理して、カシミール3Dが読み込めるデータに変換すればいい。……とはいえ、この手のソフトを使うのは初めてなので、用語からしてわからない(汗)。いろいろあたってみて、GPSファイルツールプラグインというのがサポートしているCSV形式が楽そうだとわかる。

以下、変換プログラム。

#!/usr/bin/ruby -Ke
require 'nkf'

data = NKF::nkf( '-e', ARGF.read )
file = name = e = n = h = t = ''
data.each_line do |l|
   case l
   when /^東経:([\d\.]+)/
      e = $1
   when /^北緯:([\d\.]+)/
      n = $1
   when /^高度:(\d+)/
      h = $1
   when /^時刻:(\d+)/
      t = $1
   end
end

if n =~ /^(\d+)\.(.*)/ then
   n = "#$1.#{$2.gsub( /\./, '' )[0,5]}"
end
if e =~ /^(\d+)\.(.*)/ then
   e = "#$1.#{$2.gsub( /\./, '' )[0,5]}"
end
if t =~ /^(\d{4})(\d\d)(\d\d)(\d\d)(\d\d)(\d\d)/
   time = Time::local( $1, $2, $3, $4, $5, $6 )
   t = time.utc.strftime( '%Y-%m-%d,%H:%M:%S' )
   name = time.strftime( '%H%M%S' )
   file = time.strftime( '/home/sho/tmp/%Y%m%d.csv' )
end

File::open( file, 'a' ) do |f|
   f.puts "R1,#{name},#{n},#{e},#{h},#{t},Tokyo,-9999.9,-9999.9,1,909012,,"
end

これを.procmailrcにでも仕込んでおけば("Subject: hvsGPSmail"でひっかける)、自動的にCSVファイルができあがる寸法。今日、仕事の行き帰りの電車でデータを取得してみるので、帰ったら遊ぼう。楽しみ、楽しみ。

◆2 GPSケータイとカシミール3Dでルート情報作成(2)

さて、帰宅して帰り道のデータを上のプログラムで処理してカシミール3Dに食わせてみる。結果をとくと見よ……と言いたいところだが、追加投資なしで使える国土地理院の地図はこういうトコロに掲載してはいけないようなので見せられないのであった。地図データ付きの書籍が出ているようなので、買ってくるか。

• 徒歩のデータはけっこう通った道がわかる。1分間隔にすればかなりの精度が得られそう
• 電車に乗ってる間は、ほぼ駅と駅が直線で結ばれる感じ。2分間隔じゃ、バイクでもダメかなぁ?
• 電池の消耗が激しい。日帰りツーリングで全工程をトラッキングするのは無理かもしれない
• 衛星が捉えられない時と基地局が捉えられない時に、入力待ちになってしまうのは困った問題

というわけで、使えるような使えないような微妙な状況に(笑)。ま、こんどはバイクに乗ってやってみよう。もう.procmailrcに仕込んじゃったからな。ブラウザ立ち上げるだけでトラッキングできるわけだし。

◆3 tDiary.Net: アンテナ復活

ようやく、アンテナを復活させた。「いまどき公式サービスとしてアンテナはどうよ」って気がしなくもなかったが、アンテナそれ自体よりも二次利用のためのデータが重要だという認識に至った。というわけで、従来のLIRSファイルに加えて、今回からchanges.xmlも提供。ご自由にお使いくだされ。

• tDiaryアンテナ: http://www.tdiary.net/20010104.html

◆4 Green Leavesテーマ

そろそろ梅雨入りだというのに毛皮を着たケモノのテーマも暑苦しかろうということで、少し遅れた衣替え。写真の葉っぱは、おしゃれにバジル……と言いたいところだが、そうではなくて花が咲く前のアジサイだったりする。

＃green_leavesテーマとしてcommit済み。