source: trollforge/irc/minv/minv.c @ 608 Tweet

#include "../xchat-plugin.h"

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

/* if this is defined, minv will always turn on net_throttle before doing
   the massinvite to make ultra sure you don't flood off
   downside: it makes massinviting really fucking slow */
#define AUTO_THROTTLE

static xchat_plugin *ph;

static int
minv(char *word[], char *word_eol[], void *userdata)
{
        #ifdef AUTO_THROTTLE
        const char *junk;
        int throttle;
        #endif
        unsigned long int i;
        unsigned long int numusrs = 0;
        char prefix;
        char **ulist = NULL;
        xchat_list *users;

        if (xchat_nickcmp(ph, word[2], xchat_get_info(ph, "channel")) == 0) {
                xchat_print(ph, "From and to channels are the same.");
                return XCHAT_EAT_ALL;
        }

        users = xchat_list_get(ph, "users");

        if (users) {

                #ifdef AUTO_THROTTLE
                /* turn on throttle so we don't flood off */
                if (xchat_get_prefs(ph, "net_throttle", &junk, &throttle) != 3) {
                        xchat_print(ph, "assuming net_throttle is off");
                        throttle = 0;
                }
                if (throttle != 1) {
                        xchat_command(ph, "SET net_throttle 1");
                }
                #endif
        
                while (xchat_list_next(ph, users)) {

                        /* don't /invite unwanted people if desired */
                        prefix = *(xchat_list_str(ph, users, "prefix"));
                        if ((*(word[3]) != '\0') && (prefix != '\0')) {
                                if (strchr(word[3], prefix) != NULL) {
                                        continue;
                                }
                        }

                        numusrs++;
                        ulist = realloc(ulist, sizeof(char *) * numusrs);
                        ulist[numusrs - 1] = malloc(strlen(xchat_list_str(ph, users, "nick")));
                        if (ulist[numusrs - 1] == NULL) {
                                return XCHAT_EAT_ALL;
                        }
                        strcpy(ulist[numusrs - 1], xchat_list_str(ph, users, "nick"));
                }
                xchat_list_free(ph, users);

                /* start the invite spree */
                for (i = 0; i < numusrs; i++) {
                        xchat_commandf(ph, "INVITE %s %s", ulist[i], word[2]);
                        free(ulist[i]);
                }
                
                free(ulist);
                
                #ifdef AUTO_THROTTLE
                xchat_commandf(ph, "SET net_throttle %i", throttle);
                #endif

        }

        xchat_print(ph, "Mass invite complete.");
        return XCHAT_EAT_ALL;
}

static int
minvf(char *word[], char *word_eol[], void *userdata)
{
        #ifdef AUTO_THROTTLE
        const char *junk;
        int throttle;
        #endif
        char *chan;
        size_t chanlen;
        char *nick;
        FILE *nickfile;
        
        nickfile = fopen(word[2], "r");
        if (nickfile == NULL) {
                xchat_printf(ph, "Couldn't open %s.", word[2]);
                return XCHAT_EAT_ALL;
        }

        chanlen = strlen(xchat_get_info(ph, "channel"));
        chan = malloc(chanlen + 1);
        if (chan == NULL) {
                return XCHAT_EAT_ALL;
        }
        strncpy(chan, xchat_get_info(ph, "channel"), chanlen);
        chan[chanlen] = '\0';
                
        nick = malloc(100);
        if (nick == NULL) {
                fclose(nickfile);
                return XCHAT_EAT_ALL;
        }

        #ifdef AUTO_THROTTLE
        
        /* turn on throttle so we don't flood off */
        if (xchat_get_prefs(ph, "net_throttle", &junk, &throttle) != 3) {
                xchat_print(ph, "assuming net_throttle is off");
                throttle = 0;
        }
        if (throttle != 1) {
                xchat_command(ph, "SET net_throttle 1");
        }
        
        #endif
        
        while (!feof(nickfile)) {
                fgets(nick, 100, nickfile);
                if (strrchr(nick, '\n')) {
                        *(strrchr(nick, '\n')) = '\0';
                }
                xchat_commandf(ph, "INVITE %s %s", nick, chan);
        }

        fclose(nickfile);
        free(nick);

        #ifdef AUTO_THROTTLE
        xchat_commandf(ph, "SET net_throttle %i", throttle);
        #endif

        return XCHAT_EAT_ALL;
}

int
xchat_plugin_init(xchat_plugin *plugin_handle, char **plugin_name, char **plugin_desc, char **plugin_version, char *arg)
{
        ph = plugin_handle;

        *plugin_name = "Minv";
        *plugin_desc = "Adds /minv and /minvf commands";
        *plugin_version = "0.3.2";

        xchat_hook_command(ph, "MINV", XCHAT_PRI_NORM, minv, "Usage: MINV <chanto> <noprefix>\nInvite everybody in the current channel into <chanto>.\nIf any second argument (<noprefix>) then those with a nick prefix included in <noprefix> is not invited.", NULL);
        xchat_hook_command(ph, "MINVF", XCHAT_PRI_NORM, minvf, "Usage: MINVF <nickfile>\nInvite each nick listed in <nickfile> to the current channel.", NULL);

        xchat_print(ph, "Minv loaded successfully.");

        return 1;
}