/*

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

 */

/* Type-specific source code for unit test

 *

 * Regenerate the BasicX classes via genBasic.sh whenever this file changes.

 * We check in the generated source files so that the test tree can be used

 * independently of the rest of the source tree.

 */

#warn This file is preprocessed before being compiled

import java.nio.*;

public class Basic$Type$

    extends Basic

{

    private static final $type$[] VALUES = {

        $Fulltype$.MIN_VALUE,

        ($type$) -1,

        ($type$) 0,

        ($type$) 1,

        $Fulltype$.MAX_VALUE,

#if[float]

        $Fulltype$.NEGATIVE_INFINITY,

        $Fulltype$.POSITIVE_INFINITY,

        $Fulltype$.NaN,

        ($type$) -0.0,

#end[float]

#if[double]

        $Fulltype$.NEGATIVE_INFINITY,

        $Fulltype$.POSITIVE_INFINITY,

        $Fulltype$.NaN,

        ($type$) -0.0,

#end[double]

    };

    private static void relGet($Type$Buffer b) {

        int n = b.capacity();

        for (int i = 0; i < n; i++)

            ck(b, (long)b.get(), (long)(($type$)ic(i)));

        b.rewind();

    }

    private static void relGet($Type$Buffer b, int start) {

        int n = b.remaining();

        for (int i = start; i < n; i++)

            ck(b, (long)b.get(), (long)(($type$)ic(i)));

        b.rewind();

    }

    private static void absGet($Type$Buffer b) {

        int n = b.capacity();

        for (int i = 0; i < n; i++)

            ck(b, (long)b.get(), (long)(($type$)ic(i)));

        b.rewind();

    }

    private static void bulkGet($Type$Buffer b) {

        int n = b.capacity();

        $type$[] a = new $type$[n + 7];

        b.get(a, 7, n);

        for (int i = 0; i < n; i++) {

            ck(b, (long)a[i + 7], (long)(($type$)ic(i)));

        }

    }

    private static void relPut($Type$Buffer b) {

        int n = b.capacity();

        b.clear();

        for (int i = 0; i < n; i++)

            b.put(($type$)ic(i));

        b.flip();

    }

    private static void absPut($Type$Buffer b) {

        int n = b.capacity();

        b.clear();

        for (int i = 0; i < n; i++)

            b.put(i, ($type$)ic(i));

        b.limit(n);

        b.position(0);

    }

    private static void bulkPutArray($Type$Buffer b) {

        int n = b.capacity();

        b.clear();

        $type$[] a = new $type$[n + 7];

        for (int i = 0; i < n; i++)

            a[i + 7] = ($type$)ic(i);

        b.put(a, 7, n);

        b.flip();

    }

    private static void bulkPutBuffer($Type$Buffer b) {

        int n = b.capacity();

        b.clear();

        $Type$Buffer c = $Type$Buffer.allocate(n + 7);

        c.position(7);

        for (int i = 0; i < n; i++)

            c.put(($type$)ic(i));

        c.flip();

        c.position(7);

        b.put(c);

        b.flip();

        try {

            b.put(b);

            fail("IllegalArgumentException expected for put into same buffer");

        } catch (IllegalArgumentException e) {

            if (e.getMessage() == null) {

                fail("Non-null IllegalArgumentException message expected from"

                     + " put into same buffer");

            }

        }

    }

    //6231529

    private static void callReset($Type$Buffer b) {

        b.position(0);

        b.mark();

        b.duplicate().reset();

        b.asReadOnlyBuffer().reset();

    }

#if[byte]

#else[byte]

    // 6221101-6234263

    private static void putBuffer() {

        final int cap = 10;

        $Type$Buffer direct1 = ByteBuffer.allocateDirect(cap).as$Type$Buffer();

        $Type$Buffer nondirect1 = ByteBuffer.allocate(cap).as$Type$Buffer();

        direct1.put(nondirect1);

        $Type$Buffer direct2 = ByteBuffer.allocateDirect(cap).as$Type$Buffer();

        $Type$Buffer nondirect2 = ByteBuffer.allocate(cap).as$Type$Buffer();

        nondirect2.put(direct2);

        $Type$Buffer direct3 = ByteBuffer.allocateDirect(cap).as$Type$Buffer();

        $Type$Buffer direct4 = ByteBuffer.allocateDirect(cap).as$Type$Buffer();

        direct3.put(direct4);

        $Type$Buffer nondirect3 = ByteBuffer.allocate(cap).as$Type$Buffer();

        $Type$Buffer nondirect4 = ByteBuffer.allocate(cap).as$Type$Buffer();

        nondirect3.put(nondirect4);

    }

#end[byte]

#if[char]

    private static void bulkPutString($Type$Buffer b) {

        int n = b.capacity();

        b.clear();

        StringBuilder sb = new StringBuilder(n + 7);

        sb.append("1234567");

        for (int i = 0; i < n; i++)

            sb.append((char)ic(i));

        b.put(sb.toString(), 7, 7 + n);

        b.flip();

    }

#end[char]

    private static void checkSlice($Type$Buffer b, $Type$Buffer slice) {

        ck(slice, 0, slice.position());

        ck(slice, b.remaining(), slice.limit());

        ck(slice, b.remaining(), slice.capacity());

        if (b.isDirect() != slice.isDirect())

            fail("Lost direction", slice);

        if (b.isReadOnly() != slice.isReadOnly())

            fail("Lost read-only", slice);

    }

#if[byte]

    private static void checkBytes(ByteBuffer b, byte[] bs) {

        int n = bs.length;

        int p = b.position();

        if (b.order() == ByteOrder.BIG_ENDIAN) {

            for (int i = 0; i < n; i++) {

                ck(b, b.get(), bs[i]);

            }

        } else {

            for (int i = n - 1; i >= 0; i--) {

                ck(b, b.get(), bs[i]);

            }

        }

        b.position(p);

    }

    private static void compact(Buffer b) {

        try {

            Class<?> cl = b.getClass();

            java.lang.reflect.Method m = cl.getDeclaredMethod("compact");

            m.setAccessible(true);

            m.invoke(b);

        } catch (Exception e) {

            fail(e.getMessage(), b);

        }

    }

    private static void checkInvalidMarkException(final Buffer b) {

        tryCatch(b, InvalidMarkException.class, () -> {

                b.mark();

                compact(b);

                b.reset();

            });

    }

    private static void testViews(int level, ByteBuffer b, boolean direct) {

        ShortBuffer sb = b.asShortBuffer();

        BasicShort.test(level, sb, direct);

        checkBytes(b, new byte[] { 0, (byte)ic(0) });

        checkInvalidMarkException(sb);

        CharBuffer cb = b.asCharBuffer();

        BasicChar.test(level, cb, direct);

        checkBytes(b, new byte[] { 0, (byte)ic(0) });

        checkInvalidMarkException(cb);

        IntBuffer ib = b.asIntBuffer();

        BasicInt.test(level, ib, direct);

        checkBytes(b, new byte[] { 0, 0, 0, (byte)ic(0) });

        checkInvalidMarkException(ib);

        LongBuffer lb = b.asLongBuffer();

        BasicLong.test(level, lb, direct);

        checkBytes(b, new byte[] { 0, 0, 0, 0, 0, 0, 0, (byte)ic(0) });

        checkInvalidMarkException(lb);

        FloatBuffer fb = b.asFloatBuffer();

        BasicFloat.test(level, fb, direct);

        checkBytes(b, new byte[] { 0x42, (byte)0xc2, 0, 0 });

        checkInvalidMarkException(fb);

        DoubleBuffer db = b.asDoubleBuffer();

        BasicDouble.test(level, db, direct);

        checkBytes(b, new byte[] { 0x40, 0x58, 0x40, 0, 0, 0, 0, 0 });

        checkInvalidMarkException(db);

    }

    private static void testHet(int level, ByteBuffer b) {

        int p = b.position();

        b.limit(b.capacity());

        show(level, b);

        out.print("    put:");

        b.putChar((char)1);

        b.putChar((char)Character.MAX_VALUE);

        out.print(" char");

        b.putShort((short)1);

        b.putShort((short)Short.MAX_VALUE);

        out.print(" short");

        b.putInt(1);

        b.putInt(Integer.MAX_VALUE);

        out.print(" int");

        b.putLong((long)1);

        b.putLong((long)Long.MAX_VALUE);

        out.print(" long");

        b.putFloat((float)1);

        b.putFloat((float)Float.MIN_VALUE);

        b.putFloat((float)Float.MAX_VALUE);

        out.print(" float");

        b.putDouble((double)1);

        b.putDouble((double)Double.MIN_VALUE);

        b.putDouble((double)Double.MAX_VALUE);

        out.print(" double");

        out.println();

        b.limit(b.position());

        b.position(p);

        show(level, b);

        out.print("    get:");

        ck(b, b.getChar(), 1);

        ck(b, b.getChar(), Character.MAX_VALUE);

        out.print(" char");

        ck(b, b.getShort(), 1);

        ck(b, b.getShort(), Short.MAX_VALUE);

        out.print(" short");

        ck(b, b.getInt(), 1);

        ck(b, b.getInt(), Integer.MAX_VALUE);

        out.print(" int");

        ck(b, b.getLong(), 1);

        ck(b, b.getLong(), Long.MAX_VALUE);

        out.print(" long");

        ck(b, (long)b.getFloat(), 1);

        ck(b, (long)b.getFloat(), (long)Float.MIN_VALUE);

        ck(b, (long)b.getFloat(), (long)Float.MAX_VALUE);

        out.print(" float");

        ck(b, (long)b.getDouble(), 1);

        ck(b, (long)b.getDouble(), (long)Double.MIN_VALUE);

        ck(b, (long)b.getDouble(), (long)Double.MAX_VALUE);

        out.print(" double");

        out.println();

    }

    private static void testAlign(final ByteBuffer b, boolean direct) {

        // index out-of bounds

        catchIllegalArgument(b, () -> b.alignmentOffset(-1, (short) 1));

        // unit size values

        catchIllegalArgument(b, () -> b.alignmentOffset(0, (short) 0));

        for (int us = 1; us < 65; us++) {

            int _us = us;

            if ((us & (us - 1)) != 0) {

                // unit size not a power of two

                catchIllegalArgument(b, () -> b.alignmentOffset(0, _us));

            } else {

                if (direct || us <= 8) {

                    b.alignmentOffset(0, us);

                } else {

                    // unit size > 8 with non-direct buffer

                    tryCatch(b, UnsupportedOperationException.class,

                            () -> b.alignmentOffset(0, _us));

                }

            }

        }

        // Probe for long misalignment at index zero for a newly created buffer

        ByteBuffer empty =

                direct ? ByteBuffer.allocateDirect(0) : ByteBuffer.allocate(0);

        int longMisalignmentAtZero = empty.alignmentOffset(0, 8);

        if (direct) {

            // Freshly created direct byte buffers should be aligned at index 0

            // for ref and primitive values (see Unsafe.allocateMemory)

            if (longMisalignmentAtZero != 0) {

                fail("Direct byte buffer misaligned at index 0"

                        + " for ref and primitive values "

                        + longMisalignmentAtZero);

            }

        } else {

            // For heap byte buffers misalignment may occur on 32-bit systems

            // where Unsafe.ARRAY_BYTE_BASE_OFFSET % 8 == 4 and not 0

            // Note the GC will preserve alignment of the base address of the

            // array

            if (jdk.internal.misc.Unsafe.ARRAY_BYTE_BASE_OFFSET % 8

                    != longMisalignmentAtZero) {

                fail("Heap byte buffer misaligned at index 0"

                        + " for ref and primitive values "

                        + longMisalignmentAtZero);

            }

        }

        // Ensure test buffer is correctly aligned at index 0

        if (b.alignmentOffset(0, 8) != longMisalignmentAtZero)

            fail("Test input buffer not correctly aligned at index 0", b);

        // Test misalignment values

        for (int us : new int[]{1, 2, 4, 8}) {

            for (int i = 0; i < us * 2; i++) {

                int am = b.alignmentOffset(i, us);

                int expectedAm = (longMisalignmentAtZero + i) % us;

                if (am != expectedAm) {

                    String f = "b.alignmentOffset(%d, %d) == %d incorrect, expected %d";

                    fail(String.format(f, i, us, am, expectedAm));

                }

            }

        }

        // Created aligned slice to test against

        int ap = 8 - longMisalignmentAtZero;

        int al = b.limit() - b.alignmentOffset(b.limit(), 8);

        ByteBuffer ab = b.position(ap).limit(al).

                slice();

        if (ab.limit() == 0) {

            fail("Test input buffer not sufficiently sized to cover" +

                    " an aligned region for all values", b);

        }

        if (ab.alignmentOffset(0, 8) != 0)

            fail("Aligned test input buffer not correctly aligned at index 0", ab);

        for (int us : new int[]{1, 2, 4, 8}) {

            for (int p = 1; p < 16; p++) {

                int l = ab.limit() - p;

                ByteBuffer as = ab.slice().position(p).limit(l).

                        alignedSlice(us);

                ck(as, 0, as.position());

                ck(as, as.capacity(), as.limit());

                if (b.isDirect() != as.isDirect())

                    fail("Lost direction", as);

                if (b.isReadOnly() != as.isReadOnly())

                    fail("Lost read-only", as);

                if (as.alignmentOffset(0, us) != 0)

                    fail("Buffer not correctly aligned at index 0", as);

                if (as.alignmentOffset(as.limit(), us) != 0)

                    fail("Buffer not correctly aligned at limit", as);

                int p_mod = ab.alignmentOffset(p, us);

                int l_mod = ab.alignmentOffset(l, us);

                // Round up position

                p = (p_mod > 0) ? p + (us - p_mod) : p;

                // Round down limit

                l = l - l_mod;

                int ec = l - p;

                if (as.limit() != ec) {

                    fail("Buffer capacity incorrect, expected: " + ec, as);

                }

            }

        }

    }

#end[byte]

    private static void fail(String problem,

                             $Type$Buffer xb, $Type$Buffer yb,

                             $type$ x, $type$ y) {

        fail(problem + String.format(": x=%s y=%s", x, y), xb, yb);

    }

    private static void catchIllegalArgument(Buffer b, Runnable thunk) {

        tryCatch(b, IllegalArgumentException.class, thunk);

    }

    private static void catchReadOnlyBuffer(Buffer b, Runnable thunk) {

        tryCatch(b, ReadOnlyBufferException.class, thunk);

    }

    private static void catchIndexOutOfBounds(Buffer b, Runnable thunk) {

        tryCatch(b, IndexOutOfBoundsException.class, thunk);

    }

    private static void catchIndexOutOfBounds($type$[] t, Runnable thunk) {

        tryCatch(t, IndexOutOfBoundsException.class, thunk);

    }

    private static void tryCatch(Buffer b, Class<?> ex, Runnable thunk) {

        boolean caught = false;

        try {

            thunk.run();

        } catch (Throwable x) {

            if (ex.isAssignableFrom(x.getClass())) {

                caught = true;

            } else {

                fail(x.getMessage() + " not expected");

            }

        }

        if (!caught) {

            fail(ex.getName() + " not thrown", b);

        }

    }

    private static void tryCatch($type$[] t, Class<?> ex, Runnable thunk) {

        tryCatch($Type$Buffer.wrap(t), ex, thunk);

    }

    public static void test(int level, final $Type$Buffer b, boolean direct) {

        show(level, b);

        if (direct != b.isDirect())

            fail("Wrong direction", b);

        // Gets and puts

        relPut(b);

        relGet(b);

        absGet(b);

        bulkGet(b);

        absPut(b);

        relGet(b);

        absGet(b);

        bulkGet(b);