summaryrefslogtreecommitdiff
path: root/src/plugins/scripts/ruby
diff options
context:
space:
mode:
Diffstat (limited to 'src/plugins/scripts/ruby')
-rw-r--r--src/plugins/scripts/ruby/Makefile.am5
-rw-r--r--src/plugins/scripts/ruby/ruby.c2700
-rw-r--r--src/plugins/scripts/ruby/weechat-ruby-api.c2817
-rw-r--r--src/plugins/scripts/ruby/weechat-ruby-api.h25
-rw-r--r--src/plugins/scripts/ruby/weechat-ruby.c845
-rw-r--r--src/plugins/scripts/ruby/weechat-ruby.h34
6 files changed, 3725 insertions, 2701 deletions
diff --git a/src/plugins/scripts/ruby/Makefile.am b/src/plugins/scripts/ruby/Makefile.am
index cd295f33a..e2501a047 100644
--- a/src/plugins/scripts/ruby/Makefile.am
+++ b/src/plugins/scripts/ruby/Makefile.am
@@ -20,6 +20,9 @@ libdir = ${weechat_libdir}/plugins
lib_LTLIBRARIES = ruby.la
-ruby_la_SOURCES = ruby.c
+ruby_la_SOURCES = weechat-ruby.c \
+ weechat-ruby.h \
+ weechat-ruby-api.c \
+ weechat-ruby-api.h
ruby_la_LDFLAGS = -module
ruby_la_LIBADD = ../lib_weechat_plugins_scripts.la $(RUBY_LFLAGS)
diff --git a/src/plugins/scripts/ruby/ruby.c b/src/plugins/scripts/ruby/ruby.c
deleted file mode 100644
index f749465f3..000000000
--- a/src/plugins/scripts/ruby/ruby.c
+++ /dev/null
@@ -1,2700 +0,0 @@
-/*
- * Copyright (c) 2003-2008 by FlashCode <flashcode@flashtux.org>
- * See README for License detail, AUTHORS for developers list.
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 3 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program. If not, see <http://www.gnu.org/licenses/>.
- */
-
-/* weechat-ruby.c: Ruby plugin support for WeeChat */
-
-#undef _
-
-#include <ruby.h>
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <stdarg.h>
-#include <time.h>
-
-#include <sys/socket.h>
-#include <netinet/in.h>
-#include <arpa/inet.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-
-#include "../../weechat-plugin.h"
-#include "../weechat-script.h"
-
-
-WEECHAT_PLUGIN_NAME("ruby");
-WEECHAT_PLUGIN_DESCRIPTION("Ruby plugin for WeeChat");
-WEECHAT_PLUGIN_AUTHOR("FlashCode <flashcode@flashtux.org>");
-WEECHAT_PLUGIN_VERSION("0.1");
-WEECHAT_PLUGIN_LICENSE("GPL");
-
-t_weechat_plugin *ruby_plugin;
-
-t_plugin_script *ruby_scripts = NULL;
-t_plugin_script *ruby_current_script = NULL;
-char *ruby_current_script_filename = NULL;
-
-VALUE ruby_mWeechat, ruby_mWeechatOutputs;
-
-#define MOD_NAME_PREFIX "WeechatRubyModule"
-int ruby_num = 0;
-
-char ruby_buffer_output[128];
-
-typedef struct protect_call_arg {
- VALUE recv;
- ID mid;
- int argc;
- VALUE *argv;
-} protect_call_arg_t;
-
-/*
- * protect_funcall0 : used to protect a function call
- */
-
-static VALUE
-protect_funcall0(VALUE arg)
-{
- return rb_funcall2(((protect_call_arg_t *) arg)->recv,
- ((protect_call_arg_t *) arg)->mid,
- ((protect_call_arg_t *) arg)->argc,
- ((protect_call_arg_t *) arg)->argv);
-}
-
-/*
- * rb_protect_funcall : function call in protect mode
- */
-
-VALUE
-rb_protect_funcall (VALUE recv, ID mid, int *state, int argc, ...)
-{
- va_list ap;
- VALUE *argv;
- struct protect_call_arg arg;
-
- if (argc > 0)
- {
- int i;
- argv = ALLOCA_N(VALUE, argc);
- va_start(ap, argc);
- for (i = 0; i < argc; i++)
- argv[i] = va_arg(ap, VALUE);
- va_end(ap);
- }
- else
- argv = 0;
- arg.recv = recv;
- arg.mid = mid;
- arg.argc = argc;
- arg.argv = argv;
- return rb_protect(protect_funcall0, (VALUE) &arg, state);
-}
-
-/*
- * weechat_ruby_exec: execute a Ruby script
- */
-
-void *
-weechat_ruby_exec (t_weechat_plugin *plugin,
- t_plugin_script *script,
- int ret_type,
- char *function, char *arg1, char *arg2, char *arg3)
-{
- VALUE rc, err;
- int ruby_error, *ret_i;
- void *ret_value;
- /* make C compiler happy */
- (void) plugin;
-
- ruby_current_script = script;
-
- if (arg1)
- {
- if (arg2)
- {
- if (arg3)
- rc = rb_protect_funcall ((VALUE) script->interpreter, rb_intern(function),
- &ruby_error, 3,
- rb_str_new2(arg1),
- rb_str_new2(arg2),
- rb_str_new2(arg3));
- else
- rc = rb_protect_funcall ((VALUE) script->interpreter, rb_intern(function),
- &ruby_error, 2,
- rb_str_new2(arg1),
- rb_str_new2(arg2));
- }
- else
- rc = rb_protect_funcall ((VALUE) script->interpreter, rb_intern(function),
- &ruby_error, 1,
- rb_str_new2(arg1));
- }
- else
- rc = rb_protect_funcall ((VALUE) script->interpreter, rb_intern(function),
- &ruby_error, 0);
-
- if (ruby_error)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to run function \"%s\"",
- function);
-
- err = rb_inspect(rb_gv_get("$!"));
- ruby_plugin->print_server (ruby_plugin, "Ruby error: \"%s\"", STR2CSTR(err));
-
- return NULL;
- }
-
- if ((TYPE(rc) == T_STRING) && ret_type == SCRIPT_EXEC_STRING)
- {
- if (STR2CSTR (rc))
- ret_value = strdup (STR2CSTR (rc));
- else
- ret_value = NULL;
- }
- else if ((TYPE(rc) == T_FIXNUM) && ret_type == SCRIPT_EXEC_INT)
- {
- ret_i = (int *)malloc (sizeof(int));
- if (ret_i)
- *ret_i = NUM2INT(rc);
- ret_value = ret_i;
- }
- else
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: function \"%s\" must return a valid value",
- function);
- return PLUGIN_RC_OK;
- }
-
- if (ret_value == NULL)
- {
- plugin->print_server (plugin,
- "Ruby error: unable to alloc memory in function \"%s\"",
- function);
- return NULL;
- }
-
- return ret_value;
-}
-
-/*
- * weechat_ruby_cmd_msg_handler: general command/message handler for Ruby
- */
-
-int
-weechat_ruby_cmd_msg_handler (t_weechat_plugin *plugin,
- int argc, char **argv,
- char *handler_args, void *handler_pointer)
-{
- int *r;
- int ret;
-
- if (argc >= 3)
- {
- r = (int *) weechat_ruby_exec (plugin, (t_plugin_script *)handler_pointer,
- SCRIPT_EXEC_INT,
- handler_args, argv[0], argv[2], NULL);
- if (r == NULL)
- ret = PLUGIN_RC_KO;
- else
- {
- ret = *r;
- free (r);
- }
- return ret;
- }
- else
- return PLUGIN_RC_KO;
-}
-
-/*
- * weechat_ruby_timer_handler: general timer handler for Ruby
- */
-
-int
-weechat_ruby_timer_handler (t_weechat_plugin *plugin,
- int argc, char **argv,
- char *handler_args, void *handler_pointer)
-{
- /* make C compiler happy */
- (void) argc;
- (void) argv;
- int *r;
- int ret;
-
- r = (int *) weechat_ruby_exec (plugin, (t_plugin_script *)handler_pointer,
- SCRIPT_EXEC_INT,
- handler_args, NULL, NULL, NULL);
- if (r == NULL)
- ret = PLUGIN_RC_KO;
- else
- {
- ret = *r;
- free (r);
- }
- return ret;
-}
-
-/*
- * weechat_ruby_keyboard_handler: general keyboard handler for Ruby
- */
-
-int
-weechat_ruby_keyboard_handler (t_weechat_plugin *plugin,
- int argc, char **argv,
- char *handler_args, void *handler_pointer)
-{
- int *r;
- int ret;
-
- if (argc >= 3)
- {
- r = (int *) weechat_ruby_exec (plugin, (t_plugin_script *)handler_pointer,
- SCRIPT_EXEC_INT,
- handler_args, argv[0], argv[1], argv[2]);
- if (r == NULL)
- ret = PLUGIN_RC_KO;
- else
- {
- ret = *r;
- free (r);
- }
- return ret;
- }
- else
- return PLUGIN_RC_KO;
-}
-
-/*
- * weechat_ruby_event_handler: general event handler for Ruby
- */
-
-int
-weechat_ruby_event_handler (t_weechat_plugin *plugin,
- int argc, char **argv,
- char *handler_args, void *handler_pointer)
-{
- int *r;
- int ret;
-
- if (argc >= 1)
- {
- r = (int *) weechat_ruby_exec (plugin, (t_plugin_script *)handler_pointer,
- SCRIPT_EXEC_INT,
- handler_args,
- argv[0],
- (argc >= 2) ? argv[1] : NULL,
- (argc >= 3) ? argv[2] : NULL);
- if (r == NULL)
- ret = PLUGIN_RC_KO;
- else
- {
- ret = *r;
- free (r);
- }
- return ret;
- }
- else
- return PLUGIN_RC_KO;
-}
-
-/*
- * weechat_ruby_modifier: general modifier for Ruby
- */
-
-char *
-weechat_ruby_modifier (t_weechat_plugin *plugin,
- int argc, char **argv,
- char *modifier_args, void *modifier_pointer)
-{
- if (argc >= 2)
- return (char *) weechat_ruby_exec (plugin, (t_plugin_script *)modifier_pointer,
- SCRIPT_EXEC_STRING,
- modifier_args, argv[0], argv[1], NULL);
- else
- return NULL;
-}
-
-/*
- * weechat_ruby_register: startup function for all WeeChat Ruby scripts
- */
-
-static VALUE
-weechat_ruby_register (int argc, VALUE *argv, VALUE class)
-{
- VALUE name, version, shutdown_func, description, charset;
- char *c_name, *c_version, *c_shutdown_func, *c_description, *c_charset;
-
- /* make C compiler happy */
- (void) class;
-
- ruby_current_script = NULL;
-
- name = Qnil;
- version = Qnil;
- shutdown_func = Qnil;
- description = Qnil;
- charset = Qnil;
- c_name = NULL;
- c_version = NULL;
- c_shutdown_func = NULL;
- c_description = NULL;
- c_charset = NULL;
-
- rb_scan_args (argc, argv, "41", &name, &version, &shutdown_func, &description, &charset);
-
- if (NIL_P (name) || NIL_P (version) || NIL_P (shutdown_func) || NIL_P (description))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"register\" function");
- return INT2FIX (0);
- }
-
- Check_Type (name, T_STRING);
- Check_Type (version, T_STRING);
- Check_Type (shutdown_func, T_STRING);
- Check_Type (description, T_STRING);
-
- c_name = STR2CSTR (name);
- c_version = STR2CSTR (version);
- c_shutdown_func = STR2CSTR (shutdown_func);
- c_description = STR2CSTR (description);
-
- if (!NIL_P (charset))
- {
- Check_Type (charset, T_STRING);
- c_charset = STR2CSTR (charset);
- }
-
- if (weechat_script_search (ruby_plugin, &ruby_scripts, c_name))
- {
- /* error: another scripts already exists with this name! */
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to register "
- "\"%s\" script (another script "
- "already exists with this name)",
- c_name);
- return INT2FIX (0);
- }
-
- /* register script */
- ruby_current_script = weechat_script_add (ruby_plugin,
- &ruby_scripts,
- (ruby_current_script_filename) ?
- ruby_current_script_filename : "",
- c_name, c_version, c_shutdown_func,
- c_description, c_charset);
- if (ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby: registered script \"%s\", "
- "version %s (%s)",
- c_name, c_version, c_description);
- }
- else
- return INT2FIX (0);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_set_charset: set script charset
- */
-
-static VALUE
-weechat_ruby_set_charset (VALUE class, VALUE charset)
-{
- char *c_charset;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to set charset, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_charset = NULL;
-
- if (NIL_P (c_charset))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"set_charset\" function");
- return INT2FIX (0);
- }
-
- Check_Type (charset, T_STRING);
- c_charset = STR2CSTR (charset);
-
- if (c_charset)
- weechat_script_set_charset (ruby_plugin,
- ruby_current_script,
- c_charset);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_print: print message into a buffer (current or specified one)
- */
-
-static VALUE
-weechat_ruby_print (int argc, VALUE *argv, VALUE class)
-{
- VALUE message, channel_name, server_name;
- char *c_message, *c_channel_name, *c_server_name;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to print message, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- message = Qnil;
- channel_name = Qnil;
- server_name = Qnil;
- c_message = NULL;
- c_channel_name = NULL;
- c_server_name = NULL;
-
- rb_scan_args (argc, argv, "12", &message, &channel_name, &server_name);
-
- if (NIL_P (message))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"print\" function");
- return INT2FIX (0);
- }
-
- Check_Type (message, T_STRING);
- c_message = STR2CSTR (message);
-
- if (!NIL_P (channel_name))
- {
- Check_Type (channel_name, T_STRING);
- c_channel_name = STR2CSTR (channel_name);
- }
-
- if (!NIL_P (server_name))
- {
- Check_Type (server_name, T_STRING);
- c_server_name = STR2CSTR (server_name);
- }
-
- ruby_plugin->print (ruby_plugin,
- c_server_name, c_channel_name,
- "%s", c_message);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_print_server: print message into a buffer server
- */
-
-static VALUE
-weechat_ruby_print_server (VALUE class, VALUE message)
-{
- char *c_message;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to print message, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_message = NULL;
-
- if (NIL_P (message))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"print_server\" function");
- return INT2FIX (0);
- }
-
- Check_Type (message, T_STRING);
- c_message = STR2CSTR (message);
-
- ruby_plugin->print_server (ruby_plugin, "%s", c_message);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_print_infobar: print message to infobar
- */
-
-static VALUE
-weechat_ruby_print_infobar (VALUE class, VALUE delay, VALUE message)
-{
- int c_delay;
- char *c_message;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to print infobar message, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_delay = 1;
- c_message = NULL;
-
- if (NIL_P (delay) || NIL_P (message))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"print_infobar\" function");
- return INT2FIX (0);
- }
-
- Check_Type (delay, T_FIXNUM);
- Check_Type (message, T_STRING);
-
- c_delay = FIX2INT (delay);
- c_message = STR2CSTR (message);
-
- ruby_plugin->print_infobar (ruby_plugin, c_delay, "%s", c_message);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_remove_infobar: remove message(s) from infobar
- */
-
-static VALUE
-weechat_ruby_remove_infobar (int argc, VALUE *argv, VALUE class)
-{
- VALUE how_many;
- int c_how_many;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to remove infobar message(s), "
- "script not initialized");
- return INT2FIX (0);
- }
-
- how_many = Qnil;
-
- rb_scan_args (argc, argv, "01", &how_many);
-
- if (!NIL_P (how_many))
- {
- Check_Type (how_many, T_FIXNUM);
- c_how_many = FIX2INT (how_many);
- }
- else
- c_how_many = 0;
-
- ruby_plugin->infobar_remove (ruby_plugin, c_how_many);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_log: log message in server/channel (current or specified ones)
- */
-
-static VALUE
-weechat_ruby_log (int argc, VALUE *argv, VALUE class)
-{
- VALUE message, channel_name, server_name;
- char *c_message, *c_channel_name, *c_server_name;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to log message, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- message = Qnil;
- channel_name = Qnil;
- server_name = Qnil;
- c_message = NULL;
- c_channel_name = NULL;
- c_server_name = NULL;
-
- rb_scan_args (argc, argv, "12", &message, &channel_name, &server_name);
-
- if (NIL_P (message))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"log\" function");
- return INT2FIX (0);
- }
-
- Check_Type (message, T_STRING);
- c_message = STR2CSTR (message);
-
- if (!NIL_P (channel_name))
- {
- Check_Type (channel_name, T_STRING);
- c_channel_name = STR2CSTR (channel_name);
- }
-
- if (!NIL_P (server_name))
- {
- Check_Type (server_name, T_STRING);
- c_server_name = STR2CSTR (server_name);
- }
-
- ruby_plugin->log (ruby_plugin,
- c_server_name, c_channel_name,
- "%s", c_message);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_command: send command to server
- */
-
-static VALUE
-weechat_ruby_command (int argc, VALUE *argv, VALUE class)
-{
- VALUE command, channel_name, server_name;
- char *c_command, *c_channel_name, *c_server_name;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to run command, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- command = Qnil;
- channel_name = Qnil;
- server_name = Qnil;
- c_command = NULL;
- c_channel_name = NULL;
- c_server_name = NULL;
-
- rb_scan_args(argc, argv, "12", &command, &channel_name, &server_name);
-
- if (NIL_P (command))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"command\" function");
- return INT2FIX (0);
- }
-
- Check_Type (command, T_STRING);
- c_command = STR2CSTR (command);
-
- if (!NIL_P (channel_name))
- {
- Check_Type (channel_name, T_STRING);
- c_channel_name = STR2CSTR (channel_name);
- }
-
- if (!NIL_P (server_name))
- {
- Check_Type (server_name, T_STRING);
- c_server_name = STR2CSTR (server_name);
- }
-
- ruby_plugin->exec_command (ruby_plugin,
- c_server_name, c_channel_name,
- c_command);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_add_message_handler: add a handler for messages (privmsg, ...)
- */
-
-static VALUE
-weechat_ruby_add_message_handler (VALUE class, VALUE message, VALUE function)
-{
- char *c_message, *c_function;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to add message handler, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_message = NULL;
- c_function = NULL;
-
- if (NIL_P (message) || NIL_P (function))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"add_message_handler\" function");
- return INT2FIX (0);
- }
-
- Check_Type (message, T_STRING);
- Check_Type (function, T_STRING);
-
- c_message = STR2CSTR (message);
- c_function = STR2CSTR (function);
-
- if (ruby_plugin->msg_handler_add (ruby_plugin, c_message,
- weechat_ruby_cmd_msg_handler,
- c_function,
- (void *)ruby_current_script))
- return INT2FIX (1);
-
- return INT2FIX (0);
-}
-
-/*
- * weechat_ruby_add_command_handler: add a command handler (define/redefine commands)
- */
-
-static VALUE
-weechat_ruby_add_command_handler (int argc, VALUE *argv, VALUE class)
-{
- VALUE command, function, description, arguments, arguments_description;
- VALUE completion_template;
- char *c_command, *c_function, *c_description, *c_arguments, *c_arguments_description;
- char *c_completion_template;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to add command handler, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- command = Qnil;
- function = Qnil;
- description = Qnil;
- arguments = Qnil;
- arguments_description = Qnil;
- completion_template = Qnil;
- c_command = NULL;
- c_function = NULL;
- c_description = NULL;
- c_arguments = NULL;
- c_arguments_description = NULL;
- c_completion_template = NULL;
-
- rb_scan_args (argc, argv, "24", &command, &function, &description,
- &arguments, &arguments_description, &completion_template);
-
- if (NIL_P (command) || NIL_P (function))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"add_command_handler\" function");
- return INT2FIX (0);
- }
-
- Check_Type (command, T_STRING);
- c_command = STR2CSTR (command);
- Check_Type (function, T_STRING);
- c_function = STR2CSTR (function);
-
- if (!NIL_P (description))
- {
- Check_Type (description, T_STRING);
- c_description = STR2CSTR (description);
- }
-
- if (!NIL_P (arguments))
- {
- Check_Type (arguments, T_STRING);
- c_arguments = STR2CSTR (arguments);
- }
-
- if (!NIL_P (arguments_description))
- {
- Check_Type (arguments_description, T_STRING);
- c_arguments_description = STR2CSTR (arguments_description);
- }
-
- if (!NIL_P (completion_template))
- {
- Check_Type (completion_template, T_STRING);
- c_completion_template = STR2CSTR (completion_template);
- }
-
- if (ruby_plugin->cmd_handler_add (ruby_plugin,
- c_command,
- c_description,
- c_arguments,
- c_arguments_description,
- c_completion_template,
- weechat_ruby_cmd_msg_handler,
- c_function,
- (void *)ruby_current_script))
- return INT2FIX (1);
-
- return INT2FIX (0);
-}
-
-/*
- * weechat_ruby_add_timer_handler: add a timer handler
- */
-
-static VALUE
-weechat_ruby_add_timer_handler (VALUE class, VALUE interval, VALUE function)
-{
- int c_interval;
- char *c_function;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to add timer handler, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_interval = 10;
- c_function = NULL;
-
- if (NIL_P (interval) || NIL_P (function))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"add_timer_handler\" function");
- return INT2FIX (0);
- }
-
- Check_Type (interval, T_FIXNUM);
- Check_Type (function, T_STRING);
-
- c_interval = FIX2INT (interval);
- c_function = STR2CSTR (function);
-
- if (ruby_plugin->timer_handler_add (ruby_plugin, c_interval,
- weechat_ruby_timer_handler,
- c_function,
- (void *)ruby_current_script))
- return INT2FIX (1);
-
- return INT2FIX (0);
-}
-
-/*
- * weechat_ruby_add_keyboard_handler: add a keyboard handler
- */
-
-static VALUE
-weechat_ruby_add_keyboard_handler (VALUE class, VALUE function)
-{
- char *c_function;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to add keyboard handler, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_function = NULL;
-
- if (NIL_P (function))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"add_keyboard_handler\" function");
- return INT2FIX (0);
- }
-
- Check_Type (function, T_STRING);
-
- c_function = STR2CSTR (function);
-
- if (ruby_plugin->keyboard_handler_add (ruby_plugin,
- weechat_ruby_keyboard_handler,
- c_function,
- (void *)ruby_current_script))
- return INT2FIX (1);
-
- return INT2FIX (0);
-}
-
-/*
- * weechat_ruby_add_event_handler: add a handler for events
- */
-
-static VALUE
-weechat_ruby_add_event_handler (VALUE class, VALUE event, VALUE function)
-{
- char *c_event, *c_function;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to add event handler, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_event = NULL;
- c_function = NULL;
-
- if (NIL_P (event) || NIL_P (function))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"add_event_handler\" function");
- return INT2FIX (0);
- }
-
- Check_Type (event, T_STRING);
- Check_Type (function, T_STRING);
-
- c_event = STR2CSTR (event);
- c_function = STR2CSTR (function);
-
- if (ruby_plugin->event_handler_add (ruby_plugin, c_event,
- weechat_ruby_event_handler,
- c_function,
- (void *)ruby_current_script))
- return INT2FIX (1);
-
- return INT2FIX (0);
-}
-
-/*
- * weechat_ruby_remove_handler: remove a handler
- */
-
-static VALUE
-weechat_ruby_remove_handler (VALUE class, VALUE command, VALUE function)
-{
- char *c_command, *c_function;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to remove handler, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_command = NULL;
- c_function = NULL;
-
- if (NIL_P (command) || NIL_P (function))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"remove_handler\" function");
- return INT2FIX (0);
- }
-
- Check_Type (command, T_STRING);
- Check_Type (function, T_STRING);
-
- c_command = STR2CSTR (command);
- c_function = STR2CSTR (function);
-
- weechat_script_remove_handler (ruby_plugin, ruby_current_script,
- c_command, c_function);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_remove_timer_handler: remove a timer handler
- */
-
-static VALUE
-weechat_ruby_remove_timer_handler (VALUE class, VALUE function)
-{
- char *c_function;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to remove timer handler, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_function = NULL;
-
- if (NIL_P (function))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"remove_timer_handler\" function");
- return INT2FIX (0);
- }
-
- Check_Type (function, T_STRING);
-
- c_function = STR2CSTR (function);
-
- weechat_script_remove_timer_handler (ruby_plugin, ruby_current_script,
- c_function);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_remove_keyboard_handler: remove a keyboard handler
- */
-
-static VALUE
-weechat_ruby_remove_keyboard_handler (VALUE class, VALUE function)
-{
- char *c_function;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to remove keyboard handler, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_function = NULL;
-
- if (NIL_P (function))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"remove_keyboard_handler\" function");
- return INT2FIX (0);
- }
-
- Check_Type (function, T_STRING);
-
- c_function = STR2CSTR (function);
-
- weechat_script_remove_keyboard_handler (ruby_plugin, ruby_current_script,
- c_function);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_remove_event_handler: remove an event handler
- */
-
-static VALUE
-weechat_ruby_remove_event_handler (VALUE class, VALUE function)
-{
- char *c_function;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to remove event handler, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_function = NULL;
-
- if (NIL_P (function))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"remove_event_handler\" function");
- return INT2FIX (0);
- }
-
- Check_Type (function, T_STRING);
-
- c_function = STR2CSTR (function);
-
- weechat_script_remove_event_handler (ruby_plugin, ruby_current_script,
- c_function);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_add_modifier: add a modifier
- */
-
-static VALUE
-weechat_ruby_add_modifier (VALUE class, VALUE type, VALUE message, VALUE function)
-{
- char *c_type, *c_message, *c_function;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to add modifier, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_type = NULL;
- c_message = NULL;
- c_function = NULL;
-
- if (NIL_P (type) || NIL_P (message) || NIL_P (function))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"add_modifier\" function");
- return INT2FIX (0);
- }
-
- Check_Type (type, T_STRING);
- Check_Type (message, T_STRING);
- Check_Type (function, T_STRING);
-
- c_type = STR2CSTR (type);
- c_message = STR2CSTR (message);
- c_function = STR2CSTR (function);
-
- if (ruby_plugin->modifier_add (ruby_plugin, c_type, c_message,
- weechat_ruby_modifier,
- c_function,
- (void *)ruby_current_script))
- return INT2FIX (1);
-
- return INT2FIX (0);
-}
-
-/*
- * weechat_ruby_remove_modifier: remove a modifier
- */
-
-static VALUE
-weechat_ruby_remove_modifier (VALUE class, VALUE type, VALUE command, VALUE function)
-{
- char *c_type, *c_command, *c_function;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to remove modifier, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_type = NULL;
- c_command = NULL;
- c_function = NULL;
-
- if (NIL_P (type) || NIL_P (command) || NIL_P (function))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"remove_modifier\" function");
- return INT2FIX (0);
- }
-
- Check_Type (type, T_STRING);
- Check_Type (command, T_STRING);
- Check_Type (function, T_STRING);
-
- c_type = STR2CSTR (type);
- c_command = STR2CSTR (command);
- c_function = STR2CSTR (function);
-
- weechat_script_remove_modifier (ruby_plugin, ruby_current_script,
- c_type, c_command, c_function);
-
- return INT2FIX (1);
-}
-
-/*
- * weechat_ruby_get_info: get various infos
- */
-
-static VALUE
-weechat_ruby_get_info (int argc, VALUE *argv, VALUE class)
-{
- char *c_arg, *c_server_name, *info;
- VALUE arg, server_name, return_value;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to get info, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- arg = Qnil;
- server_name = Qnil;
- c_arg = NULL;
- c_server_name = NULL;
-
- rb_scan_args (argc, argv, "11", &arg, &server_name);
-
- if (NIL_P (arg))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"get_info\" function");
- return INT2FIX (0);
- }
-
- Check_Type (arg, T_STRING);
- c_arg = STR2CSTR (arg);
-
- if (!NIL_P (server_name))
- {
- Check_Type (server_name, T_STRING);
- c_server_name = STR2CSTR (server_name);
- }
-
- if (c_arg)
- {
- info = ruby_plugin->get_info (ruby_plugin, c_arg, c_server_name);
-
- if (info)
- {
- return_value = rb_str_new2 (info);
- free (info);
- return return_value;
- }
- }
-
- return rb_str_new2 ("");
-}
-
-/*
- * weechat_ruby_get_dcc_info: get infos about DCC
- */
-
-static VALUE
-weechat_ruby_get_dcc_info (VALUE class)
-{
- t_plugin_dcc_info *dcc_info, *ptr_dcc;
- VALUE dcc_list, dcc_list_member;
- char timebuffer1[64];
- char timebuffer2[64];
- struct in_addr in;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to get DCC info, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- dcc_list = rb_ary_new();
-
- if (NIL_P (dcc_list))
- return Qnil;
-
- dcc_info = ruby_plugin->get_dcc_info (ruby_plugin);
- if (!dcc_info)
- return dcc_list;
-
- for(ptr_dcc = dcc_info; ptr_dcc; ptr_dcc = ptr_dcc->next_dcc)
- {
- strftime(timebuffer1, sizeof(timebuffer1), "%F %T",
- localtime(&ptr_dcc->start_time));
- strftime(timebuffer2, sizeof(timebuffer2), "%F %T",
- localtime(&ptr_dcc->start_transfer));
- in.s_addr = htonl(ptr_dcc->addr);
-
- dcc_list_member = rb_hash_new ();
-
- if (!NIL_P (dcc_list_member))
- {
- rb_hash_aset (dcc_list_member, rb_str_new2("server"),
- rb_str_new2(ptr_dcc->server));
- rb_hash_aset (dcc_list_member, rb_str_new2("channel"),
- rb_str_new2(ptr_dcc->channel));
- rb_hash_aset (dcc_list_member, rb_str_new2("type"),
- INT2FIX(ptr_dcc->type));
- rb_hash_aset (dcc_list_member, rb_str_new2("status"),
- INT2FIX(ptr_dcc->status));
- rb_hash_aset (dcc_list_member, rb_str_new2("start_time"),
- rb_str_new2(timebuffer1));
- rb_hash_aset (dcc_list_member, rb_str_new2("start_transfer"),
- rb_str_new2(timebuffer2));
- rb_hash_aset (dcc_list_member, rb_str_new2("address"),
- rb_str_new2(inet_ntoa(in)));
- rb_hash_aset (dcc_list_member, rb_str_new2("port"),
- INT2FIX(ptr_dcc->port));
- rb_hash_aset (dcc_list_member, rb_str_new2("nick"),
- rb_str_new2(ptr_dcc->nick));
- rb_hash_aset (dcc_list_member, rb_str_new2("remote_file"),
- rb_str_new2(ptr_dcc->filename));
- rb_hash_aset (dcc_list_member, rb_str_new2("local_file"),
- rb_str_new2(ptr_dcc->local_filename));
- rb_hash_aset (dcc_list_member, rb_str_new2("filename_suffix"),
- INT2FIX(ptr_dcc->filename_suffix));
- rb_hash_aset (dcc_list_member, rb_str_new2("size"),
- INT2FIX(ptr_dcc->size));
- rb_hash_aset (dcc_list_member, rb_str_new2("pos"),
- INT2FIX(ptr_dcc->pos));
- rb_hash_aset (dcc_list_member, rb_str_new2("start_resume"),
- INT2FIX(ptr_dcc->start_resume));
- rb_hash_aset (dcc_list_member, rb_str_new2("cps"),
- INT2FIX(ptr_dcc->bytes_per_sec));
-
- rb_ary_push (dcc_list, dcc_list_member);
- }
- }
-
- ruby_plugin->free_dcc_info (ruby_plugin, dcc_info);
-
- return dcc_list;
-}
-
-/*
- * weechat_ruby_get_config: get value of a WeeChat config option
- */
-
-static VALUE
-weechat_ruby_get_config (VALUE class, VALUE option)
-{
- char *c_option, *return_value;
- VALUE ruby_return_value;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to get config option, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_option = NULL;
-
- if (NIL_P (option))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"get_config\" function");
- return INT2FIX (0);
- }
-
- Check_Type (option, T_STRING);
- c_option = STR2CSTR (option);
-
- if (c_option)
- {
- return_value = ruby_plugin->get_config (ruby_plugin, c_option);
-
- if (return_value)
- {
- ruby_return_value = rb_str_new2 (return_value);
- free (return_value);
- return ruby_return_value;
- }
- }
-
- return rb_str_new2 ("");
-}
-
-/*
- * weechat_ruby_set_config: set value of a WeeChat config option
- */
-
-static VALUE
-weechat_ruby_set_config (VALUE class, VALUE option, VALUE value)
-{
- char *c_option, *c_value;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to set config option, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_option = NULL;
- c_value = NULL;
-
- if (NIL_P (option))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"set_config\" function");
- return INT2FIX (0);
- }
-
- Check_Type (option, T_STRING);
- Check_Type (value, T_STRING);
-
- c_option = STR2CSTR (option);
- c_value = STR2CSTR (value);
-
- if (c_option && c_value)
- {
- if (ruby_plugin->set_config (ruby_plugin, c_option, c_value))
- return INT2FIX (1);
- }
-
- return INT2FIX (0);
-}
-
-/*
- * weechat_ruby_get_plugin_config: get value of a plugin config option
- */
-
-static VALUE
-weechat_ruby_get_plugin_config (VALUE class, VALUE option)
-{
- char *c_option, *return_value;
- VALUE ruby_return_value;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to get plugin config option, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_option = NULL;
-
- if (NIL_P (option))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"get_plugin_config\" function");
- return INT2FIX (0);
- }
-
- Check_Type (option, T_STRING);
- c_option = STR2CSTR (option);
-
- if (c_option)
- {
- return_value = weechat_script_get_plugin_config (ruby_plugin,
- ruby_current_script,
- c_option);
-
- if (return_value)
- {
- ruby_return_value = rb_str_new2 (return_value);
- free (return_value);
- return ruby_return_value;
- }
- }
-
- return rb_str_new2 ("");
-}
-
-/*
- * weechat_ruby_set_plugin_config: set value of a plugin config option
- */
-
-static VALUE
-weechat_ruby_set_plugin_config (VALUE class, VALUE option, VALUE value)
-{
- char *c_option, *c_value;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to set plugin config option, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_option = NULL;
- c_value = NULL;
-
- if (NIL_P (option))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"set_plugin_config\" function");
- return INT2FIX (0);
- }
-
- Check_Type (option, T_STRING);
- Check_Type (value, T_STRING);
-
- c_option = STR2CSTR (option);
- c_value = STR2CSTR (value);
-
- if (c_option && c_value)
- {
- if (weechat_script_set_plugin_config (ruby_plugin,
- ruby_current_script,
- c_option, c_value))
- return INT2FIX (1);
- }
-
- return INT2FIX (0);
-}
-
-/*
- * weechat_ruby_get_server_info: get infos about servers
- */
-
-static VALUE
-weechat_ruby_get_server_info (VALUE class)
-{
- t_plugin_server_info *server_info, *ptr_server;
- VALUE server_hash, server_hash_member;
- char timebuffer[64];
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to get server infos, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- server_hash = rb_hash_new ();
- if (!server_hash)
- return Qnil;
-
- server_info = ruby_plugin->get_server_info (ruby_plugin);
- if (!server_info)
- return server_hash;
-
- for(ptr_server = server_info; ptr_server; ptr_server = ptr_server->next_server)
- {
- strftime(timebuffer, sizeof(timebuffer), "%F %T",
- localtime(&ptr_server->away_time));
-
- server_hash_member = rb_hash_new ();
-
- if (server_hash_member)
- {
- rb_hash_aset (server_hash_member, rb_str_new2("autoconnect"),
- INT2FIX(ptr_server->autoconnect));
- rb_hash_aset (server_hash_member, rb_str_new2("autoreconnect"),
- INT2FIX(ptr_server->autoreconnect));
- rb_hash_aset (server_hash_member, rb_str_new2("autoreconnect_delay"),
- INT2FIX(ptr_server->autoreconnect_delay));
- rb_hash_aset (server_hash_member, rb_str_new2("temp_server"),
- INT2FIX(ptr_server->temp_server));
- rb_hash_aset (server_hash_member, rb_str_new2("address"),
- rb_str_new2(ptr_server->address));
- rb_hash_aset (server_hash_member, rb_str_new2("port"),
- INT2FIX(ptr_server->port));
- rb_hash_aset (server_hash_member, rb_str_new2("ipv6"),
- INT2FIX(ptr_server->ipv6));
- rb_hash_aset (server_hash_member, rb_str_new2("ssl"),
- INT2FIX(ptr_server->ssl));
- rb_hash_aset (server_hash_member, rb_str_new2("password"),
- rb_str_new2(ptr_server->password));
- rb_hash_aset (server_hash_member, rb_str_new2("nick1"),
- rb_str_new2(ptr_server->nick1));
- rb_hash_aset (server_hash_member, rb_str_new2("nick2"),
- rb_str_new2(ptr_server->nick2));
- rb_hash_aset (server_hash_member, rb_str_new2("nick3"),
- rb_str_new2(ptr_server->nick3));
- rb_hash_aset (server_hash_member, rb_str_new2("username"),
- rb_str_new2(ptr_server->username));
- rb_hash_aset (server_hash_member, rb_str_new2("realname"),
- rb_str_new2(ptr_server->realname));
- rb_hash_aset (server_hash_member, rb_str_new2("command"),
- rb_str_new2(ptr_server->command));
- rb_hash_aset (server_hash_member, rb_str_new2("command_delay"),
- INT2FIX(ptr_server->command_delay));
- rb_hash_aset (server_hash_member, rb_str_new2("autojoin"),
- rb_str_new2(ptr_server->autojoin));
- rb_hash_aset (server_hash_member, rb_str_new2("autorejoin"),
- INT2FIX(ptr_server->autorejoin));
- rb_hash_aset (server_hash_member, rb_str_new2("notify_levels"),
- rb_str_new2(ptr_server->notify_levels));
- rb_hash_aset (server_hash_member, rb_str_new2("is_connected"),
- INT2FIX(ptr_server->is_connected));
- rb_hash_aset (server_hash_member, rb_str_new2("ssl_connected"),
- INT2FIX(ptr_server->ssl_connected));
- rb_hash_aset (server_hash_member, rb_str_new2("nick"),
- rb_str_new2(ptr_server->nick));
- rb_hash_aset (server_hash_member, rb_str_new2("nick_modes"),
- rb_str_new2(ptr_server->nick_modes));
- rb_hash_aset (server_hash_member, rb_str_new2("away_time"),
- rb_str_new2(timebuffer));
- rb_hash_aset (server_hash_member, rb_str_new2("lag"),
- INT2FIX(ptr_server->lag));
-
- rb_hash_aset (server_hash, rb_str_new2(ptr_server->name), server_hash_member);
- }
- }
-
- ruby_plugin->free_server_info(ruby_plugin, server_info);
-
- return server_hash;
-}
-
-/*
- * weechat_ruby_get_channel_info: get infos about channels
- */
-
-static VALUE
-weechat_ruby_get_channel_info (VALUE class, VALUE server)
-{
- t_plugin_channel_info *channel_info, *ptr_channel;
- VALUE channel_hash, channel_hash_member;
- char *c_server;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to get channel infos, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_server = NULL;
- if (NIL_P (server))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"get_channel_info\" function");
- return INT2FIX (0);
- }
-
- Check_Type (server, T_STRING);
- c_server = STR2CSTR (server);
-
- if (!c_server)
- return INT2FIX (0);
-
- channel_hash = rb_hash_new ();
- if (!channel_hash)
- return Qnil;
-
- channel_info = ruby_plugin->get_channel_info (ruby_plugin, c_server);
- if (!channel_info)
- return channel_hash;
-
- for(ptr_channel = channel_info; ptr_channel; ptr_channel = ptr_channel->next_channel)
- {
- channel_hash_member = rb_hash_new ();
-
- if (channel_hash_member)
- {
- rb_hash_aset (channel_hash_member, rb_str_new2("type"),
- INT2FIX(ptr_channel->type));
- rb_hash_aset (channel_hash_member, rb_str_new2("topic"),
- rb_str_new2(ptr_channel->topic));
- rb_hash_aset (channel_hash_member, rb_str_new2("modes"),
- rb_str_new2(ptr_channel->modes));
- rb_hash_aset (channel_hash_member, rb_str_new2("limit"),
- INT2FIX(ptr_channel->limit));
- rb_hash_aset (channel_hash_member, rb_str_new2("key"),
- rb_str_new2(ptr_channel->key));
- rb_hash_aset (channel_hash_member, rb_str_new2("nicks_count"),
- INT2FIX(ptr_channel->nicks_count));
-
- rb_hash_aset (channel_hash, rb_str_new2(ptr_channel->name), channel_hash_member);
- }
- }
-
- ruby_plugin->free_channel_info(ruby_plugin, channel_info);
-
- return channel_hash;
-}
-
-/*
- * weechat_ruby_get_nick_info: get infos about nicks
- */
-
-static VALUE
-weechat_ruby_get_nick_info (VALUE class, VALUE server, VALUE channel)
-{
- t_plugin_nick_info *nick_info, *ptr_nick;
- VALUE nick_hash, nick_hash_member;
- char *c_server, *c_channel;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to get channel infos, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_server = NULL;
- c_channel = NULL;
- if (NIL_P (server) || NIL_P (channel))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"get_nick_info\" function");
- return INT2FIX (0);
- }
-
- Check_Type (server, T_STRING);
- Check_Type (channel, T_STRING);
-
- c_server = STR2CSTR (server);
- c_channel = STR2CSTR (channel);
-
- if (!c_server || !c_channel)
- return INT2FIX (0);
-
- nick_hash = rb_hash_new ();
- if (!nick_hash)
- return Qnil;
-
- nick_info = ruby_plugin->get_nick_info (ruby_plugin, c_server, c_channel);
- if (!nick_info)
- return nick_hash;
-
- for(ptr_nick = nick_info; ptr_nick; ptr_nick = ptr_nick->next_nick)
- {
- nick_hash_member = rb_hash_new ();
-
- if (nick_hash_member)
- {
- rb_hash_aset (nick_hash_member, rb_str_new2("flags"),
- INT2FIX(ptr_nick->flags));
- rb_hash_aset (nick_hash_member, rb_str_new2("host"),
- rb_str_new2(ptr_nick->host ? ptr_nick->host : ""));
-
- rb_hash_aset (nick_hash, rb_str_new2(ptr_nick->nick), nick_hash_member);
- }
- }
-
- ruby_plugin->free_nick_info(ruby_plugin, nick_info);
-
- return nick_hash;
-}
-
-/*
- * weechat_ruby_get_irc_color:
- * get the numeric value which identify an irc color by its name
- */
-
-static VALUE
-weechat_ruby_get_irc_color (VALUE class, VALUE color)
-{
- char *c_color;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to get irc color, "
- "script not initialized");
- return INT2FIX (-1);
- }
-
- c_color = NULL;
-
- if (NIL_P (color))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"get_irc_color\" function");
- return INT2FIX (-1);
- }
-
- Check_Type (color, T_STRING);
-
- c_color = STR2CSTR (color);
-
- return INT2FIX (ruby_plugin->get_irc_color (ruby_plugin, c_color));
-}
-
-/*
- * weechat_ruby_get_window_info: get infos about windows
- */
-
-static VALUE
-weechat_ruby_get_window_info (VALUE class)
-{
- t_plugin_window_info *window_info, *ptr_win;
- VALUE window_list, window_list_member;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to get window info, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- window_list = rb_ary_new();
-
- if (NIL_P (window_list))
- return Qnil;
-
- window_info = ruby_plugin->get_window_info (ruby_plugin);
- if (!window_info)
- return window_list;
-
- for (ptr_win = window_info; ptr_win; ptr_win = ptr_win->next_window)
- {
- window_list_member = rb_hash_new ();
-
- if (!NIL_P (window_list_member))
- {
- rb_hash_aset (window_list_member, rb_str_new2("num_buffer"),
- INT2FIX(ptr_win->num_buffer));
- rb_hash_aset (window_list_member, rb_str_new2("win_x"),
- INT2FIX(ptr_win->win_x));
- rb_hash_aset (window_list_member, rb_str_new2("win_y"),
- INT2FIX(ptr_win->win_y));
- rb_hash_aset (window_list_member, rb_str_new2("win_width"),
- INT2FIX(ptr_win->win_width));
- rb_hash_aset (window_list_member, rb_str_new2("win_height"),
- INT2FIX(ptr_win->win_height));
- rb_hash_aset (window_list_member, rb_str_new2("win_width_pct"),
- INT2FIX(ptr_win->win_width_pct));
- rb_hash_aset (window_list_member, rb_str_new2("win_height_pct"),
- INT2FIX(ptr_win->win_height_pct));
-
- rb_ary_push (window_list, window_list_member);
- }
- }
-
- ruby_plugin->free_window_info (ruby_plugin, window_info);
-
- return window_list;
-}
-
-/*
- * weechat_ruby_get_buffer_info: get infos about buffers
- */
-
-static VALUE
-weechat_ruby_get_buffer_info (VALUE class)
-{
- t_plugin_buffer_info *buffer_info, *ptr_buffer;
- VALUE buffer_hash, buffer_hash_member;
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to get buffer info, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- buffer_hash = rb_hash_new ();
- if (!buffer_hash)
- return Qnil;
-
- buffer_info = ruby_plugin->get_buffer_info (ruby_plugin);
- if (!buffer_info)
- return buffer_hash;
-
- for(ptr_buffer = buffer_info; ptr_buffer; ptr_buffer = ptr_buffer->next_buffer)
- {
- buffer_hash_member = rb_hash_new ();
-
- if (buffer_hash_member)
- {
- rb_hash_aset (buffer_hash_member, rb_str_new2("type"),
- INT2FIX(ptr_buffer->type));
- rb_hash_aset (buffer_hash_member, rb_str_new2("num_displayed"),
- INT2FIX(ptr_buffer->num_displayed));
- rb_hash_aset (buffer_hash_member, rb_str_new2("server"),
- rb_str_new2(ptr_buffer->server_name == NULL ? "" : ptr_buffer->server_name));
- rb_hash_aset (buffer_hash_member, rb_str_new2("channel"),
- rb_str_new2(ptr_buffer->channel_name == NULL ? "" : ptr_buffer->channel_name));
- rb_hash_aset (buffer_hash_member, rb_str_new2("notify_level"),
- INT2FIX(ptr_buffer->notify_level));
- rb_hash_aset (buffer_hash_member, rb_str_new2("log_filename"),
- rb_str_new2(ptr_buffer->log_filename == NULL ? "" : ptr_buffer->log_filename));
-
- rb_hash_aset (buffer_hash, INT2FIX(ptr_buffer->number), buffer_hash_member);
- }
- }
-
- ruby_plugin->free_buffer_info(ruby_plugin, buffer_info);
-
- return buffer_hash;
-}
-
-/*
- * weechat_ruby_get_buffer_data: get buffer content
- */
-
-static VALUE
-weechat_ruby_get_buffer_data (VALUE class, VALUE server, VALUE channel)
-{
- t_plugin_buffer_line *buffer_data, *ptr_data;
- VALUE data_list, data_list_member;
- char *c_server, *c_channel;
- char timebuffer[64];
-
- /* make C compiler happy */
- (void) class;
-
- if (!ruby_current_script)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to get buffer data, "
- "script not initialized");
- return INT2FIX (0);
- }
-
- c_server = NULL;
- c_channel = NULL;
-
- if (NIL_P (server) || NIL_P (channel))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: wrong parameters for "
- "\"get_buffer_data\" function");
- return INT2FIX (0);
- }
-
- Check_Type (server, T_STRING);
- Check_Type (channel, T_STRING);
-
- c_server = STR2CSTR (server);
- c_channel = STR2CSTR (channel);
-
- if (!c_server || !c_channel)
- return INT2FIX (0);
-
- data_list = rb_ary_new();
- if (NIL_P (data_list))
- return Qnil;
-
- buffer_data = ruby_plugin->get_buffer_data (ruby_plugin, c_server, c_channel);
- if (!buffer_data)
- return data_list;
-
- for(ptr_data = buffer_data; ptr_data; ptr_data = ptr_data->next_line)
- {
- data_list_member = rb_hash_new ();
-
- if (!NIL_P (data_list_member))
- {
- strftime(timebuffer, sizeof(timebuffer), "%F %T",
- localtime(&ptr_data->date));
-
- rb_hash_aset (data_list_member, rb_str_new2("date"),
- rb_str_new2(timebuffer));
- rb_hash_aset (data_list_member, rb_str_new2("nick"),
- rb_str_new2(ptr_data->nick == NULL ? "" : ptr_data->nick));
- rb_hash_aset (data_list_member, rb_str_new2("data"),
- rb_str_new2(ptr_data->data == NULL ? "" : ptr_data->data));
-
- rb_ary_push (data_list, data_list_member);
- }
- }
-
- ruby_plugin->free_buffer_data (ruby_plugin, buffer_data);
-
- return data_list;
-}
-
-/*
- * weechat_ruby_output : redirection for stdout and stderr
- */
-
-static VALUE
-weechat_ruby_output(VALUE self, VALUE str)
-{
- char *msg, *p, *m;
-
- /* make C compiler happy */
- (void) self;
-
- msg = strdup(STR2CSTR(str));
-
- m = msg;
- while ((p = strchr (m, '\n')) != NULL)
- {
- *p = '\0';
- if (strlen (m) + strlen (ruby_buffer_output) > 0)
- ruby_plugin->print_server (ruby_plugin,
- "Ruby stdout/stderr : %s%s",
- ruby_buffer_output, m);
- *p = '\n';
- ruby_buffer_output[0] = '\0';
- m = ++p;
- }
-
- if (strlen(m) + strlen(ruby_buffer_output) > sizeof(ruby_buffer_output))
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby stdout/stderr : %s%s",
- ruby_buffer_output, m);
- ruby_buffer_output[0] = '\0';
- }
- else
- strcat (ruby_buffer_output, m);
-
- if (msg)
- free (msg);
-
- return Qnil;
-}
-
-/*
- * weechat_ruby_output_flush : just for compatibility
- */
-
-static VALUE
-weechat_ruby_output_flush(VALUE self)
-{
- /* make C compiler happy */
- (void) self;
-
- return Qnil;
-}
-
-
-/*
- * weechat_ruby_load: load a Ruby script
- */
-
-int
-weechat_ruby_load (t_weechat_plugin *plugin, char *filename)
-{
- char modname[64];
- VALUE curModule, ruby_retcode, err;
- int ruby_error;
- struct stat buf;
-
- plugin->print_server (plugin, "Loading Ruby script \"%s\"", filename);
-
- if (stat (filename, &buf) != 0)
- {
- plugin->print_server (plugin, "Ruby error: script \"%s\" not found",
- filename);
- return 0;
- }
-
- ruby_current_script = NULL;
-
- snprintf(modname, sizeof(modname), "%s%d", MOD_NAME_PREFIX, ruby_num);
- ruby_num++;
-
- curModule = rb_define_module(modname);
-
- ruby_current_script_filename = filename;
-
- ruby_retcode = rb_protect_funcall (curModule, rb_intern("load_eval_file"),
- &ruby_error, 1, rb_str_new2(filename));
-
- if (ruby_retcode == Qnil) {
- err = rb_inspect(rb_gv_get("$!"));
- ruby_plugin->print_server (ruby_plugin, "Ruby error: \"%s\"", STR2CSTR(err));
- return 0;
- }
-
- if (NUM2INT(ruby_retcode) != 0)
- {
- VALUE ruby_eval_error;
-
- switch (NUM2INT(ruby_retcode))
- {
- case 1:
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to read file \"%s\"",
- filename);
- break;
- case 2:
-
-
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: error while loading file \"%s\"",
- filename);
- break;
- case 3:
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to find \"weechat_init\" function in file \"%s\"",
- filename);
- break;
- }
-
- if (NUM2INT(ruby_retcode) == 1 || NUM2INT(ruby_retcode) == 2)
- {
- ruby_eval_error = rb_iv_get(curModule, "@load_eval_file_error");
- if (ruby_eval_error)
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: %s", STR2CSTR(ruby_eval_error));
- }
-
- return 0;
- }
-
- ruby_retcode = rb_protect_funcall (curModule, rb_intern("weechat_init"), &ruby_error, 0);
-
- if (ruby_error)
- {
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to eval weechat_init in file \"%s\"",
- filename);
-
- err = rb_inspect(rb_gv_get("$!"));
- ruby_plugin->print_server (ruby_plugin, "Ruby error: \"%s\"", STR2CSTR(err));
-
- if (ruby_current_script != NULL)
- weechat_script_remove (plugin, &ruby_scripts, ruby_current_script);
- return 0;
- }
-
- if (ruby_current_script == NULL) {
- plugin->print_server (plugin,
- "Ruby error: function \"register\" not found "
- "(or failed) in file \"%s\"",
- filename);
- return 0;
- }
-
- ruby_current_script->interpreter = (VALUE *) curModule;
- rb_gc_register_address (ruby_current_script->interpreter);
-
- return 1;
-}
-
-/*
- * weechat_ruby_unload: unload a Ruby script
- */
-
-void
-weechat_ruby_unload (t_weechat_plugin *plugin, t_plugin_script *script)
-{
- int *r;
-
- plugin->print_server (plugin,
- "Unloading Ruby script \"%s\"",
- script->name);
-
- if (script->shutdown_func && script->shutdown_func[0])
- {
- r = (int *) weechat_ruby_exec (plugin, script, SCRIPT_EXEC_INT,
- script->shutdown_func, NULL, NULL, NULL);
- if (r)
- free (r);
- }
-
- if (script->interpreter)
- rb_gc_unregister_address (script->interpreter);
-
- weechat_script_remove (plugin, &ruby_scripts, script);
-}
-
-/*
- * weechat_ruby_unload_name: unload a Ruby script by name
- */
-
-void
-weechat_ruby_unload_name (t_weechat_plugin *plugin, char *name)
-{
- t_plugin_script *ptr_script;
-
- ptr_script = weechat_script_search (plugin, &ruby_scripts, name);
- if (ptr_script)
- {
- weechat_ruby_unload (plugin, ptr_script);
- plugin->print_server (plugin,
- "Ruby script \"%s\" unloaded",
- name);
- }
- else
- {
- plugin->print_server (plugin,
- "Ruby error: script \"%s\" not loaded",
- name);
- }
-}
-
-/*
- * weechat_ruby_unload_all: unload all Ruby scripts
- */
-
-void
-weechat_ruby_unload_all (t_weechat_plugin *plugin)
-{
-
- plugin->print_server (plugin,
- "Unloading all Ruby scripts");
- while (ruby_scripts)
- weechat_ruby_unload (plugin, ruby_scripts);
-
- plugin->print_server (plugin,
- "Ruby scripts unloaded");
-}
-
-/*
- * weechat_ruby_cmd: /ruby command handler
- */
-
-int
-weechat_ruby_cmd (t_weechat_plugin *plugin,
- int cmd_argc, char **cmd_argv,
- char *handler_args, void *handler_pointer)
-{
- int argc, handler_found, modifier_found;
- char **argv, *path_script;
- t_plugin_script *ptr_script;
- t_plugin_handler *ptr_handler;
- t_plugin_modifier *ptr_modifier;
-
- /* make C compiler happy */
- (void) handler_args;
- (void) handler_pointer;
-
- if (cmd_argc < 3)
- return PLUGIN_RC_KO;
-
- if (cmd_argv[2])
- argv = plugin->explode_string (plugin, cmd_argv[2], " ", 0, &argc);
- else
- {
- argv = NULL;
- argc = 0;
- }
-
- switch (argc)
- {
- case 0:
- /* list registered Ruby scripts */
- plugin->print_server (plugin, "");
- plugin->print_server (plugin, "Registered Ruby scripts:");
- if (ruby_scripts)
- {
- for (ptr_script = ruby_scripts;
- ptr_script; ptr_script = ptr_script->next_script)
- {
- plugin->print_server (plugin, " %s v%s%s%s",
- ptr_script->name,
- ptr_script->version,
- (ptr_script->description[0]) ? " - " : "",
- ptr_script->description);
- }
- }
- else
- plugin->print_server (plugin, " (none)");
-
- /* list Ruby message handlers */
- plugin->print_server (plugin, "");
- plugin->print_server (plugin, "Ruby message handlers:");
- handler_found = 0;
- for (ptr_handler = plugin->handlers;
- ptr_handler; ptr_handler = ptr_handler->next_handler)
- {
- if ((ptr_handler->type == PLUGIN_HANDLER_MESSAGE)
- && (ptr_handler->handler_args))
- {
- handler_found = 1;
- plugin->print_server (plugin, " IRC(%s) => Ruby(%s)",
- ptr_handler->irc_command,
- ptr_handler->handler_args);
- }
- }
- if (!handler_found)
- plugin->print_server (plugin, " (none)");
-
- /* list Ruby command handlers */
- plugin->print_server (plugin, "");
- plugin->print_server (plugin, "Ruby command handlers:");
- handler_found = 0;
- for (ptr_handler = plugin->handlers;
- ptr_handler; ptr_handler = ptr_handler->next_handler)
- {
- if ((ptr_handler->type == PLUGIN_HANDLER_COMMAND)
- && (ptr_handler->handler_args))
- {
- handler_found = 1;
- plugin->print_server (plugin, " /%s => Ruby(%s)",
- ptr_handler->command,
- ptr_handler->handler_args);
- }
- }
- if (!handler_found)
- plugin->print_server (plugin, " (none)");
-
- /* list Ruby timer handlers */
- plugin->print_server (plugin, "");
- plugin->print_server (plugin, "Ruby timer handlers:");
- handler_found = 0;
- for (ptr_handler = plugin->handlers;
- ptr_handler; ptr_handler = ptr_handler->next_handler)
- {
- if ((ptr_handler->type == PLUGIN_HANDLER_TIMER)
- && (ptr_handler->handler_args))
- {
- handler_found = 1;
- plugin->print_server (plugin, " %d seconds => Ruby(%s)",
- ptr_handler->interval,
- ptr_handler->handler_args);
- }
- }
- if (!handler_found)
- plugin->print_server (plugin, " (none)");
-
- /* list Ruby keyboard handlers */
- plugin->print_server (plugin, "");
- plugin->print_server (plugin, "Ruby keyboard handlers:");
- handler_found = 0;
- for (ptr_handler = plugin->handlers;
- ptr_handler; ptr_handler = ptr_handler->next_handler)
- {
- if ((ptr_handler->type == PLUGIN_HANDLER_KEYBOARD)
- && (ptr_handler->handler_args))
- {
- handler_found = 1;
- plugin->print_server (plugin, " Ruby(%s)",
- ptr_handler->handler_args);
- }
- }
- if (!handler_found)
- plugin->print_server (plugin, " (none)");
-
- /* list Ruby event handlers */
- plugin->print_server (plugin, "");
- plugin->print_server (plugin, "Ruby event handlers:");
- handler_found = 0;
- for (ptr_handler = plugin->handlers;
- ptr_handler; ptr_handler = ptr_handler->next_handler)
- {
- if ((ptr_handler->type == PLUGIN_HANDLER_EVENT)
- && (ptr_handler->handler_args))
- {
- handler_found = 1;
- plugin->print_server (plugin, " %s => Ruby(%s)",
- ptr_handler->event,
- ptr_handler->handler_args);
- }
- }
- if (!handler_found)
- plugin->print_server (plugin, " (none)");
-
- /* list Ruby modifiers */
- plugin->print_server (plugin, "");
- plugin->print_server (plugin, "Ruby modifiers:");
- modifier_found = 0;
- for (ptr_modifier = plugin->modifiers;
- ptr_modifier; ptr_modifier = ptr_modifier->next_modifier)
- {
- modifier_found = 1;
- if (ptr_modifier->type == PLUGIN_MODIFIER_IRC_IN)
- plugin->print_server (plugin, " IRC(%s, %s) => Ruby(%s)",
- ptr_modifier->command,
- PLUGIN_MODIFIER_IRC_IN_STR,
- ptr_modifier->modifier_args);
- else if (ptr_modifier->type == PLUGIN_MODIFIER_IRC_USER)
- plugin->print_server (plugin, " IRC(%s, %s) => Ruby(%s)",
- ptr_modifier->command,
- PLUGIN_MODIFIER_IRC_USER_STR,
- ptr_modifier->modifier_args);
- else if (ptr_modifier->type == PLUGIN_MODIFIER_IRC_OUT)
- plugin->print_server (plugin, " IRC(%s, %s) => Ruby(%s)",
- ptr_modifier->command,
- PLUGIN_MODIFIER_IRC_OUT_STR,
- ptr_modifier->modifier_args);
- }
- if (!modifier_found)
- plugin->print_server (plugin, " (none)");
- break;
- case 1:
- if (plugin->strcasecmp (plugin, argv[0], "autoload") == 0)
- weechat_script_auto_load (plugin, "ruby", weechat_ruby_load);
- else if (plugin->strcasecmp (plugin, argv[0], "reload") == 0)
- {
- weechat_ruby_unload_all (plugin);
- weechat_script_auto_load (plugin, "ruby", weechat_ruby_load);
- }
- else if (plugin->strcasecmp (plugin, argv[0], "unload") == 0)
- weechat_ruby_unload_all (plugin);
- break;
- case 2:
- if (plugin->strcasecmp (plugin, argv[0], "load") == 0)
- {
- /* load Ruby script */
- path_script = weechat_script_search_full_name (plugin, "ruby", argv[1]);
- weechat_ruby_load (plugin, (path_script) ? path_script : argv[1]);
- if (path_script)
- free (path_script);
- }
- else if (plugin->strcasecmp (plugin, argv[0], "unload") == 0)
- {
- /* unload Ruby script */
- weechat_ruby_unload_name (plugin, argv[1]);
- }
- else
- {
- plugin->print_server (plugin,
- "Ruby error: unknown option for "
- "\"ruby\" command");
- }
- break;
- default:
- plugin->print_server (plugin,
- "Ruby error: wrong argument count for \"ruby\" command");
- }
-
- if (argv)
- plugin->free_exploded_string (plugin, argv);
-
- return PLUGIN_RC_OK;
-}
-
-/*
- * weechat_plugin_init: initialize Ruby plugin
- */
-
-int
-weechat_plugin_init (t_weechat_plugin *plugin)
-{
- int ruby_error;
- char *weechat_ruby_code =
- {
- "$stdout = WeechatOutputs\n"
- "$stderr = WeechatOutputs\n"
- "\n"
- "class Module\n"
- " @load_eval_file_error = ''\n"
- "\n"
- " def load_eval_file (file)\n"
- " lines = ''\n"
- " begin\n"
- " f = File.open(file, 'r')\n"
- " lines = f.readlines.join\n"
- " rescue => e\n"
- " @load_eval_file_error = e\n"
- " return 1\n"
- " end\n"
- "\n"
- " begin\n"
- " module_eval(lines)\n"
- " rescue => e\n"
- " @load_eval_file_error = e\n"
- " return 2\n"
- " end\n"
- "\n"
- " has_init = false\n"
- "\n"
- " instance_methods.each do |meth|\n"
- " if meth == 'weechat_init'\n"
- " has_init = true\n"
- " end\n"
- " module_eval('module_function :' + meth)\n"
- " end\n"
- "\n"
- " unless has_init\n"
- " return 3\n"
- " end\n"
- "\n"
- " return 0\n"
- " end\n"
- "end\n"
- };
- ruby_plugin = plugin;
- ruby_error = 0;
-
- plugin->print_server (plugin, "Loading Ruby module \"weechat\"");
-
- /* init stdout/stderr buffer */
- ruby_buffer_output[0] = '\0';
-
- ruby_init ();
- ruby_init_loadpath ();
- ruby_script ("__weechat_plugin__");
-
- ruby_mWeechat = rb_define_module("Weechat");
- rb_define_const(ruby_mWeechat, "PLUGIN_RC_OK", INT2NUM(PLUGIN_RC_OK));
- rb_define_const(ruby_mWeechat, "PLUGIN_RC_KO", INT2NUM(PLUGIN_RC_KO));
- rb_define_const(ruby_mWeechat, "PLUGIN_RC_OK_IGNORE_WEECHAT", INT2NUM(PLUGIN_RC_OK_IGNORE_WEECHAT));
- rb_define_const(ruby_mWeechat, "PLUGIN_RC_OK_IGNORE_PLUGINS", INT2NUM(PLUGIN_RC_OK_IGNORE_PLUGINS));
- rb_define_const(ruby_mWeechat, "PLUGIN_RC_OK_IGNORE_ALL", INT2NUM(PLUGIN_RC_OK_IGNORE_ALL));
- rb_define_const(ruby_mWeechat, "PLUGIN_RC_OK_WITH_HIGHLIGHT", INT2NUM(PLUGIN_RC_OK_WITH_HIGHLIGHT));
- rb_define_module_function (ruby_mWeechat, "register", weechat_ruby_register, -1);
- rb_define_module_function (ruby_mWeechat, "set_charset", weechat_ruby_set_charset, 1);
- rb_define_module_function (ruby_mWeechat, "print", weechat_ruby_print, -1);
- rb_define_module_function (ruby_mWeechat, "print_server", weechat_ruby_print_server, 1);
- rb_define_module_function (ruby_mWeechat, "print_infobar", weechat_ruby_print_infobar, 2);
- rb_define_module_function (ruby_mWeechat, "remove_infobar", weechat_ruby_remove_infobar, -1);
- rb_define_module_function (ruby_mWeechat, "log", weechat_ruby_log, -1);
- rb_define_module_function (ruby_mWeechat, "command", weechat_ruby_command, -1);
- rb_define_module_function (ruby_mWeechat, "add_message_handler", weechat_ruby_add_message_handler, 2);
- rb_define_module_function (ruby_mWeechat, "add_command_handler", weechat_ruby_add_command_handler, -1);
- rb_define_module_function (ruby_mWeechat, "add_timer_handler", weechat_ruby_add_timer_handler, 2);
- rb_define_module_function (ruby_mWeechat, "add_keyboard_handler", weechat_ruby_add_keyboard_handler, 1);
- rb_define_module_function (ruby_mWeechat, "add_event_handler", weechat_ruby_add_event_handler, 2);
- rb_define_module_function (ruby_mWeechat, "remove_handler", weechat_ruby_remove_handler, 2);
- rb_define_module_function (ruby_mWeechat, "remove_timer_handler", weechat_ruby_remove_timer_handler, 1);
- rb_define_module_function (ruby_mWeechat, "remove_keyboard_handler", weechat_ruby_remove_keyboard_handler, 1);
- rb_define_module_function (ruby_mWeechat, "remove_event_handler", weechat_ruby_remove_event_handler, 1);
- rb_define_module_function (ruby_mWeechat, "add_modifier", weechat_ruby_add_modifier, 3);
- rb_define_module_function (ruby_mWeechat, "remove_modifier", weechat_ruby_remove_modifier, 3);
- rb_define_module_function (ruby_mWeechat, "get_info", weechat_ruby_get_info, -1);
- rb_define_module_function (ruby_mWeechat, "get_dcc_info", weechat_ruby_get_dcc_info, 0);
- rb_define_module_function (ruby_mWeechat, "get_config", weechat_ruby_get_config, 1);
- rb_define_module_function (ruby_mWeechat, "set_config", weechat_ruby_set_config, 2);
- rb_define_module_function (ruby_mWeechat, "get_plugin_config", weechat_ruby_get_plugin_config, 1);
- rb_define_module_function (ruby_mWeechat, "set_plugin_config", weechat_ruby_set_plugin_config, 2);
- rb_define_module_function (ruby_mWeechat, "get_server_info", weechat_ruby_get_server_info, 0);
- rb_define_module_function (ruby_mWeechat, "get_channel_info", weechat_ruby_get_channel_info, 1);
- rb_define_module_function (ruby_mWeechat, "get_nick_info", weechat_ruby_get_nick_info, 2);
- rb_define_module_function (ruby_mWeechat, "get_irc_color", weechat_ruby_get_irc_color, 1);
- rb_define_module_function (ruby_mWeechat, "get_window_info", weechat_ruby_get_window_info, 0);
- rb_define_module_function (ruby_mWeechat, "get_buffer_info", weechat_ruby_get_buffer_info, 0);
- rb_define_module_function (ruby_mWeechat, "get_buffer_data", weechat_ruby_get_buffer_data, 2);
-
- /* redirect stdin and stdout */
- ruby_mWeechatOutputs = rb_define_module("WeechatOutputs");
- rb_define_singleton_method(ruby_mWeechatOutputs, "write", weechat_ruby_output, 1);
- rb_define_singleton_method(ruby_mWeechatOutputs, "puts", weechat_ruby_output, 1);
- rb_define_singleton_method(ruby_mWeechatOutputs, "p", weechat_ruby_output, 1);
- rb_define_singleton_method(ruby_mWeechatOutputs, "flush", weechat_ruby_output_flush, 0);
-
-
- plugin->cmd_handler_add (plugin, "ruby",
- "list/load/unload Ruby scripts",
- "[load filename] | [autoload] | [reload] | [unload [script]]",
- "filename: Ruby script (file) to load\n"
- "script: script name to unload\n\n"
- "Without argument, /ruby command lists all loaded Ruby scripts.",
- "load|autoload|reload|unload %f",
- weechat_ruby_cmd, NULL, NULL);
-
- plugin->mkdir_home (plugin, "ruby");
- plugin->mkdir_home (plugin, "ruby/autoload");
-
- rb_eval_string_protect(weechat_ruby_code, &ruby_error);
- if (ruby_error) {
- VALUE ruby_error_info = rb_inspect(ruby_errinfo);
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: unable to eval weechat ruby internal code");
- ruby_plugin->print_server (ruby_plugin,
- "Ruby error: %s", STR2CSTR(ruby_error_info));
- return PLUGIN_RC_KO;
- }
-
- script_init (weechat_ruby_plugin);
- weechat_script_auto_load (plugin, "ruby", weechat_ruby_load);
-
- /* init ok */
- return PLUGIN_RC_OK;
-}
-
-/*
- * weechat_plugin_end: shutdown Ruby interface
- */
-
-void
-weechat_plugin_end (t_weechat_plugin *plugin)
-{
- /* unload all scripts */
- weechat_ruby_unload_all (plugin);
-
- ruby_finalize();
-
- ruby_plugin->print_server (ruby_plugin,
- "Ruby plugin ended");
-}
diff --git a/src/plugins/scripts/ruby/weechat-ruby-api.c b/src/plugins/scripts/ruby/weechat-ruby-api.c
new file mode 100644
index 000000000..1f244f59e
--- /dev/null
+++ b/src/plugins/scripts/ruby/weechat-ruby-api.c
@@ -0,0 +1,2817 @@
+/*
+ * Copyright (c) 2003-2008 by FlashCode <flashcode@flashtux.org>
+ * See README for License detail, AUTHORS for developers list.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/* weechat-ruby-api.c: Ruby API functions */
+
+#undef _
+
+#include <ruby.h>
+//#include <stdio.h>
+//#include <stdlib.h>
+//#include <string.h>
+//#include <stdarg.h>
+//#include <time.h>
+//#include <sys/socket.h>
+//#include <netinet/in.h>
+//#include <arpa/inet.h>
+//#include <sys/types.h>
+//#include <sys/stat.h>
+
+#include "../../weechat-plugin.h"
+#include "../script.h"
+#include "../script-api.h"
+#include "../script-callback.h"
+#include "weechat-ruby.h"
+
+
+#define RUBY_RETURN_OK return INT2FIX (1);
+#define RUBY_RETURN_ERROR return INT2FIX (0);
+#define RUBY_RETURN_EMPTY return Qnil;
+#define RUBY_RETURN_STRING(__string) \
+ if (__string) \
+ return rb_str_new2 (__string); \
+ return rb_str_new2 ("");
+#define RUBY_RETURN_STRING_FREE(__string) \
+ if (__string) \
+ { \
+ return_value = rb_str_new2 (__string); \
+ free (__string); \
+ return return_value; \
+ } \
+ return rb_str_new2 ("");
+
+
+/*
+ * weechat_ruby_api_register: startup function for all WeeChat Ruby scripts
+ */
+
+static VALUE
+weechat_ruby_api_register (VALUE class, VALUE name, VALUE author,
+ VALUE version, VALUE license, VALUE description,
+ VALUE shutdown_func, VALUE charset)
+{
+ char *c_name, *c_author, *c_version, *c_license, *c_description;
+ char *c_shutdown_func, *c_charset;
+
+ /* make C compiler happy */
+ (void) class;
+
+ ruby_current_script = NULL;
+
+ c_name = NULL;
+ c_author = NULL;
+ c_version = NULL;
+ c_license = NULL;
+ c_description = NULL;
+ c_shutdown_func = NULL;
+ c_charset = NULL;
+
+ if (NIL_P (name) || NIL_P (author) || NIL_P (version)
+ || NIL_P (license) || NIL_P (description) || NIL_P (shutdown_func)
+ || NIL_P (charset))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("register");
+ return INT2FIX (0);
+ }
+
+ Check_Type (name, T_STRING);
+ Check_Type (author, T_STRING);
+ Check_Type (version, T_STRING);
+ Check_Type (license, T_STRING);
+ Check_Type (description, T_STRING);
+ Check_Type (shutdown_func, T_STRING);
+ Check_Type (charset, T_STRING);
+
+ c_name = STR2CSTR (name);
+ c_author = STR2CSTR (author);
+ c_version = STR2CSTR (version);
+ c_license = STR2CSTR (license);
+ c_description = STR2CSTR (description);
+ c_shutdown_func = STR2CSTR (shutdown_func);
+ c_charset = STR2CSTR (charset);
+
+ if (script_search (weechat_ruby_plugin, ruby_scripts, c_name))
+ {
+ /* error: another scripts already exists with this name! */
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: unable to register script "
+ "\"%s\" (another script already "
+ "exists with this name)"),
+ weechat_prefix ("error"), "ruby", c_name);
+ RUBY_RETURN_ERROR;
+ }
+
+ /* register script */
+ ruby_current_script = script_add (weechat_ruby_plugin,
+ &ruby_scripts,
+ (ruby_current_script_filename) ?
+ ruby_current_script_filename : "",
+ c_name, c_author, c_version, c_license,
+ c_description, c_shutdown_func,
+ c_charset);
+
+ if (ruby_current_script)
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: registered script \"%s\", "
+ "version %s (%s)"),
+ weechat_prefix ("info"), "ruby",
+ c_name, c_version, c_description);
+ }
+ else
+ {
+ RUBY_RETURN_ERROR;
+ }
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_charset_set: set script charset
+ */
+
+static VALUE
+weechat_ruby_api_charset_set (VALUE class, VALUE charset)
+{
+ char *c_charset;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("charset_set");
+ RUBY_RETURN_ERROR;
+ }
+
+ c_charset = NULL;
+
+ if (NIL_P (charset))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("charset_set");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (charset, T_STRING);
+
+ c_charset = STR2CSTR (charset);
+
+ script_api_charset_set (ruby_current_script, c_charset);
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_iconv_to_internal: convert string to internal WeeChat charset
+ */
+
+static VALUE
+weechat_ruby_api_iconv_to_internal (VALUE class, VALUE charset, VALUE string)
+{
+ char *c_charset, *c_string, *result;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("iconv_to_internal");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_charset = NULL;
+ c_string = NULL;
+
+ if (NIL_P (charset) || NIL_P (string))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("iconv_to_internal");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (charset, T_STRING);
+ Check_Type (string, T_STRING);
+
+ c_charset = STR2CSTR (charset);
+ c_string = STR2CSTR (string);
+
+ result = weechat_iconv_to_internal (c_charset, c_string);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_iconv_from_internal: convert string from WeeChat internal
+ * charset to another one
+ */
+
+static VALUE
+weechat_ruby_api_iconv_from_internal (VALUE class, VALUE charset, VALUE string)
+{
+ char *c_charset, *c_string, *result;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("iconv_from_internal");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_charset = NULL;
+ c_string = NULL;
+
+ if (NIL_P (charset) || NIL_P (string))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("iconv_from_internal");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (charset, T_STRING);
+ Check_Type (string, T_STRING);
+
+ c_charset = STR2CSTR (charset);
+ c_string = STR2CSTR (string);
+
+ result = weechat_iconv_from_internal (c_charset, c_string);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_mkdir_home: create a directory in WeeChat home
+ */
+
+static VALUE
+weechat_ruby_api_mkdir_home (VALUE class, VALUE directory, VALUE mode)
+{
+ char *c_directory;
+ int c_mode;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("mkdir_home");
+ RUBY_RETURN_ERROR;
+ }
+
+ c_directory = NULL;
+ c_mode = 0;
+
+ if (NIL_P (directory) || NIL_P (mode))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("mkdir_home");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (directory, T_STRING);
+ Check_Type (mode, T_FIXNUM);
+
+ c_directory = STR2CSTR (directory);
+ c_mode = FIX2INT (mode);
+
+ if (weechat_mkdir_home (c_directory, c_mode))
+ RUBY_RETURN_OK;
+
+ RUBY_RETURN_ERROR;
+}
+
+/*
+ * weechat_ruby_api_mkdir: create a directory
+ */
+
+static VALUE
+weechat_ruby_api_mkdir (VALUE class, VALUE directory, VALUE mode)
+{
+ char *c_directory;
+ int c_mode;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("mkdir");
+ RUBY_RETURN_ERROR;
+ }
+
+ c_directory = NULL;
+ c_mode = 0;
+
+ if (NIL_P (directory) || NIL_P (mode))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("mkdir");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (directory, T_STRING);
+ Check_Type (mode, T_FIXNUM);
+
+ c_directory = STR2CSTR (directory);
+ c_mode = FIX2INT (mode);
+
+ if (weechat_mkdir (c_directory, c_mode))
+ RUBY_RETURN_OK;
+
+ RUBY_RETURN_ERROR;
+}
+
+/*
+ * weechat_ruby_api_prefix: get a prefix, used for display
+ */
+
+static VALUE
+weechat_ruby_api_prefix (VALUE class, VALUE prefix)
+{
+ char *c_prefix, *result;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("prefix");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_prefix = NULL;
+
+ if (NIL_P (prefix))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("prefix");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (prefix, T_STRING);
+
+ c_prefix = STR2CSTR (prefix);
+
+ result = weechat_prefix (c_prefix);
+ RUBY_RETURN_STRING(result);
+}
+
+/*
+ * weechat_ruby_api_color: get a color code, used for display
+ */
+
+static VALUE
+weechat_ruby_api_color (VALUE class, VALUE color)
+{
+ char *c_color, *result;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("color");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_color = NULL;
+
+ if (NIL_P (color))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("color");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (color, T_STRING);
+
+ c_color = STR2CSTR (color);
+
+ result = weechat_color (c_color);
+ RUBY_RETURN_STRING(result);
+}
+
+/*
+ * weechat_ruby_api_print: print message into a buffer (current or specified one)
+ */
+
+static VALUE
+weechat_ruby_api_print (VALUE class, VALUE buffer, VALUE message)
+{
+ char *c_buffer, *c_message;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("print");
+ RUBY_RETURN_ERROR;
+ }
+
+ c_buffer = NULL;
+ c_message = NULL;
+
+ if (NIL_P (buffer) || NIL_P (message))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("print");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (message, T_STRING);
+
+ c_buffer = STR2CSTR (buffer);
+ c_message = STR2CSTR (message);
+
+ script_api_printf (weechat_ruby_plugin,
+ ruby_current_script,
+ script_string_to_pointer (c_buffer),
+ "%s", c_message);
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_infobar_print: print message to infobar
+ */
+
+static VALUE
+weechat_ruby_api_infobar_print (VALUE class, VALUE delay, VALUE color,
+ VALUE message)
+{
+ int c_delay;
+ char *c_color, *c_message;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("infobar_print");
+ RUBY_RETURN_ERROR;
+ }
+
+ c_delay = 1;
+ c_color = NULL;
+ c_message = NULL;
+
+ if (NIL_P (delay) || NIL_P (color) || NIL_P (message))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("infobar_print");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (delay, T_FIXNUM);
+ Check_Type (color, T_STRING);
+ Check_Type (message, T_STRING);
+
+ c_delay = FIX2INT (delay);
+ c_color = STR2CSTR (color);
+ c_message = STR2CSTR (message);
+
+ script_api_infobar_printf (weechat_ruby_plugin,
+ ruby_current_script,
+ c_delay, c_color, "%s", c_message);
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_infobar_remove: remove message(s) from infobar
+ */
+
+static VALUE
+weechat_ruby_api_infobar_remove (int argc, VALUE *argv, VALUE class)
+{
+ VALUE how_many;
+ int c_how_many;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("infobar_remove");
+ RUBY_RETURN_ERROR;
+ }
+
+ how_many = Qnil;
+
+ rb_scan_args (argc, argv, "01", &how_many);
+
+ if (!NIL_P (how_many))
+ {
+ Check_Type (how_many, T_FIXNUM);
+ c_how_many = FIX2INT (how_many);
+ }
+ else
+ c_how_many = 0;
+
+ weechat_infobar_remove (c_how_many);
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_log_print: print message in WeeChat log file
+ */
+
+static VALUE
+weechat_ruby_api_log_print (VALUE class, VALUE message)
+{
+ char *c_message;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("log_print");
+ RUBY_RETURN_ERROR;
+ }
+
+ c_message = NULL;
+
+ if (NIL_P (message))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("log_print");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (message, T_STRING);
+
+ c_message = STR2CSTR (message);
+
+ script_api_log_printf (weechat_ruby_plugin,
+ ruby_current_script,
+ "%s", c_message);
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_hook_command_cb: callback for command hooked
+ */
+
+int
+weechat_ruby_api_hook_command_cb (void *data, struct t_gui_buffer *buffer,
+ int argc, char **argv, char **argv_eol)
+{
+ struct t_script_callback *script_callback;
+ char *ruby_argv[3], empty_arg[1] = { '\0' };
+ int *rc, ret;
+
+ /* make C compiler happy */
+ (void) argv;
+
+ script_callback = (struct t_script_callback *)data;
+
+ ruby_argv[0] = script_pointer_to_string (buffer);
+ ruby_argv[1] = (argc > 1) ? argv_eol[1] : empty_arg;
+ ruby_argv[2] = NULL;
+
+ rc = (int *) weechat_ruby_exec (script_callback->script,
+ WEECHAT_SCRIPT_EXEC_INT,
+ script_callback->function,
+ ruby_argv);
+
+ if (!rc)
+ ret = WEECHAT_RC_ERROR;
+ else
+ {
+ ret = *rc;
+ free (rc);
+ }
+ if (ruby_argv[0])
+ free (ruby_argv[0]);
+
+ return ret;
+}
+
+/*
+ * weechat_ruby_api_hook_command: hook a command
+ */
+
+static VALUE
+weechat_ruby_api_hook_command (VALUE class, VALUE command, VALUE description,
+ VALUE args, VALUE args_description,
+ VALUE completion, VALUE function)
+{
+ char *c_command, *c_description, *c_args, *c_args_description;
+ char *c_completion, *c_function, *result;
+ struct t_hook *new_hook;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("hook_command");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_command = NULL;
+ c_description = NULL;
+ c_args = NULL;
+ c_args_description = NULL;
+ c_completion = NULL;
+ c_function = NULL;
+
+ if (NIL_P (command) || NIL_P (description) || NIL_P (args)
+ || NIL_P (args_description) || NIL_P (completion) || NIL_P (function))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("hook_command");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (command, T_STRING);
+ Check_Type (description, T_STRING);
+ Check_Type (args, T_STRING);
+ Check_Type (args_description, T_STRING);
+ Check_Type (completion, T_STRING);
+ Check_Type (function, T_STRING);
+
+ c_command = STR2CSTR (command);
+ c_description = STR2CSTR (description);
+ c_args = STR2CSTR (args);
+ c_args_description = STR2CSTR (args_description);
+ c_completion = STR2CSTR (completion);
+ c_function = STR2CSTR (function);
+
+ new_hook = script_api_hook_command (weechat_ruby_plugin,
+ ruby_current_script,
+ c_command,
+ c_description,
+ c_args,
+ c_args_description,
+ c_completion,
+ &weechat_ruby_api_hook_command_cb,
+ c_function);
+
+ result = script_pointer_to_string (new_hook);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_hook_timer_cb: callback for timer hooked
+ */
+
+int
+weechat_ruby_api_hook_timer_cb (void *data)
+{
+ struct t_script_callback *script_callback;
+ char *ruby_argv[1] = { NULL };
+ int *rc, ret;
+
+ script_callback = (struct t_script_callback *)data;
+
+ rc = (int *) weechat_ruby_exec (script_callback->script,
+ WEECHAT_SCRIPT_EXEC_INT,
+ script_callback->function,
+ ruby_argv);
+
+ if (!rc)
+ ret = WEECHAT_RC_ERROR;
+ else
+ {
+ ret = *rc;
+ free (rc);
+ }
+
+ return ret;
+}
+
+/*
+ * weechat_ruby_api_hook_timer: hook a timer
+ */
+
+static VALUE
+weechat_ruby_api_hook_timer (VALUE class, VALUE interval, VALUE align_second,
+ VALUE max_calls, VALUE function)
+{
+ int c_interval, c_align_second, c_max_calls;
+ char *c_function, *result;
+ struct t_hook *new_hook;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("hook_timer");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_interval = 0;
+ c_align_second = 0;
+ c_max_calls = 0;
+ c_function = NULL;
+
+ if (NIL_P (interval) || NIL_P (align_second) || NIL_P (max_calls)
+ || NIL_P (function))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("hook_timer");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (interval, T_FIXNUM);
+ Check_Type (align_second, T_FIXNUM);
+ Check_Type (max_calls, T_FIXNUM);
+ Check_Type (function, T_STRING);
+
+ c_interval = FIX2INT (interval);
+ c_align_second = FIX2INT (align_second);
+ c_max_calls = FIX2INT (max_calls);
+ c_function = STR2CSTR (function);
+
+ new_hook = script_api_hook_timer (weechat_ruby_plugin,
+ ruby_current_script,
+ c_interval,
+ c_align_second,
+ c_max_calls,
+ &weechat_ruby_api_hook_timer_cb,
+ c_function);
+
+ result = script_pointer_to_string (new_hook);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_hook_fd_cb: callback for fd hooked
+ */
+
+int
+weechat_ruby_api_hook_fd_cb (void *data)
+{
+ struct t_script_callback *script_callback;
+ char *ruby_argv[1] = { NULL };
+ int *rc, ret;
+
+ script_callback = (struct t_script_callback *)data;
+
+ rc = (int *) weechat_ruby_exec (script_callback->script,
+ WEECHAT_SCRIPT_EXEC_INT,
+ script_callback->function,
+ ruby_argv);
+
+ if (!rc)
+ ret = WEECHAT_RC_ERROR;
+ else
+ {
+ ret = *rc;
+ free (rc);
+ }
+
+ return ret;
+}
+
+/*
+ * weechat_ruby_api_hook_fd: hook a fd
+ */
+
+static VALUE
+weechat_ruby_api_hook_fd (VALUE class, VALUE fd, VALUE read, VALUE write,
+ VALUE exception, VALUE function)
+{
+ int c_fd, c_read, c_write, c_exception;
+ char *c_function, *result;
+ struct t_hook *new_hook;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("hook_fd");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_fd = 0;
+ c_read = 0;
+ c_write = 0;
+ c_exception = 0;
+ c_function = NULL;
+
+ if (NIL_P (fd) || NIL_P (read) || NIL_P (write) || NIL_P (exception)
+ || NIL_P (function))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("hook_fd");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (fd, T_FIXNUM);
+ Check_Type (read, T_FIXNUM);
+ Check_Type (write, T_FIXNUM);
+ Check_Type (exception, T_FIXNUM);
+ Check_Type (function, T_STRING);
+
+ c_fd = FIX2INT (fd);
+ c_read = FIX2INT (read);
+ c_write = FIX2INT (write);
+ c_exception = FIX2INT (exception);
+ c_function = STR2CSTR (function);
+
+ new_hook = script_api_hook_fd (weechat_ruby_plugin,
+ ruby_current_script,
+ c_fd,
+ c_read,
+ c_write,
+ c_exception,
+ &weechat_ruby_api_hook_fd_cb,
+ c_function);
+
+ result = script_pointer_to_string (new_hook);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_hook_print_cb: callback for print hooked
+ */
+
+int
+weechat_ruby_api_hook_print_cb (void *data, struct t_gui_buffer *buffer,
+ time_t date, char *prefix, char *message)
+{
+ struct t_script_callback *script_callback;
+ char *ruby_argv[5];
+ static char timebuffer[64];
+ int *rc, ret;
+
+ script_callback = (struct t_script_callback *)data;
+
+ snprintf (timebuffer, sizeof (timebuffer) - 1, "%ld", date);
+
+ ruby_argv[0] = script_pointer_to_string (buffer);
+ ruby_argv[1] = timebuffer;
+ ruby_argv[2] = prefix;
+ ruby_argv[3] = message;
+ ruby_argv[4] = NULL;
+
+ rc = (int *) weechat_ruby_exec (script_callback->script,
+ WEECHAT_SCRIPT_EXEC_INT,
+ script_callback->function,
+ ruby_argv);
+
+ if (!rc)
+ ret = WEECHAT_RC_ERROR;
+ else
+ {
+ ret = *rc;
+ free (rc);
+ }
+ if (ruby_argv[0])
+ free (ruby_argv[0]);
+
+ return ret;
+}
+
+/*
+ * weechat_ruby_api_hook_print: hook a print
+ */
+
+static VALUE
+weechat_ruby_api_hook_print (VALUE class, VALUE buffer, VALUE message,
+ VALUE strip_colors, VALUE function)
+{
+ char *c_buffer, *c_message, *c_function, *result;
+ int c_strip_colors;
+ struct t_hook *new_hook;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("hook_print");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_buffer = NULL;
+ c_message = NULL;
+ c_strip_colors = 0;
+ c_function = NULL;
+
+ if (NIL_P (buffer) || NIL_P (message) || NIL_P (strip_colors)
+ || NIL_P (function))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("hook_print");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (message, T_STRING);
+ Check_Type (strip_colors, T_FIXNUM);
+ Check_Type (function, T_STRING);
+
+ c_buffer = STR2CSTR (buffer);
+ c_message = STR2CSTR (message);
+ c_strip_colors = FIX2INT (strip_colors);
+ c_function = STR2CSTR (function);
+
+ new_hook = script_api_hook_print (weechat_ruby_plugin,
+ ruby_current_script,
+ script_string_to_pointer (c_buffer),
+ c_message,
+ c_strip_colors,
+ &weechat_ruby_api_hook_print_cb,
+ c_function);
+
+ result = script_pointer_to_string (new_hook);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_hook_signal_cb: callback for signal hooked
+ */
+
+int
+weechat_ruby_api_hook_signal_cb (void *data, char *signal, char *type_data,
+ void *signal_data)
+{
+ struct t_script_callback *script_callback;
+ char *ruby_argv[3];
+ static char value_str[64];
+ int *rc, ret, free_needed;
+
+ script_callback = (struct t_script_callback *)data;
+
+ ruby_argv[0] = signal;
+ free_needed = 0;
+ if (strcmp (type_data, WEECHAT_HOOK_SIGNAL_STRING) == 0)
+ {
+ ruby_argv[1] = (char *)signal_data;
+ }
+ else if (strcmp (type_data, WEECHAT_HOOK_SIGNAL_INT) == 0)
+ {
+ snprintf (value_str, sizeof (value_str) - 1,
+ "%d", *((int *)signal_data));
+ ruby_argv[1] = value_str;
+ }
+ else if (strcmp (type_data, WEECHAT_HOOK_SIGNAL_POINTER) == 0)
+ {
+ ruby_argv[1] = script_pointer_to_string (signal_data);
+ free_needed = 1;
+ }
+ else
+ ruby_argv[1] = NULL;
+ ruby_argv[2] = NULL;
+
+ rc = (int *) weechat_ruby_exec (script_callback->script,
+ WEECHAT_SCRIPT_EXEC_INT,
+ script_callback->function,
+ ruby_argv);
+
+ if (!rc)
+ ret = WEECHAT_RC_ERROR;
+ else
+ {
+ ret = *rc;
+ free (rc);
+ }
+ if (free_needed && ruby_argv[1])
+ free (ruby_argv[1]);
+
+ return ret;
+}
+
+/*
+ * weechat_ruby_api_hook_signal: hook a signal
+ */
+
+static VALUE
+weechat_ruby_api_hook_signal (VALUE class, VALUE signal, VALUE function)
+{
+ char *c_signal, *c_function, *result;
+ struct t_hook *new_hook;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("hook_signal");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_signal = NULL;
+ c_function = NULL;
+
+ if (NIL_P (signal) || NIL_P (function))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("hook_signal");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (signal, T_STRING);
+ Check_Type (function, T_STRING);
+
+ c_signal = STR2CSTR (signal);
+ c_function = STR2CSTR (function);
+
+ new_hook = script_api_hook_signal (weechat_ruby_plugin,
+ ruby_current_script,
+ c_signal,
+ &weechat_ruby_api_hook_signal_cb,
+ c_function);
+
+ result = script_pointer_to_string (new_hook);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_hook_signal_send: send a signal
+ */
+
+static VALUE
+weechat_ruby_api_hook_signal_send (VALUE class, VALUE signal, VALUE type_data,
+ VALUE signal_data)
+{
+ char *c_signal, *c_type_data, *c_signal_data;
+ int int_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("hook_signal_send");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_signal = NULL;
+ c_type_data = NULL;
+ c_signal_data = NULL;
+
+ if (NIL_P (signal) || NIL_P (type_data) || NIL_P (signal_data))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("hook_signal_send");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (signal, T_STRING);
+ Check_Type (type_data, T_STRING);
+
+ c_signal = STR2CSTR (signal);
+ c_type_data = STR2CSTR (type_data);
+
+ if (strcmp (c_type_data, WEECHAT_HOOK_SIGNAL_STRING) == 0)
+ {
+ Check_Type (signal_data, T_STRING);
+ c_signal_data = STR2CSTR (signal_data);
+ weechat_hook_signal_send (c_signal, c_type_data, c_signal_data);
+ RUBY_RETURN_OK;
+ }
+ else if (strcmp (c_type_data, WEECHAT_HOOK_SIGNAL_INT) == 0)
+ {
+ Check_Type (signal_data, T_STRING);
+ int_value = FIX2INT (signal_data);
+ weechat_hook_signal_send (c_signal, c_type_data, &int_value);
+ RUBY_RETURN_OK;
+ }
+ else if (strcmp (c_type_data, WEECHAT_HOOK_SIGNAL_POINTER) == 0)
+ {
+ Check_Type (signal_data, T_STRING);
+ c_signal_data = STR2CSTR (signal_data);
+ weechat_hook_signal_send (c_signal, c_type_data,
+ script_string_to_pointer (c_signal_data));
+ RUBY_RETURN_OK;
+ }
+
+ RUBY_RETURN_ERROR;
+}
+
+/*
+ * weechat_ruby_api_hook_config_cb: callback for config option hooked
+ */
+
+int
+weechat_ruby_api_hook_config_cb (void *data, char *type, char *option, char *value)
+{
+ struct t_script_callback *script_callback;
+ char *ruby_argv[4];
+ int *rc, ret;
+
+ script_callback = (struct t_script_callback *)data;
+
+ ruby_argv[0] = type;
+ ruby_argv[1] = option;
+ ruby_argv[2] = value;
+ ruby_argv[3] = NULL;
+
+ rc = (int *) weechat_ruby_exec (script_callback->script,
+ WEECHAT_SCRIPT_EXEC_INT,
+ script_callback->function,
+ ruby_argv);
+
+ if (!rc)
+ ret = WEECHAT_RC_ERROR;
+ else
+ {
+ ret = *rc;
+ free (rc);
+ }
+
+ return ret;
+}
+
+/*
+ * weechat_ruby_api_hook_config: hook a config option
+ */
+
+static VALUE
+weechat_ruby_api_hook_config (VALUE class, VALUE type, VALUE option, VALUE function)
+{
+ char *c_type, *c_option, *c_function, *result;
+ struct t_hook *new_hook;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("hook_config");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_type = NULL;
+ c_option = NULL;
+ c_function = NULL;
+
+ if (NIL_P (type) || NIL_P (option) || NIL_P (function))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("hook_config");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (type, T_STRING);
+ Check_Type (option, T_STRING);
+ Check_Type (function, T_STRING);
+
+ c_type = STR2CSTR (type);
+ c_option = STR2CSTR (option);
+ c_function = STR2CSTR (function);
+
+ new_hook = script_api_hook_config (weechat_ruby_plugin,
+ ruby_current_script,
+ c_type,
+ c_option,
+ &weechat_ruby_api_hook_config_cb,
+ c_function);
+
+ result = script_pointer_to_string (new_hook);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_hook_completion_cb: callback for completion hooked
+ */
+
+int
+weechat_ruby_api_hook_completion_cb (void *data, char *completion, struct t_gui_buffer *buffer,
+ struct t_weelist *list)
+{
+ struct t_script_callback *script_callback;
+ char *ruby_argv[4];
+ int *rc, ret;
+
+ script_callback = (struct t_script_callback *)data;
+
+ ruby_argv[0] = completion;
+ ruby_argv[1] = script_pointer_to_string (buffer);
+ ruby_argv[2] = script_pointer_to_string (list);
+ ruby_argv[3] = NULL;
+
+ rc = (int *) weechat_ruby_exec (script_callback->script,
+ WEECHAT_SCRIPT_EXEC_INT,
+ script_callback->function,
+ ruby_argv);
+
+ if (!rc)
+ ret = WEECHAT_RC_ERROR;
+ else
+ {
+ ret = *rc;
+ free (rc);
+ }
+ if (ruby_argv[1])
+ free (ruby_argv[1]);
+ if (ruby_argv[2])
+ free (ruby_argv[2]);
+
+ return ret;
+}
+
+/*
+ * weechat_ruby_api_hook_completion: hook a completion
+ */
+
+static VALUE
+weechat_ruby_api_hook_completion (VALUE class, VALUE completion, VALUE function)
+{
+ char *c_completion, *c_function, *result;
+ struct t_hook *new_hook;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("hook_completion");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_completion = NULL;
+ c_function = NULL;
+
+ if (NIL_P (completion) || NIL_P (function))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("hook_completion");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (completion, T_STRING);
+ Check_Type (function, T_STRING);
+
+ c_completion = STR2CSTR (completion);
+ c_function = STR2CSTR (function);
+
+ new_hook = script_api_hook_completion (weechat_ruby_plugin,
+ ruby_current_script,
+ c_completion,
+ &weechat_ruby_api_hook_completion_cb,
+ c_function);
+
+ result = script_pointer_to_string (new_hook);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_unhook: unhook something
+ */
+
+static VALUE
+weechat_ruby_api_unhook (VALUE class, VALUE hook)
+{
+ char *c_hook;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("unhook");
+ RUBY_RETURN_ERROR;
+ }
+
+ c_hook = NULL;
+
+ if (NIL_P (hook))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("unhook");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (hook, T_STRING);
+
+ c_hook = STR2CSTR (hook);
+
+ if (script_api_unhook (weechat_ruby_plugin,
+ ruby_current_script,
+ script_string_to_pointer (c_hook)))
+ RUBY_RETURN_OK;
+
+ RUBY_RETURN_ERROR;
+}
+
+/*
+ * weechat_ruby_api_unhook_all: unhook all for script
+ */
+
+static VALUE
+weechat_ruby_api_unhook_all (VALUE class)
+{
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("unhook_all");
+ RUBY_RETURN_ERROR;
+ }
+
+ script_api_unhook_all (weechat_ruby_plugin,
+ ruby_current_script);
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_input_data_cb: callback for input data in a buffer
+ */
+
+int
+weechat_ruby_api_input_data_cb (void *data, struct t_gui_buffer *buffer,
+ char *input_data)
+{
+ struct t_script_callback *script_callback;
+ char *ruby_argv[3];
+ int *rc, ret;
+
+ script_callback = (struct t_script_callback *)data;
+
+ ruby_argv[0] = script_pointer_to_string (buffer);
+ ruby_argv[1] = input_data;
+ ruby_argv[2] = NULL;
+
+ rc = (int *) weechat_ruby_exec (script_callback->script,
+ WEECHAT_SCRIPT_EXEC_INT,
+ script_callback->function,
+ ruby_argv);
+
+ if (!rc)
+ ret = WEECHAT_RC_ERROR;
+ else
+ {
+ ret = *rc;
+ free (rc);
+ }
+ if (ruby_argv[0])
+ free (ruby_argv[0]);
+
+ return ret;
+}
+
+/*
+ * weechat_ruby_api_buffer_new: create a new buffer
+ */
+
+static VALUE
+weechat_ruby_api_buffer_new (VALUE class, VALUE category, VALUE name, VALUE function)
+{
+ char *c_category, *c_name, *c_function, *result;
+ struct t_gui_buffer *new_buffer;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("buffer_new");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_category = NULL;
+ c_name = NULL;
+ c_function = NULL;
+
+ if (NIL_P (category) || NIL_P (name) || NIL_P (function))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("buffer_new");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (category, T_STRING);
+ Check_Type (name, T_STRING);
+ Check_Type (function, T_STRING);
+
+ c_category = STR2CSTR (category);
+ c_name = STR2CSTR (name);
+ c_function = STR2CSTR (function);
+
+ new_buffer = script_api_buffer_new (weechat_ruby_plugin,
+ ruby_current_script,
+ c_category,
+ c_name,
+ &weechat_ruby_api_input_data_cb,
+ c_function);
+
+ result = script_pointer_to_string (new_buffer);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_buffer_search: search a buffer
+ */
+
+static VALUE
+weechat_ruby_api_buffer_search (VALUE class, VALUE category, VALUE name)
+{
+ char *c_category, *c_name, *result;
+ struct t_gui_buffer *ptr_buffer;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("buffer_search");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_category = NULL;
+ c_name = NULL;
+
+ if (NIL_P (category) || NIL_P (name))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("buffer_search");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (category, T_STRING);
+ Check_Type (name, T_STRING);
+
+ c_category = STR2CSTR (category);
+ c_name = STR2CSTR (name);
+
+ ptr_buffer = weechat_buffer_search (c_category, c_name);
+
+ result = script_pointer_to_string (ptr_buffer);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_buffer_close: close a buffer
+ */
+
+static VALUE
+weechat_ruby_api_buffer_close (VALUE class, VALUE buffer, VALUE switch_to_another)
+{
+ char *c_buffer;
+ int c_switch_to_another;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("buffer_close");
+ RUBY_RETURN_ERROR;
+ }
+
+ c_buffer = NULL;
+ c_switch_to_another = 0;
+
+ if (NIL_P (buffer) || NIL_P (switch_to_another))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("buffer_close");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (switch_to_another, T_FIXNUM);
+
+ c_buffer = STR2CSTR (buffer);
+ c_switch_to_another = FIX2INT (switch_to_another);
+
+ script_api_buffer_close (weechat_ruby_plugin,
+ ruby_current_script,
+ script_string_to_pointer (c_buffer),
+ c_switch_to_another);
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_buffer_get: get a buffer property
+ */
+
+static VALUE
+weechat_ruby_api_buffer_get (VALUE class, VALUE buffer, VALUE property)
+{
+ char *c_buffer, *c_property, *value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("buffer_get");
+ RUBY_RETURN_EMPTY;
+ }
+
+ if (NIL_P (buffer) || NIL_P (property))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("buffer_get");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (property, T_STRING);
+
+ c_buffer = STR2CSTR (buffer);
+ c_property = STR2CSTR (property);
+
+ value = weechat_buffer_get (script_string_to_pointer (c_buffer),
+ c_property);
+ RUBY_RETURN_STRING(value);
+}
+
+/*
+ * weechat_ruby_api_buffer_set: set a buffer property
+ */
+
+static VALUE
+weechat_ruby_api_buffer_set (VALUE class, VALUE buffer, VALUE property, VALUE value)
+{
+ char *c_buffer, *c_property, *c_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("buffer_set");
+ RUBY_RETURN_ERROR;
+ }
+
+ if (NIL_P (buffer) || NIL_P (property) || NIL_P (value))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("buffer_set");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (property, T_STRING);
+ Check_Type (value, T_STRING);
+
+ c_buffer = STR2CSTR (buffer);
+ c_property = STR2CSTR (property);
+ c_value = STR2CSTR (value);
+
+ weechat_buffer_set (script_string_to_pointer (c_buffer),
+ c_property,
+ c_value);
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_nicklist_add_group: add a group in nicklist
+ */
+
+static VALUE
+weechat_ruby_api_nicklist_add_group (VALUE class, VALUE buffer,
+ VALUE parent_group, VALUE name,
+ VALUE color, VALUE visible)
+{
+ char *c_buffer, *c_parent_group, *c_name, *c_color, *result;
+ int c_visible;
+ struct t_gui_nick_group *new_group;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("nicklist_add_group");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_buffer = NULL;
+ c_parent_group = NULL;
+ c_name = NULL;
+ c_color = NULL;
+ c_visible = 0;
+
+ if (NIL_P (buffer) || NIL_P (parent_group) || NIL_P (name) || NIL_P (color)
+ || NIL_P (visible))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("nicklist_add_group");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (parent_group, T_STRING);
+ Check_Type (name, T_STRING);
+ Check_Type (color, T_STRING);
+ Check_Type (visible, T_FIXNUM);
+
+ c_buffer = STR2CSTR (buffer);
+ c_parent_group = STR2CSTR (parent_group);
+ c_name = STR2CSTR (name);
+ c_color = STR2CSTR (color);
+ c_visible = FIX2INT (visible);
+
+ new_group = weechat_nicklist_add_group (script_string_to_pointer (c_buffer),
+ script_string_to_pointer (c_parent_group),
+ c_name,
+ c_color,
+ c_visible);
+
+ result = script_pointer_to_string (new_group);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_nicklist_search_group: search a group in nicklist
+ */
+
+static VALUE
+weechat_ruby_api_nicklist_search_group (VALUE class, VALUE buffer,
+ VALUE from_group, VALUE name)
+{
+ char *c_buffer, *c_from_group, *c_name, *result;
+ struct t_gui_nick_group *ptr_group;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("nicklist_search_group");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_buffer = NULL;
+ c_from_group = NULL;
+ c_name = NULL;
+
+ if (NIL_P (buffer) || NIL_P (from_group) || NIL_P (name))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("nicklist_search_group");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (from_group, T_STRING);
+ Check_Type (name, T_STRING);
+
+ c_buffer = STR2CSTR (buffer);
+ c_from_group = STR2CSTR (from_group);
+ c_name = STR2CSTR (name);
+
+ ptr_group = weechat_nicklist_search_group (script_string_to_pointer (c_buffer),
+ script_string_to_pointer (c_from_group),
+ c_name);
+
+ result = script_pointer_to_string (ptr_group);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_nicklist_add_nick: add a nick in nicklist
+ */
+
+static VALUE
+weechat_ruby_api_nicklist_add_nick (VALUE class, VALUE buffer, VALUE group,
+ VALUE name, VALUE color, VALUE prefix,
+ VALUE prefix_color, VALUE visible)
+{
+ char *c_buffer, *c_group, *c_name, *c_color, *c_prefix, char_prefix;
+ char *c_prefix_color, *result;
+ int c_visible;
+ struct t_gui_nick *new_nick;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("nicklist_add_nick");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_buffer = NULL;
+ c_group = NULL;
+ c_name = NULL;
+ c_color = NULL;
+ c_prefix = NULL;
+ c_prefix_color = NULL;
+ c_visible = 0;
+
+ if (NIL_P (buffer) || NIL_P (group) || NIL_P (name) || NIL_P (color)
+ || NIL_P (prefix) || NIL_P (prefix_color) || NIL_P (visible))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("nicklist_add_nick");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (group, T_STRING);
+ Check_Type (name, T_STRING);
+ Check_Type (color, T_STRING);
+ Check_Type (prefix, T_STRING);
+ Check_Type (prefix_color, T_STRING);
+ Check_Type (visible, T_FIXNUM);
+
+ c_buffer = STR2CSTR (buffer);
+ c_group = STR2CSTR (group);
+ c_name = STR2CSTR (name);
+ c_color = STR2CSTR (color);
+ c_prefix = STR2CSTR (prefix);
+ c_prefix_color = STR2CSTR (prefix_color);
+ c_visible = FIX2INT (visible);
+
+ if (c_prefix && c_prefix[0])
+ char_prefix = c_prefix[0];
+ else
+ char_prefix = ' ';
+
+ new_nick = weechat_nicklist_add_nick (script_string_to_pointer (c_buffer),
+ script_string_to_pointer (c_group),
+ c_name,
+ c_color,
+ prefix,
+ c_prefix_color,
+ c_visible);
+
+ result = script_pointer_to_string (new_nick);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_nicklist_search_nick: search a nick in nicklist
+ */
+
+static VALUE
+weechat_ruby_api_nicklist_search_nick (VALUE class, VALUE buffer,
+ VALUE from_group, VALUE name)
+{
+ char *c_buffer, *c_from_group, *c_name, *result;
+ struct t_gui_nick *ptr_nick;
+ VALUE return_value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("nicklist_search_nick");
+ RUBY_RETURN_EMPTY;
+ }
+
+ c_buffer = NULL;
+ c_from_group = NULL;
+ c_name = NULL;
+
+ if (NIL_P (buffer) || NIL_P (from_group) || NIL_P (name))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("nicklist_search_nick");
+ RUBY_RETURN_EMPTY;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (from_group, T_STRING);
+ Check_Type (name, T_STRING);
+
+ c_buffer = STR2CSTR (buffer);
+ c_from_group = STR2CSTR (from_group);
+ c_name = STR2CSTR (name);
+
+ ptr_nick = weechat_nicklist_search_nick (script_string_to_pointer (c_buffer),
+ script_string_to_pointer (c_from_group),
+ c_name);
+
+ result = script_pointer_to_string (ptr_nick);
+ RUBY_RETURN_STRING_FREE(result);
+}
+
+/*
+ * weechat_ruby_api_nicklist_remove_group: remove a group from nicklist
+ */
+
+static VALUE
+weechat_ruby_api_nicklist_remove_group (VALUE class, VALUE buffer, VALUE group)
+{
+ char *c_buffer, *c_group;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("nicklist_remove_group");
+ RUBY_RETURN_ERROR;
+ }
+
+ if (NIL_P (buffer) || NIL_P (group))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("nicklist_remove_group");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (group, T_STRING);
+
+ c_buffer = STR2CSTR (buffer);
+ c_group = STR2CSTR (group);
+
+ weechat_nicklist_remove_group (script_string_to_pointer (c_buffer),
+ script_string_to_pointer (c_group));
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_nicklist_remove_nick: remove a nick from nicklist
+ */
+
+static VALUE
+weechat_ruby_api_nicklist_remove_nick (VALUE class, VALUE buffer, VALUE nick)
+{
+ char *c_buffer, *c_nick;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("nicklist_remove_nick");
+ RUBY_RETURN_ERROR;
+ }
+
+ if (NIL_P (buffer) || NIL_P (nick))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("nicklist_remove_nick");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (nick, T_STRING);
+
+ c_buffer = STR2CSTR (buffer);
+ c_nick = STR2CSTR (nick);
+
+ weechat_nicklist_remove_nick (script_string_to_pointer (c_buffer),
+ script_string_to_pointer (c_nick));
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_nicklist_remove_all: remove all groups/nicks from nicklist
+ */
+
+static VALUE
+weechat_ruby_api_nicklist_remove_all (VALUE class, VALUE buffer)
+{
+ char *c_buffer;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("nicklist_remove_all");
+ RUBY_RETURN_ERROR;
+ }
+
+ if (NIL_P (buffer))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("nicklist_remove_all");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (buffer, T_STRING);
+
+ c_buffer = STR2CSTR (buffer);
+
+ weechat_nicklist_remove_all (script_string_to_pointer (c_buffer));
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_command: send command to server
+ */
+
+static VALUE
+weechat_ruby_api_command (VALUE class, VALUE buffer, VALUE command)
+{
+ char *c_buffer, *c_command;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("command");
+ RUBY_RETURN_ERROR;
+ }
+
+ if (NIL_P (buffer) || NIL_P (command))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("command");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (buffer, T_STRING);
+ Check_Type (command, T_STRING);
+
+ c_buffer = STR2CSTR (buffer);
+ c_command = STR2CSTR (command);
+
+ script_api_command (weechat_ruby_plugin,
+ ruby_current_script,
+ script_string_to_pointer (c_buffer),
+ c_command);
+
+ RUBY_RETURN_OK;
+}
+
+/*
+ * weechat_ruby_api_info_get: get info about WeeChat
+ */
+
+static VALUE
+weechat_ruby_api_info_get (VALUE class, VALUE info)
+{
+ char *c_info, *value;
+
+ /* make C compiler happy */
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("info_get");
+ RUBY_RETURN_EMPTY;
+ }
+
+ if (NIL_P (info))
+ {
+ WEECHAT_SCRIPT_MSG_WRONG_ARGUMENTS("info_get");
+ RUBY_RETURN_ERROR;
+ }
+
+ Check_Type (info, T_STRING);
+
+ c_info = STR2CSTR (info);
+
+ value = weechat_info_get (c_info);
+ RUBY_RETURN_STRING(value);
+}
+
+/*
+ * weechat_ruby_api_get_dcc_info: get infos about DCC
+ */
+
+/*
+static VALUE
+weechat_ruby_api_get_dcc_info (VALUE class)
+{
+ t_plugin_dcc_info *dcc_info, *ptr_dcc;
+ VALUE dcc_list, dcc_list_member;
+ char timebuffer1[64];
+ char timebuffer2[64];
+ struct in_addr in;
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("charset_set");
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to get DCC info, "
+ "script not initialized");
+ return INT2FIX (0);
+ }
+
+ dcc_list = rb_ary_new();
+
+ if (NIL_P (dcc_list))
+ return Qnil;
+
+ dcc_info = ruby_plugin->get_dcc_info (ruby_plugin);
+ if (!dcc_info)
+ return dcc_list;
+
+ for(ptr_dcc = dcc_info; ptr_dcc; ptr_dcc = ptr_dcc->next_dcc)
+ {
+ strftime(timebuffer1, sizeof(timebuffer1), "%F %T",
+ localtime(&ptr_dcc->start_time));
+ strftime(timebuffer2, sizeof(timebuffer2), "%F %T",
+ localtime(&ptr_dcc->start_transfer));
+ in.s_addr = htonl(ptr_dcc->addr);
+
+ dcc_list_member = rb_hash_new ();
+
+ if (!NIL_P (dcc_list_member))
+ {
+ rb_hash_aset (dcc_list_member, rb_str_new2("server"),
+ rb_str_new2(ptr_dcc->server));
+ rb_hash_aset (dcc_list_member, rb_str_new2("channel"),
+ rb_str_new2(ptr_dcc->channel));
+ rb_hash_aset (dcc_list_member, rb_str_new2("type"),
+ INT2FIX(ptr_dcc->type));
+ rb_hash_aset (dcc_list_member, rb_str_new2("status"),
+ INT2FIX(ptr_dcc->status));
+ rb_hash_aset (dcc_list_member, rb_str_new2("start_time"),
+ rb_str_new2(timebuffer1));
+ rb_hash_aset (dcc_list_member, rb_str_new2("start_transfer"),
+ rb_str_new2(timebuffer2));
+ rb_hash_aset (dcc_list_member, rb_str_new2("address"),
+ rb_str_new2(inet_ntoa(in)));
+ rb_hash_aset (dcc_list_member, rb_str_new2("port"),
+ INT2FIX(ptr_dcc->port));
+ rb_hash_aset (dcc_list_member, rb_str_new2("nick"),
+ rb_str_new2(ptr_dcc->nick));
+ rb_hash_aset (dcc_list_member, rb_str_new2("remote_file"),
+ rb_str_new2(ptr_dcc->filename));
+ rb_hash_aset (dcc_list_member, rb_str_new2("local_file"),
+ rb_str_new2(ptr_dcc->local_filename));
+ rb_hash_aset (dcc_list_member, rb_str_new2("filename_suffix"),
+ INT2FIX(ptr_dcc->filename_suffix));
+ rb_hash_aset (dcc_list_member, rb_str_new2("size"),
+ INT2FIX(ptr_dcc->size));
+ rb_hash_aset (dcc_list_member, rb_str_new2("pos"),
+ INT2FIX(ptr_dcc->pos));
+ rb_hash_aset (dcc_list_member, rb_str_new2("start_resume"),
+ INT2FIX(ptr_dcc->start_resume));
+ rb_hash_aset (dcc_list_member, rb_str_new2("cps"),
+ INT2FIX(ptr_dcc->bytes_per_sec));
+
+ rb_ary_push (dcc_list, dcc_list_member);
+ }
+ }
+
+ ruby_plugin->free_dcc_info (ruby_plugin, dcc_info);
+
+ return dcc_list;
+}
+*/
+
+/*
+ * weechat_ruby_api_get_config: get value of a WeeChat config option
+ */
+
+/*
+static VALUE
+weechat_ruby_api_get_config (VALUE class, VALUE option)
+{
+ char *c_option, *return_value;
+ VALUE ruby_return_value;
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ WEECHAT_SCRIPT_MSG_NOT_INITIALIZED("charset_set");
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to get config option, "
+ "script not initialized");
+ return INT2FIX (0);
+ }
+
+ c_option = NULL;
+
+ if (NIL_P (option))
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: wrong parameters for "
+ "\"get_config\" function");
+ return INT2FIX (0);
+ }
+
+ Check_Type (option, T_STRING);
+ c_option = STR2CSTR (option);
+
+ if (c_option)
+ {
+ return_value = ruby_plugin->get_config (ruby_plugin, c_option);
+
+ if (return_value)
+ {
+ ruby_return_value = rb_str_new2 (return_value);
+ free (return_value);
+ return ruby_return_value;
+ }
+ }
+
+ return rb_str_new2 ("");
+}
+*/
+
+/*
+ * weechat_ruby_api_set_config: set value of a WeeChat config option
+ */
+
+/*
+static VALUE
+weechat_ruby_api_set_config (VALUE class, VALUE option, VALUE value)
+{
+ char *c_option, *c_value;
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to set config option, "
+ "script not initialized");
+ return INT2FIX (0);
+ }
+
+ c_option = NULL;
+ c_value = NULL;
+
+ if (NIL_P (option))
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: wrong parameters for "
+ "\"set_config\" function");
+ return INT2FIX (0);
+ }
+
+ Check_Type (option, T_STRING);
+ Check_Type (value, T_STRING);
+
+ c_option = STR2CSTR (option);
+ c_value = STR2CSTR (value);
+
+ if (c_option && c_value)
+ {
+ if (ruby_plugin->set_config (ruby_plugin, c_option, c_value))
+ return INT2FIX (1);
+ }
+
+ return INT2FIX (0);
+}
+*/
+
+/*
+ * weechat_ruby_api_get_plugin_config: get value of a plugin config option
+ */
+
+/*
+static VALUE
+weechat_ruby_api_get_plugin_config (VALUE class, VALUE option)
+{
+ char *c_option, *return_value;
+ VALUE ruby_return_value;
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to get plugin config option, "
+ "script not initialized");
+ return INT2FIX (0);
+ }
+
+ c_option = NULL;
+
+ if (NIL_P (option))
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: wrong parameters for "
+ "\"get_plugin_config\" function");
+ return INT2FIX (0);
+ }
+
+ Check_Type (option, T_STRING);
+ c_option = STR2CSTR (option);
+
+ if (c_option)
+ {
+ return_value = script_get_plugin_config (ruby_plugin,
+ ruby_current_script,
+ c_option);
+
+ if (return_value)
+ {
+ ruby_return_value = rb_str_new2 (return_value);
+ free (return_value);
+ return ruby_return_value;
+ }
+ }
+
+ return rb_str_new2 ("");
+}
+*/
+
+/*
+ * weechat_ruby_api_set_plugin_config: set value of a plugin config option
+ */
+
+/*
+static VALUE
+weechat_ruby_api_set_plugin_config (VALUE class, VALUE option, VALUE value)
+{
+ char *c_option, *c_value;
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to set plugin config option, "
+ "script not initialized");
+ return INT2FIX (0);
+ }
+
+ c_option = NULL;
+ c_value = NULL;
+
+ if (NIL_P (option))
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: wrong parameters for "
+ "\"set_plugin_config\" function");
+ return INT2FIX (0);
+ }
+
+ Check_Type (option, T_STRING);
+ Check_Type (value, T_STRING);
+
+ c_option = STR2CSTR (option);
+ c_value = STR2CSTR (value);
+
+ if (c_option && c_value)
+ {
+ if (script_set_plugin_config (ruby_plugin,
+ ruby_current_script,
+ c_option, c_value))
+ RUBY_RETURN_OK;
+ }
+
+ RUBY_RETURN_ERROR;
+}
+*/
+
+/*
+ * weechat_ruby_api_get_server_info: get infos about servers
+ */
+
+/*
+static VALUE
+weechat_ruby_api_get_server_info (VALUE class)
+{
+ t_plugin_server_info *server_info, *ptr_server;
+ VALUE server_hash, server_hash_member;
+ char timebuffer[64];
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to get server infos, "
+ "script not initialized");
+ return INT2FIX (0);
+ }
+
+ server_hash = rb_hash_new ();
+ if (!server_hash)
+ return Qnil;
+
+ server_info = ruby_plugin->get_server_info (ruby_plugin);
+ if (!server_info)
+ return server_hash;
+
+ for(ptr_server = server_info; ptr_server; ptr_server = ptr_server->next_server)
+ {
+ strftime(timebuffer, sizeof(timebuffer), "%F %T",
+ localtime(&ptr_server->away_time));
+
+ server_hash_member = rb_hash_new ();
+
+ if (server_hash_member)
+ {
+ rb_hash_aset (server_hash_member, rb_str_new2("autoconnect"),
+ INT2FIX(ptr_server->autoconnect));
+ rb_hash_aset (server_hash_member, rb_str_new2("autoreconnect"),
+ INT2FIX(ptr_server->autoreconnect));
+ rb_hash_aset (server_hash_member, rb_str_new2("autoreconnect_delay"),
+ INT2FIX(ptr_server->autoreconnect_delay));
+ rb_hash_aset (server_hash_member, rb_str_new2("temp_server"),
+ INT2FIX(ptr_server->temp_server));
+ rb_hash_aset (server_hash_member, rb_str_new2("address"),
+ rb_str_new2(ptr_server->address));
+ rb_hash_aset (server_hash_member, rb_str_new2("port"),
+ INT2FIX(ptr_server->port));
+ rb_hash_aset (server_hash_member, rb_str_new2("ipv6"),
+ INT2FIX(ptr_server->ipv6));
+ rb_hash_aset (server_hash_member, rb_str_new2("ssl"),
+ INT2FIX(ptr_server->ssl));
+ rb_hash_aset (server_hash_member, rb_str_new2("password"),
+ rb_str_new2(ptr_server->password));
+ rb_hash_aset (server_hash_member, rb_str_new2("nick1"),
+ rb_str_new2(ptr_server->nick1));
+ rb_hash_aset (server_hash_member, rb_str_new2("nick2"),
+ rb_str_new2(ptr_server->nick2));
+ rb_hash_aset (server_hash_member, rb_str_new2("nick3"),
+ rb_str_new2(ptr_server->nick3));
+ rb_hash_aset (server_hash_member, rb_str_new2("username"),
+ rb_str_new2(ptr_server->username));
+ rb_hash_aset (server_hash_member, rb_str_new2("realname"),
+ rb_str_new2(ptr_server->realname));
+ rb_hash_aset (server_hash_member, rb_str_new2("command"),
+ rb_str_new2(ptr_server->command));
+ rb_hash_aset (server_hash_member, rb_str_new2("command_delay"),
+ INT2FIX(ptr_server->command_delay));
+ rb_hash_aset (server_hash_member, rb_str_new2("autojoin"),
+ rb_str_new2(ptr_server->autojoin));
+ rb_hash_aset (server_hash_member, rb_str_new2("autorejoin"),
+ INT2FIX(ptr_server->autorejoin));
+ rb_hash_aset (server_hash_member, rb_str_new2("notify_levels"),
+ rb_str_new2(ptr_server->notify_levels));
+ rb_hash_aset (server_hash_member, rb_str_new2("is_connected"),
+ INT2FIX(ptr_server->is_connected));
+ rb_hash_aset (server_hash_member, rb_str_new2("ssl_connected"),
+ INT2FIX(ptr_server->ssl_connected));
+ rb_hash_aset (server_hash_member, rb_str_new2("nick"),
+ rb_str_new2(ptr_server->nick));
+ rb_hash_aset (server_hash_member, rb_str_new2("nick_modes"),
+ rb_str_new2(ptr_server->nick_modes));
+ rb_hash_aset (server_hash_member, rb_str_new2("away_time"),
+ rb_str_new2(timebuffer));
+ rb_hash_aset (server_hash_member, rb_str_new2("lag"),
+ INT2FIX(ptr_server->lag));
+
+ rb_hash_aset (server_hash, rb_str_new2(ptr_server->name), server_hash_member);
+ }
+ }
+
+ ruby_plugin->free_server_info(ruby_plugin, server_info);
+
+ return server_hash;
+}
+*/
+
+/*
+ * weechat_ruby_api_get_channel_info: get infos about channels
+ */
+
+/*
+static VALUE
+weechat_ruby_api_get_channel_info (VALUE class, VALUE server)
+{
+ t_plugin_channel_info *channel_info, *ptr_channel;
+ VALUE channel_hash, channel_hash_member;
+ char *c_server;
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to get channel infos, "
+ "script not initialized");
+ return INT2FIX (0);
+ }
+
+ c_server = NULL;
+ if (NIL_P (server))
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: wrong parameters for "
+ "\"get_channel_info\" function");
+ return INT2FIX (0);
+ }
+
+ Check_Type (server, T_STRING);
+ c_server = STR2CSTR (server);
+
+ if (!c_server)
+ return INT2FIX (0);
+
+ channel_hash = rb_hash_new ();
+ if (!channel_hash)
+ return Qnil;
+
+ channel_info = ruby_plugin->get_channel_info (ruby_plugin, c_server);
+ if (!channel_info)
+ return channel_hash;
+
+ for(ptr_channel = channel_info; ptr_channel; ptr_channel = ptr_channel->next_channel)
+ {
+ channel_hash_member = rb_hash_new ();
+
+ if (channel_hash_member)
+ {
+ rb_hash_aset (channel_hash_member, rb_str_new2("type"),
+ INT2FIX(ptr_channel->type));
+ rb_hash_aset (channel_hash_member, rb_str_new2("topic"),
+ rb_str_new2(ptr_channel->topic));
+ rb_hash_aset (channel_hash_member, rb_str_new2("modes"),
+ rb_str_new2(ptr_channel->modes));
+ rb_hash_aset (channel_hash_member, rb_str_new2("limit"),
+ INT2FIX(ptr_channel->limit));
+ rb_hash_aset (channel_hash_member, rb_str_new2("key"),
+ rb_str_new2(ptr_channel->key));
+ rb_hash_aset (channel_hash_member, rb_str_new2("nicks_count"),
+ INT2FIX(ptr_channel->nicks_count));
+
+ rb_hash_aset (channel_hash, rb_str_new2(ptr_channel->name), channel_hash_member);
+ }
+ }
+
+ ruby_plugin->free_channel_info(ruby_plugin, channel_info);
+
+ return channel_hash;
+}
+*/
+
+/*
+ * weechat_ruby_api_get_nick_info: get infos about nicks
+ */
+
+/*
+static VALUE
+weechat_ruby_api_get_nick_info (VALUE class, VALUE server, VALUE channel)
+{
+ t_plugin_nick_info *nick_info, *ptr_nick;
+ VALUE nick_hash, nick_hash_member;
+ char *c_server, *c_channel;
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to get channel infos, "
+ "script not initialized");
+ return INT2FIX (0);
+ }
+
+ c_server = NULL;
+ c_channel = NULL;
+ if (NIL_P (server) || NIL_P (channel))
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: wrong parameters for "
+ "\"get_nick_info\" function");
+ return INT2FIX (0);
+ }
+
+ Check_Type (server, T_STRING);
+ Check_Type (channel, T_STRING);
+
+ c_server = STR2CSTR (server);
+ c_channel = STR2CSTR (channel);
+
+ if (!c_server || !c_channel)
+ return INT2FIX (0);
+
+ nick_hash = rb_hash_new ();
+ if (!nick_hash)
+ return Qnil;
+
+ nick_info = ruby_plugin->get_nick_info (ruby_plugin, c_server, c_channel);
+ if (!nick_info)
+ return nick_hash;
+
+ for(ptr_nick = nick_info; ptr_nick; ptr_nick = ptr_nick->next_nick)
+ {
+ nick_hash_member = rb_hash_new ();
+
+ if (nick_hash_member)
+ {
+ rb_hash_aset (nick_hash_member, rb_str_new2("flags"),
+ INT2FIX(ptr_nick->flags));
+ rb_hash_aset (nick_hash_member, rb_str_new2("host"),
+ rb_str_new2(ptr_nick->host ? ptr_nick->host : ""));
+
+ rb_hash_aset (nick_hash, rb_str_new2(ptr_nick->nick), nick_hash_member);
+ }
+ }
+
+ ruby_plugin->free_nick_info(ruby_plugin, nick_info);
+
+ return nick_hash;
+}
+*/
+
+/*
+ * weechat_ruby_api_get_irc_color:
+ * get the numeric value which identify an irc color by its name
+ */
+
+/*
+static VALUE
+weechat_ruby_api_get_irc_color (VALUE class, VALUE color)
+{
+ char *c_color;
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to get irc color, "
+ "script not initialized");
+ return INT2FIX (-1);
+ }
+
+ c_color = NULL;
+
+ if (NIL_P (color))
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: wrong parameters for "
+ "\"get_irc_color\" function");
+ return INT2FIX (-1);
+ }
+
+ Check_Type (color, T_STRING);
+
+ c_color = STR2CSTR (color);
+
+ return INT2FIX (ruby_plugin->get_irc_color (ruby_plugin, c_color));
+}
+*/
+
+/*
+ * weechat_ruby_api_get_window_info: get infos about windows
+ */
+
+/*
+static VALUE
+weechat_ruby_api_get_window_info (VALUE class)
+{
+ t_plugin_window_info *window_info, *ptr_win;
+ VALUE window_list, window_list_member;
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to get window info, "
+ "script not initialized");
+ return INT2FIX (0);
+ }
+
+ window_list = rb_ary_new();
+
+ if (NIL_P (window_list))
+ return Qnil;
+
+ window_info = ruby_plugin->get_window_info (ruby_plugin);
+ if (!window_info)
+ return window_list;
+
+ for (ptr_win = window_info; ptr_win; ptr_win = ptr_win->next_window)
+ {
+ window_list_member = rb_hash_new ();
+
+ if (!NIL_P (window_list_member))
+ {
+ rb_hash_aset (window_list_member, rb_str_new2("num_buffer"),
+ INT2FIX(ptr_win->num_buffer));
+ rb_hash_aset (window_list_member, rb_str_new2("win_x"),
+ INT2FIX(ptr_win->win_x));
+ rb_hash_aset (window_list_member, rb_str_new2("win_y"),
+ INT2FIX(ptr_win->win_y));
+ rb_hash_aset (window_list_member, rb_str_new2("win_width"),
+ INT2FIX(ptr_win->win_width));
+ rb_hash_aset (window_list_member, rb_str_new2("win_height"),
+ INT2FIX(ptr_win->win_height));
+ rb_hash_aset (window_list_member, rb_str_new2("win_width_pct"),
+ INT2FIX(ptr_win->win_width_pct));
+ rb_hash_aset (window_list_member, rb_str_new2("win_height_pct"),
+ INT2FIX(ptr_win->win_height_pct));
+
+ rb_ary_push (window_list, window_list_member);
+ }
+ }
+
+ ruby_plugin->free_window_info (ruby_plugin, window_info);
+
+ return window_list;
+}
+*/
+
+/*
+ * weechat_ruby_api_get_buffer_info: get infos about buffers
+ */
+
+/*
+static VALUE
+weechat_ruby_api_get_buffer_info (VALUE class)
+{
+ t_plugin_buffer_info *buffer_info, *ptr_buffer;
+ VALUE buffer_hash, buffer_hash_member;
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to get buffer info, "
+ "script not initialized");
+ return INT2FIX (0);
+ }
+
+ buffer_hash = rb_hash_new ();
+ if (!buffer_hash)
+ return Qnil;
+
+ buffer_info = ruby_plugin->get_buffer_info (ruby_plugin);
+ if (!buffer_info)
+ return buffer_hash;
+
+ for(ptr_buffer = buffer_info; ptr_buffer; ptr_buffer = ptr_buffer->next_buffer)
+ {
+ buffer_hash_member = rb_hash_new ();
+
+ if (buffer_hash_member)
+ {
+ rb_hash_aset (buffer_hash_member, rb_str_new2("type"),
+ INT2FIX(ptr_buffer->type));
+ rb_hash_aset (buffer_hash_member, rb_str_new2("num_displayed"),
+ INT2FIX(ptr_buffer->num_displayed));
+ rb_hash_aset (buffer_hash_member, rb_str_new2("server"),
+ rb_str_new2(ptr_buffer->server_name == NULL ? "" : ptr_buffer->server_name));
+ rb_hash_aset (buffer_hash_member, rb_str_new2("channel"),
+ rb_str_new2(ptr_buffer->channel_name == NULL ? "" : ptr_buffer->channel_name));
+ rb_hash_aset (buffer_hash_member, rb_str_new2("notify_level"),
+ INT2FIX(ptr_buffer->notify_level));
+ rb_hash_aset (buffer_hash_member, rb_str_new2("log_filename"),
+ rb_str_new2(ptr_buffer->log_filename == NULL ? "" : ptr_buffer->log_filename));
+
+ rb_hash_aset (buffer_hash, INT2FIX(ptr_buffer->number), buffer_hash_member);
+ }
+ }
+
+ ruby_plugin->free_buffer_info(ruby_plugin, buffer_info);
+
+ return buffer_hash;
+}
+*/
+
+/*
+ * weechat_ruby_api_get_buffer_data: get buffer content
+ */
+
+/*
+static VALUE
+weechat_ruby_api_get_buffer_data (VALUE class, VALUE server, VALUE channel)
+{
+ t_plugin_buffer_line *buffer_data, *ptr_data;
+ VALUE data_list, data_list_member;
+ char *c_server, *c_channel;
+ char timebuffer[64];
+
+ // make C compiler happy
+ (void) class;
+
+ if (!ruby_current_script)
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: unable to get buffer data, "
+ "script not initialized");
+ return INT2FIX (0);
+ }
+
+ c_server = NULL;
+ c_channel = NULL;
+
+ if (NIL_P (server) || NIL_P (channel))
+ {
+ ruby_plugin->print_server (ruby_plugin,
+ "Ruby error: wrong parameters for "
+ "\"get_buffer_data\" function");
+ return INT2FIX (0);
+ }
+
+ Check_Type (server, T_STRING);
+ Check_Type (channel, T_STRING);
+
+ c_server = STR2CSTR (server);
+ c_channel = STR2CSTR (channel);
+
+ if (!c_server || !c_channel)
+ return INT2FIX (0);
+
+ data_list = rb_ary_new();
+ if (NIL_P (data_list))
+ return Qnil;
+
+ buffer_data = ruby_plugin->get_buffer_data (ruby_plugin, c_server, c_channel);
+ if (!buffer_data)
+ return data_list;
+
+ for(ptr_data = buffer_data; ptr_data; ptr_data = ptr_data->next_line)
+ {
+ data_list_member = rb_hash_new ();
+
+ if (!NIL_P (data_list_member))
+ {
+ strftime(timebuffer, sizeof(timebuffer), "%F %T",
+ localtime(&ptr_data->date));
+
+ rb_hash_aset (data_list_member, rb_str_new2("date"),
+ rb_str_new2(timebuffer));
+ rb_hash_aset (data_list_member, rb_str_new2("nick"),
+ rb_str_new2(ptr_data->nick == NULL ? "" : ptr_data->nick));
+ rb_hash_aset (data_list_member, rb_str_new2("data"),
+ rb_str_new2(ptr_data->data == NULL ? "" : ptr_data->data));
+
+ rb_ary_push (data_list, data_list_member);
+ }
+ }
+
+ ruby_plugin->free_buffer_data (ruby_plugin, buffer_data);
+
+ return data_list;
+}
+*/
+
+/*
+ * weechat_ruby_api_init: init Ruby API: add variables and functions
+ */
+
+void
+weechat_ruby_api_init (VALUE ruby_mWeechat)
+{
+ rb_define_const(ruby_mWeechat, "WEECHAT_RC_OK", INT2NUM(WEECHAT_RC_OK));
+ rb_define_const(ruby_mWeechat, "WEECHAT_RC_ERROR", INT2NUM(WEECHAT_RC_ERROR));
+ rb_define_const(ruby_mWeechat, "WEECHAT_RC_OK_IGNORE_WEECHAT", INT2NUM(WEECHAT_RC_OK_IGNORE_WEECHAT));
+ rb_define_const(ruby_mWeechat, "WEECHAT_RC_OK_IGNORE_PLUGINS", INT2NUM(WEECHAT_RC_OK_IGNORE_PLUGINS));
+ rb_define_const(ruby_mWeechat, "WEECHAT_RC_OK_IGNORE_ALL", INT2NUM(WEECHAT_RC_OK_IGNORE_ALL));
+ rb_define_const(ruby_mWeechat, "WEECHAT_RC_OK_WITH_HIGHLIGHT", INT2NUM(WEECHAT_RC_OK_WITH_HIGHLIGHT));
+ rb_define_const(ruby_mWeechat, "WEECHAT_LIST_POS_SORT", rb_str_new2(WEECHAT_LIST_POS_SORT));
+ rb_define_const(ruby_mWeechat, "WEECHAT_LIST_POS_BEGINNING", rb_str_new2(WEECHAT_LIST_POS_BEGINNING));
+ rb_define_const(ruby_mWeechat, "WEECHAT_LIST_POS_END", rb_str_new2(WEECHAT_LIST_POS_END));
+ rb_define_const(ruby_mWeechat, "WEECHAT_HOTLIST_LOW", rb_str_new2(WEECHAT_HOTLIST_LOW));
+ rb_define_const(ruby_mWeechat, "WEECHAT_HOTLIST_MESSAGE", rb_str_new2(WEECHAT_HOTLIST_MESSAGE));
+ rb_define_const(ruby_mWeechat, "WEECHAT_HOTLIST_PRIVATE", rb_str_new2(WEECHAT_HOTLIST_PRIVATE));
+ rb_define_const(ruby_mWeechat, "WEECHAT_HOTLIST_HIGHLIGHT", rb_str_new2(WEECHAT_HOTLIST_HIGHLIGHT));
+ rb_define_const(ruby_mWeechat, "WEECHAT_HOOK_SIGNAL_STRING", rb_str_new2(WEECHAT_HOOK_SIGNAL_STRING));
+ rb_define_const(ruby_mWeechat, "WEECHAT_HOOK_SIGNAL_INT", rb_str_new2(WEECHAT_HOOK_SIGNAL_INT));
+ rb_define_const(ruby_mWeechat, "WEECHAT_HOOK_SIGNAL_POINTER", rb_str_new2(WEECHAT_HOOK_SIGNAL_POINTER));
+ rb_define_module_function (ruby_mWeechat, "register", &weechat_ruby_api_register, 7);
+ rb_define_module_function (ruby_mWeechat, "charset_set", &weechat_ruby_api_charset_set, 1);
+ rb_define_module_function (ruby_mWeechat, "iconv_to_internal", &weechat_ruby_api_iconv_to_internal, 2);
+ rb_define_module_function (ruby_mWeechat, "iconv_from_internal", &weechat_ruby_api_iconv_from_internal, 2);
+ rb_define_module_function (ruby_mWeechat, "mkdir_home", &weechat_ruby_api_mkdir_home, 2);
+ rb_define_module_function (ruby_mWeechat, "mkdir", &weechat_ruby_api_mkdir, 2);
+ rb_define_module_function (ruby_mWeechat, "prefix", &weechat_ruby_api_prefix, 1);
+ rb_define_module_function (ruby_mWeechat, "color", &weechat_ruby_api_color, 1);
+ rb_define_module_function (ruby_mWeechat, "print", &weechat_ruby_api_print, 2);
+ rb_define_module_function (ruby_mWeechat, "infobar_print", &weechat_ruby_api_infobar_print, 3);
+ rb_define_module_function (ruby_mWeechat, "infobar_remove", &weechat_ruby_api_infobar_remove, -1);
+ rb_define_module_function (ruby_mWeechat, "log_print", &weechat_ruby_api_log_print, 1);
+ rb_define_module_function (ruby_mWeechat, "hook_command", &weechat_ruby_api_hook_command, 6);
+ rb_define_module_function (ruby_mWeechat, "hook_timer", &weechat_ruby_api_hook_timer, 4);
+ rb_define_module_function (ruby_mWeechat, "hook_fd", &weechat_ruby_api_hook_fd, 5);
+ rb_define_module_function (ruby_mWeechat, "hook_print", &weechat_ruby_api_hook_print, 4);
+ rb_define_module_function (ruby_mWeechat, "hook_signal", &weechat_ruby_api_hook_signal, 2);
+ rb_define_module_function (ruby_mWeechat, "hook_signal_send", &weechat_ruby_api_hook_signal_send, 3);
+ rb_define_module_function (ruby_mWeechat, "hook_config", &weechat_ruby_api_hook_config, 3);
+ rb_define_module_function (ruby_mWeechat, "hook_completion", &weechat_ruby_api_hook_completion, 2);
+ rb_define_module_function (ruby_mWeechat, "unhook", &weechat_ruby_api_unhook, 1);
+ rb_define_module_function (ruby_mWeechat, "unhook_all", &weechat_ruby_api_unhook_all, 0);
+ rb_define_module_function (ruby_mWeechat, "buffer_new", &weechat_ruby_api_buffer_new, 3);
+ rb_define_module_function (ruby_mWeechat, "buffer_search", &weechat_ruby_api_buffer_search, 2);
+ rb_define_module_function (ruby_mWeechat, "buffer_close", &weechat_ruby_api_buffer_close, 1);
+ rb_define_module_function (ruby_mWeechat, "buffer_get", &weechat_ruby_api_buffer_get, 2);
+ rb_define_module_function (ruby_mWeechat, "buffer_set", &weechat_ruby_api_buffer_set, 3);
+ rb_define_module_function (ruby_mWeechat, "nicklist_add_group", &weechat_ruby_api_nicklist_add_group, 5);
+ rb_define_module_function (ruby_mWeechat, "nicklist_search_group", &weechat_ruby_api_nicklist_search_group, 3);
+ rb_define_module_function (ruby_mWeechat, "nicklist_add_nick", &weechat_ruby_api_nicklist_add_nick, 7);
+ rb_define_module_function (ruby_mWeechat, "nicklist_search_nick", &weechat_ruby_api_nicklist_search_nick, 3);
+ rb_define_module_function (ruby_mWeechat, "nicklist_remove_group", &weechat_ruby_api_nicklist_remove_group, 2);
+ rb_define_module_function (ruby_mWeechat, "nicklist_remove_nick", &weechat_ruby_api_nicklist_remove_nick, 2);
+ rb_define_module_function (ruby_mWeechat, "nicklist_remove_all", &weechat_ruby_api_nicklist_remove_all, 1);
+ rb_define_module_function (ruby_mWeechat, "command", &weechat_ruby_api_command, 2);
+ rb_define_module_function (ruby_mWeechat, "info_get", &weechat_ruby_api_info_get, 1);
+ //rb_define_module_function (ruby_mWeechat, "get_dcc_info", &weechat_ruby_api_get_dcc_info, 0);
+ //rb_define_module_function (ruby_mWeechat, "get_config", &weechat_ruby_api_get_config, 1);
+ //rb_define_module_function (ruby_mWeechat, "set_config", &weechat_ruby_api_set_config, 2);
+ //rb_define_module_function (ruby_mWeechat, "get_plugin_config", &weechat_ruby_api_get_plugin_config, 1);
+ //rb_define_module_function (ruby_mWeechat, "set_plugin_config", &weechat_ruby_api_set_plugin_config, 2);
+ //rb_define_module_function (ruby_mWeechat, "get_server_info", &weechat_ruby_api_get_server_info, 0);
+ //rb_define_module_function (ruby_mWeechat, "get_channel_info", &weechat_ruby_api_get_channel_info, 1);
+ //rb_define_module_function (ruby_mWeechat, "get_nick_info", &weechat_ruby_api_get_nick_info, 2);
+ //rb_define_module_function (ruby_mWeechat, "get_irc_color", &weechat_ruby_api_get_irc_color, 1);
+ //rb_define_module_function (ruby_mWeechat, "get_window_info", &weechat_ruby_api_get_window_info, 0);
+ //rb_define_module_function (ruby_mWeechat, "get_buffer_info", &weechat_ruby_api_get_buffer_info, 0);
+ //rb_define_module_function (ruby_mWeechat, "get_buffer_data", &weechat_ruby_api_get_buffer_data, 2);
+}
diff --git a/src/plugins/scripts/ruby/weechat-ruby-api.h b/src/plugins/scripts/ruby/weechat-ruby-api.h
new file mode 100644
index 000000000..33eaa0ab8
--- /dev/null
+++ b/src/plugins/scripts/ruby/weechat-ruby-api.h
@@ -0,0 +1,25 @@
+/*
+ * Copyright (c) 2003-2008 by FlashCode <flashcode@flashtux.org>
+ * See README for License detail, AUTHORS for developers list.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#ifndef __WEECHAT_RUBY_API_H
+#define __WEECHAT_RUBY_API_H 1
+
+extern void weechat_ruby_api_init (VALUE ruby_mWeechat);
+
+#endif /* weechat-ruby.h */
diff --git a/src/plugins/scripts/ruby/weechat-ruby.c b/src/plugins/scripts/ruby/weechat-ruby.c
new file mode 100644
index 000000000..6e307e7b6
--- /dev/null
+++ b/src/plugins/scripts/ruby/weechat-ruby.c
@@ -0,0 +1,845 @@
+/*
+ * Copyright (c) 2003-2008 by FlashCode <flashcode@flashtux.org>
+ * See README for License detail, AUTHORS for developers list.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/* weechat-ruby.c: Ruby plugin for WeeChat */
+
+#undef _
+
+#include <ruby.h>
+//#include <stdio.h>
+//#include <stdlib.h>
+//#include <string.h>
+#include <stdarg.h>
+//#include <time.h>
+//#include <sys/socket.h>
+//#include <netinet/in.h>
+//#include <arpa/inet.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+
+#include "../../weechat-plugin.h"
+#include "../script.h"
+#include "weechat-ruby.h"
+#include "weechat-ruby-api.h"
+
+
+WEECHAT_PLUGIN_NAME("ruby");
+WEECHAT_PLUGIN_DESCRIPTION("Ruby plugin for WeeChat");
+WEECHAT_PLUGIN_AUTHOR("FlashCode <flashcode@flashtux.org>");
+WEECHAT_PLUGIN_VERSION("0.1");
+WEECHAT_PLUGIN_LICENSE("GPL");
+
+struct t_weechat_plugin *weechat_ruby_plugin = NULL;
+
+struct t_plugin_script *ruby_scripts = NULL;
+struct t_plugin_script *ruby_current_script = NULL;
+char *ruby_current_script_filename = NULL;
+
+VALUE ruby_mWeechat, ruby_mWeechatOutputs;
+
+#define MOD_NAME_PREFIX "WeechatRubyModule"
+int ruby_num = 0;
+
+char ruby_buffer_output[128];
+
+typedef struct protect_call_arg {
+ VALUE recv;
+ ID mid;
+ int argc;
+ VALUE *argv;
+} protect_call_arg_t;
+
+
+/*
+ * protect_funcall0 : used to protect a function call
+ */
+
+static VALUE
+protect_funcall0(VALUE arg)
+{
+ return rb_funcall2(((protect_call_arg_t *) arg)->recv,
+ ((protect_call_arg_t *) arg)->mid,
+ ((protect_call_arg_t *) arg)->argc,
+ ((protect_call_arg_t *) arg)->argv);
+}
+
+/*
+ * rb_protect_funcall : function call in protect mode
+ */
+
+VALUE
+rb_protect_funcall (VALUE recv, ID mid, int *state, int argc, ...)
+{
+ va_list ap;
+ VALUE *argv;
+ struct protect_call_arg arg;
+
+ if (argc > 0)
+ {
+ int i;
+ argv = ALLOCA_N(VALUE, argc);
+ va_start(ap, argc);
+ for (i = 0; i < argc; i++)
+ argv[i] = va_arg(ap, VALUE);
+ va_end(ap);
+ }
+ else
+ argv = 0;
+ arg.recv = recv;
+ arg.mid = mid;
+ arg.argc = argc;
+ arg.argv = argv;
+ return rb_protect(protect_funcall0, (VALUE) &arg, state);
+}
+
+/*
+ * weechat_ruby_exec: execute a Ruby script
+ */
+
+void *
+weechat_ruby_exec (struct t_plugin_script *script,
+ int ret_type, char *function, char **argv)
+{
+ VALUE rc, err;
+ int ruby_error, *ret_i;
+ void *ret_value;
+
+ ruby_current_script = script;
+
+ if (argv && argv[0])
+ {
+ if (argv[1])
+ {
+ if (argv[2])
+ {
+ if (argv[3])
+ {
+ if (argv[4])
+ {
+ rc = rb_protect_funcall ((VALUE) script->interpreter, rb_intern(function),
+ &ruby_error, 5,
+ rb_str_new2(argv[0]),
+ rb_str_new2(argv[1]),
+ rb_str_new2(argv[2]),
+ rb_str_new2(argv[3]),
+ rb_str_new2(argv[4]));
+ }
+ else
+ rc = rb_protect_funcall ((VALUE) script->interpreter, rb_intern(function),
+ &ruby_error, 4,
+ rb_str_new2(argv[0]),
+ rb_str_new2(argv[1]),
+ rb_str_new2(argv[2]),
+ rb_str_new2(argv[3]));
+ }
+ else
+ rc = rb_protect_funcall ((VALUE) script->interpreter, rb_intern(function),
+ &ruby_error, 3,
+ rb_str_new2(argv[0]),
+ rb_str_new2(argv[1]),
+ rb_str_new2(argv[2]));
+ }
+ else
+ rc = rb_protect_funcall ((VALUE) script->interpreter, rb_intern(function),
+ &ruby_error, 2,
+ rb_str_new2(argv[0]),
+ rb_str_new2(argv[1]));
+ }
+ else
+ rc = rb_protect_funcall ((VALUE) script->interpreter, rb_intern(function),
+ &ruby_error, 1,
+ rb_str_new2(argv[0]));
+ }
+ else
+ rc = rb_protect_funcall ((VALUE) script->interpreter, rb_intern(function),
+ &ruby_error, 0);
+
+ if (ruby_error)
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: unable to run function \"%s\""),
+ weechat_prefix ("error"), "ruby", function);
+
+ err = rb_inspect(rb_gv_get("$!"));
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: error: \"%s\""),
+ weechat_prefix ("error"), "ruby", STR2CSTR(err));
+
+ return NULL;
+ }
+
+ if ((TYPE(rc) == T_STRING) && (ret_type == WEECHAT_SCRIPT_EXEC_STRING))
+ {
+ if (STR2CSTR (rc))
+ ret_value = strdup (STR2CSTR (rc));
+ else
+ ret_value = NULL;
+ }
+ else if ((TYPE(rc) == T_FIXNUM) && (ret_type == WEECHAT_SCRIPT_EXEC_INT))
+ {
+ ret_i = (int *)malloc (sizeof(int));
+ if (ret_i)
+ *ret_i = NUM2INT(rc);
+ ret_value = ret_i;
+ }
+ else
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: function \"%s\" must return a "
+ "valid value"),
+ weechat_prefix ("error"), "ruby", function);
+ return WEECHAT_RC_OK;
+ }
+
+ if (ret_value == NULL)
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: not enough memory in function "
+ "\"%s\""),
+ weechat_prefix ("error"), "ruby", function);
+ return NULL;
+ }
+
+ return ret_value;
+}
+
+/*
+ * weechat_ruby_output: redirection for stdout and stderr
+ */
+
+static VALUE
+weechat_ruby_output (VALUE self, VALUE str)
+{
+ char *msg, *p, *m;
+
+ /* make C compiler happy */
+ (void) self;
+
+ msg = strdup(STR2CSTR(str));
+
+ m = msg;
+ while ((p = strchr (m, '\n')) != NULL)
+ {
+ *p = '\0';
+ if (strlen (m) + strlen (ruby_buffer_output) > 0)
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: stdout/stderr : %s%s"),
+ weechat_prefix ("error"), "ruby",
+ ruby_buffer_output, m);
+ }
+ *p = '\n';
+ ruby_buffer_output[0] = '\0';
+ m = ++p;
+ }
+
+ if (strlen(m) + strlen(ruby_buffer_output) > sizeof(ruby_buffer_output))
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: stdout/stderr : %s%s"),
+ weechat_prefix ("error"), "ruby",
+ ruby_buffer_output, m);
+ ruby_buffer_output[0] = '\0';
+ }
+ else
+ strcat (ruby_buffer_output, m);
+
+ if (msg)
+ free (msg);
+
+ return Qnil;
+}
+
+/*
+ * weechat_ruby_output_flush: just for compatibility
+ */
+
+static VALUE
+weechat_ruby_output_flush (VALUE self)
+{
+ /* make C compiler happy */
+ (void) self;
+
+ return Qnil;
+}
+
+
+/*
+ * weechat_ruby_load: load a Ruby script
+ */
+
+int
+weechat_ruby_load (char *filename)
+{
+ char modname[64];
+ VALUE curModule, ruby_retcode, err;
+ int ruby_error;
+ struct stat buf;
+
+ if (stat (filename, &buf) != 0)
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: script \"%s\" not found"),
+ weechat_prefix ("error"), "ruby", filename);
+ return 0;
+ }
+
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: loading script \"%s\""),
+ weechat_prefix ("info"), "ruby", filename);
+
+ ruby_current_script = NULL;
+
+ snprintf (modname, sizeof(modname), "%s%d", MOD_NAME_PREFIX, ruby_num);
+ ruby_num++;
+
+ curModule = rb_define_module(modname);
+
+ ruby_current_script_filename = filename;
+
+ ruby_retcode = rb_protect_funcall (curModule, rb_intern("load_eval_file"),
+ &ruby_error, 1, rb_str_new2(filename));
+
+ if (ruby_retcode == Qnil)
+ {
+ err = rb_inspect(rb_gv_get("$!"));
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: error: \"%s\""),
+ weechat_prefix ("error"), "ruby", STR2CSTR(err));
+ return 0;
+ }
+
+ if (NUM2INT(ruby_retcode) != 0)
+ {
+ VALUE ruby_eval_error;
+
+ switch (NUM2INT(ruby_retcode))
+ {
+ case 1:
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: unable to read file "
+ "\"%s\""),
+ weechat_prefix ("error"), "ruby", filename);
+ break;
+ case 2:
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: error while loading "
+ "file \"%s\""),
+ weechat_prefix ("error"), "ruby", filename);
+ break;
+ case 3:
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: unable to find "
+ "\"weechat_init\" function "
+ "in file \"%s\""),
+ weechat_prefix ("error"), "ruby", filename);
+ break;
+ }
+
+ if (NUM2INT(ruby_retcode) == 1 || NUM2INT(ruby_retcode) == 2)
+ {
+ ruby_eval_error = rb_iv_get(curModule, "@load_eval_file_error");
+ if (ruby_eval_error)
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: error: %s"),
+ weechat_prefix ("error"), "ruby",
+ STR2CSTR(ruby_eval_error));
+ }
+ }
+
+ return 0;
+ }
+
+ ruby_retcode = rb_protect_funcall (curModule, rb_intern("weechat_init"), &ruby_error, 0);
+
+ if (ruby_error)
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: unable to eval "
+ "\"weechat_init\" in file \"%s\""),
+ weechat_prefix ("error"), "ruby", filename);
+
+ err = rb_inspect(rb_gv_get("$!"));
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: error: \"%s\""),
+ weechat_prefix ("error"), "ruby", STR2CSTR(err));
+
+ if (ruby_current_script != NULL)
+ {
+ script_remove (weechat_ruby_plugin,
+ &ruby_scripts, ruby_current_script);
+ }
+
+ return 0;
+ }
+
+ if (ruby_current_script == NULL)
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: function \"register\" not "
+ "found (or failed) in file \"%s\""),
+ weechat_prefix ("error"), "ruby", filename);
+ return 0;
+ }
+
+ ruby_current_script->interpreter = (VALUE *) curModule;
+ rb_gc_register_address (ruby_current_script->interpreter);
+
+ return 1;
+}
+
+/*
+ * weechat_ruby_load_cb: callback for weechat_script_auto_load() function
+ */
+
+int
+weechat_ruby_load_cb (void *data, char *filename)
+{
+ /* make C compiler happy */
+ (void) data;
+
+ return weechat_ruby_load (filename);
+}
+
+/*
+ * weechat_ruby_unload: unload a Ruby script
+ */
+
+void
+weechat_ruby_unload (struct t_plugin_script *script)
+{
+ int *r;
+ char *ruby_argv[1] = { NULL };
+
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: unloading script \"%s\""),
+ weechat_prefix ("info"), "ruby", script->name);
+
+ if (script->shutdown_func && script->shutdown_func[0])
+ {
+ r = (int *) weechat_ruby_exec (script,
+ WEECHAT_SCRIPT_EXEC_INT,
+ script->shutdown_func,
+ ruby_argv);
+ if (r)
+ free (r);
+ }
+
+ if (script->interpreter)
+ rb_gc_unregister_address (script->interpreter);
+
+ script_remove (weechat_ruby_plugin, &ruby_scripts, script);
+}
+
+/*
+ * weechat_ruby_unload_name: unload a Ruby script by name
+ */
+
+void
+weechat_ruby_unload_name (char *name)
+{
+ struct t_plugin_script *ptr_script;
+
+ ptr_script = script_search (weechat_ruby_plugin, ruby_scripts, name);
+ if (ptr_script)
+ {
+ weechat_ruby_unload (ptr_script);
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: script \"%s\" unloaded"),
+ weechat_prefix ("info"), "ruby", name);
+ }
+ else
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: script \"%s\" not loaded"),
+ weechat_prefix ("error"), "ruby", name);
+ }
+}
+
+/*
+ * weechat_ruby_unload_all: unload all Ruby scripts
+ */
+
+void
+weechat_ruby_unload_all ()
+{
+ while (ruby_scripts)
+ {
+ weechat_ruby_unload (ruby_scripts);
+ }
+}
+
+/*
+ * weechat_ruby_command_cb: callback for "/ruby" command
+ */
+
+int
+weechat_ruby_command_cb (void *data, struct t_gui_buffer *buffer,
+ int argc, char **argv, char **argv_eol)
+{
+ //int handler_found, modifier_found;
+ char *path_script;
+ struct t_plugin_script *ptr_script;
+ //t_plugin_handler *ptr_handler;
+ //t_plugin_modifier *ptr_modifier;
+
+ /* make C compiler happy */
+ (void) data;
+ (void) buffer;
+
+ if (argc == 1)
+ {
+ /* list registered Ruby scripts */
+ weechat_printf (NULL, "");
+ weechat_printf (NULL,
+ weechat_gettext ("Registered %s scripts:"),
+ "ruby");
+ if (ruby_scripts)
+ {
+ for (ptr_script = ruby_scripts; ptr_script;
+ ptr_script = ptr_script->next_script)
+ {
+ weechat_printf (NULL,
+ weechat_gettext (" %s v%s (%s), by %s, "
+ "license %s"),
+ ptr_script->name,
+ ptr_script->version,
+ ptr_script->description,
+ ptr_script->author,
+ ptr_script->license);
+ }
+ }
+ else
+ weechat_printf (NULL, weechat_gettext (" (none)"));
+
+ /*
+ // list Ruby message handlers
+ plugin->print_server (plugin, "");
+ plugin->print_server (plugin, "Ruby message handlers:");
+ handler_found = 0;
+ for (ptr_handler = plugin->handlers;
+ ptr_handler; ptr_handler = ptr_handler->next_handler)
+ {
+ if ((ptr_handler->type == PLUGIN_HANDLER_MESSAGE)
+ && (ptr_handler->handler_args))
+ {
+ handler_found = 1;
+ plugin->print_server (plugin, " IRC(%s) => Ruby(%s)",
+ ptr_handler->irc_command,
+ ptr_handler->handler_args);
+ }
+ }
+ if (!handler_found)
+ plugin->print_server (plugin, " (none)");
+
+ // list Ruby command handlers
+ plugin->print_server (plugin, "");
+ plugin->print_server (plugin, "Ruby command handlers:");
+ handler_found = 0;
+ for (ptr_handler = plugin->handlers;
+ ptr_handler; ptr_handler = ptr_handler->next_handler)
+ {
+ if ((ptr_handler->type == PLUGIN_HANDLER_COMMAND)
+ && (ptr_handler->handler_args))
+ {
+ handler_found = 1;
+ plugin->print_server (plugin, " /%s => Ruby(%s)",
+ ptr_handler->command,
+ ptr_handler->handler_args);
+ }
+ }
+ if (!handler_found)
+ plugin->print_server (plugin, " (none)");
+
+ // list Ruby timer handlers
+ plugin->print_server (plugin, "");
+ plugin->print_server (plugin, "Ruby timer handlers:");
+ handler_found = 0;
+ for (ptr_handler = plugin->handlers;
+ ptr_handler; ptr_handler = ptr_handler->next_handler)
+ {
+ if ((ptr_handler->type == PLUGIN_HANDLER_TIMER)
+ && (ptr_handler->handler_args))
+ {
+ handler_found = 1;
+ plugin->print_server (plugin, " %d seconds => Ruby(%s)",
+ ptr_handler->interval,
+ ptr_handler->handler_args);
+ }
+ }
+ if (!handler_found)
+ plugin->print_server (plugin, " (none)");
+
+ // list Ruby keyboard handlers
+ plugin->print_server (plugin, "");
+ plugin->print_server (plugin, "Ruby keyboard handlers:");
+ handler_found = 0;
+ for (ptr_handler = plugin->handlers;
+ ptr_handler; ptr_handler = ptr_handler->next_handler)
+ {
+ if ((ptr_handler->type == PLUGIN_HANDLER_KEYBOARD)
+ && (ptr_handler->handler_args))
+ {
+ handler_found = 1;
+ plugin->print_server (plugin, " Ruby(%s)",
+ ptr_handler->handler_args);
+ }
+ }
+ if (!handler_found)
+ plugin->print_server (plugin, " (none)");
+
+ // list Ruby event handlers
+ plugin->print_server (plugin, "");
+ plugin->print_server (plugin, "Ruby event handlers:");
+ handler_found = 0;
+ for (ptr_handler = plugin->handlers;
+ ptr_handler; ptr_handler = ptr_handler->next_handler)
+ {
+ if ((ptr_handler->type == PLUGIN_HANDLER_EVENT)
+ && (ptr_handler->handler_args))
+ {
+ handler_found = 1;
+ plugin->print_server (plugin, " %s => Ruby(%s)",
+ ptr_handler->event,
+ ptr_handler->handler_args);
+ }
+ }
+ if (!handler_found)
+ plugin->print_server (plugin, " (none)");
+
+ // list Ruby modifiers
+ plugin->print_server (plugin, "");
+ plugin->print_server (plugin, "Ruby modifiers:");
+ modifier_found = 0;
+ for (ptr_modifier = plugin->modifiers;
+ ptr_modifier; ptr_modifier = ptr_modifier->next_modifier)
+ {
+ modifier_found = 1;
+ if (ptr_modifier->type == PLUGIN_MODIFIER_IRC_IN)
+ plugin->print_server (plugin, " IRC(%s, %s) => Ruby(%s)",
+ ptr_modifier->command,
+ PLUGIN_MODIFIER_IRC_IN_STR,
+ ptr_modifier->modifier_args);
+ else if (ptr_modifier->type == PLUGIN_MODIFIER_IRC_USER)
+ plugin->print_server (plugin, " IRC(%s, %s) => Ruby(%s)",
+ ptr_modifier->command,
+ PLUGIN_MODIFIER_IRC_USER_STR,
+ ptr_modifier->modifier_args);
+ else if (ptr_modifier->type == PLUGIN_MODIFIER_IRC_OUT)
+ plugin->print_server (plugin, " IRC(%s, %s) => Ruby(%s)",
+ ptr_modifier->command,
+ PLUGIN_MODIFIER_IRC_OUT_STR,
+ ptr_modifier->modifier_args);
+ }
+ if (!modifier_found)
+ plugin->print_server (plugin, " (none)");
+ */
+ }
+ else if (argc == 2)
+ {
+ if (weechat_strcasecmp (argv[1], "autoload") == 0)
+ {
+ script_auto_load (weechat_ruby_plugin,
+ "ruby", &weechat_ruby_load_cb);
+ }
+ else if (weechat_strcasecmp (argv[1], "reload") == 0)
+ {
+ weechat_ruby_unload_all ();
+ script_auto_load (weechat_ruby_plugin,
+ "ruby", &weechat_ruby_load_cb);
+ }
+ else if (weechat_strcasecmp (argv[1], "unload") == 0)
+ {
+ weechat_ruby_unload_all ();
+ }
+ }
+ else
+ {
+ if (weechat_strcasecmp (argv[1], "load") == 0)
+ {
+ /* load Ruby script */
+ path_script = script_search_full_name (weechat_ruby_plugin,
+ "ruby", argv_eol[2]);
+ weechat_ruby_load ((path_script) ? path_script : argv_eol[2]);
+ if (path_script)
+ free (path_script);
+ }
+ else if (weechat_strcasecmp (argv[1], "unload") == 0)
+ {
+ /* unload Ruby script */
+ weechat_ruby_unload_name (argv_eol[2]);
+ }
+ else
+ {
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: unknown option for "
+ "command \"%s\""),
+ weechat_prefix ("error"), "ruby", "ruby");
+ }
+ }
+
+ return WEECHAT_RC_OK;
+}
+
+/*
+ * weechat_ruby_dump_data_cb: dump Ruby plugin data in WeeChat log file
+ */
+
+int
+weechat_ruby_dump_data_cb (void *data, char *signal, char *type_data,
+ void *signal_data)
+{
+ /* make C compiler happy */
+ (void) data;
+ (void) signal;
+ (void) type_data;
+ (void) signal_data;
+
+ script_print_log (weechat_ruby_plugin, ruby_scripts);
+
+ return WEECHAT_RC_OK;
+}
+
+/*
+ * weechat_plugin_init: initialize Ruby plugin
+ */
+
+int
+weechat_plugin_init (struct t_weechat_plugin *plugin)
+{
+ int ruby_error;
+ char *weechat_ruby_code =
+ {
+ "$stdout = WeechatOutputs\n"
+ "$stderr = WeechatOutputs\n"
+ "\n"
+ "class Module\n"
+ " @load_eval_file_error = ''\n"
+ "\n"
+ " def load_eval_file (file)\n"
+ " lines = ''\n"
+ " begin\n"
+ " f = File.open(file, 'r')\n"
+ " lines = f.readlines.join\n"
+ " rescue => e\n"
+ " @load_eval_file_error = e\n"
+ " return 1\n"
+ " end\n"
+ "\n"
+ " begin\n"
+ " module_eval(lines)\n"
+ " rescue => e\n"
+ " @load_eval_file_error = e\n"
+ " return 2\n"
+ " end\n"
+ "\n"
+ " has_init = false\n"
+ "\n"
+ " instance_methods.each do |meth|\n"
+ " if meth == 'weechat_init'\n"
+ " has_init = true\n"
+ " end\n"
+ " module_eval('module_function :' + meth)\n"
+ " end\n"
+ "\n"
+ " unless has_init\n"
+ " return 3\n"
+ " end\n"
+ "\n"
+ " return 0\n"
+ " end\n"
+ "end\n"
+ };
+
+ weechat_ruby_plugin = plugin;
+
+ ruby_error = 0;
+
+ /* init stdout/stderr buffer */
+ ruby_buffer_output[0] = '\0';
+
+ ruby_init ();
+ ruby_init_loadpath ();
+ ruby_script ("__weechat_plugin__");
+
+ ruby_mWeechat = rb_define_module("Weechat");
+ weechat_ruby_api_init (ruby_mWeechat);
+
+ /* redirect stdin and stdout */
+ ruby_mWeechatOutputs = rb_define_module("WeechatOutputs");
+ rb_define_singleton_method(ruby_mWeechatOutputs, "write", weechat_ruby_output, 1);
+ rb_define_singleton_method(ruby_mWeechatOutputs, "puts", weechat_ruby_output, 1);
+ rb_define_singleton_method(ruby_mWeechatOutputs, "p", weechat_ruby_output, 1);
+ rb_define_singleton_method(ruby_mWeechatOutputs, "flush", weechat_ruby_output_flush, 0);
+
+ rb_eval_string_protect(weechat_ruby_code, &ruby_error);
+ if (ruby_error)
+ {
+ VALUE ruby_error_info = rb_inspect(ruby_errinfo);
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: unable to eval weechat ruby "
+ "internal code"),
+ weechat_prefix ("error"), "ruby");
+ weechat_printf (NULL,
+ weechat_gettext ("%s%s: error: %s"),
+ weechat_prefix ("error"), "ruby",
+ STR2CSTR(ruby_error_info));
+ return WEECHAT_RC_ERROR;
+ }
+
+ weechat_hook_command ("ruby",
+ weechat_gettext ("list/load/unload Ruby scripts"),
+ weechat_gettext ("[load filename] | [autoload] | "
+ "[reload] | [unload [script]]"),
+ weechat_gettext ("filename: Ruby script (file) to "
+ "load\n"
+ "script: script name to unload\n\n"
+ "Without argument, /ruby command "
+ "lists all loaded Ruby scripts."),
+ "load|autoload|reload|unload %f",
+ &weechat_ruby_command_cb, NULL);
+
+ weechat_mkdir_home ("ruby", 0644);
+ weechat_mkdir_home ("ruby/autoload", 0644);
+
+ weechat_hook_signal ("dump_data", &weechat_ruby_dump_data_cb, NULL);
+
+ script_init (weechat_ruby_plugin);
+ script_auto_load (weechat_ruby_plugin,
+ "ruby", &weechat_ruby_load_cb);
+
+ /* init ok */
+ return WEECHAT_RC_OK;
+}
+
+/*
+ * weechat_plugin_end: shutdown Ruby interface
+ */
+
+void
+weechat_plugin_end (struct t_weechat_plugin *plugin)
+{
+ /* make C compiler happy */
+ (void) plugin;
+
+ /* unload all scripts */
+ weechat_ruby_unload_all ();
+
+ ruby_finalize();
+}
diff --git a/src/plugins/scripts/ruby/weechat-ruby.h b/src/plugins/scripts/ruby/weechat-ruby.h
new file mode 100644
index 000000000..db07bd5be
--- /dev/null
+++ b/src/plugins/scripts/ruby/weechat-ruby.h
@@ -0,0 +1,34 @@
+/*
+ * Copyright (c) 2003-2008 by FlashCode <flashcode@flashtux.org>
+ * See README for License detail, AUTHORS for developers list.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#ifndef __WEECHAT_RUBY_H
+#define __WEECHAT_RUBY_H 1
+
+#define weechat_plugin weechat_ruby_plugin
+
+extern struct t_weechat_plugin *weechat_ruby_plugin;
+
+extern struct t_plugin_script *ruby_scripts;
+extern struct t_plugin_script *ruby_current_script;
+extern char *ruby_current_script_filename;
+
+extern void * weechat_ruby_exec (struct t_plugin_script *script,
+ int ret_type, char *function, char **argv);
+
+#endif /* weechat-perl.h */