src/java.c

   1 /**
   2  * collectd - src/java.c
   3  * Copyright (C) 2009  Florian octo Forster
   4  * Copyright (C) 2008  Justo Alonso Achaques
   5  *
   6  * This program is free software; you can redistribute it and/or modify it
   7  * under the terms of the GNU General Public License as published by the
   8  * Free Software Foundation; only version 2 of the License is applicable.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License along
  16  * with this program; if not, write to the Free Software Foundation, Inc.,
  17  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  18  *
  19  * Authors:
  20  *   Florian octo Forster <octo at verplant.org>
  21  *   Justo Alonso Achaques <justo.alonso at gmail.com>
  22  **/
  23
  24 #include "collectd.h"
  25 #include "plugin.h"
  26 #include "common.h"
  27 #include "filter_chain.h"
  28
  29 #include <pthread.h>
  30 #include <jni.h>
  31
  32 #if !defined(JNI_VERSION_1_2)
  33 # error "Need JNI 1.2 compatible interface!"
  34 #endif
  35
  36 /*
  37  * Types
  38  */
  39 struct cjni_jvm_env_s /* {{{ */
  40 {
  41   JNIEnv *jvm_env;
  42   int reference_counter;
  43 };
  44 typedef struct cjni_jvm_env_s cjni_jvm_env_t;
  45 /* }}} */
  46
  47 struct java_plugin_class_s /* {{{ */
  48 {
  49   char     *name;
  50   jclass    class;
  51   jobject   object;
  52 };
  53 typedef struct java_plugin_class_s java_plugin_class_t;
  54 /* }}} */
  55
  56 #define CB_TYPE_CONFIG       1
  57 #define CB_TYPE_INIT         2
  58 #define CB_TYPE_READ         3
  59 #define CB_TYPE_WRITE        4
  60 #define CB_TYPE_FLUSH        5
  61 #define CB_TYPE_SHUTDOWN     6
  62 #define CB_TYPE_LOG          7
  63 #define CB_TYPE_NOTIFICATION 8
  64 #define CB_TYPE_MATCH        9
  65 #define CB_TYPE_TARGET      10
  66 struct cjni_callback_info_s /* {{{ */
  67 {
  68   char     *name;
  69   int       type;
  70   jclass    class;
  71   jobject   object;
  72   jmethodID method;
  73 };
  74 typedef struct cjni_callback_info_s cjni_callback_info_t;
  75 /* }}} */
  76
  77 /*
  78  * Global variables
  79  */
  80 static JavaVM *jvm = NULL;
  81 static pthread_key_t jvm_env_key;
  82
  83 /* Configuration options for the JVM. */
  84 static char **jvm_argv = NULL;
  85 static size_t jvm_argc = 0;
  86
  87 /* List of class names to load */
  88 static java_plugin_class_t  *java_classes_list = NULL;
  89 static size_t                java_classes_list_len;
  90
  91 /* List of config, init, and shutdown callbacks. */
  92 static cjni_callback_info_t *java_callbacks      = NULL;
  93 static size_t                java_callbacks_num  = 0;
  94 static pthread_mutex_t       java_callbacks_lock = PTHREAD_MUTEX_INITIALIZER;
  95
  96 static oconfig_item_t       *config_block = NULL;
  97
  98 /*
  99  * Prototypes
 100  *
 101  * Mostly functions that are needed by the Java interface (``native'')
 102  * functions.
 103  */
 104 static void cjni_callback_info_destroy (void *arg);
 105 static cjni_callback_info_t *cjni_callback_info_create (JNIEnv *jvm_env,
 106     jobject o_name, jobject o_callback, int type);
 107 static int cjni_callback_register (JNIEnv *jvm_env, jobject o_name,
 108     jobject o_callback, int type);
 109 static int cjni_read (user_data_t *user_data);
 110 static int cjni_write (const data_set_t *ds, const value_list_t *vl,
 111     user_data_t *ud);
 112 static int cjni_flush (cdtime_t timeout, const char *identifier, user_data_t *ud);
 113 static void cjni_log (int severity, const char *message, user_data_t *ud);
 114 static int cjni_notification (const notification_t *n, user_data_t *ud);
 115
 116 /* Create, destroy, and match/invoke functions, used by both, matches AND
 117  * targets. */
 118 static int cjni_match_target_create (const oconfig_item_t *ci, void **user_data);
 119 static int cjni_match_target_destroy (void **user_data);
 120 static int cjni_match_target_invoke (const data_set_t *ds, value_list_t *vl,
 121     notification_meta_t **meta, void **user_data);
 122
 123 /*
 124  * C to Java conversion functions
 125  */
 126 static int ctoj_string (JNIEnv *jvm_env, /* {{{ */
 127     const char *string,
 128     jclass class_ptr, jobject object_ptr, const char *method_name)
 129 {
 130   jmethodID m_set;
 131   jstring o_string;
 132
 133   /* Create a java.lang.String */
 134   o_string = (*jvm_env)->NewStringUTF (jvm_env,
 135       (string != NULL) ? string : "");
 136   if (o_string == NULL)
 137   {
 138     ERROR ("java plugin: ctoj_string: NewStringUTF failed.");
 139     return (-1);
 140   }
 141
 142   /* Search for the `void setFoo (String s)' method. */
 143   m_set = (*jvm_env)->GetMethodID (jvm_env, class_ptr,
 144       method_name, "(Ljava/lang/String;)V");
 145   if (m_set == NULL)
 146   {
 147     ERROR ("java plugin: ctoj_string: Cannot find method `void %s (String)'.",
 148         method_name);
 149     (*jvm_env)->DeleteLocalRef (jvm_env, o_string);
 150     return (-1);
 151   }
 152
 153   /* Call the method. */
 154   (*jvm_env)->CallVoidMethod (jvm_env, object_ptr, m_set, o_string);
 155
 156   /* Decrease reference counter on the java.lang.String object. */
 157   (*jvm_env)->DeleteLocalRef (jvm_env, o_string);
 158
 159   return (0);
 160 } /* }}} int ctoj_string */
 161
 162 static int ctoj_int (JNIEnv *jvm_env, /* {{{ */
 163     jint value,
 164     jclass class_ptr, jobject object_ptr, const char *method_name)
 165 {
 166   jmethodID m_set;
 167
 168   /* Search for the `void setFoo (int i)' method. */
 169   m_set = (*jvm_env)->GetMethodID (jvm_env, class_ptr,
 170       method_name, "(I)V");
 171   if (m_set == NULL)
 172   {
 173     ERROR ("java plugin: ctoj_int: Cannot find method `void %s (int)'.",
 174         method_name);
 175     return (-1);
 176   }
 177
 178   (*jvm_env)->CallVoidMethod (jvm_env, object_ptr, m_set, value);
 179
 180   return (0);
 181 } /* }}} int ctoj_int */
 182
 183 static int ctoj_long (JNIEnv *jvm_env, /* {{{ */
 184     jlong value,
 185     jclass class_ptr, jobject object_ptr, const char *method_name)
 186 {
 187   jmethodID m_set;
 188
 189   /* Search for the `void setFoo (long l)' method. */
 190   m_set = (*jvm_env)->GetMethodID (jvm_env, class_ptr,
 191       method_name, "(J)V");
 192   if (m_set == NULL)
 193   {
 194     ERROR ("java plugin: ctoj_long: Cannot find method `void %s (long)'.",
 195         method_name);
 196     return (-1);
 197   }
 198
 199   (*jvm_env)->CallVoidMethod (jvm_env, object_ptr, m_set, value);
 200
 201   return (0);
 202 } /* }}} int ctoj_long */
 203
 204 static int ctoj_double (JNIEnv *jvm_env, /* {{{ */
 205     jdouble value,
 206     jclass class_ptr, jobject object_ptr, const char *method_name)
 207 {
 208   jmethodID m_set;
 209
 210   /* Search for the `void setFoo (double d)' method. */
 211   m_set = (*jvm_env)->GetMethodID (jvm_env, class_ptr,
 212       method_name, "(D)V");
 213   if (m_set == NULL)
 214   {
 215     ERROR ("java plugin: ctoj_double: Cannot find method `void %s (double)'.",
 216         method_name);
 217     return (-1);
 218   }
 219
 220   (*jvm_env)->CallVoidMethod (jvm_env, object_ptr, m_set, value);
 221
 222   return (0);
 223 } /* }}} int ctoj_double */
 224
 225 /* Convert a jlong to a java.lang.Number */
 226 static jobject ctoj_jlong_to_number (JNIEnv *jvm_env, jlong value) /* {{{ */
 227 {
 228   jclass c_long;
 229   jmethodID m_long_constructor;
 230
 231   /* Look up the java.lang.Long class */
 232   c_long = (*jvm_env)->FindClass (jvm_env, "java/lang/Long");
 233   if (c_long == NULL)
 234   {
 235     ERROR ("java plugin: ctoj_jlong_to_number: Looking up the "
 236         "java.lang.Long class failed.");
 237     return (NULL);
 238   }
 239
 240   m_long_constructor = (*jvm_env)->GetMethodID (jvm_env,
 241       c_long, "<init>", "(J)V");
 242   if (m_long_constructor == NULL)
 243   {
 244     ERROR ("java plugin: ctoj_jlong_to_number: Looking up the "
 245         "`Long (long)' constructor failed.");
 246     return (NULL);
 247   }
 248
 249   return ((*jvm_env)->NewObject (jvm_env,
 250         c_long, m_long_constructor, value));
 251 } /* }}} jobject ctoj_jlong_to_number */
 252
 253 /* Convert a jdouble to a java.lang.Number */
 254 static jobject ctoj_jdouble_to_number (JNIEnv *jvm_env, jdouble value) /* {{{ */
 255 {
 256   jclass c_double;
 257   jmethodID m_double_constructor;
 258
 259   /* Look up the java.lang.Long class */
 260   c_double = (*jvm_env)->FindClass (jvm_env, "java/lang/Double");
 261   if (c_double == NULL)
 262   {
 263     ERROR ("java plugin: ctoj_jdouble_to_number: Looking up the "
 264         "java.lang.Double class failed.");
 265     return (NULL);
 266   }
 267
 268   m_double_constructor = (*jvm_env)->GetMethodID (jvm_env,
 269       c_double, "<init>", "(D)V");
 270   if (m_double_constructor == NULL)
 271   {
 272     ERROR ("java plugin: ctoj_jdouble_to_number: Looking up the "
 273         "`Double (double)' constructor failed.");
 274     return (NULL);
 275   }
 276
 277   return ((*jvm_env)->NewObject (jvm_env,
 278         c_double, m_double_constructor, value));
 279 } /* }}} jobject ctoj_jdouble_to_number */
 280
 281 /* Convert a value_t to a java.lang.Number */
 282 static jobject ctoj_value_to_number (JNIEnv *jvm_env, /* {{{ */
 283     value_t value, int ds_type)
 284 {
 285   if (ds_type == DS_TYPE_COUNTER)
 286     return (ctoj_jlong_to_number (jvm_env, (jlong) value.counter));
 287   else if (ds_type == DS_TYPE_GAUGE)
 288     return (ctoj_jdouble_to_number (jvm_env, (jdouble) value.gauge));
 289   if (ds_type == DS_TYPE_DERIVE)
 290     return (ctoj_jlong_to_number (jvm_env, (jlong) value.derive));
 291   if (ds_type == DS_TYPE_ABSOLUTE)
 292     return (ctoj_jlong_to_number (jvm_env, (jlong) value.absolute));
 293   else
 294     return (NULL);
 295 } /* }}} jobject ctoj_value_to_number */
 296
 297 /* Convert a data_source_t to a org/collectd/api/DataSource */
 298 static jobject ctoj_data_source (JNIEnv *jvm_env, /* {{{ */
 299     const data_source_t *dsrc)
 300 {
 301   jclass c_datasource;
 302   jmethodID m_datasource_constructor;
 303   jobject o_datasource;
 304   int status;
 305
 306   /* Look up the DataSource class */
 307   c_datasource = (*jvm_env)->FindClass (jvm_env,
 308       "org/collectd/api/DataSource");
 309   if (c_datasource == NULL)
 310   {
 311     ERROR ("java plugin: ctoj_data_source: "
 312         "FindClass (org/collectd/api/DataSource) failed.");
 313     return (NULL);
 314   }
 315
 316   /* Lookup the `ValueList ()' constructor. */
 317   m_datasource_constructor = (*jvm_env)->GetMethodID (jvm_env, c_datasource,
 318       "<init>", "()V");
 319   if (m_datasource_constructor == NULL)
 320   {
 321     ERROR ("java plugin: ctoj_data_source: Cannot find the "
 322         "`DataSource ()' constructor.");
 323     return (NULL);
 324   }
 325
 326   /* Create a new instance. */
 327   o_datasource = (*jvm_env)->NewObject (jvm_env, c_datasource,
 328       m_datasource_constructor);
 329   if (o_datasource == NULL)
 330   {
 331     ERROR ("java plugin: ctoj_data_source: "
 332         "Creating a new DataSource instance failed.");
 333     return (NULL);
 334   }
 335
 336   /* Set name via `void setName (String name)' */
 337   status = ctoj_string (jvm_env, dsrc->name,
 338       c_datasource, o_datasource, "setName");
 339   if (status != 0)
 340   {
 341     ERROR ("java plugin: ctoj_data_source: "
 342         "ctoj_string (setName) failed.");
 343     (*jvm_env)->DeleteLocalRef (jvm_env, o_datasource);
 344     return (NULL);
 345   }
 346
 347   /* Set type via `void setType (int type)' */
 348   status = ctoj_int (jvm_env, dsrc->type,
 349       c_datasource, o_datasource, "setType");
 350   if (status != 0)
 351   {
 352     ERROR ("java plugin: ctoj_data_source: "
 353         "ctoj_int (setType) failed.");
 354     (*jvm_env)->DeleteLocalRef (jvm_env, o_datasource);
 355     return (NULL);
 356   }
 357
 358   /* Set min via `void setMin (double min)' */
 359   status = ctoj_double (jvm_env, dsrc->min,
 360       c_datasource, o_datasource, "setMin");
 361   if (status != 0)
 362   {
 363     ERROR ("java plugin: ctoj_data_source: "
 364         "ctoj_double (setMin) failed.");
 365     (*jvm_env)->DeleteLocalRef (jvm_env, o_datasource);
 366     return (NULL);
 367   }
 368
 369   /* Set max via `void setMax (double max)' */
 370   status = ctoj_double (jvm_env, dsrc->max,
 371       c_datasource, o_datasource, "setMax");
 372   if (status != 0)
 373   {
 374     ERROR ("java plugin: ctoj_data_source: "
 375         "ctoj_double (setMax) failed.");
 376     (*jvm_env)->DeleteLocalRef (jvm_env, o_datasource);
 377     return (NULL);
 378   }
 379
 380   return (o_datasource);
 381 } /* }}} jobject ctoj_data_source */
 382
 383 /* Convert a oconfig_value_t to a org/collectd/api/OConfigValue */
 384 static jobject ctoj_oconfig_value (JNIEnv *jvm_env, /* {{{ */
 385     oconfig_value_t ocvalue)
 386 {
 387   jclass c_ocvalue;
 388   jmethodID m_ocvalue_constructor;
 389   jobject o_argument;
 390   jobject o_ocvalue;
 391
 392   m_ocvalue_constructor = NULL;
 393   o_argument = NULL;
 394
 395   c_ocvalue = (*jvm_env)->FindClass (jvm_env,
 396       "org/collectd/api/OConfigValue");
 397   if (c_ocvalue == NULL)
 398   {
 399     ERROR ("java plugin: ctoj_oconfig_value: "
 400         "FindClass (org/collectd/api/OConfigValue) failed.");
 401     return (NULL);
 402   }
 403
 404   if (ocvalue.type == OCONFIG_TYPE_BOOLEAN)
 405   {
 406     jboolean tmp_boolean;
 407
 408     tmp_boolean = (ocvalue.value.boolean == 0) ? JNI_FALSE : JNI_TRUE;
 409
 410     m_ocvalue_constructor = (*jvm_env)->GetMethodID (jvm_env, c_ocvalue,
 411         "<init>", "(Z)V");
 412     if (m_ocvalue_constructor == NULL)
 413     {
 414       ERROR ("java plugin: ctoj_oconfig_value: Cannot find the "
 415           "`OConfigValue (boolean)' constructor.");
 416       return (NULL);
 417     }
 418
 419     return ((*jvm_env)->NewObject (jvm_env,
 420           c_ocvalue, m_ocvalue_constructor, tmp_boolean));
 421   } /* if (ocvalue.type == OCONFIG_TYPE_BOOLEAN) */
 422   else if (ocvalue.type == OCONFIG_TYPE_STRING)
 423   {
 424     m_ocvalue_constructor = (*jvm_env)->GetMethodID (jvm_env, c_ocvalue,
 425         "<init>", "(Ljava/lang/String;)V");
 426     if (m_ocvalue_constructor == NULL)
 427     {
 428       ERROR ("java plugin: ctoj_oconfig_value: Cannot find the "
 429           "`OConfigValue (String)' constructor.");
 430       return (NULL);
 431     }
 432
 433     o_argument = (*jvm_env)->NewStringUTF (jvm_env, ocvalue.value.string);
 434     if (o_argument == NULL)
 435     {
 436       ERROR ("java plugin: ctoj_oconfig_value: "
 437           "Creating a String object failed.");
 438       return (NULL);
 439     }
 440   }
 441   else if (ocvalue.type == OCONFIG_TYPE_NUMBER)
 442   {
 443     m_ocvalue_constructor = (*jvm_env)->GetMethodID (jvm_env, c_ocvalue,
 444         "<init>", "(Ljava/lang/Number;)V");
 445     if (m_ocvalue_constructor == NULL)
 446     {
 447       ERROR ("java plugin: ctoj_oconfig_value: Cannot find the "
 448           "`OConfigValue (Number)' constructor.");
 449       return (NULL);
 450     }
 451
 452     o_argument = ctoj_jdouble_to_number (jvm_env,
 453         (jdouble) ocvalue.value.number);
 454     if (o_argument == NULL)
 455     {
 456       ERROR ("java plugin: ctoj_oconfig_value: "
 457           "Creating a Number object failed.");
 458       return (NULL);
 459     }
 460   }
 461   else
 462   {
 463     return (NULL);
 464   }
 465
 466   assert (m_ocvalue_constructor != NULL);
 467   assert (o_argument != NULL);
 468
 469   o_ocvalue = (*jvm_env)->NewObject (jvm_env,
 470       c_ocvalue, m_ocvalue_constructor, o_argument);
 471   if (o_ocvalue == NULL)
 472   {
 473     ERROR ("java plugin: ctoj_oconfig_value: "
 474         "Creating an OConfigValue object failed.");
 475     (*jvm_env)->DeleteLocalRef (jvm_env, o_argument);
 476     return (NULL);
 477   }
 478
 479   (*jvm_env)->DeleteLocalRef (jvm_env, o_argument);
 480   return (o_ocvalue);
 481 } /* }}} jobject ctoj_oconfig_value */
 482
 483 /* Convert a oconfig_item_t to a org/collectd/api/OConfigItem */
 484 static jobject ctoj_oconfig_item (JNIEnv *jvm_env, /* {{{ */
 485     const oconfig_item_t *ci)
 486 {
 487   jclass c_ocitem;
 488   jmethodID m_ocitem_constructor;
 489   jmethodID m_addvalue;
 490   jmethodID m_addchild;
 491   jobject o_key;
 492   jobject o_ocitem;
 493   int i;
 494
 495   c_ocitem = (*jvm_env)->FindClass (jvm_env, "org/collectd/api/OConfigItem");
 496   if (c_ocitem == NULL)
 497   {
 498     ERROR ("java plugin: ctoj_oconfig_item: "
 499         "FindClass (org/collectd/api/OConfigItem) failed.");
 500     return (NULL);
 501   }
 502
 503   /* Get the required methods: m_ocitem_constructor, m_addvalue, and m_addchild
 504    * {{{ */
 505   m_ocitem_constructor = (*jvm_env)->GetMethodID (jvm_env, c_ocitem,
 506       "<init>", "(Ljava/lang/String;)V");
 507   if (m_ocitem_constructor == NULL)
 508   {
 509     ERROR ("java plugin: ctoj_oconfig_item: Cannot find the "
 510         "`OConfigItem (String)' constructor.");
 511     return (NULL);
 512   }
 513
 514   m_addvalue = (*jvm_env)->GetMethodID (jvm_env, c_ocitem,
 515       "addValue", "(Lorg/collectd/api/OConfigValue;)V");
 516   if (m_addvalue == NULL)
 517   {
 518     ERROR ("java plugin: ctoj_oconfig_item: Cannot find the "
 519         "`addValue (OConfigValue)' method.");
 520     return (NULL);
 521   }
 522
 523   m_addchild = (*jvm_env)->GetMethodID (jvm_env, c_ocitem,
 524       "addChild", "(Lorg/collectd/api/OConfigItem;)V");
 525   if (m_addchild == NULL)
 526   {
 527     ERROR ("java plugin: ctoj_oconfig_item: Cannot find the "
 528         "`addChild (OConfigItem)' method.");
 529     return (NULL);
 530   }
 531   /* }}} */
 532
 533   /* Create a String object with the key.
 534    * Needed for calling the constructor. */
 535   o_key = (*jvm_env)->NewStringUTF (jvm_env, ci->key);
 536   if (o_key == NULL)
 537   {
 538     ERROR ("java plugin: ctoj_oconfig_item: "
 539         "Creating String object failed.");
 540     return (NULL);
 541   }
 542
 543   /* Create an OConfigItem object */
 544   o_ocitem = (*jvm_env)->NewObject (jvm_env,
 545       c_ocitem, m_ocitem_constructor, o_key);
 546   if (o_ocitem == NULL)
 547   {
 548     ERROR ("java plugin: ctoj_oconfig_item: "
 549         "Creating an OConfigItem object failed.");
 550     (*jvm_env)->DeleteLocalRef (jvm_env, o_key);
 551     return (NULL);
 552   }
 553
 554   /* We don't need the String object any longer.. */
 555   (*jvm_env)->DeleteLocalRef (jvm_env, o_key);
 556
 557   /* Call OConfigItem.addValue for each value */
 558   for (i = 0; i < ci->values_num; i++) /* {{{ */
 559   {
 560     jobject o_value;
 561
 562     o_value = ctoj_oconfig_value (jvm_env, ci->values[i]);
 563     if (o_value == NULL)
 564     {
 565       ERROR ("java plugin: ctoj_oconfig_item: "
 566           "Creating an OConfigValue object failed.");
 567       (*jvm_env)->DeleteLocalRef (jvm_env, o_ocitem);
 568       return (NULL);
 569     }
 570
 571     (*jvm_env)->CallVoidMethod (jvm_env, o_ocitem, m_addvalue, o_value);
 572     (*jvm_env)->DeleteLocalRef (jvm_env, o_value);
 573   } /* }}} for (i = 0; i < ci->values_num; i++) */
 574
 575   /* Call OConfigItem.addChild for each child */
 576   for (i = 0; i < ci->children_num; i++) /* {{{ */
 577   {
 578     jobject o_child;
 579
 580     o_child = ctoj_oconfig_item (jvm_env, ci->children + i);
 581     if (o_child == NULL)
 582     {
 583       ERROR ("java plugin: ctoj_oconfig_item: "
 584           "Creating an OConfigItem object failed.");
 585       (*jvm_env)->DeleteLocalRef (jvm_env, o_ocitem);
 586       return (NULL);
 587     }
 588
 589     (*jvm_env)->CallVoidMethod (jvm_env, o_ocitem, m_addchild, o_child);
 590     (*jvm_env)->DeleteLocalRef (jvm_env, o_child);
 591   } /* }}} for (i = 0; i < ci->children_num; i++) */
 592
 593   return (o_ocitem);
 594 } /* }}} jobject ctoj_oconfig_item */
 595
 596 /* Convert a data_set_t to a org/collectd/api/DataSet */
 597 static jobject ctoj_data_set (JNIEnv *jvm_env, const data_set_t *ds) /* {{{ */
 598 {
 599   jclass c_dataset;
 600   jmethodID m_constructor;
 601   jmethodID m_add;
 602   jobject o_type;
 603   jobject o_dataset;
 604   int i;
 605
 606   /* Look up the org/collectd/api/DataSet class */
 607   c_dataset = (*jvm_env)->FindClass (jvm_env, "org/collectd/api/DataSet");
 608   if (c_dataset == NULL)
 609   {
 610     ERROR ("java plugin: ctoj_data_set: Looking up the "
 611         "org/collectd/api/DataSet class failed.");
 612     return (NULL);
 613   }
 614
 615   /* Search for the `DataSet (String type)' constructor. */
 616   m_constructor = (*jvm_env)->GetMethodID (jvm_env,
 617       c_dataset, "<init>", "(Ljava/lang/String;)V");
 618   if (m_constructor == NULL)
 619   {
 620     ERROR ("java plugin: ctoj_data_set: Looking up the "
 621         "`DataSet (String)' constructor failed.");
 622     return (NULL);
 623   }
 624
 625   /* Search for the `void addDataSource (DataSource)' method. */
 626   m_add = (*jvm_env)->GetMethodID (jvm_env,
 627       c_dataset, "addDataSource", "(Lorg/collectd/api/DataSource;)V");
 628   if (m_add == NULL)
 629   {
 630     ERROR ("java plugin: ctoj_data_set: Looking up the "
 631         "`addDataSource (DataSource)' method failed.");
 632     return (NULL);
 633   }
 634
 635   o_type = (*jvm_env)->NewStringUTF (jvm_env, ds->type);
 636   if (o_type == NULL)
 637   {
 638     ERROR ("java plugin: ctoj_data_set: Creating a String object failed.");
 639     return (NULL);
 640   }
 641
 642   o_dataset = (*jvm_env)->NewObject (jvm_env,
 643       c_dataset, m_constructor, o_type);
 644   if (o_dataset == NULL)
 645   {
 646     ERROR ("java plugin: ctoj_data_set: Creating a DataSet object failed.");
 647     (*jvm_env)->DeleteLocalRef (jvm_env, o_type);
 648     return (NULL);
 649   }
 650
 651   /* Decrease reference counter on the java.lang.String object. */
 652   (*jvm_env)->DeleteLocalRef (jvm_env, o_type);
 653
 654   for (i = 0; i < ds->ds_num; i++)
 655   {
 656     jobject o_datasource;
 657
 658     o_datasource = ctoj_data_source (jvm_env, ds->ds + i);
 659     if (o_datasource == NULL)
 660     {
 661       ERROR ("java plugin: ctoj_data_set: ctoj_data_source (%s.%s) failed",
 662           ds->type, ds->ds[i].name);
 663       (*jvm_env)->DeleteLocalRef (jvm_env, o_dataset);
 664       return (NULL);
 665     }
 666
 667     (*jvm_env)->CallVoidMethod (jvm_env, o_dataset, m_add, o_datasource);
 668
 669     (*jvm_env)->DeleteLocalRef (jvm_env, o_datasource);
 670   } /* for (i = 0; i < ds->ds_num; i++) */
 671
 672   return (o_dataset);
 673 } /* }}} jobject ctoj_data_set */
 674
 675 static int ctoj_value_list_add_value (JNIEnv *jvm_env, /* {{{ */
 676     value_t value, int ds_type,
 677     jclass class_ptr, jobject object_ptr)
 678 {
 679   jmethodID m_addvalue;
 680   jobject o_number;
 681
 682   m_addvalue = (*jvm_env)->GetMethodID (jvm_env, class_ptr,
 683       "addValue", "(Ljava/lang/Number;)V");
 684   if (m_addvalue == NULL)
 685   {
 686     ERROR ("java plugin: ctoj_value_list_add_value: "
 687         "Cannot find method `void addValue (Number)'.");
 688     return (-1);
 689   }
 690
 691   o_number = ctoj_value_to_number (jvm_env, value, ds_type);
 692   if (o_number == NULL)
 693   {
 694     ERROR ("java plugin: ctoj_value_list_add_value: "
 695         "ctoj_value_to_number failed.");
 696     return (-1);
 697   }
 698
 699   (*jvm_env)->CallVoidMethod (jvm_env, object_ptr, m_addvalue, o_number);
 700
 701   (*jvm_env)->DeleteLocalRef (jvm_env, o_number);
 702
 703   return (0);
 704 } /* }}} int ctoj_value_list_add_value */
 705
 706 static int ctoj_value_list_add_data_set (JNIEnv *jvm_env, /* {{{ */
 707     jclass c_valuelist, jobject o_valuelist, const data_set_t *ds)
 708 {
 709   jmethodID m_setdataset;
 710   jobject o_dataset;
 711
 712   /* Look for the `void setDataSource (List<DataSource> ds)' method. */
 713   m_setdataset = (*jvm_env)->GetMethodID (jvm_env, c_valuelist,
 714       "setDataSet", "(Lorg/collectd/api/DataSet;)V");
 715   if (m_setdataset == NULL)
 716   {
 717     ERROR ("java plugin: ctoj_value_list_add_data_set: "
 718         "Cannot find the `void setDataSet (DataSet)' method.");
 719     return (-1);
 720   }
 721
 722   /* Create a DataSet object. */
 723   o_dataset = ctoj_data_set (jvm_env, ds);
 724   if (o_dataset == NULL)
 725   {
 726     ERROR ("java plugin: ctoj_value_list_add_data_set: "
 727         "ctoj_data_set (%s) failed.", ds->type);
 728     return (-1);
 729   }
 730
 731   /* Actually call the method. */
 732   (*jvm_env)->CallVoidMethod (jvm_env,
 733       o_valuelist, m_setdataset, o_dataset);
 734
 735   /* Decrease reference counter on the List<DataSource> object. */
 736   (*jvm_env)->DeleteLocalRef (jvm_env, o_dataset);
 737
 738   return (0);
 739 } /* }}} int ctoj_value_list_add_data_set */
 740
 741 /* Convert a value_list_t (and data_set_t) to a org/collectd/api/ValueList */
 742 static jobject ctoj_value_list (JNIEnv *jvm_env, /* {{{ */
 743     const data_set_t *ds, const value_list_t *vl)
 744 {
 745   jclass c_valuelist;
 746   jmethodID m_valuelist_constructor;
 747   jobject o_valuelist;
 748   int status;
 749   int i;
 750
 751   /* First, create a new ValueList instance..
 752    * Look up the class.. */
 753   c_valuelist = (*jvm_env)->FindClass (jvm_env,
 754       "org/collectd/api/ValueList");
 755   if (c_valuelist == NULL)
 756   {
 757     ERROR ("java plugin: ctoj_value_list: "
 758         "FindClass (org/collectd/api/ValueList) failed.");
 759     return (NULL);
 760   }
 761
 762   /* Lookup the `ValueList ()' constructor. */
 763   m_valuelist_constructor = (*jvm_env)->GetMethodID (jvm_env, c_valuelist,
 764       "<init>", "()V");
 765   if (m_valuelist_constructor == NULL)
 766   {
 767     ERROR ("java plugin: ctoj_value_list: Cannot find the "
 768         "`ValueList ()' constructor.");
 769     return (NULL);
 770   }
 771
 772   /* Create a new instance. */
 773   o_valuelist = (*jvm_env)->NewObject (jvm_env, c_valuelist,
 774       m_valuelist_constructor);
 775   if (o_valuelist == NULL)
 776   {
 777     ERROR ("java plugin: ctoj_value_list: Creating a new ValueList instance "
 778         "failed.");
 779     return (NULL);
 780   }
 781
 782   status = ctoj_value_list_add_data_set (jvm_env,
 783       c_valuelist, o_valuelist, ds);
 784   if (status != 0)
 785   {
 786     ERROR ("java plugin: ctoj_value_list: "
 787         "ctoj_value_list_add_data_set failed.");
 788     (*jvm_env)->DeleteLocalRef (jvm_env, o_valuelist);
 789     return (NULL);
 790   }
 791
 792   /* Set the strings.. */
 793 #define SET_STRING(str,method_name) do { \
 794   status = ctoj_string (jvm_env, str, \
 795       c_valuelist, o_valuelist, method_name); \
 796   if (status != 0) { \
 797     ERROR ("java plugin: ctoj_value_list: ctoj_string (%s) failed.", \
 798         method_name); \
 799     (*jvm_env)->DeleteLocalRef (jvm_env, o_valuelist); \
 800     return (NULL); \
 801   } } while (0)
 802
 803   SET_STRING (vl->host,            "setHost");
 804   SET_STRING (vl->plugin,          "setPlugin");
 805   SET_STRING (vl->plugin_instance, "setPluginInstance");
 806   SET_STRING (vl->type,            "setType");
 807   SET_STRING (vl->type_instance,   "setTypeInstance");
 808
 809 #undef SET_STRING
 810
 811   /* Set the `time' member. Java stores time in milliseconds. */
 812   status = ctoj_long (jvm_env, (jlong) CDTIME_T_TO_MS (vl->time),
 813       c_valuelist, o_valuelist, "setTime");
 814   if (status != 0)
 815   {
 816     ERROR ("java plugin: ctoj_value_list: ctoj_long (setTime) failed.");
 817     (*jvm_env)->DeleteLocalRef (jvm_env, o_valuelist);
 818     return (NULL);
 819   }
 820
 821   /* Set the `interval' member.. */
 822   status = ctoj_long (jvm_env,
 823       (jlong) CDTIME_T_TO_MS (vl->interval),
 824       c_valuelist, o_valuelist, "setInterval");
 825   if (status != 0)
 826   {
 827     ERROR ("java plugin: ctoj_value_list: ctoj_long (setInterval) failed.");
 828     (*jvm_env)->DeleteLocalRef (jvm_env, o_valuelist);
 829     return (NULL);
 830   }
 831
 832   for (i = 0; i < vl->values_len; i++)
 833   {
 834     status = ctoj_value_list_add_value (jvm_env, vl->values[i], ds->ds[i].type,
 835         c_valuelist, o_valuelist);
 836     if (status != 0)
 837     {
 838       ERROR ("java plugin: ctoj_value_list: "
 839           "ctoj_value_list_add_value failed.");
 840       (*jvm_env)->DeleteLocalRef (jvm_env, o_valuelist);
 841       return (NULL);
 842     }
 843   }
 844
 845   return (o_valuelist);
 846 } /* }}} jobject ctoj_value_list */
 847
 848 /* Convert a notification_t to a org/collectd/api/Notification */
 849 static jobject ctoj_notification (JNIEnv *jvm_env, /* {{{ */
 850     const notification_t *n)
 851 {
 852   jclass c_notification;
 853   jmethodID m_constructor;
 854   jobject o_notification;
 855   int status;
 856
 857   /* First, create a new Notification instance..
 858    * Look up the class.. */
 859   c_notification = (*jvm_env)->FindClass (jvm_env,
 860       "org/collectd/api/Notification");
 861   if (c_notification == NULL)
 862   {
 863     ERROR ("java plugin: ctoj_notification: "
 864         "FindClass (org/collectd/api/Notification) failed.");
 865     return (NULL);
 866   }
 867
 868   /* Lookup the `Notification ()' constructor. */
 869   m_constructor = (*jvm_env)->GetMethodID (jvm_env, c_notification,
 870       "<init>", "()V");
 871   if (m_constructor == NULL)
 872   {
 873     ERROR ("java plugin: ctoj_notification: Cannot find the "
 874         "`Notification ()' constructor.");
 875     return (NULL);
 876   }
 877
 878   /* Create a new instance. */
 879   o_notification = (*jvm_env)->NewObject (jvm_env, c_notification,
 880       m_constructor);
 881   if (o_notification == NULL)
 882   {
 883     ERROR ("java plugin: ctoj_notification: Creating a new Notification "
 884         "instance failed.");
 885     return (NULL);
 886   }
 887
 888   /* Set the strings.. */
 889 #define SET_STRING(str,method_name) do { \
 890   status = ctoj_string (jvm_env, str, \
 891       c_notification, o_notification, method_name); \
 892   if (status != 0) { \
 893     ERROR ("java plugin: ctoj_notification: ctoj_string (%s) failed.", \
 894         method_name); \
 895     (*jvm_env)->DeleteLocalRef (jvm_env, o_notification); \
 896     return (NULL); \
 897   } } while (0)
 898
 899   SET_STRING (n->host,            "setHost");
 900   SET_STRING (n->plugin,          "setPlugin");
 901   SET_STRING (n->plugin_instance, "setPluginInstance");
 902   SET_STRING (n->type,            "setType");
 903   SET_STRING (n->type_instance,   "setTypeInstance");
 904   SET_STRING (n->message,         "setMessage");
 905
 906 #undef SET_STRING
 907
 908   /* Set the `time' member. Java stores time in milliseconds. */
 909   status = ctoj_long (jvm_env, (jlong) CDTIME_T_TO_MS (n->time),
 910       c_notification, o_notification, "setTime");
 911   if (status != 0)
 912   {
 913     ERROR ("java plugin: ctoj_notification: ctoj_long (setTime) failed.");
 914     (*jvm_env)->DeleteLocalRef (jvm_env, o_notification);
 915     return (NULL);
 916   }
 917
 918   /* Set the `severity' member.. */
 919   status = ctoj_int (jvm_env, (jint) n->severity,
 920       c_notification, o_notification, "setSeverity");
 921   if (status != 0)
 922   {
 923     ERROR ("java plugin: ctoj_notification: ctoj_int (setSeverity) failed.");
 924     (*jvm_env)->DeleteLocalRef (jvm_env, o_notification);
 925     return (NULL);
 926   }
 927
 928   return (o_notification);
 929 } /* }}} jobject ctoj_notification */
 930
 931 /*
 932  * Java to C conversion functions
 933  */
 934 /* Call a `String <method> ()' method. */
 935 static int jtoc_string (JNIEnv *jvm_env, /* {{{ */
 936     char *buffer, size_t buffer_size, int empty_okay,
 937     jclass class_ptr, jobject object_ptr, const char *method_name)
 938 {
 939   jmethodID method_id;
 940   jobject string_obj;
 941   const char *c_str;
 942
 943   method_id = (*jvm_env)->GetMethodID (jvm_env, class_ptr,
 944       method_name, "()Ljava/lang/String;");
 945   if (method_id == NULL)
 946   {
 947     ERROR ("java plugin: jtoc_string: Cannot find method `String %s ()'.",
 948         method_name);
 949     return (-1);
 950   }
 951
 952   string_obj = (*jvm_env)->CallObjectMethod (jvm_env, object_ptr, method_id);
 953   if ((string_obj == NULL) && (empty_okay == 0))
 954   {
 955     ERROR ("java plugin: jtoc_string: CallObjectMethod (%s) failed.",
 956         method_name);
 957     return (-1);
 958   }
 959   else if ((string_obj == NULL) && (empty_okay != 0))
 960   {
 961     memset (buffer, 0, buffer_size);
 962     return (0);
 963   }
 964
 965   c_str = (*jvm_env)->GetStringUTFChars (jvm_env, string_obj, 0);
 966   if (c_str == NULL)
 967   {
 968     ERROR ("java plugin: jtoc_string: GetStringUTFChars failed.");
 969     (*jvm_env)->DeleteLocalRef (jvm_env, string_obj);
 970     return (-1);
 971   }
 972
 973   sstrncpy (buffer, c_str, buffer_size);
 974
 975   (*jvm_env)->ReleaseStringUTFChars (jvm_env, string_obj, c_str);
 976   (*jvm_env)->DeleteLocalRef (jvm_env, string_obj);
 977
 978   return (0);
 979 } /* }}} int jtoc_string */
 980
 981 /* Call an `int <method> ()' method. */
 982 static int jtoc_int (JNIEnv *jvm_env, /* {{{ */
 983     jint *ret_value,
 984     jclass class_ptr, jobject object_ptr, const char *method_name)
 985 {
 986   jmethodID method_id;
 987
 988   method_id = (*jvm_env)->GetMethodID (jvm_env, class_ptr,
 989       method_name, "()I");
 990   if (method_id == NULL)
 991   {
 992     ERROR ("java plugin: jtoc_int: Cannot find method `int %s ()'.",
 993         method_name);
 994     return (-1);
 995   }
 996
 997   *ret_value = (*jvm_env)->CallIntMethod (jvm_env, object_ptr, method_id);
 998
 999   return (0);
1000 } /* }}} int jtoc_int */
1001
1002 /* Call a `long <method> ()' method. */
1003 static int jtoc_long (JNIEnv *jvm_env, /* {{{ */
1004     jlong *ret_value,
1005     jclass class_ptr, jobject object_ptr, const char *method_name)
1006 {
1007   jmethodID method_id;
1008
1009   method_id = (*jvm_env)->GetMethodID (jvm_env, class_ptr,
1010       method_name, "()J");
1011   if (method_id == NULL)
1012   {
1013     ERROR ("java plugin: jtoc_long: Cannot find method `long %s ()'.",
1014         method_name);
1015     return (-1);
1016   }
1017
1018   *ret_value = (*jvm_env)->CallLongMethod (jvm_env, object_ptr, method_id);
1019
1020   return (0);
1021 } /* }}} int jtoc_long */
1022
1023 /* Call a `double <method> ()' method. */
1024 static int jtoc_double (JNIEnv *jvm_env, /* {{{ */
1025     jdouble *ret_value,
1026     jclass class_ptr, jobject object_ptr, const char *method_name)
1027 {
1028   jmethodID method_id;
1029
1030   method_id = (*jvm_env)->GetMethodID (jvm_env, class_ptr,
1031       method_name, "()D");
1032   if (method_id == NULL)
1033   {
1034     ERROR ("java plugin: jtoc_double: Cannot find method `double %s ()'.",
1035         method_name);
1036     return (-1);
1037   }
1038
1039   *ret_value = (*jvm_env)->CallDoubleMethod (jvm_env, object_ptr, method_id);
1040
1041   return (0);
1042 } /* }}} int jtoc_double */
1043
1044 static int jtoc_value (JNIEnv *jvm_env, /* {{{ */
1045     value_t *ret_value, int ds_type, jobject object_ptr)
1046 {
1047   jclass class_ptr;
1048   int status;
1049
1050   class_ptr = (*jvm_env)->GetObjectClass (jvm_env, object_ptr);
1051
1052   if (ds_type == DS_TYPE_GAUGE)
1053   {
1054     jdouble tmp_double;
1055
1056     status = jtoc_double (jvm_env, &tmp_double,
1057         class_ptr, object_ptr, "doubleValue");
1058     if (status != 0)
1059     {
1060       ERROR ("java plugin: jtoc_value: "
1061           "jtoc_double failed.");
1062       return (-1);
1063     }
1064     (*ret_value).gauge = (gauge_t) tmp_double;
1065   }
1066   else
1067   {
1068     jlong tmp_long;
1069
1070     status = jtoc_long (jvm_env, &tmp_long,
1071         class_ptr, object_ptr, "longValue");
1072     if (status != 0)
1073     {
1074       ERROR ("java plugin: jtoc_value: "
1075           "jtoc_long failed.");
1076       return (-1);
1077     }
1078
1079     if (ds_type == DS_TYPE_DERIVE)
1080       (*ret_value).derive = (derive_t) tmp_long;
1081     else if (ds_type == DS_TYPE_ABSOLUTE)
1082       (*ret_value).absolute = (absolute_t) tmp_long;
1083     else
1084       (*ret_value).counter = (counter_t) tmp_long;
1085   }
1086
1087   return (0);
1088 } /* }}} int jtoc_value */
1089
1090 /* Read a List<Number>, convert it to `value_t' and add it to the given
1091  * `value_list_t'. */
1092 static int jtoc_values_array (JNIEnv *jvm_env, /* {{{ */
1093     const data_set_t *ds, value_list_t *vl,
1094     jclass class_ptr, jobject object_ptr)
1095 {
1096   jmethodID m_getvalues;
1097   jmethodID m_toarray;
1098   jobject o_list;
1099   jobjectArray o_number_array;
1100
1101   value_t *values;
1102   int values_num;
1103   int i;
1104
1105   values_num = ds->ds_num;
1106
1107   values = NULL;
1108   o_number_array = NULL;
1109   o_list = NULL;
1110
1111 #define BAIL_OUT(status) \
1112   free (values); \
1113   if (o_number_array != NULL) \
1114     (*jvm_env)->DeleteLocalRef (jvm_env, o_number_array); \
1115   if (o_list != NULL) \
1116     (*jvm_env)->DeleteLocalRef (jvm_env, o_list); \
1117   return (status);
1118
1119   /* Call: List<Number> ValueList.getValues () */
1120   m_getvalues = (*jvm_env)->GetMethodID (jvm_env, class_ptr,
1121       "getValues", "()Ljava/util/List;");
1122   if (m_getvalues == NULL)
1123   {
1124     ERROR ("java plugin: jtoc_values_array: "
1125         "Cannot find method `List getValues ()'.");
1126     BAIL_OUT (-1);
1127   }
1128
1129   o_list = (*jvm_env)->CallObjectMethod (jvm_env, object_ptr, m_getvalues);
1130   if (o_list == NULL)
1131   {
1132     ERROR ("java plugin: jtoc_values_array: "
1133         "CallObjectMethod (getValues) failed.");
1134     BAIL_OUT (-1);
1135   }
1136
1137   /* Call: Number[] List.toArray () */
1138   m_toarray = (*jvm_env)->GetMethodID (jvm_env,
1139       (*jvm_env)->GetObjectClass (jvm_env, o_list),
1140       "toArray", "()[Ljava/lang/Object;");
1141   if (m_toarray == NULL)
1142   {
1143     ERROR ("java plugin: jtoc_values_array: "
1144         "Cannot find method `Object[] toArray ()'.");
1145     BAIL_OUT (-1);
1146   }
1147
1148   o_number_array = (*jvm_env)->CallObjectMethod (jvm_env, o_list, m_toarray);
1149   if (o_number_array == NULL)
1150   {
1151     ERROR ("java plugin: jtoc_values_array: "
1152         "CallObjectMethod (toArray) failed.");
1153     BAIL_OUT (-1);
1154   }
1155
1156   values = (value_t *) calloc (values_num, sizeof (value_t));
1157   if (values == NULL)
1158   {
1159     ERROR ("java plugin: jtoc_values_array: calloc failed.");
1160     BAIL_OUT (-1);
1161   }
1162
1163   for (i = 0; i < values_num; i++)
1164   {
1165     jobject o_number;
1166     int status;
1167
1168     o_number = (*jvm_env)->GetObjectArrayElement (jvm_env,
1169         o_number_array, (jsize) i);
1170     if (o_number == NULL)
1171     {
1172       ERROR ("java plugin: jtoc_values_array: "
1173           "GetObjectArrayElement (%i) failed.", i);
1174       BAIL_OUT (-1);
1175     }
1176
1177     status = jtoc_value (jvm_env, values + i, ds->ds[i].type, o_number);
1178     if (status != 0)
1179     {
1180       ERROR ("java plugin: jtoc_values_array: "
1181           "jtoc_value (%i) failed.", i);
1182       BAIL_OUT (-1);
1183     }
1184   } /* for (i = 0; i < values_num; i++) */
1185
1186   vl->values = values;
1187   vl->values_len = values_num;
1188
1189 #undef BAIL_OUT
1190   (*jvm_env)->DeleteLocalRef (jvm_env, o_number_array);
1191   (*jvm_env)->DeleteLocalRef (jvm_env, o_list);
1192   return (0);
1193 } /* }}} int jtoc_values_array */
1194
1195 /* Convert a org/collectd/api/ValueList to a value_list_t. */
1196 static int jtoc_value_list (JNIEnv *jvm_env, value_list_t *vl, /* {{{ */
1197     jobject object_ptr)
1198 {
1199   jclass class_ptr;
1200   int status;
1201   jlong tmp_long;
1202   const data_set_t *ds;
1203
1204   class_ptr = (*jvm_env)->GetObjectClass (jvm_env, object_ptr);
1205   if (class_ptr == NULL)
1206   {
1207     ERROR ("java plugin: jtoc_value_list: GetObjectClass failed.");
1208     return (-1);
1209   }
1210
1211   /* eo == empty okay */
1212 #define SET_STRING(buffer,method, eo) do { \
1213   status = jtoc_string (jvm_env, buffer, sizeof (buffer), eo, \
1214       class_ptr, object_ptr, method); \
1215   if (status != 0) { \
1216     ERROR ("java plugin: jtoc_value_list: jtoc_string (%s) failed.", \
1217         method); \
1218     return (-1); \
1219   } } while (0)
1220
1221   SET_STRING(vl->type, "getType", /* empty = */ 0);
1222
1223   ds = plugin_get_ds (vl->type);
1224   if (ds == NULL)
1225   {
1226     ERROR ("java plugin: jtoc_value_list: Data-set `%s' is not defined. "
1227         "Please consult the types.db(5) manpage for mor information.",
1228         vl->type);
1229     return (-1);
1230   }
1231
1232   SET_STRING(vl->host,            "getHost",           /* empty = */ 0);
1233   SET_STRING(vl->plugin,          "getPlugin",         /* empty = */ 0);
1234   SET_STRING(vl->plugin_instance, "getPluginInstance", /* empty = */ 1);
1235   SET_STRING(vl->type_instance,   "getTypeInstance",   /* empty = */ 1);
1236
1237 #undef SET_STRING
1238
1239   status = jtoc_long (jvm_env, &tmp_long, class_ptr, object_ptr, "getTime");
1240   if (status != 0)
1241   {
1242     ERROR ("java plugin: jtoc_value_list: jtoc_long (getTime) failed.");
1243     return (-1);
1244   }
1245   /* Java measures time in milliseconds. */
1246   vl->time = MS_TO_CDTIME_T (tmp_long);
1247
1248   status = jtoc_long (jvm_env, &tmp_long,
1249       class_ptr, object_ptr, "getInterval");
1250   if (status != 0)
1251   {
1252     ERROR ("java plugin: jtoc_value_list: jtoc_long (getInterval) failed.");
1253     return (-1);
1254   }
1255   vl->interval = MS_TO_CDTIME_T (tmp_long);
1256
1257   status = jtoc_values_array (jvm_env, ds, vl, class_ptr, object_ptr);
1258   if (status != 0)
1259   {
1260     ERROR ("java plugin: jtoc_value_list: jtoc_values_array failed.");
1261     return (-1);
1262   }
1263
1264   return (0);
1265 } /* }}} int jtoc_value_list */
1266
1267 /* Convert a org/collectd/api/Notification to a notification_t. */
1268 static int jtoc_notification (JNIEnv *jvm_env, notification_t *n, /* {{{ */
1269     jobject object_ptr)
1270 {
1271   jclass class_ptr;
1272   int status;
1273   jlong tmp_long;
1274   jint tmp_int;
1275
1276   class_ptr = (*jvm_env)->GetObjectClass (jvm_env, object_ptr);
1277   if (class_ptr == NULL)
1278   {
1279     ERROR ("java plugin: jtoc_notification: GetObjectClass failed.");
1280     return (-1);
1281   }
1282
1283   /* eo == empty okay */
1284 #define SET_STRING(buffer,method, eo) do { \
1285   status = jtoc_string (jvm_env, buffer, sizeof (buffer), eo, \
1286       class_ptr, object_ptr, method); \
1287   if (status != 0) { \
1288     ERROR ("java plugin: jtoc_notification: jtoc_string (%s) failed.", \
1289         method); \
1290     return (-1); \
1291   } } while (0)
1292
1293   SET_STRING (n->host,            "getHost",           /* empty = */ 1);
1294   SET_STRING (n->plugin,          "getPlugin",         /* empty = */ 1);
1295   SET_STRING (n->plugin_instance, "getPluginInstance", /* empty = */ 1);
1296   SET_STRING (n->type,            "getType",           /* empty = */ 1);
1297   SET_STRING (n->type_instance,   "getTypeInstance",   /* empty = */ 1);
1298   SET_STRING (n->message,         "getMessage",        /* empty = */ 0);
1299
1300 #undef SET_STRING
1301
1302   status = jtoc_long (jvm_env, &tmp_long, class_ptr, object_ptr, "getTime");
1303   if (status != 0)
1304   {
1305     ERROR ("java plugin: jtoc_notification: jtoc_long (getTime) failed.");
1306     return (-1);
1307   }
1308   /* Java measures time in milliseconds. */
1309   n->time = MS_TO_CDTIME_T(tmp_long);
1310
1311   status = jtoc_int (jvm_env, &tmp_int,
1312       class_ptr, object_ptr, "getSeverity");
1313   if (status != 0)
1314   {
1315     ERROR ("java plugin: jtoc_notification: jtoc_int (getSeverity) failed.");
1316     return (-1);
1317   }
1318   n->severity = (int) tmp_int;
1319
1320   return (0);
1321 } /* }}} int jtoc_notification */
1322 /*
1323  * Functions accessible from Java
1324  */
1325 static jint JNICALL cjni_api_dispatch_values (JNIEnv *jvm_env, /* {{{ */
1326     jobject this, jobject java_vl)
1327 {
1328   value_list_t vl = VALUE_LIST_INIT;
1329   int status;
1330
1331   DEBUG ("cjni_api_dispatch_values: java_vl = %p;", (void *) java_vl);
1332
1333   status = jtoc_value_list (jvm_env, &vl, java_vl);
1334   if (status != 0)
1335   {
1336     ERROR ("java plugin: cjni_api_dispatch_values: jtoc_value_list failed.");
1337     return (-1);
1338   }
1339
1340   status = plugin_dispatch_values (&vl);
1341
1342   sfree (vl.values);
1343
1344   return (status);
1345 } /* }}} jint cjni_api_dispatch_values */
1346
1347 static jint JNICALL cjni_api_dispatch_notification (JNIEnv *jvm_env, /* {{{ */
1348     jobject this, jobject o_notification)
1349 {
1350   notification_t n;
1351   int status;
1352
1353   memset (&n, 0, sizeof (n));
1354   n.meta = NULL;
1355
1356   status = jtoc_notification (jvm_env, &n, o_notification);
1357   if (status != 0)
1358   {
1359     ERROR ("java plugin: cjni_api_dispatch_notification: jtoc_notification failed.");
1360     return (-1);
1361   }
1362
1363   status = plugin_dispatch_notification (&n);
1364
1365   return (status);
1366 } /* }}} jint cjni_api_dispatch_notification */
1367
1368 static jobject JNICALL cjni_api_get_ds (JNIEnv *jvm_env, /* {{{ */
1369     jobject this, jobject o_string_type)
1370 {
1371   const char *ds_name;
1372   const data_set_t *ds;
1373   jobject o_dataset;
1374
1375   ds_name = (*jvm_env)->GetStringUTFChars (jvm_env, o_string_type, 0);
1376   if (ds_name == NULL)
1377   {
1378     ERROR ("java plugin: cjni_api_get_ds: GetStringUTFChars failed.");
1379     return (NULL);
1380   }
1381
1382   ds = plugin_get_ds (ds_name);
1383   DEBUG ("java plugin: cjni_api_get_ds: "
1384       "plugin_get_ds (%s) = %p;", ds_name, (void *) ds);
1385
1386   (*jvm_env)->ReleaseStringUTFChars (jvm_env, o_string_type, ds_name);
1387
1388   if (ds == NULL)
1389     return (NULL);
1390
1391   o_dataset = ctoj_data_set (jvm_env, ds);
1392   return (o_dataset);
1393 } /* }}} jint cjni_api_get_ds */
1394
1395 static jint JNICALL cjni_api_register_config (JNIEnv *jvm_env, /* {{{ */
1396     jobject this, jobject o_name, jobject o_config)
1397 {
1398   return (cjni_callback_register (jvm_env, o_name, o_config, CB_TYPE_CONFIG));
1399 } /* }}} jint cjni_api_register_config */
1400
1401 static jint JNICALL cjni_api_register_init (JNIEnv *jvm_env, /* {{{ */
1402     jobject this, jobject o_name, jobject o_config)
1403 {
1404   return (cjni_callback_register (jvm_env, o_name, o_config, CB_TYPE_INIT));
1405 } /* }}} jint cjni_api_register_init */
1406
1407 static jint JNICALL cjni_api_register_read (JNIEnv *jvm_env, /* {{{ */
1408     jobject this, jobject o_name, jobject o_read)
1409 {
1410   user_data_t ud;
1411   cjni_callback_info_t *cbi;
1412
1413   cbi = cjni_callback_info_create (jvm_env, o_name, o_read, CB_TYPE_READ);
1414   if (cbi == NULL)
1415     return (-1);
1416
1417   DEBUG ("java plugin: Registering new read callback: %s", cbi->name);
1418
1419   memset (&ud, 0, sizeof (ud));
1420   ud.data = (void *) cbi;
1421   ud.free_func = cjni_callback_info_destroy;
1422
1423   plugin_register_complex_read (/* group = */ NULL, cbi->name, cjni_read,
1424       /* interval = */ NULL, &ud);
1425
1426   (*jvm_env)->DeleteLocalRef (jvm_env, o_read);
1427
1428   return (0);
1429 } /* }}} jint cjni_api_register_read */
1430
1431 static jint JNICALL cjni_api_register_write (JNIEnv *jvm_env, /* {{{ */
1432     jobject this, jobject o_name, jobject o_write)
1433 {
1434   user_data_t ud;
1435   cjni_callback_info_t *cbi;
1436
1437   cbi = cjni_callback_info_create (jvm_env, o_name, o_write, CB_TYPE_WRITE);
1438   if (cbi == NULL)
1439     return (-1);
1440
1441   DEBUG ("java plugin: Registering new write callback: %s", cbi->name);
1442
1443   memset (&ud, 0, sizeof (ud));
1444   ud.data = (void *) cbi;
1445   ud.free_func = cjni_callback_info_destroy;
1446
1447   plugin_register_write (cbi->name, cjni_write, &ud);
1448
1449   (*jvm_env)->DeleteLocalRef (jvm_env, o_write);
1450
1451   return (0);
1452 } /* }}} jint cjni_api_register_write */
1453
1454 static jint JNICALL cjni_api_register_flush (JNIEnv *jvm_env, /* {{{ */
1455     jobject this, jobject o_name, jobject o_flush)
1456 {
1457   user_data_t ud;
1458   cjni_callback_info_t *cbi;
1459
1460   cbi = cjni_callback_info_create (jvm_env, o_name, o_flush, CB_TYPE_FLUSH);
1461   if (cbi == NULL)
1462     return (-1);
1463
1464   DEBUG ("java plugin: Registering new flush callback: %s", cbi->name);
1465
1466   memset (&ud, 0, sizeof (ud));
1467   ud.data = (void *) cbi;
1468   ud.free_func = cjni_callback_info_destroy;
1469
1470   plugin_register_flush (cbi->name, cjni_flush, &ud);
1471
1472   (*jvm_env)->DeleteLocalRef (jvm_env, o_flush);
1473
1474   return (0);
1475 } /* }}} jint cjni_api_register_flush */
1476
1477 static jint JNICALL cjni_api_register_shutdown (JNIEnv *jvm_env, /* {{{ */
1478     jobject this, jobject o_name, jobject o_shutdown)
1479 {
1480   return (cjni_callback_register (jvm_env, o_name, o_shutdown,
1481         CB_TYPE_SHUTDOWN));
1482 } /* }}} jint cjni_api_register_shutdown */
1483
1484 static jint JNICALL cjni_api_register_log (JNIEnv *jvm_env, /* {{{ */
1485     jobject this, jobject o_name, jobject o_log)
1486 {
1487   user_data_t ud;
1488   cjni_callback_info_t *cbi;
1489
1490   cbi = cjni_callback_info_create (jvm_env, o_name, o_log, CB_TYPE_LOG);
1491   if (cbi == NULL)
1492     return (-1);
1493
1494   DEBUG ("java plugin: Registering new log callback: %s", cbi->name);
1495
1496   memset (&ud, 0, sizeof (ud));
1497   ud.data = (void *) cbi;
1498   ud.free_func = cjni_callback_info_destroy;
1499
1500   plugin_register_log (cbi->name, cjni_log, &ud);
1501
1502   (*jvm_env)->DeleteLocalRef (jvm_env, o_log);
1503
1504   return (0);
1505 } /* }}} jint cjni_api_register_log */
1506
1507 static jint JNICALL cjni_api_register_notification (JNIEnv *jvm_env, /* {{{ */
1508     jobject this, jobject o_name, jobject o_notification)
1509 {
1510   user_data_t ud;
1511   cjni_callback_info_t *cbi;
1512
1513   cbi = cjni_callback_info_create (jvm_env, o_name, o_notification,
1514       CB_TYPE_NOTIFICATION);
1515   if (cbi == NULL)
1516     return (-1);
1517
1518   DEBUG ("java plugin: Registering new notification callback: %s", cbi->name);
1519
1520   memset (&ud, 0, sizeof (ud));
1521   ud.data = (void *) cbi;
1522   ud.free_func = cjni_callback_info_destroy;
1523
1524   plugin_register_notification (cbi->name, cjni_notification, &ud);
1525
1526   (*jvm_env)->DeleteLocalRef (jvm_env, o_notification);
1527
1528   return (0);
1529 } /* }}} jint cjni_api_register_notification */
1530
1531 static jint JNICALL cjni_api_register_match_target (JNIEnv *jvm_env, /* {{{ */
1532     jobject this, jobject o_name, jobject o_match, int type)
1533 {
1534   int status;
1535   const char *c_name;
1536
1537   c_name = (*jvm_env)->GetStringUTFChars (jvm_env, o_name, 0);
1538   if (c_name == NULL)
1539   {
1540     ERROR ("java plugin: cjni_api_register_match_target: "
1541         "GetStringUTFChars failed.");
1542     return (-1);
1543   }
1544
1545   status = cjni_callback_register (jvm_env, o_name, o_match, type);
1546   if (status != 0)
1547   {
1548     (*jvm_env)->ReleaseStringUTFChars (jvm_env, o_name, c_name);
1549     return (-1);
1550   }
1551
1552   if (type == CB_TYPE_MATCH)
1553   {
1554     match_proc_t m_proc;
1555
1556     memset (&m_proc, 0, sizeof (m_proc));
1557     m_proc.create  = cjni_match_target_create;
1558     m_proc.destroy = cjni_match_target_destroy;
1559     m_proc.match   = (void *) cjni_match_target_invoke;
1560
1561     status = fc_register_match (c_name, m_proc);
1562   }
1563   else if (type == CB_TYPE_TARGET)
1564   {
1565     target_proc_t t_proc;
1566
1567     memset (&t_proc, 0, sizeof (t_proc));
1568     t_proc.create  = cjni_match_target_create;
1569     t_proc.destroy = cjni_match_target_destroy;
1570     t_proc.invoke  = cjni_match_target_invoke;
1571
1572     status = fc_register_target (c_name, t_proc);
1573   }
1574   else
1575   {
1576     ERROR ("java plugin: cjni_api_register_match_target: "
1577         "Don't know whether to create a match or a target.");
1578     (*jvm_env)->ReleaseStringUTFChars (jvm_env, o_name, c_name);
1579     return (-1);
1580   }
1581
1582   if (status != 0)
1583   {
1584     ERROR ("java plugin: cjni_api_register_match_target: "
1585         "%s failed.",
1586         (type == CB_TYPE_MATCH) ? "fc_register_match" : "fc_register_target");
1587     (*jvm_env)->ReleaseStringUTFChars (jvm_env, o_name, c_name);
1588     return (-1);
1589   }
1590
1591   (*jvm_env)->ReleaseStringUTFChars (jvm_env, o_name, c_name);
1592
1593   return (0);
1594 } /* }}} jint cjni_api_register_match_target */
1595
1596 static jint JNICALL cjni_api_register_match (JNIEnv *jvm_env, /* {{{ */
1597     jobject this, jobject o_name, jobject o_match)
1598 {
1599   return (cjni_api_register_match_target (jvm_env, this, o_name, o_match,
1600         CB_TYPE_MATCH));
1601 } /* }}} jint cjni_api_register_match */
1602
1603 static jint JNICALL cjni_api_register_target (JNIEnv *jvm_env, /* {{{ */
1604     jobject this, jobject o_name, jobject o_target)
1605 {
1606   return (cjni_api_register_match_target (jvm_env, this, o_name, o_target,
1607         CB_TYPE_TARGET));
1608 } /* }}} jint cjni_api_register_target */
1609
1610 static void JNICALL cjni_api_log (JNIEnv *jvm_env, /* {{{ */
1611     jobject this, jint severity, jobject o_message)
1612 {
1613   const char *c_str;
1614
1615   c_str = (*jvm_env)->GetStringUTFChars (jvm_env, o_message, 0);
1616   if (c_str == NULL)
1617   {
1618     ERROR ("java plugin: cjni_api_log: GetStringUTFChars failed.");
1619     return;
1620   }
1621
1622   if (severity < LOG_ERR)
1623     severity = LOG_ERR;
1624   if (severity > LOG_DEBUG)
1625     severity = LOG_DEBUG;
1626
1627   plugin_log (severity, "%s", c_str);
1628
1629   (*jvm_env)->ReleaseStringUTFChars (jvm_env, o_message, c_str);
1630 } /* }}} void cjni_api_log */
1631
1632 /* List of ``native'' functions, i. e. C-functions that can be called from
1633  * Java. */
1634 static JNINativeMethod jni_api_functions[] = /* {{{ */
1635 {
1636   { "dispatchValues",
1637     "(Lorg/collectd/api/ValueList;)I",
1638     cjni_api_dispatch_values },
1639
1640   { "dispatchNotification",
1641     "(Lorg/collectd/api/Notification;)I",
1642     cjni_api_dispatch_notification },
1643
1644   { "getDS",
1645     "(Ljava/lang/String;)Lorg/collectd/api/DataSet;",
1646     cjni_api_get_ds },
1647
1648   { "registerConfig",
1649     "(Ljava/lang/String;Lorg/collectd/api/CollectdConfigInterface;)I",
1650     cjni_api_register_config },
1651
1652   { "registerInit",
1653     "(Ljava/lang/String;Lorg/collectd/api/CollectdInitInterface;)I",
1654     cjni_api_register_init },
1655
1656   { "registerRead",
1657     "(Ljava/lang/String;Lorg/collectd/api/CollectdReadInterface;)I",
1658     cjni_api_register_read },
1659
1660   { "registerWrite",
1661     "(Ljava/lang/String;Lorg/collectd/api/CollectdWriteInterface;)I",
1662     cjni_api_register_write },
1663
1664   { "registerFlush",
1665     "(Ljava/lang/String;Lorg/collectd/api/CollectdFlushInterface;)I",
1666     cjni_api_register_flush },
1667
1668   { "registerShutdown",
1669     "(Ljava/lang/String;Lorg/collectd/api/CollectdShutdownInterface;)I",
1670     cjni_api_register_shutdown },
1671
1672   { "registerLog",
1673     "(Ljava/lang/String;Lorg/collectd/api/CollectdLogInterface;)I",
1674     cjni_api_register_log },
1675
1676   { "registerNotification",
1677     "(Ljava/lang/String;Lorg/collectd/api/CollectdNotificationInterface;)I",
1678     cjni_api_register_notification },
1679
1680   { "registerMatch",
1681     "(Ljava/lang/String;Lorg/collectd/api/CollectdMatchFactoryInterface;)I",
1682     cjni_api_register_match },
1683
1684   { "registerTarget",
1685     "(Ljava/lang/String;Lorg/collectd/api/CollectdTargetFactoryInterface;)I",
1686     cjni_api_register_target },
1687
1688   { "log",
1689     "(ILjava/lang/String;)V",
1690     cjni_api_log },
1691 };
1692 static size_t jni_api_functions_num = sizeof (jni_api_functions)
1693   / sizeof (jni_api_functions[0]);
1694 /* }}} */
1695
1696 /*
1697  * Functions
1698  */
1699 /* Allocate a `cjni_callback_info_t' given the type and objects necessary for
1700  * all registration functions. */
1701 static cjni_callback_info_t *cjni_callback_info_create (JNIEnv *jvm_env, /* {{{ */
1702     jobject o_name, jobject o_callback, int type)
1703 {
1704   const char *c_name;
1705   cjni_callback_info_t *cbi;
1706   const char *method_name;
1707   const char *method_signature;
1708
1709   switch (type)
1710   {
1711     case CB_TYPE_CONFIG:
1712       method_name = "config";
1713       method_signature = "(Lorg/collectd/api/OConfigItem;)I";
1714       break;
1715
1716     case CB_TYPE_INIT:
1717       method_name = "init";
1718       method_signature = "()I";
1719       break;
1720
1721     case CB_TYPE_READ:
1722       method_name = "read";
1723       method_signature = "()I";
1724       break;
1725
1726     case CB_TYPE_WRITE:
1727       method_name = "write";
1728       method_signature = "(Lorg/collectd/api/ValueList;)I";
1729       break;
1730
1731     case CB_TYPE_FLUSH:
1732       method_name = "flush";
1733       method_signature = "(Ljava/lang/Number;Ljava/lang/String;)I";
1734       break;
1735
1736     case CB_TYPE_SHUTDOWN:
1737       method_name = "shutdown";
1738       method_signature = "()I";
1739       break;
1740
1741     case CB_TYPE_LOG:
1742       method_name = "log";
1743       method_signature = "(ILjava/lang/String;)V";
1744       break;
1745
1746     case CB_TYPE_NOTIFICATION:
1747       method_name = "notification";
1748       method_signature = "(Lorg/collectd/api/Notification;)I";
1749       break;
1750
1751     case CB_TYPE_MATCH:
1752       method_name = "createMatch";
1753       method_signature = "(Lorg/collectd/api/OConfigItem;)"
1754         "Lorg/collectd/api/CollectdMatchInterface;";
1755       break;
1756
1757     case CB_TYPE_TARGET:
1758       method_name = "createTarget";
1759       method_signature = "(Lorg/collectd/api/OConfigItem;)"
1760         "Lorg/collectd/api/CollectdTargetInterface;";
1761       break;
1762
1763     default:
1764       ERROR ("java plugin: cjni_callback_info_create: Unknown type: %#x",
1765           type);
1766       return (NULL);
1767   }
1768
1769   c_name = (*jvm_env)->GetStringUTFChars (jvm_env, o_name, 0);
1770   if (c_name == NULL)
1771   {
1772     ERROR ("java plugin: cjni_callback_info_create: "
1773         "GetStringUTFChars failed.");
1774     return (NULL);
1775   }
1776
1777   cbi = (cjni_callback_info_t *) malloc (sizeof (*cbi));
1778   if (cbi == NULL)
1779   {
1780     ERROR ("java plugin: cjni_callback_info_create: malloc failed.");
1781     (*jvm_env)->ReleaseStringUTFChars (jvm_env, o_name, c_name);
1782     return (NULL);
1783   }
1784   memset (cbi, 0, sizeof (*cbi));
1785   cbi->type = type;
1786
1787   cbi->name = strdup (c_name);
1788   if (cbi->name == NULL)
1789   {
1790     pthread_mutex_unlock (&java_callbacks_lock);
1791     ERROR ("java plugin: cjni_callback_info_create: strdup failed.");
1792     (*jvm_env)->ReleaseStringUTFChars (jvm_env, o_name, c_name);
1793     sfree (cbi);
1794     return (NULL);
1795   }
1796
1797   (*jvm_env)->ReleaseStringUTFChars (jvm_env, o_name, c_name);
1798
1799   cbi->object = (*jvm_env)->NewGlobalRef (jvm_env, o_callback);
1800   if (cbi->object == NULL)
1801   {
1802     ERROR ("java plugin: cjni_callback_info_create: NewGlobalRef failed.");
1803     sfree (cbi->name);
1804     sfree (cbi);
1805     return (NULL);
1806   }
1807
1808   cbi->class  = (*jvm_env)->GetObjectClass (jvm_env, cbi->object);
1809   if (cbi->class == NULL)
1810   {
1811     ERROR ("java plugin: cjni_callback_info_create: GetObjectClass failed.");
1812     (*jvm_env)->DeleteGlobalRef (jvm_env, cbi->object);
1813     sfree (cbi->name);
1814     sfree (cbi);
1815     return (NULL);
1816   }
1817
1818   cbi->method = (*jvm_env)->GetMethodID (jvm_env, cbi->class,
1819       method_name, method_signature);
1820   if (cbi->method == NULL)
1821   {
1822     ERROR ("java plugin: cjni_callback_info_create: "
1823         "Cannot find the `%s' method with signature `%s'.",
1824         method_name, method_signature);
1825     (*jvm_env)->DeleteGlobalRef (jvm_env, cbi->object);
1826     sfree (cbi->name);
1827     sfree (cbi);
1828     return (NULL);
1829   }
1830
1831   return (cbi);
1832 } /* }}} cjni_callback_info_t cjni_callback_info_create */
1833
1834 /* Allocate a `cjni_callback_info_t' via `cjni_callback_info_create' and add it
1835  * to the global `java_callbacks' variable. This is used for `config', `init',
1836  * and `shutdown' callbacks. */
1837 static int cjni_callback_register (JNIEnv *jvm_env, /* {{{ */
1838     jobject o_name, jobject o_callback, int type)
1839 {
1840   cjni_callback_info_t *cbi;
1841   cjni_callback_info_t *tmp;
1842 #if COLLECT_DEBUG
1843   const char *type_str;
1844 #endif
1845
1846   cbi = cjni_callback_info_create (jvm_env, o_name, o_callback, type);
1847   if (cbi == NULL)
1848     return (-1);
1849
1850 #if COLLECT_DEBUG
1851   switch (type)
1852   {
1853     case CB_TYPE_CONFIG:
1854       type_str = "config";
1855       break;
1856
1857     case CB_TYPE_INIT:
1858       type_str = "init";
1859       break;
1860
1861     case CB_TYPE_SHUTDOWN:
1862       type_str = "shutdown";
1863       break;
1864
1865     case CB_TYPE_MATCH:
1866       type_str = "match";
1867       break;
1868
1869     case CB_TYPE_TARGET:
1870       type_str = "target";
1871       break;
1872
1873     default:
1874       type_str = "<unknown>";
1875   }
1876   DEBUG ("java plugin: Registering new %s callback: %s",
1877       type_str, cbi->name);
1878 #endif
1879
1880   pthread_mutex_lock (&java_callbacks_lock);
1881
1882   tmp = (cjni_callback_info_t *) realloc (java_callbacks,
1883       (java_callbacks_num + 1) * sizeof (*java_callbacks));
1884   if (tmp == NULL)
1885   {
1886     pthread_mutex_unlock (&java_callbacks_lock);
1887     ERROR ("java plugin: cjni_callback_register: realloc failed.");
1888
1889     (*jvm_env)->DeleteGlobalRef (jvm_env, cbi->object);
1890     free (cbi);
1891
1892     return (-1);
1893   }
1894   java_callbacks = tmp;
1895   java_callbacks[java_callbacks_num] = *cbi;
1896   java_callbacks_num++;
1897
1898   pthread_mutex_unlock (&java_callbacks_lock);
1899
1900   free (cbi);
1901   return (0);
1902 } /* }}} int cjni_callback_register */
1903
1904 /* Callback for `pthread_key_create'. It frees the data contained in
1905  * `jvm_env_key' and prints a warning if the reference counter is not zero. */
1906 static void cjni_jvm_env_destroy (void *args) /* {{{ */
1907 {
1908   cjni_jvm_env_t *cjni_env;
1909
1910   if (args == NULL)
1911     return;
1912
1913   cjni_env = (cjni_jvm_env_t *) args;
1914
1915   if (cjni_env->reference_counter > 0)
1916   {
1917     ERROR ("java plugin: cjni_jvm_env_destroy: "
1918         "cjni_env->reference_counter = %i;", cjni_env->reference_counter);
1919   }
1920
1921   if (cjni_env->jvm_env != NULL)
1922   {
1923     ERROR ("java plugin: cjni_jvm_env_destroy: cjni_env->jvm_env = %p;",
1924         (void *) cjni_env->jvm_env);
1925   }
1926
1927   /* The pointer is allocated in `cjni_thread_attach' */
1928   free (cjni_env);
1929 } /* }}} void cjni_jvm_env_destroy */
1930
1931 /* Register ``native'' functions with the JVM. Native functions are C-functions
1932  * that can be called by Java code. */
1933 static int cjni_init_native (JNIEnv *jvm_env) /* {{{ */
1934 {
1935   jclass api_class_ptr;
1936   int status;
1937
1938   api_class_ptr = (*jvm_env)->FindClass (jvm_env, "org/collectd/api/Collectd");
1939   if (api_class_ptr == NULL)
1940   {
1941     ERROR ("cjni_init_native: Cannot find the API class \"org.collectd.api"
1942         ".Collectd\". Please set the correct class path "
1943         "using 'JVMArg \"-Djava.class.path=...\"'.");
1944     return (-1);
1945   }
1946
1947   status = (*jvm_env)->RegisterNatives (jvm_env, api_class_ptr,
1948       jni_api_functions, (jint) jni_api_functions_num);
1949   if (status != 0)
1950   {
1951     ERROR ("cjni_init_native: RegisterNatives failed with status %i.", status);
1952     return (-1);
1953   }
1954
1955   return (0);
1956 } /* }}} int cjni_init_native */
1957
1958 /* Create the JVM. This is called when the first thread tries to access the JVM
1959  * via cjni_thread_attach. */
1960 static int cjni_create_jvm (void) /* {{{ */
1961 {
1962   JNIEnv *jvm_env;
1963   JavaVMInitArgs vm_args;
1964   JavaVMOption vm_options[jvm_argc];
1965
1966   int status;
1967   size_t i;
1968
1969   if (jvm != NULL)
1970     return (0);
1971
1972   status = pthread_key_create (&jvm_env_key, cjni_jvm_env_destroy);
1973   if (status != 0)
1974   {
1975     ERROR ("java plugin: cjni_create_jvm: pthread_key_create failed "
1976         "with status %i.", status);
1977     return (-1);
1978   }
1979
1980   jvm_env = NULL;
1981
1982   memset (&vm_args, 0, sizeof (vm_args));
1983   vm_args.version = JNI_VERSION_1_2;
1984   vm_args.options = vm_options;
1985   vm_args.nOptions = (jint) jvm_argc;
1986
1987   for (i = 0; i < jvm_argc; i++)
1988   {
1989     DEBUG ("java plugin: cjni_create_jvm: jvm_argv[%zu] = %s",
1990         i, jvm_argv[i]);
1991     vm_args.options[i].optionString = jvm_argv[i];
1992   }
1993
1994   status = JNI_CreateJavaVM (&jvm, (void *) &jvm_env, (void *) &vm_args);
1995   if (status != 0)
1996   {
1997     ERROR ("java plugin: cjni_create_jvm: "
1998         "JNI_CreateJavaVM failed with status %i.",
1999         status);
2000     return (-1);
2001   }
2002   assert (jvm != NULL);
2003   assert (jvm_env != NULL);
2004
2005   /* Call RegisterNatives */
2006   status = cjni_init_native (jvm_env);
2007   if (status != 0)
2008   {
2009     ERROR ("java plugin: cjni_create_jvm: cjni_init_native failed.");
2010     return (-1);
2011   }
2012
2013   DEBUG ("java plugin: The JVM has been created.");
2014   return (0);
2015 } /* }}} int cjni_create_jvm */
2016
2017 /* Increase the reference counter to the JVM for this thread. If it was zero,
2018  * attach the JVM first. */
2019 static JNIEnv *cjni_thread_attach (void) /* {{{ */
2020 {
2021   cjni_jvm_env_t *cjni_env;
2022   JNIEnv *jvm_env;
2023
2024   /* If we're the first thread to access the JVM, we'll have to create it
2025    * first.. */
2026   if (jvm == NULL)
2027   {
2028     int status;
2029
2030     status = cjni_create_jvm ();
2031     if (status != 0)
2032     {
2033       ERROR ("java plugin: cjni_thread_attach: cjni_create_jvm failed.");
2034       return (NULL);
2035     }
2036   }
2037   assert (jvm != NULL);
2038
2039   cjni_env = pthread_getspecific (jvm_env_key);
2040   if (cjni_env == NULL)
2041   {
2042     /* This pointer is free'd in `cjni_jvm_env_destroy'. */
2043     cjni_env = (cjni_jvm_env_t *) malloc (sizeof (*cjni_env));
2044     if (cjni_env == NULL)
2045     {
2046       ERROR ("java plugin: cjni_thread_attach: malloc failed.");
2047       return (NULL);
2048     }
2049     memset (cjni_env, 0, sizeof (*cjni_env));
2050     cjni_env->reference_counter = 0;
2051     cjni_env->jvm_env = NULL;
2052
2053     pthread_setspecific (jvm_env_key, cjni_env);
2054   }
2055
2056   if (cjni_env->reference_counter > 0)
2057   {
2058     cjni_env->reference_counter++;
2059     jvm_env = cjni_env->jvm_env;
2060   }
2061   else
2062   {
2063     int status;
2064     JavaVMAttachArgs args;
2065
2066     assert (cjni_env->jvm_env == NULL);
2067
2068     memset (&args, 0, sizeof (args));
2069     args.version = JNI_VERSION_1_2;
2070
2071     status = (*jvm)->AttachCurrentThread (jvm, (void *) &jvm_env, (void *) &args);
2072     if (status != 0)
2073     {
2074       ERROR ("java plugin: cjni_thread_attach: AttachCurrentThread failed "
2075           "with status %i.", status);
2076       return (NULL);
2077     }
2078
2079     cjni_env->reference_counter = 1;
2080     cjni_env->jvm_env = jvm_env;
2081   }
2082
2083   DEBUG ("java plugin: cjni_thread_attach: cjni_env->reference_counter = %i",
2084       cjni_env->reference_counter);
2085   assert (jvm_env != NULL);
2086   return (jvm_env);
2087 } /* }}} JNIEnv *cjni_thread_attach */
2088
2089 /* Decrease the reference counter of this thread. If it reaches zero, detach
2090  * from the JVM. */
2091 static int cjni_thread_detach (void) /* {{{ */
2092 {
2093   cjni_jvm_env_t *cjni_env;
2094   int status;
2095
2096   cjni_env = pthread_getspecific (jvm_env_key);
2097   if (cjni_env == NULL)
2098   {
2099     ERROR ("java plugin: cjni_thread_detach: pthread_getspecific failed.");
2100     return (-1);
2101   }
2102
2103   assert (cjni_env->reference_counter > 0);
2104   assert (cjni_env->jvm_env != NULL);
2105
2106   cjni_env->reference_counter--;
2107   DEBUG ("java plugin: cjni_thread_detach: cjni_env->reference_counter = %i",
2108       cjni_env->reference_counter);
2109
2110   if (cjni_env->reference_counter > 0)
2111     return (0);
2112
2113   status = (*jvm)->DetachCurrentThread (jvm);
2114   if (status != 0)
2115   {
2116     ERROR ("java plugin: cjni_thread_detach: DetachCurrentThread failed "
2117         "with status %i.", status);
2118   }
2119
2120   cjni_env->reference_counter = 0;
2121   cjni_env->jvm_env = NULL;
2122
2123   return (0);
2124 } /* }}} int cjni_thread_detach */
2125
2126 static int cjni_config_add_jvm_arg (oconfig_item_t *ci) /* {{{ */
2127 {
2128   char **tmp;
2129
2130   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
2131   {
2132     WARNING ("java plugin: `JVMArg' needs exactly one string argument.");
2133     return (-1);
2134   }
2135
2136   if (jvm != NULL)
2137   {
2138     ERROR ("java plugin: All `JVMArg' options MUST appear before all "
2139         "`LoadPlugin' options! The JVM is already started and I have to "
2140         "ignore this argument: %s",
2141         ci->values[0].value.string);
2142     return (-1);
2143   }
2144
2145   tmp = (char **) realloc (jvm_argv, sizeof (char *) * (jvm_argc + 1));
2146   if (tmp == NULL)
2147   {
2148     ERROR ("java plugin: realloc failed.");
2149     return (-1);
2150   }
2151   jvm_argv = tmp;
2152
2153   jvm_argv[jvm_argc] = strdup (ci->values[0].value.string);
2154   if (jvm_argv[jvm_argc] == NULL)
2155   {
2156     ERROR ("java plugin: strdup failed.");
2157     return (-1);
2158   }
2159   jvm_argc++;
2160
2161   return (0);
2162 } /* }}} int cjni_config_add_jvm_arg */
2163
2164 static int cjni_config_load_plugin (oconfig_item_t *ci) /* {{{ */
2165 {
2166   JNIEnv *jvm_env;
2167   java_plugin_class_t *class;
2168   jmethodID constructor_id;
2169   jobject tmp_object;
2170
2171   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
2172   {
2173     WARNING ("java plugin: `LoadPlugin' needs exactly one string argument.");
2174     return (-1);
2175   }
2176
2177   jvm_env = cjni_thread_attach ();
2178   if (jvm_env == NULL)
2179     return (-1);
2180
2181   class = (java_plugin_class_t *) realloc (java_classes_list,
2182       (java_classes_list_len + 1) * sizeof (*java_classes_list));
2183   if (class == NULL)
2184   {
2185     ERROR ("java plugin: realloc failed.");
2186     cjni_thread_detach ();
2187     return (-1);
2188   }
2189   java_classes_list = class;
2190   class = java_classes_list + java_classes_list_len;
2191
2192   memset (class, 0, sizeof (*class));
2193   class->name = strdup (ci->values[0].value.string);
2194   if (class->name == NULL)
2195   {
2196     ERROR ("java plugin: strdup failed.");
2197     cjni_thread_detach ();
2198     return (-1);
2199   }
2200   class->class = NULL;
2201   class->object = NULL;
2202
2203   { /* Replace all dots ('.') with slashes ('/'). Dots are usually used
2204        thorough the Java community, but (Sun's) `FindClass' and friends need
2205        slashes. */
2206     size_t i;
2207     for (i = 0; class->name[i] != 0; i++)
2208       if (class->name[i] == '.')
2209         class->name[i] = '/';
2210   }
2211
2212   DEBUG ("java plugin: Loading class %s", class->name);
2213
2214   class->class = (*jvm_env)->FindClass (jvm_env, class->name);
2215   if (class->class == NULL)
2216   {
2217     ERROR ("java plugin: cjni_config_load_plugin: FindClass (%s) failed.",
2218         class->name);
2219     cjni_thread_detach ();
2220     free (class->name);
2221     return (-1);
2222   }
2223
2224   constructor_id = (*jvm_env)->GetMethodID (jvm_env, class->class,
2225       "<init>", "()V");
2226   if (constructor_id == NULL)
2227   {
2228     ERROR ("java plugin: cjni_config_load_plugin: "
2229         "Could not find the constructor for `%s'.",
2230         class->name);
2231     cjni_thread_detach ();
2232     free (class->name);
2233     return (-1);
2234   }
2235
2236   tmp_object = (*jvm_env)->NewObject (jvm_env, class->class,
2237       constructor_id);
2238   if (tmp_object != NULL)
2239     class->object = (*jvm_env)->NewGlobalRef (jvm_env, tmp_object);
2240   else
2241     class->object = NULL;
2242   if (class->object == NULL)
2243   {
2244     ERROR ("java plugin: cjni_config_load_plugin: "
2245         "Could create a new `%s' object.",
2246         class->name);
2247     cjni_thread_detach ();
2248     free (class->name);
2249     return (-1);
2250   }
2251
2252   cjni_thread_detach ();
2253
2254   java_classes_list_len++;
2255
2256   return (0);
2257 } /* }}} int cjni_config_load_plugin */
2258
2259 static int cjni_config_plugin_block (oconfig_item_t *ci) /* {{{ */
2260 {
2261   JNIEnv *jvm_env;
2262   cjni_callback_info_t *cbi;
2263   jobject o_ocitem;
2264   const char *name;
2265   size_t i;
2266
2267   jclass class;
2268   jmethodID method;
2269
2270   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
2271   {
2272     WARNING ("java plugin: `Plugin' blocks "
2273         "need exactly one string argument.");
2274     return (-1);
2275   }
2276
2277   name = ci->values[0].value.string;
2278
2279   cbi = NULL;
2280   for (i = 0; i < java_callbacks_num; i++)
2281   {
2282     if (java_callbacks[i].type != CB_TYPE_CONFIG)
2283       continue;
2284
2285     if (strcmp (name, java_callbacks[i].name) != 0)
2286       continue;
2287
2288     cbi = java_callbacks + i;
2289     break;
2290   }
2291
2292   if (cbi == NULL)
2293   {
2294     NOTICE ("java plugin: Configuration block for `%s' found, but no such "
2295         "configuration callback has been registered. Please make sure, the "
2296         "`LoadPlugin' lines precede the `Plugin' blocks.",
2297         name);
2298     return (0);
2299   }
2300
2301   DEBUG ("java plugin: Configuring %s", name);
2302
2303   jvm_env = cjni_thread_attach ();
2304   if (jvm_env == NULL)
2305     return (-1);
2306
2307   o_ocitem = ctoj_oconfig_item (jvm_env, ci);
2308   if (o_ocitem == NULL)
2309   {
2310     ERROR ("java plugin: cjni_config_plugin_block: ctoj_oconfig_item failed.");
2311     cjni_thread_detach ();
2312     return (-1);
2313   }
2314
2315   class = (*jvm_env)->GetObjectClass (jvm_env, cbi->object);
2316   method = (*jvm_env)->GetMethodID (jvm_env, class,
2317       "config", "(Lorg/collectd/api/OConfigItem;)I");
2318
2319   (*jvm_env)->CallIntMethod (jvm_env,
2320       cbi->object, method, o_ocitem);
2321
2322   (*jvm_env)->DeleteLocalRef (jvm_env, o_ocitem);
2323   cjni_thread_detach ();
2324   return (0);
2325 } /* }}} int cjni_config_plugin_block */
2326
2327 static int cjni_config_perform (oconfig_item_t *ci) /* {{{ */
2328 {
2329   int success;
2330   int errors;
2331   int status;
2332   int i;
2333
2334   success = 0;
2335   errors = 0;
2336
2337   for (i = 0; i < ci->children_num; i++)
2338   {
2339     oconfig_item_t *child = ci->children + i;
2340
2341     if (strcasecmp ("JVMArg", child->key) == 0)
2342     {
2343       status = cjni_config_add_jvm_arg (child);
2344       if (status == 0)
2345         success++;
2346       else
2347         errors++;
2348     }
2349     else if (strcasecmp ("LoadPlugin", child->key) == 0)
2350     {
2351       status = cjni_config_load_plugin (child);
2352       if (status == 0)
2353         success++;
2354       else
2355         errors++;
2356     }
2357     else if (strcasecmp ("Plugin", child->key) == 0)
2358     {
2359       status = cjni_config_plugin_block (child);
2360       if (status == 0)
2361         success++;
2362       else
2363         errors++;
2364     }
2365     else
2366     {
2367       WARNING ("java plugin: Option `%s' not allowed here.", child->key);
2368       errors++;
2369     }
2370   }
2371
2372   DEBUG ("java plugin: jvm_argc = %zu;", jvm_argc);
2373   DEBUG ("java plugin: java_classes_list_len = %zu;", java_classes_list_len);
2374
2375   if ((success == 0) && (errors > 0))
2376   {
2377     ERROR ("java plugin: All statements failed.");
2378     return (-1);
2379   }
2380
2381   return (0);
2382 } /* }}} int cjni_config_perform */
2383
2384 /* Copy the children of `ci' to the global `config_block' variable. */
2385 static int cjni_config_callback (oconfig_item_t *ci) /* {{{ */
2386 {
2387   oconfig_item_t *ci_copy;
2388   oconfig_item_t *tmp;
2389
2390   assert (ci != NULL);
2391   if (ci->children_num == 0)
2392     return (0); /* nothing to do */
2393
2394   ci_copy = oconfig_clone (ci);
2395   if (ci_copy == NULL)
2396   {
2397     ERROR ("java plugin: oconfig_clone failed.");
2398     return (-1);
2399   }
2400
2401   if (config_block == NULL)
2402   {
2403     config_block = ci_copy;
2404     return (0);
2405   }
2406
2407   tmp = realloc (config_block->children,
2408       (config_block->children_num + ci_copy->children_num) * sizeof (*tmp));
2409   if (tmp == NULL)
2410   {
2411     ERROR ("java plugin: realloc failed.");
2412     oconfig_free (ci_copy);
2413     return (-1);
2414   }
2415   config_block->children = tmp;
2416
2417   /* Copy the pointers */
2418   memcpy (config_block->children + config_block->children_num,
2419       ci_copy->children,
2420       ci_copy->children_num * sizeof (*ci_copy->children));
2421   config_block->children_num += ci_copy->children_num;
2422
2423   /* Delete the pointers from the copy, so `oconfig_free' can't free them. */
2424   memset (ci_copy->children, 0,
2425       ci_copy->children_num * sizeof (*ci_copy->children));
2426   ci_copy->children_num = 0;
2427
2428   oconfig_free (ci_copy);
2429
2430   return (0);
2431 } /* }}} int cjni_config_callback */
2432
2433 /* Free the data contained in the `user_data_t' pointer passed to `cjni_read'
2434  * and `cjni_write'. In particular, delete the global reference to the Java
2435  * object. */
2436 static void cjni_callback_info_destroy (void *arg) /* {{{ */
2437 {
2438   JNIEnv *jvm_env;
2439   cjni_callback_info_t *cbi;
2440
2441   DEBUG ("java plugin: cjni_callback_info_destroy (arg = %p);", arg);
2442
2443   cbi = (cjni_callback_info_t *) arg;
2444
2445   /* This condition can occurr when shutting down. */
2446   if (jvm == NULL)
2447   {
2448     sfree (cbi);
2449     return;
2450   }
2451
2452   if (arg == NULL)
2453     return;
2454
2455   jvm_env = cjni_thread_attach ();
2456   if (jvm_env == NULL)
2457   {
2458     ERROR ("java plugin: cjni_callback_info_destroy: cjni_thread_attach failed.");
2459     return;
2460   }
2461
2462   (*jvm_env)->DeleteGlobalRef (jvm_env, cbi->object);
2463
2464   cbi->method = NULL;
2465   cbi->object = NULL;
2466   cbi->class  = NULL;
2467   free (cbi);
2468
2469   cjni_thread_detach ();
2470 } /* }}} void cjni_callback_info_destroy */
2471
2472 /* Call the CB_TYPE_READ callback pointed to by the `user_data_t' pointer. */
2473 static int cjni_read (user_data_t *ud) /* {{{ */
2474 {
2475   JNIEnv *jvm_env;
2476   cjni_callback_info_t *cbi;
2477   int ret_status;
2478
2479   if (jvm == NULL)
2480   {
2481     ERROR ("java plugin: cjni_read: jvm == NULL");
2482     return (-1);
2483   }
2484
2485   if ((ud == NULL) || (ud->data == NULL))
2486   {
2487     ERROR ("java plugin: cjni_read: Invalid user data.");
2488     return (-1);
2489   }
2490
2491   jvm_env = cjni_thread_attach ();
2492   if (jvm_env == NULL)
2493     return (-1);
2494
2495   cbi = (cjni_callback_info_t *) ud->data;
2496
2497   ret_status = (*jvm_env)->CallIntMethod (jvm_env, cbi->object,
2498       cbi->method);
2499
2500   cjni_thread_detach ();
2501   return (ret_status);
2502 } /* }}} int cjni_read */
2503
2504 /* Call the CB_TYPE_WRITE callback pointed to by the `user_data_t' pointer. */
2505 static int cjni_write (const data_set_t *ds, const value_list_t *vl, /* {{{ */
2506     user_data_t *ud)
2507 {
2508   JNIEnv *jvm_env;
2509   cjni_callback_info_t *cbi;
2510   jobject vl_java;
2511   int ret_status;
2512
2513   if (jvm == NULL)
2514   {
2515     ERROR ("java plugin: cjni_write: jvm == NULL");
2516     return (-1);
2517   }
2518
2519   if ((ud == NULL) || (ud->data == NULL))
2520   {
2521     ERROR ("java plugin: cjni_write: Invalid user data.");
2522     return (-1);
2523   }
2524
2525   jvm_env = cjni_thread_attach ();
2526   if (jvm_env == NULL)
2527     return (-1);
2528
2529   cbi = (cjni_callback_info_t *) ud->data;
2530
2531   vl_java = ctoj_value_list (jvm_env, ds, vl);
2532   if (vl_java == NULL)
2533   {
2534     ERROR ("java plugin: cjni_write: ctoj_value_list failed.");
2535     cjni_thread_detach ();
2536     return (-1);
2537   }
2538
2539   ret_status = (*jvm_env)->CallIntMethod (jvm_env,
2540       cbi->object, cbi->method, vl_java);
2541
2542   (*jvm_env)->DeleteLocalRef (jvm_env, vl_java);
2543
2544   cjni_thread_detach ();
2545   return (ret_status);
2546 } /* }}} int cjni_write */
2547
2548 /* Call the CB_TYPE_FLUSH callback pointed to by the `user_data_t' pointer. */
2549 static int cjni_flush (cdtime_t timeout, const char *identifier, /* {{{ */
2550     user_data_t *ud)
2551 {
2552   JNIEnv *jvm_env;
2553   cjni_callback_info_t *cbi;
2554   jobject o_timeout;
2555   jobject o_identifier;
2556   int ret_status;
2557
2558   if (jvm == NULL)
2559   {
2560     ERROR ("java plugin: cjni_flush: jvm == NULL");
2561     return (-1);
2562   }
2563
2564   if ((ud == NULL) || (ud->data == NULL))
2565   {
2566     ERROR ("java plugin: cjni_flush: Invalid user data.");
2567     return (-1);
2568   }
2569
2570   jvm_env = cjni_thread_attach ();
2571   if (jvm_env == NULL)
2572     return (-1);
2573
2574   cbi = (cjni_callback_info_t *) ud->data;
2575
2576   o_timeout = ctoj_jdouble_to_number (jvm_env,
2577       (jdouble) CDTIME_T_TO_DOUBLE (timeout));
2578   if (o_timeout == NULL)
2579   {
2580     ERROR ("java plugin: cjni_flush: Converting double "
2581         "to Number object failed.");
2582     cjni_thread_detach ();
2583     return (-1);
2584   }
2585
2586   o_identifier = NULL;
2587   if (identifier != NULL)
2588   {
2589     o_identifier = (*jvm_env)->NewStringUTF (jvm_env, identifier);
2590     if (o_identifier == NULL)
2591     {
2592       (*jvm_env)->DeleteLocalRef (jvm_env, o_timeout);
2593       ERROR ("java plugin: cjni_flush: NewStringUTF failed.");
2594       cjni_thread_detach ();
2595       return (-1);
2596     }
2597   }
2598
2599   ret_status = (*jvm_env)->CallIntMethod (jvm_env,
2600       cbi->object, cbi->method, o_timeout, o_identifier);
2601
2602   (*jvm_env)->DeleteLocalRef (jvm_env, o_identifier);
2603   (*jvm_env)->DeleteLocalRef (jvm_env, o_timeout);
2604
2605   cjni_thread_detach ();
2606   return (ret_status);
2607 } /* }}} int cjni_flush */
2608
2609 /* Call the CB_TYPE_LOG callback pointed to by the `user_data_t' pointer. */
2610 static void cjni_log (int severity, const char *message, /* {{{ */
2611     user_data_t *ud)
2612 {
2613   JNIEnv *jvm_env;
2614   cjni_callback_info_t *cbi;
2615   jobject o_message;
2616
2617   if (jvm == NULL)
2618     return;
2619
2620   if ((ud == NULL) || (ud->data == NULL))
2621     return;
2622
2623   jvm_env = cjni_thread_attach ();
2624   if (jvm_env == NULL)
2625     return;
2626
2627   cbi = (cjni_callback_info_t *) ud->data;
2628
2629   o_message = (*jvm_env)->NewStringUTF (jvm_env, message);
2630   if (o_message == NULL)
2631   {
2632     cjni_thread_detach ();
2633     return;
2634   }
2635
2636   (*jvm_env)->CallVoidMethod (jvm_env,
2637       cbi->object, cbi->method, (jint) severity, o_message);
2638
2639   (*jvm_env)->DeleteLocalRef (jvm_env, o_message);
2640
2641   cjni_thread_detach ();
2642 } /* }}} void cjni_log */
2643
2644 /* Call the CB_TYPE_NOTIFICATION callback pointed to by the `user_data_t'
2645  * pointer. */
2646 static int cjni_notification (const notification_t *n, /* {{{ */
2647     user_data_t *ud)
2648 {
2649   JNIEnv *jvm_env;
2650   cjni_callback_info_t *cbi;
2651   jobject o_notification;
2652   int ret_status;
2653
2654   if (jvm == NULL)
2655   {
2656     ERROR ("java plugin: cjni_read: jvm == NULL");
2657     return (-1);
2658   }
2659
2660   if ((ud == NULL) || (ud->data == NULL))
2661   {
2662     ERROR ("java plugin: cjni_read: Invalid user data.");
2663     return (-1);
2664   }
2665
2666   jvm_env = cjni_thread_attach ();
2667   if (jvm_env == NULL)
2668     return (-1);
2669
2670   cbi = (cjni_callback_info_t *) ud->data;
2671
2672   o_notification = ctoj_notification (jvm_env, n);
2673   if (o_notification == NULL)
2674   {
2675     ERROR ("java plugin: cjni_notification: ctoj_notification failed.");
2676     cjni_thread_detach ();
2677     return (-1);
2678   }
2679
2680   ret_status = (*jvm_env)->CallIntMethod (jvm_env,
2681       cbi->object, cbi->method, o_notification);
2682
2683   (*jvm_env)->DeleteLocalRef (jvm_env, o_notification);
2684
2685   cjni_thread_detach ();
2686   return (ret_status);
2687 } /* }}} int cjni_notification */
2688
2689 /* Callbacks for matches implemented in Java */
2690 static int cjni_match_target_create (const oconfig_item_t *ci, /* {{{ */
2691     void **user_data)
2692 {
2693   JNIEnv *jvm_env;
2694   cjni_callback_info_t *cbi_ret;
2695   cjni_callback_info_t *cbi_factory;
2696   const char *name;
2697   jobject o_ci;
2698   jobject o_tmp;
2699   int type;
2700   size_t i;
2701
2702   cbi_ret = NULL;
2703   o_ci = NULL;
2704   jvm_env = NULL;
2705
2706 #define BAIL_OUT(status) \
2707   if (cbi_ret != NULL) { \
2708     free (cbi_ret->name); \
2709     if ((jvm_env != NULL) && (cbi_ret->object != NULL)) \
2710       (*jvm_env)->DeleteLocalRef (jvm_env, cbi_ret->object); \
2711   } \
2712   free (cbi_ret); \
2713   if (o_ci != NULL) \
2714     (*jvm_env)->DeleteLocalRef (jvm_env, o_ci); \
2715   cjni_thread_detach (); \
2716   return (status)
2717
2718   if (jvm == NULL)
2719   {
2720     ERROR ("java plugin: cjni_read: jvm == NULL");
2721     return (-1);
2722   }
2723
2724   jvm_env = cjni_thread_attach ();
2725   if (jvm_env == NULL)
2726     return (-1);
2727
2728   /* Find out whether to create a match or a target. */
2729   if (strcasecmp ("Match", ci->key) == 0)
2730     type = CB_TYPE_MATCH;
2731   else if (strcasecmp ("Target", ci->key) == 0)
2732     type = CB_TYPE_TARGET;
2733   else
2734   {
2735     ERROR ("java plugin: cjni_match_target_create: Can't figure out whether "
2736         "to create a match or a target.");
2737     BAIL_OUT (-1);
2738   }
2739
2740   /* This is the name of the match we should create. */
2741   name = ci->values[0].value.string;
2742
2743   /* Lets see if we have a matching factory here.. */
2744   cbi_factory = NULL;
2745   for (i = 0; i < java_callbacks_num; i++)
2746   {
2747     if (java_callbacks[i].type != type)
2748       continue;
2749
2750     if (strcmp (name, java_callbacks[i].name) != 0)
2751       continue;
2752
2753     cbi_factory = java_callbacks + i;
2754     break;
2755   }
2756
2757   /* Nope, no factory for that name.. */
2758   if (cbi_factory == NULL)
2759   {
2760     ERROR ("java plugin: cjni_match_target_create: "
2761         "No such match factory registered: %s",
2762         name);
2763     BAIL_OUT (-1);
2764   }
2765
2766   /* We convert `ci' to its Java equivalent.. */
2767   o_ci = ctoj_oconfig_item (jvm_env, ci);
2768   if (o_ci == NULL)
2769   {
2770     ERROR ("java plugin: cjni_match_target_create: "
2771         "ctoj_oconfig_item failed.");
2772     BAIL_OUT (-1);
2773   }
2774
2775   /* Allocate a new callback info structure. This is going to be our user_data
2776    * pointer. */
2777   cbi_ret = (cjni_callback_info_t *) malloc (sizeof (*cbi_ret));
2778   if (cbi_ret == NULL)
2779   {
2780     ERROR ("java plugin: cjni_match_target_create: malloc failed.");
2781     BAIL_OUT (-1);
2782   }
2783   memset (cbi_ret, 0, sizeof (*cbi_ret));
2784   cbi_ret->object = NULL;
2785   cbi_ret->type = type;
2786
2787   /* Lets fill the callback info structure.. First, the name: */
2788   cbi_ret->name = strdup (name);
2789   if (cbi_ret->name == NULL)
2790   {
2791     ERROR ("java plugin: cjni_match_target_create: strdup failed.");
2792     BAIL_OUT (-1);
2793   }
2794
2795   /* Then call the factory method so it creates a new object for us. */
2796   o_tmp = (*jvm_env)->CallObjectMethod (jvm_env,
2797       cbi_factory->object, cbi_factory->method, o_ci);
2798   if (o_tmp == NULL)
2799   {
2800     ERROR ("java plugin: cjni_match_target_create: CallObjectMethod failed.");
2801     BAIL_OUT (-1);
2802   }
2803
2804   cbi_ret->object = (*jvm_env)->NewGlobalRef (jvm_env, o_tmp);
2805   if (o_tmp == NULL)
2806   {
2807     ERROR ("java plugin: cjni_match_target_create: NewGlobalRef failed.");
2808     BAIL_OUT (-1);
2809   }
2810
2811   /* This is the class of the match. It is possibly different from the class of
2812    * the match-factory! */
2813   cbi_ret->class = (*jvm_env)->GetObjectClass (jvm_env, cbi_ret->object);
2814   if (cbi_ret->class == NULL)
2815   {
2816     ERROR ("java plugin: cjni_match_target_create: GetObjectClass failed.");
2817     BAIL_OUT (-1);
2818   }
2819
2820   /* Lookup the `int match (DataSet, ValueList)' method. */
2821   cbi_ret->method = (*jvm_env)->GetMethodID (jvm_env, cbi_ret->class,
2822       /* method name = */ (type == CB_TYPE_MATCH) ? "match" : "invoke",
2823       "(Lorg/collectd/api/DataSet;Lorg/collectd/api/ValueList;)I");
2824   if (cbi_ret->method == NULL)
2825   {
2826     ERROR ("java plugin: cjni_match_target_create: GetMethodID failed.");
2827     BAIL_OUT (-1);
2828   }
2829
2830   /* Return the newly created match via the user_data pointer. */
2831   *user_data = (void *) cbi_ret;
2832
2833   cjni_thread_detach ();
2834
2835   DEBUG ("java plugin: cjni_match_target_create: "
2836       "Successfully created a `%s' %s.",
2837       cbi_ret->name, (type == CB_TYPE_MATCH) ? "match" : "target");
2838
2839   /* Success! */
2840   return (0);
2841 #undef BAIL_OUT
2842 } /* }}} int cjni_match_target_create */
2843
2844 static int cjni_match_target_destroy (void **user_data) /* {{{ */
2845 {
2846   cjni_callback_info_destroy (*user_data);
2847   *user_data = NULL;
2848
2849   return (0);
2850 } /* }}} int cjni_match_target_destroy */
2851
2852 static int cjni_match_target_invoke (const data_set_t *ds, /* {{{ */
2853     value_list_t *vl, notification_meta_t **meta, void **user_data)
2854 {
2855   JNIEnv *jvm_env;
2856   cjni_callback_info_t *cbi;
2857   jobject o_vl;
2858   jobject o_ds;
2859   int ret_status;
2860   int status;
2861
2862   if (jvm == NULL)
2863   {
2864     ERROR ("java plugin: cjni_match_target_invoke: jvm == NULL");
2865     return (-1);
2866   }
2867
2868   jvm_env = cjni_thread_attach ();
2869   if (jvm_env == NULL)
2870     return (-1);
2871
2872   cbi = (cjni_callback_info_t *) *user_data;
2873
2874   o_vl = ctoj_value_list (jvm_env, ds, vl);
2875   if (o_vl == NULL)
2876   {
2877     ERROR ("java plugin: cjni_match_target_invoke: ctoj_value_list failed.");
2878     cjni_thread_detach ();
2879     return (-1);
2880   }
2881
2882   o_ds = ctoj_data_set (jvm_env, ds);
2883   if (o_ds == NULL)
2884   {
2885     ERROR ("java plugin: cjni_match_target_invoke: ctoj_value_list failed.");
2886     cjni_thread_detach ();
2887     return (-1);
2888   }
2889
2890   ret_status = (*jvm_env)->CallIntMethod (jvm_env, cbi->object, cbi->method,
2891       o_ds, o_vl);
2892
2893   DEBUG ("java plugin: cjni_match_target_invoke: Method returned %i.", ret_status);
2894
2895   /* If we're executing a target, copy the `ValueList' back to our
2896    * `value_list_t'. */
2897   if (cbi->type == CB_TYPE_TARGET)
2898   {
2899     value_list_t new_vl;
2900
2901     memset (&new_vl, 0, sizeof (new_vl));
2902     status = jtoc_value_list (jvm_env, &new_vl, o_vl);
2903     if (status != 0)
2904     {
2905       ERROR ("java plugin: cjni_match_target_invoke: "
2906           "jtoc_value_list failed.");
2907     }
2908     else /* if (status == 0) */
2909     {
2910       /* plugin_dispatch_values assures that this is dynamically allocated
2911        * memory. */
2912       sfree (vl->values);
2913
2914       /* This will replace the vl->values pointer to a new, dynamically
2915        * allocated piece of memory. */
2916       memcpy (vl, &new_vl, sizeof (*vl));
2917     }
2918   } /* if (cbi->type == CB_TYPE_TARGET) */
2919
2920   cjni_thread_detach ();
2921   return (ret_status);
2922 } /* }}} int cjni_match_target_invoke */
2923
2924 /* Iterate over `java_callbacks' and call all CB_TYPE_INIT callbacks. */
2925 static int cjni_init_plugins (JNIEnv *jvm_env) /* {{{ */
2926 {
2927   int status;
2928   size_t i;
2929
2930   for (i = 0; i < java_callbacks_num; i++)
2931   {
2932     if (java_callbacks[i].type != CB_TYPE_INIT)
2933       continue;
2934
2935     DEBUG ("java plugin: Initializing %s", java_callbacks[i].name);
2936
2937     status = (*jvm_env)->CallIntMethod (jvm_env,
2938         java_callbacks[i].object, java_callbacks[i].method);
2939     if (status != 0)
2940     {
2941       ERROR ("java plugin: Initializing `%s' failed with status %i. "
2942           "Removing read function.",
2943           java_callbacks[i].name, status);
2944       plugin_unregister_read (java_callbacks[i].name);
2945     }
2946   }
2947
2948   return (0);
2949 } /* }}} int cjni_init_plugins */
2950
2951 /* Iterate over `java_callbacks' and call all CB_TYPE_SHUTDOWN callbacks. */
2952 static int cjni_shutdown_plugins (JNIEnv *jvm_env) /* {{{ */
2953 {
2954   int status;
2955   size_t i;
2956
2957   for (i = 0; i < java_callbacks_num; i++)
2958   {
2959     if (java_callbacks[i].type != CB_TYPE_SHUTDOWN)
2960       continue;
2961
2962     DEBUG ("java plugin: Shutting down %s", java_callbacks[i].name);
2963
2964     status = (*jvm_env)->CallIntMethod (jvm_env,
2965         java_callbacks[i].object, java_callbacks[i].method);
2966     if (status != 0)
2967     {
2968       ERROR ("java plugin: Shutting down `%s' failed with status %i. ",
2969           java_callbacks[i].name, status);
2970     }
2971   }
2972
2973   return (0);
2974 } /* }}} int cjni_shutdown_plugins */
2975
2976
2977 static int cjni_shutdown (void) /* {{{ */
2978 {
2979   JNIEnv *jvm_env;
2980   JavaVMAttachArgs args;
2981   int status;
2982   size_t i;
2983
2984   if (jvm == NULL)
2985     return (0);
2986
2987   jvm_env = NULL;
2988   memset (&args, 0, sizeof (args));
2989   args.version = JNI_VERSION_1_2;
2990
2991   status = (*jvm)->AttachCurrentThread (jvm, (void *) &jvm_env, &args);
2992   if (status != 0)
2993   {
2994     ERROR ("java plugin: cjni_shutdown: AttachCurrentThread failed with status %i.",
2995         status);
2996     return (-1);
2997   }
2998
2999   /* Execute all the shutdown functions registered by plugins. */
3000   cjni_shutdown_plugins (jvm_env);
3001
3002   /* Release all the global references to callback functions */
3003   for (i = 0; i < java_callbacks_num; i++)
3004   {
3005     if (java_callbacks[i].object != NULL)
3006     {
3007       (*jvm_env)->DeleteGlobalRef (jvm_env, java_callbacks[i].object);
3008       java_callbacks[i].object = NULL;
3009     }
3010     sfree (java_callbacks[i].name);
3011   }
3012   java_callbacks_num = 0;
3013   sfree (java_callbacks);
3014
3015   /* Release all the global references to directly loaded classes. */
3016   for (i = 0; i < java_classes_list_len; i++)
3017   {
3018     if (java_classes_list[i].object != NULL)
3019     {
3020       (*jvm_env)->DeleteGlobalRef (jvm_env, java_classes_list[i].object);
3021       java_classes_list[i].object = NULL;
3022     }
3023     sfree (java_classes_list[i].name);
3024   }
3025   java_classes_list_len = 0;
3026   sfree (java_classes_list);
3027
3028   /* Destroy the JVM */
3029   DEBUG ("java plugin: Destroying the JVM.");
3030   (*jvm)->DestroyJavaVM (jvm);
3031   jvm = NULL;
3032   jvm_env = NULL;
3033
3034   pthread_key_delete (jvm_env_key);
3035
3036   /* Free the JVM argument list */
3037   for (i = 0; i < jvm_argc; i++)
3038     sfree (jvm_argv[i]);
3039   jvm_argc = 0;
3040   sfree (jvm_argv);
3041
3042   return (0);
3043 } /* }}} int cjni_shutdown */
3044
3045 /* Initialization: Create a JVM, load all configured classes and call their
3046  * `config' and `init' callback methods. */
3047 static int cjni_init (void) /* {{{ */
3048 {
3049   JNIEnv *jvm_env;
3050
3051   if ((config_block == NULL) && (jvm == NULL))
3052   {
3053     ERROR ("java plugin: cjni_init: No configuration block for "
3054         "the java plugin was found.");
3055     return (-1);
3056   }
3057
3058   if (config_block != NULL)
3059   {
3060     cjni_config_perform (config_block);
3061     oconfig_free (config_block);
3062   }
3063
3064   if (jvm == NULL)
3065   {
3066     ERROR ("java plugin: cjni_init: jvm == NULL");
3067     return (-1);
3068   }
3069
3070   jvm_env = cjni_thread_attach ();
3071   if (jvm_env == NULL)
3072     return (-1);
3073
3074   cjni_init_plugins (jvm_env);
3075
3076   cjni_thread_detach ();
3077   return (0);
3078 } /* }}} int cjni_init */
3079
3080 void module_register (void)
3081 {
3082   plugin_register_complex_config ("java", cjni_config_callback);
3083   plugin_register_init ("java", cjni_init);
3084   plugin_register_shutdown ("java", cjni_shutdown);
3085 } /* void module_register (void) */
3086
3087 /* vim: set sw=2 sts=2 et fdm=marker : */