/*

 * Copyright (c) 2016 SAP SE. 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 8158260

 * @summary Test unaligned Unsafe accesses

 * @modules java.base/jdk.internal.misc:+open

 *

 * @run main/othervm -Diters=20000 -XX:-UseOnStackReplacement -XX:-BackgroundCompilation

 *      compiler.unsafe.JdkInternalMiscUnsafeUnalignedAccess

 * @author volker.simonis@gmail.com

 */

package compiler.unsafe;

import jdk.internal.misc.Unsafe;

import java.lang.reflect.Field;

import java.nio.ByteOrder;

public class JdkInternalMiscUnsafeUnalignedAccess {

    static final int ITERS = Integer.getInteger("iters", 20_000);

    private static final boolean BIG_ENDIAN = ByteOrder.nativeOrder().equals(ByteOrder.BIG_ENDIAN);

    private static final Unsafe UNSAFE;

    private static final int SIZE = 1024;

    private static long memory;

    static {

        try {

            Field unsafeField = Unsafe.class.getDeclaredField("theUnsafe");

            unsafeField.setAccessible(true);

            UNSAFE = (Unsafe) unsafeField.get(null);

        }

        catch (Exception e) {

            throw new RuntimeException("Unable to get Unsafe instance.", e);

        }

    }

    static int getInt_0() {

        return UNSAFE.getInt(memory + 0);

    }

    static int getInt_1() {

        return UNSAFE.getInt(memory + 1);

    }

    static int getInt_4() {

        return UNSAFE.getInt(memory + 4);

    }

    static int getInt_17() {

        return UNSAFE.getInt(memory + 17);

    }

    static long getIntAsLong_0() {

        return UNSAFE.getInt(memory + 0);

    }

    static long getIntAsLong_1() {

        return UNSAFE.getInt(memory + 1);

    }

    static long getIntAsLong_4() {

        return UNSAFE.getInt(memory + 4);

    }

    static long getIntAsLong_17() {

        return UNSAFE.getInt(memory + 17);

    }

    static long getLong_0() {

        return UNSAFE.getLong(memory + 0);

    }

    static long getLong_1() {

        return UNSAFE.getLong(memory + 1);

    }

    static long getLong_4() {

        return UNSAFE.getLong(memory + 4);

    }

    static long getLong_8() {

        return UNSAFE.getLong(memory + 8);

    }

    static long getLong_17() {

        return UNSAFE.getLong(memory + 17);

    }

    static void putInt_0(int i) {

        UNSAFE.putInt(memory + 0, i);

    }

    static void putInt_1(int i) {

        UNSAFE.putInt(memory + 1, i);

    }

    static void putInt_4(int i) {

        UNSAFE.putInt(memory + 4, i);

    }

    static void putInt_17(int i) {

        UNSAFE.putInt(memory + 17, i);

    }

    static void putLong_0(long l) {

        UNSAFE.putLong(memory + 0, l);

    }

    static void putLong_1(long l) {

        UNSAFE.putLong(memory + 1, l);

    }

    static void putLong_4(long l) {

        UNSAFE.putLong(memory + 4, l);

    }

    static void putLong_8(long l) {

        UNSAFE.putLong(memory + 8, l);

    }

    static void putLong_17(long l) {

        UNSAFE.putLong(memory + 17, l);

    }

    public static void main(String[] args) throws Exception {

        if (!UNSAFE.unalignedAccess()) {

            System.out.println("Platform is not supporting unaligned access - nothing to test.");

            return;

        }

        memory = UNSAFE.allocateMemory(SIZE);

        UNSAFE.putInt(memory +  0, 0x00112233);

        UNSAFE.putInt(memory +  4, 0x44556677);

        UNSAFE.putInt(memory +  8, 0x8899aabb);

        UNSAFE.putInt(memory + 12, 0xccddeeff);

        UNSAFE.putInt(memory + 16, 0x01234567);

        UNSAFE.putInt(memory + 20, 0x89abcdef);

        UNSAFE.putInt(memory + 24, 0x01234567);

        // Unsafe.getInt()

        int res;

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

            res = getInt_0();

            if (res != 0x00112233) {

                throw new Exception(res + " != 0x00112233");

            }

        }

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

            res = getInt_1();

            if (res != (BIG_ENDIAN ? 0x11223344 : 0x77001122)) {

                throw new Exception(res + " != " + (BIG_ENDIAN ? 0x11223344 : 0x77001122));

            }

        }

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

            res = getInt_4();

            if (res != 0x44556677) {

                throw new Exception(res + " != 0x44556677");

            }

        }

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

            res = getInt_17();

            if (res != (BIG_ENDIAN ? 0x23456789 : 0xef012345)) {

                throw new Exception(res + " != " + (BIG_ENDIAN ? 0x23456789 : 0xef012345));

            }

        }

        // (long)Unsafe.getInt()

        long lres;

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

            lres = getIntAsLong_0();

            if (lres != (long)0x00112233) {

                throw new Exception(lres + " != 0x00112233");

            }

        }

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

            lres = getIntAsLong_1();

            if (lres != (BIG_ENDIAN ? (long)0x11223344 : (long)0x77001122)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? (long)0x11223344 : (long)0x77001122));

            }

        }

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

            lres = getIntAsLong_4();

            if (lres != (long)0x44556677) {

                throw new Exception(lres + " != 0x44556677");

            }

        }

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

            lres = getIntAsLong_17();

            if (lres != (BIG_ENDIAN ? (long)0x23456789 : (long)0xef012345)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? (long)0x23456789 : (long)0xef012345));

            }

        }

        // Unsafe.getLong()

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

            lres = getLong_0();

            if (lres != (BIG_ENDIAN ? 0x0011223344556677L : 0x4455667700112233L)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? 0x0011223344556677L : 0x4455667700112233L));

            }

        }

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

            lres = getLong_1();

            if (lres != (BIG_ENDIAN ? 0x1122334455667788L : 0xbb44556677001122L)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? 0x1122334455667788L : 0xbb44556677001122L));

            }

        }

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

            lres = getLong_4();

            if (lres != (BIG_ENDIAN ? 0x445566778899aabbL : 0x8899aabb44556677L)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? 0x445566778899aabbL : 0x8899aabb44556677L));

            }

        }

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

            lres = getLong_8();

            if (lres != (BIG_ENDIAN ? 0x8899aabbccddeeffL : 0xccddeeff8899aabbL)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? 0x8899aabbccddeeffL : 0xccddeeff8899aabbL));

            }

        }

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

            lres = getLong_17();

            if (lres != (BIG_ENDIAN ? 0x23456789abcdef01L : 0x6789abcdef012345L)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? 0x23456789abcdef01L : 0x6789abcdef012345L));

            }

        }

        // Unsafe.putInt()

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

            putInt_0(0x00112233);

            res = getInt_0();

            if (res != 0x00112233) {

                throw new Exception(res + " != 0x00112233");

            }

        }

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

            putInt_1(BIG_ENDIAN ? 0x11223344 : 0x77001122);

            res = getInt_1();

            if (res != (BIG_ENDIAN ? 0x11223344 : 0x77001122)) {

                throw new Exception(res + " != " + (BIG_ENDIAN ? 0x11223344 : 0x77001122));

            }

        }

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

            putInt_4(0x44556677);

            res = getInt_4();

            if (res != 0x44556677) {

                throw new Exception(res + " != 0x44556677");

            }

        }

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

            putInt_17(BIG_ENDIAN ? 0x23456789 : 0xef012345);

            res = getInt_17();

            if (res != (BIG_ENDIAN ? 0x23456789 : 0xef012345)) {

                throw new Exception(res + " != " + (BIG_ENDIAN ? 0x23456789 : 0xef012345));

            }

        }

        // Unsafe.putLong()

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

            putLong_0(BIG_ENDIAN ? 0x0011223344556677L : 0x4455667700112233L);

            lres = getLong_0();

            if (lres != (BIG_ENDIAN ? 0x0011223344556677L : 0x4455667700112233L)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? 0x0011223344556677L : 0x4455667700112233L));

            }

        }

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

            putLong_1(BIG_ENDIAN ? 0x1122334455667788L : 0xbb44556677001122L);

            lres = getLong_1();

            if (lres != (BIG_ENDIAN ? 0x1122334455667788L : 0xbb44556677001122L)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? 0x1122334455667788L : 0xbb44556677001122L));

            }

        }

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

            putLong_4(BIG_ENDIAN ? 0x445566778899aabbL : 0x8899aabb44556677L);

            lres = getLong_4();

            if (lres != (BIG_ENDIAN ? 0x445566778899aabbL : 0x8899aabb44556677L)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? 0x445566778899aabbL : 0x8899aabb44556677L));

            }

        }

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

            putLong_8(BIG_ENDIAN ? 0x8899aabbccddeeffL : 0xccddeeff8899aabbL);

            lres = getLong_8();

            if (lres != (BIG_ENDIAN ? 0x8899aabbccddeeffL : 0xccddeeff8899aabbL)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? 0x8899aabbccddeeffL : 0xccddeeff8899aabbL));

            }

        }

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

            putLong_17(BIG_ENDIAN ? 0x23456789abcdef01L : 0x6789abcdef012345L);

            lres = getLong_17();

            if (lres != (BIG_ENDIAN ? 0x23456789abcdef01L : 0x6789abcdef012345L)) {

                throw new Exception(lres + " != " + (BIG_ENDIAN ? 0x23456789abcdef01L : 0x6789abcdef012345L));

            }

        }

    }

}