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_jni_ByteArrayCriticalLocker
  34  * Method:    criticalNative
  35  */
  36 JNIEXPORT jbyte JNICALL Java_nsk_share_gc_lock_jni_ByteArrayCriticalLocker_criticalNative
  37 (JNIEnv *env, jobject o, jlong enterTime, jlong sleepTime) {
  38         jsize size, i;
  39         jbyteArray arr;
  40         jbyte *pa;
  41         jbyte hash = 0;
  42         time_t start_time, current_time;
  43 
  44         if (objFieldId == NULL) {
  45                 jclass klass = env->GetObjectClass(o);
  46                 if (klass == NULL) {
  47                         printf("Error: GetObjectClass returned NULL\n");
  48                         return 0;
  49                 }
  50                 objFieldId = env->GetFieldID(klass, "obj", "Ljava/lang/Object;");
  51                 if (objFieldId == NULL) {
  52                         printf("Error: GetFieldID returned NULL\n");
  53                         return 0;
  54                 }
  55         }
  56         arr = (jbyteArray) env->GetObjectField(o, objFieldId);
  57         if (arr == NULL) {
  58                 printf("Error: GetObjectField returned NULL\n");
  59                 return 0;
  60         }
  61         env->SetObjectField(o, objFieldId, NULL);
  62         size = env->GetArrayLength(arr);
  63         start_time = time(NULL);
  64         enterTime /= 1000;
  65         current_time = 0;
  66         while (current_time - start_time < enterTime) {
  67                 pa = (jbyte*) env->GetPrimitiveArrayCritical(arr, NULL);
  68                 if (pa != NULL) {
  69                         for (i = 0; i < size; ++i)
  70                                 hash ^= pa[i];
  71                 } else {
  72                         hash = 0;
  73                 }
  74                 mssleep((long) sleepTime);
  75                 env->ReleasePrimitiveArrayCritical(arr, pa, 0);
  76                 mssleep((long) sleepTime);
  77                 current_time = time(NULL);
  78         }
  79         env->SetObjectField(o, objFieldId, arr);
  80         return hash;
  81 }
  82 
  83 }