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