--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/test/hotspot/jtreg/vmTestbase/nsk/jvmti/scenarios/multienv/MA04/ma04t002/ma04t002a.c Thu May 24 17:12:15 2018 -0700
@@ -0,0 +1,353 @@
+/*
+ * Copyright (c) 2004, 2018, Oracle and/or its affiliates. All rights reserved.
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This code is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License version 2 only, as
+ * published by the Free Software Foundation.
+ *
+ * This code is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+ * version 2 for more details (a copy is included in the LICENSE file that
+ * accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License version
+ * 2 along with this work; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
+ * or visit www.oracle.com if you need additional information or have any
+ * questions.
+ */
+
+#include <stdlib.h>
+#include <string.h>
+#include "jni_tools.h"
+#include "agent_common.h"
+#include "jvmti_tools.h"
+
+#define PASSED 0
+#define STATUS_FAILED 2
+#define SAMPLE_TAG ((jlong) 222222)
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+/* ========================================================================== */
+
+/* scaffold objects */
+static jlong timeout = 0;
+
+/* test objects */
+static jobject testedObject = NULL;
+static jobject testedInstance = NULL;
+static jclass testedClass = NULL;
+static int ObjectsCount = 0;
+
+/* ========================================================================== */
+
+/** callback functions **/
+
+static jvmtiIterationControl JNICALL heap_object_callback
+ (jlong class_tag, jlong size, jlong* tag_ptr, void* user_data)
+{
+ char buffer[32];
+
+ if (*tag_ptr != 0) {
+ NSK_DISPLAY1("tag = %s\n", jlong_to_string(*tag_ptr, buffer));
+ if (*tag_ptr == SAMPLE_TAG) {
+ ObjectsCount++;
+ } else {
+ NSK_COMPLAIN1("testedObject tagged incorrectly, expected=%s,",
+ jlong_to_string(SAMPLE_TAG, buffer));
+ NSK_COMPLAIN1(" got=%s\n", jlong_to_string(*tag_ptr, buffer));
+ nsk_jvmti_setFailStatus();
+ }
+ }
+
+ return JVMTI_ITERATION_CONTINUE;
+}
+
+/* ========================================================================== */
+
+static int prepare(JNIEnv* jni) {
+ const char* CLASS_NAME = "nsk/jvmti/scenarios/multienv/MA04/ma04t002";
+ const char* FIELD_NAME = "testedObject2";
+ const char* FIELD_SIGNATURE = "Ljava/lang/Object;";
+ const char* INSTANCE_NAME = "testedInstance2";
+ const char* INSTANCE_SIGNATURE = "Lnsk/jvmti/scenarios/multienv/MA04/ma04t002;";
+ jfieldID fid = NULL;
+
+ NSK_DISPLAY0("Obtain tested object from a static field of debugee class\n");
+
+ NSK_DISPLAY1("Find class: %s\n", CLASS_NAME);
+ if (!NSK_JNI_VERIFY(jni, (testedClass =
+ NSK_CPP_STUB2(FindClass, jni, CLASS_NAME)) != NULL))
+ return NSK_FALSE;
+
+ if (!NSK_JNI_VERIFY(jni, (testedClass =
+ NSK_CPP_STUB2(NewGlobalRef, jni, testedClass)) != NULL))
+ return NSK_FALSE;
+
+ NSK_DISPLAY2("Find field: %s:%s\n", FIELD_NAME, FIELD_SIGNATURE);
+ if (!NSK_JNI_VERIFY(jni, (fid =
+ NSK_CPP_STUB4(GetStaticFieldID, jni, testedClass,
+ FIELD_NAME, FIELD_SIGNATURE)) != NULL))
+ return NSK_FALSE;
+
+ if (!NSK_JNI_VERIFY(jni, (testedObject =
+ NSK_CPP_STUB3(GetStaticObjectField, jni, testedClass, fid)) != NULL))
+ return NSK_FALSE;
+
+ NSK_DISPLAY2("Find class instance: %s:%s\n",
+ INSTANCE_NAME, INSTANCE_SIGNATURE);
+ if (!NSK_JNI_VERIFY(jni, (fid =
+ NSK_CPP_STUB4(GetStaticFieldID, jni, testedClass,
+ INSTANCE_NAME, INSTANCE_SIGNATURE)) != NULL))
+ return NSK_FALSE;
+
+ if (!NSK_JNI_VERIFY(jni, (testedInstance =
+ NSK_CPP_STUB3(GetStaticObjectField, jni, testedClass, fid)) != NULL))
+ return NSK_FALSE;
+
+ return NSK_TRUE;
+}
+
+/* ========================================================================== */
+
+/** Agent algorithm. */
+static void JNICALL
+agentProc(jvmtiEnv* jvmti, JNIEnv* jni, void* arg) {
+ jint dummy;
+
+ if (!nsk_jvmti_waitForSync(timeout))
+ return;
+
+ if (!prepare(jni)) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+
+ NSK_DISPLAY0("Testcase #1: check that there are no tagged objects\n");
+
+ ObjectsCount = 0;
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB4(IterateOverHeap, jvmti,
+ JVMTI_HEAP_OBJECT_EITHER, heap_object_callback, &dummy))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+ NSK_DISPLAY1("ObjectsCount = %d\n", ObjectsCount);
+ if (ObjectsCount != 0) {
+ NSK_COMPLAIN1("Some objects were unexpectedly tagged: %d\n",
+ ObjectsCount);
+ nsk_jvmti_setFailStatus();
+ }
+
+ ObjectsCount = 0;
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB4(IterateOverHeap, jvmti,
+ JVMTI_HEAP_OBJECT_TAGGED, heap_object_callback, &dummy))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+ NSK_DISPLAY1("ObjectsCount = %d\n", ObjectsCount);
+ if (ObjectsCount != 0) {
+ NSK_COMPLAIN1("Some objects were unexpectedly tagged: %d\n",
+ ObjectsCount);
+ nsk_jvmti_setFailStatus();
+ }
+
+ ObjectsCount = 0;
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB5(IterateOverInstancesOfClass, jvmti,
+ testedClass, JVMTI_HEAP_OBJECT_EITHER, heap_object_callback, &dummy))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+ NSK_DISPLAY1("ObjectsCount = %d\n", ObjectsCount);
+ if (ObjectsCount != 0) {
+ NSK_COMPLAIN1("Some class instances were unexpectedly tagged: %d\n",
+ ObjectsCount);
+ nsk_jvmti_setFailStatus();
+ }
+
+ ObjectsCount = 0;
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB5(IterateOverInstancesOfClass, jvmti,
+ testedClass, JVMTI_HEAP_OBJECT_EITHER, heap_object_callback, &dummy))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+ NSK_DISPLAY1("ObjectsCount = %d\n", ObjectsCount);
+ if (ObjectsCount != 0) {
+ NSK_COMPLAIN1("Some class instances were unexpectedly tagged: %d\n",
+ ObjectsCount);
+ nsk_jvmti_setFailStatus();
+ }
+
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB3(SetTag, jvmti, testedObject,
+ SAMPLE_TAG))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+
+ if (!NSK_VERIFY(nsk_jvmti_resumeSync()))
+ return;
+ if (!NSK_VERIFY(nsk_jvmti_waitForSync(timeout)))
+ return;
+
+
+ NSK_DISPLAY0("Testcase #2: check that there is only one object tagged\n");
+
+ ObjectsCount = 0;
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB4(IterateOverHeap, jvmti,
+ JVMTI_HEAP_OBJECT_EITHER, heap_object_callback, &dummy))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+ NSK_DISPLAY1("ObjectsCount = %d\n", ObjectsCount);
+ if (ObjectsCount != 1) {
+ NSK_COMPLAIN1("Expected 1 object to be tagged: %d\n", ObjectsCount);
+ nsk_jvmti_setFailStatus();
+ }
+
+ ObjectsCount = 0;
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB4(IterateOverHeap, jvmti,
+ JVMTI_HEAP_OBJECT_TAGGED, heap_object_callback, &dummy))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+ NSK_DISPLAY1("ObjectsCount = %d\n", ObjectsCount);
+ if (ObjectsCount != 1) {
+ NSK_COMPLAIN1("Expected 1 object to be tagged: %d\n", ObjectsCount);
+ nsk_jvmti_setFailStatus();
+ }
+
+ ObjectsCount = 0;
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB4(IterateOverHeap, jvmti,
+ JVMTI_HEAP_OBJECT_UNTAGGED, heap_object_callback, &dummy))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+ NSK_DISPLAY1("ObjectsCount = %d\n", ObjectsCount);
+ if (ObjectsCount != 0) {
+ NSK_COMPLAIN1("Some tagged objects were unexpectedly shown as untagged: %d\n",
+ ObjectsCount);
+ nsk_jvmti_setFailStatus();
+ }
+
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB3(SetTag, jvmti, testedInstance,
+ SAMPLE_TAG))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+
+ if (!NSK_VERIFY(nsk_jvmti_resumeSync()))
+ return;
+ if (!NSK_VERIFY(nsk_jvmti_waitForSync(timeout)))
+ return;
+
+
+ NSK_DISPLAY0("Testcase #3: check that there is only one class object tagged\n");
+
+ ObjectsCount = 0;
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB5(IterateOverInstancesOfClass, jvmti,
+ testedClass, JVMTI_HEAP_OBJECT_EITHER, heap_object_callback, &dummy))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+ NSK_DISPLAY1("ObjectsCount = %d\n", ObjectsCount);
+ if (ObjectsCount != 1) {
+ NSK_COMPLAIN1("Expected 1 class instance to be tagged: %d\n",
+ ObjectsCount);
+ nsk_jvmti_setFailStatus();
+ }
+
+ ObjectsCount = 0;
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB5(IterateOverInstancesOfClass, jvmti,
+ testedClass, JVMTI_HEAP_OBJECT_EITHER, heap_object_callback, &dummy))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+ NSK_DISPLAY1("ObjectsCount = %d\n", ObjectsCount);
+ if (ObjectsCount != 1) {
+ NSK_COMPLAIN1("Expected 1 class instance to be tagged: %d\n",
+ ObjectsCount);
+ nsk_jvmti_setFailStatus();
+ }
+
+ ObjectsCount = 0;
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB4(IterateOverHeap, jvmti,
+ JVMTI_HEAP_OBJECT_UNTAGGED, heap_object_callback, &dummy))) {
+ nsk_jvmti_setFailStatus();
+ return;
+ }
+ NSK_DISPLAY1("ObjectsCount = %d\n", ObjectsCount);
+ if (ObjectsCount != 0) {
+ NSK_COMPLAIN1("Some tagged class instances were unexpectedly shown as untagged: %d\n",
+ ObjectsCount);
+ nsk_jvmti_setFailStatus();
+ }
+
+
+ NSK_TRACE(NSK_CPP_STUB2(DeleteGlobalRef, jni, testedClass));
+
+ if (!nsk_jvmti_resumeSync())
+ return;
+}
+
+/* ========================================================================== */
+
+/** Agent library initialization. */
+#ifdef STATIC_BUILD
+JNIEXPORT jint JNICALL Agent_OnLoad_ma04t002a(JavaVM *jvm, char *options, void *reserved) {
+ return Agent_Initialize(jvm, options, reserved);
+}
+JNIEXPORT jint JNICALL Agent_OnAttach_ma04t002a(JavaVM *jvm, char *options, void *reserved) {
+ return Agent_Initialize(jvm, options, reserved);
+}
+JNIEXPORT jint JNI_OnLoad_ma04t002a(JavaVM *jvm, char *options, void *reserved) {
+ return JNI_VERSION_1_8;
+}
+#endif
+jint Agent_Initialize(JavaVM *jvm, char *options, void *reserved) {
+ jvmtiEnv* jvmti = NULL;
+ jvmtiEventCallbacks callbacks;
+ jvmtiCapabilities caps;
+
+ NSK_DISPLAY0("Agent_OnLoad\n");
+
+ if (!NSK_VERIFY(nsk_jvmti_parseOptions(options)))
+ return JNI_ERR;
+
+ timeout = nsk_jvmti_getWaitTime() * 60 * 1000;
+
+ if (!NSK_VERIFY((jvmti =
+ nsk_jvmti_createJVMTIEnv(jvm, reserved)) != NULL))
+ return JNI_ERR;
+
+ memset(&caps, 0, sizeof(caps));
+ caps.can_tag_objects = 1;
+ caps.can_generate_object_free_events = 1;
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB2(AddCapabilities, jvmti, &caps))) {
+ return JNI_ERR;
+ }
+
+ if (!NSK_VERIFY(nsk_jvmti_setAgentProc(agentProc, NULL)))
+ return JNI_ERR;
+
+ memset(&callbacks, 0, sizeof(callbacks));
+ if (!NSK_VERIFY(nsk_jvmti_init_MA(&callbacks)))
+ return JNI_ERR;
+
+ if (!NSK_JVMTI_VERIFY(NSK_CPP_STUB4(SetEventNotificationMode,
+ jvmti, JVMTI_ENABLE, JVMTI_EVENT_OBJECT_FREE, NULL)))
+ return JNI_ERR;
+
+ return JNI_OK;
+}
+
+/* ========================================================================== */
+
+#ifdef __cplusplus
+}
+#endif