Renamed sources files in script plugins

2026-06-25 04:16:38 +02:00 · 2007-10-31 17:39:25 +01:00
parent c008e6474d
commit 02c0dec9cb
16 changed files with 53 additions and 53 deletions
@@ -0,0 +1,662 @@
+/*
+ * Copyright (c) 2003-2007 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/>.
+ */
+
+/* scripts.c: script interface for WeeChat plugins */
+
+
+#include <stdlib.h>
+#include <unistd.h>
+#include <stdarg.h>
+#include <stdio.h>
+#include <string.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <dirent.h>
+
+#include "../weechat-plugin.h"
+#include "weechat-script.h"
+
+
+/*
+ * weechat_script_auto_load: auto-load all scripts in a directory
+ */
+
+void
+weechat_script_auto_load (t_weechat_plugin *plugin, char *language,
+                          int (*callback)(t_weechat_plugin *, char *))
+{
+    char *dir_home, *dir_name;
+    int dir_length;
+    
+    /* build directory, adding WeeChat home */
+    dir_home = plugin->get_info (plugin, "weechat_dir", NULL);
+    if (!dir_home)
+        return;
+    dir_length = strlen (dir_home) + strlen (language) + 16;
+    dir_name =
+        (char *) malloc (dir_length * sizeof (char));
+    if (!dir_name)
+    {
+        free (dir_home);
+        return;
+    }
+    snprintf (dir_name, dir_length, "%s/%s/autoload", dir_home, language);
+    
+    plugin->exec_on_files (plugin, dir_name, callback);
+    
+    free (dir_name);
+    free (dir_home);
+}
+
+/*
+ * weechat_script_search: search a script in list
+ */
+
+t_plugin_script *
+weechat_script_search (t_weechat_plugin *plugin,
+                       t_plugin_script **list, char *name)
+{
+    t_plugin_script *ptr_script;
+    
+    for (ptr_script = *list; ptr_script;
+         ptr_script = ptr_script->next_script)
+    {
+        if (plugin->strcasecmp (plugin, ptr_script->name, name) == 0)
+            return ptr_script;
+    }
+    
+    /* script not found */
+    return NULL;
+}
+
+/*
+ * weechat_script_search_full_name: search the full path name of a script
+ */
+
+char *
+weechat_script_search_full_name (t_weechat_plugin *plugin,
+                                 char *language, char *filename)
+{
+    char *final_name, *dir_home, *dir_system;
+    int length;
+    struct stat st;
+    
+    if (filename[0] == '~')
+    {
+        dir_home = getenv ("HOME");
+        if (!dir_home)
+            return NULL;
+        length = strlen (dir_home) + strlen (filename + 1) + 1;
+        final_name = (char *) malloc (length);
+        if (final_name)
+        {
+            snprintf (final_name, length, "%s%s", dir_home, filename + 1);
+            return final_name;
+        }
+        return NULL;
+    }
+
+    /* try WeeChat user's autoload dir */
+    dir_home = plugin->get_info (plugin, "weechat_dir", NULL);
+    if (dir_home)
+    {
+        length = strlen (dir_home) + strlen (language) + 8 + strlen (filename) + 16;
+        final_name = (char *) malloc (length);
+        if (final_name)
+        {
+            snprintf (final_name, length, "%s/%s/autoload/%s", dir_home, language, filename);
+            if ((stat (final_name, &st) == 0) && (st.st_size > 0))
+            {
+                free (dir_home);
+                return final_name;
+            }
+            free (final_name);
+        }
+        free (dir_home);
+    }
+    
+    /* try WeeChat language user's dir */
+    dir_home = plugin->get_info (plugin, "weechat_dir", NULL);
+    if (dir_home)
+    {
+        length = strlen (dir_home) + strlen (language) + strlen (filename) + 16;
+        final_name = (char *) malloc (length);
+        if (final_name)
+        {
+            snprintf (final_name, length, "%s/%s/%s", dir_home, language, filename);
+            if ((stat (final_name, &st) == 0) && (st.st_size > 0))
+            {
+                free (dir_home);
+                return final_name;
+            }
+            free (final_name);
+        }
+        free (dir_home);
+    }
+    
+    /* try WeeChat user's dir */
+    dir_home = plugin->get_info (plugin, "weechat_dir", NULL);
+    if (dir_home)
+    {
+        length = strlen (dir_home) + strlen (filename) + 16;
+        final_name = (char *) malloc (length);
+        if (final_name)
+        {
+            snprintf (final_name, length, "%s/%s", dir_home, filename);
+            if ((stat (final_name, &st) == 0) && (st.st_size > 0))
+            {
+                free (dir_home);
+                return final_name;
+            }
+            free (final_name);
+        }
+        free (dir_home);
+    }
+
+    /* try WeeChat system dir */
+    dir_system = plugin->get_info (plugin, "weechat_sharedir", NULL);
+    if (dir_system)
+    {
+        length = strlen (dir_system) + strlen (dir_system) + strlen (filename) + 16;
+        final_name = (char *) malloc (length);
+        if (final_name)
+        {
+            snprintf (final_name,length, "%s/%s/%s", dir_system, language, filename);
+            if ((stat (final_name, &st) == 0) && (st.st_size > 0))
+            {
+                free (dir_system);
+                return final_name;
+            }
+            free (final_name);
+        }
+        free (dir_system);
+    }
+
+    return strdup(filename);
+}
+
+/*
+ * weechat_script_add: add a script to list of scripts
+ */
+
+t_plugin_script *
+weechat_script_add (t_weechat_plugin *plugin,
+                    t_plugin_script **script_list,
+                    char *filename,
+                    char *name, char *version,
+                    char *shutdown_func, char *description,
+                    char *charset)
+{
+    t_plugin_script *new_script;
+    
+    if (strchr (name, ' '))
+    {
+        plugin->print_server (plugin,
+                              "Error: unable to load script "
+                              "\"%s\" (bad name, spaces are forbidden)",
+                              name);
+        return NULL;
+    }
+    
+    new_script = (t_plugin_script *)malloc (sizeof (t_plugin_script));
+    if (new_script)
+    {
+        new_script->filename = strdup (filename);
+        new_script->interpreter = NULL;
+        new_script->name = strdup (name);
+        new_script->version = strdup (version);
+        new_script->shutdown_func = strdup (shutdown_func);
+        new_script->description = strdup (description);
+        new_script->charset = (charset) ? strdup (charset) : NULL;
+        
+        /* add new script to list */
+        if ((*script_list))
+            (*script_list)->prev_script = new_script;
+        new_script->prev_script = NULL;
+        new_script->next_script = (*script_list);
+        (*script_list) = new_script;
+        return new_script;
+    }
+
+    plugin->print_server (plugin,
+                          "Error: unable to load script "
+                          "\"%s\" (not enough memory)",
+                          name);
+    return NULL;
+}
+
+/*
+ * weechat_script_remove: remove a script from list of scripts
+ */
+
+void
+weechat_script_remove (t_weechat_plugin *plugin,
+                       t_plugin_script **script_list, t_plugin_script *script)
+{
+    t_plugin_handler *ptr_handler, *next_handler;
+    t_plugin_modifier *ptr_modifier, *next_modifier;
+    
+    /* remove all handlers pointing to script */
+    ptr_handler = plugin->handlers;
+    while (ptr_handler)
+    {
+        if ((t_plugin_script *)ptr_handler->handler_pointer == script)
+        {
+            next_handler = ptr_handler->next_handler;
+            plugin->handler_remove (plugin, ptr_handler);
+            ptr_handler = next_handler;
+        }
+        else
+            ptr_handler = ptr_handler->next_handler;
+    }
+    
+    /* remove all modifiers pointing to script */
+    ptr_modifier = plugin->modifiers;
+    while (ptr_modifier)
+    {
+        if ((t_plugin_script *)ptr_modifier->modifier_pointer == script)
+        {
+            next_modifier = ptr_modifier->next_modifier;
+            plugin->modifier_remove (plugin, ptr_modifier);
+            ptr_modifier = next_modifier;
+        }
+        else
+            ptr_modifier = ptr_modifier->next_modifier;
+    }
+    
+    /* free data */
+    if (script->filename)
+        free (script->filename);
+    if (script->name)
+        free (script->name);
+    if (script->description)
+        free (script->description);
+    if (script->version)
+        free (script->version);
+    if (script->shutdown_func)
+        free (script->shutdown_func);
+    if (script->charset)
+        free (script->charset);
+    
+    /* remove script from list */
+    if (script->prev_script)
+        (script->prev_script)->next_script = script->next_script;
+    else
+        (*script_list) = script->next_script;
+    if (script->next_script)
+        (script->next_script)->prev_script = script->prev_script;
+    
+    /* free script */
+    free (script);
+}
+
+/*
+ * weechat_script_print: print a message on a server or channel buffer
+ */
+
+void
+weechat_script_print (t_weechat_plugin *plugin,
+                      t_plugin_script *script,
+                      char *server, char *channel,
+                      char *message, ...)
+{
+    va_list argptr;
+    static char buf[8192];
+    char *buf2;
+    
+    va_start (argptr, message);
+    vsnprintf (buf, sizeof (buf) - 1, message, argptr);
+    va_end (argptr);
+    
+    buf2 = (script->charset && script->charset[0]) ?
+        plugin->iconv_to_internal (plugin, script->charset, buf) : NULL;
+    plugin->print (plugin, server, channel, "%s", (buf2) ? buf2 : buf);
+    if (buf2)
+        free (buf2);
+}
+
+/*
+ * weechat_script_print_server: print a message on server buffer
+ */
+
+void
+weechat_script_print_server (t_weechat_plugin *plugin,
+                             t_plugin_script *script,
+                             char *message, ...)
+{
+    va_list argptr;
+    static char buf[8192];
+    char *buf2;
+    
+    va_start (argptr, message);
+    vsnprintf (buf, sizeof (buf) - 1, message, argptr);
+    va_end (argptr);
+    
+    buf2 = (script->charset && script->charset[0]) ?
+        plugin->iconv_to_internal (plugin, script->charset, buf) : NULL;
+    plugin->print_server (plugin, "%s", (buf2) ? buf2 : buf);
+    if (buf2)
+        free (buf2);
+}
+
+/*
+ * weechat_script_print_infobar: print a message in infobar
+ */
+
+void
+weechat_script_print_infobar (t_weechat_plugin *plugin,
+                              t_plugin_script *script,
+                              int time_displayed, char *message, ...)
+{
+    va_list argptr;
+    static char buf[1024];
+    char *buf2;
+    
+    va_start (argptr, message);
+    vsnprintf (buf, sizeof (buf) - 1, message, argptr);
+    va_end (argptr);
+    
+    buf2 = (script->charset && script->charset[0]) ?
+        plugin->iconv_to_internal (plugin, script->charset, buf) : NULL;
+    plugin->print_infobar (plugin, time_displayed, "%s", (buf2) ? buf2 : buf);
+    if (buf2)
+        free (buf2);
+}
+
+/*
+ * weechat_script_log: add a message in buffer log file
+ */
+
+void
+weechat_script_log (t_weechat_plugin *plugin,
+                    t_plugin_script *script,
+                    char *server, char *channel, char *message, ...)
+{
+    va_list argptr;
+    static char buf[1024];
+    char *buf2;
+    
+    va_start (argptr, message);
+    vsnprintf (buf, sizeof (buf) - 1, message, argptr);
+    va_end (argptr);
+    
+    buf2 = (script->charset && script->charset[0]) ?
+        plugin->iconv_to_internal (plugin, script->charset, buf) : NULL;
+    plugin->log (plugin, server, channel, "%s", (buf2) ? buf2 : buf);
+    if (buf2)
+        free (buf2);
+}
+
+/*
+ * weechat_script_exec_command: execute a command (simulate user entry)
+ */
+
+void
+weechat_script_exec_command (t_weechat_plugin *plugin,
+                             t_plugin_script *script,
+                             char *server, char *channel, char *command)
+{
+    char *command2;
+    
+    command2 = (script->charset && script->charset[0]) ?
+        plugin->iconv_to_internal (plugin, script->charset, command) : NULL;
+    plugin->exec_command (plugin, server, channel,
+                          (command2) ? command2 : command);
+    if (command2)
+        free (command2);
+}
+
+/*
+ * weechat_script_remove_handler: remove a handler for a script
+ *                                for a msg handler, arg1=irc command, arg2=function
+ *                                for a cmd handler, arg1=command, arg2=function
+ */
+
+void
+weechat_script_remove_handler (t_weechat_plugin *plugin,
+                               t_plugin_script *script,
+                               char *arg1, char *arg2)
+{
+    t_plugin_handler *ptr_handler, *next_handler;
+    char *ptr_arg1;
+    
+    /* search and remove handlers */
+    ptr_handler = plugin->handlers;
+    while (ptr_handler)
+    {
+        ptr_arg1 = NULL;
+        if (ptr_handler->type == PLUGIN_HANDLER_MESSAGE)
+            ptr_arg1 = ptr_handler->irc_command;
+        else if (ptr_handler->type == PLUGIN_HANDLER_COMMAND)
+            ptr_arg1 = ptr_handler->command;
+        
+        if ((ptr_arg1)
+            && ((t_plugin_script *)ptr_handler->handler_pointer == script)
+            && (plugin->strcasecmp (plugin, ptr_arg1, arg1) == 0)
+            && (plugin->strcasecmp (plugin, ptr_handler->handler_args, arg2) == 0))
+        {
+            next_handler = ptr_handler->next_handler;
+            plugin->handler_remove (plugin, ptr_handler);
+            ptr_handler = next_handler;
+        }
+        else
+            ptr_handler = ptr_handler->next_handler;
+    }
+}
+
+/*
+ * weechat_script_remove_timer_handler: remove a timer handler for a script
+ */
+
+void
+weechat_script_remove_timer_handler (t_weechat_plugin *plugin,
+                                     t_plugin_script *script,
+                                     char *function)
+{
+    t_plugin_handler *ptr_handler, *next_handler;
+    
+    /* search and remove timer handlers */
+    ptr_handler = plugin->handlers;
+    while (ptr_handler)
+    {
+        if ((ptr_handler->type == PLUGIN_HANDLER_TIMER)
+            && ((t_plugin_script *)ptr_handler->handler_pointer == script)
+            && (plugin->strcasecmp (plugin, ptr_handler->handler_args, function) == 0))
+        {
+            next_handler = ptr_handler->next_handler;
+            plugin->handler_remove (plugin, ptr_handler);
+            ptr_handler = next_handler;
+        }
+        else
+            ptr_handler = ptr_handler->next_handler;
+    }
+}
+
+/*
+ * weechat_script_remove_keyboard_handler: remove a keyboard handler for a script
+ */
+
+void
+weechat_script_remove_keyboard_handler (t_weechat_plugin *plugin,
+                                        t_plugin_script *script,
+                                        char *function)
+{
+    t_plugin_handler *ptr_handler, *next_handler;
+    
+    /* search and remove keyboard handlers */
+    ptr_handler = plugin->handlers;
+    while (ptr_handler)
+    {
+        if ((ptr_handler->type == PLUGIN_HANDLER_KEYBOARD)
+            && ((t_plugin_script *)ptr_handler->handler_pointer == script)
+            && (plugin->strcasecmp (plugin, ptr_handler->handler_args, function) == 0))
+        {
+            next_handler = ptr_handler->next_handler;
+            plugin->handler_remove (plugin, ptr_handler);
+            ptr_handler = next_handler;
+        }
+        else
+            ptr_handler = ptr_handler->next_handler;
+    }
+}
+
+/*
+ * weechat_script_remove_event_handler: remove an event handler for a script
+ */
+
+void
+weechat_script_remove_event_handler (t_weechat_plugin *plugin,
+                                     t_plugin_script *script,
+                                     char *function)
+{
+    t_plugin_handler *ptr_handler, *next_handler;
+    
+    /* search and remove timer handlers */
+    ptr_handler = plugin->handlers;
+    while (ptr_handler)
+    {
+        if ((ptr_handler->type == PLUGIN_HANDLER_EVENT)
+            && ((t_plugin_script *)ptr_handler->handler_pointer == script)
+            && (plugin->strcasecmp (plugin, ptr_handler->handler_args, function) == 0))
+        {
+            next_handler = ptr_handler->next_handler;
+            plugin->handler_remove (plugin, ptr_handler);
+            ptr_handler = next_handler;
+        }
+        else
+            ptr_handler = ptr_handler->next_handler;
+    }
+}
+
+/*
+ * weechat_script_remove_modifier: remove a modifier
+ *                                 arg1=type, arg2=command, arg3=function
+ */
+
+void
+weechat_script_remove_modifier (t_weechat_plugin *plugin,
+                                t_plugin_script *script,
+                                char *arg1, char *arg2, char *arg3)
+{
+    t_plugin_modifier *ptr_modifier, *next_modifier;
+    t_plugin_modifier_type type;
+    char *ptr_arg2;
+
+    if (strcasecmp (arg1, PLUGIN_MODIFIER_IRC_IN_STR) == 0)
+        type = PLUGIN_MODIFIER_IRC_IN;
+    else if (strcasecmp (arg1, PLUGIN_MODIFIER_IRC_USER_STR) == 0)
+        type = PLUGIN_MODIFIER_IRC_USER;
+    else if (strcasecmp (arg1, PLUGIN_MODIFIER_IRC_OUT_STR) == 0)
+        type = PLUGIN_MODIFIER_IRC_OUT;
+    else
+        return;
+    
+    /* search and remove modifiers */
+    ptr_modifier = plugin->modifiers;
+    while (ptr_modifier)
+    {
+        ptr_arg2 = NULL;
+        if (ptr_modifier->type == type)
+            ptr_arg2 = ptr_modifier->command;
+        
+        if ((ptr_arg2)
+            && ((t_plugin_script *)ptr_modifier->modifier_pointer == script)
+            && (plugin->strcasecmp (plugin, ptr_arg2, arg2) == 0)
+            && (plugin->strcasecmp (plugin, ptr_modifier->modifier_args, arg3) == 0))
+        {
+            next_modifier = ptr_modifier->next_modifier;
+            plugin->modifier_remove (plugin, ptr_modifier);
+            ptr_modifier = next_modifier;
+        }
+        else
+            ptr_modifier = ptr_modifier->next_modifier;
+    }
+}
+
+/*
+ * weechat_script_get_plugin_config: get a value of a script option
+ *                                   format in file is: plugin.script.option=value
+ */
+
+char *
+weechat_script_get_plugin_config (t_weechat_plugin *plugin,
+                                  t_plugin_script *script,
+                                  char *option)
+{
+    char *option_fullname, *return_value;
+    
+    option_fullname = (char *)malloc (strlen (script->name) +
+                                      strlen (option) + 2);
+    if (!option_fullname)
+        return NULL;
+    
+    strcpy (option_fullname, script->name);
+    strcat (option_fullname, ".");
+    strcat (option_fullname, option);
+    
+    return_value = plugin->get_plugin_config (plugin, option_fullname);
+    free (option_fullname);
+    
+    return return_value;
+}
+
+/*
+ * weechat_script_set_plugin_config: set value of a script config option
+ *                                   format in file is: plugin.script.option=value
+ */
+
+int
+weechat_script_set_plugin_config (t_weechat_plugin *plugin,
+                                  t_plugin_script *script,
+                                  char *option, char *value)
+{
+    char *option_fullname;
+    int return_code;
+    
+    option_fullname = (char *)malloc (strlen (script->name) +
+                                      strlen (option) + 2);
+    if (!option_fullname)
+        return 0;
+    
+    strcpy (option_fullname, script->name);
+    strcat (option_fullname, ".");
+    strcat (option_fullname, option);
+    
+    return_code = plugin->set_plugin_config (plugin, option_fullname, value);
+    free (option_fullname);
+    
+    return return_code;
+}
+
+/*
+ * weechat_script_set_charset: set charset for script
+ */
+
+void
+weechat_script_set_charset (t_weechat_plugin *plugin,
+                            t_plugin_script *script,
+                            char *charset)
+{
+    /* make C compiler happy */
+    (void) plugin;
+    
+    if (script->charset)
+        free (script->charset);
+    
+    script->charset = (charset) ? strdup (charset) : NULL;
+}