TwitterのBOTくらいなら簡単に作成できる…と思っていたのですが、先日のBASIC認証廃止で、OAuthによる認証が必須となり、簡単なBOTでも結構ややこしい手順をふむ必要が出てきました。
そこで、少しでも楽をするために、今回はPythonを使って構築しています。
適当なライブラリを活用することで、認証の処理がかなり容易になります。

以下、一連の作業と作成したソースコードの記録です。

BOTアカウントの登録

なにはともあれ、BOT用のアカウントを登録します。
こちらのページから、通常通りアカウントを作成します。

後々、このアカウントに紐づいたアクセストークンが必要となります。

登録を終えたら通常通りログオンし、Bio等をセッティングします。

アプリケーションの登録

次に、BOT用アカウントでログインした状態で http://dev.twitter.com/ へアクセスします。

この画面から、新しく作成するBOTをアプリケーションとして登録します。
右上の “Your apps”  をクリックします。

既に登録しているアプリケーションの一覧が表示されます。
何も登録していない場合は、登録画面へのリンクだけが表示されるはずです。

新しく登録する場合は、右の “Register a new app” をクリックします。

基本的に、入力項目はすべて入力する必要があります。

BOT用アプリケーション登録の際のポイントは、 “Application Type” を “Client” に変更することと、 “Default Access type” を “Read & Write” に変更すること。
ちなみに、 “Callback URL” の入力欄は、 “Application Type” を “Client” に変更すると消えます。

登録が完了すると、このような画面に移ります。

この画面で必要な情報は、 “OAuth 1.0a Settings” の “Consumer key” と “Consumer secret” の2つ。
これらの情報が、このBOTを更新するためのアプリケーションである、ということを証明するのに使われるものです。
これらの情報を記録します。

次に、画面の上に戻って “My Access Token” をクリックします。

すると、このように “Access Token (oauth_token)” と “Access Token Secret (oauth_token_secret)” の情報が表示されます。
これは、このアプリケーションの作成者(=BOTアカウント)の認証に使われる情報です。

先の “Consumer key” 、 “Consumer secret” とあわせて、初めてBOTを更新するためのアプリケーションで、BOTアカウントのツイートを更新できるようになります。
“Access Token (oauth_token)” と “Access Token Secret (oauth_token_secret)” の情報も記録しておきます。

これで、BOTに必要な “Consumer key”、 “Consumer secret”、”Access Token (oauth_token)”、 ”Access Token Secret (oauth_token_secret)” という4つの鍵が手に入りました。

スクリプトの作成

上述のように、今回BOTを更新するアプリケーションは、Pythonによるスクリプトを作成しました。

PythonでのTwitterの操作は tweepy というライブラリを利用しています。
また、Flickrからの写真の取得は、Flickrのタグをキーに写真を検索してRSSを作成してくれる Flickr RSS Feed Generator というサービスを利用し、この結果取得したRSSを feedparser というライブラリを使ってパースしています。
更に、 今回はFlickrの写真をツイートするということで、 flickrapi.shorturl というライブラリでURLを短縮しています。

各ライブラリのインストールは環境により異なるので、他を参照いただきたいのですが、このBlogを置いているCoreserverやXREAの場合は基本的に次のような手順でインストールできると思います。

1. 管理画面からホスト情報を登録する。
2. SSHでサーバへアクセスする。
3. 次の環境変数を設定しておく。

$ export PYTHONPATH=$HOME/lib/python2.4:$HOME/lib/python2.4/site-packages

4. 各ソースコードをダウンロードし、以下のコマンドでインストール先を指定してインストールする。

$ python setup.py install --prefix=~/

次に、実際にBOTを更新するスクリプトのソースコードです。ここで、”Consumer key”, “Consumer secret”, “Access Token (oauth_token)”, ”Access Token Secret (oauth_token_secret)”にはそれぞれ植えで入手した情報を入れて下さい。

#!/usr/local/bin/python
# -*- coding: utf-8 -*-

import string
import random

import feedparser
import tweepy
import flickrapi.shorturl

CONSUMER_KEY        = 'Consumer key'
CONSUMER_SECRET     = 'Consumer secret'
ACCESS_TOKEN        = 'Access Token (oauth_token)'
ACCESS_TOKEN_SECRET = 'Access Token Secret (oauth_token_secret)'

num = 100    # 100枚の写真から1枚選ぶ
tag = 'cat+kitty+kitten'    # 検索するタグを + で繋げる
id = random.randint(0, num)
if random.randrange(0, 10, 1) > 5:
  sort = 'interestingness-desc'
else:
  sort = 'date-posted-desc'

url  = 'http://www.degraeve.com/flickr-rss/rss.php?tags=' + tag + '&tagmode=any&sort=' + sort + '&num=' + str(num)
data = feedparser.parse(url)

prefix = u'ミ^・.・^彡'
title  = data['entries'][id]['title']
link = data['entries'][id]['link']
link = flickrapi.shorturl.url(link[link.rfind(u'/')+1:])

if len(title) + len(link) + len(prefix) > 110:
  title = title[0:110 - len(link) - len(prefix)] + '...'

tweet = prefix + ' ' + title + '  ' + link

# ここからTwitter
auth = tweepy.OAuthHandler(CONSUMER_KEY, CONSUMER_SECRET)
auth.set_access_token(ACCESS_TOKEN, ACCESS_TOKEN_SECRET)
api = tweepy.API(auth)
api.update_status(tweet)

最後に、このスクリプトをcronで動かすためのshスクリプトを作成します。ここで、上のPythonスクリプトは /virtual/user/bin/nyancopot.py に保存されているものとします。

#!/bin/sh

export PYTHONPATH=$HOME/lib/python2.4:$HOME/lib/python2.4/site-packages
export LD_LIBRALY=$HOME/lib

/usr/local/bin/python /virtual/user/bin/nyancopot.py

あとは、このshスクリプトをcronに登録すれば完了です。
指定された時間にBOTがつぶやきます。

このサービスはGo2web20.netにより提供されています。WordPress等、自分でテンプレートをいじれる場合や、Blogパーツを編集できる場合、簡単に追加することができます。

1. Go2web20.netのサイトにアクセスする。
2. Twitterアカウントや色、ポジションなどを設定する。
3. “Update Code”を押してコード(JavaScript)を作成する。
4. 作成されたコードをコピーして、Blogの内の任意の場所に貼り付ける(ウィジェットやBlogパーツでも大丈夫だと思います)。

以上。Twitterアカウントをお持ちの方はお試しください。 Please Follow Me! :)

そこで、他の作業をしながらTLも追いかけられるように、Macで自分のTLを読み上げる仕組みを作ってみました。

こんな感じで読み上げられます。
動画では写していませんがGrowlを準備しておけばつぶやきも表示されます。

以下、今回作成した仕組みの詳細です。
Perlやコマンドラインは使いますが、おそらく1時間-2時間で構築できると思いますので、よろしければ試してみてください。
質問、コメント等は @naokisatoname まで。

利用したツール等

• Mac OSX 10.6 (Leopard)
• Xcode (MacPortsインストール用)
• MacPorts
• nkf (MacPortsからインストール)
• kakasi (MacPortsからインストール)
• Perl 5.10 (Mac標準)
• Net::Twitterモジュール (CPANからインストール)
• Lingua::JA::Regular::Unicodeモジュール (CPANからインストール)
• sayコマンド (Mac標準)、AQUEST SayKana
• Growl (※必要な場合)

手順詳細

1. Xcodeをインストールします。
2. MacPortsをダウンロード、インストールし、最新情報に更新します。
   (※MacPortsの使い方については MacPortsの基本的な使い方とコマンド 等に詳しく解説されています)
3. MacPortsからnkf、kakasiをインストールします。
   

   sudo port install nkf
   sudo port install kakasi

4. CPANを利用してPerl用のモジュール Net::Twitter と Lingua::JA::Regular::Unicode をインストールします。
   

   sudo perl -MCPAN -e shell
   install Net::Twitter
   install Lingua::JA::Regular::Unicode

   
   すこし時間がかかります。

5. Growlを利用する場合、ダウンロード、インストールします。
   .dmgに同梱されているgrowlnotifyをインストールします (growlnotify/growlnotify を /usr/local/bin にコピーします)。
6. SayKanaをダウンロード、インストールします。
7. 次のような内容で、任意の名前のPerlスクリプトを作成します (ここでは saytwitter.pl とします)。
   USERNAMEをユーザ名に、PASSWORDをパスワードに置き換えます。
   

   #!/usr/bin/perl
   
   use strict;
   use utf8;
   use Encode;
   use Net::Twitter;
   use Lingua::JA::Regular::Unicode;
   
   my $twitter = Net::Twitter->new (
   	#USERNAME → ユーザ名に置き換え
   	username => "USERNAME",
   	#PASSWORD → パスワードに置き換え
   	password => "PASSWORD"
   );
   
   #TLを取得
   my $array_ref = $twitter->friends_timeline();
   
   foreach my $ref( @$array_ref ) {
   	my $username = $ref->{'user'}{'name'};
   	my $line = $ref->{'text'};
   
   	#Growlにつぶやきを表示させる場合、コメントを外す
   	#qx{ growlnotify -m \"\@$username: $line\" };
   
   	&say($username);
   	&say($line);
   }
   
   sub say {
   	my $line = $_[0];
   
   	print encode('utf-8', $line) . "\n";
   
   	#全角 → 半角
   	$line = alnum_z2h($line);
   	#シングルクォート、ダブルクォートを削除
   	$line =~ s/[\"\']//g;
   	#http, httpsから始まる単語を"URL"に変換 (うまく読み上げられないので)
   	$line =~ s/(http:\/\/\S+)|(https:\/\/\S+)\s/URL/ig;
   	#コロンを削除
   	$line =~ s/[:]/,/g;
   	#@ユーザ名を単に"at"に変換  (うまく読み上げられないので)
   	$line =~ s/\s*[@＠][0-9a-zA-Z]+\s*/ at /g;
   	#ハッシュタグを"hash"に変換  (うまく読み上げられないので)
   	$line =~ s/\s*\#\w+\s*/ hash /g;
   	#各種カッコを半角(に変換
   	$line =~ s/[\(\[\{\<（「｛【]/(/g;
   	#各種カッコを半角)に変換
   	$line =~ s/[\}\]\}\>）」｝】]/)/g;
   
   	#漢字をひらがなに変換し、分かち書きにする
   	my $line_mod = qx{ echo \"$line\" | nkf -e | kakasi -w | kakasi -JH -KH | nkf -w };
   
   	#半角英数字、ひらがな、および特定の記号のみ抽出する
   	my $text = "";
   	for(my $i = 0; $i < length($line_mod); $i++) {
   		if(substr($line_mod, $i, 1) =~ m/[0-9a-zA-Z@!?().,_ \/\n]
   			|[、。ー！？・…　]
   			|\p{Hiragana}/) {
   			$text = $text . substr($line_mod, $i, 1);
   		}
   	}
   
   	if($text =~ m/(\p{Hiragana}|\p{Katakana}|\p{Han})/){    #名前、つぶやきに日本語が含まれている場合
   		#漢字からひらがなへの変換で"っ"が重なる場合があるので修正
   		$text =~ s/っ+/っ/ig;
   
   		#読み方の調整
   		#SayKanaの仕様書を参考に、ご自由に調整してください
   		$text =~ s/at/あっと、/g;
   		$text =~ s/hash/はっしゅ。/g;
   		$text =~ s/ ([,.、。!?！？ー])/$1/g;
   		$text =~ s/([!！])/。/g;
   		$text =~ s/([?？])/？/g;
   		$text =~ s/ /\//g;
   		$text =~ s/[・…]/、/g;
   		$text =~ s/[\(\)]/,/g;
   		$text =~ s/\/は\//\/わ\//g;
   		$text =~ s/は\//わ\//ig;
   		#英単語・固有名詞の読み方設定
   		$text =~ s/Windows/うぃんどうず/ig;
   		$text =~ s/Mac/まっく/ig;
   		$text =~ s/Linux/りなっくす/ig;
   		$text =~ s/Twitter/ついったー/ig;
   		$text =~ s/Google/ぐーぐる/ig;
   		#数字の読み方設定 (例えば、"10"を「いちまる」ではなく「じゅう」と読ませるようにしている)
   		$text =~ s/([0-9]+)//ig;
   
   		#SayKanaで読み上げ
   		system("echo \"$text\" | SayKana");
   	} else {    #名前、つぶやきに日本語が含まれている場合
   		#sayで読み上げ
   		system("say \"$text\"");
   	}
   
   	#1秒待機
   	sleep(1);
   	return;
   }

8. 作成したPerlスクリプトに実行権限を与え、任意の場所にコピーします (ここでは/usr/local/binにコピーします)。
   

   chmod a+x saytwitter.pl
   sudo cp saytwitter.pl /usr/local/bin/

   
   このPerlスクリプトを実行すれば、自分のTLから直近20件分のつぶやきが、ユーザ名・つぶやき内容の純に読み上げられるはずです。
   Growlを設定している場合は同時に表示されるはずです。

9. 定期的に読み上げられるように、cronに登録します。
   cron登録用のShellスクリプトを作成します (ここでは saytwitter とします)。
   

   #!/bin/sh
   
   export PATH=/usr/local/bin:/opt/local/bin:$PATH
   /usr/local/bin/saytwitter.pl

10. 作成したShellスクリプトに実行権限を与え、任意の場所にコピーします (ここでは/usr/local/binにコピーします)。
    

    chmod a+x saytwitter
    sudo cp saytwitter /usr/local/bin/

11. 作成したShellスクリプトをcronに登録します。
    実行のタイミングはご自分の環境に応じて調整ください (@naokisatoname の場合、5分間隔に実行しています)。
    

    crontab -e

    
    

    */5 * * * *  /usr/local/bin/saytwitter

12. 以上で定期的に自分のTLが読み上げられるようになります。
    読み上げを停止する場合は、登録したcronのJobを削除します。

インストールはCPANから可能。

sudo perl -MCPAN -e shell
install Net::Twitter

Snow Leopardの環境では、比較的時間はかかったものの、正常にインストールすることができた。

実際にPerlで利用するには、以下の様にコーディングする。

my $twitter = Net::Twitter->new (
username => "username", #ユーザ名
password => "password" #パスワード
)

my $ref = $twitter->friends_timeline();

この様にすると、$refに自分のTLの情報が格納される。
格納されたTLの情報から、以下の様にしてユーザの名前やつぶやきの内容を取得できる。

$ref->{'user'}{'name'}; #ユーザの名前
$ref->{'text'}; #つぶやきの内容

ログインすると、自分のFollower、Followingをそれぞれチェックして、こちらがFollowしているだけのユーザ、Followされているだけのユーザ、相互にFollowしているユーザを表示してくれる。
一括してFollowしたりUnfollowしたり、Blockする事もできる。

Your Twitter Karma

meyou.jp（みゆ）

日本語Twitterユーザに特化した表示サービス。
検索結果から、それらをつぶやいたユーザを一括でFollowできる。
興味のあるキーワードで抽出して、同じ嗜好のユーザをFollowする、という場合に便利。

Twitterぶら見＆検索サービス〜meyou.jp（みゆ）〜