3cbfe6782227c95ef6ce6e9a457584e5dbc5cdc9
[brisk.git] / web / xhr.js
1 /*
2  *  brisk - xhr.js
3  *
4  *  Copyright (C) 2006 matteo.nastasi@milug.org
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful, but
12  * WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABLILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14  * General Public License for more details. You should have received a
15  * copy of the GNU General Public License along with this program; if
16  * not, write to the Free Software Foundation, Inc, 59 Temple Place -
17  * Suite 330, Boston, MA 02111-1307, USA.
18  *
19  * $Id$
20  *
21  */
22
23 var xhr_rd_cookiepath = "/brisk/";
24 var xhr_rd = false;
25 var xhr_rd_stopped = true;
26 var xhr_rd_oldctx = "";
27 var xhr_rd_newctx = "";
28
29 var xhr_rd_cur_n = -1;
30 var xhr_rd_old_n = -1;
31 var xhr_rd_checkedlen = 0;
32 var the_end = false;
33 var ct = 0;
34 var watchdog = 0;
35
36 function hbit(symb)
37 {
38     if ($("heartbit").innerHTML.length >= 40)
39         $("heartbit").innerHTML = symb;
40     else
41         $("heartbit").innerHTML += symb;
42 }
43
44 function xhr_rd_cb(xhr_rd) 
45 {
46     var ret;
47
48     if (xhr_rd.readyState == 4) {
49         try {
50             if ((ret = safestatus(xhr_rd)) == 200) {
51             } else if (ret != -1) {
52                 alert('There was a problem with the request.' + ret);
53             }
54         } catch(b) {};
55
56         xhr_rd_stopped = true;
57     }
58 };
59
60 function xhr_rd_start(sess,stat,subst,step) 
61 {
62     if (the_end)
63         return;
64     createCookie("sess", sess, 24*365, xhr_rd_cookiepath);
65
66     // NOTE: *ctx = "" to prevent konqueror stream commands duplication.
67     xhr_rd_oldctx = "";
68     xhr_rd_newctx = "";
69
70     /* NOTE document.uniqueID exists only under IE  */
71     // alert("di qui3");
72     xhr_rd.open('GET', 'index_rd.php?sess='+sess+"&stat="+stat+"&subst="+subst+"&step="+step+"&onlyone="+(document.uniqueID ? "TRUE" : "FALSE")+"&myfrom="+myfrom, true);
73     //    try { 
74     xhr_rd.onreadystatechange = function() { xhr_rd_cb(xhr_rd); }
75     xhr_rd.send(null);
76     xhr_rd_cur_n++;
77     xhr_rd_stopped = false;
78     // } catch (e) {}
79 };
80
81 function xhr_rd_poll(sess)
82 {
83     var tout = 100;
84     var again;
85     var xhrrestart;
86     ct++;
87
88     /*
89     if (watchdog >= 50) {
90         watchdog = 0;
91         // alert("ABORT XHR_RD");
92         xhr_rd_stopped = true;
93         xhr_rd.abort(); 
94     }
95     */
96     var zug = "XHR_RD_POLL sess = "+sess+" stat = "+stat+" subst = "+subst+" step = "+gst.st+" step_loc = "+gst.st_loc+" step_loc_new = "+gst.st_loc_new+" STOP: "+xhr_rd_stopped;
97
98     if (zug != $("sandbox").innerHTML)
99         $("sandbox").innerHTML = zug;
100
101     /* heartbit log */
102     hbit("_");
103     
104     do {
105         again = 0;
106         xhrrestart = 0;
107         if (gst.st_loc < gst.st_loc_new) {
108             // there is some slow actions running
109             break;
110         }
111         else if (gst.comms.length > 0) {
112             var singlecomm;
113
114             singlecomm = gst.comms.shift();
115             // alert("EXE"+gugu);
116             // $("xhrdeltalog").innerHTML = "EVALL: "+singlecomm.replace("<", "&lt;", "g"); +"<br>";
117             hbit("+");
118
119             eval(singlecomm);
120             again = 1;
121         }
122         else {
123             xhrrestart = 1;
124             try { 
125                 if (xhr_rd == null)
126                         throw "restart";
127                 if (xhr_rd.responseText != null)
128                         xhr_rd_newctx = xhr_rd.responseText;
129             }
130             catch (e) {
131                 if (xhr_rd_stopped == true) {
132                     xhr_rd_stopped = false;
133                     // XX $("xhrstart").innerHTML += "XHRSTART: da catch<br>";
134                     xhr_rd_start(sess, stat, subst, gst.st);
135                 }
136                 
137                 
138                 // $("sandbox").innerHTML += "return 1<br>";
139                 if (the_end != true) {
140                     watchdog = 0;
141                     setTimeout(xhr_rd_poll, tout, sess);
142                     
143                     // hbit(".");
144                     
145                 }
146                 return;
147             }
148             
149
150             // no new char from the last loop, break
151             if (xhr_rd_old_n == xhr_rd_cur_n && 
152                 xhr_rd_newctx.length == xhr_rd_checkedlen) {
153                 watchdog++;
154                 break;
155             }
156             else {
157                 watchdog = 0;
158                 // $("sandbox").innerHTML += "BIG IF<br>";
159                 var comm_match;
160                 var comm_clean;
161                 var comm_len;
162                 var comm_newpart;
163                 var comm_arr;
164                 var i;
165                 var delta = 0;
166                 var match_lines = /^_*$/;
167
168                 hbit("/\\");
169
170                 // check for the same command group
171                 if (xhr_rd_old_n != xhr_rd_cur_n) {
172                     xhr_rd_old_n = xhr_rd_cur_n;
173                     xhr_rd_checkedlen = 0;
174                     xhr_rd_oldctx = "";
175                 }
176                 else
177                     delta = xhr_rd_oldctx.length;
178
179                 // $("xhrlog").innerHTML += "EVERY SEC<br>";            
180                 for (i = delta ; i < xhr_rd_newctx.length ; i++) {
181                     if (xhr_rd_newctx[i] != '_') 
182                         break;
183                 }
184                 if (i == xhr_rd_newctx.length) {
185                     xhr_rd_checkedlen = i;
186                     break;
187                 }
188
189                 // $("xhrlog").innerHTML += "CHECK COM<br>";            
190                 // extracts the new part of the command string
191                 comm_newpart = xhr_rd_newctx.substr(delta);
192                 
193                 // XX $("xhrlog").innerHTML = xhr_rd_newctx.replace("<", "&lt;", "g");
194
195                 // $("response").innerHTML = comm_newpart;
196                 comm_match = /_*@BEGIN@(.*?)@END@/g;
197                 comm_clean = /_*@BEGIN@(.*?)@END@/;
198                 comm_len = 0;
199                 comm_arr = comm_newpart.match(comm_match);
200                 
201                 // $("sandbox").innerHTML += "PRE COMMARR<br>";
202                 if (comm_arr) {
203                     // XX $("xhrdeltalog").innerHTML += "DELTA: "+delta +"<br>";
204                     // XX alert("xhr_rd_newctx: "+xhr_rd_newctx);
205                     // $("sandbox").innerHTML += "POST COMMARR<br>";
206                     for (i = 0 ; i < comm_arr.length ; i++) {
207                         var temp = comm_arr[i].replace(comm_clean,"$1").split("|");
208                         gst.comms = gst.comms.concat(temp);
209                         // XX alert("COMM_ARR["+i+"]: "+comm_arr[i]+"  LEN:"+comm_arr[i].length);
210                         comm_len += comm_arr[i].length;
211                     }
212                     tout = 0;
213                     xhr_rd_oldctx += comm_newpart.substr(0,comm_len);
214                     // XX alert("XHR_RD_OLDCTX: "+xhr_rd_oldctx);
215                     again = 1;
216                 }
217                 xhr_rd_checkedlen = xhr_rd_oldctx.length;
218             }
219         }
220     } while (again);
221
222     if (xhrrestart == 1 && xhr_rd_stopped == true) {
223         // $("sandbox").innerHTML += "LITTLE IF<br>";
224         // alert("di qui");
225         // XX $("xhrstart").innerHTML += "XHRSTART: da end poll<br>";
226         xhr_rd_start(sess, stat, subst, gst.st);
227         // $("sandbox").innerHTML += "return 2<br>";
228     }
229         
230     // $("sandbox").innerHTML += "return 3<br>";
231     if (the_end != true) {
232         setTimeout(xhr_rd_poll, tout, sess);
233         
234         // hbit(".");
235         
236     }
237     return;
238 };
239
240 /*
241   window.onload = function () {
242   xhr_rd = createXMLHttpRequest();
243
244   sess = $("user").value;
245   window.setTimeout(xhr_rd_poll, 0, sess);
246   };
247 */