/*

 * Copyright (c) 2010, 2014, Oracle and/or its affiliates. All rights reserved.

 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

 *

 * This code is free software; you can redistribute it and/or modify it

 * under the terms of the GNU General Public License version 2 only, as

 * published by the Free Software Foundation.

 *

 * This code 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 General Public License

 * version 2 for more details (a copy is included in the LICENSE file that

 * accompanied this code).

 *

 * You should have received a copy of the GNU General Public License version

 * 2 along with this work; if not, write to the Free Software Foundation,

 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

 *

 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

 * or visit www.oracle.com if you need additional information or have any

 * questions.

 */

/**

 * JDK-8035312 push to frozen array must not increase length property

 *

 * @test

 * @run

 * @fork

 * @option -Dnashorn.debug=true

 */

function printArrayDataClass(x) {

    if (typeof Debug !== 'undefined') {

	print(Debug.getArrayDataClass(x));

    }

}

function gpush(x, elem) {

    try {

	print("Pushing " + elem + " to " + x);

	x.push(elem);

    } catch (e) {

	print("caught error" + e);

    }

    print("\tarray is now [" + x + "] length is = " + x.length);

    print();

    printArrayDataClass(x);

}

function gpop(x) {

    try {

	print("Popping from " + x);

	x.pop();

    } catch (e) {

	if (!(e instanceof TypeError)) {

	    print("e of wrong type " + e);

	}

    }

    print("\tarray is now [" + x + "] length is = " + x.length);

    print();

    printArrayDataClass(x);

}

function checkArray(x) {

    print();

    print(">>> Push test");

    var olen = x.length;

    gpush(x, 0);

    print("x.length === " + x.length + " (should be " + olen + ")");

    print("x[3] === " + x[3] + " (should be 0)");

    print("x[4] === " + x[4] + " (should be undefined)");

    print();

    print(">>> Pop test");

    gpop(x);

    gpop(x);

    print("x.length === " + x.length + " (should be " + olen + ")");

    print("x === " + x);

    for (var i = 0 ; i < 5; i++) {

	gpop(x);

    }

    print("x.length === " + x.length + " (should be " + olen + ")");

    print("x === " + x);

}

print("*** Freezing");

var frozen = [1,2,3];

Object.freeze(frozen);

checkArray(frozen);

printArrayDataClass(frozen);

//so far so good

print();

print("*** Other length not writable issues");

var lengthNotWritable = [1,2,3];

Object.defineProperty(lengthNotWritable, "length", { writable: false });

checkArray(lengthNotWritable);

printArrayDataClass(lengthNotWritable);

function set(array, from, to, stride) {

    //add three elements

    for (var i = from; i < to; i+=stride) {

	try {

	    print("Writing " + i);

	    array[i] = i;

	    printArrayDataClass(array);

	} catch (e) {

	    print(e instanceof TypeError);

	}

    }

}

//define empty array with non writable length

var arr = [1];

Object.defineProperty(arr, "length", { writable: false });

var olen2 = arr.length;

set(arr, 0, 3, 1);

if (arr.length != olen2) {

    throw new ("error: " +  arr.length + " != " + olen2);

}

print();

print("array writing 0-3, with 1 stride, array = " + arr);

print("length = " + arr.length + ", but elements are: " + arr[0] + " " + arr[1] + " " + arr[2]);

print();

//do the same but sparse/deleted range

var arr2 = [1];

Object.defineProperty(arr2, "length", { writable: false });

print("initial length = " + arr2.length);

var olen3 = arr2.length;

set(arr2, 0, 30, 3);

if (arr2.length != olen3) {

    throw new ("error: " +  arr2.length + " != " + olen3);

}

print();

var larger = 20;

print("array writing 0-" + larger + ", with 3 stride, array = " + arr2);

print("length = " + arr2.length + ", but elements are: " + arr2[0] + " " + arr2[1] + " " + arr2[2]);

for (var i = 0; i < larger; i++) {

    if (arr2[i] === undefined) {

	continue;

    }

    print(arr2[i] + " has length " + arr2.length);

}

print();

var elem = 0x7fffffff - 10;

printArrayDataClass(arr2);

print("adding a new element high up in the array");

print("length before element was added " + arr2.length);

print("putting sparse at " + elem);

arr2[elem] = "sparse";

print("length after element was added " + arr2.length + " should be the same");

printArrayDataClass(arr2);

print();

print("Printing arr2 - this will fail if length is > 28 and it is " + arr2.length);

print("arr2 = [" + arr2 + "]");

print("new length that should not be writable = " + arr2.length);

print(arr2[elem] === "sparse");

print(arr2[elem]);

for (var i = 0; i < larger; i++) {

    print(arr2[i]);

}

for (var key in arr2) {

    print(key + ":" + arr2[key]);

}

//issues reported by sundar - generic setter doesn't go through push/pop bulkable

function sundarExample2(arr, _writable) {

    print("Checking if push works for bulkable non bulkable arrays - Setting length property not allowed");

    arr[0] = "bar";

    print(arr.length + " should be 1"); // should be 1

    print(arr[0] + " should be bar");

    print("["+ arr + "] should be [bar]");

    //    Object.defineProperty(arr, "length", { configurable: _writable });

    Object.defineProperty(arr, "length", { writable: _writable });

    arr[1] = "baz";

    if (_writable) {

	print(arr.length + " should be 2");

	print(arr[0] + " should be bar");

	print(arr[1] + " should be baz");

	print("["+ arr + "] should be [bar,baz]");

    } else {

	print(arr.length + " should STILL be 1");

	print(arr[0] + " should be bar");

	print(arr[1] + " should be baz");

	print("["+ arr + "] should be [bar]");

    }

}

var newArr1 = [];

sundarExample2(newArr1, false);

print();

try {

    sundarExample2(newArr1, true);

    print("should not get here");

} catch (e) {

    if (!(e instanceof TypeError)) {

	print("Wrong exception");

    }

    print("got TypeError when redefining length, as expected")

}

print();

sundarExample2([], true);

print("Done");