test/hotspot/jtreg/vmTestbase/nsk/stress/jni/libjnistress002.cpp
author iignatyev
Tue, 28 Aug 2018 14:37:34 -0700
changeset 51551 e409244ce72e
parent 50169 test/hotspot/jtreg/vmTestbase/nsk/stress/jni/libjnistress002.c@dd501973095c
child 51774 79dc492c00ab
permissions -rw-r--r--
8209611: use C++ compiler for hotspot tests Reviewed-by: vlivanov, ihse, erikj, jcbeyler
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
     1
/*
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
     2
 * Copyright (c) 2007, 2018, Oracle and/or its affiliates. All rights reserved.
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
     3
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
     4
 *
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
     5
 * This code is free software; you can redistribute it and/or modify it
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
     6
 * under the terms of the GNU General Public License version 2 only, as
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
     7
 * published by the Free Software Foundation.
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
     8
 *
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
     9
 * This code is distributed in the hope that it will be useful, but WITHOUT
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    10
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    11
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    12
 * version 2 for more details (a copy is included in the LICENSE file that
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    13
 * accompanied this code).
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    14
 *
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    15
 * You should have received a copy of the GNU General Public License version
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    16
 * 2 along with this work; if not, write to the Free Software Foundation,
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    17
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    18
 *
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    19
 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    20
 * or visit www.oracle.com if you need additional information or have any
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    21
 * questions.
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    22
 */
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    23
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    24
#include <jni.h>
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    25
#include <stdio.h>
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    26
#include "jnihelper.h"
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    27
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    28
#ifdef __cplusplus
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    29
extern "C" {
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    30
#endif
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    31
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    32
jobject NewObjectWrapper(JNIEnv *env, jclass clazz, jmethodID methodID, ...) {
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    33
  va_list ap;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    34
  jobject tmp;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    35
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    36
  va_start(ap,methodID);
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    37
  tmp=env->NewObjectV(clazz, methodID, ap);
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    38
  va_end(ap);
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    39
  return(tmp);
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    40
}
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    41
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    42
JNIEXPORT jobjectArray JNICALL
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    43
Java_nsk_stress_jni_JNIter002_jniobjects (JNIEnv *env, jobject jobj, jstring jstr, jint intgr,
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    44
              jlong lng, jcharArray jChArr, jfloat flt, jdouble dbl) {
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    45
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    46
  static int classCount = 0;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    47
  jobjectArray obj;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    48
  jobject element;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    49
  jclass clazz, clazzUp;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    50
  jmethodID methodID;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    51
  const char *classname="nsk/stress/jni/objectsJNI";
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    52
  const char *name="<init>";
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    53
  const char *sig="(Ljava/lang/String;IJ[CFD)V";
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    54
  const char *upperClassName="nsk/stress/jni/jnistress002";
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    55
  const char *fieldName="jniStringAllocSize";
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    56
  const char *fieldSig="I";
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    57
  const char *setpass="halt";
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    58
  const char *setpassSig="()V";
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    59
  jvalue paramArr [6];
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    60
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    61
  env->MonitorEnter(jobj); CE
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    62
  ++classCount;
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    63
  env->MonitorExit(jobj); CE
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    64
  paramArr[0].l=jstr;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    65
  paramArr[1].i=intgr;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    66
  paramArr[2].j=lng;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    67
  paramArr[3].l=jChArr;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    68
  paramArr[4].f=flt;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    69
  paramArr[5].d=dbl;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    70
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    71
  clazz=env->FindClass(classname); CE
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    72
  obj=env->NewObjectArray((jsize)3,clazz,
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    73
                 env->AllocObject(clazz)); CE
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    74
  if (obj==NULL) {
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    75
    fprintf(stderr,"Can not construct the object Array for  %s\n", classname);
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    76
    return(NULL);
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    77
  }
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    78
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    79
  methodID=env->GetMethodID(clazz,name,sig); CE
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    80
  if (methodID==NULL) {
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    81
    fprintf(stderr,"Can not get the ID of <init> for %s\n", classname);
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    82
    return(NULL);
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    83
  }
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    84
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    85
  element=env->NewObject(clazz,methodID,
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    86
                jstr, intgr, lng, jChArr, flt, dbl); CE
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    87
  env->SetObjectArrayElement(obj,0,element); CE
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    88
  element=env->NewObjectA(clazz,methodID,paramArr); CE
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    89
  env->SetObjectArrayElement(obj,1,element); CE
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    90
  element= NewObjectWrapper(env, clazz, methodID,
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    91
                jstr, intgr, lng, jChArr, flt, dbl); CE
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    92
  env->SetObjectArrayElement(obj,2,element); CE
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    93
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    94
  clazzUp=env->FindClass(upperClassName); CE
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    95
  if (classCount == env->GetStaticIntField(clazzUp,
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    96
      env->GetStaticFieldID(clazzUp,fieldName,fieldSig))) {
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
    97
    classname="nsk/stress/jni/JNIter002";
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    98
    clazz=env->FindClass(classname); CE
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
    99
    methodID=env->GetStaticMethodID(clazz, setpass, setpassSig); CE
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
   100
    env->CallStaticVoidMethod(clazz, methodID); CE
50169
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
   101
  }
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
   102
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
   103
  CE
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
   104
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
   105
  return obj;
dd501973095c 8199271: [TESTBUG] open source VM testbase stress tests
lmesnik
parents:
diff changeset
   106
}
51551
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
   107
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
   108
#ifdef __cplusplus
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
   109
}
e409244ce72e 8209611: use C++ compiler for hotspot tests
iignatyev
parents: 50169
diff changeset
   110
#endif