1 /* 2 * Copyright (c) 2007, 2018, 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 #include <jni.h> 24 #include <stdio.h> 25 #include <time.h> 26 #include "jni_tools.h" 27 28 extern "C" { 29 30 static jfieldID objFieldId = NULL; 31 32 /* 33 * Class: nsk_share_gc_lock_jniref_JNIGlobalRefLocker 34 * Method: criticalNative 35 * Signature: (JJ)V 36 */ 37 JNIEXPORT void JNICALL Java_nsk_share_gc_lock_jniref_JNIGlobalRefLocker_criticalNative 38 (JNIEnv *env, jobject o, jlong enterTime, jlong sleepTime) { 39 jobject obj; 40 jobject gref; 41 time_t start_time, current_time; 42 43 if (objFieldId == NULL) { 44 jclass klass = env->GetObjectClass(o); 45 if (klass == NULL) { 46 printf("Error: GetObjectClass returned NULL\n"); 47 return; 48 } 49 objFieldId = env->GetFieldID(klass, "obj", "Ljava/lang/Object;"); 50 if (objFieldId == NULL) { 51 printf("Error: GetFieldID returned NULL\n"); 52 return; 53 } 54 } 55 obj = env->GetObjectField(o, objFieldId); 56 if (obj == NULL) { 57 printf("Error: GetObjectField returned NULL\n"); 58 return; 59 } 60 env->SetObjectField(o, objFieldId, NULL); 61 start_time = time(NULL); 62 enterTime /= 1000; 63 current_time = 0; 64 while (current_time - start_time < enterTime) { 65 gref = env->NewGlobalRef(obj); 66 mssleep((long) sleepTime); 67 env->DeleteGlobalRef(gref); 68 mssleep((long) sleepTime); 69 current_time = time(NULL); 70 } 71 env->SetObjectField(o, objFieldId, obj); 72 } 73 74 }