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 "ExceptionCheckingJniEnv.hpp"
  27 #include "jni_tools.h"
  28 
  29 extern "C" {
  30 
  31 static jfieldID objFieldId = NULL;
  32 
  33 /*
  34  * Class:     nsk_share_gc_lock_jniref_JNIRefLocker
  35  * Method:    criticalNative
  36  * Signature: (JJ)V
  37  */
  38 JNIEXPORT void JNICALL Java_nsk_share_gc_lock_jniref_JNIRefLocker_criticalNative
  39   (JNIEnv *jni_env, jobject o, jlong enterTime, jlong sleepTime) {
  40         ExceptionCheckingJniEnvPtr env(jni_env);
  41 
  42         jobject obj;
  43         jobject gref, lref, gwref;
  44         time_t start_time, current_time;
  45 
  46         if (objFieldId == NULL) {
  47                 jclass klass = env->GetObjectClass(o);
  48                 objFieldId = env->GetFieldID(klass, "obj", "Ljava/lang/Object;");
  49         }
  50 
  51         obj = env->GetObjectField(o, objFieldId);
  52         env->SetObjectField(o, objFieldId, NULL);
  53 
  54         start_time = time(NULL);
  55         enterTime /= 1000;
  56         current_time = 0;
  57         while (current_time - start_time < enterTime) {
  58                 gref = env->NewGlobalRef(obj);
  59                 lref = env->NewLocalRef(obj);
  60                 gwref = env->NewWeakGlobalRef(obj);
  61                 mssleep((long) sleepTime);
  62                 env->DeleteGlobalRef(gref);
  63                 env->DeleteLocalRef(lref);
  64                 env->DeleteWeakGlobalRef(gwref);
  65                 mssleep((long) sleepTime);
  66                 current_time = time(NULL);
  67         }
  68         env->SetObjectField(o, objFieldId, obj);
  69 }
  70 
  71 }