vallog

2012/01/27

2012-01-27T23:59:00.001+09:00

2012/01/26

2012-01-26T23:59:00.001+09:00

google web fonts

2012-01-26T21:15:00.000+09:00

facebookでshunsukさんが紹介してたので試してみました。いいなこれー！

valvallow/google-web-fonts-test @ GitHub

参考

vallog: github pages

2012/01/25

2012-01-25T23:59:00.001+09:00

github pages

2012-01-25T23:51:00.000+09:00

ちょっと前に試しに作ってみてた。

valvallow/valvallow.github.com - GitHub

で、リポジトリごとにこういうことができるらしい

valvallow.github.com/gh-test/

ので試してみた

valvallow/gh-test - GitHub

へぇー。

ということでこれを試してみようかな。

きっかけはこちら

D言語があって僕は生きられた - Go ahead!

別件

そういえばprivateなリポジトリが作れるbitbucketでしばらく前からgitを使えるということを思い出したのでこっちも試してみた。

valvallow — Bitbucket

2日連続でちょっと遠出しただけで絶賛体調不良中。

2012/01/24

2012-01-24T23:59:00.001+09:00

2012/01/23

2012-01-23T23:59:00.001+09:00

デスクトップでもthinkpadのキーボードを！！（笑）

2012-01-23T23:24:00.000+09:00

レノボ・ジャパン ThinkPad USB トラックポイントキーボード(英語) 55Y9003

会社で買ってもらいましたー！ありがとうございます！
これ思った以上に使いやすいですよ、まじで（笑）しかも薄くて軽い。なぜか縦幅は大きいけどな！

日本語配列もあるみたい。

レノボ・ジャパン ThinkPad USB トラックポイントキーボード(日本語) 55Y9024

cygwinでcron

2012-01-23T23:07:00.003+09:00

これはちょっと苦労した。

VPSでもubuntuでも当然のように使えていたので、こんなに手間がかかるとは予想外。cron-configでdaemonさんとして動かすのによくわからないエラーが続出して手間取った。というかcygwinだからこんな目に。。いや、でもcygwinなかなかやりおる。

windowsにも似たようなものがあるんだって！あちゃー(ノ∀｀)

schtasks - Google 検索

でも、cronでやればshell script使えるしな！

windows server に cygwin 入れて sshd サーバ立てて git サーバにした話

2012-01-23T21:41:00.002+09:00

タイトルでほとんど内容終わり。windows 2008 serverでもcygwinって普通に使えるんですね。ちょっと驚いた。

linuxでやるより面倒だったけど、意外となんとかなるもんで。今回はWindows Server 2008。というかサーバはgit入れてsshd立てて外から接続できれば終わり。しかしGIT_SSHで少しハマった。

cygwinだけなら簡単なんだが。。クライアントでGUIからgitを使う、visual studioで使う、という前提で環境作ると面倒ー。わかりにくいー。大変ー。shellの方が快適ー。
しかし、意外とちゃんと動くもんで。cygwinやるじゃん。

tumblrの楽しみ方がいこつ編

2012-01-23T21:00:00.000+09:00

tumblr楽しいですね。楽しいです。

tumblr

つい先日まではスクラップブックくらいの感覚で使ってました。

気になった記事をブックマーク
気に入った文章をquote
気になった文章をquote
面白かった画像をup

ってな具合。dashboardは全然見てませんでした。 (dasboardはtwitterのTLみたいなもん）

で、

ブックマークしたlinkは1日分をまとめてブログに投稿（bot）

vallog: bookmark

自分のquoteからランダムにポストするtwitter bot

なんかを運用して一人で楽しいでいました。

が、これはもったいなかった。たくさんの人をfollowしたらdashboardが劇的に面白くなった。

vallog: twitterのfolloweeが同じIDでtumblrに登録しているかfollowee全員分調べる

500人くらいfollowするとdashboardがカオスになってすごく面白い。あと、tumblrで流れる18禁画像系がエグ過ぎてやばい。人前でdashboard開けない。やばいので、そういうアカウントは取りあえずunfollowしたった。（別アカでfollowしたわけだが）。

reblog！！そして、reblog！！＼宣／

投稿にはchrome拡張のTaberareloo使ってます。emacs拡張もあったりする（笑）

Chrome Web Store - Taberareloo

これがあるとはかどる。

それと短時間でfollowしまくると規制されるっぽい。

vallog: 日記（tumblrの規制とか）

取りあえずこんな感じか。

追記

あー、そうだ、androidのtumblr公式アプリもreblogがはかどる。

2012/01/22

2012-01-22T23:59:00.001+09:00

2012/01/21

2012-01-21T23:59:00.001+09:00

日記(GALAXY S IIでいつの間にか起動しているアプリがある）

2012-01-21T18:46:00.001+09:00

ふと起動中のアプリをみるとワンセグとビデオメーカーと設定が起動してるんですよね。どのタイミングで起動してるのかわからなくてイラっとしてたんですが、どうやらマナーモードを切り替えるタイミングで起動しているらしい。なんでやねん。でも起動するタイミングがわかったので別にもういい。勝手にしてくれ。

そういえば別件で昨日「カーネル入れ替えたらいいですよ」というアドバイスを受けた。そんなことをしたりするのかandroid。電話のできるネット用小型PCという認識で使っていこうと思っているますので深追いしない方向で。。アプリ開発？何それおいしいの？

2012/01/20

2012-01-20T23:59:00.001+09:00

Gmailで別のメールアドレスをpop受信してると「メールを今すぐ確認する」が面倒

2012-01-20T10:29:00.000+09:00

GmailのLabsから「POP アカウントの更新」を有効にしとくと受信トレイの更新ボタンで一緒に確認してくれるらしい。

2012/01/19

2012-01-19T23:59:00.001+09:00

辞書コマンド（あるいはshellで辞書、terminalで辞書）

2012-01-19T22:13:00.000+09:00

新しく開発環境を準備する際に、自分なりに欠かせないものがありますよね。emacsだったりzshだったり、windowsならcygwinやcolinuxなどなど人それぞれでしょう。私の場合その中の一つに辞書コマンドがあります。

私にとってshellで辞書を引けるかどうかはすごく重要です。というかプログラミングするときって辞書を引く機会が多いのでできるだけ手軽な方がいいです。辞書を持ち歩くわけにもいかないし、いちいちブラウザで調べるのも手間過ぎます。専用の辞書ソフトを使うというのも手かもしれませんが、これもブラウザを使うのとあまり差がありません。emacsの中だけに住んでる人はsdicで済ませたりするんでしょうけど、私は最近「脱emacs引きこもり」したので却下。

辞書コマンドを使うようになってまだ1年くらいです。今ではもう欠かすことのできないツールです。（grepでいいんじゃないかという話もありますけど）

で、結局どの辞書コマンドを使っているかというとzeeというperlスクリプトです。下記サイトの「がらくた置き場」から頂きました。（実際はzeeをちょっと改造してあるものをとある人からもらった）

0xcc.net

こんな感じ

$ zee lisp
lisp 
  かたこと, 舌足らずに話す
LISP     List Processor 
  リスプ, コンピュータのプログラミング言語の一つ

$ zee scheme
scheme 
  仕組み, 一覧表, 組織, 概要, 理論体系, 図式, 計画, 考え(よく
  ない)たくらみ, 陰謀, たくらむ

$ zee 元旦
元旦 (日本の) 
  New Year's Day
元旦(とそれに続く数日) 
  new year, new, year

$ zee プログラム
アプリケーション プログラム 【コンピュータ】 
  application program 
アプリケーション プログラム インタフェース 【コンピュータ】 
  API     Application Program Interface
オブジェクトプログラム 
  object program
コスト改善プログラム 
  cost improvement program
コボル(事務処理用のプログラム言語) 
  COBOL     Common Business Oriented Language
デバッグする(プログラムのミスを取り除く) 
  debug
ドローイング系のプログラムでよく使われる十字形のカーソル 
  crosshair cursor
ネットワーク制御プログラム;略:NCP 
...
..
.

辞書ファイルはgeneとかjddictとか。オフラインでも使えて超便利。

あと、mtranという自作（？）の翻訳プログラムも結構役に立ってる。けど、web apiを使うのでオフラインでしか使えない。正確には自作じゃなくてここ

Translator REPL - LISPだけ

が元ネタ。このコマンドを自分なりに書きなおしたものを使っています。

mtran.scm via wasao — Gist

つかみんなどうやって辞書引いてんの？便利な方法があったら誰か教えてください。今んとこzeeで大満足ですけども。

他

こういうのもあるみたい。

XJDIC Home Page

cygwinに入らなかったので諦めた。今度ubuntuで試してみよう。しかし、辞書コマンドのググりにくさは異常。

Vim選択範囲一括コメントアウト

2012-01-19T20:29:00.001+09:00

メモってなかったので

C-v I [comment string] ESC

Vimで一括コメントアウトする方法 - 北見オークションブログ

で、これはいいんだけど・・・
Visual Studio 2010のvimキーバインド拡張VsVimで同じオペレーションしてもコメントアウトできなくて詰んだ。。どうやるんだろ。

zshでESC qを知らなくて人生損してた

2012-01-19T20:29:00.000+09:00

ぐぬぬ

コマンドAを入力してる途中で、Aを実行する前にコマンドBを入力する必要があることに気づいたら・・・、今までは一度入力したものを消してコマンドBを実行してまたコマンドAを入力する、というような非常にストレスフルなことをやってた。全てESQ qが解決してくれた。

2012/01/18

2012-01-18T23:59:00.001+09:00

2012/01/17

2012-01-17T23:59:00.001+09:00

brainf*ckインタプリタを書いてみた

2012-01-15T23:09:00.002+09:00

brainf*ckインタプリタを書いたことがなければプログラマに非ず

などと言われることもあるようなので書いてみた。Gauche。

しかしプログラマには「hogehogeでなければプログラマに非ず」が多いですよね。ハードル高いの多いし。どうなってんだこの業界。
どの道ついてけないので、書けそうなものの中で面白そうなものをやってみる、というスタンス。

取りあえずHello worldが動くところまで書いたところ。replもつけてみた。コードがすごく納得できない状態なので、もう何度か書いてみたい。特にinterpretとparse（つまりメインディッシュ）がもうちょっとどうにかできないもんかと。

今回brainf*ckがどういう言語かちゃんと知って心惹かれました。面白い言語なんですねーこれ。しかも作るの簡単。なるほどlispと同じく使う人より実装する人の方が多い言語。lispと違うのは使う人がいなくて実装する人しかいないところか。

ソース

bfi at master from valvallow/brainf-ck - GitHub

#!/usr/local/bin/gosh

;;;
;;; bfi - brainf*ck interpreter
;;;

;; sample - Hello world
;; >+++++++++[<++++++++>-]<.>+++++++[<++++>-]<+.+++++++..+++.[-]>++++++++[<++++>-]<.>+++++++++++[<+++++>-]<.>++++++++[<+++>-]<.+++.------.--------.[-]>++++++++[<++++>-]<+.[-]++++++++++.


(use srfi-1)
(use file.util) ; file->string
(use gauche.parseopt)

(define (usage)
  (print "Usage: bfi [options ...] [file]")
  (exit 1))

(define (interpret code ptr mem)
  (let rec ((code code))
    (if (null? code)
        (values ptr mem)
        (begin
          (if (list? (car code))
              (until (zero? (vector-ref mem ptr))
                (rec (car code)))
              (case (car code)
                ((#\+)(inc! (vector-ref mem ptr)))
                ((#\-)(dec! (vector-ref mem ptr)))
                ((#\<)(dec! ptr))
                ((#\>)(inc! ptr))
                ((#\.)(write-byte (vector-ref mem ptr)) (flush))
                ((#\,)(set! (vector-ref mem ptr)(read-byte (current-input-port))))))
          (rec (cdr code))))))

(define (parse str)
  (let1 ls (string->list str)
    (let rec ((ls ls)(acc '()))
      (if (null? ls)
          (reverse acc)
          (case (car ls)
            ((#\+ #\- #\< #\> #\. #\,)(rec (cdr ls)(cons (car ls) acc)))
            ((#\[)(rec (let1 rest (drop-while (pa$ (complement equal?) #\])(cdr ls))
                         (if (null? rest)
                             '()
                             (cdr rest)))
                       (cons (rec (cdr ls) '()) acc)))
            ((#\])(reverse acc))
            (else (rec (cdr ls) acc)))))))

(define (repl mem)
  (print ";; brainf*ck interactive shell")
  (print ";; q to exit.")
  (let rec ((ptr 0)(mem mem))
    (display "bfi> ")
    (flush)
    (let1 input (read-line)
      (when (equal? input "q")
        (exit 0))
      (receive (ptr mem)
          (interpret (parse (x->string input)) ptr mem)
        (rec ptr mem)))))

(define (run-bf str mem)
  (interpret (parse str) 0 mem))

(define (main args)
  (let-args (cdr args)
      ((memory-size "m|memory-size=i" 1024)
       (interactive "i|interactive")
       (help "h|help" => usage)
       (else (opt . _)
             (print "Unknown option : " opt)
             (usage))
       . rest)
    (let ((mem (make-vector memory-size 0)))
      (cond ((and (null? rest) interactive)(repl mem))
            ((null? rest)(run-bf (port->string (current-input-port)) mem))
            ((run-bf (file->string (car rest)) mem))
            (else (usage))))))

使い方

 $ bfi hello.bf 
Hello World!

 $ echo '>+++++++++[<++++++++>-]<.>+++++++[<++++>-]<+.+++++++..+++.[-]>++++++++[<++++>-]<.>+++++++++++[<+++++>-]<.>++++++++[<+++>-]<.+++.------.--------.[-]>++++++++[<++++>-]<+.[-]++++++++++.' | bfi
Hello World!

 $ bfi -i
;; brainf*ck interactive shell
;; q to exit.
bfi> >+++++++++[<++++++++>-]<.>+++++++[<++++>-]<+.+++++++..+++.[-]>++++++++[<++++>-]<.>+++++++++++[<+++++>-]<.>++++++++[<+++>-]<.+++.------.--------.[-]>++++++++[<++++>-]<+.[-]++++++++++.
Hello World!
bfi> q
 $

参考

基本的にここのbfiを参考にしました。

Scheme:Brainfuck

shiroさんのbfi2が理解できない。。。

日記(世の中狭いという話)

2012-01-15T20:41:00.000+09:00

ありきたりな話題。ありきたりな話題だけど、それを実感した話。

今日はとあるイベントに参加してきた。某企業が開催するイベント。そこでは偶然にも友人知人が様々な立場で関わっていた。大学時代のサークルの先輩後輩、一緒に飲んだことのある他サークルの方々、地元の知人などなど。そういった方々が開催企業の社員だったり、イベントに参加している企業の社員だったり。

それほど仲が良かったわけでもない。社会人になってから一度も連絡を取ったことが無い。お互い名前すらよく覚えてない。大学時代ですらスレ違うときに「お疲れー」というだけの仲。それでも好意でサービスしてくれたり値引きしてくれたり。

すごく助かった。本当にありがたかった。人との繋がりは大切だ。大事なのは人脈だ。なんてことは大昔から言いつくされている。当たり前のことを実体験として強く認識した一日だった。自分もいざ友人知人に偶然遭遇したときに、何か役に立つことができる人になりたい。

日記(自分語り)

2012-01-15T20:40:00.000+09:00

先日28歳になった。私はプログラマとして働いている。大学を卒業してから次で4社目だ。ずっと同じ業界で同じ職種。

私は理系の大学を出たわけではないし、プログラミングの技術について専門教育を受けたわけでもない。高校も大学も文系。数学も物理も大の苦手だった。それどころか算数でつまずいて以来、理系の教科は嫌いで仕方なかった。大学では社会福祉学部で福祉と幼児教育を学び保育士の資格を取った。ピアノの単位を苦労して取ったり、体育の授業でダンスや劇をした。卒論も書いたことがない。卒業ゼミで銅版画を作成して卒業した。しかし残念なことに、今のところ保育士の資格が役に立ったことはない。いや、話のネタになることはある。

情報系の学部を出た人やコンピュータサイエンスの教育を受けてきた人がうらやましかった。若い頃からプログラミングをしている人がうらやましかった。有名なプログラマを見るたびに、勉強会に行くたびに、うらやましさと後悔をおぼえた。自分用のPCを手にしたのは大学3年だった。プログラミングを始めたのは就職してからだ。「もっと早くプログラミングに出会っていたら」「もっと早くPCを買っていたら」「情報系の大学に行っていたら」「学生の頃にもっと本を読んでいれば」などと思うことがある。

だけど、最近はそういうことを思うことがほとんどなくなった。私は私なりに学生生活を楽しく過ごしたからだ。

つづく...

P.S 落ち込むこともあるけれど、私プログラミングが好きです。