小粋空間  -  a cheap joke and a play on words site

ShrinkFInfo Plugin で fileinfo.db サイズを表示する

2004.12.11 追記
本アイデアが盛り込まれた ShrinkFInfo Plugin 0.04 が公開されましたのでそちらを参照ください。

Movable Type を BerkeleyDB で利用する場合、再構築を繰り返す毎に db/fileinfo.db が肥大化する（その結果、再構築時間に影響が出ます）という問題があり、現在 fileinfo.db のサイズを縮小する ShrinkFInfo Plugin を利用させて頂いてます。
これは管理メニューに表示される "ShrinkFInfo Plugin, v?" のリンクをクリックすればサイズ縮小スクリプトが実行されるという仕組みになっていますが、クリック契機を簡単に知りたいと思い、画像のように fileinfo.db のサイズを表示するようにしてみました。Plugin 作成者のOgawa::Memorandaさんより快諾頂けましたので変更箇所をお知らせ致します。
ShrinkFInfo 配下の plugin.pl に青色部分を追加します。

use strict;
 
my $size;
$main::size = (-s '/path/db/fileinfo.db')/1000;
 
if (MT->can('add_plugin')) {
    require MT::Plugin;
    my $plugin = new MT::Plugin();
    $plugin->name("ShrinkFInfo Plugin, v.0.03");
    $plugin->description("Shrink enlarged db/fileinfo.db. Current size: $main::size Kbyte");
    $plugin->doc_link("http://as-is.net/hacks/2004/11/mt_shrinkfinfo.html");
    $plugin->config_link("mt-shrinkfinfo.cgi");
    MT->add_plugin($plugin);
}

path の部分は db/fileinfo.db までのフルパスを適宜記述してください。
小数点以下を四捨五入して表示しない場合は下記のようにしてください。

$main::size = int(((-s '/path/db/fileinfo.db')/1000) + 0.5);

2004.12.10 追記
スクリプトを byte 表示から Kbyte 表示に修正しました。

2004.12.11 追記
小数点以下を四捨五入して表示しないパターンも追加しました（たびたびすいません…）。