blosxomについての個人的備忘録

[3.0] 記事を編集しても日付が変わらないようにするプラグイン。　timestamp.pm

要はentries_indexプラグインと全く一緒なんだけど、日付のエディット機能がついてます。

Blosxom3.0設置場に設置したので興味のある人は動作を見てやって下さい。

右側のメニューその２のところの「記事の日付を変更する 」ってのをポチッと押すと日付編集モードに変わります

インストール

{handlers.flow}
 
Blosxom::find_entries
Blosxom::timestamp::run
Blosxom::sort_entries

編集途中でエンター押してしまった．．． 弁明ついでにもう１つ何か書きます。

Blosxom3.0+3iでは「handlers.flow」に書いたフローが読み込まれないという現象が起こっているようです。
しょうがないので私はメインのcgiを↓のように書いて使ってます。

#!/usr/bin/perl
    
use Blosxom;
    
    
my $blosxom = new Blosxom;
    
my $basedir = File::Spec->rel2abs('.');
$basedir =~ s!\\!/!g;  # 「Windowsでも動け！」というおまじない
    
my $settings = {
    basedir             => $basedir,
    find_entries_dir    => "$basedir/data",
    plugin_dir          => "$basedir/plugins",
    state_dir           => "$basedir/state",
    settings_subdir     => '.settings',
    templates_subdir    => '.templates',
    default_flavour     => 'html',
};
    
$blosxom->settings($settings);
    
    
# メインフロー前半 ベタ打ちです。
$blosxom->get_plugins();
Blosxom::xrea::parse_request($blosxom);  # xrea対策プラグイン
$blosxom->find_settings_and_handlers();
$blosxom->handle_settings();
$blosxom->handle_handlers();
    
$blosxom->run_flow();

メインフローの前半（settingsとhandersの読み込みまで）をベタ打ちして、後半部分は「handlers.flow」に書いてます。
あとsettingsの中には、ファイルに書いてもしょうがないものがあるので
そういうものはメインcgiに、それ以外はsettingsに、という感じで分けて使ってます。

「正式版リリースされるまで待ってろよ」という声が聞こえてきそうなので寝ます。泣

カテゴリがその他だと寂しいので「お知らせ」のとこに書くことにしました。どうでもいいか

categoriesプラグインの3.0ラッパーを作りました。

ソースはこんな感じ categories.pm

pluginsフォルダに2.0のcategoriesプラグインと一緒に保存して
メインフローの「find_entries」と「sort_entries」の間に「categories::start」を入れると動作します。
それ以外の仕様は本家と全く一緒（のハズ．．）

本家のcategoriesファイルに手を加えずに実現できたので少し嬉しい。
この調子で既存のプラグインのラッパーを作り続けていれば、いつか汎用的なものに辿り着くかもしれない。ワクワク。

blosxom3.0設置場で元気に動いてます。

今日たまたまxreaを覗くいてみたらPC用サイトの受付やってたので借りて設置しました。

http://blosxom3.s60.xrea.com

例によって設置しただけでは動きませんでした。
何だかよくわかんないんだけどxreaさんﾄｺはperlで

use CGI;
    
my $cgi = new CGI;
    
$cgi->path_info();

ってやると、URLの***.cgi以降のパスが２回繰り返されて返ってくるみたい。（オレだけ？）

つまり「http://oreore.oredayo.com/Blosxom.cgi/unko/morimori/index.html」というURLでアクセスするとほんとは「/unko/morimori/index.html」が返ってきて欲しいんだけど「/unko/morimori/index.html/unko/morimori/index.html」と二回繰り返されたものが返ってくるようで、これがpath_info変数に影響を与えていました。

原因が判明したので、今回もプラグインで修正。
「繰り返しっぽい文字列だったら真っ二つに切り裂く。」という処理を加えました。 これ→xrea.pm
「Blosxom::xrea」パッケージで「xrea.pm」プラグインを作成。こいつをpluginsフォルダにあげて、index.cgiの中でメインフローが並んでいる箇所を書き換えます。

#   ↓修正する前の行だよ
#   'Blosxom::parse_request',
    'Blosxom::xrea::parse_request',

これで記事が表示されました。めでたしめでたし。

★環境

WindowsXP + Apache2.0.49 + ActivePerl5.6.1
Blosxom.pmと同じフォルダにindex.cgiというファイルを作成してそこから呼び出している

★記事がいっぱいあるはずなのに何故か１つしか表示されない。

+3iをダウンロードして解凍するとdataディレクトリに何個かの記事があります。
ホントならこれらが全部表示されるハズなのに一個しか表示されない。

Blosxom::render_entryルーチンの中で記事ファイルのinode情報を取得して記事が重複しないようにしている部分があります。
windowsではinode情報なんて取得できないので全て同じファイル扱いとなってしまい、記事がいくつあっても１件しか表示されないみたいです。
render_entryルーチンを書き換えればいいんだけど、なるべく本体には触らないようにしたいのでプラグイン的に修正することに。
Blosxom::Windowsという勝手なパッケージ名で、inodeチェックをハズしたrender_entryルーチンを作ります。
それをwindows.pmというファイル名でpluginsフォルダに保存

package Blosxom::Windows;
    
sub render_entry {    
    my $self = shift;    
    
#    $self->{rendered}->{ $self->{state}->{current_entry}->{inode} }     
#        and $self->{state}->{stop}->{handlers}->{entry}++, return 0;    
    
    my $template = $self->get_template('entry');    
    
    $self->{entries}->{ $self->{state}->{current_entry}->{id} }->{rendered} =    
        $self->interpolate($template);    
    
    $self->{rendered}->{ $self->{state}->{current_entry}->{inode} }++;    
        
    push @{$self->{response}->{entries}},             
        $self->{state}->{current_entry}->{id};    
            
    1;            
}    
    
1

あとはdata/.settingsフォルダのhandlers.entryの中を
Blosxom::render_entry
　↓
Blosxom::Windows::render_entry
と修正。アレ？「Blosxom::render_entry」の行がコメントアウトされてる。何だコリャ？まぁいいか。
コメントを外して上記の通り修正。おお、いっぱい出てきた。

★permanent linkのURLを開いても記事が表示されない。

Blosxom::filter_entry_by_pathルーチンが邪魔をしていました。
permanent linkのURLで開こうとすると、パスの部分に一致する記事ファイルだけを表示させるためにフィルターがかかるのだけれど
URLのパスは「/folder/work」で、記事ファイルは「\\folder\\work」なのでいつまでたっても一致する記事が発見できません。

例によってBlosxom::Windows::filter_entry_by_pathルーチンを作ります。
↑で書いたWindows.pmファイルの中に追加して書きました。

sub filter_entry_by_path {
    my $self = shift;
    # \\ を / に置換してから比較するように変えた
    my $tmp = File::Spec->catfile($self->{state}->{current_entry}->{path},
                $self->{state}->{current_entry}->{fn}).
                 '.' . $self->{request}->{flavour};
    $tmp =~ s!\\!/!g;
    unless (
        $self->{state}->{current_entry}->{path} =~ /^$self->{request}->{path_info}/ 
        or $self->{request}->{path_info} eq $tmp) {
            $self->{state}->{stop}->{handlers}->{entry}++, return 0;
    }
    
    1;
}

上と同様にhandlers.entryの中を今作ったルーチンに置き換え。
Blosxom::filter_entry_by_path
　↓
Blosxom::Windows::filter_entry_by_path

よく似た名前でBlosxom::filter_entry_by_dateというのがあるので間違えないように。
なんとか記事が表示されました。ﾜｯｼｮｲ