■rxvt で壁紙を表示 03:45

rxvt の背景が白色で目につらかったので、壁紙を入れることにした。六時間*1ぐらいかかってうまくいった。

最終的に得られたもの :

• こんな感じ : http://f.hatena.ne.jp/scinfaxi/20071116040949

/usr/local/bin/gosh /home/theo/bin/rxvt.scm /home/theo/xpm_tmp -T 'urxvt' -bl +sb -fg '#cccccc' -bg '#000000' -geometry 163x55+1+1 -e screen

#!/usr/local/gosh

(use srfi-27)
(use gauche.process)
(use file.util)

(random-source-randomize! default-random-source)

(define *image-file-specs*
  #(("/home/theo/wall/bcc3e5ef.jpg" "#ffffff")
    ("/home/theo/wall/6d79801a.jpg" "#000000")
    ("/home/theo/wall/41adc229.jpg" "#000000")
    ("/home/theo/wall/2603a9f9.jpg" "#ffffff")
    ("/home/theo/wall/876_4426.png" "#ffffff")
    ))

(define (select-image)
  (apply
   values
   (vector-ref
    *image-file-specs*
    (random-integer (vector-length *image-file-specs*)))))

(define (main args)
  (receive (img fg-color) (select-image)
    (let* ((xpm-dir (cadr args))
	   (xpm (receive (_ file _)
		    (decompose-path img)
		  (build-path
		   xpm-dir
		   (string-append file ".xpm")))))
      (unless (file-exists? xpm)
	(run-process `("convert" ,img ,xpm) :wait #t))
      (run-process `("/usr/bin/urxvt" "-pixmap" ,xpm
		     "-bl" "+sb" "-fg" ,fg-color
		     "-geometry" "163x55+1+1"
		     "-bg" "#000000"
		     "-e" "screen"
		     )
		   :fork #f))))

■一年三ヶ月前の俺の部屋 04:16

• scinfaxi's fotolife - パソコン周辺@俺の部屋

えらくすっきりしているなぁ……。この時は机二号もなかったし、本の塔も、段ボールの谷もなかったんだな。

■やったー携帯小説できたよー　ギーク(笑) 06:05

　───俺の名前は Theoria 。心に傷を負ったハッカー。アナーキーでクリエイティブなギーク。
俺がつるんでる仲間は10年家から出ていない田中、会社にナイショで脱税している木下。
訳あって産業スパイをやっている東条。
　仲間がいてもやっぱりカネになる仕事はつまらない。今日も木下とオブジェクトデータベースの
インプリメンテーションで口論になってしまった。ギーク同士だといつもこれだから困る。
そういう時、俺は一人でネットサーフィンすることにしている。心のガベージコレクションってやつ？　デバッグともいうかな。

　「これはヤクいぜ……」　そんなことをつぶやきながらムカつくテキストを dis る。
「最近旦那に相手にしてもらえなくて欲求不満なんです……」　どいつもこいつも同じようなセリフしか言わない。
人妻はエロいけど、何かと厄介だから望ましくない。もっとデタッチしやすいプロセスがいい。
「すいません……」　またか、とインテリジェントな俺は思った。 ignore するつもりだったが、
3ナノ秒だけ女を見た。

「ｋｔｋｒ！！！」
　……違う！　……既存のプロダクトとはデザインが決定的に違う！　lambda な電気信号が俺のハードウェアを
駆け巡った……。「……(エロい……！！　俺のカラムをインサートしたい……)」

女はスーツだった。ついていったら火のふいたプロジェクトにアサインされた。「この工期では無理だ！」デスマった。
「ひひ、うひひひひひひひひ」　俺は過労死した。労災は出なかった。ギーク(笑)

メンヘラ(笑)

　───僕の名前は Theoria 。受験に失敗した BPD 。自虐的で反社会的な病人。
僕がつるんでいる奴は四回堕胎したユミコ、九階から飛び降りて死ねなかったヨシオ。
神様から将軍に任命されたコウタロウ。
　友達がいてもやっぱり鬱の波は苦しい。今日もユミコとゴムをつけるかどうかでケンカしちゃった。
メンヘラ同士だとこうなるから辛いよね……。そんな時僕は自分に罰を与えるんだ。
どうしようもない運命？　自罰的傾向ともいうかな？

　「今日はよく切れるね……」　そんなことを呟きながらカミソリを走らせる。
「クスリは二週間分しか出せないよ」　どの医者も結局はクズばっかりだ。
レボトミンはよく効くけれど、あとに残るからいやだ。もっと抜けのいいクスリがいい。
「もう疲れたよ……」　僕は呟いた。 OD して寝逃げしようと思ったが、うまくいかなかった。

「……」
　……違う。これまでの鬱とは何かが違う。絶望の淵に立たされた僕に悪寒が走る。
(どうせ何も変わらないんだ……ずーっとこのままなんだ……今日で、今日で終わりにしよう……)

僕は納屋からロープをとってきた。よく締まるように水に濡らしてから梁に結びつける。
(お父さん、お母さん、ごめんなさい……。こんな息子でごめんなさい……)
首にロープをかけ、僕は椅子を蹴った。天井が落ちてきて、タンコブができた。メンヘラ(笑)

クレイジーソルト

• 【ﾚﾃﾞｨｶﾜ】バカ女語のガイドライン7【ｶｯｺｶﾜ】
• クレイジーソルト クラブ「クレイジーソルト/日本緑茶センター」

ちょっと待て。クレイジーソルトはうまいだろ……常識的に考えて……。

■スワップイン スワップアウト 07:44

Non-ghost なオブジェクトは10しかないはずなのに1159もある。それどころかオブジェクト全体が500しかないはずなのにきっちり1500ある。謎だ。謎すぎる……。

眠いので起きたらやろう。こんな調子でいつの間にか金曜日。まだ火曜か水曜ぐらいだと思っていたよ。

■死刑執行の停止決議案を採択＝制度廃止視野、日米は反対−国連総会委 18:11

• 時事ドットコム：死刑執行の停止決議案を採択＝制度廃止視野、日米は反対−国連総会委

国連なんてやめちまえよ。常任理事国はごろつきばっかだぜ……。アメリカ、中国、ロシア、イギリス、フランス……。

■Web ブラウザで Scheme 18:15

• 女子高生ぷろぐらまーなお☆のブログ

つ WebScheme - Scheme interpreter for web applications

• 関連 : OreScript時代の幕開け - yukobaの日記

■貴様は真面目に田舎で暮らしたいのかと小一時間問い詰めたい 18:33

• 貴様は真面目に田舎で暮らしたいのかと小一時間問い詰めたい - 2007-11-15 - 黄色いガードレールの上で

アメリカかフランスの田舎に行けば農業で儲かるんじゃね？

貴様は本当に都会で暮らしたいのかと小一時間問い詰めたい

いやね、田舎に引っ越してきて解ったことなんだけど、都会に行く奴多すぎだろ。本当にお前は東京や大阪でプログラマーなり SE なりになりたいの？　プログラマーや SE の求人があるから、大都市に行くの？　大都市に住みたいから、プログラマーや SE になるの？

大体、プログラマーの求人も、 SE の求人も、ハローワークに行けばうんざりするほどあるじゃん。何考えてんだか……。それでいて、「年老いた両親のことは見捨てたくない」みたいな。「五年ぐらいしたら地元に戻ってくる」みたいな。馬鹿じゃないの。反吐がでる。

■開発者が語るMonaのこれから 18:58

• 開発者が語るMonaのこれから − ＠IT自分戦略研究所

開発者が語るMonaのこれから - ひげぽん OSとか作っちゃうかMona-経由。

ひげぽんさん黒くね？　背景に溶けこんでね？

■言語処理系が書きたいです 19:06

はー……。でも今書いてもうまくいきそうにないしなぁ……。

■mixiはなぜ、独り勝ちできたのか　笠原社長が語る 21:17

• mixiはなぜ、独り勝ちできたのか　笠原社長が語る - ITmedia News

スーツの勝利だなぁと思う。少なくとも俺にはあんな相互監視システムは気持ち悪くて書けないよ。

■ついたー 22:13

折角新しいものが得られそうだったのに、 Twitter 落ちた。