Y.A.S.D.

今年もやります Cellチャレ！ 参加募集開始しました。よろしくお願いします！

今年は「Cellスピードチャレンジ」から「Cell Challenge」に名称変更しました。 自由課題において，「速度向上」にこだわらない基準で評価することの明確な意思表示です。

というわけで，「一発ネタは出しづらい？」と思っているそこの社長さん！ （そうです！あなたです(笑)）遠慮せずに是非エントリをお願いします。 最悪，「時間がとれなくて提出できなかったー」というのでも問題ありません。まずはエントリを！

こないだブライトンのフェリエで頼んだら，「すいません今年は入ってないです」といわれたネクター・アンペリアル。 名駅高島屋にあったー。というわけで，今年はこれで。

あと，年賀状刷ったり。最初は若冲展のカタログから素材を拝借しようと思ってたんだけど いいのが見つかったんで方針転換で。かなり気に入ってるけど，ここ読んでる人と年賀状届く人は ほとんどかぶってない気がする...。

weblogger.el × metaWeblog (タグを通す編?)

XML-RPC Specification によると，'<' および '&' を '&lt;' および '&amp;' に escape して 送ればよいらしい。で，escape する処理を add-hook してできた! ...と思ったんだけど，なんか気づいたら add-hook しなくても通ってた。 いろいろ .el 書き替えたりしながらやってたので，混乱してたのかも? あとは weblogger-entry mode を minor-mode にして html-helper-mode と 一緒に使う (or その逆) ができたら完璧なんだけど，ちょっと面倒。

このサーバ

10/08 から ZFS root pool が使えるようになるということで， 出るのを待ってセットアップしたんだけど，やり方は docs.sun.com に細かく書いてあって簡単だった。初 ZFS です。あと，当初は CoolStack Tomcat 使ってたけど GlassFish に変えてみた。

OpenSolaris 11.2008

CF-R7 に入れてみた。ZFS というか TimeSlider が画期的。 ずっと避けてきた JDS (というか GNOME+metacity) に徐々に慣れていこうかと...。 GM965 が Xorg w/ intel ドライバで動かんな。とりあえず vesa で。 SolarisのくせにあっさりWiFiにつながるのは変な感じ。 Fn + F1/F2 は，「輝度変えてますよー」的な表示は出るんだけど実際は変わらず。

CS4

CREATIVE SUITE 4 へのアップグレードのご案内が来たんだけど， なぜか Design Premium 用の振込用紙が。持ってるの Design Standard なんだけど...。封筒に「CS4 オリジナルグッズ入ってます!」って書いてあるので 何かと思ったらステッカーだった...。

この経済危機を受けてということで。正直「まあ，そうだよなぁ」という。 「ガラパゴス」とか言われたりもするけど，いいか悪いかは別にしてやっぱり市場が特殊すぎる。 国内独自仕様のワンセグ・おサイフがデフォで (ユーザはホントにそれを求めてるのかな?というのは おいといて)，しかも大した規模でもない市場。相手にしてもしょうがないよな。 一方で日本端末メーカは海外ではシェアを伸ばせないままで...。いいんだか悪いんだか。 「日本のケータイ」がダメだとも遅れてるとも進んでるとも思わないけど， グローバルに見て「違ってはいる」わけで，それが私の使い方に合ってないことは確かなので， 撤退は残念。

それより一番残念だったのは，某エバンジェリストの blog での言。 本意が判りにくいけど，「自分(達?)だけが判ってる」ような言い方は，がっかりだなぁ。 みんなそれぞれの意見を持ってるだろうし，私はいろんな意見を聞きたいけどなー。

注：とりあえず現時点では weblogger-start-entry<f> 以外ではテストしていません。

Subject: に書いた文字列が title として Roller 側に渡らないのは， weblogger-api-new-entry が weblogger-api-blogger-new-entry<f> になってるからで， ほんとは weblogger-api-meta-new-entry<f> を使ってほしいところ。 根本的には weblogger-determine-capabilities<f> が悪いんだけど，とりあえず

(setq weblogger-api-new-entry 'weblogger-api-meta-new-entry)

しておくと，metaWeblog.newPost を使ってくれるようになる。 でも今度は Roller 側がエラーを吐く。原因を一言で言うと， そもそも値のないメンバを値 nil の boolean なメンバとして weblogger が request 生成してしまうから。

たとえば draft である *weblogger-entry* バッファには default では Date: フィールドがないんだけど，weblogger.el がこれを parse して (Date . nil) という構造で内部データとして持っていて（ここまでは別によい），最終的に

<member>
  <name>dateCreated</name>
  <value>
    <boolean>0</boolean>
  </value>
</member>

という request を生成しよる。なんでやねん。

同様に，内部データに (mt_tb_ping_urls . nil) と (mt_convert_breaks . nil) という MovableType 用(?) のメンバを勝手に追加しよる。 あと，(link . nil) とか (categories . nil) とかも。値が nil ならメンバごと要らんはず。

というわけで，どのタイミングでこいつらを消すかというのは微妙なところだけど， とりあえずこんな感じで動くには動いた。delq してるところを見ると， 作者は「消してるつもり」なんだろうと思う。 ちょっと泥臭いので，本当はこれより前に消しておいた方がよい気がする。 ただ，実際 boolean false を渡すべきメンバもあるかもなので，「assoc の結果が nil なメンバは 全部消して良い」ということはなくて，どっちにしても項目ごとに泥臭くチェックするしかないとは思う。

--- weblogger.el.orig
+++ weblogger.el
@@ -598,7 +598,7 @@
   (bury-buffer))
 
 
-(defun weblogger-save-entry (&optional publishp &optional arg)
+(defun weblogger-save-entry (&optional publishp arg)
   "Publish the current entry is publishp is set.  With optional
 argument, prompts for the weblog to use."
   (interactive)
@@ -1088,18 +1088,26 @@
 
 (defun weblogger-struct-to-request (entry)
   "Convert the struct to something that can be used in an xml-rpc request."
-  (delq nil
-       (list
-        (assoc "title"        entry)
-        (assoc "authorName"   entry)
-        (assoc "userid"       entry)
-        (assoc "dateCreated"  entry)
-        (cons "mt_tb_ping_urls"   (cdr (assoc "trackbacks"  entry)))
-        (cons "mt_convert_breaks" (weblogger-texttype-id-from-name
-                                   (cdr (assoc "texttype"    entry))))
-        (cons "link"              (cdr (assoc "url"         entry)))
-        (cons "description"       (cdr (assoc "content"     entry)))
-        (cons "categories"        (cdr (assoc "categories"     entry))))))
+  (let ((dateCreated           (assoc "dateCreated" entry))
+       (mt_tb_ping_urls        (cdr (assoc "trackbacks" entry)))
+       (mt_convert_breaks      (cdr (assoc "texttype"    entry)))
+       (link                   (cdr (assoc "url" entry)))
+       (categories             (assoc "categories" entry)))
+    (delq nil
+         (list
+          (assoc "title"        entry)
+          (assoc "authorName"   entry)
+          (assoc "userid"       entry)
+          (when (cdr dateCreated) dateCreated)
+          (when mt_tb_ping_urls
+            (cons "mt_tb_ping_urls" mt_tb_ping_urls))
+          (when mt_convert_breaks
+            (cons "mt_convert_breaks" mt_convert_breaks))
+          (when link
+            (cons "link" link))
+          (cons "description"       (cdr (assoc "content"     entry)))
+          (when (< 0 (length (cdr categories))) categories)
+        ))))
 
 (defun weblogger-server-userid ()
   "Get information on user."

dateCreated をちゃんと Roller 側に渡したい場合は，こんなこともしておくと良いかも。

(defadvice weblogger-save-entry (before TT:insert-date-field)
  "Insert Date: field."
  (goto-line 0)
  (insert (format-time-string "Date: %Y%m%dT%TZ\n" (current-time))))

安易に advice で済ませたくないけど， 残念ながら welogger-new-entry-hook に add-hook するのでは遅い...。

weblogger という Emacs package があるらしいので使ってみたところ，動かなかった。

軽く追っかけてみたところ，Roller は <methodResponse> に xmlns:ex="http://ws.apache.org/xmlrpc/namespaces/extensions" という attribute をつけて返すみたいなんだけど，xml-rpc.el の xml-rpc-clean<f> が attribute をうまく処理できてないようだ。

こんな感じでとりあえず post できるとこまでこぎ着けたけど，まだ問題が...

• HTMLタグが書けないぽい。書くと post 時にエラーになる。仕様っぽい? でも致命的。
• Subject: に何か書いても，本文の冒頭がエントリタイトルとして使われちゃう。

--- xml-rpc.el.orig     2008-11-16 17:24:23.303673000 +0900
+++ xml-rpc.el  2008-11-16 17:54:01.583264000 +0900
@@ -515,7 +515,7 @@

 (defun xml-rpc-clean (l)
   (cond
-   ((listp l)
+   ((and (listp l) (listp (cdr l)))
     (let ((remain l)
          elem
          (result nil))
@@ -573,7 +573,7 @@
                                (buffer-substring errstart (point-max)))))

                        ;; Maybe they just gave us an the XML w/o PI?
-                       ((search-forward "<methodResponse>" nil t)
+                       ((search-forward "<methodResponse" nil t)
                         (xml-rpc-clean (xml-parse-region (match-beginning 0)
                                                          (point-max))))

S60 Living によると，以前の Nokia 端末にあった Access Point Group の機能を実現する SmartConnect が Download! から free で落とせるようになってるということなんだけど，私の Download! には現れないな－。Office フォルダにあるという噂なんだけど...。

以前は BirdStep のサイトから入手可能だったらしい?

昔は「持ってるCD全部が入る iPod じゃなきゃヤダ！」と思ってたんだけど，最近「やっぱ滅多に聞かないモノは聞かないよな」という当たり前のことを実感して，なんかもう携帯プレイヤー E71 (SDHC 8GB) でいいかという感じ。

Mobbler は，background で走らせておくと Music player で聞いた(左)曲ログを裏で scrobble してくれて(中)，online ならリアルタイムで，offline ならあとで online になったときに Last.fm に upload してくれる。おまけに Last.fm の station まで聞ける(右)という。すばらしすぎる。

ウラの意味ではなく(笑)。

docomo から PIERRE HERMÉ コラボのケータイ が出るらしいんだけど，某所でピエールエルメファン(なんだそれ?)からの怒号がすごい。 エルメは（名古屋にはお店がないので）バレンタインの季節とかにたまにチョコ買ったりする くらいだし（さすがに美味い），でもチョコは Leonidas に勝るものはないと思っているし， マカロンも別に興味のないような，全く思い入れはない人間からすると，写真を見る限り N-03A は結構 「おいしそう」な質感が出てそうでいいんじゃないかと思うけど...。でもそれだけなら，エルメの 名前つける必要ないと言われればまあそうか。

そういえばそろそろケーキの予約の季節だけど，ウチは最近 毎年 Sadaharu AOKI と決めてます。

自作 python スクリプトを使い続けて 10年になりますが，えいやと Roller に移行しました。 時間も気力もないので Cool Stack でお手軽に...。思えばfdusを参考に Perl で作りはじめ， ソース記述専用の Emacs minor mode を作ったり 覚えたての Python で書き直し てみたり。 いろいろございました。

ただし古いエントリも移行したかったので， 旧日記のソースを UTF-8 に変換つつ SQL の Roller DB に合う形に変換して， カテゴリもエントリ中にキーワードマッチングで適当に推測して(笑)， コマンドラインから SQL INSERT でがっつり突っ込んでみた。 とりあえずはうまく行ってるように見えるけどどうかな。