1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
|
# -*- coding: utf-8 -*-
require File.expand_path('utils')
miquire :core, 'environment', 'user', 'message', 'userlist', 'configloader', 'userconfig', 'delayer', 'reserver'
miquire :lib, "mikutwitter"
Thread.abort_on_exception = true
=begin rdoc
Twitter APIとmikutterプラグインのインターフェイス
=end
class Service
include ConfigLoader
# MikuTwitter のインスタンス
attr_reader :twitter
# 現在ログイン中のアカウント
@@services = Set.new
def self.services_refresh
Service.new if(@@services.empty?) end
# 存在するServiceオブジェクトをSetで返す。
# つまり、投稿権限のある「自分」のアカウントを全て返す。
def self.all
Service.services_refresh
@@services.dup end
class << self; alias services all end
def self.primary
services.first end
class << self; alias primary_service primary end
# プラグインには、必要なときにはこのインスタンスが渡るようになっているので、インスタンスを
# 新たに作る必要はない
def initialize
token, secret = UserConfig[:twitter_token], UserConfig[:twitter_secret]
if UserConfig[:twitter_authenticate_revision] != Environment::TWITTER_AUTHENTICATE_REVISION
notice "current authentication token revision #{UserConfig[:twitter_authenticate_revision]}. but required #{Environment::TWITTER_AUTHENTICATE_REVISION}"
token = secret = nil
end
@twitter = MikuTwitter.new
@twitter.consumer_key = Environment::TWITTER_CONSUMER_KEY
@twitter.consumer_secret = Environment::TWITTER_CONSUMER_SECRET
@twitter.a_token = UserConfig[:twitter_token]
@twitter.a_secret = UserConfig[:twitter_secret]
if @twitter.a_token.empty? and @twitter.a_secret.empty?
@twitter.authentication_failed_action(self, nil, nil, nil)
end
Message.add_data_retriever(MessageServiceRetriever.new(self, :status_show))
User.add_data_retriever(UserServiceRetriever.new(self, :user_show))
@@services << self
user_initialize
end
# 自分のUserを返す。初回はサービスに問い合せてそれを返す。
def user_obj
@user_obj end
# 自分のユーザ名を返す。初回はサービスに問い合せてそれを返す。
def user
@user_obj[:idname] end
alias :idname :user
# userと同じだが、サービスに問い合わせずにnilを返すのでブロッキングが発生しない
def user_by_cache
@user_idname end
# selfを返す
def service
self end
# サービスにクエリ _kind_ を投げる。
# レスポンスを受け取るまでブロッキングする。
# レスポンスを返す。失敗した場合は、apifailイベントを発生させてnilを返す。
# 0.1: このメソッドはObsoleteです
def scan(kind=:friends_timeline, args={})
no_mainthread
wait = Queue.new
__send__(kind, args).next{ |res|
wait.push res
}.terminate.trap{ |e|
wait.push nil }
wait.pop end
# scanと同じだが、別スレッドで問い合わせをするのでブロッキングしない。
# レスポンスが帰ってきたら、渡されたブロックが呼ばれる。
# ブロックは、必ずメインスレッドで実行されることが保証されている。
# Deferredを返す。
# 0.1: このメソッドはObsoleteです
def call_api(api, args = {}, &proc)
__send__(api, args).next &proc end
# Streaming APIに接続する
def streaming(method = :userstream, *args, &proc)
twitter.__send__(method, *args, &proc) end
#
# POST関連
#
# なんかコールバック機能つける
# Deferred返すから無くてもいいんだけどねー
def self.define_postal(method, twitter_method = method, &wrap)
function = lambda{ |api, options, &callback|
if(callback)
callback.call(:start, options)
callback.call(:try, options)
api.call(options).next{ |res|
callback.call(:success, res)
res
}.trap{ |exception|
callback.call(:err, exception)
callback.call(:fail, exception)
callback.call(:exit, nil)
Deferred.fail(exception)
}.next{ |val|
callback.call(:exit, nil)
val }
else
api.call(options) end }
if block_given?
define_method(method){ |*args, &callback|
wrap.call(lambda{ |options|
function.call(twitter.method(twitter_method), options, &callback) }, self, *args) }
else
define_method(method){ |options, &callback| function.call(twitter.method(twitter_method), options, &callback) } end
end
define_postal(:update){ |parent, service, options|
parent.call(options).next{ |message|
notice 'event fire :posted and :update by statuses/update'
Plugin.call(:posted, service, [message])
Plugin.call(:update, service, [message])
message } }
define_postal(:retweet){ |parent, service, options|
parent.call(options).next{ |message|
notice 'event fire :posted and :update by statuses/retweet'
Plugin.call(:posted, service, [message])
Plugin.call(:update, service, [message])
message } }
define_postal :search_create
define_postal :search_destroy
define_postal :follow
define_postal :unfollow
define_postal :add_list_member
define_postal :delete_list_member
define_postal :add_list
define_postal :delete_list
define_postal :update_list
define_postal :send_direct_message
define_postal :destroy_direct_message
define_postal(:destroy){ |parent, service, options|
parent.call(options).next{ |message|
message[:rule] = :destroy
Plugin.call(:destroyed, [message])
message } }
alias post update
define_postal(:favorite) { |parent, service, message, fav = true|
if fav
Plugin.call(:before_favorite, service, service.user_obj, message)
parent.call(message).next{ |message|
Plugin.call(:favorite, service, service.user_obj, message)
message
}.trap{ |e|
Plugin.call(:fail_favorite, service, service.user_obj, message)
Deferred.fail(e) } else
service.unfavorite(message).next{ |message|
Plugin.call(:unfavorite, service, service.user_obj, message)
message } end }
define_postal :unfavorite
def inspect
"#<Service #{idname}>" end
def method_missing(method_name, *args)
result = twitter.__send__(method_name, *args)
(class << self; self end).__send__(:define_method, method_name, &twitter.method(method_name))
result end
private
def user_initialize
if UserConfig[:verify_credentials]
@user_obj = User.new_ifnecessary(UserConfig[:verify_credentials])
(twitter/:account/:verify_credentials).user.next(&method(:user_data_received)).trap(&method(:user_data_failed))
else
res = twitter.query!('account/verify_credentials', cache: true)
if "200" == res.code
user_data_received(MikuTwitter::ApiCallSupport::Request::Parser.user(JSON.parse(res.body).symbolize))
else
user_data_failed_crash!(res) end end end
# :enddoc:
def user_data_received(user)
@user_obj = user
UserConfig[:verify_credentials] = {
:id => @user_obj[:id],
:idname => @user_obj[:idname],
:name => @user_obj[:name],
:profile_image_url => @user_obj[:profile_image_url] }
end
def user_data_failed(e)
if e.is_a? MikuTwitter::Error
if not UserConfig[:verify_credentials]
user_data_failed_crash!(e.httpresponse) end end end
def user_data_failed_crash!(res)
if '400' == res.code
chi_fatal_alert "起動に必要なデータをTwitterが返してくれませんでした。規制されてるんじゃないですかね。\n" +
"ニコ動とか見て、規制が解除されるまで適当に時間を潰してください。ヽ('ω')ノ三ヽ('ω')ノもうしわけねぇもうしわけねぇ\n" +
"\n\n--\n\n" +
"#{res.code} #{res.body}"
else
chi_fatal_alert "起動に必要なデータをTwitterが返してくれませんでした。電車が止まってるから会社行けないみたいなかんじで起動できません。ヽ('ω')ノ三ヽ('ω')ノもうしわけねぇもうしわけねぇ\n"+
"Twitterサーバの情況を調べる→ https://dev.twitter.com/status\n"+
"Twitterサーバの情況を調べたくない→ http://www.nicovideo.jp/vocaloid\n\n--\n\n" +
"#{res.code} #{res.body}" end end
class ServiceRetriever
include Retriever::DataSource
def initialize(post, api)
@post = post
@api = api
end
def findbyid(id)
if id.is_a? Enumerable
id.map(&method(:findbyid))
else
@post.scan(@api, :id => id) end end
def time
1.0/0 end
end
class MessageServiceRetriever < ServiceRetriever
end
class UserServiceRetriever < ServiceRetriever
include Retriever::DataSource
def findbyid(id)
if id.is_a? Enumerable
front = id.to_a.slice(0, 100)
remain = id.to_a.slice(100,id.size)
messages = @post.scan(:user_lookup, :id => front.join(','))
messages = [] if not messages.is_a? Array
messages.concat(findbyid(remain)) if remain and not remain.empty?
messages
else
@post.scan(@api, :id => id) end end end
end
Post = Service
|