ubulog

davfs2 で drivee に接続する

2011-01-24T19:10:00.003+09:00

ネットワークストレージではDropboxが使い勝手がいいのですが、今回 drivee という新サービスがはじまり、無料で3GBも使え、しかも WebDAV でアクセスできちゃうということなので、早速試してみました。

インストール

事前にdriveeのアカウントを取得しておいてください。

sudo apt-get install davfs2

davfs2 のユーグループに自分のアカウントを追加する

sudo gpasswd -a ユーザ名 davfs2

マウントポイントを作成する

mkdir ~/drivee

/etc/davfs2/secrets にIDとパスワードを記述する

パーミッションに注意してくださいね。
書式は、

https://アカウント名.drivee.jp/ ID パスワード

/etc/davfs2/davfs2.conf の設定を変更する

if_match_bug 1

にしておく。

fstab に追記する

https://ユーザ名.drivee.jp/ マウントポイント(フルパス) davfs noauto,users,uid=1000,gid=1000 0 0

uid と gid は自分のアカウントに合わせてください。id コマンドで確認できます。

マウントしてみる

以上設定ができましたら、マウントしてみます。

sudo mount ~/drivee

後はファイルをコピーしたりして試してみてください。

Emacsから校正支援する

2010-09-11T22:10:00.003+09:00

Emacs から日本語の校正支援をする Emacs lisp を作ってみました。

インストール

　github からダウンロードしてきた yspel.el を ~/emacs.d/ などの load-path の通った場所に置いてください。
　git コマンドからなら、

git clone git://github.com/yama-natuki/yspel

で落とせます。
　落としてきたら ~/.emacs に

(require 'yspel)

と書いておきます。

使い方

校正したいテキストファイルを開きます。
開いたら M-x yspel としてyspel を起動します。
ウィンドウが分割され、校正箇所がリストアップされます。
pキーとnキーでリストを上下に移動します。
リターンキーで該当箇所にジャンプします。
ウィンドウを閉じるときは q キーです。

　Yahoo API を利用して校正支援をおこなっています。
　yahoo API の制限で校正できるファイルサイズは 100KB までです。あまり大きいテキストだとうまくいかないかもしれせん。
　だいたい4000文字ぐらいが安心？
　文書が大きい場合は範囲選択して分割して M-x yspel するようにしてください。

　取りあえず、動くものを作った。多分動くと思う(^_^;)
　原稿や論文などの校正にお役立てください。メールを送信する前とかにもいいですね。

　まーしかしあれですね、Emacsはプログラムだけでなく普通の文章を書くのにも最高の道具ですね。Emacsから広辞苑は引けるわ、Emacsから英辞郎もひけるわ、Emacsから翻訳もできるわ、Emacsからはてなキーワードを調べられるわ、Emacsから原稿枚数も計算できるわ、Emacsから校正支援もできるわ。Emacs最高です。

Emacs でファイルをsudoで開き直す。その2

2010-08-11T12:10:00.002+09:00

前回、root所有のファイルをsudoで自動的に開き直してくれる Emacs lisp の記事を書きました。わりと好評だったようでよかったです。
　今回、rootユーザだけでなく、他のユーザのファイルも同様に開いて編集したいとのリクエストがきたので、修正してみました。以下になります。差し替えて使ってみてください。


 (defun file-other-p (filename)
  "Return t if file FILENAME created by others."
  (if (file-exists-p filename)
      (/= (user-real-uid) (nth 2 (file-attributes filename))) t))

(defun file-username (filename)
   "Return File Owner."
   (if (file-exists-p filename)
      (user-full-name (nth 2 (file-attributes filename)))
     (user-full-name (nth 2 (file-attributes (file-name-directory filename))))))

(defun th-rename-tramp-buffer ()
  (when (file-remote-p (buffer-file-name))
    (rename-buffer
     (format "%s:%s"
             (file-remote-p (buffer-file-name) 'method)
             (buffer-name)))))

(add-hook 'find-file-hook
          'th-rename-tramp-buffer)

(defadvice find-file (around th-find-file activate)
  "Open FILENAME using tramp's sudo method if it's read-only."
  (if (and (file-other-p (ad-get-arg 0))
           (not (file-writable-p (ad-get-arg 0)))
           (y-or-n-p (concat "File "
                             (ad-get-arg 0) " is "
                             (if (file-exists-p (ad-get-arg 0)) "read-only." "newer file.")
                             "  Open it as "
                                     (file-username (ad-get-arg 0)) "? ")))
      (th-find-file-sudo (ad-get-arg 0))
    ad-do-it))

(defun th-find-file-sudo (file)
  "Opens FILE with root privileges."
  (interactive "F")
    (set-buffer (find-file (concat "/sudo:"
                                   (file-username file) "@" (system-name) ":" file))))

　これで他のユーザのファイルでもそのユーザとして開いて編集する事ができます。

2010/08/15:修正

　新規ファイルを開こうとするとエラーになってしまうのを修正した。

2010/08/16:修正

　他ユーザの新規ファイルを開けるようにした。
　再度ダウンしなおして差し替えてください。

ubuntu 10.04 アップデートメモ

2010-06-12T15:50:00.002+09:00

遅ればせながら ubuntu10.04 にアップグレードしたのでそのメモを。

起動時のスプラッシュ画面が、Plymouthになった。
kernel option で vga=792 としていたが、コンソールが表示されなくなった。
　フレームバッファの取り扱いも変更になたようだ。
　nvidia のプロプラなドライバを利用している場合は、
echo FRAMEBUFFER=y | sudo tee /etc/initramfs-tools/conf.d/splash
sudo update-initramfs -u
とし、
sudo hwinfo --framebuffer
として解像度の値を取得。 Mode 0x031b: 1280x1024 (+5120), 24 bitsにしたいので、kernel optionに、
vga=0x031b
と指定。無事コンソールが高解像度で表示されるようになった。

Emacs = Emacs23 となったので、以前のemacs22 と emacs-snapshot を削除。すっきり。
アップグレード時にxscreensaver が起動してるとダメよとメッセージが出たので、killした

　トラブルはこんなものか？今回はほとんどトラブルらしいトラブルがなかった。
　特に問題もなくアップグレード作業は終わり。うーん書くことがない。困った(^_^;)
　起動時間は少し速くなったかなあという感じ。うちのPCがロートルなので体感出来ていないだけですかね。
　ext4 が以前より体感で高速になっている。不思議。遅くなっているハズなんだけどなあ。
　そんなわけで特に問題もなく、きわめて快適です。

nautilusのゴミ箱表示に削除した日と元の場所を追加する

2010-04-03T13:35:00.001+09:00

nautilusのゴミ箱を一覧表示した時に「元の場所」と「ゴミ箱に入れた日」という項目を表示するパッチを当てたものをPPAに置きました。
　よろしかったらどうぞ。

PPAの追加の仕方

sudo add-apt-repository ppa:yama-natuki/ppa

インストール

sudo apt-get update
sudo apt-get upgrade

こんな感じ。

　ubuntu 9.10 用です。

Emacs でファイルをsudoで開き直す

2010-03-01T20:30:00.001+09:00

tramp の最初の一回目の認証で待たされる感覚が嫌いなので、私はよくsudo をやらずにそのままファイルを開いてしまいます。そうして「ああ、やっぱり編集したい」となり、sudo で開きなおします。
　作業の流れ的に美しくありませんし、毎回引っかかるのでストレスにもなります。
　vim ですと「:e sudo:%」でカレントファイルを sudo で開きなおしてくれるようです。いいなあ。

　ということで 自動的に sudo で開きなおしてくれる機能を作ろうかと思ったら、すでにあったのでそれを導入します。
　元のlispは、書き込み不可なファイルすべてをsudoで開きなおすか聞いてくるのでうっとおしいので、少し修正しました。
　root所有なファイルを開いた時だけ、sudoで開き直すか聞いてくるようにしました。

　以下を ~/.emacs にコピペしします。


(defun file-root-p (filename)
  "Return t if file FILENAME created by root."
  (eq 0 (nth 2 (file-attributes filename))))

(defun th-rename-tramp-buffer ()
  (when (file-remote-p (buffer-file-name))
    (rename-buffer
     (format "%s:%s"
             (file-remote-p (buffer-file-name) 'method)
             (buffer-name)))))

(add-hook 'find-file-hook
          'th-rename-tramp-buffer)

(defadvice find-file (around th-find-file activate)
  "Open FILENAME using tramp's sudo method if it's read-only."
  (if (and (file-root-p (ad-get-arg 0))
           (not (file-writable-p (ad-get-arg 0)))
           (y-or-n-p (concat "File "
                             (ad-get-arg 0)
                             " is read-only.  Open it as root? ")))
      (th-find-file-sudo (ad-get-arg 0))
    ad-do-it))

(defun th-find-file-sudo (file)
  "Opens FILE with root privileges."
  (interactive "F")
  (set-buffer (find-file (concat "/sudo::" file))))

　これで dired や C-x C-f で普通にファイルを開いても、それがroot所有なファイルならば自動的にsudoで開きなおすか聞いてくれます。おかげでtrampを意識しなくて済むのでとても楽になりました。

Ubuntu のdvipdfmx でB5でPDFにしたら用紙サイズが変

2010-02-23T20:30:00.000+09:00

前回 TeX を導入し、いろいろ弄くって PDF に変換したりして遊んでいたんですが、

dvipdfmx -p b5 test.dvi

とかして用紙を B5 指定にしてPDFに変換しても、どうもレイアウトがずれる。あれーおかしいなあとかなり悩んだんですけど、どうも用紙サイズがB系列がISO規格になっていて、国内のJIS規格に対応していないのが原因だった。

　とりあえず linpaper にB系列の用紙サイズを追加したものを PPA にアップしておきましたのでどうぞ。

dvipdfmx -p b5j test.dvi

というように j を付ければJIS規格のサイズで出力されます。
ついでにはがきサイズも追加しておきました。 hagaki でいけます。

Ubuntu 9.10 に TeX を入れてみた

2010-02-18T19:58:00.000+09:00

Ubuntu に TeX を入れてみましたので、メモ。
基本的に ubuntu wiki のとおり。

sudo apt-get install latex-env-ja
sudo apt-get install latex-extra-ja
sudo jisftconfig add

でインストールが完了します。簡単ですねー昔の事を考えたら素晴しい進化です。

●dvipdfmx が jsarticle で動かない

　jarticle では問題なく動きます。新しい jsarticle ではエラーが出て動きませんでした。
　うちの環境では、/etc/texmf/dvipdfm/dvipdfmx.cfg の最下行に、

f jis-cjk.map

を追記し、 sudo update-vfontmap する事で動きました。

出来たdviファイルを確認する時は→
　　　xdvi を使う。
PDFに変換するには→
　　　dvipdfmx を使う。
文字コードは→
　　　当座はeuc-jpにする

　こんなとこかな？
　TeXなんて使ったのは遥か昔の事なので、完全に忘れています。使う機会もないんですが、テキストのメモなんかプリントアウトする際にちょちょいと整形するのに便利なので、今後使っていこうかな。かな。かなあ？

darkroom.el をちょこっと修正

2010-02-10T14:48:00.003+09:00

事前にcolor-themeを設定しなくても済むようにしました。自動で保存・復元します。
　こちらから落としなおして下さい。

バグ
　DDSKK を起動すると背景色が復元しない＞＜

　追記：ddskk をcvs先端にしたら直った。ということでオールクリアー。

Emacs で DarkRoom

2010-02-08T21:12:00.004+09:00

DarkRoom とはフルスクリーンでただ文章を書くことのみに集中させるというシンプルなエディタです。
　しかしこれが言うのとやるのとでは全然違います。最近のPCは画面も大きくなり、横長になり、様々なウィジットをデスクトップにちりばめ、タスクトレイにいろんアイコンが並んでいる。気がつくと情報過多なデスクトップになっているのです。その事に気づかされました。

でまあ、当然これをEmacsでもできないかとなと思い、やってみました。

　以下の Emacs lisp を darkroom.el という名前で load path の通った場所に保存してください。
　次に ~/.emacs に、

(require 'darkroom)
(global-set-key [f11] 'darkroom-mode)

と追記すればOKです。
　後は F11 キーを押せばフルスクリーンでDarkRoomモードになります。


;;; darkroom.el --- 

;; Copyright (C) 2010  yama

;; Author: yama 
;; Keywords: 

;;  $Id: darkroom.el,v 1.10 2010/02/25 10:22:02 yama Exp $ 

;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.

;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;; GNU General Public License for more details.

;; You should have received a copy of the GNU General Public License
;; along with this program.  If not, see <http://www.gnu.org/licenses/>.

;;; Commentary:

;; use color-theme

;;; Usage

;;; (require 'darkroom)
;;; M-x darkroom

;;; Code:
(require 'color-theme)


;;; Config ---------------------------------------------------------
(defvar darkroom-left-margin  30
  "left margin")

(defvar darkroom-right-margin 30
  "right margin")

(defvar dark-mode-on nil
  "Non-nil if DarkRoom mode is enabled.
Don't change this variable directly, you must change it by one of the
functions that enable or disable Dark Room mode.")

;;; -------------------------------------------------------------------


(defun fullscreen (&optional f)
  "Chenge FullScreen. for Emacs23"
      (interactive)
      (set-frame-parameter f 'fullscreen
                           (if (frame-parameter f 'fullscreen) nil 'fullboth)))

(defun darkroom-mode ()
  "simple writing environment."
  (interactive)
  (if (equal dark-mode-on t) (darkroom-mode-disable)
    (darkroom-mode-enable)))

(defun darkroom-mode-enable ()
  (setq dark-mode-on t)
  (setq darkroom-default-background-color
        (cdr (assoc 'background-color default-frame-alist)))
  (fset 'color-theme-snapshot (color-theme-make-snapshot))
  (sleep-for 0.05)
  (color-theme-simple-1)
  (fullscreen )
  (set-cursor-color "yellow") ;; cursor color
  (tool-bar-mode 0)
  (menu-bar-mode 0)
  (display-time-mode 1)
  (scroll-bar-mode)
  (set-face-foreground 'mode-line "gray25")
  (set-face-background 'mode-line "gray1")
  (if (equal (intern-soft "elscreen-version") nil) nil
    (elscreen-toggle-display-tab))
  (auto-fill-mode 1))

(defun darkroom-mode-disable ()
  (setq dark-mode-on nil)
  (add-to-list 'default-frame-alist
               '(background-color . darkroom-default-background-color))
  (color-theme-snapshot)
  (scroll-bar-mode)
    (if (equal (intern-soft "elscreen-version") nil) nil
    (elscreen-toggle-display-tab))
  (display-time-mode 0)
  (sleep-for 0.05)
  (fullscreen ))
    
(defun window-count ()
  (length (window-list (selected-frame) 1)))

(defun set-margin ()
  (set-window-margins (selected-window)
                      darkroom-left-margin
                      darkroom-right-margin))

(defun dark-window-update ()
  (if (equal dark-mode-on t)
      (if (> (window-count) 1)
          (progn
            (set-window-margins (selected-window) 0 0)
            (set-window-margins (previous-window) 0 0))
        (set-margin))
  (set-window-margins (selected-window) 0 0)))

(add-hook 'window-configuration-change-hook 'dark-window-update)


(provide 'darkroom)
;;; darkroom.el ends here

　低機能です。フルスクリーンにする部分がEmacs23からの機能を使っているので、emacs23以上で使用してください。そこを書き換えればemacs22とかでも動作するはず。
　あらためてこうして全画面で作業をしていると、twitter やウェブブラウズとかしなくなり、気が散らずに作業できるんだなあと。というか今までどんだけ注意力散漫だったんだろうと思いましたw

　さあ皆さんも思う存分執筆に集中して下さいw

ps.
# 端末で起動してフルスクリーンにすればいいじゃんという突っ込みはなしで；；

●追記：
　color-theme の設定書いただけで反映するの忘れてた(^_^;) 修正しましたので落とした方は再度落とし直して下さい。

●2010/02/10 追記：
　color-theme を指定しなくてもよくなった。

ubuntuで壁紙をランダムに切り替える。

2010-01-26T21:00:00.000+09:00

起動時にランダムに壁紙を変更していきます。
　毎回同じ壁紙だと飽きてくるし、かといって手動でいちいち切り替えるのも億劫になってきまして(^_^;)

　まず、ランダムに変える壁紙を入れたディレクトリを決めておきます。壁紙となる画像ファイルはあらかじめ gimp などのフォトレタッチソフトを使ってサイズを統一しておきましょう。その方がいろいろと面倒じゃなくなるので。

● icewm の場合

　以下を random-wallpaper-icewm.sh という名前で ~/bin あたりに保存します。保存したら、chmod +x random-wallpaper-icewm.sh として実行属性を付けるのを忘れずに。
　pref は ~/.icewm/preferences の場所です。
　WALLPAPERS は壁紙のあるディレクトリを指定します。
　それぞれ御自分の環境に合わせて修正してください。


#!/bin/bash
# last updated : 2010/01/21 21:13:37 JST
#
# icewm用ランダム壁紙チェンジャー
#

pref='/home/ユーザー名/.icewm/preferences'
WALLPAPERS="$HOME/MyPictures/Wallpapers"
ALIST=( `ls -w1 $WALLPAPERS` )
RANGE=${#ALIST[*]}
SHOW=$(( $RANDOM % $RANGE ))

sed --in-place=.bak -e \
's:^DesktopBackgroundImage=.*$:DesktopBackgroundImage="'"${WALLPAPERS}/${ALIST[$SHOW]}"'":' $pref
icewmbg -r

　修正して保存し終えたら、~/.icewm/startup の最後の方に追記します。
　以上で次回以降、icewmにログインする度に壁紙がランダムで変更されます。

● GNOME の場合

　以下を random-wallpaper-gnome.sh という名前で ~/bin あたりに保存します。保存したら、chmod +x random-wallpaper-gnome.sh として実行属性を付けるのを忘れずに。
　WALLPAPERS は壁紙のあるディレクトリを指定します。
　自分の環境に合わせて修正してください。


#!/bin/bash
# last updated : 2010/01/26 15:13:17 JST
# Set Random Wallpapers for GNOME.
#

WALLPAPERS="$HOME/MyPictures/Wallpapers"
ALIST=( `ls -w1 $WALLPAPERS` )
RANGE=${#ALIST[*]}
SHOW=$(( $RANDOM % $RANGE ))

gconftool-2 --type string --set "/desktop/gnome/background/picture_filename" $WALLPAPERS/${ALIST[$SHOW]}
gconftool-2 --type string --set "/desktop/gnome/background/picture_options" "centered"

　保存し終えたら、メインメニューのシステム→設定→自動起動するアプリ を起動します。

　起動したら追加ボタンを押して追加メニューを出し、登録していきます。

　これで次回以降ログインする度に壁紙がランダムに設定されて表示されます。

● openbox の場合

　以下を random-wallpaper.sh という名前で ~/bin あたりに保存します。保存したら、chmod +x random-wallpaper.sh として実行属性を付けるのを忘れずに。
　WALLPAPERS は壁紙のあるディレクトリを指定します。
　自分の環境に合わせて修正してください。
　feh というコマンドを使いますので、あらかじめ

sudo apt-get install feh

として入れておいて下さい。


#!/bin/bash
# last updated : 2010/01/05 15:12:05 JST
#
# SET random Wallpapers for background.
#

WALLPAPERS="$HOME/MyPictures/Wallpapers"
ALIST=( `ls -w1 $WALLPAPERS` )
RANGE=${#ALIST[*]}
SHOW=$(( $RANDOM % $RANGE ))

feh --bg-scale $WALLPAPERS/${ALIST[$SHOW]}

　修正して保存し終えたら、~/.config/openbox/autostart.sh の最後の方に追記します。
　以上で次回以降、openboxにログインする度に壁紙がランダムで変更されます。

ubuntuでファイルコピーでベリファイする

2010-01-02T23:55:00.000+09:00

ubuntuで大きいファイルや沢山のファイルをコピーする場合は、nautilusでコピーするのではなく、cp コマンドを使うと便利です。リソースも食わず、バックグラウンドで放っておけますし、なにより基本中の基本コマンドなので安心感が違います。
　とはいえ、ネットワーク越しのコピーだと外乱要素が多いので、ちゃんとコピーできたかどうか確認した方がいい場合もあります。大事なデータの引越しとかですね。
　そこで正しくコピー出来たかどうか確認するためにベリファイをします。各ファイルのハッシュ値を出して比較して正しくコピー出来たか確認します。
　標準で md5sum コマンドがありますが、今回は確認作業をもっと楽にしてくれる md5deep コマンドを使います。

インストール

sudo apt-get install md5deep

使い方

元ファイルのハッシュ値リストを作成する。

　まず最初に元となるファイル群のハッシュ値リストを作成します。
md5deep -r ディレクトリ名 > hash.list

-r オプションを付けることにより、再帰的に動作します。
-e オプションを付けると進行状況を表示します。大きいファイルの時に使うといいでしょう。
このハッシュリストは元データと同じディレクトリに保存しておきますと、そのうちなにかの役にたつかもしれませんw
コピー先と比較する。
　作成しておいたハッシュ値リストと、コピーした先のファイル群のハッシュ値とを比較していきます。
　正常にコピー出来たファイルはいちいち報告する必要はないので、正常にコピー出来なかったファイル名だけ表示させるようにします。
md5deep -X hash.list -r 比較作ディレクトリ
-X オプションはマッチングしないものだけを表示します。
両方のファイル名を表示させたいなら、-w オプションを付けます。
　これでなにも報告されなかったら正常にコピーできています。もしハッシュ値が違っていた場合は報告されますので、再度そのファイルをコピーすればいいでしょう。

　基本的な手順は以上です。簡単でしょう？
　シェルスクリプトでサブプロセスで動かせば、並列して計算させる事も出来るので、高速化もできるでしょう。同一のHDDじゃあまり意味ないですけど。マルチコアじゃないと意味がないですけど。

　大事なデータの移動には是非ベリファイしておきたいものです。
　ついでに cp ですが、 nice コマンドと併用することでコピー時の負荷を減らす事が出来ます。さらに ionice と組み合わせると、もっとシステム負荷を減らせます。

ex.

ionice -c3 -n7 nice -n19 cp コピー元コピー先 && zenity --info --text "コピー完了"

-c3 はシステムがアイドル時にしかコピーしません。-n7 で優先度を最低に。さらにniceの方でも優先度を最低にしています。
　これでバックグラウンドでコピーさせています。もちろんコピーの優先度を最低にしてますので、結果としてコピーの時間はかかりますが、システムの負荷は減るでしょう。
　最後にコピーが終了したら通知ウィンドウを表示させるようにしていますので、時間のかかるコピーでも、コピー完了を忘れることを防ぎます。

　であであ快適なubuntu生活を♪

ubuntu で ext3からext4へ移行してみた

2009-11-29T17:25:00.001+09:00

ファイルシステムをext3からext4へ移行しました。本当はしっかりとした移行記事を書こうかと思ったんですが、普通じゃないやり方してしまって参考にもならないのでやめました(^_^;) ので、感想だけ。

　ext3からext4への移行は、ext3のマウントオプションをext4に指定してやればそのままext4として扱えるんですが、これだとext4本来の機能を利用した状態にはならず、ext4本来のパフォーマンスを発揮することは出来ません。というか意味がない。
　ですので、ext4本来の性能を体感したい、というかちゃんとext4を利用したいのなら、ext4でフォーマット仕直し、そこへファイルを書き戻すといったことが必要です。

　で、LiveCDから起動し、中身をせっせとバックアップしてext4でフォーマット仕直して、バックアップを戻すという作業をしました。もちろんUUIDが変わるので、fstabやgrubなども書き換えてね。

　そして再起動。

　いきなりびっくり。ubuntu 9.10があっというまに立ち上がるんです。デュアルブートのXPよりも速い。ext3の時はこんなものでしょうっていう起動速度だったんですが。
　そして実際にログインして使てみると、速いこと速いこと。ext4ではやっとエクステントベースになったのですが、これによってメタ情報がぐっと少なくなりました。ext3のブロックベースですと1GBのファイルに必要な管理情報は1MBも必要でした。メタ情報のやり取りだけでI/O処理がそれなりにかかっていた事を考えると・・・
　具体的にはfindやduなどのメタ情報を検索するコマンドの速度におおいに違いが表れます。
　数千個のファイルがある、GB単位のディレクトリなど、du で容量を調べるにはそれなりの時間がかかりましたが、ext4だとあっという間に合計容量が返ってきます。

　最初は保守的にシステムだけをext4にして/homeはext3でなんて考えていたんですが、あまりにも良いので全部のパーティションをext4にしてしまいましたw

　ext4は十分に問題なく使えるFSだと思います。

ubuntu 9.10 アップグレードメモ

2009-11-22T19:25:00.001+09:00

遅ればせながら ubuntu 9.10 にアップグレードしましたのでメモ。
　今回の目玉は起動速度がさらに速くなった？なんとなくそんな気がしないでもない。

アップグレードはCLIから行なった。
sdic-eijiro でエラーが出てアップグレードを強制終了せざるを得なくなった。
その後、sudo apt-get install -f をかけた。
synapticからいらないパッケージを削除。
emacs関係を入れ直した。使えるのはemacs22 emacs23 emacs-snapshot かな。
emacsのフォントまわりがまた変更されているみたいだ。おかげでまた再設定。
dmesg でみると、i801_smbus: probe of 0000:00:1f.3 failed with error -16 と出てる。
カーネル2.6.31のリグレッションエラーらしい。おかげでCPUの温度が取得出来ない。
icewm は特になにもしなくても問題なし。自前でパッケージ作る必要がなくなったようだ。
mlterm はまた256色対応patchを当てなければorz

　暫時追加予定。
　とりあえず問題は sensors で温度やファンの回転数が取得出来ないのが問題かな。mrtg でグラフ化しているので。まあサーバーというわけでもないので単に自己満足のグラフ化なのでいいですけど・・・

　しばらく様子を見て、問題がなければ、/ をext4でフォーマットしなおしてみようかなと思います。やっぱり最大のメリットはext4ですからね。/home はext3のままでいきますw

●2009/11/24 追記：

　i801チップがエラーになるのは、カーネルオプションで acpi=off にすることで回避出来た。当座はこれでいくか。

　/ をext4 にした。そのうち書く予定。

Emacsのタイトルバーにホスト名を表示させる

2009-10-10T01:36:00.001+09:00

Granzchesta's ぷち日常天国さんの方で Emacs で tramp使用時にタイトルバーにホスト名を入れられないかどうか悩んでいたみたいなので試してみました。
　以下を ~/.emacs に追記。


;;; tramp でリモートホスト名をフレームに表示する。
(defun my-tramp-hostname ()
  "tramp host name."
  (if (buffer-file-name)
      (if (string-match "\\`/\\([^[/:]+\\|[^/]+]\\):" (buffer-file-name))
          (tramp-file-name-host (tramp-dissect-file-name (buffer-file-name)))
        "local") nil ))
;; フレームにセット
(setq frame-title-format '("%b - " (:eval (my-tramp-hostname))))

　Emacsはテキストエディタなんですから決っして文字列操作が弱いわけではありません。テキストエディタなのに弱いとはこれいかに。

ubuntuにgoogle-earth 5.1 を入れる

2009-09-11T12:00:00.000+09:00

google-earth Ver5.1 がリリースされたので、インストールメモ。

ポイント

事前に前のバージョンを削除しておく。
qt4を使用しているみたい。
メニューのフォントはqtconfig から行なう。
フォントがビットマップで汚ない。
インストール先は自分のhomeにする。

インストール

　インストール自体はGoogleからダウンロードしてきた GoogleEarthLinux.bin ファイルに実行属性を付与してからダブルクリックで実行すればOK.

フォント

　このままだとフォントがビットマップで汚ないので、修正します。
同梱のqtライブラリを使用しないようにし、ubuntuのライブラリを利用するように変更します。以下を端末から実行。

sudo apt-get install libqtcore4 libqtgui4 libqt4-webkit qt4-qtconfig

cd ~/google-earth
mv libQtCore.so.4{,.bak}
mv libQtNetwork.so.4{,.bak}
mv libQtGui.so.4{,.bak}
mv libQtWebKit.so.4{,.bak}

cd ~/google-earth/plugins/imageformats/
mv libqgif.so{,.bak}
mv libqjpeg.so{,.bak}

ln -s /usr/lib/qt4/plugins/imageformats/libqjpeg.so .
ln -s /usr/lib/qt4/plugins/imageformats/libqgif.so .

フォントの変更は qtconfig から行ないます。フォントによってはうまく変更出来ないようです。

　これでアンチエイリアスの効いた状態になりました。

参考

GNU/Linux版Google Earth 5.0上の日本語フォントの問題とその対処

icewmの壁紙を変える

2009-09-10T15:15:00.001+09:00

icewmの壁紙は、~/.icewm/preferences 内の、
DesktopBackgroundImage="ほげほげ.jpg"
行を書き換えてあげればいいわけですが、その後、icewmを再起動しないと反映されません。
けっこう面倒くさいので、さくっとシェルスクリプトでやっちゃいましょう。

以下のシエルスクリプトを、icewmbg-changer.sh という名前で保存し、実行属性を付けてください。


#!/bin/sh
# -*- coding: utf-8 -*-
# last updated : 2009/09/07 03:46:02 JST
#
# icewm用壁紙チェンジャー
# 使い方。
#      icewmbg-changer.sh /home/foo/picture/hogehoge.jpg
# 引数がない場合はファイルセレクタが立ち上がります。
# ファイラのコンテキストメニューなどに登録して使うと便利でしょう。

# icewmの設定ファイル。フルパスで。
pref='/home/ほげほげ/.icewm/preferences'
# 壁紙のあるディレクトリ。フルパスで。
WALLPAAPERS='/home/ほげほげ/MyPictures/Wallpapers/'

if [ $# = 0 ]; then
   cd $WALLPAAPERS
   FILE=$(zenity --file-selection --title "Wallpaper Select")
else
   FILE=$1
fi
sed --in-place=.bak -e \
   's:^DesktopBackgroundImage=.*$:DesktopBackgroundImage="'"${FILE}"'":' $pref
icewmbg -r

設定

　以下二行を自分の環境に合わせて編集してください。

pref='/home/もげげ/.icewm/preferences'
WALLPAAPERS='/home/もげげ/MyPictures/Wallpapers/'

使い方

　そのまま起動すればファイル選択ダイアログが出ます。
　が、このシェルスクリプト単独ではあまりおいしくはないので、ファイラや画像管理ソフトと組み合わせて使うのがいいでしょう。
　ファイラなどのコンテクストメニューに登録しておけば、もっと便利に壁紙を変えることが出来ます。

　私はファイラに rox を利用しているので、こんな感じになります。

　ファイラと組み合わせれば、さくさく壁紙を変更出来るようになるので是非活用してみてください。

Emacsで行を右寄せをする

2009-08-09T20:15:00.000+09:00

昔作ったやつです。
　標準だと、M-x set-justification-right で右寄せしてくれます。がこれだとタブと空白で埋めてくれるので、空白だけで右寄せしてくれるものを作りました。

インストール

　下の方のelispを right-line.el という名前で、~/.lisp などに保存します。

　~/.emacs に


(require 'right-line)
(global-set-key "\C-cr" 'justify-right-line) ; 行を右寄せする

と書いておきます。

使い方

　右寄せしたい行の上にカーソルを持っていき、C-c r とすれば右寄せされます。
　選択範囲内の右寄せも出来ます。
　桁数は C-u 桁数 M-x set-fill-column で。デフォルトだと C-x f かな？

right-line.el


;;; right-line.el --- 右寄せ
;;  $Id: right-line.el,v 1.6 2007/10/11 09:55:17 yama Exp yama $   
;; last updated : 2007/10/16 15:00:41 JST

;; Copyright (C) 2007  yama

;; Author: yama <yama@localhost>
;; Keywords:

;; This file is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 2, or (at your option)
;; any later version.

;; This file is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;; GNU General Public License for more details.

;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING.  If not, write to
;; the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
;; Boston, MA 02110-1301, USA.

;;; Commentary:

;; 行を右寄せする。範囲選択していれば範囲選択部分を右寄せする。

;;; ToDo


;;; Code:

(defun yama-region-active-p ()
 "リージョンアクティブならtを返す.
2007年10月06日(土曜日) 12:45:08 JST by yama"
 (if (and transient-mark-mode mark-active) t nil))

(defun right-line ()
 "2007年09月15日(土曜日) 14:46:17 JST
カレント行を空白で埋めて、右寄せする"
 (interactive)
 (save-excursion
   (end-of-line)
   (let ((ln(- fill-column (current-column))))
     (beginning-of-line)
     (insert-char ?\  ln))))


(defun right-line-region (start end)
 "選択範囲内を空白で埋めて右寄せする。範囲選択されてなければカレント行を右寄せする
2007年10月06日(土曜日) 12:44:41 JST by yama"
 (interactive "r")
 (save-excursion
   (save-restriction
     (goto-char start)
     (unless (bolp)
       (beginning-of-line)
       (setq start (point)))
     (goto-char end)
     (unless (bolp)
       (beginning-of-line)
       (setq end (point)))
     (narrow-to-region start end)
     (let ((max-line (count-lines start end))
           (count 0))
       (goto-char (point-min))
       (while (< count max-line)
         (right-line)
         (next-line)
         (setq count (1+ count)))))))

(defun justify-right-line (start end)
 "カレント行を右寄せする。範囲選択されているなら範囲内を右寄せする.
2007年10月16日(火曜日) 14:08:05 JST by yama"
 (interactive "r")
 (if (yama-region-active-p)
     (right-line-region start end)
   (right-line)))

(provide 'right-line)
;;; right-line.el ends here

　報告書とか文書の末尾の署名なんかに利用すると便利です。
　自分で作って使っていなかったり・・・orz

Emacsの起動時間を調べる

2009-08-02T17:04:00.004+09:00

Emacs23.1 がリリースされましたねー。めでたいめでたい。やんややんや。
もっともだいぶ前から使っていたんで新鮮さはないんですが、やっぱりアンチエイリアスの効いたフォントは美しい。

んで、emacs23から追加された関数を使って、Emacsの起動に掛かった時間を表示する機能など。小ネタです。


;;;====================================
;;;; boot-time
;;;====================================
;;; 起動するまでにかかった時間を表示。
(defun boot-time () 
" 起動するまでにかかった時間を表示。"
  (interactive)
  (message "起動時間：%s秒"
           (- (cadr after-init-time) (cadr before-init-time))))

M-x boot-time で起動時間が表示されます。

CLIで天気予報を表示する

2009-07-02T15:55:00.001+09:00

最近perlを触る機会があり、perlをいじるのは初めてだったのですが、なんとかでっち上げてみました。perlなんて記号だらけの省略記法だらけで大嫌いだったのでですが、時代は変わり、最近ではモジュールを活用してブロックを組み立てるかのように書けるとか。
　実際 CPAN の充実ぶりは凄いですね。あらためて perl を見直しました。

　んで今回はYahooから天気予報を取得して表示するコマンドです。前回は今現在の気象情報を表示するだったのですが今回は予報です。

インストール

　以下のスクリプトを適当な名前、yohou.pl みたいな名前で ~/bin/ あたりにでも保存し、chmod +x yohou.pl として実行属性を付けておいてください。


#!/usr/bin/perl
# last updated : 2009/07/02 15:46:45 JST
#
# Yahooから天気予報を取得する。

use utf8;
use strict;
use warnings;
use XML::TreePP;

binmode STDOUT, ":utf8";


# url
# 以下のurlから調べて下さい。
# http://weather.yahoo.co.jp/weather/public/rss.html
my $url =  "http://rss.weather.yahoo.co.jp/rss/days/4410.xml";
# カットする文字列。
my $cut = " 東京（東京） ";




my $tpp = XML::TreePP->new(array_element => [qw( item )]);
$tpp->set( utf8_flag => 1 );
my $tree = $tpp->parsehttp( GET => $url);
my $channelhash = $tree->{rss}->{channel};
print $channelhash->{title} . "\n";
my $itemarray = $channelhash->{item};
foreach my $itemhash ( @$itemarray ) {
  my $base = $itemhash->{title};
  unless ($base =~ /^\[PR\]/) {
      $base =~ s/ - Yahoo!天気情報$//;
      $base =~ s/ (\d)日/ 0$1日/;
      if ($base =~ /^【 \d\d日/) {
          my $idx = rindex($base, '】');
          my $day = substr($base, 0, $idx + 1);
          $day =~ s/$cut//;
          my $wea = substr($base, $idx + 2);
          my @tenki = split(/ - /, $wea);
          $tenki[0] = trim($tenki[0]);
          print sprintf("%s %-4s  %s", $day, ume($tenki[0]), $tenki[1]) . "\n";
      }
      else {
          print $base . "\n";
      }
  }
}
print $channelhash->{copyright} . "\n";

sub trim {
  my $val = shift;
  $val =~ s/^\s*(.*?)\s*$/$1/;
  return $val;
}

sub ume {
  my $val = shift;
  my $len = length($val);
  if ($len < 4) {
      $val = $val . "　" x (4 - $len);
  }
  return $val;
}

　次に自分の住んでいる地域の天気予報を表示するために、http://weather.yahoo.co.jp/weather/public/rss.html から地域のurlをコピーして

my $url = ”http://rss.weather.yahoo.co.jp/rss/days/4410.xml"

の行を変更しておいてください。その下の my $cut も同じく地域に合わせて変更を。$cut は単に冗長な部分を削除するだけですから、ほっといても特に問題ありません。

　次にこのスクリプトは XML::TreePP というモジュールを利用しているので、

sudo apt-get install libxml-treepp-perl

としてインストールしておいて下さい。
　以上で準備は完了です。後は ~/bin/yohou.pl とでもして実行すれば、

~$ yohou
Yahoo!天気情報 - 東京（東京）の天気
【 02日（木）】 雨後曇　  26℃/21℃
【 03日（金）】 曇り　　  26℃/21℃
【 04日（土）】 曇時々雨  25℃/22℃
【 05日（日）】 曇時々雨  27℃/21℃
【 06日（月）】 曇り　　  28℃/22℃
【 07日（火）】 曇時々雨  28℃/22℃
【 08日（水）】 曇時々雨  27℃/22℃
【 09日（木）】 曇時々雨  26℃/22℃
【 23区西部 】警報・注意報はありません
【 23区東部 】警報・注意報はありません
【 多摩北部 】警報・注意報はありません
【 多摩西部 】警報・注意報はありません
【 多摩南部 】警報・注意報はありません
Copyright (C) 2009 Yahoo Japan Corporation. All Rights Reserved.

な感じで天気予報が表示されます。天気情報コマンドと合わせて使えばいいでせう。

＃ん〜それにしてもperl の文字列処理のやり方がまだ理解していない・・・でもモジュールは便利だね。というか便利すぎ。
＃いままでrubyばかりだったけど、perlで便利なモジュールがある場合はperlを使おう。

ubuntuに Nagios を入れる

2009-06-07T15:55:00.001+09:00

UbuntuでNagiosなんだけど、英語ですね。
というのっぽのブログ「バカンチ」さんの書き込みをみたので、Nagios を日本語化したものをPPAに上げておきました。
https://launchpad.net/~yama-natuki/+archive/ppa
からどうぞ。

これだけではあれなので自分でも入れてみました。
インストール後、パスワードを設定しないといけないみたい。

sudo dpkg-reconfigure nagios3-common

してパスワードを設定。
あとは、 http://localhost/nagios3/ にアクセス。

ubuntuで AppArmor を使ってセキュアな環境を構築する

2009-06-02T21:30:00.001+09:00

AppArmor はubuntuにセキュアな環境を提供するフレームワークです。同様のものにSElinuxがありますが、あちらはがっちがちの強固なセキュアOSで、我々のようなエンドユーザーが気軽にほいほいと使えるものでもありません。SElinuxの中の人も、ポリシーは専門家が記述すればいいと言っています・・・

　幸いにして AppArmor はカジュアルに扱えるセキュリティツールとしてubuntuで採用されており、これを使わない手はありません。がしかし日本語での資料がほとんどなく、ろくに有効活用されていないのが実情だと思います。
　そこで、自分のためのメモとして簡単な使い方を書いてみたいと思います。

導入

　apparmor はアプリごとにルールを設定し、設定したルール以外の行動を禁止します。ですからあるアプリが脆弱性を利用してクラックされ、そのアプリから全然関係のないファイルにアクセスしようとしても、それはルールで許可されていませんから、アクセスが出来ず、被害を防げるという仕組みです。
　このルールをプロファイル（ポリシー）といい、あらかじめいくつか用意されていますので、まずprofileを導入します。

sudo apt-get install apparmor-profiles apparmor-utils

apparmor 自体は標準で有効になっているはず。

確認する

sudo apparmor_status

でステータスが確認出来ます。
　enforce mode が実際にprofileを適用しています。
　complain mode が学習モードで、システムログに学習結果をどんどん書き出しています。

新しいprofileを作る

　polipo を使っているので、こいつのprofileを実際に作っていきます。

sudo aa-genprof /usr/bin/polipo

とすると、

Please start the application to be profiled in
another window and exercise its functionality now.

Once completed, select the "Scan" button below in
order to scan the system logs for AppArmor events.

For each AppArmor event, you will be given the
opportunity to choose whether the access should be
allowed or denied.

Profiling: /usr/bin/polipo

[(S)can system log for SubDomain events] / (F)inish

と聞いてきますので、F キーを押して終了させます。そうすると、 /etc/apparmor.d/ 以下に usr.bin.polipo というファイルが作られます。
　次に、

sudo aa-complain /usr/bin/polipo

としてすぐさま学習モードにし、

sudo /etc/init.d/polipo restart

としてpolipoをリスタートさせ、しばらく動作させます。この間 apparmor はpolipoの動作ログを取り続けます。いろいろとpolipoを動作させ、その振る舞いを学習できたかなあと思ったら、

sudo aa-logprof

として学習結果を反映させます。
対話形式で、許可、不許可を聞いてきますので、逐次答えていきます。答え終わると、セーブするか聞いてくるので、もちろんセーブします。

　しばらく学習行為を終え、もう漏れがないかなあと思ったら、complainモードからenforceモードに

sudo aa-enforce polipo

として切り替えます。

　これでpolipoは設定したファイル以外にはアクセス出来なくなります。
　参考までに、/etc/apparmor.d/usr.bin.polipo の中身を。

# Last Modified: Tue Jun  2 16:00:15 2009
#include 

/usr/bin/polipo flags=(complain) {
#include 
#include 



/etc/polipo/config r,
/etc/polipo/forbidden r,
/etc/polipo/uncachable r,
/usr/bin/polipo r,
/usr/share/polipo/www/doc/* r,
owner /var/cache/polipo/ r,
owner /var/cache/polipo/** rw,
owner /var/log/polipo/polipo.log a,
owner /var/run/polipo/polipo.pid w,

}

こんな感じになっています。もちろんエディタで直接変更してもかまいません。

　つまり簡単に言うと、

プロファイルがなければ aa-genprof で作る。
complainモードでしばらく学習させる。
aa-logprof で学習結果を反映させる。
Okなようなら enforceモードに切り替える。

こんな感じです。ね、簡単でしょう？w

　ちなみに aa-genprof でいきなりFキーで終了させていましたが、あのままの状態でアプリを立ち上げ、いろいろ操作をした後に、Fキーでなく、Sキーを押すと、許可、不許可の設定が続きます。ただ短時間の学習だとどうしても漏れがあるので、しばらくはcomplainモードで回したのちに、 aa-logprof で反映させるといいでしょう。

# 正直デスクトップユーザでセキュアOS必要かというと現状いらないんじゃないかと思うんですが、将来のことを考えると憶えておいて損はないと思います。でもその前に TOMOYO がubuntu にきちゃうかなw

ubuntuでcompiz使用時のmltermの描画がおかしい

2009-05-18T19:20:00.000+09:00

Ubuntuを 9.04 に上げてcompizで mlterm を使用しているさいに、ls などでずらずらと表示させてみると描画されない区域が出てきました。マウスで表示されていない部分を反転させると表示されます。
　top コマンドで画面をじーっと見ていると、描画されない部分がぴょこぴょこ出るのがわかると思います。
　かなり不便というか問題なのでいろいろ悩んでいたんですが、compiz設定マネージャーを起動し、次善策プラグインの、Force synchronization between X and GLX をenableにすることで解決出来ました。

Ubuntu 9.04 にアップグレードメモ

2009-05-11T15:20:00.000+09:00

Ubuntu 9.04 にしました。今回はクリーンインストールではなくアップデートをすることにしました。
　今まで使っていたのが 8.04 でしたので、8.04 → 8.10 → 9.04 へと順にアップデートしていきます。
　アップデート自体はなにも問題なく終わりました。
　アップデートするときのコツは、公式のリピジトリ以外から入れたものは全てpurgeすることです。また、デーモンなどの初期起動状態も sysconfig などで変更した場合は、入れた時の状態に戻しておきます。

　以下気づいたことなどをメモ。

Xorgがubuntu8.10になってVer1.5になり、いろいろと斬新に変更された。のでトラブルが多い。
Xorgが1.5から返ってくるキーコードが変更されている。従ってxmodmapでキーバインドを変更している場合は再度設定し直し。
入力デバイスの設定が xorg.conf から読まなくなった。/etc/hal/fdi/policy/ 以下にXMLで書けばいいらしいが、XMLなんて人間が直接書くものじゃないと思う。アホー。とりあえず、
setxkbmap -rules evdev -model pc101 -layout us
としてicewm用に ~/.icewm/startup に書いて手動で設定した。GNOMEは自前で設定するので問題ない。けどXとGNOMEで設定分かれているっていうのはどうなのよ・・・
制限付きドライバの名称が変わっている。そしてnvidiaのドライバが入らなかったので、envyng で入れた。
解像度がおかしかった。ので手動でxorg.confを書き直して対処。
Ctrl + Alt + Backspace がデフォルトで無効になった。xorg.conf に
```
Section "ServerFlags"
       Option  "DontZap"       "False"
EndSection
```
と記述して対処。
compizと端末の組み合わせがおかしい・・・色抜けする。
compizやcairo-dockなどは変更が激しいので、そのつど設定を破棄するか、見直ししたほうがいい。
mlterm 256色化済み jaunty 対応版をパッケージ化した。以下からどうぞ。
- https://launchpad.net/~yama-natuki/+archive/ppa
icewm で icewm が完全に立ち上がる前に startup などで指定したプログラムが起動したりすると、icewm の挙動がおかしくなる。キーバインドが一部効かなくなる。タスクトレイが表示されなくなるなど。~/.icewm/startup の各プログラムの間に sleep を入れることで対処。
Emacs23 が起動時に変なウィンドウサイズで起動したりする。
起動は確かに速くなっている。アプリの起動速度は速くなっている。こちらの方が体感出来た。

まとめ

　8.10はnvidiaのレガシードライバが対応していなかったので見送っていました。他にXorgがラディカルに変更されていたのも理由です。
　うちでは KVM (キーボードマウスモニタ切換器)を使用しているのでhalの自動認識が機能しません。機能しない手動で設定しなけれならない環境にはやさしくないですね。
　結論としては、LTS使っている人ならわざわざ急いでアップデートする理由はないかなー。

hatena-keyword.el をちょこっと修正

2009-05-03T19:57:00.000+09:00

Emacsからはてなキーワードを辞書のように引く hatena-keyword.el を修正しました。
とりあえずメジャーモードを実装して、履歴機能も付けました。
これではてなキーワードをリンクをたどって読み歩くことが出来るように。

ここから落として下さい。

Emacsからはてなキーワードを引く hatena-keyword.el

2009-04-23T21:05:00.008+09:00

現在 Emacs から和英・英和・翻訳・国語辞書・などを SDIC や lookup を使って引けるようにしているんですが、電子辞書版の「現代用語の基礎知識」が2007年度版で止まっており、最近のカタカナ語や新語などに対応できていませんでした。

　ということで最近の新語に対応するため、Emacsからはてなキーワードを辞書のように引くものを作ってみました。
　自分で使うには満足な状態なのと、これ以上手を入れる気もなく、埋もれさすのもあれなので公開しておきます。

　最近は小学生の間でも辞書を読むことがブームだそうで。はてなキーワードの散策なんていかがでしょうか。

●インストール

　w3mを使っていますので事前に入れておいてください。

sudo apt-get w3m-el あるいは w3m-el-snapshot

　として w3m を入れたら、~/.emacs に、

(require 'w3m-load)

としておきます。
　後は以下に貼ってあるEmacs lisp を、 hatena-keyword.el という名前で load path の通った場所に保存してください。
　次に ~/.emacs に、

(require 'hatena-keyword)
(global-set-key "\C-ck" 'hatekey)

と追記すればOKです。

●使い方

　調べたい単語の上で C-c k とすれば単語の意味を別ウィンドウで表示します。
　q キーで終了します。
　リンクされたキーワードの上でリターンキーを押すと、そのキーワードを検索して表示します。
　TABキーでキーワードにジャンプします。Shift + TAB で逆順。
　←キーで過去に表示したキーワードに戻ります。

・hatena-keyword.el


;;; hatena-keyword.el --- 

;; Copyright (C) 2009  yama

;; Author: yama  <yama.natuki+elisp＠gmail.com>
;; Keywords: 

;;  $Id: hatena-keyword.el,v 1.28 2009/05/03 13:35:06 yama Exp yama $   

;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.

;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;; GNU General Public License for more details.

;; You should have received a copy of the GNU General Public License
;; along with this program.  If not, see <http://www.gnu.org/licenses/>.

;;; Commentary:

;; はてなキーワードをEmacsから検索して表示するlispです。
;; Emacsからはてなキーワードを辞書のように扱えます。
;; より詳しい情報は、http://ubulog.blogspot.com/

;;; Install

;; (1) emacs-w3m を利用しています。事前に用意して下さい。
;; (2) このファイルをload-pathの通った場所に置きます。
;; (3) ~/.emacs に以下を追記します。
;;        (require 'hatena-keyword)
;;        (global-set-key "\C-ck" 'hatekey)

;;; Usage:

;;   C-c k でカーソル付近の単語を調べます。
;;   TABキーでリンクされたキーワードにカーソルを移動します。
;;   Shift + TAb で逆順。
;;   リンク上でリターンキーを押すとそのキーワードを検索して表示します。
;;   リンクがキーワードではない場合はw3mでリンク先を開きます。
;;   ←キーで表示したキーワードを戻ることが出来ます。

;;; ToDo

;;   



;;; Code:

(require 'url)
(require 'xml)
(require 'w3m)

;;; configuration

(defvar hatenakey-window-height 14
  "*Height of window to show entrys and contents.
   検索結果表示ウインドウの高さ")

(defvar hatena-coding-system 'utf-8
  "文字エンコードの指定。utf-8,euc-jp,shift_jis.")



(defconst hatenakey-version "1.1")
(defconst hatenakey-buffer-name "*hatena-word*"
  "検索結果表示バッファの名前")

(defconst hatenakey-history-name "*hatena-history*"
  "履歴バッファの名前")

(defvar hatenakey-history '()
"履歴スタック")

(defvar hatena-keyword-mode nil
  "Non-nil if Hatena Keyword mode is enabled.
Don't change this variable directly, you must change it by one of the
functions that enable or disable Hatena Keyword mode.")

;;  Define keymap
(defvar hatekey-mode-map
  (let ((map (make-sparse-keymap)))
    (define-key map " " 'scroll-up)
    (define-key map "b" 'scroll-down)
    (define-key map "q" 'view-kill-window)
    (define-key map "\t" 'w3m-next-anchor)
    (define-key map [tab] 'w3m-next-anchor)
    (define-key map [(shift tab)] 'w3m-previous-anchor)
    (define-key map [backtab] 'w3m-previous-anchor)
    (define-key map [left] 'hatena-view-previous-page)
    (define-key map "\C-m" 'hatena-keyword-jump)
    map))


;;; main ------------------------------------------------------

(defun hatekey-version ()
  "バージョンを返す。"
  (interactive)
  (message "hatena-keyword %s" hatenakey-version))


(defun hatena-keyword-mode ()
  "はてなキーワード を表示するメジャーモードです.
調べたい文字列の上で \\[hatekey] を実行することによりキーワードを検索して表示します。
\\<hatekey-mode-map>

key     binding
---     -------
\\[view-kill-window]        quit.
\\[scroll-up]       scroll-up
\\[scroll-down]     scroll-down
\\[w3m-next-anchor]     Go to Next Keyword Link
\\[w3m-previous-anchor] Go to previous keyword Link
\\[hatena-view-previous-page]  Back to History.
\\[hatena-keyword-jump]     jump to keyword
"
  (interactive)
  (setq major-mode 'hatena-keyword-mode
        mode-name "hatekey"
        buffer-read-only t)
  (use-local-map hatekey-mode-map)
  (run-hooks 'hatena-keyword-mode-hook))


(defun hatena-url-restructure (keyword)
  "はてなのurlを構築する。"
  (concat "http://d.hatena.ne.jp/keyword?word="
          (w3m-url-encode-string keyword hatena-coding-system)
          "&mode=rss2&ie="
          (symbol-name hatena-coding-system)))

(defun my-keyword (url)
  "キーワードの解説を返す。"
  (interactive)
    (set-buffer (url-retrieve-synchronously url))
    (if (string-match "200 OK" (buffer-substring (point-min) 20))
        (progn
          (let* ((root (xml-parse-region (point-min) (point-max)))
                 (base (car (xml-get-children (car root) 'item)))
                 (my-desc (nth 2 (car (xml-get-children base 'description)))))
            (if (eq my-desc nil) (setq my-desc "No Match") nil)
            (if (hatena-buffer-p) (setq buffer-read-only nil))
            (set-buffer (get-buffer-create hatenakey-buffer-name))
            (erase-buffer)
            (insert (decode-coding-string my-desc hatena-coding-system))
            (w3m-buffer)
            (if (hatena-window-p)
                (progn
                  (select-window (hatena-window-p))
                  (hatena-keyword-mode))
              (split-window-vertically
               (- (window-height) hatenakey-window-height))
              (set-window-buffer (next-window) (current-buffer))
              (select-window (next-window))
              (hatena-keyword-mode))))
      (message "%s" "Not Found")))


(defun hatena-buffer-p ()
  "はてなバッファの存在チェック"
  (if (get-buffer hatenakey-buffer-name)
      (set-buffer hatenakey-buffer-name)))

(defun hatena-window-p ()
  "はてなウィンドウのチェック。"
  (get-buffer-window (get-buffer hatenakey-buffer-name)))

(defun hatekey (keyword &optional flag)
  "はてなキーワードを検索する。"
  (interactive
   (list (cond ((or (eq last-command 'mouse-drag-region)
                    (and (boundp 'transient-mark-mode) transient-mark-mode
                         (boundp 'mark-active) mark-active)
                    (eq last-command 'exchange-point-and-mark))
                (buffer-substring-no-properties
                 (region-beginning) (region-end)))
               (t (thing-at-point 'word)))
         current-prefix-arg))
  (if (eq (fboundp 'w3m-buffer) nil) (message "w3m-buffer関数が見つかりません。")
    (if flag nil
      (let* ((keyword (read-from-minibuffer "Search word: " keyword)))
        (my-keyword (hatena-url-restructure keyword))
        (hatenakey-history-push keyword)))))


(defun hatenakey-close-window ()
  "検索表示バッファを表示しているウインドウを消去する関数"
  (interactive)
  (let ((w (get-buffer-window hatenakey-buffer-name))
    (b (get-buffer hatenakey-buffer-name)))
    (if w
    (progn
      (bury-buffer b)
      (if (= (window-height w) hatenakey-window-height)
          (delete-window w)
        (set-window-buffer w (other-buffer))
        (select-window (next-window)))))))

(defun hatena-this-keyword ()
  "現在位置のリンクのキーワードを返す。urlならw3mで開く。"
  (let ((url  (w3m-print-this-url)))
    (if (string-match "keyword" url)
        (replace-regexp-in-string
         "http://d.hatena.ne.jp/keyword/" "" url)
      (w3m-browse-url url))))

(defun hatena-keyword-jump ()
  "pointのキーワードを検索"
  (interactive)
  (if (hatena-this-keyword)
      (progn
        (let ((key (hatena-this-keyword)))
          (my-keyword (hatena-url-restructure key))
          (hatenakey-history-push key)))))

(defun view-kill-window ()
  "検索結果表示ウィンドウを削除する関数"
  (interactive)
  (if (get-buffer hatenakey-buffer-name)
      (progn
        (hatenakey-close-window)
        (kill-buffer hatenakey-buffer-name)
        (setq hatenakey-history '())
        (delete-other-windows))))

(defun hatenakey-history-name-p ()
  "履歴バッファが存在するかどうか"
  (set-buffer (get-buffer-create hatenakey-history-name)))

(defun hatenakey-history-push (keyword)
  "履歴にキーワードを追加する。"
  (setq hatenakey-history (cons keyword hatenakey-history)))

(defun hatenakey-history-pop ()
  "履歴からキーワードを取り出す。履歴からは消える。"
  (setq hatenakey-history (cdr hatenakey-history))
  (car hatenakey-history))
  
(defun hatena-view-previous-page ()
  "一つ前に見たキーワードへ戻る。"
  (interactive)
  (my-keyword (hatena-url-restructure (hatenakey-history-pop))))

(provide 'hatena-keyword)
;;; hatena-keyword.el ends here

　きっかけは、現代用語の基礎知識を調べるうちにはてなキーワードが現代用語の基礎知識にいくつか採用という記事を思い出し、じゃあはてなキーワードを辞書代りに使用してもいいんじゃないか。というものでした。
　辞書のように、というのがポイントです。はずせません><

追記：
動作環境書いてなかったorz
ubuntu 8.04.2 LTS、Emacs22,23 emacs-w3m は以前CVSから取ってきたもので動作しています。
w3mどうしましょうかねー。はてなからhtml要素で返ってくるので、フォーマットするのにw3m利用するのが一番簡単で手っ取り早いんですよねえ。その分w3mに依存するけど。
w3m使わなければ可搬性も高まるのだろうけど・・・

追記：
(require 'w3m-load) を書き忘れていたので追記。

追記：2009/04/26
　リンクされたキーワードにジャンプするようにした。
　w3mべったりになった。

追記：2009/05/03
　メジャーモードを実装。履歴を戻る機能を付けた。
　変数を初期化していない凡ミスを直した。

追記：2009/05/04
　コードの色付けが変だったので直した。face2htmlだと量が多いとうまくいかないみたい。htmlizeに変更した。

Dropbox で友達紹介キャンペーン

2009-04-17T15:16:00.002+09:00

Dropbox がアップデートされて、公式に CLI 版がリリースされました。
　リポジトリを登録している方は自動的にアップデートされます。

　初回起動時は、 dropbox start -i で起動すると本体をネットからダウンロードしてきます。
　次回からは、 dropbox start でOK.
　詳しいことは、man dropbox すれば見られます。

　んで、久しぶりに公式サイトを見にいって気づいたんですが、Dropbox で友達紹介キャンペーンをやっているらしいです。
　一人紹介して登録するごとに250MB紹介した側と、紹介された側に容量が貰えるらしいです。最大3GBまで貰えるらしい。
　ということでまだDropbox を使ったりしちゃったりしたことがない方は以下のリンクからゲットしちゃってくださいませんかお願いしますのよろしくですm(__)m

●https://www.getdropbox.com/referrals/NTEzMTE3MTk

SKK用三国志辞書

2009-04-09T21:15:00.001+09:00

SKK用三国志辞書を作るためのシェルスクリプトを作ってみました。
　ginka さんが公開して下さっているしんぷる三国志辞書を元にSKK用辞書に変換しています。
　蒼天航路も始まったことだし、三国志辞書などいかがでせう。

　変換には nkf と skkdic-expr2 が必要です。

sudo apt-get nkf skktools

としてあらかじめインストールして置いて下さい。
　あとは以下のスクリプト sangokusi2skk.sh としてを保存し、


#!/bin/sh
# -*- coding: euc-jisx0213 -*-
# last updated : 2009/04/09 20:41:45 JST

#wget http://homepage.mac.com/ginka/sanguo/data/simplesan_ver02otf.txt
TMP="sangokusi.tmp"
nkf -W16B --oc=EUC-JIS-2004 -Lu $1 > $TMP
cat $TMP | sed \
-e 's/\//,/g' \
-e 's/\t人名$//' \
-e 's/\t地名$//' \
-e 's/\t名詞$//' \
-e 's/\t/ \//' \
-e 's/(/;(/' \
-e 's/$/\//' | skkdic-expr2 > $TMP
echo ";; -*- mode: skk-jisyo-edit; coding: euc-jp -*-" | \
cat - $TMP  > SKK-SANGOKUSI.JISYO
rm $TMP

　保存したら後は、ginkaさんのサイトからしんぷる三国otf02 Unicode(UTF-16) simplesan_ver02otf.txt というファイルを落としてきます。後は、

sangokusi2skk.sh simplesan_ver02otf.txt

とでもして実行すれば、SKK-SANGOKUSI.JISYO というSKK辞書が出来上がります。

　注意点としてはシェルスクリプトの文字コードに注意してください。
　もし変換して出来た辞書を配布する場合は、元データの作成者のginkaさんに許諾を取ってください。
　適当にでっち上げただけですのでうまくいっているかどうかわかりません。一応手元のDDSKKとEmacsの環境ではちゃんと動いています。
　しかし蒼天航路のOPの映像は素晴しい。

Ubuntuで起動時刻を取得する

2009-03-24T19:56:00.002+09:00

PCの稼動時間は uptime コマンドで取得できますが、

$ uptime
20:19:56 up  9:24,  3 users,  load average: 0.11, 0.20, 0.21

起動した日時を取得するには last コマンドで取得できます。

$ last -R -1 reboot
reboot   system boot  Tue Mar 24 10:55 - 20:20  (09:24)

wtmp begins Sun Mar  1 16:13:24 2009

あるいは、

$ last -R -1 reboot | grep boot |  awk '{print $4, $5, $6, $7}'

Tue Mar 24 10:55

で抜き出すとか。

　後は現在時刻からuptimeで得られる稼働時間を引けば起動時刻が求められるので、計算して得るなら以下のようなシェルスクリプトを用意し、


#!/bin/sh
# last updated : 2009/03/24 19:41:43 JST
# 起動した時刻を表示する。

UPTIME=`cat /proc/uptime | awk '{print $1 }'`
NOW=`date +"%s"`
STIME=`echo "$NOW - $UPTIME" | bc`
awk 'BEGIN{print strftime("%c",'"$STIME"');exit}'

starttime.sh などという名前で保存し、実行すれば、

$ starttime.sh

2009年03月24日 10時55分08秒

などと表示される。perlやrubyに慣れている人ならワンライナーでもっと簡潔に書けるでせう。

　ちなみになんの役に立つのかはわからない・・・

Ubuntuで Twitter

2009-03-13T16:22:00.001+09:00

普段は twittering-mode を使用しているのだけれど、万人に勧められるものではないし、いろいろ他のtwitterクライアントを試してはみても、どれもいまいちしっくりこないというか。
　そこで今回 twitte.rb というクライアントがなかなかいいのでご紹介。

インストール

　必要なパッケージを事前にインストールします。

sudo apt-get install libglade2-ruby libgconf2-ruby libopenssl-ruby

ポップアップ通知を有効にしたいなら、libnotify-bin も入れておきます。

sudo apt-get install libnotify-bin

次に twitte.rb の最新版をここから落としてきます。
落としてきたら展開して適当な（今回は~/bin/以下にします）ディレクトリに、展開した中身を移動しておきます。

実行の仕方

　twitte.rb を実行するだけです。
~/.bashrc に

alias twitte='~/bin/twitte.rb'

と別名定義しておき、端末から、

source ~/.bashrc

と即座に反映しておけば、次回から twitte とするだけで twitte.rb が実行されます。

使い方

初回起動時に設定画面が表れますので、twitter のアカウントとパスワードを入力してあげればOKです。

　設定の細かい部分は本家を参照するといいでしょう。

　設定が終ったら、メイン画面の下のメッセージエリアに適当に呟きを入力してリターンキーを押せばPOSTされます。

Emacs23 で Wanderlust

2009-03-09T18:27:00.000+09:00

Emacs23 で Wanderlust で日本語フォルダが扱えなかった。他にネットで似たような情報がなかったので、うちだけの問題なのだろう。けっこうごちゃごちゃいじってあるので、自分でもわけがわからないw
　wl付属のutf7.el を削除すれば直ったというケースもあるようだけど、うちでは無理だった。
凹んだ（×_×）

　でまあ、emacs23になってから utf7 まわりがおかしいのだろうなと思っていたのだけど、wl のデバッグログを眺めていたら、デコードされたフォルダ名の先頭に空白が・・・・・・・・BOMだったorz

原因が判明したのでググって、　/usr/share/emacs/23.0.60/lisp/gnus/utf7.el に以下の変更を。


(defconst utf7-utf-16-coding-system
   (cond ((mm-coding-system-p 'utf-16-be-no-signature) ; Mule-UCS
     'utf-16-be-no-signature)
    ((and (mm-coding-system-p 'utf-16-be) ; Emacs 21.3, Emacs 22 (BOM?)
          ;; Avoid versions with BOM.
          (= 2 (length (encode-coding-string "a" 'utf-16-be))))
     'utf-16-be)
+   ((and (mm-coding-system-p 'utf-16be) ; Emacs 22 and later
+         ;; Avoid versions with BOM.
+         (= 2 (length (encode-coding-string "a" 'utf-16be))))
+    'utf-16be)
    ((mm-coding-system-p 'utf-16-be-nosig) ; ?
     'utf-16-be-nosig))
   "Coding system which encodes big endian UTF-16 without a BOM signature.")

Emacs23 になって utf-16-be が utf-16be になっているせいらしい・・・なんでやねん。

　同じようにwl付属のutf7.elも変更しないといけないのだけど、こちらは ~/.wl にバージョン判定で切り抜けるようにした。


(cond ( (string-match "^23\." emacs-version)
       (defconst utf7-utf-16-coding-system
         (and (fboundp 'find-coding-system)
              (find-coding-system 'utf-16be))
         "Coding system which encodes big endian UTF-16.")))

　結果は、見事に動作するようになった。　

・参考
　http://d.hatena.ne.jp/defiant/20081112/1226461505
　http://article.gmane.org/gmane.emacs.bugs/16892

ubuntuでフォルダ管理型の音楽プレーヤー

2009-03-05T15:30:00.000+09:00

iTunes 登場以来、ライブラリ管理型の音楽プレーヤーが主流になっていきました。Ubuntu だと、 rhythmbox や Amarok がそうです。
　これはこれで便利なのですが、大変重いという欠点があります。そもそもライブラリ型プレーヤーが登場する前は、みんなフォルダにアルバム名やアーティスト名などを付けて管理していました。
　こうしたフォルダ管理に慣れている人にとっては鈍重なライブラリ管理型ミュージックプレーヤーはなかなか馴染まないものです。
　そこで、フォルダ管理型音楽プレーヤ、 Decibel Audio Player の出番です♪

インストール

sudo apt-get install decibel-audio-player

使い方

　使い方は至って簡単です。
　起動したら、メニューから設定画面を呼び出し、File Explorer にチェックを入れ（最初から入っているかな？）、

設定ボタンを押して、音楽フォルダをどんどん登録していきます。

　後は左側のペインから聴きたい音楽やフォルダ上で右クリックし、演奏を選ぶだけです。
　Playlist にも対応していますので、自由に再生リストを作成することも出来ます。
　これだけです。シンプルでamarokに比べてメモリも食わなければ余計なこともせず、ひたすら音楽を流し続けるにはもってこいのプレーヤーでしょう。

ubuntuで使える、いろんなネットワークモニタ

2009-03-02T16:55:00.000+09:00

いろいろありすぎるので、簡単な紹介だけ。実際い使ってみた方がはやいでしょう。

bwm-ng

　見てのとおり、実にわかりやすいですね。終了は、q キーで。

nload

　これもbwm-ngといっしょですね。棒グラフで転送量が分かります。終了は、q キーで。

vnstat

　統計に特化したモニタ。もちろんリアルタイムでの観測も可能。
　インストールすると5分置きに記録する。
　インストールしてすぐに起動するとデータベースがないかデータが足りなくてエラーになる。
　その時は、

sudo vnstat -u -i eth0

　としてデータベースを構築してあげよう。
　後は以下のオプションを指定してあげれば、さまざまな統計データが得られる。
　見ていて楽しいですね。

月別	-m
週別	-w
日別	-d
24時間	-h
top10	-t
リアルタイム	-l

　どんなイメージかは公式サイトが詳しいので、そちらをどうぞ。

speedometer

　時間軸に沿って転送量がグラフで流れていくという、オーソドックスな表示のモニタ。
　起動は、

~$ speedometer -tx eth0 -rx eth0

iptraf

　見た目が分かりやすい、定番のモニタ。
　起動すると、メニューから機能や設定を選べる。

iftop

　転送速度を横棒グラフで表示してくれる。
　シンプルで見やすいですね。

　以上、簡単な紹介でした。実際に使用してみれば、すぐわかると思います。どれも簡単な操作で使用できますし、直感的に扱えるかと。
　他にも、 ntop とか NetHogs とかまだまだ類似のツールがありますので試してみるのもおもしろいでしょう。

ubuntuの端末をmltermにする

2009-02-24T15:40:00.000+09:00

wmを icewm に変えてから日々メモリ節約に走る日々。刻むぜぇ〜ちょお刻むぜぇ〜w
　今回は惰性で使ってきた gnome-terminal を mltermに変えることにしました。
　gnome-terminalは20MB。対してmltermは5Mしかメモリを消費しません。なんと四分の一！！
　さらにスクロール速度も速く軽快に動作します。
　Unicodeの「●▲■」なども正常な幅で表示されます。(gnome-terminalでもできるがいまいち)

インストール

sudo apt-get install mlterm mlterm-tools

後はscimを使っているなら、mlterm-im-scim を。uimなら mlterm-im-uim パッケージを入れることで日本語変換がインライン入力で出来るようになります。

設定

　一応 Ctrl + 右クリックで GUIでも簡易的に編集することが出来ます。

　ですが細かい設定は ~/.mlterm/ 以下の各ファイルを編集することで行ないます。メインは、~/.mlterm/main です。以下設定例。
~/.mlterm/main の設定例。


# -*- mode: conf-unix -*-
# mlterm mail configuration
# last updated : 2009/02/24 14:02:41 JST

# 端末縦横サイズ(文字)
geometry=80x27

#ーーーーー文字関係ーーーーーーー
receive_string_via_ucs = true
# Unicode記号文字幅を半角2文字にする。
col_size_of_width_a = 2
# アンチエイリアス(Xft)時、JISX0208 の Unicode 変換に CP932 の変換テーブルを使う
use_cp932_ucs_for_xft=true
# UNICODE を適当な文字集合にmapして、UNICODE フォントを使わずに表示する
not_use_unicode_font=false
# すべての文字を UNICODE フォントだけを使って表示する
only_use_unicode_font=false
# US_ASCII の表示には、必ず ISO8859-1 フォントを使用する
iso88591_font_for_usascii=false
# DEC_SPECIAL フォントの罫線文字のグリフを動的に合成
compose_dec_special_font=false
# インプッドメソッドの設定
input_method = scim


#ーーーースクロールバーーーーー
# scrollbar_mode = right
scrollbar_mode = none
# 使いたいスクロールバーの名前
# (*simple* / sample / sample2 / next / motif / athena / mozmodern)
# scrollbar_view_name=sample2

#ーーーー色設定ーーーーーーーー
# 端末画面の前景色
# fg_color=white
# 端末画面の背景色
bg_color=#F6F0E6
# スクロールバーの前景色
# sb_fg_color=white
# スクロールバーの背景色
# sb_bg_color=black
# 紙にする画像ファイルのパス
# wall_picture
# Focus から外れたときの前景/背景色の Fade 率(百分率)
#fade_ratio=90
# 背景画像(透過処理含む)の輝度調整(百分率)
#brightness=80
"--------------------

●フォントの設定
　フォントは ~/.mlterm/aafont に。ビットマップフォントは、~/.mlterm/font に記述します。
　~/.mlterm/aafont の設定例。

ISO10646_UCS4_1 = IPAMonaGothic-iso10646-1:100;
ISO10646_UCS4_1_BIWIDTH = IPAMonaGothic-iso10646-1:100;

色がドぎつい

　デフォルトでは色設定が原色系で目に痛いので、ubuntu の gnome-terminal のカラーテーマのTangoのような柔らかい色設定に変更します。
　~/.mlterm/color に以下を記述。

black=#2e3436
red=#cc0000
green=#4e9a06
yellow=#c4a000
blue=#3465a4
magenta=#75507b
cyan=#06989a
white=#d3d7cf
hl_black=#555753
hl_red=#ef2929
hl_green=#8ae234
hl_yellow=#fce94f
hl_blue=#729fcf
hl_magenta=#ad7fa8
hl_cyan=#34e2e2
hl_white=#eeeeec

まとめ

　スクロールバーは表示していません。screenを使っているので。
　起動時に mlterm -j genuine として、デーモンモードで起動しています。
　ランチャーなどからは、mlclient を起動するようにしています。
　以上でgnome端末とまったく違和感のない同じ見た目までmltermを持っていくことが出来ました。
　メモリの使用量が四分の一になって、しかも軽快に動くとは素晴らしい。

　実はかなり前からmltermは入れていたんですが、ずるずるとgnome端末を使い続けて今日まできました。それがicewmを入れてから省メモリに目覚め、mltermを本格的に使ってみると、あらいいじゃな〜いとw
　こんなことならもっと早くに移行していればorz

参考

PPAに mlterm 256色対応版をアップしました

2009-02-22T20:36:00.002+09:00

PPA に多言語対応端末エミュレータ mlterm の 256色対応版をアップしました。
　よかったらどうぞ。

● https://launchpad.net/~yama-natuki/+archive/ppa

icewm のいろいろなテーマ

2009-02-19T00:05:00.002+09:00

icewm は最初から theme が豊富なのも良いところです。

sudo apt-get install icewm-themes

とすれば、最初からたくさんのテーマがインストールされます。
　それ以外にもこちらなどからもテーマがダウンロード出来ます。
　ダウンロードしてきたテーマは、~/.icewm/themes 以下に展開すればOK。

　いくつか私が気に入っているテーマを紹介します。
　基本的にダークなテーマは見にくいので嫌いです。奇を衒ったものも好きではありませんので、かなり偏った紹介なのですけどねw

●IceBuntu
　　これでしょう。基本ですw
　　赤茶けたアフリカの大地を彷彿とさせる(ry

●BubblyBlue
　　ばぶりー

●eiskristall
　　落ち着いた色調はいい・・・

●lice
　　これもシンプルでクール。

●PlastiCrack
　　プラスチックスタイル

●SmoothIceHybrid
　　どこかで見たような。

icewm に音量ボタンを追加する

2009-02-18T15:37:00.001+09:00

タスクトレイに常駐しているスピーカーのアイコンのあれです。
　当初 AbsVolumeを使用していたのですが、常駐型ではないため、起動にワンテンポ遅れる感じでした。
　そこで今回 gvtray に変更しました。

インストール

sudo apt-get install python-alsaaudio python-gnome2-extras
wget http://gtk-tray-utils.googlecode.com/svn/trunk/gvtray-1.1.tar.gz
tar zxvf gvtray-1.1.tar.gz
cd gvtray-1.1
sudo mkdir /usr/share/gvtray
sudo cp gvtray /usr/bin
sudo cp gvtray.py /usr/share/gvtray/
sudo cp -r gvtray_about/ /usr/share/gvtray/gvtray_about

起動するとタスクトレイに数字のアイコンが追加されます。
クリックするとなじみの音量調節バーが。

　後は ~/.icewm/startup に書いておけば起動時に自動的に起動されます。

PPAにicewmをアップしました

2009-02-15T15:55:00.001+09:00

hardyの icewm では、タスクトレイの幅がおかしいというバグがあったので、パッチを当てたものを PPA にアップしました。
　初 deb パッケージ作成。初 PPA アップ。自信がないw
　自分用ですが、よかったらどうぞ。
https://launchpad.net/~yama-natuki/+archive/ppa

Emacsでanthy.elのキーバインド変更

2009-02-11T00:05:00.001+09:00

mizunoさんところで ATOKっぽいローマ字バインドが欲しがっているみたいなのでやっってみた。
　以下を ~/.emacs に追記。


;anthy.el ローマ字変換テーブル再定義＆キーバインド再定義
(setq anthy-rkmap-keybind
  '(
    ;; \C-p
    (("hiragana" . 16) . "katakana")
    (("katakana" . 16) . "hiragana")
    ;; q
    (("hiragana" . 113) . "katakana")
    (("katakana" . 113) . "hiragana")
    ;; \C-j
    (("alphabet" . 10) . "hiragana")
    (("walphabet" . 10) . "hiragana")
    ;; \C-q
    (("hiragana" . 17) . "hankaku_kana")
    (("hankaku_kana" . 17) . "hiragana")
    )
  )


;;Anthyキーバインド設定
(setq anthy-wide-space "　")
(anthy-change-hiragana-map "la" "ぁ")
(anthy-change-hiragana-map "li" "ぃ")
(anthy-change-hiragana-map "lu" "ぅ")
(anthy-change-hiragana-map "le" "ぇ")
(anthy-change-hiragana-map "lo" "ぉ")
(anthy-change-hiragana-map "ltu" "っ")
(anthy-change-hiragana-map "zz" "っ")
(anthy-change-hiragana-map "lya" "ゃ")
(anthy-change-hiragana-map "lyu" "ゅ")
(anthy-change-hiragana-map "lyo" "ょ")
(anthy-change-hiragana-map "lwa" "ゎ")

な感じで。
とはいえSKKを使うようになってからAnthyは使っていないので突っこまれても困るけど。
anthy.el自身を直接いじるのはスマートではないのでこんな感じでどーでせう。

Ubuntuでプロセス監視ツール

2009-02-10T00:05:00.000+09:00

polipo がよく落ちるのでその度にsshしてpolipoを再起動とかいい加減しんどくなってきたので、プロセスを監視し、落ちていたら自動的に再起動させるツールを作ってみました。
　いわゆるデーモン監視ツールですね。ちゃんとした、daemontool とか、monit とか、鯖向けの本格的なツールはあるんですが、個人使用のPCで外向けに本格的なサーバを運用しているわけでもないので、そこまでの本格的な道具が必要なかったり、リソース食いすぎで嫌だったりするわけで自作することにしました。
　自作といっても簡単です。シェルスクリプトで while do で無限ループで走らせ、その中でプロセスが起動しているかいないかチェックし、落ちでいたら再起動させるだけです。
　基本形はこんな感じで。

while true
do
 ここに処理を書く。
 sleep 30
done

　sleep は30秒としていますが、お好みで。

　今回は、/etc/init.d/polipo の起動スクリプトの中に、この作ったシェルスクリプトを埋め込んで一緒に起動させることにします。polipoが起動したら監視ツールも一緒に起動し、polipoが死んだら自動的に再起動という按配ですね。


#!/bin/sh
# last updated : 2009/02/06 00:20:41 JST
# $Id: polipo_check.sh,v 1.6 2009/02/05 15:21:06 yama Exp $
# プロセス監視ツール。
# polipo が動いているかどうかをチェックし、起動していなかったら、再起動させる。
# 

DEMON="polipo"

# 多重起動防止処理。
SCRIPT_PID="/var/run/polipo_check.pid"
if [ -f $SCRIPT_PID ]; then
  PID=`cat $SCRIPT_PID `
  if (ps -p ${PID} -o pid= >/dev/null); then
    exit
  fi
fi
echo $$ > $SCRIPT_PID

# 監視無限ループ処理。
while true
do
   ps -C ${DEMON} -o comm= > /dev/null || /etc/init.d/${DEMON} restart
   sleep 30
done

# PIDファイルの削除。
rm $SCRIPT_PID

/etc/init.d/polipo 内にスクリプトを埋め込みますので、多重に自身を起動しないように防止処理を入れています。
　後はpsコマンドで定期的に監視し、落ちていたら/etc/init.d/polip restart を実行するようにさせています。

　埋め込む位置は、

case "$1" in
  start)
  echo -n "Starting $DESC: "
        $PPCTL start
  echo "$NAME."
  nice /usr/local/bin/polipo_check.sh &
  ;;
  stop)
  echo -n "Stopping $DESC: "
        $PPCTL stop
  echo "$NAME."
  killall polipo_check.sh
  ;;
  #reload)

な感じで。赤字が追加部分です。ファイル名をpolipo_check.shとして、/usr/local/bin/に入れてあります。
　nice コマンドでプロセスの優先度を下げています。
　これでメモリ消費量も少なく、リソースも食わない軽量な監視ツールが出来上がりました。

プロセスを検索するワンライナー

2009-02-09T00:04:00.002+09:00

Command-line Fu という便利なワンライナーを投稿するサイトが出来たらしいので、自分も頻繁に使っているワンライナーをひとつ。

ps aux| head -1 && ps aux | grep $1 | sed -e '/grep/d'

こいつを ~/.bashrc に関数として登録しておく。

function psx {
ps aux| head -1 && ps aux | grep $1 | sed -e '/grep/d'
};

な感じで。

使い方は、

~$ psx firefox

USER       PID %CPU %MEM    VSZ   RSS TTY      STAT START   TIME COMMAND
hoge      7009  9.2 22.3 267484 115100 ?       Ssl  12:30   4:21 /usr/lib/firefox-3.0.5/firefox

ようするにPS の一行抜きなんだが、一発でそのプロセスの情報が表示出来るので頻繁に利用しています。便利。

PPAの鍵の取得

2009-02-08T00:05:00.003+09:00

PPAの仕様が変って署名機能がついたので、それに合わせて鍵を取得しておいた。
apt-get update で

W: GPG error: http://ppa.launchpad.net hardy Release: 公開鍵を利用できないため、以下の署名は検証できませんでした: NO_PUBKEY 7781BA0134BEEE14
W: これらの問題を解決するためには apt-get update を実行する必要があるかもしれま せん

と出たので、PPAの仕様変更に伴ない、PPAのアドレスを変更。そして、

gpg --keyserver keyserver.ubuntu.com --recv-keys 7781BA0134BEEE14
sudo gpg --armor --export 7781BA0134BEEE14 | sudo apt-key add -

として鍵をインポートした。
ちなみに上記の鍵はkirkland さんのリポジトリ。

ちなみにGUIでやりたい場合は、以下の動画をどうぞ。
http://www.youtube.com/watch?gl=US&v=UUZOQsNo_ws&fmt=18

atimeとrelatime

2009-02-07T16:06:00.000+09:00

個人的メモ。
　Ubuntuでは8.04（もっと前？）あたりから、カーネルオプションで、default_relatime が有効になっているらしい。

default_relatime が有効になっていると、マウントオプションに relatime が追加される。
デフォルトでは最大一日以内のatimeはread()されても更新されない。
default_relatimeを無効にするにはブートオプションに、default_relatime=0 を追加。
つまり、findなどでatimeを基準にした検索には注意が必要。

　
　個人的には/home を別パーティションにし、それ以外をnoatimeで運用していたのですが、今まで気にもしなかったということは、/home もnoatime でもかまわない、つまり relatime オプションが有効になっていても問題なしという結論に。
　cat で読み込んでもatimeは更新されないという気持ち悪さは残るんですが、まあ・・・ね・・・うん・・・

参考

ubuntuにicewmを入れる

2009-02-06T17:37:00.002+09:00

icewm はWindowsXPのクラシックメーニューに似ている外観を持ったウィンドウマネージャーです。 GNOMEやKDEのような総合デスクトップ環境とは違いますが、驚くほど軽量なWMとなっています。ゴテゴテした装飾や、親切設計はいらない、なによりもメモリが少なくてGNOMEが重いという人にぴっったりなウィンドウマネージャーです。
　実はちょっと前までxfceを入れていたんですが、GNOMEと比べて劇的にメモリ使用量が減るわけでもなく、操作感もほとんどGNOMEを一緒なので、「じゃあGNOMEでいいじゃんw」と思ってだんだん使わなくなっていきました。そんな中、前から気になっていた icewm を試してみたらとても軽くてこれは良いと。

インストール

sudo apt-get install icewm icewm-gnome-support icewm-themes

　インストールし終えたら、gnomeからログアウトし、ログイン画面のセッションでicewmを選択すれば立ち上がります。初期状態では壁紙もなく質素で非常に使いずらい状態です。
　icewm の設定は~/.icewm/以下の設定ファイルを編集することで行ないます。サンプルが/usr/share/icewm/以下にあるので、それをコピーして使ってもいいでしょう。

設定

　設定は各種設定ファイルをテキストエディタで編集することで行ないます。設定のサンプルは、/usr.share/icewm/ 以下にありますので、それらを ~/.icewm/ 以下にコピーして編集するといいでしょう。
　各設定ファイルは以下のようになっています。

~/.icewm/menu	メニューの内容を設定
~/.icewm/preferences	icewmの設定
~/.icewm/startup	スタートアップファイルの設定
~/.icewm/theme	テーマを設定
~/.icewm/toolbar	タスクバーの設定

設定の反映方法

　menuなどは即座に反映されるようですが、preferenceなどはicewmを再起動しないと反映されないようです。
　メニューからicewmを再起動してください。

フォント

　~/.icewm/preferences に記述します。以下私の設定例です。


# フォントの設定。
itleFontNameXft="sans-serif:size=12"
MenuFontNameXft="sans-serif:size=12:bold"
StatusFontNameXft="monospace:size=12:bold"
QuickSwitchFontNameXft="monospace:size=12:bold"
NormalButtonFontNameXft="sans-serif:size=12"
ActiveButtonFontNameXft="sans-serif:size=12:bold"
NormalTaskBarFontNameXft="sans-serif:size=11"
ActiveTaskBarFontNameXft="sans-serif:size=11:bold"
ToolButtonFontNameXft="sans-serif:size=12"
NormalWorkspaceFontNameXft="sans-serif:size=12"
ActiveWorkspaceFontNameXft="sans-serif:size=12"
MinimizedWindowFontNameXft="sans-serif:size=12"
ListBoxFontNameXft="sans-serif:size=12"
ToolTipFontNameXft="sans-serif:size=12"
ClockFontNameXft="monospace:size=10"
ApmFontNameXft="monospace:size=12"
InputFontNameXft="monospace:size=12"
LabelFontNameXft="sans-serif:size=12"

アプリの文字が小さい

　~/.icewm/preferences でicewm のフォント周りの設定は出来たのですが、アプリの文字サイズがGNOMEと比べて小さいまま変更が出来ませんでした。
　この問題は ~/.Xresource に

Xft*dpi:       96

と記述することで解決しました。dpiをきちんと設定しないといけなかったんですね。
　Xを再起動すれば反映されます。あるいは、

xrdb ~/.Xresource

とします。

その他の設定

　設定例です。~/.icewm/preferences に記述します。


# タスクバーを上に表示する。
TaskBarAtTop = 1
# 時刻表記の設定。
TimeFormat="%m/%d(%a)%R"
#LCDっぽい画像で時計を表示しない。
TaskBarClockLeds = 0
#ウィンドウ移動時、ワイヤーフレームにする。
OpaqueMove = 0
#ウィンドウリサイズ時、ワイヤーフレームにする。
OpaqueResize = 0
# ワークスペースの設定。
WorkspaceNames=" 1 ", " 2 ", " 3 ", " 4 "
# Alt+Tab キーが、どのワークスペースにあるウインドウにも切り換えます。
QuickSwitchToAllWorkspaces = 1
# マウスが画面端にきたらワークスペースを移動する。
# EdgeSwitch=1



#キーボードショートカット
# ワークスペース切り替え。
KeySysWorkspace1="Ctrl+1"
KeySysWorkspace2="Ctrl+2"
KeySysWorkspace3="Ctrl+3"
KeySysWorkspace4="Ctrl+4"


# 壁紙の設定。
DesktopBackgroundImage="/home/hoge/Pictures/Wallpapers/hogehoge.jpg"

# icon path
IconPath="/usr/share/icons:/usr/share/pixmaps"

スタートアップの設定

　~/.icewm/startup に記述します。以下設定例。

#!/bin/sh

/home/hoge/.dropbox-dist/dropboxd &
pidgin &
gnome-terminal &
checkgmail &
xscreensaver -no-splash &

　保存したら ~/.icewm/startup ファイルに

chmod +x ~/.icewm/startup

として実行属性を付けて下さい。
　上記例では、Dropboxの同期を行なうデーモンとgnome端末、Gmailをチェックするcheckgmail、そしてスクリーンセーバーを起動時に実行するようにしています。

メニューの設定

　~/.icewm/menu を編集します。
　メニューの設定は簡単です。上に書いたものが上になります。書式は、
prog 名称アイコンファイル名プログラム名
各要素は空白またはタブで区切ります、
　入れ子にする場合は、

menu "サウンド" folder {
prog "Amarok" /usr/share/pixmaps/amarok.xpm amarok
prog "audacious" /usr/share/pixmaps/audacious.xpm audacious
prog "streamtuner" /usr/share/pixmaps/streamtuner.png streamtuner
}

　などと記述します。以下設定例。


# icewm menu configuration -*- mode: conf-unix -*-
#
#

prog "rox-filer" /usr/share/rox/images/application.png rox
prog "gnome-terminal" gnome-terminal gnome-terminal
# ■△○    問題を解決。
prog "g-terminal" gnome-terminal env VTE_CJK_WIDTH=1 gnome-terminal
prog "JD" jd jd
prog "Mozilla Firefox" /usr/lib/firefox-3.0.6/icons/mozicon128.png firefox
prog "Emacs23" /usr/share/icons/emacs-snapshot/emacs16_mac.png emacs-snapshot
separator
menu "アプリ" folder {
menu "OpenOffice" folder {
  prog "OpenOffice 2.4 Calc"    ooo-calc.png    env SAL_EMBEDDED_BITMAP_PRIORITY=0 ooffice -calc
  prog "OpenOffice 2.4 Writer"  ooo-writer.png  env SAL_EMBEDDED_BITMAP_PRIORITY=0 ooffice -writer
  prog "OpenOffice 2.4 Draw"    ooo-draw.png    env SAL_EMBEDDED_BITMAP_PRIORITY=0 ooffice -draw
  prog "OpenOffice 2.4 Impress" ooo-impress.png env SAL_EMBEDDED_BITMAP_PRIORITY=0 ooffice -impress
  prog "OpenOffice 2.4 Base"    ooo-base.png    env SAL_EMBEDDED_BITMAP_PRIORITY=0 ooffice -base
#   prog "OpenOffice 2.4 Math" /usr/share/icons/hicolor/16x16/apps/ooo-math.png /bin/sh -c "openoffice.org2.4 -math"
}
}
menu "ネット" folder {
}
menu "メディア" folder {
  menu "サウンド" folder {
        prog "Amarok" amarok amarok
        prog "audacious" audacious audacious
        prog "streamtuner" streamtuner streamtuner
        prog "decibel-audio-player" decibel-audio-player decibel-audio-player
        }
  menu "動画" folder {
        prog "Totem(GStreamer)" totem totem-gstreamer
        prog "Totem(xine)" totem totem-xine
        prog "mplayer" mplayer gmplayer
        prog "VLC" vlc vlc
        }
  menu "画像" folder {
        prog "gpicview" gpicview gpicview
        prog "mirage" mirage mirage
        prog Gimp gimp gimp
        prog "comix" comix comix
        }
}
menu "tool" folder {
 prog "screenshot" /usr/share/icons/HighContrastLargePrintInverse/48x48/apps/gnome-screenshot.png gnome-screenshot --interactive
}
separator
menu "設定" folder {
prog "アプリの追加と削除" - gnome-app-install
}

ツールバーの設定

　~/.icewm/toolbar に記述します。
　menu の書式と同じです。以下設定例。


prog "rox-filer" /usr/share/rox/images/application.png rox
prog "gnome-terminal" gnome-terminal  env VTE_CJK_WIDTH=1 gnome-terminal
prog "JD" jd jd
prog "Mozilla Firefox" /usr/lib/firefox-3.0.6/icons/mozicon50.xpm firefox
prog "gama" - gamma

テーマ

　メニューのSetting→テーマにいっぱいあるので、そこから選択します。

●私のオススメのテーマはこちらをどうぞ

ファイラ

　統合デスクトップ環境ではありませんので自分で用意します。
　ファイラはroxを使用することにしました。軽いのが特徴です。以前から使用していたので違和感なく移行。

デスクトップ

　icewm にはデスクトップにモノが置けません。ですのでデスクトプを管理するプログラムを別に用意してあげなければいけません。今のところ私は必要ないので導入していませんが、roxのデスクトップ管理機能を利用すればいいでしょう。

まとめ

　基本的に設定したらicewmを再起動させて反映の繰り返しです。設定項目に関しては、サンプルを見るのが一番です。ドキュメント類は古く記載漏れがあります。
　GNOMEと比べてメモリ使用量が激減しているのに気づくでしょう。逆い言えばハードウェアリソースに制約のない最新PCを使用している人にとっては導入するメリットはないでしょう。

CLIで天気情報を表示する

2009-01-22T19:08:00.002+09:00

最近ではさまざまなガジェットが氾濫し、デスクトップ環境でお天気情報を表示するということも珍しくなくなってきました。
　ならコマンドラインからでもお天気情報を表示できたっていいじゃなーいということで調べてみました。

weatherget というツールを使います。

インストール

wget http://download.berlios.de/weatherget/weatherget-0.4.0.1.tar.bz2
tar xvf weatherget-0.4.0.1.tar.bz2
cd weatherget-0.4.0.1
sudo python setup.py install

使い方

自分の街のコードを調べます。

$ weatherget -l tokyo

Tokyo, Japan: JAXX0085

と出るので、あとは、

weatherget --station-id=JAXX0085 --metric

とすれば、

Tokyo, Japan  (139.77, 35.67)
Tokyo, Japan  1/22/09 3:00 PM Local Time
Temperature    : 7 C
Feels Like     : 4 C
Conditions     : Drizzle
Wind           : 11 km/h, 0 km/h gusts, NNW
Visibility     : 2.5 km
Humidity       : 84 %
Barometer      : 1014.6 mb, N/A
Dewpoint       : 4 C
UV             : Low, 0
Sunrise        : 6:47 AM
Sunset         : 4:58 PM
Moon           : Waning Crescent
Time Zone      : 9 GMT

長ったらしいので、

alias tenki='weatherget --station-id=JAXX0085 --metric'

として別名定義しておけば、tenki とするだけでいいので楽チンです♪

　weatherget 自体はpythonのスクリプトで書かれていますので日本語じゃないとヤダという方は挑戦してみてください。私は面倒くさいので、sed でやっちゃいましたw コードいじらないので楽ですしw

$ weatherget --station-id=JAXX0085 --metric | sed -f weather.sed

東京,日本  (139.77, 35.67)
羽田ヘリポート,日本 1/22/09 5:22 PM Local Time
気温             : 6 ℃
体感気温         : 3 ℃
天候             : ほとんど曇り
風速             : 13 km/h, 0 km/h gusts, NNW
視界             : 1.5 キロメートル
湿度             : 93 %
気圧             : 1017.9 ヘクトパスカル, steady
露点             : 5 ℃
紫外線           : 低い, 0
日の出           : 6:48 AM
日の入り         : 4:58 PM
月齢             : Waning Crescent
タイムゾーン      : 9 GMT

な感じで。

weather.sedの中身

s/Temperature/気温         /
s/Feels Like/体感気温    /
s/Conditions/天候        /
s/Wind/風速  /
s/Visibility/視界        /
s/Humidity/湿度      /
s/Barometer/気圧       /
s/Dewpoint/露点      /
s/UV  /紫外線/
s/Sunrise/日の出   /
s/Sunset/日の入り/
s/Moon/月齢  /
s/Time Zone/タイムゾーン/
s/ km$/ キロメートル/
s/Iruma AB, Japan /入間基地,日本/
s/Omiya, Japan/大宮,日本/
s/ C$/ ℃/g
s/Low,/低い,/
s/ mb, / ヘクトパスカル, /
s/Mostly Cloudy/ほとんど曇り/
s/Fair/晴れ/
s/Cloudy/曇り/
s/Partly Cloudy/ところにより曇り/
s/Light Rain/小雨/
s/Fog/霧/
s/Shower/にわか雨/
s/Heavy Rain/大雨/
s/Rainstorm/雨嵐/
s/Flurry/突風を伴うにわか雨/
s/Sleet/みぞれ（雪まじりの雨）/
s/Snow/雪/
s/Snowstorm/吹雪/
s/Storm/嵐/
s/Gale/強風/
s/Thunder/雷/
s/Thunderstorm/雷雨/
s/Lightning/稲妻/
s/Hurricane/台風/

Ubuntuで重複ファイルを削除する

2009-01-07T19:00:00.000+09:00

ネットで画像ファイルをどんどん保存しまくっていくと、いつしか以前保存した画像をまた保存していて、同じようなファイルが複数溜まっていく・・・なんてことはよくあることです。
　チリも積もればなんとやら。画像フォルダの重複ファイルを調べていたらなんと555ファイルもあり、95Mにもなっていました。あまりよろしくないですよね。
　ということで今回は重複ファイルの整理方法。

fdupes というツールを使います。fdupes は指定されたディレクトリを検索し、ファイルサイズとmd5ハッシュ値で比較し、重複したファイルがあれば、それを表示してくれます。大変コンパクトで高速な素晴しいソフトです。

インストール

sudo apt-get install fdupes

使い方

重複ファイルを探し出す

fdupes -r ~/MyPicture/

~/MyPicture/ 以下を再帰的に検索して重複したファイルを表示します。

重複した余分なファイルを削除する

　重複したファイルを少しなら、-d オプションで逐一操作してもいいのですが、量が多いとなると大変です。そこで、削除するファイルのリストを掃き出させ、そのリストを rm コマンドに食わせるというやり方でいきます。

リストを作る。
```
fdupes -rf ~/MyPicture/ | sort | uniq | grep -v '^$' > remove.lst
```
　これで削除すべき余分なファイルのリストが出来あがりました。

実際に削除する
```
while read file; do rm -v "$file"; done < remove.lst
```
　remove.lstから一行づつ読み込まれて削除されていきます。
　いきなり rm で削除は不安という場合は rm を trash に置き換えでもいいでしょう。

ワードサラダって頭にくる

2008-10-31T15:45:00.002+09:00

最近googleのブログ検索でemacsをキーワードにブログを読んでいくと、支離滅裂なブログがあって？？？となることが度々。
　だってemacsがおいしい。とか、emacsを買った。とか。もう全然意味が分かんない。
　そのうちSEO対策でキーワードをちりばめた文章を人口無能に書かせているのかなと思って調べたら、ワードサラダっていうスパムの一種だそうです。
　日本では去年当たりから流行りはじめたみたい。
　人間の目には明らかにおかしいとわかる文章でも検索ボットには文章として認識されてスパムフィルタをすり抜けてしまうみたい。

　しかしこれがまた異様に腹が立つ。おまけにemacsなんていう、ごく一部の人種しか興味がないようなキーワードまで利用されていることにものすごい腹が立つ。

　GoogleReaderでブログは読んでいるので、最近はリンクを踏まないようにしているけど、あー腹が立つ。
　みなさんもあさましいワードサラダにはご注意を。

howmで保存時の設定

2008-10-17T15:59:00.000+09:00

howm という Emacs 使いなら絶対使っとけみたいなキラーアプリがあります。いわゆるメモ取りソフトなんですが、全文検索も出来て、リンクも出来て、しかもただのテキストファイルだから加工も容易で、ToDoアプリとしても使えて、スケジューラーとしても使えて、お勧めです。

　それで howm をメモソフトとして使っているのですが、基本的にメモはプライベートなモノなので他人に見られないようhowmのメモを保存時にパーミッションを600に変えるようにします。
　以下を~/.emacs に追記。


;;; 保存時処理
;;; 保存時にパーミッションを"600"にする。
(add-hook'howm-after-save-hook
 (lambda ()
   (let ((name (buffer-file-name)))
        (set-file-modes name 384)))) ; 600

Emacsでオートセーブファイルの作成場所を変える

2008-10-16T14:33:00.000+09:00

オンラインストレージで Dropbox.com というのがありまして。こいつがとても凄くて、~/Dropbox/ にファイルを放り込むだけで自動的にファイルがアップされ、ファイルの履歴も取れて、同期も早くて、linuxでもMacでもWindowsでも使えるという夢のようなサービスなんですが、
　この~/Dropbox/内のファイルをEmacsで編集すると自動的に「＃」の付いた自動保存ファイルが作成され、それがDropboxに同期されて履歴として残ってしまうという。
　これが激しくウザいので、~/Dropbox/以下では自動保存ファイルを作らないようにします。
~/.emacs に以下を追記。


(setq auto-save-file-name-transforms
      `((".*/Dropbox/.*" ,temporary-file-directory t)))

これで ~/Dropbox/ 以下のオートセーブファイルは /tmp/ 以下に作成されるようになります。

Emacsの保存関係の設定

2008-10-15T18:34:00.000+09:00

Emacs には自動保存機能がデフォルトで有効になっています。
　ファイルを編集すると、ファイル名の前後に「＃」を付けたバックアップファイルが作成され、随時編集内容がこのファイルに保存されていきます。
　このため何らかの理由でファイルを保存しそこなったとしても、このバックアップファイルからリカバリできる仕組みになっています。
　この自動保存はデフォルトでは30秒ごとか、300打鍵ごとにオートセーブされるようになっています。
　間隔が長い、あるいは短かいと感じたのなら調整しましょう。それぞれ、

(setq auto-save-timeout 30)   ; 自動保存する間隔。秒。
(setq auto-save-interval 300) ; 300打鍵ごとに自動保存

の値を変えることで変更出来ます。

簡易履歴機能

　Emacsでは簡易的ながら複数の世代に渡るバックアップの履歴を取ることが出来ます。つまり、前の編集内容。さらにその前の編集内容、さらにさらに・・・
　編集して保存して、やっぱり以前の状態に戻したい。さらにはその前の編集した内容の方がよかったので、なんていうことにも対応出来て便利です。
　この世代バックアップファイルは、ファイル名の末尾に「.~1~」のようなサフィックスを付けられて保存されていきます。番号は自動的に増えていきます。
　バックアップファイルは元のファイルを同じ場所に保存されいきます。しかしこれではバックアップファイルだらけになって少々鬱陶しいのでバックアップファイルは専用ディレクトリを作ってそこに全部保存されるようにします。


(setq make-backup-files t)       ; バックアップファイルを作成する。
;;; バックアップファイルの保存場所を指定。
(setq backup-directory-alist
      (cons (cons "\\.*$" (expand-file-name "~/.backup"))
            backup-directory-alist))

(setq version-control t)     ; 複数のバックアップを残します。世代。
(setq kept-new-versions 5)   ; 新しいものをいくつ残すか
(setq kept-old-versions 5)   ; 古いものをいくつ残すか
(setq delete-old-versions t) ; 確認せずに古いものを消す。
(setq vc-make-backup-files t) ; バージョン管理下のファイルもバックアップを作る。

　これでバックアップファイルは~/.backup/以下に保存され、最新の世代から5つと、古い方から5つ残されていきます。

保存時実行属性付与

　定番ネタです。
　シェルスクリプトを作って保存したときに、いっしょに実行属性を付けてくれます。地味ながらも大変有り難い機能です。
　こちらを参考、というか丸写し(^_^;)


;;;====================================
;;;; シェルスクリプト保存時にchmod +x を自動実行する
;;;====================================
(defun make-file-executable ()
  "Make the file of this buffer executable, when it is a script source."
  (save-restriction
    (widen)
    (if (string= "#!" (buffer-substring-no-properties 1 (min 3 (point-max))))
        (let ((name (buffer-file-name)))
          (or (equal ?. (string-to-char (file-name-nondirectory name)))
              (let ((mode (file-modes name)))
                (set-file-modes name (logior mode (logand (/ mode 4) 73)))
                (message (concat "Wrote " name " (+x)"))))))))
(add-hook 'after-save-hook 'make-file-executable)

　以上、地味ながらも確実にEmacsの使い心地を向上させてくれる大事な保存関連の設定でした。

ubuntuのゴミ箱をコマンドラインから操作する

2008-10-07T14:05:00.001+09:00

ubuntuのデスクトップにあるゴミ箱。ファイルを削除しても一旦ゴミ箱に入るので、誤ってファイルを削除してもゴミ箱から復活できて安心ですよね。
　ですがコマンドラインからファイルを削除する場合は、rm コマンドを使い、そして削除されたら綺麗さっぱりこの世から消えてしまって二度とその失なわれたファイルは返ってきません。
　そこでコマンドラインからでもゴミ箱機能を使いたいっということで、 trash-cli の出番です。

　trash-cli はコマンドラインからゴミ箱を操作するスクリプトです。類似のコマンドと違い、独自のゴミ箱を設けるのではなく、KDEやGNOMEのゴミ箱と連動します。素晴しい。

インストール

　こちらからファイルを落してきます。落としたら展開し、展開したディレクトリに移動して、

sudo python setup.py install

とするだけでインストールされます。

使い方

使い方はとても簡単です。

ファイルを削除する

　削除されたファイルはゴミ箱に移動します。

trash ファイル名

ゴミ箱の中身を見る

list-trash

ゴミ箱からファイルを復活させる

restore-trash

　実行すると以下のよう選択画面が出ますので、復活させたいファイルの番号を入力するだけです。復活させたファイルはちゃんと元の場所に戻っていることに注目して下さい。

 0 2008-10-03 19:19:22 /home/foo/Desktop/po_dpkg-ja.po.org
 1 2008-10-06 15:02:23 /home/foo/Desktop/1222662276502.jpg
 2 2008-10-03 19:19:22 /home/foo/Desktop/po_dpkg-ja.po
 3 2008-10-07 13:13:49 /home/foo/trash-test
What file to restore [0..3]: 3

ゴミ箱を空にする

empty-trash

指定した日数以前のファイルをゴミ箱から削除する

empty-trash 日数

empty-trash に例えば 7 という数値を与えてあげると今日の日にちから7日以前のファイルをゴミ箱から削除します。

rm と置き換える

　trash コマンドは rm コマンドと置き換えてこそ真価を発揮すると言えるでしょう。　~/.bashrc に

alias rm='trash'

と記述し、

source ~/.bashrc

として即反映させます。以降 rm と打てば trash コマンドが実行されます。

＊なおubuntuの次のバージョンである intrepid からはリポジトリに用意されていますのでインストールがより簡単になるでしょう。

ubuntuでフォルダを暗号化する

2008-09-30T14:10:00.000+09:00

個人情報流出が叫ばれている昨今。自分の大事なデータは暗号化したディレクトリに置いて、少しでも情報保護に頑張りましょう〜ということで、ubuntuでも簡単に出来るディレクトリ単位での暗号化方法。
　個別にファイル一個ごとに暗号化するなら、gpg で事足りるわけですが、比較的多くのファイルを、例えば、メモファイルが入ったフォルダなんかやmailディレクトリを丸ごと暗号化して他人に見られられないようにしたいなんて場合はgpgだときついので今回は、encfs を使います。
　encfsはディレクトリ単位でディレクトリの中身を暗号化してくれます。フォルダ単位なので、事前にボリュームを作成して容量決め打ちになることもありません。暗号化はファイル単位で行われ、ファイルの中身と、ファイル名も暗号化してくれますので、ファイル名から中身を類推される心配もありません。
　ではさっそく使ってみましょう。

インストール

sudo apt-get install encfs cryptkeeper

マウントポイントを作る

　仮想マウントポイントを作ります。

mkdir ~/encfs-test

データディレクトリを作る

　暗号化されたファイルの実体を格納するディレクトリを作ります。

mkdir ~/encryptd

マウントする

　初回マウント時に自動的に暗号ディレクトリが作成・設定がされます。

encfs ~/encryptd ~/encfs-test

　~/encryptd が ~/encfs-test というディレクトリにマウントされます。アクセスは、この~/encfs-testに対して行ないます。
　初めてのマウント時は最初に手動で設定するかどうか聞かれます。何も入力せずにエンターキーを押して標準設定でいいでしょう。
　そして新規パスワードを聞かれますので入力します。確認のためにもう一度聞かれます。

新しい暗号化ボリュームを作成します。
Please choose from one of the following options:
enter "x" for expert configuration mode,
enter "p" for pre-configured paranoia mode,
anything else, or an empty line will select standard mode.
?>

Standard configuration selected.

設定が完了しました。以下のプロパティのファイルシステムが
作成されます:
ファイルシステム暗号アルゴリズム: "ssl/blowfish", バージョン 2:1:1
Filename encoding: "nameio/block", version 3:0:1
鍵サイズ: 160 ビット
Block Size: 512 bytes
Each file contains 8 byte header with unique IV data.
Filenames encoded using IV chaining mode.

Now you will need to enter a password for your filesystem.
You will need to remember this password, as there is absolutely no recovery mechanism.  However, the password can be changed later using encfsctl.

新しい Encfs パスワード:
Encfs パスワードの確認:

　これで暗号ディレクトリが作成されました。マウントされたディレクトリはマウントしたユーザ以外アクセス出来ません。

　試しに暗号ディレクトリになにかファイルを作ってみましょう。

echo "encfsのテスト" > ~/encfs-test/test.txt

　確認してみましょう。

ls -l ~/encfs-test/
-rw-r--r-- 1 foo foo 18 2008-09-20 21:37 test.txt

ls -l ~/encryptd/
-rw-r--r-- 1 foo foo 26 2008-09-20 21:37 oEnpZ00e7,5D-HStHHWlP2ld

ファイル名が暗号化され判らなくなっていますね。もちろん中身も暗号化されています。

アンマウントする

fusermount -u ~/encfs-test

　マウントが解除され暗号化されたデータの中身にはアクセス出来なくなります。

ステータスを確認する

　暗号フォルダの情報をチェックします。

~$ encfsctl ~/encryptd/

Version 5 configuration; created by EncFS 1.3.2 (revision 20040813)
ファイルシステム暗号アルゴリズム: "ssl/blowfish", バージョン 2:1:1
Filename encoding: "nameio/block", version 3:0:1
鍵サイズ: 160 ビット
Block Size: 512 bytes
Each file contains 8 byte header with unique IV data.
Filenames encoded using IV chaining mode.

GUIで操作する

　頻繁に行なうであろうマウント手続きをGUIから行ないます。
　cryptkeeper を使います。メインメニューのアプリケーション→システムツールの中にありますので実行するとパネルに鍵マークのアイコンが追加されます。
　右クリックで設定が。左クリックで暗号フォルダの追加、新規作成、マウント処理が出来ます。

　このような感じでencfsはubuntuを使っていく上で非常に簡単でシームレスな操作性を持った暗号化ファイルシステムだと思います。
　ああ、あとなるべく必要な時以外はマウントしないようにしましょう。マウントしているということは、金庫のドアを開けているのと同じことですからね。

ubuntuで動画のサムネイルを作る。

2008-09-04T01:20:00.001+09:00

ubuntuを使っていて、ふと、動画ファイルのサムネイルが生成されていないことに気づきました。前は生成されていたはず。
　とりあえず、~/.thumbnails をクリアして nautilus でリロードしてみるも、生成されず。
　いろいろ調べた結果、totem-xine を使えば、 .AVI や .WMV .divx などなどのサムネイルが作成されました。

以下手順メモ

sudo apt-get install totem-xine
cd
mv ~/.thumbnails{,.bak}
sudo update-alternatives --config totem
sudo update-alternatives --config gnome-video-thumbnailer

1行目。　totem-xine版をinstallます。
2行目。　~/に移動します。
3行目。　サムネールキャッシュを移動してクリアにしています。
4行目。　totemの標準設定を、totem-xineにします。
5行目。　gnome-video-thumbnailerの設定を/usr/bin/totem-xine-video-thumbnailerにします。
以上で、再度ノーチラスでリロードしてみると、見事に動画ファイルのサムネイルが作成されていきました。
　満足満足。

Amarok で音量をノーマライズする

2008-08-05T23:40:00.000+09:00

Amarok でてけとーに音楽を聴いていたら、突然音がおっきくなってびっくりしたので調整しようとしたらamarokの設定にノーマライズがなかった・・・
　調べてみると、replaygain というplugin で対応できそうということでインストールメモ。

replaygain 単体ではダメでさらにフォーマットごとにプラグインが必要みたい。
うちではmp3とaacフォーマットをよく聴くので、aacgain を入れます。

インストール

　Replaygain はリポジトリにないので、ここから落してきます。
　落したら、Amarok のツール→スクリプトマネージャーを起動し、スクリプトをインストールをクリックしてインストールします。
　インストしたら実行ボタンを押して実行状態にするのを忘れずに。

　次にaacgainを入れます。こっちが先でもいいかも。これもリポジトリにないので直接取得しに行きます。debパッケージがなく、rpmパッケージが置いてあったので、今回はrpmパッケージをdebパッケージに変換してくれる、alien を使います。

sudo aptget install alien
wget http://altosdesign.com/aacgain/aacgain-1.7-1.i586.rpm
sudo alien --to-deb aacgain-1.7-1.i586.rpm
sudo dpkg -i aacgain-1.7-1.i586.deb

実行してみる

上記作業を終えたら Amarok を再起動。しばらく放置していれば勝手にプレイリストの曲をスキャンしてノーマライズ作業を始めます。
　完了したら曲を再生すると、自動的に音量が調整されていきます。

　これでシャッフル再生とかでも突然大音量でびっくりとか防げますね。

ubuntuにxubuntuを入れる

2008-08-02T14:40:00.001+09:00

ubuntu、とっても素晴しいのですが、うちのPCだとメモリ512MBしかなく、マザーの制約でこれ以上増設も不可。この環境でJDを起動し、Firefox を起動して端末を一枚開くと、約200MBほどスワップアウトします。
　そこで、前々から気になっていた、 XFCE を使用した軽量で評判の xubuntu を試してみました。

インストール

　インストールは簡単です。今回はubuntuにxubuntuを入れるやり方でいきました。もっとも普通のやり方で簡単です。そしてgnome環境とxfce環境を自由に切り換えることができます。

sudo apt-get install xubuntu-desktop

これだけです。約234MBほどインストールされます。

起動

　ログイン画面でセッションでxfceを選択するだけでxfceで立ち上がります。

環境設定

入れた当初はフォントサイズが変だったので、

echo 'Xft.dpi: 96' >> ~/.config/xfce4/Xft.xrdb

としてXft.xrdbにフォント解像度を96dpiに指定してリログします。

　あとはgnomeとの違和感もなく使えました。

gnomeアプレットをxfceで使う。

xfceアプレットでCPUの温度を表示するものを探したんですけど、なくって困っていたら、gnomeのアプレットをそのまま使っちゃおうというツールがあることを知りました。

インストール

sudo apt-get install xfce4-xfapplet-plugin

インストールできたら、パネルの上で右クリック。アイテムの追加を選んで、Xfce アプレットを選択します。
詳しい方法はこちら

xfce にすることによってgnomeでは200MBスワップアウトが発生していたのが同条件でスワップアウトがほぼ0になりました。素晴しい。
じばらくはこのままで行ってみようかな。

HDDが吹っ飛んだ・・・

2008-07-18T13:36:00.003+09:00

いつものようにアップデートマネージャーを起動したらディスクIOが100%になったまま帰ってこない。
dbでも壊れたか？　と思ってdmesg みてみたらATAデバイスでエラーメッセージがいっぱい。
　んでま、結局いろいろいじってしまって（下手にfsckをかけてしまった）/etcいかが綺麗さっぱり消えてしまったorz
　fsck -cyf オプションでチェックしてみたら、バッドブロックが６１個もorz
　なんでかなー振動与えていないし、熱かなーうーん、心当たりがないだけに不良セクタ発生はショック。まー寿命かもしれない・・・

　んで、さらにアホなことに完全なバックアップ取ってなかったの＞＜
　ということですっぱり潔く再インストール。いくつかの/etc以下の設定ファイルはchangetrackで履歴管理していたのでセーフ。
　再インストールしてみてわかったのはubuntuのすばらしさ。windowsだとこうは簡単に環境復帰できない。ubuntuだとapt-get叩くだけでほぼすべてのアプリがインストールできて、設定ファイルもバックアップからコピーすればいい。これだけで元通りになる。これはすごいことだよね。

　とはいえちゃんとしたバックアップしていない私もアホなのだけれど。
うーんDarにしようかrsyncにしようか、changetrackを拡大して使うか。どうしよ。

Quick Lookup:

ubuntuで携帯用動画へ変換する

2008-07-11T21:00:00.000+09:00

ffmpeg を使って au 携帯向け動画を作ってみました。
とは言ってもubuntuのffmpegは特許などの関係で軒並コーデックが使えない状態でビルドされているので自前でビルドします。
　携帯用のついでにmp3やxvidなんかも使えるようにします。

事前準備

開発環境をあらかじめ入れておきます。

sudo apt-get install build-essential

8.04にあるx264ライブラリはエラーで使えないので自前で入れます。
x264をビルドするためにyasmが必要ですが、これもリポジトリにあるのは古く、エラーが出て使えないので自前で用意します。
amrnbがリポジトリにないので自前で用意します。
amrwbがリポジトリにないので自前で用意します。

　・・・はい、とっても面倒くさいです。たくさんのコーデックを、ライブラリを使う以上しょうがないのですが、ffmpegの自前ビルドなんて人に勧められるものじゃありませんね＞＜

アーカイブの扱いに関して

　通常は、tar zxvf hogehoge.tar.gz ですが、私は面倒くさいので、すべてのアーカイブの操作を統一的に操作出来る atool を使っています。いちいちアーカイブファイルごとにコマンドやオプションを憶えなくてもいいし、操作性も統一できるので便利です。

sudo apt-get install atool

でインストール出来ます。

yasmのインストール

wget http://www.tortall.net/projects/yasm/releases/yasm-0.7.1.tar.gz
aunpack yasm-0.7.1.tar.gz
cd yasm-0.7.1/
./configure
time make
sudo make install

x264のインストール

wget ftp://ftp.videolan.org/pub/videolan/x264/snapshots/x264-snapshot-20080709-2245.tar.bz2
aunpack x264-snapshot-20080709-2245.tar.bz2
cd x264-snapshot-20080709-2245/
./configure --enable-shared
time make
sudo make install

amrnbのインストール

wget http://ftp.penguin.cz/pub/users/utx/amr/amrnb-7.0.0.0.tar.bz2
aunpack amrnb-7.0.0.0.tar.bz2
cd amrnb-7.0.0.0/
./configure
make
sudo make install

amrwbのインストール

wget http://ftp.penguin.cz/pub/users/utx/amr/amrwb-7.0.0.2.tar.bz2
aunpack amrwb-7.0.0.2.tar.bz2
cd amrwb-7.0.0.2/
./configure
make
sudo make install

ffmpegのインストール

sudo apt-get build-dep ffmpeg
svn checkout svn://svn.mplayerhq.hu/ffmpeg/trunk ffmpeg
cd ffmpeg
./configure --enable-gpl --enable-pthreads --disable-debug --enable-shared --enable-libfaac --enable-libfaad --enable-libamr-nb --enable-libamr-wb --enable-nonfree --enable-libmp3lame --enable-libx264 --enable-libxvid --disable-ipv6
time make
sudo make install
sudo ldconfig

足りないライブラリはあらかじめ用意しておいて下さい。
configure のオプションは、./configure --help で見れますので、自分に合ったオプションを設定しましょう。
　必要なライブラリが揃い、コンフィグ設定も問題なければこれで無事ビルドできるはずです。

au用動画変換

ffmpeg -i 入力動画ファイル -vcodec mpeg4 -b 64k -s qcif -r 15 -acodec libamr_nb -ab 12200 -ar 8000 -ac 1 -flags bitexact 出力ファイル名.3gp2

の設定でau用動画ファイルに変換出来ました。携帯にコピーして無事観れました。
　一度パラメータが決まれば、あとは ~/.bashrc に

# au携帯用動画変換
function au {
 ffmpeg -i $1 -vcodec mpeg4 -b 64k -s qcif -r 15 -acodec libamr_nb -ab 12200 -ar 8000 -ac 1 -flags bitexact ${2}.3g2
}

などと書きこんで、

source ~/.bashrc

として設定を反映させて、

au 入力ファイル名出力ファイル名

とすれば簡単に動画が変換出来ちゃう。ん〜簡単。

Amarok で日本語入力を

2008-07-07T16:11:00.002+09:00

Amarok で日本語入力が出来なかった。Amarok使っていなかったので放りっぱなしだったのだけれど、気にしだすと気になって気になって・・・
ということで、

sudo apt-get install scim-bridge-client-qt scim-bridge-client-qt4
export QT_IM_MODULE="scim-bridge"

とすることでscimで日本語入力が出来ることを確認。環境変数QT_IM_MODULE="scim-bridge"は~/.bashrc にでも書いておけばいいのかな。

CheckGmail で 401 エラーが

2008-06-12T16:38:00.002+09:00

CheckGmail で 401 エラーが頻発するようになった。
Gmail側が仕様変えたのかしらん。
とりあえず、

svn co https://checkgmail.svn.sourceforge.net/svnroot/checkgmail checkgmail
cd checkgmail
sudo cp ./checkgmail /usr/bin/

として最新のcheckgmailを導入。
それでもたまに401が出るなあ・・・

ubuntuで暗号化ファイルシステム、TrueCryptを試してみた

2008-05-20T19:33:00.002+09:00

linux では暗号化ファイルシステムがけっこいいろいろあって、よりどりみどりです。
そのなかでも TrueCrypet は、

クロスプラットフォーム
WindowsでもlinuxでもMacでも使える。
隠し属性の暗号化ボリュームを作れる

といった特徴があり、特にWindowsとUSBメモリでデータのやり取りをしている人には打って付けでしょう。
　隠し属性については、暗号化したボリュームのなかに隠し属性の暗号ボリュームを潜ませることができます。そしてこの隠蔽した暗号ボリュームを検出することは不可能です。
　このことは、例えばこの記事、
米国税関が新制度を近くスタート、入国者が所持するPCのデータを丸ごとコピー
のように暗号化フォルダのパスワードを言わざるをえない場合でも、ダミーのほうを教えて、大事な隠し暗号化フォルダの存在には気づかれずに済むといったメリットがあります。

もちろんメリットばかりでなく、いろいろと使い勝手の悪い部分もあって、

linux版では日本語化されていない
Windows版では日本語ランゲージパックを入れれば、日本語化出来る
CUIで使うときは、optionの先頭に -t optionを付けないといけない
manドキュメントがなくなった
オープンソースだがライセンスが独自
現在のVer5だとlinuxで隠し属性のボリュームが作れない
Ability to create hidden volumes on Mac OS X and Linux

前書きはこんな感じで実際に使ってみます。

インストール

http://www.truecrypt.org/downloads.php から ubuntu 用のパッケージをダウンロードしてきます。落したら、

tar zxvf truecrypt-5.1a-ubuntu-x86.tar.gz
cd truecrypt-5.1a
sudo dpkg -i truecrypt_5.1a-0_i386.deb

としてインストールします。

使い方

　暗号化ボリュームは、ハードディスクのパーティション丸ごと一つでもいいし、ファイルでもかまいません。ファイルの場合はそのファイルが暗号化ボリュームとしてマウントします。
　ここではお試しに使ってみるので、foobar.tc というファイルを作って、~/crypt にマウントしてみます。

truecrypt -t -c

とすると、

Volume type:
1) Normal
2) Hidden
Select [1]:

ノーマルか隠し属性か聞いてきます。隠しは非対応なので、ノーマルを選択します。

Enter volume path:

ボリュームパスを聞いてきますので、foobar.tc と入れます。

Enter volume size (sizeK/size[M]/sizeG):

ボリュームサイズを聞いてくるので、適当に入れます。

Encryption algorithm:
1) AES
2) Serpent
3) Twofish
4) AES-Twofish
5) AES-Twofish-Serpent
6) Serpent-AES
7) Serpent-Twofish-AES
8) Twofish-Serpent
Select [1]:

暗号アルゴリズムを聞いてきます。デフォルトでいいでしょう。

Hash algorithm:
1) RIPEMD-160
2) SHA-512
3) Whirlpool
Select [1]:

ハッシュアルゴリズムを聞いてきます。おなじくデフォルトにします。

Filesystem:
1) FAT
2) None
Select [1]:

ファイルシステムを聞いてきます。あとからフォーマットすることもできます。ここもデフォルトで。

Enter password:

パスワードを聞いてきますので、なにか適当なパスワードを入力します。20文字以下だと警告してきます。

WARNING: Short passwords are easy to crack using brute force techniques!

We recommend choosing a password consisting of more than 20 characters. Are you sure you want to use a short password? (y=Yes/n=No) [No]:

まあ、テストなので20文字以下でもOKなのでYesと解答します。
再度確認のためにパスワードを聞いてきますので、入力します。

Enter keyfile path [none]:

鍵ファイルの場所を聞いてきます。使いませんのでそのまま空欄でエンター。

Please type at least 320 randomly chosen characters and then press Enter:

鍵を生成するためのランダムな文字列の入力を求められす。320文字も適当にキーボードをがちゃがちゃ叩きます。疲れます・・・

Done: 100.000% Speed: 7.7 MB/s Left: 0 s
The TrueCrypt volume has been successfully created.

無事暗号化ボリュームが作成されました。

マウントしてみる

~/crypt にマウントしてみます。

$ truecrypt -t foobar.tc ~/crypt
　　Enter password for /home/yama/foobar.tc:
　　Protect hidden volume? (y=Yes/n=No) [No]:
　　Enter system administrator password:

foobar.tc のパスワードは？隠し属性があるかどうか？ rootのパスワードは？など聞かれますので、順番に答えていけば無事マウントされます。

作成した暗号化ボリュームは、

~$ truecrypt -t -v -l foobar.tc
Slot: 1
Volume: /home/hoge/foobar.tc
Virtual Device: /dev/loop1
Mount Directory: /home/hoge/crypt
Size: 32.0 MB
Type: Normal
Read-Only: No
Hidden Volume Protected: No
Encryption Algorithm: AES
Key Size: 256 bits
Block Size: 128 bits
Mode of Operation: XTS
PKCS-5 PRF: HMAC-RIPEMD-160
PKCS-5 Iteration Count: 2000
Volume Created: 2008年05月20日 18時57分38秒
Header Last Modified: 2008年05月20日 18時57分38秒
Data Read since Mount: 191 KB
Data Written since Mount: 0 B

としてプロパティが閲覧できます。

アンマウント

truecrypt -t -d foobar.tc

としてアンマウントします。

GUIで使う

　Vre5 からlinuxでもGUIで使えるようになりました。たんに truecrypt を実行するだけで常駐で起動します。
　manページがなくなってしまったみたいで、代わりに、/usr/share/truecrypt/doc/TrueCrypt User Guide.pdf が入っています。いちいちPDFを見ろということですね。面倒くさいですね。
　当然PDFの中身は英語です。ですが、ランゲージパックの中にこのPDFを和訳したものが同梱されていますので、GUIで使いたい方は是非こちらを見ることをお勧めします。

参考

ubuntuでHDDの温度を計る。

2008-05-19T22:50:00.000+09:00

これから暑い季節を迎えるにあたり、ハードディスクの温度を測定してみます。

インストール

sudo apt-get install hddtemp

インストール時に

sguidをセットするか？(rootユーザ以外でも実行できるようにするか？)
syslog にログを残すか？
残すなら記録間隔を何秒にするか？
デーモンとして起動するか？

などを聞いてきます。聞いてこなくても後から、

sudo dpkg-reconfigure hddtemp

とすれば、いつでも再設定できます。

使ってみる

　さっそくHDDの温度を測ってみましょう。ただし古いHDDなどHDD自体にセンサーがないものは無理です。USB接続のHDDも無理でしょう。

$ hddtemp /dev/sd?

/dev/sda: HDS722512VLAT80: 44°C
/dev/sdb: ST380020A: 47°C
/dev/sdc: ST3120023A: 47°C

とでました。まあ、窒息ケースでリムーバブルケースに入れて、しかも4cmファンが壊れているので、温度が高いです・・・なんとかしようorz

GUIでも見られるように

　パネルの上で右クリックし、パネルの追加をクリックします。その中から、hardware sensor monitor を選択して追加ボタンを押せば、パネル上に追加されます。
　なければ、

sudo apt-get install sensors-applet

とすればインストールされます。

ubuntuのSSHに脆弱性

2008-05-14T14:37:00.002+09:00

Debianの過去のパッチによるバグの影響でDebian系、つまりubuntuにも重大な脆弱性が発見されました。
この脆弱性は、opensshによる鍵の生成で予測可能な鍵ペアが生成されてしまうというもので、辞書攻撃によって侵入されるリスクが大変大きいものとなっています。

さっそく

wget http://security.debian.org/project/extra/dowkd/dowkd.pl.gz
wget http://security.debian.org/project/extra/dowkd/dowkd.pl.gz.asc
gpg --keyserver subkeys.pgp.net --recv-keys 02D524BE
gpg --verify dowkd.pl.gz.asc
gunzip dowkd.pl.gz

としてチェックツールをダウンロードし、鍵の検査。

./dowkd.pl host localhost

及び、

./dowkd.pl user ユーザ名

として、weak key と表示されたら鍵を作り直しましょう。
その前にopenssh系パッケージのアップデートも忘れずに。

詳しくはURL参照。

20080515:追記:

その後のアップデートでopenssh-blacklistパッケージが追加されました。
脆弱な鍵は自動的に拒絶されるようになりました。出来る範囲で。
ssh-vulnkey コマンドが追加されました。
このコマンドで鍵の脆弱性を確かめることが出来ます。
sudo ssh-vulnkey -a
とすればすべての鍵を検査してくれます。
参照
http://www.debian.org/security/2008/dsa-1576

ubuntuでもNTFSの圧縮フォルダ機能を

2008-05-10T15:22:00.001+09:00

WindowsのNTFSはよく出来ていて、銀行のATMのHDDなんかもNTFSが使われたり、世界中で一番使われているファイルシステムなわけで信頼性が高かったりします。そのぶん読み書きがあまり速くなく、断片化もしやすいといた欠点もありますけどね。

　で、NTFSの便利な機能として、透過的に扱えるフォルダの圧縮機能があります。2chの過去ログを圧縮するなど用途によってはこの圧縮機能は便利なのですが、残念ながらubuntuの標準ファイルシステムである ext3 には圧縮機能がありません。
　まーいまどき500GBのHDDが七千円で買えちゃうんですから、ストレージ買えってことになっちゃうのかもしれませんが、でもねえ、4Gもの過去ログが半分のサイズになんかNTFSでなっているのをみると、ubuntuでもやりたくなるわけで・・・

ということで以下実験メモ。
残念ながらlinuxではあまり圧縮ファイルシステムは不毛なようです。ROMなど組み込み系で使用を前途にした読取専用ファイルシステムは結構あるんですけどねえ。
　色々調べた結果、こちらの記事を参考に FUSE を利用した LZOlayer ファイルシステムを試用してみることにしました。といってもやっていることはそのままなんですけどねw
LZOlayerFS の特徴はFUSE を利用したユーザランドで動く透過的な圧縮ファイルシステムです。圧縮アルゴリズムに lzo を採用し、高速な圧縮速度で通常のファイルシステムと違和感なく扱えます。
　lzo の圧縮速度についてはこちらのレポートが参考になります。

導入手順

LZOlayerFSをダウンロードし、ビルドします。あらかじめ開発環境と必要なライブラリを導入しておいて下さい。少なくてもfuse,zlib,lzo(liblzo2-dev) のライブラリが必要です。私の環境ではなぜか全部入っていましたw

wget http://north.one.pl/~kazik/pub/LZOlayer/LZOlayer_fs-20060306.tar.gz
tar zxvf LZOlayer_fs-20060306.tar.gz
cd LZOlayer_fs-20060306
make
sudo cp lzo_fs /usr/local/bin/

なのですが、そのままではエラーが出てコンパイルが通りませんので以下のように修正。


--- LZOlayer_fs.c.org
+++ LZOlayer_fs.c
@@ -7,13 +7,13 @@
   Use it at your OWN RISK
   Absolutely NO WARANTY
*/
+#define _LARGEFILE64_SOURCE
#define FUSE_USE_VERSION 22
#include <fuse.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <errno.h>
-#define __USE_LARGEFILE64
#include <fcntl.h>
#include <dirent.h>
#include <sys/types.h>
@@ -31,7 +31,7 @@
#define max_packets 2048
off_t block_size = 131072;
 #define __LZOlayer_DEBUG 0
-#define VERSION "20060202-2"
+#define VERSION "20060306"

static char *srcPath;
 static int zlibCompression = 0;

これで一応make通りました。出来た lzo_fs を~/bin なり /usr/local/bin なりにコピーしておいて下さい。

マウントしてみる

さっそく実験です。
まずはマウントポイントと、実際に圧縮されたファイルを格納するディレクトリを作成しておきます。

mkdir ~/lzo ~/lzo_compressed

さっそくマウント

lzo_fs ~/lzo_compressed ~/lzo -s

テスト

圧縮ディレクトリに2chのdatファイルを ~/lzo ディレクトリにコピーしてみます。datファイルのサイズは244Kバイト。

stat -c %s lzo/1208334590.dat
244031
stat -c %s lzo_compressed/1208334590.dat
112651

テキストファイルなので約半分に圧縮されてディスク上に格納されています。

アウンマウント

アウンマウントは、

fusermount -u ~/lzo

実際に使ってみて、普通に使えました。違和感なく。便利ですね。
ただ使用実績がないので信頼性は？ですけど。
大量のログファイルにHDDを占有されている人には一考の価値ありかも。

ubuntu 8.04 hardy アップデートメモ

2008-04-27T12:33:00.005+09:00

LTS版であるubuntu 8.04 がついにリリースされました。
本当はLTS版なのでクリーンインストールするつもりだったのですが、事情により7.10からアップデートしました。
で、ま、あいかわらずアップデートに失敗しましたorz いやま、6.06からアップデートしまくりの上に、サーバーいろいろ入れてさらにスクリプトもいろいろいじっているので、失敗して当然なのですけどねorz
　とりあえず、do-release-upgrade -d , apt-get install -f , dpkg-reconfigure -a などのコマンドを駆使してなんとかアップデート完了。げっそり。

以下個人的メモ

フォントがくっきりはっきりになった。
アプリの起動速度はあんまり変わらない。
firefox3が2と比べて早くなった気がしない。
使いたい拡張機能が使えなかたので、firefox3を削除してfirefox2に戻した。自動スクロール機能の挙動がおかしかったのも替える理由。
emacs23でIPAフォントが細くなった。VLゴシックに変更した。
システム管理の中にあったフォルダの共有がなくなっている。不便かも？
きびきび感は上った。かも。
これはプロセススケジューラがCFSに変ったせいかもしれない。
うちの鈍足PCではpreloadは効果ないので削除。7.10でも効果なかった。
ログイン画面がはみ出していた。xorg.confで仮想画面で大きい値になっていたのを修正した。
gnome-vfsからgvfsにgnomeの仮想ファイルシステムが変更になったせいで、Nautilusでfonts:///などが使えなくなった。
同じくNautilusでsmb://が表示されない。直接アドレスを指定すれば接続する。動いてないみたい。
smbclientでマウントして使っているから別にいいけど。

アップデートがきて解決。

アイコンテーマを変えてもフォルダのアイコンが変更されなくなった。
いやんな感じ。スーケーラブルな画像データじゃないと変更されないとか？
locate が、slocate から mlocate に変更になった。mlocate の方が軽量だ。
ntfs-3g がsetuidしてもマウント出来ない。sudo すればいいだけだけど・・・

2008/05/09追記:

　しばらくして気付いたのだけれども、ファイルアクセスが速くなっている。
　たとえばNautilusを開いたときの速度が速くなった。
　あとは du でディレクトリ容量を表示するのが一瞬になった。前はごりごりHDDランプが点滅していちいちディレクトリ以下を見に行ってた。

GVFS はGNOME-VFSに代って導入されたユーザーランドで動く、新しい仮想ファイルシステム。
以前の機能がまだ未対応な部分も多いが順次切り替わっていくでしょう。GVFSになるとユーザのホームディレクトリに .gvfs/ ディレクトリが作られ、マウントポイントになる。
試しにNautilusで適当にネットワークフォルダを見に行くと、自動的に ~/.gvfs/ 以下にマウントされている。

PuTTYでEmacsを256色で表示する。

2008-04-06T16:40:00.000+09:00

puttyでemacsを使っていると、８色表示しかできていない。これだとさすがに色分け表示がきついので２５６色表示を出来るようにしてみた。
以下導入メモ。

PuTTY側

terminfo で　xterm-256color を使う。
puttyは256色表示できるので、まず、puttyの設定を行う。
まず、
xterm 256色モードを使うことを許可する
にチェックを入れる。
次に、端末のタイプを表す文字列に、

xterm-256color

と指定する。

ubuntu側

xterm-256colorの設定を入れる。

sudo apt-get install ncurses-term

これで、emacs -nw として起動してcolor-themeなどから好きな色を選べばOK.

Ubuntuのpolipoでデイスクキャッシュサイズを制限する

2008-03-16T21:00:00.002+09:00

えー、なんか polipo が大人気なようで。紹介した身としてとてもうれしい。
でもなんかpolipo入れればネットが速くなる魔法のソフトのような理解をしている方もいるみたい。polipoはあくまでもproxyサーバーなので。そこのとこをひとつよろしくね。

さて、MacユーザやWindowsユーザの苦労を尻目に快適に動いている我等が ubuntu でのpolipoなのですが、先日ニコニコ動画を連続視聴していましたら、急にストリームが受信できなくなって、なんでかなーと調べたら、polipoのキャッシュを保存してあるHDDのパーティションの使用率が100％になっていました。(^_^;)
　いやあ、あせったあせった。
　polipo にはディスクキャッシュのサイズを指定する設定がないみたい。そんなわけでディスクキャッシュを切り詰める、polipo_trimcache というツールがあるので、さくっと落として利用。

インストール

wget http://ely.ath.cx/~piranha/software/polipo_trimcache/polipo_trimcache-0.2.py
sudo mv polipo_trimcache-0.2.py /usr/local/bin
cd /usr/local/bin
sudo ln -s polipo_trimcache-0.2.py polipo_trimcache

polipo_trimcache は/usr/local/bin に放り込みました。~/bin に入れてそこからリンクを貼ってもいいかもしれません。

使い方

sudo polipo_trimcache /var/cache/polipo 1000M

のように使います。上の例は、サイズを1Gに指定しています。

　それで、後は上のコマンドを定期的にシェルスクリプトで動かせばいいわけですが、今回のように動画連続視聴でキャッシュいっぱいとか、いつハードディスクが満杯になるかわかりません。
　いろいろ考えたんですが、 quota 使うとか、dfを10秒ごとに回して使用量をチェックするとか。

　んでまあ、ファイルのイベントを通知する inotify を利用することにしました。
　キャッシュディレクトリを監視し、新規にファイルが作られたら、HDDの空き容量をチェックして、指定した閾値以上になったら polipo_trimcache を実行します。
　事前に polipo_trimcache と inotify が必要なので入れておきます。

sudo apt-get install inotify-tools

入れたら以下のスクリプトを polipo-diskcache-check.sh として保存します。実行属性を付けてね。


#!/bin/sh
# last updated : 2008/03/19 02:44:25 JST
# $Id: polipo-diskcache-check.sh,v 1.2 2008/03/18 18:04:30 yama Exp $
# polipo のキャッシュのあるパーティションの使用率が指定した
# パーセントを越えるとキャッシュを指定したサイズまで削除する。
#

# 設定
# キャッシュのあるディレクトリを指定する。
CacheDir="/var/cache/polipo"
# キャッシュのあるパーティションの使用割合(パーセントで指定する)
LimitDiskSize=84
# 指定サイズまで切り詰める。
CacheSize="1200M"
# polipo_trimcach の指定。
polipo_trimcache='/usr/local/bin/polipo_trimcache'
#---------------------------------------------------

#echo "初期値は、" $LimitDiskSize "%です。"
while inotifywait -q -q -r -e create $CacheDir ; do
  AB=`df --sync /var | awk '/^\/dev/{sub(/\%/,"", $5);print $5}'`
  if [ $AB -gt $LimitDiskSize ]; then
      nice -n 15 $polipo_trimcache  $CacheDir $CacheSize &> /dev/null
  fi
done

　あとはこいつを実行すれば、キャッシュがHDDを圧迫しそうになったら自動的にお掃除してくれます。
　/etc/init.d/polipo を修正して同時に起動するようにしておくと楽でしょう。

2008/03/19 追記：

　具体的には、/etc/init.d/polipo の40行目あたり、


case "$1" in
  start)
    echo -n "Starting $DESC: "
        $PPCTL start

の下に

polipo-diskcache-check.sh &

と追記。
45行目あたり、


  stop)
    echo -n "Stopping $DESC: "
        $PPCTL stop

の下に

killall polipo-diskcache-check.sh inotifywait

を追記します。
　後は、

sudo /etc/init.d/polipo restart

としてpolipoを再起動し、

ps aux | grep polipo

と、psコマンドでちゃんと動いているか確認してみてください。

　いやあ便利べんり。ubuntu 最高。

Emacsから印刷する

2008-03-12T02:36:00.000+09:00

前回を踏まえてEmacsから印刷してみます。
~/.emacsに以下を追記します。

;;;====================================
;;;; print - 印刷設定
;;;====================================
;;; Postscript で印刷
(setq my-print-command-format "nkf -e | e2ps -a4 -p | lpr")
(defun my-print-region (begin end)
     (interactive "r")
     (shell-command-on-region begin end my-print-command-format))
(defun my-print-buffer ()
    (interactive)
    (my-print-region (point-min) (point-max)))

これだけ。

あとは、M-x my-print-buffer でカレントバッファがプリントアウトされます。印刷範囲を指定したい時は、範囲選択をしてから、 M-x my-print-region です。

ubuntuでコマンドラインから印刷する

2008-03-11T16:44:00.001+09:00

GUI環境がこれだけ整っている今に、わざわざCLI環境から印刷を積極的に行なう、少くともデスクトップユーザー的にはあまりない話なのですが、ちょっと気になったので調べてみました。

　まず、印刷は lpr コマンドを通して行なわれます。例えば、hoge.txt を印刷したいときは、

cat hoge.txt | lpr

などとするわけですね。
　それでまあ日本語の場合、lprに渡す前に postscript に変換して渡さないといけないんですが、この変換ツールがいろいろあり、なかなか大変でした。
　ちなみに以下のコマンドを試すにあたっていろいろいじった環境でテストしたので他の方でうまくいかないかもしれません。プリンタは、 cups-PDF を入れてPDFに出力されたものをadobeの acrobatreader で確認しました。また事前に、

sudo apt-get install gs-cjk-resource cmap-adobe-japan1

して、

sudo dpkg-reconfigure cmap-adobe-japan1

を実行し、全てにチェックを入れてあります。

試した変換コマンド

a2ps
a2psj
u2ps
paps
e2ps

　ざっと試してみただけでこれだけありました。
　まず、 a2ps ですが、定番です。がこいつは日本語には対応していません。少くても ubuntu では。機能は豊富なんですが。
　次に a2psj は perl で書かれたスクリプトですが、UTF-8には対応していません。euc-jpならOKで綺麗に印刷できましたが、枠線が出ます。
　u2ps は、GNOME のライブラリを用いるタイプで、こいつはとっても綺麗に変換してくれました。名前の通りUTF-8対応です。ですが機能が貧弱で余計な枠線が表示され、消す方法がわかりませんでした。
　paps は画像データとして変換してしまうので、ファイルサイズも大きくなり、またPDFで文字選択ができないなど、お話にもなりませんでした。
　最後に e2ps ですが、名前の通りeuc-jp対応の変換ツールですが、こいつはばっちりでした。そして機能も申し分なく、u2psのような余計な枠線も出ませんでした。

　いろいろ試した結果、どれも帯に短かし、襷に長しでした。u2psは唯一utf-8対応ですが、機能は貧弱すぎでしたし、a2psjは枠線出るし、a2psは日本語無理だし・・・

　最終的には、

nkf -e hoge.txt | e2ps | lpr

のような形になりました。
　これでコマンドラインから綺麗な日本語文書を印刷する環境が整いました。
　コマンドラインから印刷できると、自動でPDFファイルを生成し、メールで送信するとか、いろいろ自動処理するのに都合がいいので、お試しあれ。

Emacsからrubyのドキュメントを閲覧する

2008-03-04T21:47:00.000+09:00

疲れた。そもそもrubyのリファレンスをEmacsから見たいだけなのに、なぜにどうしてこうも苦労しないといけないのか。

とりあえず、いろいろごちゃごちゃやってしまったんだけど、忘れないようにメモ。

インストールメモ

手順１

ここから基本セット＋リファレンスを落とす。

wget http://i.loveruby.net/archive/refe/refe-0.8.0-withdoc.tar.gz
tar zxvf refe-0.8.0-withdoc.tar.gz
cd refe-0.8.0-withdoc/refe-0.8.0
ruby setup.rb config
ruby setup.rb setup
sudo ruby setup.rb install

これでrubyのリファレンスを閲覧するためのrefeとリファレンスがインストールされる。

手順２

次にEmacsで見るための rrse.el を入れる。
rrseはここから落としてくる。

wget http://www.kmc.gr.jp/~ohai/rrse/rrse-0.3.tar.gz
tar zxvf rrse-0.3.tar.gz
cd rrse-0.3
sudo cp rrse-* /usr/local/bin
cp rrse.el ~/.lisp

rrse-refe-listdescs, rrse-ri-listdescs, rrse-merga-tables, rrse-make-table は/usr/local/bin にコピー。rrse.el は~/.lisp に放り込む。
そしてデータベースを作成する。

rrse-make-table --refe

~/.rrse/ 以下にデータベースが作成される。

手順３

後は~/.emacsに以下を追記する。

;;;====================================
;;;; rrse - ruby マニュアル
;;;====================================
;;; ruby マニュアルReFeをEmacsから閲覧する。
(load "rrse")
(rrse-setup)

(add-hook 'ruby-mode-hook
          '(lambda ()
             (define-key ruby-mode-map [f1] 'rrse-help)))

これで準備完了。
後は、Emacsでなにか適当にrubyファイルを開いてruby-modeで、メソッドの上にカーソルを持っていけば、ミニバッファに簡単なリファレンスが表示される。
　詳しい情報は、その状態で、M-x rrse-help あるいは、F1 キーを押せば詳しいリファレンスが表示される。

globメソッドの上にカーソルを持っていくと、ちゃんとミニバッファに簡易な要約と、rrse-helpで詳しい情報が表示されている。

Firefoxの拡張を見直して、軽量化。

2008-02-28T17:00:00.001+09:00

長いことFirefoxを使ってきていて、ふと気がつくと、いつのまにか拡張機能が増えてきて、えらいもっさりしたFirefoxになっていた・・・
　これはいかんでしょうということで必要な拡張だけを残し、あとは削除してみた。

　最低限必要な機能は、

Tab Mix Plus
　タブ周りの使い勝手を劇的に改善してくれる。これがないとはじまらない。

AdBlockPlus
　広告を除去してくれる。これがないとFirefoxを使う意味がない。

All-in-one gesture
　マウスジェスチャを実現する。なくても問題ないが、あると便利。

NoScript
　javaScriptを原則禁止にしてくれる。信用できるサイトだけ許可すればいいので安心。

Save Image Folder
　あらかじめ指定したフォルダにコンテキストメニューから選択するだけで画像を振り分けられる。

ScrapBook
　紙にスクラップする感覚でWebを保存できる。メモがわりに便利。

テキストリンク
　リンクされていないurlもダブルクリックするだけでリンクのように扱える。

　がんばって削ってみた。Userchrome.cssをいじったりとかもFirefoxを重くするので使用はやめたほうがいい。Stylishもだ。ユーザ側でCSSをいじるのはすごい便利なのだけれども、重さにダイレクトに関わるので使うのをやめた。

　削った結果。かなり軽くなったのが体感できた。httpで取得したあとにhtmlをごにゃごにゃいじくる系を外したのが効いたようだ。
　Firefoxを使う最大のメリットは拡張機能にあると思うので、かなり悩みどころではある。
あとブックマークが肥大化すると、これまたFirefoxは重くなる。うちのブックマークだけで720KByteもあるよｗ　どうすべw

EmacsのWanderlustの設定をちょこっと修正

2008-02-20T14:22:00.000+09:00

前回のWanderlustの導入から操作にも慣れてきて、普段日常でも使えるようになってきました。
以前よりまめにメール出すようになったしねｗ

ということで少し設定をいじったのでメモ。

メールヘッダ

前回のは冗長すぎたので以下のように修正。
~/.wl に以下を追記。

;; summary-mode ですべての header を一旦除去
(setq wl-message-ignored-field-list '("."))
;; 表示するヘッダ。
(setq wl-message-visible-field-list
     '("Cc:" "^Subject:" "^From:" "^To:" "^Cc:" 
         "^X-Mailer:" "^X-Newsreader:" "^User-Agent:"
         "^X-Face:" "^X-Mail-Count:" "^X-ML-COUNT:"
       ))

全てのメールヘッダを表示するには、H キー。元に戻すにはもう一度 H キーか、「.」ピリオドを押す。生のメールヘッダを見たいときは、M キー。

WanderlustをEmacs標準のメーラーに

C-x m で新規メール作成画面になるのだけれども、これをWanderlustが立ち上がるように設定する。
~/.emacs に以下を追記。


;;;====================================
;;;; Wanderlust - メールソフト
;;;====================================
;;; wl の設定は~/.wl に。
;;; 標準のメーラーをWanderlustにする。
(autoload 'wl-user-agent-compose "wl-draft" nil t)
(if (boundp 'mail-user-agent)
   (setq mail-user-agent 'wl-user-agent))
(if (fboundp 'define-mail-user-agent)
   (define-mail-user-agent
     'wl-user-agent
     'wl-user-agent-compose
     'wl-draft-send
     'wl-draft-kill
     'mail-send-hook))

メール作成モード（ドラフトモード）の初期設定

~/.wl に以下を追記。

;;; メール編集モードフック。
(add-hook 'wl-draft-mode-hook
     '(lambda ()
        (setq paragraph-start '"^\\([ 　・○<\t\n\f]\\|(?[0-9a-zA-Z]+)\\)")
        (auto-fill-mode t)
        (set-fill-column 60)
        ))

シグネチャ（署名）挿入時のセパレータを削除する

~/.wl に以下を追記。

(setq signature-separator "")
(add-hook 'wl-mail-setup-hook
          (lambda ()
            (require 'signature)
            (local-set-key "\C-c\C-w" 'insert-signature)))

アドレス帳を暗号化する

EasyPG などのEmacsからgpgを透過的に扱うパッケージを入れてあれば簡単に出来ます。
~/.addresses ファイルをgpgを使って暗号化し、出来た ~/.addresses.gpg ファイルを ~/.wl に、

;;; アドレス帳の指定。EasyPGで透過的に扱える。
(setq wl-address-file "~/.addresses.gpg")

などとして指定するだけ。
あとはWanderlust起動時に自動的にパスフレーズを聞かれるので入力すればOK。

Ubuntuで polipo を使ってニコニコ動画を快適にキャッシュしよう

2008-02-17T17:12:00.004+09:00

ニコニコ動画や youtube やら Stage6 などでたくさんの動画を観ていると、すぐにウェブブラウザのキャッシュから溢れて、決っして少なくないサイズの動画データを再びダウンするはめになり、あまり快適とは言えません。
うちの環境ではfirefoxでキャッシュを500Mぐらいに取ってあるんですが、どうもフラッシュはうまくキャッシングされないようで、複数の動画を行ったりきたりしていると再度ダウンするはめになり、非常にストレスを感じていました。

windowsだとnicocacheなるニコニコ動画専用のキャッシュツールがあるみたいでうらやましく思っていたり、かといって本格的な squid を立ち上げるのもなあ、と思いながら放置してたんですが、個人使用に特化したパーソナルなproxyサーバー、 polipo というのを知りました。

polipo はなんでも個人向けに特化したproxyサーバーらしく、特徴は、

小型で軽快
HTTP1.0のアクセスをHTTP1.1に変えてくれる
個人で使用することを考えられている
設定項目が豊富

とのことで、さっそく導入してみました。

インストール

sudo apt-get install polipo

これだけです。インストールされると自動的にデーモンとして動きはじめます。

設定

polioの設定・動作確認
polioの各種設定やステータスを確認したい場合は、http://localhost:8123 にウェブブラウザからアクセスすればＯＫです。とりあえず、特に設定することはないでしょう。
ブラウザでの設定
Firefoxでの説明をします。メニューの編集→設定で、詳細をクリックし、ネットワークタブを選択します。その中の接続設定をクリックし、手動でプロキシを設定するにチェックを入れて、HTTPプロキシに、localhost、右のポートに、8123を設定します。
すべてのプロトコルでこのプロキシを使用する、はお好みで。
後は検証のためFirefoxのキャッシュを12MBぐらいに縮小して念のためFirefoxを再起動。

さっそく大きめの動画データを複数視聴。きちんとキャッシュされていて超快適ｗ　さらにFirefoxのキャッシュを12MBとしたことでFirefox自体の動作も軽くなりました。ん〜素晴しい。
ちなみにキャッシュ置き場はデフォルトでは、/var/cache/polipo/ になっているので、占有サイズを知りたければ、

sudo du -sh /var/cache/polipo/

とすれば分かります。
みなさんも快適なウェブブラウズ環境を構築して楽しんでください。

2008/02/18:追記：

　nicocacheはjavaで書かれているようで、linuxでも動きそうですね。でもproxyはやっぱりネイティブで動き、メモリ消費の少ないpolipoの方がいいですね。
　さらにLAN内のPCもpolipoを見るように設定しました。実際かなりレスポンスがよくなり、もっと早くにporoxy鯖立てておけばよかったと思います。
というかFfirefoxのキャッシュ、バカですよね。

2008/02/28:追記：

　polipo をLAN内で公開する場合は、/etc/polipo/config 内の、

# 公開するpolipoのIPアドレス。
proxyAddress = "0.0.0.0"
# 接続許可するIPアドレス。
allowedClients = 127.0.0.1, 192.168.0.22

あたりを有効にします。IPアドレス固定で運用しているなら、proxyAddress = を決め打ちでいいでしょう。

EmacsでGmailを

2008-02-07T18:58:00.000+09:00

EmacsでGmailを扱えるようがんばってみた。
メーラーは Wanderlust で IMAP4 を使います。

インストール

sudo apt-get install bl-beta starttls gnutls-bin

設定

~/.wl にWanderlustの設定を書きます。
~/.folders にフォルダ設定を書きます。

私がとりあえず設定してみた~/.wl の中身。


;;; -*- mode: emacs-lisp; Coding: iso-2022-7bit -*-
;;; last updated : 2008/02/08 15:00:23 JST
;;;
;;;  Wanderlust 設定ファイル

;;; 一般的なメーラの操作とGmailでの扱われ方の対応表
;;; https://mail.google.com/support/bin/answer.py?answer=77657

;; IMAP サーバの設定
(setq elmo-imap4-default-server "imap.gmail.com")
(setq elmo-imap4-default-user "ふがふがほげげ@gmail.com") ; メールアドレス
(setq elmo-imap4-default-authenticate-type 'clear)
(setq elmo-imap4-default-port '993)
(setq elmo-imap4-default-stream-type 'ssl)
(setq elmo-imap4-use-modified-utf7 t) ; 日本語フォルダ対策

;; SMTP サーバの設定
(setq wl-smtp-connection-type 'starttls)
(setq wl-smtp-posting-port 587)
(setq wl-smtp-authenticate-type "plain")
(setq wl-smtp-posting-user "ふんがぁ") ; 適宜修正
(setq wl-smtp-posting-server "smtp.gmail.com")
(setq wl-local-domain "gmail.com")

;; 一意なmessage-ID 動的IPアドレスの場合に設定。何か適当な文字列を。例えばメールアドレスとか。
(setq wl-from "もげ <もげっとぎゃおす@gmail.com>")


;;;------------------------------------------
;;; その他の設定
;; デフォルトのフォルダ
(setq wl-default-folder "%inbox")
;; フォルダ名補完時に使用するデフォルトのスペック
(setq wl-default-spec "%")
(setq wl-draft-folder "%[Gmail]/Drafts") ; Gmail IMAPの仕様に合わせて
(setq wl-trash-folder "%[Gmail]/Trash")
;; 下書きディレクトリをローカルに設定する.
(setq wl-draft-folder "+Drafts")
(setq wl-folder-check-async t) ; 非同期でチェックするように
;; 大きなメッセージを分割して送信しない(デフォルトはtで分割する)
(setq mime-edit-split-message nil)
;; 起動時からオフラインにする
;; (setq wl-plugged nil)
;; サマリモードで日時を英語表示
;; (setq wl-summary-weekday-name-lang 'en)
;; HTMLファイルは表示しない。
(setq mime-setup-enable-inline-html nil)
;; メールを書くときは見出し画面を残して、フル画面にする
(setq wl-draft-reply-buffer-style 'keep)
;; 送信済みIMAPフォルダは送信と同時に既読にする
(setq wl-fcc-force-as-read t)
;; 最初からスレッドを開いておかない
(setq wl-thread-insert-opened nil)
;; スレッドを分割するしきい値(デフォルト：30)
(setq wl-summary-max-thread-depth 30)
;; 警告無しに開けるメールサイズの最大値(デフォルト：30K)
(setq elmo-message-fetch-threshold 500000)
;; プリフェッチ時に確認を求めるメールサイズの最大値(デフォルト：30K)
(setq wl-prefetch-threshold 500000)

;;;------------------------------------------
(setq wl-dispose-folder-alist
      (cons '("^%inbox" . remove) wl-dispose-folder-alist))


;;;------------------------------------------
;;; from,to のデコード指定。
(mime-set-field-decoder
 'From nil 'eword-decode-and-unfold-unstructured-field-body)
(mime-set-field-decoder
 'To nil 'eword-decode-and-unfold-unstructured-field-body)

;;;------------------------------------------
;; summary-mode ですべての header を一旦除去
(setq mime-view-ignored-field-list '("^.*"))

;; 表示するヘッダ。
(setq wl-message-visible-field-list
      (append mime-view-visible-field-list
        '("^Subject:" "^From:" "^To:" "^Cc:" 
          "^X-Mailer:" "^X-Newsreader:" "^User-Agent:"
          "^X-Face:" "^X-Mail-Count:" "^X-ML-COUNT:"
          )))

;; 隠すメールヘッダを指定。
(setq wl-message-ignored-field-list
      (append mime-view-ignored-field-list
      '(".*Received:" ".*Path:" ".*Id:" "^References:"
        "^Replied:" "^Errors-To:"
        "^Lines:" "^Sender:" ".*Host:" "^Xref:"
        "^Content-Type:" "^Content-Transfer-Encoding:"
        "^Precedence:"
        "^Status:" "^X-VM-.*:"
        "^X-Info:" "^X-PGP" "^X-Face-Version:"
        "^X-UIDL:" "^X-Dispatcher:"
        "^MIME-Version:" "^X-ML" "^Message-I.:"
        "^Delivered-To:" "^Mailing-List:"
        "^ML-Name:" "^Reply-To:" "Date:"
        "^X-Loop" "^X-List-Help:"
        "^X-Trace:" "^X-Complaints-To:"
        "^Received-SPF:" "^Message-ID:"
        "^MIME-Version:" "^Content-Transfer-Encoding:"
        "^Authentication-Results:"
        "^X-Priority:" "^X-MSMail-Priority:"
        "^X-Mailer:" "^X-MimeOLE:"
        )))


;;;---------------------------------------------------
;; ファイル名が日本語の添付ファイルをデコードする [semi-gnus-ja: 4332]
(eval-after-load "mime"
'(defadvice mime-entity-filename
(after eword-decode-for-broken-MUA activate)
"Decode eworded file name for *BROKEN* MUA."
(when (stringp ad-return-value)
(setq ad-return-value (eword-decode-string ad-return-value t)))))

;; ファイル名が日本語の添付ファイルをエンコードする [semi-gnus-ja: 6046]
(eval-after-load "std11"
  '(defadvice std11-wrap-as-quoted-string (before encode-string activate)
     "Encode a string."
     (require 'eword-encode)
     (ad-set-arg 0 (or (eword-encode-string (ad-get-arg 0)) "" )) ))


;; 添付ファイルがある場合は「@」を表示
(setq elmo-msgdb-extra-fields
(cons "content-type" elmo-msgdb-extra-fields))
(setq wl-summary-line-format-spec-alist
(append wl-summary-line-format-spec-alist
'((?@ (wl-summary-line-attached)))))
(setq wl-summary-line-format "%n%T%P%1@%M/%D(%W)%h:%m %t%[%17(%c %f%) %] %s")

修正する場所は、


(setq elmo-imap4-default-user "もきゅもきゅ@gmail.com") ; メールアドレス
(setq wl-smtp-posting-user "もきゅもきゅ") ; 適宜修正してください
(setq wl-from "もきゅ <もきゅもきゅ@gmail.com>")

ぐらいで、あとはそのままで動作するでしょう。

~/.folders はこんな感じで。まだよくわかってない。


# -*- mode: conf-unix ; Coding: iso-2022-7bit -*-
#
%inbox "受信トレイ"
+Drafts "下書き"
%/

使い方

起動は M-x wl でフォルダ一覧が出ます。
見たいフォルダの上でRETでメール一覧（サマリモード）が開きます。Pで前のメールに、Nで次のメールに移動。RET でメールの内容が表示されます。

　新規にメールを書くときは、W
　返信するときは、a
　引用して返信は、A

　メールを編集（ドラフトモード）しているときは、C-c C-c で送信。C-c C-z でセーブして編集を中断。

一応これで動いています。まだWanderlustの使い方がよく判ってないのでいろいろとあれですが、受信、返信、新規メール送信ぐらいは覚えましたｗ

使ってみてFirefox上でGMail扱うよりも軽快に動くし、Emacsで編集していたものを、そのままメールで送信とか便利です。

20080209追記：

Gmailの容量が6.4GBになってました・・・なんかもう凄いですね。
C-x m を wl-draft に割り当てましたので、Emacsで編集している文章を片っ端からWanderlustでGmailにメールしちゃいそうです＞＜

ubuntuでマウスジェスチャーを使う

2008-02-05T19:58:00.000+09:00

Firefoxなどのブラウザでマウスジェスチャーを利用している人は多いですが、ブラウザ以外でもマウスジェスチャが利用出来れば確かに便利だよねと、この記事を見て試しにubuntuにも入れてみました。
入れるのは、Gestikk ですが、ubuntuのリポジトリにはパッケージがないのですが、本家でubuntu用パッケージを配布してくれているので、それを入れることにします。

インストール

sudo apt-get install python-wxgtk2.8 libwxbase2.8-0 libwxgtk2.8-0
wget http://projects.reichbier.de/gestikk/downloads/gestikk-0.4-debs.tar.gz
tar zxvf gestikk-0.4-debs.tar.gz
sudo dpkg -i gestikk_0.4.1-0ubuntu4_all.deb

これで無事インストールが出来、立ち上がることを確認しました。

私自身は使わないので、ここまでに(^_^;)

Emacsでmp3を聴く

2008-02-04T19:25:00.000+09:00

作業中に音楽を聴くのに Amarok は邪魔だし重いし、Audacious もなあ、ということでEmacsで音楽を聴けるようにしてみました。
CLIで動作するmpg123とそれのフロントエンドのmpg123.elを使います。
が、ubuntuのリポジトリにあるmpg123はVer0.66なので古く、id3v2を解釈できないので、本家からソースを取ってきて自分でビルドしました。ついでにmpg123.elも本家から拾ってきました。

以下作業メモ

mpg123を取得したら展開してビルドしてインスト。

tar jxvf mpg123-1.2.0.tar.bz2
cd mpg123-1.2.0/
./configure
make
sudo make install
sudo ldconfig

端末から mpg123 hogehoge.mp3 などとして動作することを確認。ちゃんと日本語のid3v2タグも文字化けせずに表示された。
次に、音量を調節するのに必要なaumixを入れて、

sudo apt-get install aumix

mpg123.el を~/.lisp/ に放り込んで、~/.emacsに以下を追記する。

(autoload 'mpg123 "mpg123" "A Front-end to mpg123/ogg123" t)
(setq mpg123-lazy-check "\\.mp3$")
(setq mpg123-file-name-coding-system 'utf-8)
(setq mpg123-process-coding-system "utf-8")

これで無事文字化けせずに動作することを確認。ただid3v2の文字コードによってはうまくいかないことも。う〜ん。