/* ***** BEGIN LICENSE BLOCK *****
* Version: NPL 1.1/GPL 2.0/LGPL 2.1
*
* The contents of this file are subject to the Netscape Public License
* Version 1.1 (the "License"); you may not use this file except in
* compliance with the License. You may obtain a copy of the License at
* http://www.mozilla.org/NPL/
*
* Software distributed under the License is distributed on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
* for the specific language governing rights and limitations under the
* License.
*
* The Original Code is JavaScript Engine testing utilities.
*
* The Initial Developer of the Original Code is Netscape Communications Corp.
* Portions created by the Initial Developer are Copyright (C) 2002
* the Initial Developer. All Rights Reserved.
*
* Contributor(s): igor@icesoft.no, pschwartau@netscape.com
*
* Alternatively, the contents of this file may be used under the terms of
* either the GNU General Public License Version 2 or later (the "GPL"), or
* the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
* in which case the provisions of the GPL or the LGPL are applicable instead
* of those above. If you wish to allow use of your version of this file only
* under the terms of either the GPL or the LGPL, and not to allow others to
* use your version of this file under the terms of the NPL, indicate your
* decision by deleting the provisions above and replace them with the notice
* and other provisions required by the GPL or the LGPL. If you do not delete
* the provisions above, a recipient may use your version of this file under
* the terms of any one of the NPL, the GPL or the LGPL.
*
* ***** END LICENSE BLOCK *****
*
*
* Date:    09 November 2002
* SUMMARY: Test that interpreter can handle string literals exceeding 64K
* See http://bugzilla.mozilla.org/show_bug.cgi?id=179068
*
* Test that the interpreter can handle string literals exceeding 64K limit.
* For that the script passes to eval() "str ='LONG_STRING_LITERAL';" where
* LONG_STRING_LITERAL is a string with 200K chars.
*
* Igor Bukanov explains the technique used below:
*
* > Philip Schwartau wrote:
* >...
* > Here is the heart of the testcase:
* >
* >   // Generate 200K long string
* >   var long_str = duplicate(LONG_STR_SEED, N);
* >   var str = "";
* >   eval("str='".concat(long_str, "';"));
* >   var test_is_ok = (str.length == LONG_STR_SEED.length * N);
* >
* >
* > The testcase creates two identical strings, |long_str| and |str|. It
* > uses eval() simply to assign the value of |long_str| to |str|. Why is
* > it necessary to have the variable |str|, then? Why not just create
* > |long_str| and test it? Wouldn't this be enough:
* >
* >   // Generate 200K long string
* >   var long_str = duplicate(LONG_STR_SEED, N);
* >   var test_is_ok = (long_str.length == LONG_STR_SEED.length * N);
* >
* > Or do we specifically need to test eval() to exercise the interpreter?
*
* The reason for eval is to test string literals like in 'a string literal
* with 100 000 characters...', Rhino deals fine with strings generated at
* run time where lengths > 64K. Without eval it would be necessary to have
* a test file excedding 64K which is not that polite for CVS and then a
* special treatment for the compiled mode in Rhino should be added.
*
*
* >
* > If so, is it important to use the concat() method in the assignment, as
* > you have done: |eval("str='".concat(long_str, "';"))|, or can we simply
* > do |eval("str = long_str;")| ?
*
* The concat is a replacement for eval("str='"+long_str+"';"), but as
* long_str is huge, this leads to constructing first a new string via
* "str='"+long_str and then another one via ("str='"+long_str) + "';"
* which takes time under JDK 1.1 on a something like StrongArm 200MHz.
* Calling concat makes less copies, that is why it is used in the
* duplicate function and this is faster then doing recursion like in the
* test case to test that 64K different string literals can be handled.
*
*/
//-----------------------------------------------------------------------------
var UBound = 0;
var bug = 179068;
var summary = 'Test that interpreter can handle string literals exceeding 64K';
var status = '';
var statusitems = [];
var actual = '';
var actualvalues = [];
var expect= '';
var expectedvalues = [];
var LONG_STR_SEED = "0123456789";
var N = 20 * 1024;
var str = "";


// Generate 200K long string and assign it to |str| via eval()
var long_str = duplicate(LONG_STR_SEED, N);
eval("str='".concat(long_str, "';"));

status = inSection(1);
actual = str.length == LONG_STR_SEED.length * N
expect = true;
addThis();


//-----------------------------------------------------------------------------
test();
//-----------------------------------------------------------------------------


function duplicate(str, count)
{
  var tmp = new Array(count);

  while (count != 0)
    tmp[--count] = str;

  return String.prototype.concat.apply("", tmp);
}


function addThis()
{
  statusitems[UBound] = status;
  actualvalues[UBound] = actual;
  expectedvalues[UBound] = expect;
  UBound++;
}


function test()
{
  enterFunc('test');
  printBugNumber(bug);
  printStatus(summary);

  for (var i=0; i<UBound; i++)
  {
    reportCompare(expectedvalues[i], actualvalues[i], statusitems[i]);
  }

  exitFunc ('test');
}