Twitterのタイムラインについつい気を取られたりTweetしてばっかりで仕事に集中できていないみなさんこんにちは。今日は、そんなみなさんにMTのユーザーダッシュボードの「こんにちは、junnamaさん」の代わりに複数指定したフィードの中からランダムにタイトルを表示するプラグインを紹介するよ。
フィードは5つまで指定できます。仕事に集中? できない? 多分できないと思うよ。ご利用は自己責任で。だってここからリンク飛ぶとリファラから管理画面のURLとか飛んで行くから嫌な人は気になる発言にカッとなったりしてリンクを踏んだりしないこと(これ約束ね)。
尚、初期設定で設定されているフィードと僕の趣味嗜好は一切無関係です。
※Feeds.App Liteのライブラリを利用しています。
続き。
MTベースの開発案件の時に「DBのスキーマはどうなりますか? ウチの方でPHPでMySQL叩いて開発とか後でできるでしょうか?」みたいな話が出るので。静的に動的なページを吐き出す(??)サンプル書いてみました。
エントリーを20件リストで表示する、ただそれだけ。直に書いてしまうとせっかくのテンプレートとロジックの分離のメリットが活かされないのですが、部分的に動的な処理を入れたいといった時にはまぁこんなやりかたも出来るということを覚えておいても良いと思います。
インデックス・テンプレートを作成し、「公開→スタティック」「出力ファイル名→foo.php」として保存・再構築。ブログ記事のリストの部分は動的に都度処理されます。それだけですが...
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=<$MTPublishCharset$>" />
<title>DPAPI Example - <MTBlogName escape="html"></title>
</head>
<body>
<?php
include('<$MTCGIServerPath$>/php/mt.php');
$mt = MT::get_instance(<MTBlogID>, '<$MTCGIServerPath$>/mt-config.cgi');
require_once("MTUtil.php");
$args['class'] = 'entry';
$args['blog_id'] = <MTBlogID>;
$args['offset']=0;
$args['limit']=20;
$entries = $mt->db()->fetch_entries($args);
$max = count($entries);
$i = 0;
foreach ($entries as $entry) {
if ($i==0) {
echo '<ul>';
}
echo '<li>' . encode_html($entry->title) . '</li>';
$i++;
if ($i==$max) {
echo '</ul>';
}
}
?>
</body>
</html>
スタッフの仕事の進捗がヤバげだったので急遽phpを担当することになってブロックタグの大物をMT5対応するためにガンダムBrand new APIと格闘してみたメモ書き。
# Power CMS for MTにはPHPプラグインが189もあるんだよ...
Twitter / Junnama Noda: MTのPHP API使ってアプリ開発してるのって日本でhoge人くらいなんだからこんなに力入れてガラッと変えなくても(泣)
さて、ブロックタグの中でのオブジェクトのロードや利用についてのメモを中心に。
$args['class'] = 'entry';
$args['blog_id'] = $blog_id;
$args['offset']=n;
$args['limit']=n;
$entries = $ctx->mt->db()->fetch_entries($args);
$entries = $ctx->mt->db()->SelectLimit( $sql, $limit, $offset );
$entries = $ctx->mt->db()->Execute( $sql );
$entries->RecordCount();
$entries->Move($counter);
$entry = $entries->FetchRow();
$e;
while(list ($key, $val) = each($entry)) {
if (preg_match('/^entry_/',$key)) {
$e->$key = $val;
}
}
# $ctx->stash('entry', $e);
$e = $ctx->mt->db()->fetch_entry($id);
$e = $ctx->mt->db()->fetch_page($id);
require_once 'class.mt_entry.php'; #entry
$_entry = new Entry;
$where = $where_statment;
$extra = array(
'limit' => $limit,
'offset' => $offset,
);
$results = $_entry->Find($where, false, false, $extra);
MT::App::CMS(mt.cgi)のテンプレートファイル(tmpl以下、もしくはalt-tmpl以下の .tmplファイル)の中でMTタグを使えるうようにするプラグインCMSContextの新しいバージョン(β)を公開します。
コアなMTユーザーに評判? のプラグインをバージョンアップします(クレジットがウチの会社になってるんですが、とりあえずβということで先行してここで配布してみます)。ちなみに昨日No test, No document とか言ってTwitterに貼っていたやつはやっぱり(?)バグってました(今回のはざっとテストしましたすいません)。
要するにこれを使うとiPhone用MT管理画面とかが簡単に作れるようになります(誰か是非頑張ってくださいね)。あと...Nokiaは要らないよね? そうだよね?
alt-tmpl/cms/edit_entry.tmpl
<MTCMSContext>
<MTEntryTitle escape="html">
</MTCMSContext>
<MTIfUserAgentIsiPhone>
# Some Template for iPhone
</MTIfUserAgentIsiPhone>
タグはCMSのテンプレート中で利用できます。
| MTCMSContext | CMSのテンプレートの中でMTEntries等のタグを利用できるようになります。 |
|---|---|
| MTIfUserCan | 現在のユーザーがpermissionモディファイア(例:can_post)で指定した権限を有している場合に真となります。 |
| MTIfUserAgentIsiPhone | ユーザーエージェントがiPhone/iPod Touchの場合に真となります。 |
| MTIfUserAgentIsDoCoMo | ユーザーエージェントがDoCoMoの場合に真となります。 |
| MTIfUserAgentIsAU | ユーザーエージェントがauの場合に真となります。 |
| MTIfUserAgentIsSoftBank | ユーザーエージェントがSoftBankの場合に真となります。 |
| MTIfUserAgentIsMobile | ユーザーエージェントがiPhone/iPod Touch/DoCoMo/au/SoftBankの場合に真となります。 |
| MTIfUserAgentIsKeitai | ユーザーエージェントがDoCoMo/au/SoftBankの場合に真となります(iPhone/iPod Touchの場合は偽)。 |
| MTUserAgent | $app->get_header( 'User-Agent' );の値をそのまま出力します。 |
|---|
問い合わせいただいたのとユーザー名が正しくてパスワード違いの場合にブロックできなかったことが判明したので修正しました。
加えて、IPアドレスのホワイトリスト/ブラックリストに対応させました。IPリストは改行区切りで。画像のように 192.168.11.0/24 のような記述にも対応しています。
ユーザー名やパスワードを間違うことでアクセス元IPアドレスからのログインを一定時間制限します。IPアドレスについてはホワイトリスト→ブラックリストの順にチェックします。お分かりいただけると思いますが設定を間違えるとログイン出来なくなりますのでご利用は計画的に! (無保証、自己責任でのご利用をお願いします)。
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
続きです(当日のデモで関連付けがうまくいかなかったのが余程悔しかったのだろう...)。
この方法で出来ないのは、エントリーに対するタグの重み付けなんですね。例えば上記エントリーには「MTDDC」というタグが最も重みが付けられるべきで、そうなれば確実に当日も失敗? しなかったわけです。ところが現状の方法では単語の出現回数なんかでの重み付けがなされないのです。
これについてはMT::ObjectTagオブジェクトを拡張してタグの重み付けを付けるという方法なんかが考えられますが(出現回数なんかでスコアを付ける)、興味のある方はトライしてみても面白いんじゃないでしょうか。
と書いてみたものの...というか「興味のある方=俺」なので取り敢えずMT::ObjectTagに「score」というカラムを追加して出現回数を保存するようにしてみた。
今回はここまででRelatedEntryを取り出すほうはまだなんだけどね。
MT5にも対応させました。ってかそのままで行けたのでMT5で設定されてない場合はclassがwebsiteのブログを1つロードするようにしました。
完全に自分のために書いた。MT4で複数のブログを作成してサイトを運用しているケースで、メインとなるブログを指定してその下に子ブログぶら下げて運用すること多いと思うんですよ。自社のサイトでもそうしてます。
でね、結構サイトを確認しながら新しいページや記事を作成することが多いわけです。サイト内の他のページにリンクを貼ったり過去の記事を確認しながら表記やマークアップ整えたり。
で、ダッシュボードとかシステムメニューに行った時に「サイトの表示」リンクがないためにURL直接叩いたりメインのブログに移動してからリンククリックしてることが実は多くて、なんでここにリンクがないんだろうって思ってた。
URLはシステムプラグイン設定で登録。登録されてなければIDの一番若いブログのsite_urlをセットします。
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
先週末に行われたMTDDCに参加してライトニングトークで大トリ? をつとめさせていただきました。前日まで何を話すか決めてなかったんですが、今回はまぁ大阪開催じゃないし? ネタ抜きにして純粋にハックネタを話させていただきました。さすがに数百人前にしてつまらないネタじゃ悪いし(しかも時間一時間近く押していて、あそこで滑ると会場のコンテキスト? に影響するっていう危機感もありましたし。
すでにお気づきの方もいらっしゃる通り、今回のネタは今年一発目に上げた下記のエントリーの改良版です。
タグのプライベートモードを使うっていうのを直前に思いついてしまったのが今回の肝でした(しかし何でググると3.3のドキュメントが出てくんの?)。
方針は以下の通りです。
前提としてMeCab、MeCab.pmをインストールする必要があります。ここで紹介するパスは私のMac上でのパスです。MacPortを使ってインストールしているので、一般的な環境とは異なるであろうことご了承ください。
タグとして登録したい単語を下記のようにCSVを作成した保存します。ここでのポイントは「Movable Type Developers & Designers Conference」を「MTDDC」として登録する等のようにマッチした文字列をタグとしてどのように登録したいかを定義付けることです。この辞書では「アルファサード有限会社」と「アルファサード」は同じ「アルファサード」として登録されるようになります。
Movable Type Developers & Designers Conference,-1,-1,1,名詞,一般,*,*,*,*,MTDDC,MTDDC,MTDDC,Tags
プラグイン,-1,-1,1,名詞,一般,*,*,*,*,プラグイン,プラグイン,プラグイン,Tags
Movable Type,-1,-1,1,名詞,一般,*,*,*,*,Movable Type,Movable Type,Movable Type,Tags
アクセシビリティ,-1,-1,1,名詞,一般,*,*,*,*,アクセシビリティ,アクセシビリティ,アクセシビリティ,Tags
アルファサード有限会社,-1,-1,1,名詞,一般,*,*,*,*,アルファサード,アルファサード,アルファサード,Tags
アルファサード,-1,-1,1,名詞,一般,*,*,*,*,アルファサード,アルファサード,アルファサード,Tags
セミナー,-1,-1,1,名詞,一般,*,*,*,*,セミナー・イベント,セミナー・イベント,セミナー・イベント,Tags
イベント,-1,-1,1,名詞,一般,*,*,*,*,セミナー・イベント,セミナー・イベント,セミナー・イベント,Tags
リリース,-1,-1,1,名詞,一般,*,*,*,*,リリース情報,リリース情報,リリース情報,Tagscd /opt/user
sudo /opt/local/libexec/mecab/mecab-dict-index -d /opt/local/lib/mecab/dic/ipadic-utf8 -u user.dic -f utf8 -t utf8 dict.csvuser.dicが生成されるので、mecabrcにこのファイルをユーザー辞書として使うように登録します。
vi /opt/local/etc/mecabrc下記の行を追加
userdic = /opt/user/user.dicプラグイン(当日使ったものです)をMTにインストールします。
これで、ユーザー辞書に登録してあるものは無条件に、形態素解析で自動追加したものは「プライベートタグ(@からはじまる隠しタグ)」として登録されるようになります。
あとはogawaさんの TagSupplementalsプラグインにお任せです。
<mt:EntryIfTagged>
<div class="entry-body">
<h2>関連する話題</h2>
<ul>
<MTRelatedEntries lastn="3">
<li><a href="<$MTEntryPermalink$>"><$MTEntryTitle$></a></li>
</MTRelatedEntries>
</ul>
</div>
</mt:EntryIfTagged>
ちゃんと大阪でのMTDDCの記事が一番目に出てますよね?(当日失敗したのは...自動でタグ付けされるのを見せたいがために文章色々直前で追加しちゃったんですよね...クソ!)
この方法で出来ないのは、エントリーに対するタグの重み付けなんですね。例えば上記エントリーには「MTDDC」というタグが最も重みが付けられるべきで、そうなれば確実に当日も失敗? しなかったわけです。ところが現状の方法では単語の出現回数なんかでの重み付けがなされないのです。
これについてはMT::ObjectTagオブジェクトを拡張してタグの重み付けを付けるという方法なんかが考えられますが(出現回数なんかでスコアを付ける)、興味のある方はトライしてみても面白いんじゃないでしょうか。
翌日のHack-A-Thonにも参加しましたが、こっちのほうはまたいずれ。
今日「ブログのサイドバーを見直す(ランキング/表示順/高速化)」って記事を製品サイトのブログに書いていて面倒だったので書いたのであげておきます(スタティック専用)。←しかしなんちゅう日本語だ。
特定のタグ(class指定可能)で囲まれた部分を実体参照に変換して出力するモディファイアescapecodeを提供します。
<$mt:EntryBody escapecode="code,mtml"$>上記のようにテンプレートに記述すると、下記の部分をエスケープして出力します。
<pre><code class"mtml">
<$mt:EntryBody escapecode="code,mtml"$>
</code></pre>This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
随分ご無沙汰してしまったのですが、本年も引き続きよろしくお願いします。
さて今年の最初は実用性があるかどうかはまったく別にして(且つ環境を選ぶものですけど)、サンプル的な感じで一つ。
きっかけは(ちょっと時間が経ってしまいましたが)、以下のエントリーから。
本文内の文章を言語解析してくれて、関連するエントリーを勝手に出してほしい
というものです。タグを辞書に登録するのだから素直にDB見に行ってやればいいってのとそういうのもどっかで公開されてるんですが、あくまでもサンプルとして作りました。「名詞,一般」で2文字以上であれば自動登録とかの方法でやってもいいと思いますが、タグっぽくならないはならないので(関連エントリーのためだけに使うのであればそれでもいいと思いますが大量のタグが保存されて重くなるという懸念もあります)、このあたりは工夫の余地があるでしょう。
辞書へのタグの追加は MeCab: 単語の追加方法 を参照いただくとして(テスト用途であればユーザー辞書として登録するのがいいかと思います)、インデックス・テンプレートに下記のように記述して辞書登録のCSVを作るための kanji2kana モディファイアも作りました。
<MTTags><MTTagName>,-1,-1,1,名詞,一般,*,*,*,*,<MTTagName>,<MTTagName kanji2kana="1">,<MTTagName>,Tags
</MTTags>このインデックステンプレート(を再構築して生成されるcsv)を辞書に登録してエントリーを保存すると自動的にタグ付けされます。表記のゆれについては別途辞書に登録してやって吸収することが出来るでしょう。これに加えてogawaさんの TagSupplementalsプラグイン で関連するエントリーを出すようにすれば「本文内の文章を言語解析してくれて、関連するエントリーを勝手に出してほしい」ってのに近い環境が構築されないでしょうか?
※備忘録的にローカルMacの辞書登録コマンドをメモ
sudo /opt/local/libexec/mecab/mecab-dict-index -d /opt/local/lib/mecab/dic/ipadic-utf8 -u user.dic -f utf8 -t utf8 dict.csvということで(謎)今年も頑張って色々ネタとか提供していければと思いますのでよろしくお願いします。
