function initialize()
{
- locked = document.getElementById("locked");
- unlocked = document.getElementById("unlocked");
- workarea = document.getElementById("workarea");
- scriptcell = document.getElementById("scriptcell");
- goalcell = document.getElementById("goalcell");
- goals = document.getElementById("goals");
- goalview = document.getElementById("goalview");
- filename = document.getElementById("filename");
- logarea = document.getElementById("logarea");
- advanceButton = document.getElementById("advance");
- retractButton = document.getElementById("retract");
- cursorButton = document.getElementById("cursor");
- bottomButton = document.getElementById("bottom");
-
- // hide sequent view at start
- hideSequent();
+ if (readCookie("session") == null) {
+ window.location = "/login.html"
+ } else {
+ locked = document.getElementById("locked");
+ unlocked = document.getElementById("unlocked");
+ workarea = document.getElementById("workarea");
+ scriptcell = document.getElementById("scriptcell");
+ goalcell = document.getElementById("goalcell");
+ goals = document.getElementById("goals");
+ goalview = document.getElementById("goalview");
+ filename = document.getElementById("filename");
+ logarea = document.getElementById("logarea");
+ advanceButton = document.getElementById("advance");
+ retractButton = document.getElementById("retract");
+ cursorButton = document.getElementById("cursor");
+ bottomButton = document.getElementById("bottom");
+
+ // hide sequent view at start
+ hideSequent();
+ }
}
function debug(txt)
{
- logarea.innerHTML = txt + "\n" + logarea.innerHTML;
+ // internet explorer (v.9) doesn't work with innerHTML
+ logarea.innerText = txt + "\n" + logarea.innerText;
}
function listhd(l)
return (tripletmap (function (a,b,c) { return (c); }, p));
}
-function populate_goalarray(txt)
+function populate_goalarray(menv)
{
- if (txt == "") {
+ debug("metasenv.length = " + menv.length);
+ if (menv.length == 0) {
try {
hideSequent();
} catch (err) { };
} else {
showSequent();
- debug("populate with '" + txt + "'");
goalarray = new Array();
metalist = listnil();
var tmp_goallist = "";
- listiter (function(item)
- {
- debug ("item is '" + item + "'");
- tripletmap (function(a,ahtml,b) {
- debug ("found meta n. " + a);
- debug ("found goal\nBEGIN" + unescape(b) + "\nEND");
- goalarray[a] = unescape(b);
- tmp_goallist = " <A href=\"javascript:switch_goal(" + a + ")\">" + unescape(ahtml) + "</A>" + tmp_goallist;
- metalist = listcons(a,metalist);
- debug ("goalarray[\"" + a + "\"] = " + goalarray[a]);
- },item);
- }, txt);
- // metalist = listmap (p13,txt);
+ for (i = 0; i < menv.length; i++) {
+ metano = menv[i].getAttribute("number");
+ metaname = menv[i].childNodes[0].childNodes[0].data;
+ goal = menv[i].childNodes[1].childNodes[0].data;
+ debug ("found meta n. " + metano);
+ debug ("found goal\nBEGIN" + goal + "\nEND");
+ goalarray[metano] = goal;
+ tmp_goallist = " <A href=\"javascript:switch_goal(" + metano + ")\">" + metaname + "</A>" + tmp_goallist;
+ metalist = listcons(metano,metalist);
+ debug ("goalarray[\"" + metano + "\"] = " + goalarray[metano]);
+ }
goals.innerHTML = tmp_goallist;
debug("new metalist is '" + metalist + "'");
if (is_nil(metalist)) {
}
}
+String.prototype.sescape = function() {
+ var patt1 = /%/gi;
+ var patt2 = /=/gi;
+ var patt3 = /&/gi;
+ var patt4 = /\+/gi;
+ var result = this;
+ result = result.replace(patt1,"%25");
+ result = result.replace(patt2,"%3D");
+ result = result.replace(patt3,"%26");
+ result = result.replace(patt4,"%2B");
+ return (result);
+}
+
String.prototype.unescapeHTML = function()
{
var patt1 = /<br(\/|)>/gi;
stat = req.status;
stxt = req.statusText;
if(stat == 200)
- {
- processResponse(req.responseText);
+ {
+ debug(req.responseText);
+ if (window.DOMParser) {
+ parser=new DOMParser();
+ xmlDoc=parser.parseFromString(req.responseText,"text/xml");
+ }
+ else // Internet Explorer
+ {
+ xmlDoc=new ActiveXObject("Microsoft.XMLDOM");
+ xmlDoc.async="false";
+ xmlDoc.loadXML(req.responseText);
+ }
+ processResponse(xmlDoc);
} else {
- processResponse();
+ processResponse();
}
- // resume();
}
};
- req.open("POST", servicename); // + escape(unlocked.innerHTML), true);
+ req.open("POST", servicename); // + escape(unlocked.innerHTML), true);
+ req.setRequestHeader("Content-type","application/x-www-form-urlencoded");
if (reqbody) {
req.send(reqbody);
} else {
function advanceForm1()
{
- processor = function(responseText) {
- if (is_defined(responseText)) {
+ processor = function(xml) {
+ if (is_defined(xml)) {
// debug("advance: received response\nBEGIN\n" + req.responseText + "\nEND");
- response = responseText.split("@");
- len = parseInt(response[0]);
+ len = parseInt(xml.getElementsByTagName("parsed")[0].getAttribute("length"));
len0 = unlocked.innerHTML.length;
unescaped = unlocked.innerHTML.unescapeHTML();
parsedtxt = unescaped.substr(0,len);
unlocked.innerHTML = unparsedtxt;
len1 = unlocked.innerHTML.length;
len2 = len0 - len1;
- metasenv = response[1];
- populate_goalarray(response[1]);
+ metasenv = xml.getElementsByTagName("meta");
+ populate_goalarray(metasenv);
statements = listcons(len2,statements);
unlocked.scrollIntoView(true);
} else {
resume();
};
pause();
- callServer("advance",processor,unlocked.innerHTML.unescapeHTML());
+ callServer("advance",processor,"body=" + (unlocked.innerHTML.unescapeHTML()).sescape());
}
function gotoBottom()
{
- processor = function(responseText) {
- if (is_defined(responseText)) {
+ processor = function(xml) {
+ if (is_defined(xml)) {
// debug("goto bottom: received response\nBEGIN\n" + req.responseText + "\nEND");
- response = responseText.split("@");
- len = parseInt(response[0]);
- len0 = unlocked.innerHTML.length;
+ len = parseInt(xml.getElementsByTagName("parsed")[0].getAttribute("length"));
+ len0 = unlocked.innerHTML.length;
unescaped = unlocked.innerHTML.unescapeHTML();
parsedtxt = unescaped.substr(0,len);
unparsedtxt = unescaped.substr(len);
locked.innerHTML = locked.innerHTML + parsedtxt;
unlocked.innerHTML = unparsedtxt;
len1 = unlocked.innerHTML.length;
- len = len0 - len1;
- populate_goalarray(response[1]);
- statements = listcons(len,statements);
- unlocked.scrollIntoView(true);
+ len2 = len0 - len1;
+ metasenv = xml.getElementsByTagName("meta");
+ populate_goalarray(metasenv);
+ statements = listcons(len2,statements);
+ unlocked.scrollIntoView(true);
} else {
debug("goto bottom failed");
}
resume();
};
pause();
- callServer("bottom",processor,unlocked.innerHTML.unescapeHTML());
+ callServer("bottom",processor,"body=" + (unlocked.innerHTML.unescapeHTML()).sescape());
}
if (!is_defined(offset)) {
offset = getCursorPos();
}
- processor = function(responseText) {
- if (is_defined(responseText)) {
- // debug("advance: received response\nBEGIN\n" + req.responseText + "\nEND");
- response = responseText.split("@");
- len = parseInt(response[0]);
+ processor = function(xml) {
+ if (is_defined(xml)) {
+ // debug("goto pos: received response\nBEGIN\n" + req.responseText + "\nEND");
+ len = parseInt(xml.getElementsByTagName("parsed")[0].getAttribute("length"));
len0 = unlocked.innerHTML.length;
unescaped = unlocked.innerHTML.unescapeHTML();
parsedtxt = unescaped.substr(0,len);
unlocked.innerHTML = unparsedtxt;
len1 = unlocked.innerHTML.length;
len2 = len0 - len1;
+ metasenv = xml.getElementsByTagName("meta");
+ // populate_goalarray(metasenv);
statements = listcons(len2,statements);
- metasenv = response[1];
+ unlocked.scrollIntoView(true);
// la populate non andrebbe fatta a ogni passo
if (offset <= len) {
- populate_goalarray(response[1]);
+ populate_goalarray(metasenv);
resume();
} else {
gotoPos(offset - len);
}
}
pause();
- callServer("advance",processor,unlocked.innerHTML.unescapeHTML());
+ callServer("advance",processor,"body=" + (unlocked.innerHTML.unescapeHTML()).sescape());
}
function retract()
{
- processor = function(responseText) {
- if (typeof responseText != "undefined") {
- debug("retract: received response\nBEGIN\n" + responseText + "\nEND");
+ processor = function(xml) {
+ if (typeof xml != "undefined") {
+ // debug("advance: received response\nBEGIN\n" + req.responseText + "\nEND");
statementlen = parseInt(listhd(statements));
statements = listtl(statements);
lockedlen = locked.innerHTML.length - statementlen;
statement = locked.innerHTML.substr(lockedlen, statementlen);
locked.innerHTML = locked.innerHTML.substr(0,lockedlen);
unlocked.innerHTML = statement + unlocked.innerHTML;
- populate_goalarray(responseText);
+ metasenv = xml.getElementsByTagName("meta");
+ populate_goalarray(metasenv);
unlocked.scrollIntoView(true);
} else {
debug("retract failed");
function openFile()
{
- processor = function(responseText)
+ processor = function(xml)
{
- if (responseText) {
+ if (is_defined(xml)) {
locked.innerHTML = "";
- unlocked.innerHTML = responseText;
+ unlocked.innerHTML = xml.documentElement.textContent;
} else {
debug("file open failed");
}
};
- callServer("open?file=" + escape(filename.value),processor);
+ callServer("open",processor,"file=" + escape(filename.value));
}
var goalcell;
function test () {
debug("cursor test: " + unlocked.innerHTML.substr(0,getCursorPos()));
}
+
+function readCookie(name) {
+ var nameEQ = name + "=";
+ var ca = document.cookie.split(';');
+ for(var i=0;i < ca.length;i++) {
+ var c = ca[i];
+ while (c.charAt(0)==' ') c = c.substring(1,c.length);
+ if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
+ }
+ return null;
+}
+
+function delete_cookie ( cookie_name )
+{
+ var cookie_date = new Date(); // current date & time
+ cookie_date.setTime ( cookie_date.getTime() - 1 );
+ document.cookie = cookie_name += "=; expires=" + cookie_date.toGMTString();
+}
+
+function delete_session()
+{
+ delete_cookie("session");
+}