/*Copyright Covariable 2008*/ ESFS = new Object();ESFS.dialogTimer = null;ESFS.readCallbacks = new Array();ESFS.openCallbacks = new Array();ESFS.writableCallbacks = new Array();ESFS.writeCallbacks = new Array();urlEncodeString = function(string){string = string.replace(new RegExp("%", "g"), "%25");string = string.replace(new RegExp("#", "g"), "%23");string = string.replace(new RegExp("\\+", "g"), "%2B");string = string.replace(new RegExp("&", "g"), "%26");string = string.replace(new RegExp("=", "g"), "%3D");string = string.replace(new RegExp("/", "g"), "%2F");string = string.replace(new RegExp(" ", "g"), "+");return string;} ESFS.dynascript = function(url){var scr = document.createElement("script");scr.src = this.baseURL + url + "&junk=" + (Math.random() * 1000000);if(!document.body)throw "No BODY to attach dynamic script to yet. Try calling ESFS routines later in your code.";document.body.appendChild(scr);} ESFS.readFile = function(fd, callback){var id = this.readCallbacks.length;this.readCallbacks[id] = function(doc) { callback(doc, fd); };this.dynascript("read.cgi?fd=" + fd + "&id=" + id);} ESFS.openPref = function(path, callback){var id = this.openCallbacks.length;this.openCallbacks[id] = callback;this.dynascript("openPref.cgi?fn=" + urlEncodeString(path) + "&app=" + window.location + "&id=" + id);} ESFS.docFD = function(){if(ESFS.docFD.override)return ESFS.docFD.override;if(window.location.search && window.location.search!='?') return window.location.search.substring(1,window.location.search.length);else return null;} ESFS.readOpening = function(callback, newdoc){if(ESFS.docFD()) this.readFile(ESFS.docFD(), callback);else if(newdoc)callback(newdoc());} ESFS.getDialogKey = function(){var str = window.location.search;var args = str.split("&");for(var i=0;i= data.length)var isend = "&isend=true";else var isend = "&isend=false";var req = 'writescr.cgi?fd=' + fdwr + '&id=' + id + '&mt=' + mimetype + '&off=' + i;if(editorURL == null) editorURL = "current";if(editorURL == "current") {l = window.location + "";end = l.indexOf("?");req += '&editor=' + ((end <0) ? l : l.substr(0, end)) + '?';} else if(editorURL != "none") req += '&editor=' + editorURL;req += "&data=" + chunk+isend;ESFS.dynascript(req);} } });} ESFS.saveDialog = function(callback){if(!callback)throw("No save dialog callback.");ESFS.__dialogUserCallback = callback;if(window.XMLHttpRequest) ESFS.__dialogPath = ESFS.dialogURL + "open-save/browser.html?type=save";else ESFS.__dialogPath = ESFS.dialogURL + "../basic_save.html?";ESFS.dynascript('initiateDialog.cgi?');} ESFS.saveAs = function(mimetype, data, editorUrl, successcb){this.saveDialog(function(fdwr) {ESFS.docFD.override = fdwr;var newcb = null;if(successcb != null) {newcb = function(){ successcb(fdwr); } } ESFS.writeFile(fdwr, mimetype, data, newcb, editorUrl);});} ESFS.enableWriteThroughServer = function(path){ESFS.writeThroughServer.path = path;} ESFS.writeThroughServer = function(fd, mimetype, data){function xmlh() {try { return new XMLHttpRequest(); } catch(e) {var XMLHTTP_IDS = ['MSXML2.XMLHTTP.5.0', 'MSXML2.XMLHTTP.4.0', 'MSXML2.XMLHTTP.3.0', 'MSXML2.XMLHTTP', 'Microsoft.XMLHTTP'];for(var i in XMLHTTP_IDS) {try { return new ActiveXObject(XMLHTTP_IDS[i]); } catch(e) {} } alert("unable to create xmlhttprequest");return null;} } var req = xmlh();req.open('POST', urlEncodeString(ESFS.writeThroughServer.path) + '?fd=' + fd + '&mt=' + mimetype, false);req.setRequestHeader("Content-type", mimetype);req.send(data);if(req.status == 200 && req.responseText=='success\n') return 0;return -1;} ESFS.makeFileMenu = function(params){var div = document.createElement("div");div.style.position='relative';div.style.width='100px';div.style.height='20px';div.style.border='2px inset #448';div.style.background='#e0e0e8';div.innerHTML = 'File |>';var haveOpenDoc = false;var savedData = null;if(params.load) {var newtype = "text/plain";if(params.saveMimetype)newtype = params.saveMimetype;var newdoc = function() { return {type:newtype, data:""}; } if(params.newdoc)newdoc = function() { return {type:newtype, data:params.newdoc()}; } ESFS.readOpening(function(file) { haveOpenDoc = true; savedData = file.data; params.load(file.data); }, newdoc);} function checkDirty() {if(haveOpenDoc && params.save && params.save() != savedData) if(!confirm("Discard unsaved changes?"))return true;return false; } var items = new Array();if(params.load && params.newdoc)items.push( {id:'esfsMenu_new',name:'New',method:function(){if(checkDirty())return;if(!params.canReplace) window.location.search = '';else {ESFS.docFD.override = '';haveOpenDoc = false;params.load(params.newdoc());} }} );if(params.openMimetypes)items.push( {id:'esfsMenu_open',name:'Open...',method:function(){if(checkDirty())return;var callback = null;if(params.canReplace) callback = function(fd) {ESFS.docFD.override = fd;haveOpenDoc = true;ESFS.readFile(fd, function(file) {params.load(file.data, file.type);});};ESFS.openDialog(params.openMimetypes, callback);}} );if(!params.noClose)items.push( {id:'esfsMenu_close',name:'Close',method:function(){if(checkDirty())return;window.location = 'http://www.redfs.com/mydocs.html'; }} );if(params.save && params.saveMimetype) {items.push( {id:'esfsMenu_saveAs',name:'Save As...',method:function(){var data = params.save();ESFS.saveAs(params.saveMimetype, data, params.editorURL, function() {savedData = data;haveOpenDoc = true;if(params.savedMessage)alert(params.savedMessage);}); }} );items.push( {id:'esfsMenu_save',name:'Save',method:function(){var data = params.save();ESFS.writeFile(ESFS.docFD(), params.saveMimetype, data, function() {savedData = data;if(params.savedMessage)alert(params.savedMessage);}); }} );} function dispatcher(i) { return function() {if(items[i].disabled)return;items[i].method();}; } var mdiv = document.createElement("div");mdiv.style.position='absolute';mdiv.style.background='#f8f8f0';mdiv.style.border='2px inset #80f080';var byid = new Object();for(var i=0;i