summaryrefslogtreecommitdiff
path: root/libjava/testsuite/libjava.jvmti/interp/natgetlocalvartable.cc
blob: 8899bac3b87e0fa1321d5a582ae4addd0ca54296 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
#include <jni.h>

#include <jvmti.h>
#include <stdio.h>
#include <stdlib.h>

#include "getlocalvartable.h"

JNIEXPORT jint JNICALL Java_getlocalvartable_do_1getlocalvartable_1tests
(JNIEnv *env, jclass klass)
{
  JavaVM *vm;
  jint err = env->GetJavaVM (&vm);
  if (err < 0)
    {
      fprintf (stderr, "error getting VM\n");
      exit (1);
    }

  jvmtiEnv *jvmti = NULL;
  vm->GetEnv ((void **) &jvmti, JVMTI_VERSION_1_0);

  if (jvmti == NULL)
    {
      fprintf (stderr, "error getting jvmti environment\n");
      exit (1);
    }
  
  jint entrys;
  jvmtiLocalVariableEntry *var_table;

  jvmtiError jerr;
  
  jmethodID meth_ids[3];
  
  meth_ids[0] = env->GetMethodID (klass, "aMethod", "(FF)D");
  meth_ids[1] = env->GetMethodID (klass, "bMethod", "(II)J");
  meth_ids[2] = env->GetMethodID (klass, "cMethod", 
                                  "(Ljava/lang/Object;)Ljava/lang/Object;");
  for (int i = 0; i < 3; i++)
    {
      jerr = jvmti->GetLocalVariableTable (meth_ids[i], &entrys, &var_table);
      if (jerr != JVMTI_ERROR_NONE)
        {
          char *error_name;
          jvmti->GetErrorName (jerr, &error_name);
          fprintf (stderr, "JVMTI Error: %s\n", error_name);
          jvmti->Deallocate (reinterpret_cast<unsigned char *> (error_name));
        }
      else
        {
          for (int j = 0; j < entrys; j++)
            {
              printf ("Slot: %d\n", static_cast<int> (var_table[j].slot));
              printf ("  Name: %s\n", var_table[j].name);
              jvmti->Deallocate (reinterpret_cast<unsigned char *> (var_table[j].name));
              printf ("  Sig: %s\n", var_table[j].signature);
              jvmti->Deallocate (reinterpret_cast<unsigned char *> (var_table[j].signature));
              printf ("  Gen Sig: %s\n", var_table[j].generic_signature);
              jvmti->Deallocate (reinterpret_cast<unsigned char *> (var_table[j].generic_signature));
              printf ("  Start Loc: %ld\n", static_cast<long> (var_table[j].start_location));
              printf ("  Length: %d\n", static_cast<int> (var_table[j].length));
            }
          
          jvmti->Deallocate (reinterpret_cast<unsigned char *> (var_table));
        }
    }
    
    return 0;
}