michael@0: /* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
michael@0: /* This Source Code Form is subject to the terms of the Mozilla Public
michael@0:  * License, v. 2.0. If a copy of the MPL was not distributed with this
michael@0:  * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
michael@0: 
michael@0: 
michael@0: /**
michael@0:    File Name:          15.1.2.4.js
michael@0:    ECMA Section:       15.1.2.4  Function properties of the global object
michael@0:    escape( string )
michael@0: 
michael@0:    Description:
michael@0:    The escape function computes a new version of a string value in which
michael@0:    certain characters have been replaced by a hexadecimal escape sequence.
michael@0:    The result thus contains no special characters that might have special
michael@0:    meaning within a URL.
michael@0: 
michael@0:    For characters whose Unicode encoding is 0xFF or less, a two-digit
michael@0:    escape sequence of the form %xx is used in accordance with RFC1738.
michael@0:    For characters whose Unicode encoding is greater than 0xFF, a four-
michael@0:    digit escape sequence of the form %uxxxx is used.
michael@0: 
michael@0:    When the escape function is called with one argument string, the
michael@0:    following steps are taken:
michael@0: 
michael@0:    1.  Call ToString(string).
michael@0:    2.  Compute the number of characters in Result(1).
michael@0:    3.  Let R be the empty string.
michael@0:    4.  Let k be 0.
michael@0:    5.  If k equals Result(2), return R.
michael@0:    6.  Get the character at position k within Result(1).
michael@0:    7.  If Result(6) is one of the 69 nonblank ASCII characters
michael@0:    ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz
michael@0:    0123456789 @*_+-./, go to step 14.
michael@0:    8.  Compute the 16-bit unsigned integer that is the Unicode character
michael@0:    encoding of Result(6).
michael@0:    9.  If Result(8), is less than 256, go to step 12.
michael@0:    10.  Let S be a string containing six characters "%uwxyz" where wxyz are
michael@0:    four hexadecimal digits encoding the value of Result(8).
michael@0:    11.  Go to step 15.
michael@0:    12.  Let S be a string containing three characters "%xy" where xy are two
michael@0:    hexadecimal digits encoding the value of Result(8).
michael@0:    13.  Go to step 15.
michael@0:    14.  Let S be a string containing the single character Result(6).
michael@0:    15.  Let R be a new string value computed by concatenating the previous value
michael@0:    of R and S.
michael@0:    16.  Increase k by 1.
michael@0:    17.  Go to step 5.
michael@0: 
michael@0:    Author:             christine@netscape.com
michael@0:    Date:               28 october 1997
michael@0: 
michael@0: */
michael@0: var SECTION = "15.1.2.4";
michael@0: var VERSION = "ECMA_1";
michael@0: startTest();
michael@0: var TITLE   = "escape(string)";
michael@0: 
michael@0: writeHeaderToLog( SECTION + " "+ TITLE);
michael@0: 
michael@0: new TestCase( SECTION, "escape.length",         1,          escape.length );
michael@0: new TestCase( SECTION, "escape.length = null; escape.length",   1,  eval("escape.length = null; escape.length") );
michael@0: new TestCase( SECTION, "delete escape.length",                  false,  delete escape.length );
michael@0: new TestCase( SECTION, "delete escape.length; escape.length",   1,      eval("delete escape.length; escape.length") );
michael@0: new TestCase( SECTION, "var MYPROPS=''; for ( var p in escape ) { MYPROPS+= p}; MYPROPS",    "",    eval("var MYPROPS=''; for ( var p in escape ) { MYPROPS+= p}; MYPROPS") );
michael@0: 
michael@0: new TestCase( SECTION, "escape()",              "undefined",    escape() );
michael@0: new TestCase( SECTION, "escape('')",            "",             escape('') );
michael@0: new TestCase( SECTION, "escape( null )",        "null",         escape(null) );
michael@0: new TestCase( SECTION, "escape( void 0 )",      "undefined",    escape(void 0) );
michael@0: new TestCase( SECTION, "escape( true )",        "true",         escape( true ) );
michael@0: new TestCase( SECTION, "escape( false )",       "false",        escape( false ) );
michael@0: 
michael@0: new TestCase( SECTION, "escape( new Boolean(true) )",   "true", escape(new Boolean(true)) );
michael@0: new TestCase( SECTION, "escape( new Boolean(false) )",  "false",    escape(new Boolean(false)) );
michael@0: 
michael@0: new TestCase( SECTION, "escape( Number.NaN  )",                 "NaN",      escape(Number.NaN) );
michael@0: new TestCase( SECTION, "escape( -0 )",                          "0",        escape( -0 ) );
michael@0: new TestCase( SECTION, "escape( 'Infinity' )",                  "Infinity", escape( "Infinity" ) );
michael@0: new TestCase( SECTION, "escape( Number.POSITIVE_INFINITY )",    "Infinity", escape( Number.POSITIVE_INFINITY ) );
michael@0: new TestCase( SECTION, "escape( Number.NEGATIVE_INFINITY )",    "-Infinity", escape( Number.NEGATIVE_INFINITY ) );
michael@0: 
michael@0: var ASCII_TEST_STRING = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789@*_+-./";
michael@0: 
michael@0: new TestCase( SECTION, "escape( " +ASCII_TEST_STRING+" )",    ASCII_TEST_STRING,  escape( ASCII_TEST_STRING ) );
michael@0: 
michael@0: // ASCII value less than
michael@0: 
michael@0: for ( var CHARCODE = 0; CHARCODE < 32; CHARCODE++ ) {
michael@0:   new TestCase( SECTION,
michael@0: 		"escape(String.fromCharCode("+CHARCODE+"))",
michael@0: 		"%"+ToHexString(CHARCODE),
michael@0: 		escape(String.fromCharCode(CHARCODE))  );
michael@0: }
michael@0: for ( var CHARCODE = 128; CHARCODE < 256; CHARCODE++ ) {
michael@0:   new TestCase( SECTION,
michael@0: 		"escape(String.fromCharCode("+CHARCODE+"))",
michael@0: 		"%"+ToHexString(CHARCODE),
michael@0: 		escape(String.fromCharCode(CHARCODE))  );
michael@0: }
michael@0: 
michael@0: for ( var CHARCODE = 256; CHARCODE < 1024; CHARCODE++ ) {
michael@0:   new TestCase( SECTION,
michael@0: 		"escape(String.fromCharCode("+CHARCODE+"))",
michael@0: 		"%u"+ ToUnicodeString(CHARCODE),
michael@0: 		escape(String.fromCharCode(CHARCODE))  );
michael@0: }
michael@0: for ( var CHARCODE = 65500; CHARCODE < 65536; CHARCODE++ ) {
michael@0:   new TestCase( SECTION,
michael@0: 		"escape(String.fromCharCode("+CHARCODE+"))",
michael@0: 		"%u"+ ToUnicodeString(CHARCODE),
michael@0: 		escape(String.fromCharCode(CHARCODE))  );
michael@0: }
michael@0: 
michael@0: test();
michael@0: 
michael@0: function ToUnicodeString( n ) {
michael@0:   var string = ToHexString(n);
michael@0: 
michael@0:   for ( var PAD = (4 - string.length ); PAD > 0; PAD-- ) {
michael@0:     string = "0" + string;
michael@0:   }
michael@0: 
michael@0:   return string;
michael@0: }
michael@0: function ToHexString( n ) {
michael@0:   var hex = new Array();
michael@0: 
michael@0:   for ( var mag = 1; Math.pow(16,mag) <= n ; mag++ ) {
michael@0:     ;
michael@0:   }
michael@0: 
michael@0:   for ( index = 0, mag -= 1; mag > 0; index++, mag-- ) {
michael@0:     hex[index] = Math.floor( n / Math.pow(16,mag) );
michael@0:     n -= Math.pow(16,mag) * Math.floor( n/Math.pow(16,mag) );
michael@0:   }
michael@0: 
michael@0:   hex[hex.length] = n % 16;
michael@0: 
michael@0:   var string ="";
michael@0: 
michael@0:   for ( var index = 0 ; index < hex.length ; index++ ) {
michael@0:     switch ( hex[index] ) {
michael@0:     case 10:
michael@0:       string += "A";
michael@0:       break;
michael@0:     case 11:
michael@0:       string += "B";
michael@0:       break;
michael@0:     case 12:
michael@0:       string += "C";
michael@0:       break;
michael@0:     case 13:
michael@0:       string += "D";
michael@0:       break;
michael@0:     case 14:
michael@0:       string += "E";
michael@0:       break;
michael@0:     case 15:
michael@0:       string += "F";
michael@0:       break;
michael@0:     default:
michael@0:       string += hex[index];
michael@0:     }
michael@0:   }
michael@0: 
michael@0:   if ( string.length == 1 ) {
michael@0:     string = "0" + string;
michael@0:   }
michael@0:   return string;
michael@0: }