window.mySequence=new Array();

// Old Controller Code..
/*function modulesController(aja,modinstarray) {
 
  var els=document.getElementsByTagName('span');
  var a=ajaxget(aja);

  for (var i=0;i<modinstarray.length;i++) {

    spm=modinstarray[i].split('_');

    for (var j=0;j<els.length;j++) {
      sp=els[j].id.split('_');
      if (sp[0]==spm[0] && sp[1]==spm[1]) {
        replaceHtml(els[j],ajaxupdate(sp[0],sp[1],sp[2]));
      }
    };
  }; 
}*/

function modulesController(aja,pmodinst,updateonly) {
  var els=document.getElementsByTagName('span');
  var a=ajaxget(aja);
  var psp=pmodinst.split('_'); 
  var modlist=ajaxmodulelist(psp[0],psp[1]);
  var spml=modlist.substr(0,modlist.length-1).split('|');
  var modinstarray = new Array;
  for (var k=0;k<spml.length;k++) {
    modinstarray[k] = spml[k];
  }

  if (updateonly=='Y') {
    for (var i=0;i<modinstarray.length;i++) {

      spm=modinstarray[i].split('_');
      for (var j=0;j<els.length;j++) {
        sp=els[j].id.split('_');
        if (sp[0]==spm[0] && sp[1]==spm[1]) {
          replaceHtml(els[j],ajaxupdate(sp[0],sp[1],sp[2]));
        }
      };
    }; 
  }
}

function sequence(seqnum) {
  return;
  alert("SEQUENCE : "+seqnum+" ARR:"+window.mySequence);
  if (seqnum!=0) {
    if (window.mySequence[0]!=seqnum) alert("Sequence Error?");
    var dump = window.mySequence.shift();
    return 0;
  }
  seqnum=Math.floor(Math.random()*1000000000);
  window.mySequence.push(seqnum);
  // alert('SEQ'+window.mySequence+" -> "+window.mySequence[0]);
  while (window.mySequence[0]!=seqnum) {
    alert("Wait: "+seqnum+" Arr: "+window.mySequence);
    // -- just wait --
  }
  return seqnum;
}

function dsubmit(func,val) {
  document.getElementById('dsub').dsubmit_func.value=func;
  document.getElementById('dsub').dsubmit_val.value=val;
  setTimeout("document.getElementById('dsub').submit()",15);
}


/* var getmodule = getXMLHttpRequest(); */

function initgetmaildetail(campaigns_id,emailaddr,register) {
  var url="/mailthing/getmaildetail.php?campaigns_id="+campaigns_id+"&emailaddr="+emailaddr+"&register="+register;
  getmaildetail.open("GET",url,false);
  getmaildetail.send(null);

  try {
    var data = getmaildetail.responseText;
    return data;
  }
  catch (ex) {}
}

function ajaxlookup(database,search,update_id) {
  var url="/cars/ajax/lookup.php?database="+database+"&search="+search+"&update_id="+update_id;
  var getmodule = new getXMLHttpRequest();
  getmodule.open("GET",url,false);
  getmodule.send(null);
  try {
    var data=getmodule.responseText;
    if (document.getElementById('sug_'+update_id)) document.getElementById('sug_'+update_id).innerHTML=data;
  }
  catch (ex) {}
}

function ajaxfilelookup(basedir,search,update_id) {
  var url="/cars/ajax/lookup.php?basedir="+Base64.encode(basedir)+"&search="+search+"&update_id="+update_id;
  var getmodule = new getXMLHttpRequest();
  getmodule.open("GET",url,false);
  getmodule.send(null);
  try {
    var data=getmodule.responseText;
    if (document.getElementById('sug_'+update_id)) document.getElementById('sug_'+update_id).innerHTML=data;
  }
  catch (ex) {}
}

function ajaxselect(selection,search,update_id) {
  // - selection separated by double vertical slashes -
  var url="/cars/ajax/select.php?selection="+selection+"&search="+search+"&update_id="+update_id;
  var getmodule = new getXMLHttpRequest();
  getmodule.open("GET",url,false);
  getmodule.send(null);
  try {
    var data=getmodule.responseText;
    if (document.getElementById('sug_'+update_id)) {
      document.getElementById('sug_'+update_id).innerHTML=data;
      document.getElementById('sug_'+update_id).style.display='';
    }
  }
  catch (ex) {}
}

function ajaxmodulelist(getmodules,getinstance) {
  var myseq=sequence(0);
  var url="/cars/ajax/getmodulelist.php?module="+getmodules+"&instance="+getinstance;
  var getmodule = new getXMLHttpRequest();
  getmodule.open("GET",url,false);
  getmodule.send(null);
  // alert('Ajaxget '+module+' '+instance);
  try {
    var data = getmodule.responseText;
    // alert('Ajaxget '+module+' '+instance);
    // document.getElementById(module+instance).innerHTML=data;
    var myseq=sequence(myseq);
    return data;
  }
  catch (ex) {}
}

function ajaxget(getvars) {
  var myseq=sequence(0);
  var url="/cars/getvars.php?getvars="+getvars;
  var getmodule = new getXMLHttpRequest();
  getmodule.open("GET",url,false);
  getmodule.send(null);
  // alert('Ajaxget '+module+' '+instance);
  try {
    var data = getmodule.responseText;
    // alert('Ajaxget '+module+' '+instance);
    // document.getElementById(module+instance).innerHTML=data;
    var myseq=sequence(myseq);
  }
  catch (ex) {}
}

function ajaxgetjs(getvars,modules) {
  var myseq=sequence(0);
  var url="/cars/getvars.php?getvars="+getvars+"&modules="+modules;
  var getmodule = new getXMLHttpRequest();
  // alert("AJAXGETJS : "+url);
  getmodule.open("GET",url,false);
  getmodule.send(null);
  try {
    var data = getmodule.responseText;
    document.getElementById(module+instance).innerHTML=data;
    var myseq=sequence(myseq);
  }
  catch (ex) {}
}

function addtoforecourt(cars_id,newused) {
  var url="/cars/addtoforecourt.php?cars_id="+cars_id+"&newused="+newused;
  var getmodule = new getXMLHttpRequest();
  getmodule.open("GET",url,false);
  getmodule.send(null);
  try {
    var data = getmodule.responseText;
    arr=data.split('|||_|||');
    var els=document.getElementsByTagName('span');
    for (var keyVar=0; keyVar < arr.length; keyVar++) {
      var line='forecourt_'+arr[keyVar]; 
      var linear=line.split('_');
      if (linear[0] && linear[1]) {
        for (var i=0;i<els.length;i++) {
          sp=els[i].id.split('_');
          if (sp[0]==linear[0] && sp[1]==linear[1]) {
            var tempHTML=ajaxupdate(sp[0],sp[1],sp[2]);
            replaceHtml(els[i],tempHTML);
          }
        }
      }
    }
  }
  catch (ex) {}
}

function removefromforecourt(cars_id,newused) {
  var url="/cars/removefromforecourt.php?cars_id="+cars_id+"&newused="+newused;
  var getmodule = new getXMLHttpRequest();
  getmodule.open("GET",url,false);
  getmodule.send(null);
  try {
    var data = getmodule.responseText;
    arr=data.split('|||_|||');
    var els=document.getElementsByTagName('span');
    for (var keyVar=0; keyVar < arr.length; keyVar++) {
      var line='forecourt_'+arr[keyVar]; 
      var linear=line.split('_');
      if (linear[0] && linear[1]) {
        for (var i=0;i<els.length;i++) {
          sp=els[i].id.split('_');
          if (sp[0]==linear[0] && sp[1]==linear[1]) {
            var tempHTML=ajaxupdate(sp[0],sp[1],sp[2]);
            replaceHtml(els[i],tempHTML);
          }
        }
      }
    }
  }
  catch (ex) {}
}

function ajaxupdate(module,instance,section) {
  var ts=new Date();
  var url="/cars/getmodule.php?module="+module+"&instance="+instance+"&section="+section+"&timestamp="+ts.getTime();
  var getmodule = new getXMLHttpRequest();
  // var url="/cars/getmodule.php?module="+module+"&instance="+instance+"&section="+section;
  getmodule.open("GET",url,false);
  getmodule.send(null);
  try {
    var data = getmodule.responseText;
    return data;
    // document.getElementById(module+'_'+instance).innerHTML=data;
  }
  catch (ex) {}
}


// ------------------- standard ajax access code -----------------
//
// Define a list of Microsoft XML HTTP ProgIDs.
//
var XMLHTTPREQUEST_MS_PROGIDS = new Array(
  "Msxml2.XMLHTTP.7.0",
  "Msxml2.XMLHTTP.6.0",
  "Msxml2.XMLHTTP.5.0",
  "Msxml2.XMLHTTP.4.0",
  "MSXML2.XMLHTTP.3.0",
  "MSXML2.XMLHTTP",
  "Microsoft.XMLHTTP"
);

//
// Define ready state constants.
//
var XMLHTTPREQUEST_READY_STATE_UNINITIALIZED = 0;
var XMLHTTPREQUEST_READY_STATE_LOADING       = 1;
var XMLHTTPREQUEST_READY_STATE_LOADED        = 2;
var XMLHTTPREQUEST_READY_STATE_INTERACTIVE   = 3;
var XMLHTTPREQUEST_READY_STATE_COMPLETED     = 4;

//
// Returns XMLHttpRequest object.
//
function getXMLHttpRequest()
{
  var httpRequest = null;

  // Create the appropriate HttpRequest object for the browser.
  if (window.XMLHttpRequest != null)
    httpRequest = new window.XMLHttpRequest();
  else if (window.ActiveXObject != null)
  {
    // Must be IE, find the right ActiveXObject.
    var success = false;
    for (var i = 0;
         i < XMLHTTPREQUEST_MS_PROGIDS.length && !success;
         i++)
    {
      try
      {
        httpRequest = new ActiveXObject(XMLHTTPREQUEST_MS_PROGIDS[i]);
        success = true;
      }
      catch (ex)
      {}
    }
  }

  // Display an error if we couldn't create one.
  if (httpRequest == null)
    alert("Error in HttpRequest():\n\n"
      + "Cannot create an XMLHttpRequest object.");

  // Return it.
  return httpRequest;
}

// addLoadEvent(nameOfFunctionToRunOnPageLoad);
// addLoadEvent(function() { javascript code });

function addLoadEvent(func) {
  var oldonload=window.onload;
  if (typeof window.online != 'function') {
    window.onload=func;
  } else {
    window.onload = function() {
      oldonload();
      func();
    }
  }
}

/**
*
*  Base64 encode / decode
*  http://www.webtoolkit.info/
*
**/

var Base64 = {

    // private property
    _keyStr : "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=",

    // public method for encoding
    encode : function (input) {
        var output = "";
        var chr1, chr2, chr3, enc1, enc2, enc3, enc4;
        var i = 0;

        input = Base64._utf8_encode(input);

        while (i < input.length) {

            chr1 = input.charCodeAt(i++);
            chr2 = input.charCodeAt(i++);
            chr3 = input.charCodeAt(i++);

            enc1 = chr1 >> 2;
            enc2 = ((chr1 & 3) << 4) | (chr2 >> 4);
            enc3 = ((chr2 & 15) << 2) | (chr3 >> 6);
            enc4 = chr3 & 63;

            if (isNaN(chr2)) {
                enc3 = enc4 = 64;
            } else if (isNaN(chr3)) {
                enc4 = 64;
            }

            output = output +
            this._keyStr.charAt(enc1) + this._keyStr.charAt(enc2) +
            this._keyStr.charAt(enc3) + this._keyStr.charAt(enc4);

        }

        return output;
    },

    // public method for decoding
    decode : function (input) {
        var output = "";
        var chr1, chr2, chr3;
        var enc1, enc2, enc3, enc4;
        var i = 0;

        input = input.replace(/[^A-Za-z0-9\+\/\=]/g, "");

        while (i < input.length) {

            enc1 = this._keyStr.indexOf(input.charAt(i++));
            enc2 = this._keyStr.indexOf(input.charAt(i++));
            enc3 = this._keyStr.indexOf(input.charAt(i++));
            enc4 = this._keyStr.indexOf(input.charAt(i++));

            chr1 = (enc1 << 2) | (enc2 >> 4);
            chr2 = ((enc2 & 15) << 4) | (enc3 >> 2);
            chr3 = ((enc3 & 3) << 6) | enc4;

            output = output + String.fromCharCode(chr1);

            if (enc3 != 64) {
                output = output + String.fromCharCode(chr2);
            }
            if (enc4 != 64) {
                output = output + String.fromCharCode(chr3);
            }

        }

        output = Base64._utf8_decode(output);

        return output;

    },

    // private method for UTF-8 encoding
    _utf8_encode : function (string) {
        string = string.replace(/\r\n/g,"\n");
        var utftext = "";

        for (var n = 0; n < string.length; n++) {

            var c = string.charCodeAt(n);

            if (c < 128) {
                utftext += String.fromCharCode(c);
            }
            else if((c > 127) && (c < 2048)) {
                utftext += String.fromCharCode((c >> 6) | 192);
                utftext += String.fromCharCode((c & 63) | 128);
            }
            else {
                utftext += String.fromCharCode((c >> 12) | 224);
                utftext += String.fromCharCode(((c >> 6) & 63) | 128);
                utftext += String.fromCharCode((c & 63) | 128);
            }

        }

        return utftext;
    },

    // private method for UTF-8 decoding
    _utf8_decode : function (utftext) {
        var string = "";
        var i = 0;
        var c = c1 = c2 = 0;

        while ( i < utftext.length ) {

            c = utftext.charCodeAt(i);

            if (c < 128) {
                string += String.fromCharCode(c);
                i++;
            }
            else if((c > 191) && (c < 224)) {
                c2 = utftext.charCodeAt(i+1);
                string += String.fromCharCode(((c & 31) << 6) | (c2 & 63));
                i += 2;
            }
            else {
                c2 = utftext.charCodeAt(i+1);
                c3 = utftext.charCodeAt(i+2);
                string += String.fromCharCode(((c & 15) << 12) | ((c2 & 63) << 6) | (c3 & 63));
                i += 3;
            }

        }

        return string;
    }

}

function serializeArray(a)
{
	var serializedString = '';
	var arrayLength = 0;
	for(var aKey in a)
	{
		//key definition
		if(aKey * 1 == aKey) //is_numeric?
		{
			//integer keys look like i:key
			serializedString += 'i:' + aKey + ';';	
		}
		else
		{
			//string keys look like s:key_length:key;
			serializedString += 's:' + aKey.length + ':"' + aKey + '";';
		}
		
		//value definition
		if(a[aKey] * 1 == a[aKey])
		{
			//integer value look like i:value
			serializedString += 'i:' + a[aKey] + ';';	
		}
		else if(typeof(a[aKey]) == "string")
		{
			//string value look like s:key_length:value;
			serializedString += 's:' + a[aKey].length + ':"' + a[aKey] + '";';
		}
		else if(a[aKey] instanceof Array)
		{
			serializedString += serializeArray(a[aKey]);
		}
		arrayLength++;
	}
	serializedString = 'a:' + arrayLength + ':{' + serializedString + '}';
	
	return serializedString;
}

function print_r(arr,level) {
	var dumped_text = "";
	if(!level) level = 0;
	
	//The padding given at the beginning of the line.
	var level_padding = "";
	for(var j=0;j<level+1;j++) level_padding += "    ";
	
	if(typeof(arr) == 'object') { //Array/Hashes/Objects 
		for(var item in arr) {
			var value = arr[item];
			
			if(typeof(value) == 'object') { //If it is an array,
				dumped_text += level_padding + "'" + item + "' ...\n";
				dumped_text += dump(value,level+1);
			} else {
				dumped_text += level_padding + "'" + item + "' => \"" + value + "\"\n";
			}
		}
	} else { //Stings/Chars/Numbers etc.
		dumped_text = "===>"+arr+"<===("+typeof(arr)+")";
	}
	return dumped_text;
}
function validateForm(form) {

  for(i=0; i<form.elements.length; i++) {
    if (form.elements[i].value == '') {
      alert ("Please fill the form correctly !");
      return false;
      break;
    }
  }

return true;
}

function replaceHtml(el, html) {
	var oldEl = typeof el === "string" ? document.getElementById(el) : el;
	var newEl = oldEl.cloneNode(false);
	newEl.innerHTML = html;
        /* alert(oldEl.id+'<br>'+html); */
	if (is_object(oldEl.parentNode)) oldEl.parentNode.replaceChild(newEl, oldEl);
	/* Since we just removed the old element from the DOM, return a reference
	to the new element, which can be used to restore variable references. */
};

function is_object( mixed_var ){
    if(mixed_var instanceof Array) {
        return false;
    } else {
        return (mixed_var !== null) && (typeof( mixed_var ) == 'object');
    }
}

function replaceHtml_orig(el, html) {
	var oldEl = typeof el === "string" ? document.getElementById(el) : el;
	/*@cc_on // Pure innerHTML is slightly faster in IE
		oldEl.innerHTML = html;
		return oldEl;
	@*/
	var newEl = oldEl.cloneNode(false);
	newEl.innerHTML = html;
	if (is_object(oldEl.parentNode)) oldEl.parentNode.replaceChild(newEl, oldEl);
	/* Since we just removed the old element from the DOM, return a reference
	to the new element, which can be used to restore variable references. */
	return newEl;
};

// Create a JSON object only if one does not already exist. We create the
// methods in a closure to avoid creating global variables.

if (!this.JSON) {
    JSON = {};
}
(function () {

    function f(n) {
        // Format integers to have at least two digits.
        return n < 10 ? '0' + n : n;
    }

    if (typeof Date.prototype.toJSON !== 'function') {

        Date.prototype.toJSON = function (key) {

            return this.getUTCFullYear()   + '-' +
                 f(this.getUTCMonth() + 1) + '-' +
                 f(this.getUTCDate())      + 'T' +
                 f(this.getUTCHours())     + ':' +
                 f(this.getUTCMinutes())   + ':' +
                 f(this.getUTCSeconds())   + 'Z';
        };

        String.prototype.toJSON =
        Number.prototype.toJSON =
        Boolean.prototype.toJSON = function (key) {
            return this.valueOf();
        };
    }

    var cx = /[\u0000\u00ad\u0600-\u0604\u070f\u17b4\u17b5\u200c-\u200f\u2028-\u202f\u2060-\u206f\ufeff\ufff0-\uffff]/g,
        escapable = /[\\\"\x00-\x1f\x7f-\x9f\u00ad\u0600-\u0604\u070f\u17b4\u17b5\u200c-\u200f\u2028-\u202f\u2060-\u206f\ufeff\ufff0-\uffff]/g,
        gap,
        indent,
        meta = {    // table of character substitutions
            '\b': '\\b',
            '\t': '\\t',
            '\n': '\\n',
            '\f': '\\f',
            '\r': '\\r',
            '"' : '\\"',
            '\\': '\\\\'
        },
        rep;


    function quote(string) {

// If the string contains no control characters, no quote characters, and no
// backslash characters, then we can safely slap some quotes around it.
// Otherwise we must also replace the offending characters with safe escape
// sequences.

        escapable.lastIndex = 0;
        return escapable.test(string) ?
            '"' + string.replace(escapable, function (a) {
                var c = meta[a];
                return typeof c === 'string' ? c :
                    '\\u' + ('0000' + a.charCodeAt(0).toString(16)).slice(-4);
            }) + '"' :
            '"' + string + '"';
    }


    function str(key, holder) {

// Produce a string from holder[key].

        var i,          // The loop counter.
            k,          // The member key.
            v,          // The member value.
            length,
            mind = gap,
            partial,
            value = holder[key];

// If the value has a toJSON method, call it to obtain a replacement value.

        if (value && typeof value === 'object' &&
                typeof value.toJSON === 'function') {
            value = value.toJSON(key);
        }

// If we were called with a replacer function, then call the replacer to
// obtain a replacement value.

        if (typeof rep === 'function') {
            value = rep.call(holder, key, value);
        }

// What happens next depends on the value's type.

        switch (typeof value) {
        case 'string':
            return quote(value);

        case 'number':

// JSON numbers must be finite. Encode non-finite numbers as null.

            return isFinite(value) ? String(value) : 'null';

        case 'boolean':
        case 'null':

// If the value is a boolean or null, convert it to a string. Note:
// typeof null does not produce 'null'. The case is included here in
// the remote chance that this gets fixed someday.

            return String(value);

// If the type is 'object', we might be dealing with an object or an array or
// null.

        case 'object':

// Due to a specification blunder in ECMAScript, typeof null is 'object',
// so watch out for that case.

            if (!value) {
                return 'null';
            }

// Make an array to hold the partial results of stringifying this object value.

            gap += indent;
            partial = [];

// Is the value an array?

            if (Object.prototype.toString.apply(value) === '[object Array]') {

// The value is an array. Stringify every element. Use null as a placeholder
// for non-JSON values.

                length = value.length;
                for (i = 0; i < length; i += 1) {
                    partial[i] = str(i, value) || 'null';
                }

// Join all of the elements together, separated with commas, and wrap them in
// brackets.

                v = partial.length === 0 ? '[]' :
                    gap ? '[\n' + gap +
                            partial.join(',\n' + gap) + '\n' +
                                mind + ']' :
                          '[' + partial.join(',') + ']';
                gap = mind;
                return v;
            }

// If the replacer is an array, use it to select the members to be stringified.

            if (rep && typeof rep === 'object') {
                length = rep.length;
                for (i = 0; i < length; i += 1) {
                    k = rep[i];
                    if (typeof k === 'string') {
                        v = str(k, value);
                        if (v) {
                            partial.push(quote(k) + (gap ? ': ' : ':') + v);
                        }
                    }
                }
            } else {

// Otherwise, iterate through all of the keys in the object.

                for (k in value) {
                    if (Object.hasOwnProperty.call(value, k)) {
                        v = str(k, value);
                        if (v) {
                            partial.push(quote(k) + (gap ? ': ' : ':') + v);
                        }
                    }
                }
            }

// Join all of the member texts together, separated with commas,
// and wrap them in braces.

            v = partial.length === 0 ? '{}' :
                gap ? '{\n' + gap + partial.join(',\n' + gap) + '\n' +
                        mind + '}' : '{' + partial.join(',') + '}';
            gap = mind;
            return v;
        }
    }

// If the JSON object does not yet have a stringify method, give it one.

    if (typeof JSON.stringify !== 'function') {
        JSON.stringify = function (value, replacer, space) {

// The stringify method takes a value and an optional replacer, and an optional
// space parameter, and returns a JSON text. The replacer can be a function
// that can replace values, or an array of strings that will select the keys.
// A default replacer method can be provided. Use of the space parameter can
// produce text that is more easily readable.

            var i;
            gap = '';
            indent = '';

// If the space parameter is a number, make an indent string containing that
// many spaces.

            if (typeof space === 'number') {
                for (i = 0; i < space; i += 1) {
                    indent += ' ';
                }

// If the space parameter is a string, it will be used as the indent string.

            } else if (typeof space === 'string') {
                indent = space;
            }

// If there is a replacer, it must be a function or an array.
// Otherwise, throw an error.

            rep = replacer;
            if (replacer && typeof replacer !== 'function' &&
                    (typeof replacer !== 'object' ||
                     typeof replacer.length !== 'number')) {
                throw new Error('JSON.stringify');
            }

// Make a fake root object containing our value under the key of ''.
// Return the result of stringifying the value.

            return str('', {'': value});
        };
    }


// If the JSON object does not yet have a parse method, give it one.

    if (typeof JSON.parse !== 'function') {
        JSON.parse = function (text, reviver) {

// The parse method takes a text and an optional reviver function, and returns
// a JavaScript value if the text is a valid JSON text.

            var j;

            function walk(holder, key) {

// The walk method is used to recursively walk the resulting structure so
// that modifications can be made.

                var k, v, value = holder[key];
                if (value && typeof value === 'object') {
                    for (k in value) {
                        if (Object.hasOwnProperty.call(value, k)) {
                            v = walk(value, k);
                            if (v !== undefined) {
                                value[k] = v;
                            } else {
                                delete value[k];
                            }
                        }
                    }
                }
                return reviver.call(holder, key, value);
            }


// Parsing happens in four stages. In the first stage, we replace certain
// Unicode characters with escape sequences. JavaScript handles many characters
// incorrectly, either silently deleting them, or treating them as line endings.

            cx.lastIndex = 0;
            if (cx.test(text)) {
                text = text.replace(cx, function (a) {
                    return '\\u' +
                        ('0000' + a.charCodeAt(0).toString(16)).slice(-4);
                });
            }

// In the second stage, we run the text against regular expressions that look
// for non-JSON patterns. We are especially concerned with '()' and 'new'
// because they can cause invocation, and '=' because it can cause mutation.
// But just to be safe, we want to reject all unexpected forms.

// We split the second stage into 4 regexp operations in order to work around
// crippling inefficiencies in IE's and Safari's regexp engines. First we
// replace the JSON backslash pairs with '@' (a non-JSON character). Second, we
// replace all simple value tokens with ']' characters. Third, we delete all
// open brackets that follow a colon or comma or that begin the text. Finally,
// we look to see that the remaining characters are only whitespace or ']' or
// ',' or ':' or '{' or '}'. If that is so, then the text is safe for eval.

            if (/^[\],:{}\s]*$/.
test(text.replace(/\\(?:["\\\/bfnrt]|u[0-9a-fA-F]{4})/g, '@').
replace(/"[^"\\\n\r]*"|true|false|null|-?\d+(?:\.\d*)?(?:[eE][+\-]?\d+)?/g, ']').
replace(/(?:^|:|,)(?:\s*\[)+/g, ''))) {

// In the third stage we use the eval function to compile the text into a
// JavaScript structure. The '{' operator is subject to a syntactic ambiguity
// in JavaScript: it can begin a block or an object literal. We wrap the text
// in parens to eliminate the ambiguity.

                j = eval('(' + text + ')');

// In the optional fourth stage, we recursively walk the new structure, passing
// each name/value pair to a reviver function for possible transformation.

                return typeof reviver === 'function' ?
                    walk({'': j}, '') : j;
            }

// If the text is not JSON parseable, then a SyntaxError is thrown.

            throw new SyntaxError('JSON.parse');
        };
    }
})();