stan/jdk-24
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
78e5008e91
jdk-24/test/jdk/java/foreign/callarranger/TestSysVCallArranger.java
Jorn Vernee 32ac72c3d3 8312522: Implementation of Foreign Function & Memory API 
Co-authored-by: Maurizio Cimadamore <mcimadamore@openjdk.org>
Co-authored-by: Jorn Vernee <jvernee@openjdk.org>
Co-authored-by: Per Minborg <pminborg@openjdk.org>
Reviewed-by: dholmes, psandoz, mcimadamore, alanb
2023-10-12 19:50:08 +00:00

464 lines
20 KiB
Java
Raw Blame History

/*
* Copyright (c) 2020, 2023, 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
* @compile platform/PlatformLayouts.java
* @modules java.base/jdk.internal.foreign
* java.base/jdk.internal.foreign.abi
* java.base/jdk.internal.foreign.abi.x64
* java.base/jdk.internal.foreign.abi.x64.sysv
* @build CallArrangerTestBase
* @run testng TestSysVCallArranger
*/
import java.lang.foreign.FunctionDescriptor;
import java.lang.foreign.MemoryLayout;
import java.lang.foreign.MemorySegment;
import jdk.internal.foreign.abi.Binding;
import jdk.internal.foreign.abi.CallingSequence;
import jdk.internal.foreign.abi.StubLocations;
import jdk.internal.foreign.abi.VMStorage;
import jdk.internal.foreign.abi.x64.sysv.CallArranger;
import org.testng.annotations.DataProvider;
import org.testng.annotations.Test;
import java.lang.invoke.MethodType;
import static java.lang.foreign.ValueLayout.ADDRESS;
import static jdk.internal.foreign.abi.Binding.*;
import static jdk.internal.foreign.abi.x64.X86_64Architecture.*;
import static jdk.internal.foreign.abi.x64.X86_64Architecture.Regs.*;
import static platform.PlatformLayouts.SysV.*;
import static org.testng.Assert.assertEquals;
import static org.testng.Assert.assertFalse;
import static org.testng.Assert.assertTrue;
public class TestSysVCallArranger extends CallArrangerTestBase {
private static final short STACK_SLOT_SIZE = 8;
private static final VMStorage TARGET_ADDRESS_STORAGE = StubLocations.TARGET_ADDRESS.storage(StorageType.PLACEHOLDER);
private static final VMStorage RETURN_BUFFER_STORAGE = StubLocations.RETURN_BUFFER.storage(StorageType.PLACEHOLDER);
@Test
public void testEmpty() {
MethodType mt = MethodType.methodType(void.class);
FunctionDescriptor fd = FunctionDescriptor.ofVoid();
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, false);
assertFalse(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.callerMethodType(), mt.insertParameterTypes(0, MemorySegment.class));
assertEquals(callingSequence.functionDesc(), fd.insertArgumentLayouts(0, ADDRESS));
checkArgumentBindings(callingSequence, new Binding[][]{
{ unboxAddress(), vmStore(TARGET_ADDRESS_STORAGE, long.class) },
});
checkReturnBindings(callingSequence, new Binding[]{});
assertEquals(bindings.nVectorArgs(), 0);
}
@Test
public void testNestedStructs() {
MemoryLayout POINT = MemoryLayout.structLayout(
C_INT,
MemoryLayout.structLayout(
C_INT,
C_INT
)
);
MethodType mt = MethodType.methodType(void.class, MemorySegment.class);
FunctionDescriptor fd = FunctionDescriptor.ofVoid(POINT);
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, false);
assertFalse(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.callerMethodType(), mt.insertParameterTypes(0, MemorySegment.class));
assertEquals(callingSequence.functionDesc(), fd.insertArgumentLayouts(0, ADDRESS));
checkArgumentBindings(callingSequence, new Binding[][]{
{ unboxAddress(), vmStore(TARGET_ADDRESS_STORAGE, long.class) },
{ dup(), bufferLoad(0, long.class), vmStore(rdi, long.class),
bufferLoad(8, int.class), vmStore(rsi, int.class)},
});
checkReturnBindings(callingSequence, new Binding[]{});
assertEquals(bindings.nVectorArgs(), 0);
}
@Test
public void testNestedUnion() {
MemoryLayout POINT = MemoryLayout.structLayout(
C_INT,
MemoryLayout.paddingLayout(4),
MemoryLayout.unionLayout(
MemoryLayout.structLayout(C_INT, C_INT),
C_LONG
)
);
MethodType mt = MethodType.methodType(void.class, MemorySegment.class);
FunctionDescriptor fd = FunctionDescriptor.ofVoid(POINT);
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, false);
assertFalse(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.callerMethodType(), mt.insertParameterTypes(0, MemorySegment.class));
assertEquals(callingSequence.functionDesc(), fd.insertArgumentLayouts(0, ADDRESS));
checkArgumentBindings(callingSequence, new Binding[][]{
{ unboxAddress(), vmStore(TARGET_ADDRESS_STORAGE, long.class) },
{ dup(), bufferLoad(0, long.class), vmStore(rdi, long.class),
bufferLoad(8, long.class), vmStore(rsi, long.class)},
});
checkReturnBindings(callingSequence, new Binding[]{});
assertEquals(bindings.nVectorArgs(), 0);
}
@Test
public void testIntegerRegs() {
MethodType mt = MethodType.methodType(void.class,
int.class, int.class, int.class, int.class, int.class, int.class);
FunctionDescriptor fd = FunctionDescriptor.ofVoid(
C_INT, C_INT, C_INT, C_INT, C_INT, C_INT);
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, false);
assertFalse(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.callerMethodType(), mt.insertParameterTypes(0, MemorySegment.class));
assertEquals(callingSequence.functionDesc(), fd.insertArgumentLayouts(0, ADDRESS));
checkArgumentBindings(callingSequence, new Binding[][]{
{ unboxAddress(), vmStore(TARGET_ADDRESS_STORAGE, long.class) },
{ vmStore(rdi, int.class) },
{ vmStore(rsi, int.class) },
{ vmStore(rdx, int.class) },
{ vmStore(rcx, int.class) },
{ vmStore(r8, int.class) },
{ vmStore(r9, int.class) },
});
checkReturnBindings(callingSequence, new Binding[]{});
assertEquals(bindings.nVectorArgs(), 0);
}
@Test
public void testDoubleRegs() {
MethodType mt = MethodType.methodType(void.class,
double.class, double.class, double.class, double.class,
double.class, double.class, double.class, double.class);
FunctionDescriptor fd = FunctionDescriptor.ofVoid(
C_DOUBLE, C_DOUBLE, C_DOUBLE, C_DOUBLE,
C_DOUBLE, C_DOUBLE, C_DOUBLE, C_DOUBLE);
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, false);
assertFalse(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.callerMethodType(), mt.insertParameterTypes(0, MemorySegment.class));
assertEquals(callingSequence.functionDesc(), fd.insertArgumentLayouts(0, ADDRESS));
checkArgumentBindings(callingSequence, new Binding[][]{
{ unboxAddress(), vmStore(TARGET_ADDRESS_STORAGE, long.class) },
{ vmStore(xmm0, double.class) },
{ vmStore(xmm1, double.class) },
{ vmStore(xmm2, double.class) },
{ vmStore(xmm3, double.class) },
{ vmStore(xmm4, double.class) },
{ vmStore(xmm5, double.class) },
{ vmStore(xmm6, double.class) },
{ vmStore(xmm7, double.class) },
});
checkReturnBindings(callingSequence, new Binding[]{});
assertEquals(bindings.nVectorArgs(), 8);
}
@Test
public void testMixed() {
MethodType mt = MethodType.methodType(void.class,
long.class, long.class, long.class, long.class, long.class, long.class, long.class, long.class,
float.class, float.class, float.class, float.class,
float.class, float.class, float.class, float.class, float.class, float.class);
FunctionDescriptor fd = FunctionDescriptor.ofVoid(
C_LONG, C_LONG, C_LONG, C_LONG, C_LONG, C_LONG, C_LONG, C_LONG,
C_FLOAT, C_FLOAT, C_FLOAT, C_FLOAT,
C_FLOAT, C_FLOAT, C_FLOAT, C_FLOAT, C_FLOAT, C_FLOAT);
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, false);
assertFalse(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.callerMethodType(), mt.insertParameterTypes(0, MemorySegment.class));
assertEquals(callingSequence.functionDesc(), fd.insertArgumentLayouts(0, ADDRESS));
checkArgumentBindings(callingSequence, new Binding[][]{
{ unboxAddress(), vmStore(TARGET_ADDRESS_STORAGE, long.class) },
{ vmStore(rdi, long.class) },
{ vmStore(rsi, long.class) },
{ vmStore(rdx, long.class) },
{ vmStore(rcx, long.class) },
{ vmStore(r8, long.class) },
{ vmStore(r9, long.class) },
{ vmStore(stackStorage(STACK_SLOT_SIZE, 0), long.class) },
{ vmStore(stackStorage(STACK_SLOT_SIZE, 8), long.class) },
{ vmStore(xmm0, float.class) },
{ vmStore(xmm1, float.class) },
{ vmStore(xmm2, float.class) },
{ vmStore(xmm3, float.class) },
{ vmStore(xmm4, float.class) },
{ vmStore(xmm5, float.class) },
{ vmStore(xmm6, float.class) },
{ vmStore(xmm7, float.class) },
{ vmStore(stackStorage(STACK_SLOT_SIZE, 16), float.class) },
{ vmStore(stackStorage(STACK_SLOT_SIZE, 24), float.class) },
});
checkReturnBindings(callingSequence, new Binding[]{});
assertEquals(bindings.nVectorArgs(), 8);
}
/**
* This is the example from the System V ABI AMD64 document
*
* struct structparm {
* int32_t a, int32_t b, double d;
* } s;
* int32_t e, f, g, h, i, j, k;
* double m, n;
*
* void m(e, f, s, g, h, m, n, i, j, k);
*
* m(s);
*/
@Test
public void testAbiExample() {
MemoryLayout struct = MemoryLayout.structLayout(C_INT, C_INT, C_DOUBLE);
MethodType mt = MethodType.methodType(void.class,
int.class, int.class, MemorySegment.class, int.class, int.class,
double.class, double.class, int.class, int.class, int.class);
FunctionDescriptor fd = FunctionDescriptor.ofVoid(
C_INT, C_INT, struct, C_INT, C_INT, C_DOUBLE, C_DOUBLE, C_INT, C_INT, C_INT);
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, false);
assertFalse(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.callerMethodType(), mt.insertParameterTypes(0, MemorySegment.class));
assertEquals(callingSequence.functionDesc(), fd.insertArgumentLayouts(0, ADDRESS));
checkArgumentBindings(callingSequence, new Binding[][]{
{ unboxAddress(), vmStore(TARGET_ADDRESS_STORAGE, long.class) },
{ vmStore(rdi, int.class) },
{ vmStore(rsi, int.class) },
{
dup(),
bufferLoad(0, long.class), vmStore(rdx, long.class),
bufferLoad(8, double.class), vmStore(xmm0, double.class)
},
{ vmStore(rcx, int.class) },
{ vmStore(r8, int.class) },
{ vmStore(xmm1, double.class) },
{ vmStore(xmm2, double.class) },
{ vmStore(r9, int.class) },
{ vmStore(stackStorage(STACK_SLOT_SIZE, 0), int.class) },
{ vmStore(stackStorage(STACK_SLOT_SIZE, 8), int.class) },
});
checkReturnBindings(callingSequence, new Binding[]{});
assertEquals(bindings.nVectorArgs(), 3);
}
/**
* typedef void (*f)(void);
*
* void m(f f);
* void f_impl(void);
*
* m(f_impl);
*/
@Test
public void testMemoryAddress() {
MethodType mt = MethodType.methodType(void.class, MemorySegment.class);
FunctionDescriptor fd = FunctionDescriptor.ofVoid( C_POINTER);
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, false);
assertFalse(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.callerMethodType(), mt.insertParameterTypes(0, MemorySegment.class));
assertEquals(callingSequence.functionDesc(), fd.insertArgumentLayouts(0, ADDRESS));
checkArgumentBindings(callingSequence, new Binding[][]{
{ unboxAddress(), vmStore(TARGET_ADDRESS_STORAGE, long.class) },
{ unboxAddress(), vmStore(rdi, long.class) },
});
checkReturnBindings(callingSequence, new Binding[]{});
assertEquals(bindings.nVectorArgs(), 0);
}
@Test(dataProvider = "structs")
public void testStruct(MemoryLayout struct, Binding[] expectedBindings) {
MethodType mt = MethodType.methodType(void.class, MemorySegment.class);
FunctionDescriptor fd = FunctionDescriptor.ofVoid(struct);
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, false);
assertFalse(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.callerMethodType(), mt.insertParameterTypes(0, MemorySegment.class));
assertEquals(callingSequence.functionDesc(), fd.insertArgumentLayouts(0, ADDRESS));
checkArgumentBindings(callingSequence, new Binding[][]{
{ unboxAddress(), vmStore(TARGET_ADDRESS_STORAGE, long.class) },
expectedBindings,
});
checkReturnBindings(callingSequence, new Binding[]{});
assertEquals(bindings.nVectorArgs(), 0);
}
@DataProvider
public static Object[][] structs() {
return new Object[][]{
{ MemoryLayout.structLayout(C_LONG), new Binding[]{
bufferLoad(0, long.class), vmStore(rdi, long.class)
}
},
{ MemoryLayout.structLayout(C_LONG, C_LONG), new Binding[]{
dup(),
bufferLoad(0, long.class), vmStore(rdi, long.class),
bufferLoad(8, long.class), vmStore(rsi, long.class)
}
},
{ MemoryLayout.structLayout(C_LONG, C_LONG, C_LONG), new Binding[]{
dup(),
bufferLoad(0, long.class), vmStore(stackStorage(STACK_SLOT_SIZE, 0), long.class),
dup(),
bufferLoad(8, long.class), vmStore(stackStorage(STACK_SLOT_SIZE, 8), long.class),
bufferLoad(16, long.class), vmStore(stackStorage(STACK_SLOT_SIZE, 16), long.class)
}
},
{ MemoryLayout.structLayout(C_LONG, C_LONG, C_LONG, C_LONG), new Binding[]{
dup(),
bufferLoad(0, long.class), vmStore(stackStorage(STACK_SLOT_SIZE, 0), long.class),
dup(),
bufferLoad(8, long.class), vmStore(stackStorage(STACK_SLOT_SIZE, 8), long.class),
dup(),
bufferLoad(16, long.class), vmStore(stackStorage(STACK_SLOT_SIZE, 16), long.class),
bufferLoad(24, long.class), vmStore(stackStorage(STACK_SLOT_SIZE, 24), long.class)
}
},
};
}
@Test
public void testReturnRegisterStruct() {
MemoryLayout struct = MemoryLayout.structLayout(C_LONG, C_LONG);
MethodType mt = MethodType.methodType(MemorySegment.class);
FunctionDescriptor fd = FunctionDescriptor.of(struct);
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, false);
assertFalse(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.callerMethodType(), mt.insertParameterTypes(0, MemorySegment.class, MemorySegment.class));
assertEquals(callingSequence.functionDesc(), fd.insertArgumentLayouts(0, ADDRESS, ADDRESS));
checkArgumentBindings(callingSequence, new Binding[][]{
{ unboxAddress(), vmStore(RETURN_BUFFER_STORAGE, long.class) },
{ unboxAddress(), vmStore(TARGET_ADDRESS_STORAGE, long.class) },
});
checkReturnBindings(callingSequence, new Binding[] {
allocate(struct),
dup(),
vmLoad(rax, long.class),
bufferStore(0, long.class),
dup(),
vmLoad(rdx, long.class),
bufferStore(8, long.class)
});
assertEquals(bindings.nVectorArgs(), 0);
}
@Test
public void testIMR() {
MemoryLayout struct = MemoryLayout.structLayout(C_LONG, C_LONG, C_LONG);
MethodType mt = MethodType.methodType(MemorySegment.class);
FunctionDescriptor fd = FunctionDescriptor.of(struct);
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, false);
assertTrue(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.callerMethodType(), MethodType.methodType(void.class, MemorySegment.class, MemorySegment.class));
assertEquals(callingSequence.functionDesc(), FunctionDescriptor.ofVoid(ADDRESS, C_POINTER));
checkArgumentBindings(callingSequence, new Binding[][]{
{ unboxAddress(), vmStore(TARGET_ADDRESS_STORAGE, long.class) },
{ unboxAddress(), vmStore(rdi, long.class) }
});
checkReturnBindings(callingSequence, new Binding[] {});
assertEquals(bindings.nVectorArgs(), 0);
}
@Test
public void testFloatStructsUpcall() {
MemoryLayout struct = MemoryLayout.structLayout(C_FLOAT); // should be passed in float regs
MethodType mt = MethodType.methodType(MemorySegment.class, MemorySegment.class);
FunctionDescriptor fd = FunctionDescriptor.of(struct, struct);
CallArranger.Bindings bindings = CallArranger.getBindings(mt, fd, true);
assertFalse(bindings.isInMemoryReturn());
CallingSequence callingSequence = bindings.callingSequence();
assertEquals(callingSequence.calleeMethodType(), mt);
assertEquals(callingSequence.functionDesc(), fd);
checkArgumentBindings(callingSequence, new Binding[][]{
{ allocate(struct), dup(), vmLoad(xmm0, float.class), bufferStore(0, float.class) },
});
checkReturnBindings(callingSequence, new Binding[] {
bufferLoad(0, float.class), vmStore(xmm0, float.class)
});
assertEquals(bindings.nVectorArgs(), 1);
}
}
Reference in New Issue View Git Blame Copy Permalink