1 |
// Set domain at highest level |
2 |
var domainparts = document.domain.split("."); |
3 |
document.domain = domainparts[domainparts.length-2]+"."+domainparts[domainparts.length-1]; |
4 |
|
5 |
Function.prototype.bind = function(obj) { |
6 |
var method = this, |
7 |
temp = function() { |
8 |
return method.apply(obj, arguments); |
9 |
}; |
10 |
return temp; |
11 |
} |
12 |
Function.prototype.andThen=function(g) { |
13 |
var f=this; |
14 |
var a=this.arguments |
15 |
return function(args) { |
16 |
f(a);g(args); |
17 |
} |
18 |
}; |
19 |
|
20 |
function Meteor(instID) { |
21 |
|
22 |
this.transferDoc = false; |
23 |
this.pingtimer = false; |
24 |
this.updatepollfreqtimer = false; |
25 |
this.lastrequest = 0; |
26 |
this.recvtimes = []; |
27 |
this.MHostId = false; |
28 |
this.callback_process = function() {}; |
29 |
this.callback_reset = function() {}; |
30 |
this.callback_eof = function() {}; |
31 |
this.callback_changemode = function() {}; |
32 |
this.callback_statuschanged = function() {}; |
33 |
this.persist = true; |
34 |
this.frameloadtimer = false; |
35 |
this.debugmode = false; |
36 |
this.subsurl = false; |
37 |
this.channels = {}; |
38 |
|
39 |
// Documented public properties |
40 |
this.subdomain = "data"; |
41 |
this.dynamicpageaddress = "push"; |
42 |
this.smartpoll = true; |
43 |
this.pollfreq = 2000; |
44 |
this.minpollfreq = 2000; |
45 |
this.mode = "poll"; |
46 |
this.polltimeout=30000; |
47 |
this.pingtimeout = 10000; |
48 |
this.maxmessages = 0; |
49 |
this.status = 0; |
50 |
|
51 |
/* Statuses: 0 = Uninitialised, |
52 |
1 = Loading stream, |
53 |
2 = Loading controller frame, |
54 |
3 = Controller frame timeout, retrying. |
55 |
4 = Controller frame loaded and ready |
56 |
5 = Receiving data |
57 |
*/ |
58 |
|
59 |
this.instID = (typeof(instID) != "undefined") ? instID : 0; |
60 |
this.MHostId = Math.floor(Math.random()*100000000)+""+this.instID; |
61 |
} |
62 |
|
63 |
Meteor.instances = new Array(); |
64 |
|
65 |
Meteor.create = function(instID) { |
66 |
if (!instID) instID = Meteor.instances.length; |
67 |
Meteor.instances[instID] = new Meteor(instID); |
68 |
return Meteor.instances[instID]; |
69 |
} |
70 |
|
71 |
Meteor.register = function(ifr) { |
72 |
instid = new String(ifr.window.frameElement.id); |
73 |
instid = instid.replace(/.*_([0-9]*)$/, "$1"); |
74 |
ifr.p = this.instances[instid].process.bind(this.instances[instid]); |
75 |
ifr.r = this.instances[instid].reset.bind(this.instances[instid]); |
76 |
ifr.eof = this.instances[instid].eof.bind(this.instances[instid]); |
77 |
ifr.get = this.instances[instid].get.bind(this.instances[instid]); |
78 |
ifr.increasepolldelay = this.instances[instid].increasepolldelay.bind(this.instances[instid]); |
79 |
clearTimeout(this.instances[instid].frameloadtimer); |
80 |
this.instances[instid].setstatus(4); |
81 |
if (this.debugmode) console.log("Frame registered"); |
82 |
} |
83 |
|
84 |
Meteor.reset = function(ifr) { |
85 |
instid = new String(ifr.window.frameElement.id); |
86 |
instid = instid.replace(/.*_([0-9]*)$/, "$1"); |
87 |
this.instances[instid].reset(); |
88 |
} |
89 |
|
90 |
Meteor.prototype.joinChannel = function(channelname, backtrack) { |
91 |
if (typeof(this.channels[channelname]) != "undefined") throw "Cannot join channel "+channelname+": already subscribed"; |
92 |
this.channels[channelname] = {backtrack:backtrack, lastmsgreceived:0}; |
93 |
if (this.debugmode) console.log("Joined channel "+channelname+", channel list follows"); |
94 |
if (this.debugmode) console.log(this.channels); |
95 |
if (this.status != 0) this.start(); |
96 |
} |
97 |
|
98 |
Meteor.prototype.leaveChannel = function(channelname) { |
99 |
if (typeof(this.channels[channelname]) == "undefined") throw "Cannot leave channel "+channelname+": not subscribed"; |
100 |
delete this.channels[channelname]; |
101 |
if (this.status != 0) this.start(); |
102 |
} |
103 |
|
104 |
Meteor.prototype.start = function() { |
105 |
this.persist = (this.maxmessages)?1:0; |
106 |
this.smartpoll = (this.smartpoll)?1:0; |
107 |
this.mode = (this.mode=="stream")?"stream":"poll"; |
108 |
if (!this.subdomain || this.channels.length) throw "Channel or Meteor subdomain host not specified"; |
109 |
this.stop(); |
110 |
var now = new Date(); |
111 |
var t = now.getTime(); |
112 |
this.setstatus(1); |
113 |
var surl = "http://" + this.subdomain + "." + location.hostname + "/" + this.dynamicpageaddress + "?id=" + this.MHostId; |
114 |
if (this.maxmessages && !this.persist) surl += "&maxmessages=" + this.maxmessages; |
115 |
for (var c in this.channels) { |
116 |
surl += "&channel="+c; |
117 |
if (this.channels[c].lastmsgreceived >= 0) { |
118 |
surl += "&restartfrom="+this.channels[c].lastmsgreceived; |
119 |
} else if (this.channels[c].backtrack > 0) { |
120 |
surl += "&backtrack="+this.channels[c].backtrack; |
121 |
} else if (this.channels[c].backtrack < 0 || isNaN(this.channels[c].backtrack)) { |
122 |
surl += "&restartfrom="; |
123 |
} |
124 |
} |
125 |
this.subsurl = surl; |
126 |
if (this.mode=="stream") { |
127 |
this.createIframe(this.subsurl); |
128 |
var f = this.pollmode.bind(this); |
129 |
clearTimeout(this.pingtimer); |
130 |
this.pingtimer = setTimeout(f, this.pingtimeout); |
131 |
|
132 |
} else { |
133 |
this.createIframe("http://"+this.subdomain+"."+location.hostname+"/poll.html"); |
134 |
this.recvtimes[0] = t; |
135 |
if (this.updatepollfreqtimer) clearTimeout(this.updatepollfreqtimer); |
136 |
this.updatepollfreqtimer = setInterval(this.updatepollfreq.bind(this), 2500); |
137 |
} |
138 |
this.lastrequest = t; |
139 |
} |
140 |
|
141 |
Meteor.prototype.createIframe = function(url) { |
142 |
if (document.all) { |
143 |
this.transferDoc = new ActiveXObject("htmlfile"); |
144 |
this.transferDoc.open(); |
145 |
this.transferDoc.write("<html>"); |
146 |
this.transferDoc.write("<script>document.domain=\""+(document.domain)+"\";</"+"script>"); |
147 |
this.transferDoc.write("</html>"); |
148 |
var selfref = this; |
149 |
this.transferDoc.parentWindow.Meteor = Meteor; |
150 |
this.transferDoc.close(); |
151 |
var ifrDiv = this.transferDoc.createElement("div"); |
152 |
this.transferDoc.appendChild(ifrDiv); |
153 |
ifrDiv.innerHTML = "<iframe id=\"meteorframe_"+this.instID+"\" src=\""+url+"\" style=\"display: none;\"></iframe>"; |
154 |
} else { |
155 |
var ifr = document.createElement("IFRAME"); |
156 |
ifr.style.width = "10px"; |
157 |
ifr.style.height = "10px"; |
158 |
ifr.style.border = "none"; |
159 |
ifr.style.position = "absolute"; |
160 |
ifr.style.top = "-10px"; |
161 |
ifr.style.marginTop = "-10px"; |
162 |
ifr.style.zIndex = "-20"; |
163 |
ifr.setAttribute("id", "meteorframe_"+this.instID); |
164 |
ifr.Meteor = Meteor; |
165 |
var innerifr = document.createElement("IFRAME"); |
166 |
innerifr.setAttribute("src", url); |
167 |
innerifr.setAttribute("id", "meteorinnerframe_"+this.instID); |
168 |
ifr.appendChild(innerifr); |
169 |
document.body.appendChild(ifr); |
170 |
} |
171 |
if (this.debugmode) console.log("Loading URL '"+url+"' into frame..."); |
172 |
var f = this.frameloadtimeout.bind(this); |
173 |
this.frameloadtimer = setTimeout(f, 5000); |
174 |
} |
175 |
|
176 |
Meteor.prototype.stop = function() { |
177 |
if (typeof(this.transferDoc)=="object") { |
178 |
this.transferDoc = false; |
179 |
} |
180 |
if (document.getElementById("meteorframe_"+this.instID)) { |
181 |
document.getElementById("meteorframe_"+this.instID).src="about:blank"; |
182 |
document.body.removeChild(document.getElementById("meteorframe_"+this.instID)); |
183 |
} |
184 |
if (!isNaN(this.pingtimer)) clearTimeout(this.pingtimer); |
185 |
if (!isNaN(this.updatepollfreqtimer)) clearTimeout(this.updatepollfreqtimer); |
186 |
if (!isNaN(this.frameloadtimer)) clearTimeout(this.frameloadtimer); |
187 |
this.setstatus(0); |
188 |
} |
189 |
|
190 |
Meteor.prototype.pollmode = function() { |
191 |
if (this.debugmode) console.log("Ping timeout"); |
192 |
this.mode="poll"; |
193 |
this.start(); |
194 |
this.callback_changemode("poll"); |
195 |
this.lastpingtime = false; |
196 |
} |
197 |
|
198 |
Meteor.prototype.process = function(id, channel, data) { |
199 |
if (id == -1) { |
200 |
if (this.debugmode) console.log("Ping"); |
201 |
this.ping(); |
202 |
} else if (typeof(this.channels[channel]) != "undefined" && id > this.channels[channel].lastmsgreceived) { |
203 |
if (this.debugmode) console.log("Message "+id+" received on channel "+channel+" (last id on channel: "+this.channels[channel].lastmsgreceived+")\n"+data); |
204 |
this.callback_process(data); |
205 |
this.channels[channel].lastmsgreceived = id; |
206 |
if (this.mode=="poll") { |
207 |
var now = new Date(); |
208 |
var t = now.getTime(); |
209 |
this.recvtimes[this.recvtimes.length] = t; |
210 |
while (this.recvtimes.length > 5) this.recvtimes.shift(); |
211 |
} |
212 |
} |
213 |
this.setstatus(5); |
214 |
} |
215 |
|
216 |
Meteor.prototype.ping = function() { |
217 |
if (this.mode=="stream" && this.pingtimer) { |
218 |
clearTimeout(this.pingtimer); |
219 |
var f = this.pollmode.bind(this); |
220 |
this.pingtimer = setTimeout(f, this.pingtimeout); |
221 |
var now = new Date(); |
222 |
this.lastpingtime = now.getTime(); |
223 |
} |
224 |
this.setstatus(5); |
225 |
} |
226 |
|
227 |
Meteor.prototype.reset = function() { |
228 |
if (this.debugmode) console.log("Stream reset"); |
229 |
var now = new Date(); |
230 |
var t = now.getTime(); |
231 |
var x = this.pollfreq - (t-this.lastrequest); |
232 |
if (x < 10) x = 10; |
233 |
this.ping(); |
234 |
this.callback_reset(); |
235 |
setTimeout(this.start.bind(this), x); |
236 |
} |
237 |
|
238 |
Meteor.prototype.eof = function() { |
239 |
this.callback_eof(); |
240 |
} |
241 |
|
242 |
Meteor.prototype.get = function(varname) { |
243 |
eval("var a = this."+varname+";"); |
244 |
if (typeof(a) == "undefined") throw "Cannot get value of "+varname; |
245 |
return a; |
246 |
} |
247 |
|
248 |
Meteor.prototype.increasepolldelay = function() { |
249 |
this.pollfreq *= 2; |
250 |
} |
251 |
|
252 |
Meteor.prototype.updatepollfreq = function() { |
253 |
if (this.smartpoll) { |
254 |
var now = new Date(); |
255 |
var t = now.getTime(); |
256 |
var avg = 0; |
257 |
for (var i=1; i<this.recvtimes.length; i++) { |
258 |
var x = (this.recvtimes[i]-this.recvtimes[i-1]); |
259 |
avg += (x>60000)? 60000 : x; |
260 |
} |
261 |
x = (t-this.recvtimes[this.recvtimes.length-1]); |
262 |
avg += (x>180000)? 180000 : x; |
263 |
avg /= this.recvtimes.length; |
264 |
if ((avg/3) < this.pollfreq && (avg/3) >= this.minpollfreq) this.pollfreq = Math.ceil(this.pollfreq*0.9); |
265 |
if ((avg/3) > this.pollfreq) this.pollfreq = Math.floor(this.pollfreq*1.05); |
266 |
} |
267 |
} |
268 |
|
269 |
Meteor.prototype.registerEventCallback = function(evt, funcRef) { |
270 |
if (evt=="process") { |
271 |
this.callback_process = (this.callback_process).andThen(funcRef); |
272 |
} else if (evt=="reset") { |
273 |
this.callback_reset = (this.callback_reset).andThen(funcRef); |
274 |
} else if (evt=="eof") { |
275 |
this.callback_eof = (this.callback_eof).andThen(funcRef); |
276 |
} else if (evt=="changemode") { |
277 |
this.callback_changemode = (this.callback_changemode).andThen(funcRef); |
278 |
} else if (evt=="changestatus") { |
279 |
this.callback_statuschanged = (this.callback_statuschanged).andThen(funcRef); |
280 |
} |
281 |
} |
282 |
|
283 |
Meteor.prototype.frameloadtimeout = function() { |
284 |
if (this.debugmode) console.log("Frame load timeout"); |
285 |
if (this.frameloadtimer) clearTimeout(this.frameloadtimer); |
286 |
this.setstatus(3); |
287 |
setTimeout(this.start.bind(this), 5000); |
288 |
} |
289 |
Meteor.prototype.setstatus = function(newstatus) { |
290 |
if (this.status != newstatus) { |
291 |
this.status = newstatus; |
292 |
this.callback_statuschanged(newstatus); |
293 |
} |
294 |
} |
295 |
|
296 |
Meteor.createCookie = function(name,value,days) { |
297 |
if (days) { |
298 |
var date = new Date(); |
299 |
date.setTime(date.getTime()+(days*24*60*60*1000)); |
300 |
var expires = "; expires="+date.toGMTString(); |
301 |
} |
302 |
else var expires = ""; |
303 |
document.cookie = name+"="+value+expires+"; path=/"; |
304 |
} |
305 |
|
306 |
Meteor.readCookie = function(name) { |
307 |
var nameEQ = name + "="; |
308 |
var ca = document.cookie.split(';'); |
309 |
for(var i=0;i < ca.length;i++) { |
310 |
var c = ca[i]; |
311 |
while (c.charAt(0)==' ') c = c.substring(1,c.length); |
312 |
if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length); |
313 |
} |
314 |
return null; |
315 |
} |
316 |
|
317 |
Meteor.eraseCookie = function(name) { |
318 |
createCookie(name,"",-1); |
319 |
} |