Big Sky

最近Plaggerにハマってるからって、やる事メチャメチャやな...

Plaggerのフィードをvimの「--remote-send」を使って転送するPlaggerプラグインを作りました。
vimには、リモートサーバと言う機能があり以下のオプション/コマンドで別に起動しているvimへコマンド/式/ファイルを送信する事が出来ます。

--remote [+{cmd}] {file} ...

別のサーバへファイルを送信します。
+{cmd}により開く際にコマンドを併用出来ます。

--remote-silent [+{cmd}] {file} ...

--remote と同等ですが、エラー等が発生してもメッセージ出力されません。

--remote-wait [+{cmd}] {file} ...

--remote と同等ですが、送信したvimが終了するまで待機します。
vimで編集した結果をどこかに送るシェルスクリプト等では使えるかもしれません。

--remote-wait-silent [+{cmd}] {file} ...

--remote-wait と同等ですが、エラー等が発生してもメッセージ出力されません。

--remote-tab [+{cmd}] {file} ...

--remote と似ていますが、指定されたファイルを全て別タブで開きます。

--remote-tab-silent [+{cmd}] {file} ...

--remote-tab と同等ですが、エラー等が発生してもメッセージ出力されません。

--remote-tab-wait [+{cmd}] {file} ...

--remote-tab と同等ですが、送信したvimが終了するまで待機します。

--remote-tab-wait-silent [+{cmd}] {file} ...

--remote-tab-wait と同等ですが、エラー等が発生してもメッセージ出力されません。

--servername {name}

リモートサーバを名称で指定します。リモートサーバ一覧を取得するには --serverlist を使用します。

--remote-send {keys}

リモートサーバにキーを送ります。基本的にnormalコマンドで与える引数と同等です。

--remote-expr {expr}

リモートサーバに式を送り、その結果を出力します。

--serverlist

リモートサーバ一覧を出力します。

その他、スクリプトから使える
remote_expr({server}, {string} [, {idvar}])

{server}に対して{string}という式を評価して貰います。
:echo remote_expr("gvim", "2+2") と書くと4が表示されます。

remote_foreground({server})

{server}をフォアグラウンドにします。 remote_expr({server}, "foreground()") と同等の機能ですね。

等がありますので、vimを起動しなくても色々な事が出来ます。

今日は、はてなブックマークから「vim」タグが付いているエントリをvimに転送するPlaggerプラグインを作りました。
確認はWindowsでしかしてませんが、X Windowが動いている環境や、Mac OS X等でも動くかと思います。
※あと、フィードタイトルにエスケープ文字や「<ESC>」等といったvimのキー識別ぽい物があると動かない可能性があります。


package Plagger::Plugin::Publish::Vim;

use strict;

use base qw( Plagger::Plugin );



our $VERSION = '0.01';



use Encode;



sub register {

    my($self, $context) = @_;

    $context->register_hook(

        $self,

        'plugin.init' => \&initialize,

        'publish.entry' => \&add_entry,

    );

}



sub initialize {

    my($self,$context) = @_;



    $self->{vim} = $self->conf->{vim};

    $self->{vim} = "vim" if (!$self->{vim});

    $self->{server} = $self->conf->{server};

    if (!$self->{server}) {

        open(IN, "vim --serverlist|");

        $self->{server} = <IN>;

        close(IN);

        chomp $self->{server};

    }

    open(IN, sprintf("%s --servername %s --remote-expr \"&encoding\"|",

        $self->{vim}, $self->{server}));

    $self->{encoding} = <IN>;

    print $self->{encoding}."\n";

    close(IN);

    my $command = sprintf("%s --servername %s --remote-send \"<C-\\\><C-N>:new<CR>i\"",

        $self->{vim}, $self->{server});

    system($command);

}



sub add_entry {

    my($self, $context, $args) = @_;



    $context->log(info => $self->{server});

    my $command = sprintf("%s --servername %s --remote-send \"%s\n\t%s\n<C-W>\"",

        $self->{vim}, $self->{server},

        encode($self->{encoding} || 'utf8', $args->{entry}->{title}),

        encode($self->{encoding} || 'utf8', $args->{entry}->{link}),

    );

    system($command);

}



1;

で、YAMLはこんな感じ


global:

  assets_path: /home/user/plagger/assets

  timezone: Asia/Tokyo

  log:

    level: info



plugins:

  - module: Subscription::Config

    config:

      feed:

        - http://b.hatena.ne.jp/t/vim?mode=rss



  - module: Filter::BreakEntriesToFeeds

    config:

      use_entry_title: 1



  - module: Publish::Vim

    config:

      #vim: vim7

      #server: GVIM1

実行結果は

またくだらんもん作ってしもた...

vimを使っていて開いているバッファ全てからあるキーワードを検索したい場合、「vimgrep」コマンドを使っています。開いているファイルの拡張子を指定して


:vimgrep /sometext/ *.c *.h

と実行したり、実際開いているファイル名を羅列したりする事があります。検索結果の一覧もクイックフィックス「clist」で確認出来ます。
でもこれだと保存していないと結果に現れませんし、幾ら拡張子で絞っても余計なファイルがマッチしてしまう可能性があります。

今日のtipsはvim-dev MLに流れたスレッドからご紹介

「vimgrep」を実行するとクイックフィックスが作成されますが、このクイックフィックスに検索結果を追加する「vimgrepadd」というコマンドがあります。
これを全てのバッファに対して実行するように「bufdo」コマンドを絡めます。