author | Myhailo Danylenko <isbear@ukrpost.net> |
Sat, 21 Mar 2009 05:04:46 +0200 | |
changeset 43 | 7c22b1f2c6e5 |
parent 41 | 9e39fd8a20df |
child 51 | a95a3a73482c |
permissions | -rw-r--r-- |
41
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
1 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
2 |
-- IN-BAND BYTESTREAMS (XEP-0047) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
3 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
4 |
-- library |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
5 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
6 |
require 'lm' |
43 | 7 |
require 'iq' |
41
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
8 |
require 'base64' |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
9 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
10 |
-- public |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
11 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
12 |
ibb = { |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
13 |
block_size = 4096, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
14 |
streamhandler = |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
15 |
function ( accept, reject ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
16 |
reject () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
17 |
end, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
18 |
} |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
19 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
20 |
local ibb_sid = 0 -- private |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
21 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
22 |
function ibb.send ( conn, to, success, fail, id ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
23 |
local bs = ibb.block_size -- local instance |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
24 |
local sid = id |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
25 |
if not sid then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
26 |
ibb_sid = ibb_sid + 1 |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
27 |
sid = 'ibb_' .. ibb_sid |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
28 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
29 |
iq.send ( conn, to, 'set', |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
30 |
{ |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
31 |
open = { sid = sid, ['block-size'] = bs, xmlns = 'http://jabber.org/protocol/ibb' } |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
32 |
}, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
33 |
function () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
34 |
local seq = 0 |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
35 |
local noerr = true |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
36 |
success ( |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
37 |
function ( data, success, fail ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
38 |
if not data then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
39 |
iq.send ( conn, to, 'set', |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
40 |
{ |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
41 |
close = { sid = sid, xmlns = 'http://jabber.org/protocol/ibb' }, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
42 |
}, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
43 |
function () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
44 |
success ( 'end' ) -- XXX |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
45 |
end, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
46 |
fail ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
47 |
elseif data ~= '' then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
48 |
local encoded = base64.encode ( data ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
49 |
while encoded:len () > 0 and noerr do |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
50 |
local chunk = encoded:sub ( 1, bs ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
51 |
local cseq = seq -- local instance for closure |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
52 |
encoded = encoded:sub ( bs + 1 ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
53 |
seq = seq + 1 |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
54 |
iq.send ( conn, to, 'set', |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
55 |
{ |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
56 |
data = { sid = sid, xmlns = 'http://jabber.org/protocol/ibb', seq = cseq, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
57 |
chunk, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
58 |
}, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
59 |
}, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
60 |
function () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
61 |
success ( cseq ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
62 |
end, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
63 |
function ( mesg ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
64 |
noerr = false |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
65 |
fail ( mesg ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
66 |
end ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
67 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
68 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
69 |
end ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
70 |
end, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
71 |
fail ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
72 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
73 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
74 |
-- private |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
75 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
76 |
local ibb_files = {} |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
77 |
local ibb_handler_registered = false |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
78 |
local ibb_incoming_iq_handler = lm.message_handler.new ( |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
79 |
function ( conn, mess ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
80 |
local mtype, smtype = mess:type () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
81 |
if smtype ~= 'set' then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
82 |
return false |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
83 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
84 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
85 |
local child = mess:children () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
86 |
if not child or child:attribute ( 'xmlns' ) ~= 'http://jabber.org/protocol/ibb' then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
87 |
return false |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
88 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
89 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
90 |
local id = mess:attribute ( 'id' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
91 |
local from = mess:attribute ( 'from' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
92 |
local action = child:name () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
93 |
local sid = child:attribute ( 'sid' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
94 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
95 |
if action == 'open' then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
96 |
if not ibb_files[sid] then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
97 |
ibb.streamhandler ( from, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
98 |
function ( success, fail ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
99 |
ibb_files[sid] = { from = from, success = success, fail = fail } |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
100 |
conn:send ( lm.message.create { to = from, mtype = 'iq-result', id = id } ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
101 |
end, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
102 |
function () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
103 |
conn:send ( |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
104 |
lm.message.create { to = from, mtype = 'iq-error', id = id, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
105 |
error = { code = '405', type = 'cancel', |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
106 |
['not-allowed'] = { xmlns = 'urn:ietf:params:xml:ns:xmpp-stanzas' } |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
107 |
} |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
108 |
} ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
109 |
end ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
110 |
else |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
111 |
conn:send ( |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
112 |
lm.message.create { to = from, mtype = 'iq-error', id = id, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
113 |
error = { code = '409', type = 'cancel', |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
114 |
conflict = { xmlns = 'urn:ietf:params:xml:ns:xmpp-stanzas' } |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
115 |
} |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
116 |
} ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
117 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
118 |
elseif action == 'data' then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
119 |
local seq = child:attribute ( 'seq' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
120 |
if ibb_files[sid] and from == ibb_files[sid].from and not ibb_files[sid][tonumber(seq)+1] then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
121 |
local data = child:value () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
122 |
conn:send ( lm.message.create { to = from, mtype = 'iq-result', id = id } ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
123 |
ibb_files[sid][tonumber(seq)+1] = data |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
124 |
-- XXX ibb_files[sid].success ( seq ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
125 |
else |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
126 |
if ibb_files[sid] then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
127 |
ibb_files[sid].fail ( 'conflict' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
128 |
ibb_files[sid] = nil -- invalidate session |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
129 |
conn:send ( |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
130 |
lm.message.create { to = from, mtype = 'iq-error', id = id, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
131 |
error = { code = '409', type = 'cancel', |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
132 |
conflict = { xmlns = 'urn:ietf:params:xml:ns:xmpp-stanzas' } |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
133 |
} |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
134 |
} ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
135 |
else |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
136 |
conn:send ( |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
137 |
lm.message.create { to = from, mtype = 'iq-error', id = id, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
138 |
error = { code = '404', type = 'cancel', -- XXX: check |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
139 |
['item-not-found'] = { xmlns = 'urn:ietf:params:xml:ns:xmpp-stanzas' } |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
140 |
} |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
141 |
} ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
142 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
143 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
144 |
elseif action == 'close' then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
145 |
if ibb_files[sid] and from == ibb_files[sid].from then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
146 |
local data = '' |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
147 |
for seq, chunk in ipairs ( ibb_files[sid] ) do |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
148 |
data = data .. chunk |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
149 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
150 |
local decoded = base64.decode ( data ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
151 |
ibb_files[sid].success ( decoded ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
152 |
conn:send ( lm.message.create { to = from, mtype = 'iq-result', id = id } ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
153 |
ibb_files[sid] = nil |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
154 |
else |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
155 |
if ibb_files[sid] then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
156 |
ibb_files[sid].fail ( 'conflict' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
157 |
ibb_files[sid] = nil -- invalidate session |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
158 |
conn:send ( |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
159 |
lm.message.create { to = from, mtype = 'iq-error', id = id, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
160 |
error = { code = '409', type = 'cancel', |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
161 |
conflict = { xmlns = 'urn:ietf:params:xml:ns:xmpp-stanzas' } |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
162 |
} |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
163 |
} ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
164 |
else |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
165 |
conn:send ( |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
166 |
lm.message.create { to = from, mtype = 'iq-error', id = id, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
167 |
error = { code = '404', type = 'cancel', -- XXX: check |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
168 |
['item-not-found'] = { xmlns = 'urn:ietf:params:xml:ns:xmpp-stanzas' } |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
169 |
} |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
170 |
} ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
171 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
172 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
173 |
else |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
174 |
return false |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
175 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
176 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
177 |
return true |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
178 |
end ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
179 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
180 |
-- mcabber |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
181 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
182 |
local mc_incoming_files = { } |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
183 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
184 |
ibb.streamhandler = |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
185 |
function ( from, accept, reject ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
186 |
local fid = #mc_incoming_files + 1 |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
187 |
mc_incoming_files[fid] = { |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
188 |
from = from, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
189 |
accept = |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
190 |
function ( name ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
191 |
mc_incoming_files[fid].name = name |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
192 |
accept ( |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
193 |
function ( data ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
194 |
local h = io.open ( mc_incoming_files[fid].name, 'w' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
195 |
if not h then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
196 |
print ( 'Cannot open output file: ' .. mc_incoming_files[fid].name ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
197 |
return |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
198 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
199 |
h:write ( data ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
200 |
h:close () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
201 |
print ( 'Stream ' .. fid .. ' successfully saved to ' .. mc_incoming_files[fid].name ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
202 |
mc_incoming_files[fid] = nil |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
203 |
end, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
204 |
function ( mesg ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
205 |
main.print_info ( from, 'Stream error: ' .. mesg ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
206 |
mc_incoming_files[fid] = nil -- XXX |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
207 |
end ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
208 |
end, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
209 |
reject = |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
210 |
function () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
211 |
reject () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
212 |
print ( 'Stream ' .. fid .. ' rejected' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
213 |
mc_incoming_files[fid] = nil |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
214 |
end, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
215 |
} |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
216 |
main.print_info ( from, from .. ' wants you to receive stream. Use /ibb [accept|reject] ' .. fid .. ' to process his request.' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
217 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
218 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
219 |
main.command ( 'ibb', |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
220 |
function ( args ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
221 |
local action = args[1] |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
222 |
if action == 'send' then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
223 |
local who |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
224 |
if args.t then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
225 |
who = args.t |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
226 |
else |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
227 |
who = main.full_jid () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
228 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
229 |
local fname = args[2] |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
230 |
ibb.send ( lm.connection.bless ( main.connection () ), who, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
231 |
function ( sender ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
232 |
main.print_info ( who, 'Stream accepted' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
233 |
local noerr = true |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
234 |
local h = io.open ( fname, 'r' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
235 |
if not h then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
236 |
print ( 'Cannot open file ' .. fname ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
237 |
return |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
238 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
239 |
local data = h:read ( '*a' ) -- In fact, it is better to read it in chunks :/ |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
240 |
h:close () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
241 |
local fail = |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
242 |
function ( mesg ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
243 |
noerr = false |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
244 |
main.print_info ( who, 'Stream error: ' .. mesg ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
245 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
246 |
sender ( data, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
247 |
function ( seq ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
248 |
main.print_info ( who, 'Delivery notification of chunk #' .. seq ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
249 |
end, fail ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
250 |
if noerr then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
251 |
sender ( nil, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
252 |
function ( seq ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
253 |
main.print_info ( who, 'Stream finalizing notification' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
254 |
end, fail ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
255 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
256 |
if noerr then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
257 |
main.print_info ( who, 'Stream sent' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
258 |
else |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
259 |
main.print_info ( who, 'Stream error occured' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
260 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
261 |
end, |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
262 |
function ( mesg ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
263 |
main.print_info ( who, 'Stream initiation error: ' .. mesg ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
264 |
end ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
265 |
elseif action == 'accept' then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
266 |
local id = tonumber(args[2]) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
267 |
if mc_incoming_files[id] then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
268 |
mc_incoming_files[id].accept ( args[3] ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
269 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
270 |
elseif action == 'reject' then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
271 |
local id = tonumber(args[2]) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
272 |
if mc_incoming_files[id] then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
273 |
mc_incoming_files[id].reject () |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
274 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
275 |
else |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
276 |
local text = '' |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
277 |
for sid, data in pairs ( mc_incoming_files ) do |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
278 |
text = text .. '\n' .. sid .. ': ' .. data.from .. ' --> ' .. ( data.name or '?' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
279 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
280 |
if text ~= '' then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
281 |
print ( 'List of incoming streams:' .. text ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
282 |
else |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
283 |
print ( 'No streams' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
284 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
285 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
286 |
end, true, { "send", "accept", "reject" } ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
287 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
288 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
289 |
commands_help['ibb'] = "[[-t target_jid] send filename | accept sid filename | reject sid]\n\nRequests, accepts or rejects sending file via in-band bytestream." |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
290 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
291 |
hooks_d['hook-post-connect'].ibb = |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
292 |
function ( args ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
293 |
lm.connection.bless( main.connection () ):handler ( ibb_incoming_iq_handler, 'iq', 'normal' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
294 |
ibb_handler_registered = true |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
295 |
hooks_d['hook-post-connect'].ibb = nil |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
296 |
hooks_d['hook-quit'].ibb = |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
297 |
function ( args ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
298 |
if ibb_handler_registered then |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
299 |
lm.connection.bless( main.connection () ):handler ( ibb_incoming_iq_handler, 'iq' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
300 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
301 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
302 |
end |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
303 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
304 |
main.add_feature ( 'http://jabber.org/protocol/ibb' ) |
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
305 |
|
9e39fd8a20df
Updated to library module ibb
Myhailo Danylenko <isbear@ukrpost.net>
parents:
diff
changeset
|
306 |
-- vim: se ts=4: -- |