1 /*
2  * Copyright (c) 2016, Oracle and/or its affiliates. All rights reserved.
3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4  *
5  * This code is free software; you can redistribute it and/or modify it
6  * under the terms of the GNU General Public License version 2 only, as
7  * published by the Free Software Foundation.
8  *
9  * This code is distributed in the hope that it will be useful, but WITHOUT
10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
12  * version 2 for more details (a copy is included in the LICENSE file that
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 #include <stdio.h>
25 #include <stdint.h>
26 
27 #include "jni.h"
28 
29 #ifdef __cplusplus
30 extern "C" {
31 #endif
32 
SS(jfloat f1,jfloat f2)33 jfloat JNICALL SS(jfloat f1, jfloat f2) {
34   return f1 + f2;
35 }
36 
Java_jdk_vm_ci_code_test_NativeCallTest_getFF(JNIEnv * env,jclass clazz)37 JNIEXPORT jlong JNICALL Java_jdk_vm_ci_code_test_NativeCallTest_getFF(JNIEnv *env, jclass clazz) {
38   return (jlong)(intptr_t)SS;
39 }
40 
Java_jdk_vm_ci_code_test_NativeCallTest__1FF(JNIEnv * env,jclass clazz,jfloat a,jfloat b)41 JNIEXPORT jfloat JNICALL Java_jdk_vm_ci_code_test_NativeCallTest__1FF(JNIEnv *env, jclass clazz, jfloat a, jfloat b) {
42   return SS(a, b);
43 }
44 
SDILDS(jfloat a,jdouble b,jint c,jlong d,jdouble e,jfloat f)45 jfloat JNICALL SDILDS(jfloat a, jdouble b, jint c, jlong d, jdouble e, jfloat f) {
46   return (jfloat)(a + b + c + d + e + f);
47 }
48 
Java_jdk_vm_ci_code_test_NativeCallTest_getSDILDS(JNIEnv * env,jclass clazz)49 JNIEXPORT jlong JNICALL Java_jdk_vm_ci_code_test_NativeCallTest_getSDILDS(JNIEnv *env, jclass clazz) {
50   return (jlong)(intptr_t)SDILDS;
51 }
52 
Java_jdk_vm_ci_code_test_NativeCallTest__1SDILDS(JNIEnv * env,jclass clazz,jfloat a,jdouble b,jint c,jlong d,jdouble e,jfloat f)53 JNIEXPORT jfloat JNICALL Java_jdk_vm_ci_code_test_NativeCallTest__1SDILDS(JNIEnv *env, jclass clazz,
54                                                                           jfloat a, jdouble b, jint c, jlong d, jdouble e, jfloat f) {
55   return SDILDS(a, b, c, d, e, f);
56 }
57 
F32SDILDS(jfloat f00,jfloat f01,jfloat f02,jfloat f03,jfloat f04,jfloat f05,jfloat f06,jfloat f07,jfloat f08,jfloat f09,jfloat f0a,jfloat f0b,jfloat f0c,jfloat f0d,jfloat f0e,jfloat f0f,jfloat f10,jfloat f11,jfloat f12,jfloat f13,jfloat f14,jfloat f15,jfloat f16,jfloat f17,jfloat f18,jfloat f19,jfloat f1a,jfloat f1b,jfloat f1c,jfloat f1d,jfloat f1e,jfloat f1f,jfloat a,jdouble b,jint c,jlong d,jdouble e,jfloat f)58 jfloat JNICALL F32SDILDS(jfloat f00, jfloat f01, jfloat f02, jfloat f03, jfloat f04, jfloat f05, jfloat f06, jfloat f07,
59                          jfloat f08, jfloat f09, jfloat f0a, jfloat f0b, jfloat f0c, jfloat f0d, jfloat f0e, jfloat f0f,
60                          jfloat f10, jfloat f11, jfloat f12, jfloat f13, jfloat f14, jfloat f15, jfloat f16, jfloat f17,
61                          jfloat f18, jfloat f19, jfloat f1a, jfloat f1b, jfloat f1c, jfloat f1d, jfloat f1e, jfloat f1f,
62                          jfloat a, jdouble b, jint c, jlong d, jdouble e, jfloat f) {
63   return (jfloat)(f00 + f01 + f02 + f03 + f04 + f05 + f06 + f07 +
64                   f08 + f09 + f0a + f0b + f0c + f0d + f0e + f0f +
65                   f10 + f11 + f12 + f13 + f14 + f15 + f16 + f17 +
66                   f18 + f19 + f1a + f1b + f1c + f1d + f1e + f1f +
67                   a +   b +   c +   d +   e + f);
68 }
69 
Java_jdk_vm_ci_code_test_NativeCallTest_getF32SDILDS(JNIEnv * env,jclass clazz)70 JNIEXPORT jlong JNICALL Java_jdk_vm_ci_code_test_NativeCallTest_getF32SDILDS(JNIEnv *env, jclass clazz) {
71   return (jlong)(intptr_t)F32SDILDS;
72 }
73 
Java_jdk_vm_ci_code_test_NativeCallTest__1F32SDILDS(JNIEnv * env,jclass clazz,jfloat f00,jfloat f01,jfloat f02,jfloat f03,jfloat f04,jfloat f05,jfloat f06,jfloat f07,jfloat f08,jfloat f09,jfloat f0a,jfloat f0b,jfloat f0c,jfloat f0d,jfloat f0e,jfloat f0f,jfloat f10,jfloat f11,jfloat f12,jfloat f13,jfloat f14,jfloat f15,jfloat f16,jfloat f17,jfloat f18,jfloat f19,jfloat f1a,jfloat f1b,jfloat f1c,jfloat f1d,jfloat f1e,jfloat f1f,jfloat a,jdouble b,jint c,jlong d,jdouble e,jfloat f)74 JNIEXPORT jfloat JNICALL Java_jdk_vm_ci_code_test_NativeCallTest__1F32SDILDS(JNIEnv *env, jclass clazz,
75                                                                              jfloat f00, jfloat f01, jfloat f02, jfloat f03,
76                                                                              jfloat f04, jfloat f05, jfloat f06, jfloat f07,
77                                                                              jfloat f08, jfloat f09, jfloat f0a, jfloat f0b,
78                                                                              jfloat f0c, jfloat f0d, jfloat f0e, jfloat f0f,
79                                                                              jfloat f10, jfloat f11, jfloat f12, jfloat f13,
80                                                                              jfloat f14, jfloat f15, jfloat f16, jfloat f17,
81                                                                              jfloat f18, jfloat f19, jfloat f1a, jfloat f1b,
82                                                                              jfloat f1c, jfloat f1d, jfloat f1e, jfloat f1f,
83                                                                              jfloat a, jdouble b, jint c, jlong d, jdouble e, jfloat f) {
84   return F32SDILDS(f00, f01, f02, f03, f04, f05, f06, f07,
85                    f08, f09, f0a, f0b, f0c, f0d, f0e, f0f,
86                    f10, f11, f12, f13, f14, f15, f16, f17,
87                    f18, f19, f1a, f1b, f1c, f1d, f1e, f1f,
88                    a,   b,   c,   d,   e,   f);
89 }
90 
91 
D32SDILDS(jdouble d00,jdouble d01,jdouble d02,jdouble d03,jdouble d04,jdouble d05,jdouble d06,jdouble d07,jdouble d08,jdouble d09,jdouble d0a,jdouble d0b,jdouble d0c,jdouble d0d,jdouble d0e,jdouble d0f,jdouble d10,jdouble d11,jdouble d12,jdouble d13,jdouble d14,jdouble d15,jdouble d16,jdouble d17,jdouble d18,jdouble d19,jdouble d1a,jdouble d1b,jdouble d1c,jdouble d1d,jdouble d1e,jdouble d1f,jfloat a,jdouble b,jint c,jlong d,jdouble e,jfloat f)92 jfloat JNICALL D32SDILDS(jdouble d00, jdouble d01, jdouble d02, jdouble d03, jdouble d04, jdouble d05, jdouble d06, jdouble d07,
93                          jdouble d08, jdouble d09, jdouble d0a, jdouble d0b, jdouble d0c, jdouble d0d, jdouble d0e, jdouble d0f,
94                          jdouble d10, jdouble d11, jdouble d12, jdouble d13, jdouble d14, jdouble d15, jdouble d16, jdouble d17,
95                          jdouble d18, jdouble d19, jdouble d1a, jdouble d1b, jdouble d1c, jdouble d1d, jdouble d1e, jdouble d1f,
96                          jfloat a, jdouble b, jint c, jlong d, jdouble e, jfloat f) {
97   return (jfloat)(d00 + d01 + d02 + d03 + d04 + d05 + d06 + d07 +
98                   d08 + d09 + d0a + d0b + d0c + d0d + d0e + d0f +
99                   d10 + d11 + d12 + d13 + d14 + d15 + d16 + d17 +
100                   d18 + d19 + d1a + d1b + d1c + d1d + d1e + d1f +
101                   a +   b +   c +   d +   e + f);
102 }
103 
Java_jdk_vm_ci_code_test_NativeCallTest_getD32SDILDS(JNIEnv * env,jclass clazz)104 JNIEXPORT jlong JNICALL Java_jdk_vm_ci_code_test_NativeCallTest_getD32SDILDS(JNIEnv *env, jclass clazz) {
105   return (jlong)(intptr_t)D32SDILDS;
106 }
107 
Java_jdk_vm_ci_code_test_NativeCallTest__1D32SDILDS(JNIEnv * env,jclass clazz,jdouble d00,jdouble d01,jdouble d02,jdouble d03,jdouble d04,jdouble d05,jdouble d06,jdouble d07,jdouble d08,jdouble d09,jdouble d0a,jdouble d0b,jdouble d0c,jdouble d0d,jdouble d0e,jdouble d0f,jdouble d10,jdouble d11,jdouble d12,jdouble d13,jdouble d14,jdouble d15,jdouble d16,jdouble d17,jdouble d18,jdouble d19,jdouble d1a,jdouble d1b,jdouble d1c,jdouble d1d,jdouble d1e,jdouble d1f,jfloat a,jdouble b,jint c,jlong d,jdouble e,jfloat f)108 JNIEXPORT jfloat JNICALL Java_jdk_vm_ci_code_test_NativeCallTest__1D32SDILDS(JNIEnv *env, jclass clazz,
109                                                                              jdouble d00, jdouble d01, jdouble d02, jdouble d03,
110                                                                              jdouble d04, jdouble d05, jdouble d06, jdouble d07,
111                                                                              jdouble d08, jdouble d09, jdouble d0a, jdouble d0b,
112                                                                              jdouble d0c, jdouble d0d, jdouble d0e, jdouble d0f,
113                                                                              jdouble d10, jdouble d11, jdouble d12, jdouble d13,
114                                                                              jdouble d14, jdouble d15, jdouble d16, jdouble d17,
115                                                                              jdouble d18, jdouble d19, jdouble d1a, jdouble d1b,
116                                                                              jdouble d1c, jdouble d1d, jdouble d1e, jdouble d1f,
117                                                                              jfloat a, jdouble b, jint c, jlong d, jdouble e, jfloat f) {
118   return D32SDILDS(d00, d01, d02, d03, d04, d05, d06, d07,
119                    d08, d09, d0a, d0b, d0c, d0d, d0e, d0f,
120                    d10, d11, d12, d13, d14, d15, d16, d17,
121                    d18, d19, d1a, d1b, d1c, d1d, d1e, d1f,
122                    a,   b,   c,   d,   e,   f);
123 }
124 
125 
I32SDILDS(jint i00,jint i01,jint i02,jint i03,jint i04,jint i05,jint i06,jint i07,jint i08,jint i09,jint i0a,jint i0b,jint i0c,jint i0d,jint i0e,jint i0f,jint i10,jint i11,jint i12,jint i13,jint i14,jint i15,jint i16,jint i17,jint i18,jint i19,jint i1a,jint i1b,jint i1c,jint i1d,jint i1e,jint i1f,jfloat a,jdouble b,jint c,jlong d,jdouble e,jfloat f)126 jfloat JNICALL I32SDILDS(jint i00, jint i01, jint i02, jint i03, jint i04, jint i05, jint i06, jint i07,
127                          jint i08, jint i09, jint i0a, jint i0b, jint i0c, jint i0d, jint i0e, jint i0f,
128                          jint i10, jint i11, jint i12, jint i13, jint i14, jint i15, jint i16, jint i17,
129                          jint i18, jint i19, jint i1a, jint i1b, jint i1c, jint i1d, jint i1e, jint i1f,
130                          jfloat a, jdouble b, jint c, jlong d, jdouble e, jfloat f) {
131   return (jfloat)(i00 + i01 + i02 + i03 + i04 + i05 + i06 + i07 +
132                   i08 + i09 + i0a + i0b + i0c + i0d + i0e + i0f +
133                   i10 + i11 + i12 + i13 + i14 + i15 + i16 + i17 +
134                   i18 + i19 + i1a + i1b + i1c + i1d + i1e + i1f +
135                   a +   b +   c +   d +   e + f);
136 }
137 
Java_jdk_vm_ci_code_test_NativeCallTest_getI32SDILDS(JNIEnv * env,jclass clazz)138 JNIEXPORT jlong JNICALL Java_jdk_vm_ci_code_test_NativeCallTest_getI32SDILDS(JNIEnv *env, jclass clazz) {
139   return (jlong) (intptr_t) I32SDILDS;
140 }
141 
Java_jdk_vm_ci_code_test_NativeCallTest__1I32SDILDS(JNIEnv * env,jclass clazz,jint i00,jint i01,jint i02,jint i03,jint i04,jint i05,jint i06,jint i07,jint i08,jint i09,jint i0a,jint i0b,jint i0c,jint i0d,jint i0e,jint i0f,jint i10,jint i11,jint i12,jint i13,jint i14,jint i15,jint i16,jint i17,jint i18,jint i19,jint i1a,jint i1b,jint i1c,jint i1d,jint i1e,jint i1f,jfloat a,jdouble b,jint c,jlong d,jdouble e,jfloat f)142 JNIEXPORT jfloat JNICALL Java_jdk_vm_ci_code_test_NativeCallTest__1I32SDILDS(JNIEnv *env, jclass clazz,
143                                                                              jint i00, jint i01, jint i02, jint i03,
144                                                                              jint i04, jint i05, jint i06, jint i07,
145                                                                              jint i08, jint i09, jint i0a, jint i0b,
146                                                                              jint i0c, jint i0d, jint i0e, jint i0f,
147                                                                              jint i10, jint i11, jint i12, jint i13,
148                                                                              jint i14, jint i15, jint i16, jint i17,
149                                                                              jint i18, jint i19, jint i1a, jint i1b,
150                                                                              jint i1c, jint i1d, jint i1e, jint i1f,
151                                                                              jfloat a, jdouble b, jint c, jlong d, jdouble e, jfloat f) {
152   return I32SDILDS(i00, i01, i02, i03, i04, i05, i06, i07,
153                    i08, i09, i0a, i0b, i0c, i0d, i0e, i0f,
154                    i10, i11, i12, i13, i14, i15, i16, i17,
155                    i18, i19, i1a, i1b, i1c, i1d, i1e, i1f,
156                    a,   b,   c,   d,   e,   f);
157 }
158 
L32SDILDS(jlong l00,jlong l01,jlong l02,jlong l03,jlong l04,jlong l05,jlong l06,jlong l07,jlong l08,jlong l09,jlong l0a,jlong l0b,jlong l0c,jlong l0d,jlong l0e,jlong l0f,jlong l10,jlong l11,jlong l12,jlong l13,jlong l14,jlong l15,jlong l16,jlong l17,jlong l18,jlong l19,jlong l1a,jlong l1b,jlong l1c,jlong l1d,jlong l1e,jlong l1f,jfloat a,jdouble b,jint c,jlong d,jdouble e,jfloat f)159 jfloat JNICALL L32SDILDS(jlong l00, jlong l01, jlong l02, jlong l03, jlong l04, jlong l05, jlong l06, jlong l07,
160                          jlong l08, jlong l09, jlong l0a, jlong l0b, jlong l0c, jlong l0d, jlong l0e, jlong l0f,
161                          jlong l10, jlong l11, jlong l12, jlong l13, jlong l14, jlong l15, jlong l16, jlong l17,
162                          jlong l18, jlong l19, jlong l1a, jlong l1b, jlong l1c, jlong l1d, jlong l1e, jlong l1f,
163                          jfloat a, jdouble b, jint c, jlong d, jdouble e, jfloat f) {
164   return (jfloat)(l00 + l01 + l02 + l03 + l04 + l05 + l06 + l07 +
165                   l08 + l09 + l0a + l0b + l0c + l0d + l0e + l0f +
166                   l10 + l11 + l12 + l13 + l14 + l15 + l16 + l17 +
167                   l18 + l19 + l1a + l1b + l1c + l1d + l1e + l1f +
168                   a +   b +   c +   d +   e + f);
169 }
170 
Java_jdk_vm_ci_code_test_NativeCallTest_getL32SDILDS(JNIEnv * env,jclass clazz)171 JNIEXPORT jlong JNICALL Java_jdk_vm_ci_code_test_NativeCallTest_getL32SDILDS(JNIEnv *env, jclass clazz) {
172   return (jlong)(intptr_t)L32SDILDS;
173 }
174 
Java_jdk_vm_ci_code_test_NativeCallTest__1L32SDILDS(JNIEnv * env,jclass clazz,jlong l00,jlong l01,jlong l02,jlong l03,jlong l04,jlong l05,jlong l06,jlong l07,jlong l08,jlong l09,jlong l0a,jlong l0b,jlong l0c,jlong l0d,jlong l0e,jlong l0f,jlong l10,jlong l11,jlong l12,jlong l13,jlong l14,jlong l15,jlong l16,jlong l17,jlong l18,jlong l19,jlong l1a,jlong l1b,jlong l1c,jlong l1d,jlong l1e,jlong l1f,jfloat a,jdouble b,jint c,jlong d,jdouble e,jfloat f)175 JNIEXPORT jfloat JNICALL Java_jdk_vm_ci_code_test_NativeCallTest__1L32SDILDS(JNIEnv *env, jclass clazz,
176                                                                                jlong l00, jlong l01, jlong l02, jlong l03,
177                                                                                jlong l04, jlong l05, jlong l06, jlong l07,
178                                                                                jlong l08, jlong l09, jlong l0a, jlong l0b,
179                                                                                jlong l0c, jlong l0d, jlong l0e, jlong l0f,
180                                                                                jlong l10, jlong l11, jlong l12, jlong l13,
181                                                                                jlong l14, jlong l15, jlong l16, jlong l17,
182                                                                                jlong l18, jlong l19, jlong l1a, jlong l1b,
183                                                                                jlong l1c, jlong l1d, jlong l1e, jlong l1f,
184                                                                                jfloat a, jdouble b, jint c, jlong d, jdouble e, jfloat f) {
185   return L32SDILDS(l00, l01, l02, l03, l04, l05, l06, l07,
186                    l08, l09, l0a, l0b, l0c, l0d, l0e, l0f,
187                    l10, l11, l12, l13, l14, l15, l16, l17,
188                    l18, l19, l1a, l1b, l1c, l1d, l1e, l1f,
189                    a,   b,   c,   d,   e,   f);
190 }
191 
192 #ifdef __cplusplus
193 }
194 #endif
195 
196