/*
 * Copyright (c) 2007, 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 6565543
 * @summary Minimal test for unsafe.copyMemory() and unsafe.setMemory()
 * @modules java.base/sun.nio.ch
 *          jdk.unsupported
 * @key randomness
 */

import java.util.*;
import java.lang.reflect.*;
import java.nio.*;

import sun.misc.Unsafe;

import sun.nio.ch.DirectBuffer;

public class CopyMemory {

    private final static int BUFFER_SIZE = 1024;
    private final static int N = 16 * 1024;

    private final static int FILLER = 0x55;
    private final static int FILLER2 = 0x33;

    private final static Random random = new Random();

    private static void set(byte[] b, int ofs, int len, int value) {
        for (int i = 0; i < len; i++) {
            b[ofs + i] = (byte)value;
        }
    }

    private static void check(byte[] b, int ofs, int len, int value) {
        for (int i = 0; i < len; i++) {
            int r = b[ofs + i] & 0xff;
            if (r != value) {
                throw new RuntimeException("mismatch");
            }
        }
    }

    private static void set(Unsafe unsafe, long addr, int ofs, int len, int value) {
        for (int i = 0; i < len; i++) {
            unsafe.putByte(null, addr + ofs + i, (byte)value);
        }
    }

    private static void check(Unsafe unsafe, long addr, int ofs, int len, int value) {
        for (int i = 0; i < len; i++) {
            int r = unsafe.getByte(null, addr + ofs + i) & 0xff;
            if (r != value) {
                throw new RuntimeException("mismatch");
            }
        }
    }

    private static final List<ByteBuffer> buffers = new ArrayList<ByteBuffer>();

    private static long getMemory(int n) {
        ByteBuffer b = ByteBuffer.allocateDirect(n);
        if (b instanceof DirectBuffer == false) {
            throw new RuntimeException("Not a direct buffer");
        }
        buffers.add(b); // make sure the buffer does not get GCed
        return ((DirectBuffer)b).address();
    }

    private static void testSetByteArray(Unsafe unsafe) throws Exception {
        System.out.println("Testing setMemory() for byte[]...");
        byte[] b = new byte[BUFFER_SIZE];
        for (int i = 0; i < N; i++) {
            set(b, 0, BUFFER_SIZE, FILLER);
            int ofs = random.nextInt(BUFFER_SIZE / 2);
            int len = random.nextInt(BUFFER_SIZE / 2);
            int val = random.nextInt(256);
            unsafe.setMemory(b, Unsafe.ARRAY_BYTE_BASE_OFFSET + ofs, len, (byte)val);
            check(b, 0, ofs - 1, FILLER);
            check(b, ofs, len, val);
            check(b, ofs + len, BUFFER_SIZE - (ofs + len), FILLER);
        }
    }

    private static void testSetRawMemory(Unsafe unsafe) throws Exception {
        System.out.println("Testing setMemory() for raw memory...");
        long b = getMemory(BUFFER_SIZE);
        for (int i = 0; i < N; i++) {
            set(unsafe, b, 0, BUFFER_SIZE, FILLER);
            int ofs = random.nextInt(BUFFER_SIZE / 2);
            int len = random.nextInt(BUFFER_SIZE / 2);
            int val = random.nextInt(256);
            unsafe.setMemory(null, b + ofs, len, (byte)val);
            check(unsafe, b, 0, ofs - 1, FILLER);
            check(unsafe, b, ofs, len, val);
            check(unsafe, b, ofs + len, BUFFER_SIZE - (ofs + len), FILLER);
        }
    }

    private static void testCopyByteArrayToByteArray(Unsafe unsafe) throws Exception {
        System.out.println("Testing copyMemory() for byte[] to byte[]...");
        byte[] b1 = new byte[BUFFER_SIZE];
        byte[] b2 = new byte[BUFFER_SIZE];
        for (int i = 0; i < N; i++) {
            set(b1, 0, BUFFER_SIZE, FILLER);
            set(b2, 0, BUFFER_SIZE, FILLER2);
            int ofs = random.nextInt(BUFFER_SIZE / 2);
            int len = random.nextInt(BUFFER_SIZE / 2);
            int val = random.nextInt(256);
            set(b1, ofs, len, val);
            int ofs2 = random.nextInt(BUFFER_SIZE / 2);
            unsafe.copyMemory(b1, Unsafe.ARRAY_BYTE_BASE_OFFSET + ofs,
                b2, Unsafe.ARRAY_BYTE_BASE_OFFSET + ofs2, len);
            check(b2, 0, ofs2 - 1, FILLER2);
            check(b2, ofs2, len, val);
            check(b2, ofs2 + len, BUFFER_SIZE - (ofs2 + len), FILLER2);
        }
    }

    private static void testCopyByteArrayToRawMemory(Unsafe unsafe) throws Exception {
        System.out.println("Testing copyMemory() for byte[] to raw memory...");
        byte[] b1 = new byte[BUFFER_SIZE];
        long b2 = getMemory(BUFFER_SIZE);
        for (int i = 0; i < N; i++) {
            set(b1, 0, BUFFER_SIZE, FILLER);
            set(unsafe, b2, 0, BUFFER_SIZE, FILLER2);
            int ofs = random.nextInt(BUFFER_SIZE / 2);
            int len = random.nextInt(BUFFER_SIZE / 2);
            int val = random.nextInt(256);
            set(b1, ofs, len, val);
            int ofs2 = random.nextInt(BUFFER_SIZE / 2);
            unsafe.copyMemory(b1, Unsafe.ARRAY_BYTE_BASE_OFFSET + ofs,
                null, b2 + ofs2, len);
            check(unsafe, b2, 0, ofs2 - 1, FILLER2);
            check(unsafe, b2, ofs2, len, val);
            check(unsafe, b2, ofs2 + len, BUFFER_SIZE - (ofs2 + len), FILLER2);
        }
    }

    private static void testCopyRawMemoryToByteArray(Unsafe unsafe) throws Exception {
        System.out.println("Testing copyMemory() for raw memory to byte[]...");
        long b1 = getMemory(BUFFER_SIZE);
        byte[] b2 = new byte[BUFFER_SIZE];
        for (int i = 0; i < N; i++) {
            set(unsafe, b1, 0, BUFFER_SIZE, FILLER);
            set(b2, 0, BUFFER_SIZE, FILLER2);
            int ofs = random.nextInt(BUFFER_SIZE / 2);
            int len = random.nextInt(BUFFER_SIZE / 2);
            int val = random.nextInt(256);
            set(unsafe, b1, ofs, len, val);
            int ofs2 = random.nextInt(BUFFER_SIZE / 2);
            unsafe.copyMemory(null, b1 + ofs,
                b2, Unsafe.ARRAY_BYTE_BASE_OFFSET + ofs2, len);
            check(b2, 0, ofs2 - 1, FILLER2);
            check(b2, ofs2, len, val);
            check(b2, ofs2 + len, BUFFER_SIZE - (ofs2 + len), FILLER2);
        }
    }

    private static void testCopyRawMemoryToRawMemory(Unsafe unsafe) throws Exception {
        System.out.println("Testing copyMemory() for raw memory to raw memory...");
        long b1 = getMemory(BUFFER_SIZE);
        long b2 = getMemory(BUFFER_SIZE);
        for (int i = 0; i < N; i++) {
            set(unsafe, b1, 0, BUFFER_SIZE, FILLER);
            set(unsafe, b2, 0, BUFFER_SIZE, FILLER2);
            int ofs = random.nextInt(BUFFER_SIZE / 2);
            int len = random.nextInt(BUFFER_SIZE / 2);
            int val = random.nextInt(256);
            set(unsafe, b1, ofs, len, val);
            int ofs2 = random.nextInt(BUFFER_SIZE / 2);
            unsafe.copyMemory(null, b1 + ofs,
                null, b2 + ofs2, len);
            check(unsafe, b2, 0, ofs2 - 1, FILLER2);
            check(unsafe, b2, ofs2, len, val);
            check(unsafe, b2, ofs2 + len, BUFFER_SIZE - (ofs2 + len), FILLER2);
        }
    }

    private static Unsafe getUnsafe() throws Exception {
        Field f = Unsafe.class.getDeclaredField("theUnsafe");
        f.setAccessible(true);
        return (Unsafe)f.get(null);
    }

    public static void main(String[] args) throws Exception {
        Unsafe unsafe = getUnsafe();

        testSetByteArray(unsafe);
        testSetRawMemory(unsafe);
        testCopyByteArrayToByteArray(unsafe);
        testCopyByteArrayToRawMemory(unsafe);
        testCopyRawMemoryToByteArray(unsafe);
        testCopyRawMemoryToRawMemory(unsafe);

        System.out.println("OK");
    }

}