13 * accompanied this code). 14 * 15 * You should have received a copy of the GNU General Public License version 16 * 2 along with this work; if not, write to the Free Software Foundation, 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 18 * 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 20 * or visit www.oracle.com if you need additional information or have any 21 * questions. 22 */ 23 24 /* 25 * @test 26 * @run main/othervm CallbackSort 27 */ 28 29 import java.lang.invoke.MethodHandles; 30 import java.nicl.Libraries; 31 import java.nicl.NativeTypes; 32 import java.nicl.Scope; 33 import java.nicl.metadata.C; 34 import java.nicl.metadata.CallingConvention; 35 import java.nicl.metadata.NativeHeader; 36 import java.nicl.metadata.NativeType; 37 import java.nicl.types.Pointer; 38 import java.util.Iterator; 39 40 public class CallbackSort { 41 private static final boolean DEBUG = Boolean.getBoolean("CallbackSort.DEBUG"); 42 private boolean upcallCalled = false; 43 44 @NativeHeader 45 public static interface stdlib { 46 @FunctionalInterface 47 static interface compar { 48 @C(file="dummy", line=47, column=11, USR="c:@F@slowsort") 49 @NativeType(layout="(p:Vp:V)i", ctype="int (void*,void*)", size=4l) 50 @CallingConvention(value=1) 51 public int fn(Pointer<Void> e1, Pointer<Void> e2); 52 } 53 54 @C(file="dummy", line=47, column=11, USR="c:@F@slowsort") 55 @NativeType(layout="(p:VLLp:(p:Vp:V)i)V", ctype="void (void *, size_t, size_t, int (*)(const void *, const void *))", name="slowsort", size=1) 56 @CallingConvention(value=1) 57 public abstract void slowsort(Pointer<?> base, long nmemb, long size, compar compar); 58 } 59 60 public class comparator implements stdlib.compar { 61 @Override 62 public int fn(Pointer<Void> e1, Pointer<Void> e2) { 63 upcallCalled = true; 64 65 Pointer<Integer> p1 = e1.cast(NativeTypes.INT32); 66 Pointer<Integer> p2 = e2.cast(NativeTypes.INT32); 67 68 int i1 = p1.get(); 69 int i2 = p2.get(); 70 71 if (DEBUG) { 72 System.out.println("fn(i1=" + i1 + ", i2=" + i2 + ")"); 73 } 74 75 return i1 - i2; 76 } | 13 * accompanied this code). 14 * 15 * You should have received a copy of the GNU General Public License version 16 * 2 along with this work; if not, write to the Free Software Foundation, 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 18 * 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 20 * or visit www.oracle.com if you need additional information or have any 21 * questions. 22 */ 23 24 /* 25 * @test 26 * @run main/othervm CallbackSort 27 */ 28 29 import java.lang.invoke.MethodHandles; 30 import java.nicl.Libraries; 31 import java.nicl.NativeTypes; 32 import java.nicl.Scope; 33 import java.nicl.metadata.NativeCallback; 34 import java.nicl.metadata.NativeHeader; 35 import java.nicl.metadata.NativeLocation; 36 import java.nicl.metadata.NativeType; 37 import java.nicl.types.Pointer; 38 import java.util.Iterator; 39 40 public class CallbackSort { 41 private static final boolean DEBUG = Boolean.getBoolean("CallbackSort.DEBUG"); 42 private boolean upcallCalled = false; 43 44 @NativeHeader 45 public static interface stdlib { 46 @NativeCallback("(p:Vp:V)i") 47 @FunctionalInterface 48 static interface compar { 49 @NativeLocation(file="dummy", line=47, column=11, USR="c:@F@slowsort") 50 public int fn(Pointer<Void> e1, Pointer<Void> e2); 51 } 52 53 @NativeLocation(file="dummy", line=47, column=11, USR="c:@F@slowsort") 54 @NativeType(layout="(p:VLLp:(p:Vp:V)i)V", ctype="void (void *, size_t, size_t, int (*)(const void *, const void *))", name="slowsort") 55 public abstract void slowsort(Pointer<?> base, long nmemb, long size, compar compar); 56 } 57 58 public class comparator implements stdlib.compar { 59 @Override 60 public int fn(Pointer<Void> e1, Pointer<Void> e2) { 61 upcallCalled = true; 62 63 Pointer<Integer> p1 = e1.cast(NativeTypes.INT32); 64 Pointer<Integer> p2 = e2.cast(NativeTypes.INT32); 65 66 int i1 = p1.get(); 67 int i2 = p2.get(); 68 69 if (DEBUG) { 70 System.out.println("fn(i1=" + i1 + ", i2=" + i2 + ")"); 71 } 72 73 return i1 - i2; 74 } |