/*

 * Copyright (c) 2015, 2016, 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.

 */

/*

 * @test

 * @bug 8156486

 * @run testng/othervm VarHandleTestMethodTypeString

 * @run testng/othervm -Djava.lang.invoke.VarHandle.VAR_HANDLE_GUARDS=false VarHandleTestMethodTypeString

 */

import org.testng.annotations.BeforeClass;

import org.testng.annotations.DataProvider;

import org.testng.annotations.Test;

import java.lang.invoke.MethodHandles;

import java.lang.invoke.VarHandle;

import java.util.ArrayList;

import java.util.Arrays;

import java.util.List;

import static org.testng.Assert.*;

import static java.lang.invoke.MethodType.*;

public class VarHandleTestMethodTypeString extends VarHandleBaseTest {

    static final String static_final_v = "foo";

    static String static_v = "foo";

    final String final_v = "foo";

    String v = "foo";

    VarHandle vhFinalField;

    VarHandle vhField;

    VarHandle vhStaticField;

    VarHandle vhStaticFinalField;

    VarHandle vhArray;

    @BeforeClass

    public void setup() throws Exception {

        vhFinalField = MethodHandles.lookup().findVarHandle(

                VarHandleTestMethodTypeString.class, "final_v", String.class);

        vhField = MethodHandles.lookup().findVarHandle(

                VarHandleTestMethodTypeString.class, "v", String.class);

        vhStaticFinalField = MethodHandles.lookup().findStaticVarHandle(

            VarHandleTestMethodTypeString.class, "static_final_v", String.class);

        vhStaticField = MethodHandles.lookup().findStaticVarHandle(

            VarHandleTestMethodTypeString.class, "static_v", String.class);

        vhArray = MethodHandles.arrayElementVarHandle(String[].class);

    }

    @DataProvider

    public Object[][] accessTestCaseProvider() throws Exception {

        List<AccessTestCase<?>> cases = new ArrayList<>();

        cases.add(new VarHandleAccessTestCase("Instance field",

                                              vhField, vh -> testInstanceFieldWrongMethodType(this, vh),

                                              false));

        cases.add(new VarHandleAccessTestCase("Static field",

                                              vhStaticField, VarHandleTestMethodTypeString::testStaticFieldWrongMethodType,

                                              false));

        cases.add(new VarHandleAccessTestCase("Array",

                                              vhArray, VarHandleTestMethodTypeString::testArrayWrongMethodType,

                                              false));

        for (VarHandleToMethodHandle f : VarHandleToMethodHandle.values()) {

            cases.add(new MethodHandleAccessTestCase("Instance field",

                                                     vhField, f, hs -> testInstanceFieldWrongMethodType(this, hs),

                                                     false));

            cases.add(new MethodHandleAccessTestCase("Static field",

                                                     vhStaticField, f, VarHandleTestMethodTypeString::testStaticFieldWrongMethodType,

                                                     false));

            cases.add(new MethodHandleAccessTestCase("Array",

                                                     vhArray, f, VarHandleTestMethodTypeString::testArrayWrongMethodType,

                                                     false));

        }

        // Work around issue with jtreg summary reporting which truncates

        // the String result of Object.toString to 30 characters, hence

        // the first dummy argument

        return cases.stream().map(tc -> new Object[]{tc.toString(), tc}).toArray(Object[][]::new);

    }

    @Test(dataProvider = "accessTestCaseProvider")

    public <T> void testAccess(String desc, AccessTestCase<T> atc) throws Throwable {

        T t = atc.get();

        int iters = atc.requiresLoop() ? ITERS : 1;

        for (int c = 0; c < iters; c++) {

            atc.testAccess(t);

        }

    }

    static void testInstanceFieldWrongMethodType(VarHandleTestMethodTypeString recv, VarHandle vh) throws Throwable {

        // Get

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            String x = (String) vh.get(null);

        });

        checkCCE(() -> { // receiver reference class

            String x = (String) vh.get(Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            String x = (String) vh.get(0);

        });

        // Incorrect return type

        checkCCE(() -> { // reference class

            Void x = (Void) vh.get(recv);

        });

        checkWMTE(() -> { // primitive class

            boolean x = (boolean) vh.get(recv);

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            String x = (String) vh.get();

        });

        checkWMTE(() -> { // >

            String x = (String) vh.get(recv, Void.class);

        });

        // Set

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            vh.set(null, "foo");

        });

        checkCCE(() -> { // receiver reference class

            vh.set(Void.class, "foo");

        });

        checkCCE(() -> { // value reference class

            vh.set(recv, Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            vh.set(0, "foo");

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            vh.set();

        });

        checkWMTE(() -> { // >

            vh.set(recv, "foo", Void.class);

        });

        // GetVolatile

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            String x = (String) vh.getVolatile(null);

        });

        checkCCE(() -> { // receiver reference class

            String x = (String) vh.getVolatile(Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            String x = (String) vh.getVolatile(0);

        });

        // Incorrect return type

        checkCCE(() -> { // reference class

            Void x = (Void) vh.getVolatile(recv);

        });

        checkWMTE(() -> { // primitive class

            boolean x = (boolean) vh.getVolatile(recv);

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            String x = (String) vh.getVolatile();

        });

        checkWMTE(() -> { // >

            String x = (String) vh.getVolatile(recv, Void.class);

        });

        // SetVolatile

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            vh.setVolatile(null, "foo");

        });

        checkCCE(() -> { // receiver reference class

            vh.setVolatile(Void.class, "foo");

        });

        checkCCE(() -> { // value reference class

            vh.setVolatile(recv, Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            vh.setVolatile(0, "foo");

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            vh.setVolatile();

        });

        checkWMTE(() -> { // >

            vh.setVolatile(recv, "foo", Void.class);

        });

        // GetOpaque

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            String x = (String) vh.getOpaque(null);

        });

        checkCCE(() -> { // receiver reference class

            String x = (String) vh.getOpaque(Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            String x = (String) vh.getOpaque(0);

        });

        // Incorrect return type

        checkCCE(() -> { // reference class

            Void x = (Void) vh.getOpaque(recv);

        });

        checkWMTE(() -> { // primitive class

            boolean x = (boolean) vh.getOpaque(recv);

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            String x = (String) vh.getOpaque();

        });

        checkWMTE(() -> { // >

            String x = (String) vh.getOpaque(recv, Void.class);

        });

        // SetOpaque

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            vh.setOpaque(null, "foo");

        });

        checkCCE(() -> { // receiver reference class

            vh.setOpaque(Void.class, "foo");

        });

        checkCCE(() -> { // value reference class

            vh.setOpaque(recv, Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            vh.setOpaque(0, "foo");

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            vh.setOpaque();

        });

        checkWMTE(() -> { // >

            vh.setOpaque(recv, "foo", Void.class);

        });

        // GetAcquire

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            String x = (String) vh.getAcquire(null);

        });

        checkCCE(() -> { // receiver reference class

            String x = (String) vh.getAcquire(Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            String x = (String) vh.getAcquire(0);

        });

        // Incorrect return type

        checkCCE(() -> { // reference class

            Void x = (Void) vh.getAcquire(recv);

        });

        checkWMTE(() -> { // primitive class

            boolean x = (boolean) vh.getAcquire(recv);

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            String x = (String) vh.getAcquire();

        });

        checkWMTE(() -> { // >

            String x = (String) vh.getAcquire(recv, Void.class);

        });

        // SetRelease

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            vh.setRelease(null, "foo");

        });

        checkCCE(() -> { // receiver reference class

            vh.setRelease(Void.class, "foo");

        });

        checkCCE(() -> { // value reference class

            vh.setRelease(recv, Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            vh.setRelease(0, "foo");

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            vh.setRelease();

        });

        checkWMTE(() -> { // >

            vh.setRelease(recv, "foo", Void.class);

        });

        // CompareAndSet

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            boolean r = vh.compareAndSet(null, "foo", "foo");

        });

        checkCCE(() -> { // receiver reference class

            boolean r = vh.compareAndSet(Void.class, "foo", "foo");

        });

        checkCCE(() -> { // expected reference class

            boolean r = vh.compareAndSet(recv, Void.class, "foo");

        });

        checkCCE(() -> { // actual reference class

            boolean r = vh.compareAndSet(recv, "foo", Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            boolean r = vh.compareAndSet(0, "foo", "foo");

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            boolean r = vh.compareAndSet();

        });

        checkWMTE(() -> { // >

            boolean r = vh.compareAndSet(recv, "foo", "foo", Void.class);

        });

        // WeakCompareAndSet

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            boolean r = vh.weakCompareAndSetPlain(null, "foo", "foo");

        });

        checkCCE(() -> { // receiver reference class

            boolean r = vh.weakCompareAndSetPlain(Void.class, "foo", "foo");

        });

        checkCCE(() -> { // expected reference class

            boolean r = vh.weakCompareAndSetPlain(recv, Void.class, "foo");

        });

        checkCCE(() -> { // actual reference class

            boolean r = vh.weakCompareAndSetPlain(recv, "foo", Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            boolean r = vh.weakCompareAndSetPlain(0, "foo", "foo");

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            boolean r = vh.weakCompareAndSetPlain();

        });

        checkWMTE(() -> { // >

            boolean r = vh.weakCompareAndSetPlain(recv, "foo", "foo", Void.class);

        });

        // WeakCompareAndSetVolatile

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            boolean r = vh.weakCompareAndSet(null, "foo", "foo");

        });

        checkCCE(() -> { // receiver reference class

            boolean r = vh.weakCompareAndSet(Void.class, "foo", "foo");

        });

        checkCCE(() -> { // expected reference class

            boolean r = vh.weakCompareAndSet(recv, Void.class, "foo");

        });

        checkCCE(() -> { // actual reference class

            boolean r = vh.weakCompareAndSet(recv, "foo", Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            boolean r = vh.weakCompareAndSet(0, "foo", "foo");

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            boolean r = vh.weakCompareAndSet();

        });

        checkWMTE(() -> { // >

            boolean r = vh.weakCompareAndSet(recv, "foo", "foo", Void.class);

        });

        // WeakCompareAndSetAcquire

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            boolean r = vh.weakCompareAndSetAcquire(null, "foo", "foo");

        });

        checkCCE(() -> { // receiver reference class

            boolean r = vh.weakCompareAndSetAcquire(Void.class, "foo", "foo");

        });

        checkCCE(() -> { // expected reference class

            boolean r = vh.weakCompareAndSetAcquire(recv, Void.class, "foo");

        });

        checkCCE(() -> { // actual reference class

            boolean r = vh.weakCompareAndSetAcquire(recv, "foo", Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            boolean r = vh.weakCompareAndSetAcquire(0, "foo", "foo");

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            boolean r = vh.weakCompareAndSetAcquire();

        });

        checkWMTE(() -> { // >

            boolean r = vh.weakCompareAndSetAcquire(recv, "foo", "foo", Void.class);

        });

        // WeakCompareAndSetRelease

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            boolean r = vh.weakCompareAndSetRelease(null, "foo", "foo");

        });

        checkCCE(() -> { // receiver reference class

            boolean r = vh.weakCompareAndSetRelease(Void.class, "foo", "foo");

        });

        checkCCE(() -> { // expected reference class

            boolean r = vh.weakCompareAndSetRelease(recv, Void.class, "foo");

        });

        checkCCE(() -> { // actual reference class

            boolean r = vh.weakCompareAndSetRelease(recv, "foo", Void.class);

        });

        checkWMTE(() -> { // receiver primitive class

            boolean r = vh.weakCompareAndSetRelease(0, "foo", "foo");

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            boolean r = vh.weakCompareAndSetRelease();

        });

        checkWMTE(() -> { // >

            boolean r = vh.weakCompareAndSetRelease(recv, "foo", "foo", Void.class);

        });

        // CompareAndExchange

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            String x = (String) vh.compareAndExchange(null, "foo", "foo");

        });

        checkCCE(() -> { // receiver reference class

            String x = (String) vh.compareAndExchange(Void.class, "foo", "foo");

        });

        checkCCE(() -> { // expected reference class

            String x = (String) vh.compareAndExchange(recv, Void.class, "foo");

        });

        checkCCE(() -> { // actual reference class

            String x = (String) vh.compareAndExchange(recv, "foo", Void.class);

        });

        checkWMTE(() -> { // reciever primitive class

            String x = (String) vh.compareAndExchange(0, "foo", "foo");

        });

        // Incorrect return type

        checkCCE(() -> { // reference class

            Void r = (Void) vh.compareAndExchange(recv, "foo", "foo");

        });

        checkWMTE(() -> { // primitive class

            boolean x = (boolean) vh.compareAndExchange(recv, "foo", "foo");

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            String x = (String) vh.compareAndExchange();

        });

        checkWMTE(() -> { // >

            String x = (String) vh.compareAndExchange(recv, "foo", "foo", Void.class);

        });

        // CompareAndExchangeAcquire

        // Incorrect argument types

        checkNPE(() -> { // null receiver

            String x = (String) vh.compareAndExchangeAcquire(null, "foo", "foo");

        });

        checkCCE(() -> { // receiver reference class

            String x = (String) vh.compareAndExchangeAcquire(Void.class, "foo", "foo");

        });

        checkCCE(() -> { // expected reference class

            String x = (String) vh.compareAndExchangeAcquire(recv, Void.class, "foo");

        });

        checkCCE(() -> { // actual reference class

            String x = (String) vh.compareAndExchangeAcquire(recv, "foo", Void.class);

        });

        checkWMTE(() -> { // reciever primitive class

            String x = (String) vh.compareAndExchangeAcquire(0, "foo", "foo");

        });

        // Incorrect return type

        checkCCE(() -> { // reference class

            Void r = (Void) vh.compareAndExchangeAcquire(recv, "foo", "foo");

        });

        checkWMTE(() -> { // primitive class

            boolean x = (boolean) vh.compareAndExchangeAcquire(recv, "foo", "foo");

        });

        // Incorrect arity

        checkWMTE(() -> { // 0

            String x = (String) vh.compareAndExchangeAcquire();

        });

        checkWMTE(() -> { // >

            String x = (String) vh.compareAndExchangeAcquire(recv, "foo", "foo", Void.class);

        });

        // CompareAndExchangeRelease