nDiki : iCalendar

スポンサードリンク

仕事用に Skype 名を作成し、ついでに社内 Blog に Skype ボタンを貼りつけてログイン状態を表示できるようにしてみた。

そういえば電話もそうなんだけれど、本社に連絡を取るとき「もしかして会議中?」などと勘繰ってかけるかどうか迷ってしまうことがある。かけたい人の予定がわかればいいのになと。

ならば逆もしかりだろうということで、自分の仕事のスケジュールを晒してみようと思いついた。グループウェアとかそういうのは大袈裟なので、まずは社内 Blog のサイドバーに表示するようにしたい。

ということでこの3連休に実装してみた。

完全なスケジュールはほぼ日手帳に手書きで管理しているので、ミーティング・外出など晒しカテゴリのイベントだけを、電子化する必要がある。手で HTML 毎回ごりごり書き直すのも嫌なので、スケジュール管理ソフトを使いたい。この部分は KDE の KOrganizer を使うことにした。

で、KOrganizer のスケジュールを iCalendar 形式でエクスポート。このファイルを社内 Blog を配信しているサーバに rsync で転送。

この処理はちょっと手間なので自動化したいところ。

この iCalendar 形式ファイルを読み込んで、今日以降の10件(程度)を HTML フラグメントに変換し JavaScript プログラム (document.write() 列) として出力する Perl CGI プログラムを作成。

iCalendar の形式の読み込みについては Data::ICal や iCal::Paraser などの Perl モジュールを利用できる。今回はシンプルに使えそうな iCal::Parser をチョイス。基本的には

 use iCal::Parser;
 my $parser = iCal::Parser->new;
 my $calendar = $parser->parse($ics_file_name);

で読み込んだデータがハッシュリファレンスとして $calendar に設定される。イベントは $calendar->{2007}->{01}->{01}->{$uid} のように「年、月、日、イベントUID」のハッシュ階層として格納されているので、これを読み出せばよい。

まずは表示までできるようになった。

これで

をまとめて公開できる社内 Blog にアップグレード。

おいおいスケジュールの表示デザインとかは改良していきたい。 hCalendar 形式にして CSS でデザインするのがいいのかな。

Plagger のインストールが大変なので XML::RSS で RSS ... (2006-06-10)
[ WiKicker ] 憧れのサイドバー (2004-01-23)
[ DiKicker ] くっつき BBSをくっつけてみた。 (2004-05-04)
Hyper Estraier で社内 Web コンテンツ検索 (2006-06-01)
WiKicker に JSON でのページ出力機能を追加 (2007-04-03)

09:43 会社用ルービックキューブ買った。L:秋葉原[mb]
09:45 ヨドバシに∞プチプチ品切れ中の張り紙。L:秋葉原[mb]
11:58 KOrganizer から iCalendar 形式でエクスポートするかわりに、 Google カレンダーから iCal 形式を Wget するようにした。 *Tw*
12:15 ハサミ型シュレッダーは 9 連刃。はやく使ってみたい。 *Tw*
12:29 朝買ったお NEW のルービックキューブおろした。 *Tw*
15:33 自動販売機の缶コーヒーがホットになった。 L:東京都千代田区東神田3 *Tw*
18:31 Google カレンダーのモバイル通知を設定。 *Tw*
19:36 LABI の看板が姿をあらわした。L:大井町[mb]

今日のさえずり - 昭和通りでホームレスがトロフィーかかげてる! (2008-08-31)
今日のさえずり (2007-09-13)
PM7:00過ぎのヨドバシカメラマルチメディアAkiba 激混み (2005-09-16)
今日のさえずり - ホームレスグーチョコランタン (2008-10-27)
今日のさえずり - PuTTY って「パティ」なのか (2008-09-11)

11:33 [B!] Remember The Milk - Blog 新機能について http://tinyurl.com/23ze2z
12:01 Cross Post_Hatena_Twitter、TinyURL 化失敗しているな。Greasemonkey ユーザスクリプトの問題か、はたまた http://remysharp.com/tinyurlapi の問題か。
12:34 「定時退社デーを作ろう!」という東京都労働局の車内広告、毎日定時退社ははなから諦めろと?
12:47 Todoist のアカウント作成した。 http://todoist.com/ *Tw*
14:17 Windows XP Home Edition をセーフモードで起動し、Administrator でログインして PostgreSQL インストール失敗の残骸を削除。
15:59 RTM の Private Addresses をオンにして、いくつかのリストの iCalendar を Google カレンダーに取りこんだ。 *Tw*
16:35 会社の掃除機のパイプがのびることを今日はじめて知った。どうりで今まで腰に良くなかったわけだ。 *Tw*
19:26 enraku ゴールデン進出。オープニングをリアルタイムで見られたの初めて。
19:57 ランキンの楽園「生まれてきたわが子に母が最初にかけた言葉ランキン」第1位「ありがとう」 - 泣ける。http://tinyurl.com/22x8ol