/*

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

 */

/*

 * @test

 * @bug 8058744

 * @summary Invalid pattern-matching of address computations in raw unsafe

 * @library /testlibrary

 * @run main/othervm -Xbatch UnsafeRaw

 */

import com.oracle.java.testlibrary.Utils;

import java.util.Random;

public class UnsafeRaw {

  public static class Tests {

    public static int int_index(sun.misc.Unsafe unsafe, long base, int index) throws Exception {

      return unsafe.getInt(base + (index << 2));

    }

    public static int long_index(sun.misc.Unsafe unsafe, long base, long index) throws Exception {

      return unsafe.getInt(base + (index << 2));

    }

    public static int int_index_back_ashift(sun.misc.Unsafe unsafe, long base, int index) throws Exception {

      return unsafe.getInt(base + (index >> 2));

    }

    public static int int_index_back_lshift(sun.misc.Unsafe unsafe, long base, int index) throws Exception {

      return unsafe.getInt(base + (index >>> 2));

    }

    public static int long_index_back_ashift(sun.misc.Unsafe unsafe, long base, long index) throws Exception {

      return unsafe.getInt(base + (index >> 2));

    }

    public static int long_index_back_lshift(sun.misc.Unsafe unsafe, long base, long index) throws Exception {

      return unsafe.getInt(base + (index >>> 2));

    }

    public static int int_const_12345678_index(sun.misc.Unsafe unsafe, long base) throws Exception {

      int idx4 = 0x12345678;

      return unsafe.getInt(base + idx4);

    }

    public static int long_const_1234567890abcdef_index(sun.misc.Unsafe unsafe, long base) throws Exception {

      long idx5 = 0x1234567890abcdefL;

      return unsafe.getInt(base + idx5);

    }

    public static int int_index_mul(sun.misc.Unsafe unsafe, long base, int index) throws Exception {

      return unsafe.getInt(base + (index * 4));

    }

    public static int long_index_mul(sun.misc.Unsafe unsafe, long base, long index) throws Exception {

      return unsafe.getInt(base + (index * 4));

    }

    public static int int_index_mul_scale_16(sun.misc.Unsafe unsafe, long base, int index) throws Exception {

      return unsafe.getInt(base + (index * 16));

    }

    public static int long_index_mul_scale_16(sun.misc.Unsafe unsafe, long base, long index) throws Exception {

      return unsafe.getInt(base + (index * 16));

    }

  }

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

    sun.misc.Unsafe unsafe = Utils.getUnsafe();

    final int array_size = 128;

    final int element_size = 4;

    final int magic = 0x12345678;

    Random rnd = new Random();

    long array = unsafe.allocateMemory(array_size * element_size); // 128 ints

    long addr = array + array_size * element_size / 2; // something in the middle to work with

    unsafe.putInt(addr, magic);

    for (int j = 0; j < 100000; j++) {

       if (Tests.int_index(unsafe, addr, 0) != magic) throw new Exception();

       if (Tests.long_index(unsafe, addr, 0) != magic) throw new Exception();

       if (Tests.int_index_mul(unsafe, addr, 0) != magic) throw new Exception();

       if (Tests.long_index_mul(unsafe, addr, 0) != magic) throw new Exception();

       {

         long idx1 = rnd.nextLong();

         long addr1 = addr - (idx1 << 2);

         if (Tests.long_index(unsafe, addr1, idx1) != magic) throw new Exception();

       }

       {

         long idx2 = rnd.nextLong();

         long addr2 = addr - (idx2 >> 2);

         if (Tests.long_index_back_ashift(unsafe, addr2, idx2) != magic) throw new Exception();

       }

       {

         long idx3 = rnd.nextLong();

         long addr3 = addr - (idx3 >>> 2);

         if (Tests.long_index_back_lshift(unsafe, addr3, idx3) != magic) throw new Exception();

       }

       {

         long idx4 = 0x12345678;

         long addr4 = addr - idx4;

         if (Tests.int_const_12345678_index(unsafe, addr4) != magic) throw new Exception();

       }

       {

         long idx5 = 0x1234567890abcdefL;

         long addr5 = addr - idx5;

         if (Tests.long_const_1234567890abcdef_index(unsafe, addr5) != magic) throw new Exception();

       }

       {

         int idx6 = rnd.nextInt();

         long addr6 = addr - (idx6 >> 2);

         if (Tests.int_index_back_ashift(unsafe, addr6, idx6) != magic) throw new Exception();

       }

       {

         int idx7 = rnd.nextInt();

         long addr7 = addr - (idx7 >>> 2);

         if (Tests.int_index_back_lshift(unsafe, addr7, idx7) != magic) throw new Exception();

       }

       {

         int idx8 = rnd.nextInt();

         long addr8 = addr - (idx8 * 16);

         if (Tests.int_index_mul_scale_16(unsafe, addr8, idx8) != magic) throw new Exception();

       }

       {

         long idx9 = rnd.nextLong();

         long addr9 = addr - (idx9 * 16);

         if (Tests.long_index_mul_scale_16(unsafe, addr9, idx9) != magic) throw new Exception();

       }

    }

  }

}