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 xhr_rd_cb(xhr_rd)
  37 {
  38     var ret;
  39
  40     if (xhr_rd.readyState == 4) {
  41         try {
  42             if ((ret = safestatus(xhr_rd)) == 200) {
  43             } else if (ret != -1) {
  44                 alert('There was a problem with the request.' + ret);
  45             }
  46         } catch(b) {};
  47
  48         xhr_rd_stopped = true;
  49     }
  50 };
  51
  52 function xhr_rd_start(sess,stat,subst,step)
  53 {
  54     if (the_end)
  55         return;
  56     createCookie("sess",sess,1,xhr_rd_cookiepath);
  57
  58     /* NOTE document.uniqueID exists only under IE  */
  59     // alert("di qui3");
  60     xhr_rd.open('GET', 'index_rd.php?sess='+sess+"&stat="+stat+"&subst="+subst+"&step="+step+"&onlyone="+(document.uniqueID ? "TRUE" : "FALSE")+"&myfrom="+myfrom, true);
  61     //    try {
  62     xhr_rd.onreadystatechange = function() { xhr_rd_cb(xhr_rd); }
  63     xhr_rd.send(null);
  64     xhr_rd_cur_n++;
  65     xhr_rd_stopped = false;
  66     // } catch (e) {}
  67 };
  68
  69 function xhr_rd_poll(sess)
  70 {
  71     var tout = 100;
  72     var again;
  73     var xhrrestart;
  74     ct++;
  75
  76     /*
  77     if (watchdog >= 50) {
  78         watchdog = 0;
  79         // alert("ABORT XHR_RD");
  80         xhr_rd_stopped = true;
  81         xhr_rd.abort();
  82     }
  83     */
  84
  85     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;
  86
  87     if (zug != $("sandbox").innerHTML)
  88         $("sandbox").innerHTML = zug;
  89
  90
  91     /* heartbeat log */
  92     $("sandbox2").innerHTML += "_";
  93     if ($("sandbox2").innerHTML.length == 20)
  94         $("sandbox2").innerHTML = "_";
  95
  96     do {
  97         again = 0;
  98         xhrrestart = 0;
  99         if (gst.st_loc < gst.st_loc_new) {
 100             // there is some slow actions running
 101             break;
 102         }
 103         else if (gst.comms.length > 0) {
 104             var singlecomm;
 105
 106             singlecomm = gst.comms.shift();
 107             // alert("EXE"+gugu);
 108             // $("xhrdeltalog").innerHTML = "EVALL: "+singlecomm.replace("<", "&lt;", "g"); +"<br>";
 109             eval(singlecomm);
 110             again = 1;
 111         }
 112         else {
 113             xhrrestart = 1;
 114             try {
 115                 xhr_rd_newctx = xhr_rd.responseText;
 116             }
 117             catch (e) {
 118                 if (xhr_rd_stopped == true) {
 119                     xhr_rd_stopped = false;
 120                     // XX $("xhrstart").innerHTML += "XHRSTART: da catch<br>";
 121                     xhr_rd_start(sess, stat, subst, gst.st);
 122                 }
 123
 124
 125                 // $("sandbox").innerHTML += "return 1<br>";
 126                 if (the_end != true) {
 127                     watchdog = 0;
 128                     setTimeout(xhr_rd_poll, tout, sess);
 129                     $("sandbox2").innerHTML += "-";
 130                     if ($("sandbox2").innerHTML.length == 20)
 131                         $("sandbox2").innerHTML = "-";
 132                 }
 133                 return;
 134             }
 135
 136
 137             // no new char from the last loop, break
 138             if (xhr_rd_old_n == xhr_rd_cur_n &&
 139                 xhr_rd_newctx.length == xhr_rd_checkedlen) {
 140                 watchdog++;
 141                 break;
 142             }
 143             else {
 144                 watchdog = 0;
 145                 // $("sandbox").innerHTML += "BIG IF<br>";
 146                 var comm_match;
 147                 var comm_clean;
 148                 var comm_len;
 149                 var comm_newpart;
 150                 var comm_arr;
 151                 var i;
 152                 var delta = 0;
 153                 var match_lines = /^_*$/;
 154
 155                 // check for the same command group
 156                 if (xhr_rd_old_n != xhr_rd_cur_n) {
 157                     xhr_rd_old_n = xhr_rd_cur_n;
 158                     xhr_rd_checkedlen = 0;
 159                     xhr_rd_oldctx = "";
 160                 }
 161                 else
 162                     delta = xhr_rd_oldctx.length;
 163
 164                 // $("xhrlog").innerHTML += "EVERY SEC<br>";
 165                 for (i = delta ; i < xhr_rd_newctx.length ; i++) {
 166                     if (xhr_rd_newctx[i] != '_')
 167                         break;
 168                 }
 169                 if (i == xhr_rd_newctx.length) {
 170                     xhr_rd_checkedlen = i;
 171                     break;
 172                 }
 173
 174                 // $("xhrlog").innerHTML += "CHECK COM<br>";
 175                 // extracts the new part of the command string
 176                 comm_newpart = xhr_rd_newctx.substr(delta);
 177
 178                 // XX $("xhrlog").innerHTML = xhr_rd_newctx.replace("<", "&lt;", "g");
 179
 180                 // $("response").innerHTML = comm_newpart;
 181                 comm_match = /_*@BEGIN@(.*?)@END@/g;
 182                 comm_clean = /_*@BEGIN@(.*?)@END@/;
 183                 comm_len = 0;
 184                 comm_arr = comm_newpart.match(comm_match);
 185
 186                 // $("sandbox").innerHTML += "PRE COMMARR<br>";
 187                 if (comm_arr) {
 188                     // XX $("xhrdeltalog").innerHTML += "DELTA: "+delta +"<br>";
 189                     // XX alert("xhr_rd_newctx: "+xhr_rd_newctx);
 190                     // $("sandbox").innerHTML += "POST COMMARR<br>";
 191                     for (i = 0 ; i < comm_arr.length ; i++) {
 192                         var temp = comm_arr[i].replace(comm_clean,"$1").split("|");
 193                         gst.comms = gst.comms.concat(temp);
 194                         // XX alert("COMM_ARR["+i+"]: "+comm_arr[i]+"  LEN:"+comm_arr[i].length);
 195                         comm_len += comm_arr[i].length;
 196                     }
 197                     tout = 0;
 198                     xhr_rd_oldctx += comm_newpart.substr(0,comm_len);
 199                     // XX alert("XHR_RD_OLDCTX: "+xhr_rd_oldctx);
 200                     again = 1;
 201                 }
 202                 xhr_rd_checkedlen = xhr_rd_oldctx.length;
 203             }
 204         }
 205     } while (again);
 206
 207     if (xhrrestart == 1 && xhr_rd_stopped == true) {
 208         // $("sandbox").innerHTML += "LITTLE IF<br>";
 209         // alert("di qui");
 210         // XX $("xhrstart").innerHTML += "XHRSTART: da end poll<br>";
 211         xhr_rd_start(sess, stat, subst, gst.st);
 212         // $("sandbox").innerHTML += "return 2<br>";
 213     }
 214
 215     // $("sandbox").innerHTML += "return 3<br>";
 216     if (the_end != true) {
 217         setTimeout(xhr_rd_poll, tout, sess);
 218         $("sandbox2").innerHTML += "-";
 219         if ($("sandbox2").innerHTML.length == 20)
 220             $("sandbox2").innerHTML = "-";
 221     }
 222     return;
 223 };
 224
 225 /*
 226   window.onload = function () {
 227   xhr_rd = createXMLHttpRequest();
 228
 229   sess = $("user").value;
 230   window.setTimeout(xhr_rd_poll, 0, sess);
 231   };
 232 */