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_JNIRefLocker
  34  * Method:    criticalNative
  35  * Signature: (JJ)V
  36  */
  37 JNIEXPORT void JNICALL Java_nsk_share_gc_lock_jniref_JNIRefLocker_criticalNative
  38   (JNIEnv *env, jobject o, jlong enterTime, jlong sleepTime) {
  39         jobject obj;
  40         jobject gref, lref, gwref;
  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                 lref = env->NewLocalRef(obj);
  67                 gwref = env->NewWeakGlobalRef(obj);
  68                 mssleep((long) sleepTime);
  69                 env->DeleteGlobalRef(gref);
  70                 env->DeleteLocalRef(lref);
  71                 env->DeleteWeakGlobalRef(gwref);
  72                 mssleep((long) sleepTime);
  73                 current_time = time(NULL);
  74         }
  75         env->SetObjectField(o, objFieldId, obj);
  76 }
  77 
  78 }