JVMPIについて

void notifyEvent(JVMPI_Event *event) {
    switch(event->event_type) {
      case JVMPI_EVENT_CLASS_LOAD: 
        jvmpi_interface->RawMonitorEnter(data_access_lock); 

        if (strcmp(event->u.class_load.class_name, servletname) == 0) {
	    fp = fopen(logfile, "w");
        }
        jvmpi_interface->RawMonitorExit(data_access_lock);
        return;

      case JVMPI_EVENT_GC_FINISH:
        jvmpi_interface->RawMonitorEnter(data_access_lock); 
        if (fp != NULL) {
            fprintf(fp, "GC: used obj %d used obj space %d total obj size: %d\n",
	            event->u.gc_info.used_objects,
	            event->u.gc_info.used_object_space);
	            event->u.gc_info.total_object_space);
        }
        jvmpi_interface->RawMonitorExit(data_access_lock);
        return;
    }                       
}

switch(event->event_type) {
  case JVMPI_EVENT_CLASS_LOAD:
    if(strcmp(event->u.class_load.class_name, servletname) == 0) {
      fp = fopen("C:\\c_c++\\myprofiler.log", "w");
      flag = 1;
    }
    
    if(flag != 0)
      notifyClassLoad(event);
    break;

#include <jvmpi.h>
#include <jni.h>
#include <stdlib.h>

/* jvmpiインタフェース型のポインタ */
JVMPI_Interface *jvmpi_interface;
#define CALL(f) (jvmpi_interface->f)

/* データアクセスロック用 */
JVMPI_RawMonitor data_access_lock;

/* スレッド開始イベント */
void ThreadStartHandler(JNIEnv *thread_id)
{
  fprintf(stderr, "bbb\n");
  int *p_ctr = (int *)malloc(sizeof(int));
  *p_ctr = 0;
  
  CALL(SetThreadLocalStorage)(thread_id, p_ctr);
}

/* メソッド開始イベント */
void MethodEntryHandler(jmethodID method_id, JNIEnv *thread_id)
{
  fprintf(stderr, "aaa\n");
  int *p_ctr = (int *)CALL(GetThreadLocalStorage)(thread_id);
  (*p_ctr)++;
}

/* スレッド終了イベント */
void ThreadEndHandler(JNIEnv *thread_id)
{
  int *p_ctr = (int *)CALL(GetThreadLocalStorage)(thread_id);
  fprintf(stderr, "Thread %x executed %d method\n", thread_id, (*p_ctr));
  
  free(p_ctr);
}

/* イベントハンドリング関数 */
void notifyEvent(JVMPI_Event *event)
{
  switch(event->event_type) {
  case JVMPI_EVENT_THREAD_START:
    CALL(RawMonitorEnter)(data_access_lock);
    ThreadStartHandler(event->u.thread_start.thread_env_id);
    CALL(RawMonitorExit)(data_access_lock);
    break;

  case JVMPI_EVENT_METHOD_ENTRY:
    CALL(RawMonitorEnter)(data_access_lock);
    MethodEntryHandler(event->u.method.method_id, event->env_id);
    CALL(RawMonitorExit)(data_access_lock);
    break;

  case JVMPI_EVENT_THREAD_END:
    CALL(RawMonitorEnter)(data_access_lock);
    ThreadEndHandler(event->env_id);
    CALL(RawMonitorExit)(data_access_lock);
    break;
  }
}

/* プロファイラエージェントエントリーポイント */
extern "C"
{

JNIEXPORT jint JNICALL JVM_OnLoad(JavaVM *jvm, char *options, void *reserved)
  {
    fprintf(stderr, "ddd\n");
    
    /* jvmpiのポインタの取得 */
    if ((jvm->GetEnv((void **)&jvmpi_interface, JVMPI_VERSION_1)) < 0) {
      fprintf(stderr, "error in obtaining jvmpi interface pointer\n");
      return JNI_ERR;
    }

    fprintf(stderr, "ccc\n");
    /* イベントコールバック関数の登録 */
    jvmpi_interface->NotifyEvent = notifyEvent;
    
    /* イベントの設定 */
    jvmpi_interface->EnableEvent(JVMPI_EVENT_THREAD_START, NULL);
    jvmpi_interface->EnableEvent(JVMPI_EVENT_METHOD_ENTRY, NULL);
    jvmpi_interface->EnableEvent(JVMPI_EVENT_THREAD_END, NULL);
    
    return JNI_OK;
  }
}