rt_gccstream/libjava/testsuite/libjava.jvmti/natgetmethodname.cc

117 lines
3.3 KiB
C++

#include <gcj/cni.h>
#include <jvm.h>
#include <jvmti.h>
#include <stdio.h>
#include <java/lang/Object.h>
#include "getmethodname.h"
static void
print_error (jvmtiEnv *env, const char *msg, jvmtiError err)
{
char *error_msg;
env->GetErrorName (err, &error_msg);
printf ("%s: %s\n", msg, error_msg);
env->Deallocate (reinterpret_cast<unsigned char *> (error_msg));
}
#define NUM_METHODS 8
static const char *function_names[] = { "clone",
"equals",
"finalize",
"getClass",
"hashCode",
"notify",
"notifyAll",
"toString" };
static int
function_index (const char *name)
{
for (int i = 0; i < NUM_METHODS; ++i)
{
if (strcmp (function_names[i], name) == 0)
return i;
}
return -1;
}
void
getmethodname::do_getmethodname_tests ()
{
jvmtiEnv *env;
JavaVM *vm = _Jv_GetJavaVM ();
vm->GetEnv (reinterpret_cast<void **> (&env), JVMTI_VERSION_1_0);
jvmtiError err;
err = env->GetMethodName (reinterpret_cast<jmethodID> (NULL),
reinterpret_cast<char **> (NULL),
reinterpret_cast<char **> (NULL),
reinterpret_cast<char **> (NULL));
print_error (env, "null jmethodID", err);
jint count;
jmethodID *methods;
err = env->GetClassMethods (&java::lang::Object::class$, &count, &methods);
print_error (env, "GetClassMethods", err);
char *names[NUM_METHODS], *solo_names[NUM_METHODS];
char *signatures[NUM_METHODS], *solo_signatures[NUM_METHODS];
char *generics[NUM_METHODS], *solo_generics[NUM_METHODS];
for (jint i = 0; i < count; ++i)
{
char *name, *n;
char *signature, *s;
char *generic, *g;
err = env->GetMethodName (methods[i], &name, &signature, &generic);
int idx = -1;
if (err != JVMTI_ERROR_NONE)
{
print_error (env, "GetMethodName - all fields", err);
continue;
}
idx = function_index (name);
if (idx == -1)
continue;
names[idx] = name;
signatures[idx] = signature;
generics[idx] = generic;
err = env->GetMethodName (methods[i], &n, NULL, NULL);
print_error (env, "GetMethodName - name", err);
solo_names[idx] = n;
err = env->GetMethodName (methods[i], NULL, &s, NULL);
print_error (env, "GetMethodName - signature", err);
solo_signatures[idx] = s;
err = env->GetMethodName (methods[i], NULL, NULL, &g);
print_error (env, "GetMethodName - generic", err);
solo_generics[idx] = g;
}
#define WRAP(X) ((X) == NULL ? "null" : (X))
#define MATCH(X,Y) (strcmp ((X),(Y)) == 0 ? "match" : "do not match")
for (int i = 0; i < NUM_METHODS; ++i)
{
printf ("name=%s, signature=%s, generic=%s\n",
WRAP (names[i]), WRAP (signatures[i]), WRAP (generics[i]));
printf ("names %s\n", MATCH (solo_names[i], names[i]));
printf ("signatures %s\n", MATCH (solo_signatures[i], signatures[i]));
printf ("generic %s\n", "not yet");
env->Deallocate (reinterpret_cast<unsigned char *> (names[i]));
env->Deallocate (reinterpret_cast<unsigned char *> (solo_names[i]));
env->Deallocate (reinterpret_cast<unsigned char *> (signatures[i]));
env->Deallocate (reinterpret_cast<unsigned char *> (solo_signatures[i]));
env->Deallocate (reinterpret_cast<unsigned char *> (generics[i]));
env->Deallocate (reinterpret_cast<unsigned char *> (solo_generics[i]));
}
}