egroupware_official/phpgwapi/js/jsolait/lib/lang.js

462 lines
15 KiB
JavaScript

/*
Copyright (c) 2004 Jan-Klaas Kollhof
This file is part of the JavaScript o lait library(jsolait).
jsolait is free software; you can redistribute it and/or modify
it under the terms of the GNU Lesser General Public License as published by
the Free Software Foundation; either version 2.1 of the License, or
(at your option) any later version.
This software is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public License
along with this software; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
/**
Module providing language services like tokenizing JavaScript code
or converting JavaScript objects to and from JSON (see json.org).
To customize JSON serialization of Objects just overwrite the toJSON method in your class.
*/
Module("lang", "0.3.5", function(mod){
var ISODate = function(d){
if(/^(\d{4})(\d{2})(\d{2})T(\d{2}):(\d{2}):(\d{2})/.test(d)){
return new Date(Date.UTC(RegExp.$1, RegExp.$2-1, RegExp.$3, RegExp.$4, RegExp.$5, RegExp.$6));
}else{ //todo error message
throw "Not an ISO date: " + d;
}
}
mod.JSONParser=Class("JSONParser", function(publ, supr){
publ.init=function(){
this.libs = {};
var sys = {"ISODate" : ISODate};
this.addLib(sys, "sys", ["ISODate"]);
}
publ.addLib = function(obj, name, exports){
if(exports == null){
this.libs[name] = obj;
}else{
for(var i=0;i<exports.length;i++){
this.libs[name + "." + exports[i]] = obj[exports[i]];
}
}
}
var EmptyValue = {};
var SeqSep = {};
var parseValue = function(tkns, libs){
var tkn = tkns.nextNonWS();
switch(tkn.type){
case mod.tokens.STR:
case mod.tokens.NUM:
return eval(tkn.value);
case mod.tokens.NAME:
return parseName(tkn.value);
case mod.tokens.OP:
switch(tkn.value){
case "[":
return parseArray(tkns, libs);
break;
case "{":
return parseObj(tkns, libs);
break;
case "}": case "]":
return EmptyValue;
case ",":
return SeqSep;
default:
throw "expected '[' or '{' but found: '" + tkn.value + "'";
}
}
return EmptyValue;
}
var parseArray = function(tkns, libs){
var a = [];
while(! tkns.finished()){
var v = parseValue(tkns, libs);
if(v == EmptyValue){
return a;
}else{
a.push(v);
v = parseValue(tkns, libs);
if(v == EmptyValue){
return a;
}else if(v != SeqSep){
throw "',' expected but found: '" + v + "'";
}
}
}
throw "']' expected";
}
var parseObj = function(tkns, libs){
var obj = {};
var nme =""
while(! tkns.finished()){
var tkn = tkns.nextNonWS();
if(tkn.type == mod.tokens.STR){
var nme = eval(tkn.value);
tkn = tkns.nextNonWS();
if(tkn.value == ":"){
var v = parseValue(tkns, libs);
if(v == SeqSep || v == EmptyValue){
throw "value expected";
}else{
obj[nme] = v;
v = parseValue(tkns, libs);
if(v == EmptyValue){
return transformObj(obj, libs);
}else if(v != SeqSep){
throw "',' expected";
}
}
}else{
throw "':' expected but found: '" + tkn.value + "'";
}
}else if(tkn.value == "}"){
return transformObj(obj, libs);
}else{
throw "String expected";
}
}
throw "'}' expected."
}
var transformObj = function(obj, libs){
var o2;
if(obj.jsonclass != null){
var clsName = obj.jsonclass[0];
var params = obj.jsonclass[1]
if(libs[clsName]){
o2 = libs[clsName].apply(this, params);
for(var nme in obj){
if(nme != "jsonclass"){
if(typeof obj[nme] != "function"){
o2[nme] = obj[nme];
}
}
}
}else{
throw "jsonclass not found: " + clsName;
}
}else{
o2 = obj;
}
return o2;
}
var parseName = function(name){
switch(name){
case "null":
return null;
case "true":
return true;
case "false":
return false;
default:
throw "'null', 'true', 'false' expected but found: '" + name + "'";
}
}
publ.jsonToObj = function(data){
var t = new mod.Tokenizer(data);
return parseValue(t, this.libs);
}
publ.objToJson=function(obj){
if(obj == null){
return "null";
}else{
return obj.toJSON();
}
}
})
mod.parser = new mod.JSONParser();
/**
Turns JSON code into JavaScript objects.
@param src The source as a String.
*/
mod.jsonToObj=function(src){
return mod.parser.jsonToObj(src);
}
/**
Turns an object into JSON.
This is the same as calling obj.toJSON();
@param obj The object to marshall.
*/
mod.objToJson=function(obj){
return mod.parser.objToJson(obj);
}
///Token constants for the tokenizer.
mod.tokens = {};
mod.tokens.WSP = 0;
mod.tokens.OP =1;
mod.tokens.STR = 2;
mod.tokens.NAME = 3;
mod.tokens.NUM = 4;
mod.tokens.ERR = 5;
mod.tokens.NL = 6;
mod.tokens.COMMENT = 7;
mod.tokens.DOCCOMMENT = 8;
mod.tokens.REGEXP = 9;
//todo:doc
mod.Token=Class(function(publ, supr){
publ.init=function(type, value, pos, err){
this.type = type;
this.value = value;
this.pos = pos;
this.err= err;
}
})
/**
Tokenizer Class which incrementally parses JavaScript code and returns the language tokens.
*/
mod.Tokenizer=Class("Tokenizer", function(publ, supr){
publ.init=function(s){
this._working = s;
this._pos = 0;
}
/**
Returns weather or not the code was parsed.
@return True if the complete code was parsed, false otherwise.
*/
publ.finished=function(){
return this._working.length == 0;
}
publ.nextNonWS = function(nlIsWS){
var tkn = this.next();
while((tkn.type == mod.tokens.WSP) || (nlIsWS && (tkn.type == mod.tokens.NL))){
tkn = this.next();
}
return tkn;
}
/**
Returns the next token.
@return The next token.
*/
publ.next = function(){
if(this._working ==""){
throw "Empty";
}
var s1 = this._working.charAt(0);
var s2 = s1 + this._working.charAt(1);
var s3 = s2 + this._working.charAt(2);
var rslt=[];
switch(s1){
case '"': case "'":
try{
s1 = extractQString(this._working);
rslt= new mod.Token(mod.tokens.STR, s1, this._pos);
}catch(e){
rslt= new mod.Token(mod.tokens.ERR, s1, this._pos, e);
}
break;
case "\n": case "\r":
rslt =new mod.Token(mod.tokens.NL, s1, this._pos);
break;
case "{": case "}": case "[": case "]": case "(": case ")":
case ":": case ",": case ".": case ";":
case "*": case "-": case "+":
case "=": case "<": case ">": case "!":
switch(s2){
case "==": case "!=": case "<>": case "<=": case ">=":
rslt = new mod.Token(mod.tokens.OP, s2, this._pos);
break;
default:
rslt = new mod.Token(mod.tokens.OP, s1, this._pos);
}
break;
case "/":
if(s2 == "//" || s3 =="///"){
s1 = extractSLComment(this._working);
rslt = new mod.Token(s1.charAt(2) != "/" ? mod.tokens.COMMENT:mod.tokens.DOCCOMMENT, s1, this._pos);
}else if(s2 == "/*" || s3 =="/**"){
try{
s1 = extractMLComment(this._working);
rslt = new mod.Token(s3 !="/**" ? mod.tokens.COMMENT: mod.tokens.DOCCOMMENT, s1, this._pos);
}catch(e){
rslt= new mod.Token(mod.tokens.ERR, s3 != "/**" ? s2 : s3, this._pos, e);
}
}else{
try{
s1 = extractRegExp(this._working);
rslt = new mod.Token(mod.tokens.REGEXP, s1, this._pos);
}catch(e){
rslt = new mod.Token(mod.tokens.OP, s1, this._pos, e);
}
}
break;
default:
s1=this._working.match(/\d+\.\d+|\d+|\w+|\s+/)[0];
if(s1.replace(/\s+/g,"") == ""){ //whitespace
rslt = new mod.Token(mod.tokens.WSP, s1, this._pos);
}else if(/^\d|\d\.\d/.test(s1)){//number
rslt = new mod.Token(mod.tokens.NUM, s1, this._pos);
}else{//name
rslt =new mod.Token(mod.tokens.NAME, s1, this._pos);
}
}
this._working=this._working.slice(rslt.value.length);
this._pos += rslt.value.length;
return rslt;
}
var searchQoute = function(s, q){
if(q=="'"){
return s.search(/[\\']/);
}else{
return s.search(/[\\"]/);
}
}
var extractQString=function(s){
if(s.charAt(0) == "'"){
var q="'";
}else{
var q='"';
}
s=s.slice(1);
var rs="";
var p= searchQoute(s, q);
while(p >= 0){
if(p >=0){
if(s.charAt(p) == q){
rs += s.slice(0, p+1);
s = s.slice(p+1);
return q + rs;
}else{
rs+=s.slice(0, p+2);
s = s.slice(p+2);
}
}
p = searchQoute(s, q);
}
throw "End of String expected.";
}
var extractSLComment=function(s){
var p = s.search(/\n/);
if(p>=0){
return s.slice(0,p+1);
}else{
return s;
}
}
var extractMLComment=function(s){
var p = s.search(/\*\//);
if(p>=0){
return s.slice(0,p+2);
}else{
throw "End of comment expected.";
}
}
var extractRegExp=function(s){
var p=0;
for(var i=0;i<s.length;i++){
if(s.charAt(i) == "/"){
p=i;
}
if(s.charAt(i) == "\n"){
i = s.length;
}
}
return s.slice(0,p+1);
}
})
/**
Converts an object to JSON.
*/
Object.prototype.toJSON = function(){
var v=[];
for(attr in this){
if(typeof this[attr] != "function"){
v.push('"' + attr + '": ' + mod.objToJson(this[attr]));
}
}
return "{" + v.join(", ") + "}";
}
/**
Converts a String to JSON.
*/
String.prototype.toJSON = function(){
var s = '"' + this.replace(/(["\\])/g, '\\$1') + '"';
s = s.replace(/(\n)/g,"\\n");
return s;
}
/**
Converts a Number to JSON.
*/
Number.prototype.toJSON = function(){
return this.toString();
}
/**
Converts a Boolean to JSON.
*/
Boolean.prototype.toJSON = function(){
return this.toString();
}
/**
Converts a Date to JSON.
Date representation is not defined in JSON.
*/
Date.prototype.toJSON= function(){
var padd=function(s, p){
s=p+s
return s.substring(s.length - p.length)
}
var y = padd(this.getUTCFullYear(), "0000");
var m = padd(this.getUTCMonth() + 1, "00");
var d = padd(this.getUTCDate(), "00");
var h = padd(this.getUTCHours(), "00");
var min = padd(this.getUTCMinutes(), "00");
var s = padd(this.getUTCSeconds(), "00");
var isodate = y + m + d + "T" + h + ":" + min + ":" + s
return '{"jsonclass":["sys.ISODate", ["' + isodate + '"]]}';
}
/**
Converts an Array to JSON.
*/
Array.prototype.toJSON = function(){
var v = [];
for(var i=0;i<this.length;i++){
v.push(mod.objToJson(this[i])) ;
}
return "[" + v.join(", ") + "]";
}
})