src/modules/NeonFun.mod/bot_NeonFun.c

   1 /* bot_NeonFun.c - NeonServ v5.4
   2  * Copyright (C) 2011-2012  Philipp Kreil (pk910)
   3  *
   4  * This program is free software: you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation, either version 3 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program. If not, see <http://www.gnu.org/licenses/>.
  16  */
  17 #include "../module.h"
  18 #include "../botid.h"
  19
  20 #include "bot_NeonFun.h"
  21 #include "../../modcmd.h"
  22 #include "../../IRCParser.h"
  23 #include "../../IRCEvents.h"
  24 #include "../../UserNode.h"
  25 #include "../../ChanNode.h"
  26 #include "../../ChanUser.h"
  27 #include "../../ModeNode.h"
  28 #include "../../BanNode.h"
  29 #include "../../ClientSocket.h"
  30 #include "../../mysqlConn.h"
  31 #include "../../lang.h"
  32 #include "../../HandleInfoHandler.h"
  33 #include "../../WHOHandler.h"
  34 #include "../../DBHelper.h"
  35 #include "../../tools.h"
  36 #include "../../timeq.h"
  37 #include "../../version.h"
  38 #include "../../EventLogger.h"
  39 #include "../../bots.h"
  40 #include "game_uno.h"
  41 #include "game_4wins.h"
  42
  43 #define BOTID NEONFUN_BOTID
  44 #define BOTALIAS "NeonFun"
  45
  46 static void neonfun_bot_ready(struct ClientSocket *client) {
  47     if(client->botid != BOTID)
  48         return;
  49     MYSQL_RES *res;
  50     MYSQL_ROW row;
  51
  52     printf_mysql_query("SELECT `automodes`, `oper_user`, `oper_pass` FROM `bots` WHERE `id` = '%d'", client->clientid);
  53     res = mysql_use();
  54     if ((row = mysql_fetch_row(res)) != NULL) {
  55         if(row[1] && row[2]) {
  56             putsock(client, "OPER %s %s", row[1], row[2]);
  57         }
  58         putsock(client, "MODE %s +%s", client->user->nick, row[0]);
  59     }
  60
  61     printf_mysql_query("SELECT `channel_name`, `channel_key` FROM `bot_channels` LEFT JOIN `channels` ON `chanid` = `channel_id` WHERE `botid` = '%d' AND `suspended` = '0'", client->clientid);
  62     res = mysql_use();
  63
  64     while ((row = mysql_fetch_row(res)) != NULL) {
  65         putsock(client, "JOIN %s %s", row[0], row[1]);
  66     }
  67 }
  68
  69 static void neonfun_trigger_callback(int clientid, struct ChanNode *chan, char *trigger) {
  70     MYSQL_RES *res;
  71     MYSQL_ROW row;
  72     loadChannelSettings(chan);
  73     if(!(chan->flags & CHANFLAG_CHAN_REGISTERED)) {
  74         strcpy(trigger, "+");
  75         return;
  76     }
  77     printf_mysql_query("SELECT `trigger`, `defaulttrigger` FROM `bot_channels` LEFT JOIN `bots` ON `botid` = `bots`.`id` WHERE `chanid` = '%d' AND `botclass` = '%d'", chan->channel_id, BOTID);
  78     res = mysql_use();
  79     if(!(row = mysql_fetch_row(res))) {
  80         strcpy(trigger, "+");
  81         return;
  82     }
  83     if(row[0] && *row[0])
  84         strcpy(trigger, row[0]);
  85     else
  86         strcpy(trigger, ((row[1] && *row[1]) ? row[1] : "~"));
  87 }
  88
  89 static void start_bots(int type) {
  90     struct ClientSocket *client;
  91     MYSQL_RES *res, *res2;
  92     MYSQL_ROW row;
  93
  94     if(type == MODSTATE_STARTSTOP) {
  95         printf_mysql_query("SELECT `nick`, `ident`, `realname`, `server`, `port`, `pass`, `textbot`, `id`, `queue`, `ssl`, `bind` FROM `bots` WHERE `botclass` = '%d' AND `active` = '1'", BOTID);
  96         res = mysql_use();
  97
  98         while ((row = mysql_fetch_row(res)) != NULL) {
  99             client = create_socket(row[3], atoi(row[4]), row[10], row[5], row[0], row[1], row[2]);
 100             client->flags |= (strcmp(row[6], "0") ? SOCKET_FLAG_PREFERRED : 0);
 101             client->flags |= (strcmp(row[8], "0") ? SOCKET_FLAG_USE_QUEUE : 0);
 102             client->flags |= (strcmp(row[9], "0") ? SOCKET_FLAG_SSL : 0);
 103             client->flags |= SOCKET_FLAG_SILENT;
 104             client->flags |= SOCKET_FLAG_REQUEST_INVITE | SOCKET_FLAG_REQUEST_OP;
 105             client->botid = BOTID;
 106             client->clientid = atoi(row[7]);
 107             connect_socket(client);
 108         }
 109     }
 110
 111     printf_mysql_query("SELECT `command`, `function`, `parameters`, `global_access`, `chan_access`, `flags` FROM `bot_binds` WHERE `botclass` = '%d'", BOTID);
 112     res2 = mysql_use();
 113     while ((row = mysql_fetch_row(res2)) != NULL) {
 114         if(bind_cmd_to_command(BOTID, row[0], row[1])) {
 115             if(row[2] && strcmp(row[2], "")) {
 116                 bind_set_parameters(BOTID, row[0], row[2]);
 117             }
 118             if(row[3]) {
 119                 bind_set_global_access(BOTID, row[0], atoi(row[3]));
 120             }
 121             if(row[4]) {
 122                 bind_set_channel_access(BOTID, row[0], row[4]);
 123             }
 124             if(strcmp(row[5], "0"))
 125                 bind_set_bind_flags(BOTID, row[0], atoi(row[5]));
 126         }
 127     }
 128     bind_unbound_required_functions(BOTID);
 129 }
 130
 131 static void neonfun_parted(struct ChanUser *chanuser, int quit, char *reason) {
 132     uno_event_part(chanuser);
 133     fourwins_event_part(chanuser);
 134 }
 135
 136 static int neonfun_freechan(struct ChanNode *chan) {
 137     uno_event_freechan(chan);
 138     fourwins_event_freechan(chan);
 139     return 0;
 140 }
 141
 142 static void neonfun_event_invite(struct ClientSocket *client, struct UserNode *user, char *channel) {
 143         if(client->botid != BOTID)
 144                 return;
 145     MYSQL_RES *res;
 146     MYSQL_ROW row;
 147     printf_mysql_query("SELECT `botid`, `bot_channels`.`id`, `suspended` FROM `bot_channels` LEFT JOIN `bots` ON `bot_channels`.`botid` = `bots`.`id` LEFT JOIN `channels` ON `chanid` = `channel_id` WHERE `channel_name` = '%s' AND `botclass` = '%d'", escape_string(channel), client->botid);
 148     res = mysql_use();
 149     if ((row = mysql_fetch_row(res)) == NULL) {
 150         reply(client, user, "NS_INVITE_FAIL", channel, client->user->nick);
 151         return;
 152     }
 153     if(!strcmp(row[2], "1")) {
 154         reply(client, user, "MODCMD_CHAN_SUSPENDED");
 155         return;
 156     }
 157     int botid = atoi(row[0]);
 158     struct ClientSocket *bot;
 159     for(bot = getBots(SOCKET_FLAG_READY, NULL); bot; bot = getBots(SOCKET_FLAG_READY, bot)) {
 160         if(bot->clientid == botid)
 161             break;
 162     }
 163     if(bot) {
 164         struct ChanNode *chan = getChanByName(channel);
 165         if(chan && isUserOnChan(bot->user, chan)) {
 166             reply(client, user, "NS_INVITE_ON_CHAN", bot->user->nick, chan->name);
 167         } else
 168             putsock(bot, "JOIN %s", channel);
 169     }
 170 }
 171
 172 void init_NeonFun(int type) {
 173     set_bot_alias(BOTID, BOTALIAS);
 174     start_bots(type);
 175
 176     if(type == MODSTATE_REBIND) return;
 177
 178     //register events
 179     bind_bot_ready(neonfun_bot_ready, module_id);
 180     bind_part(neonfun_parted, module_id);
 181     bind_freechan(neonfun_freechan, module_id);
 182     bind_invite(neonfun_event_invite, module_id);
 183
 184     set_trigger_callback(BOTID, module_id, neonfun_trigger_callback);
 185 }
 186
 187 void loop_NeonFun() {
 188
 189 }
 190
 191 void free_NeonFun(int type) {
 192     unbind_allcmd(BOTID);
 193     if(type == MODSTATE_STARTSTOP) {
 194         //disconnect all our bots
 195         struct ClientSocket *client;
 196         for(client = getBots(0, NULL); client; client = getBots(0, client)) {
 197             if(client->botid == BOTID) {
 198                 unbind_botwise_allcmd(0, client->clientid);
 199                 close_socket(client);
 200                 break;
 201             }
 202         }
 203     }
 204 }
 205
 206 char* getSetting(struct UserNode *user, struct ChanNode *chan, const char *setting) {
 207     char *uname = "";
 208     int cid = 0;
 209     MYSQL_RES *res;
 210     MYSQL_ROW row;
 211     if(user) {
 212         uname = ((user->flags & USERFLAG_ISAUTHED) ? user->auth : "*");
 213     }
 214     if(chan) {
 215         loadChannelSettings(chan);
 216         if(chan->flags & CHANFLAG_CHAN_REGISTERED)
 217             cid = chan->channel_id;
 218     }
 219     printf_mysql_query("SELECT `value` FROM `fundata` WHERE `user` = '%s' AND `cid` = '%d' AND `name` = '%s'", escape_string(uname), cid, escape_string(setting));
 220     res = mysql_use();
 221     if ((row = mysql_fetch_row(res)) != NULL) {
 222         return row[0];
 223     } else
 224         return NULL;
 225 }
 226
 227 void setSetting(struct UserNode *user, struct ChanNode *chan, const char *setting, const char *value) {
 228     char *uname = "";
 229     int cid = 0;
 230     MYSQL_RES *res;
 231     MYSQL_ROW row;
 232     if(user) {
 233         uname = ((user->flags & USERFLAG_ISAUTHED) ? user->auth : "*");
 234     }
 235     if(chan) {
 236         loadChannelSettings(chan);
 237         if(chan->flags & CHANFLAG_CHAN_REGISTERED)
 238             cid = chan->channel_id;
 239     }
 240     printf_mysql_query("SELECT `id`, `value` FROM `fundata` WHERE `user` = '%s' AND `cid` = '%d' AND `name` = '%s'", escape_string(uname), cid, escape_string(setting));
 241     res = mysql_use();
 242     if ((row = mysql_fetch_row(res)) != NULL) {
 243         if(strcmp(row[1], value))
 244             printf_mysql_query("UPDATE `fundata` SET `value` = '%s' WHERE `id` = '%s'", escape_string(value), row[0]);
 245     } else
 246         printf_mysql_query("INSERT INTO `fundata` (`user`, `cid`, `name`, `value`) VALUES ('%s', '%d', '%s', '%s')", escape_string(uname), cid, escape_string(setting), escape_string(value));
 247 }
 248
 249 void uno_reply(struct uno_game *game, struct UserNode *user, const char *text, ...) {
 250     struct ClientSocket *client = game->textbot;
 251     const char *reply_format = get_language_string(user, text);
 252     if(reply_format == NULL)
 253         reply_format = text;
 254     char formatBuf[MAXLEN];
 255     sprintf(formatBuf, "PRIVMSG %s :[UNO] %s", game->channel->name, reply_format);
 256     va_list arg_list;
 257     char sendBuf[MAXLEN];
 258     int pos;
 259     if (!(client->flags & SOCKET_FLAG_CONNECTED)) return;
 260     sendBuf[0] = '\0';
 261     va_start(arg_list, text);
 262     pos = vsnprintf(sendBuf, MAXLEN - 2, formatBuf, arg_list);
 263     va_end(arg_list);
 264     if (pos < 0 || pos > (MAXLEN - 2)) pos = MAXLEN - 2;
 265     sendBuf[pos] = '\n';
 266     sendBuf[pos+1] = '\0';
 267     write_socket(client, sendBuf, pos+1);
 268 }
 269
 270 void fourwins_reply(struct fourwins_game *game, const char *text, ...) {
 271     struct ClientSocket *client = game->textbot;
 272     struct fourwins_guest *guest;
 273     int guest_count = 0;
 274     for(guest = game->guests; guest; guest = guest->next) {
 275         guest_count++;
 276     }
 277     struct ChanUser *chanusers[guest_count + 2];
 278     chanusers[0] = game->player[0];
 279     chanusers[1] = game->player[1];
 280     guest_count = 0;
 281     for(guest = game->guests; guest; guest = guest->next) {
 282         chanusers[2 + (guest_count++)] = guest->chanuser;
 283     }
 284     int i;
 285     guest_count += 2;
 286     for(i = 0; i < guest_count; i++) {
 287         const char *reply_format = get_language_string(chanusers[i]->user, text);
 288         if(reply_format == NULL)
 289             reply_format = text;
 290         char formatBuf[MAXLEN];
 291         sprintf(formatBuf, "NOTICE %s :[4WINS] %s", chanusers[i]->user->nick, reply_format);
 292         va_list arg_list;
 293         char sendBuf[MAXLEN];
 294         int pos;
 295         if (!(client->flags & SOCKET_FLAG_CONNECTED)) return;
 296         sendBuf[0] = '\0';
 297         va_start(arg_list, text);
 298         pos = vsnprintf(sendBuf, MAXLEN - 2, formatBuf, arg_list);
 299         va_end(arg_list);
 300         if (pos < 0 || pos > (MAXLEN - 2)) pos = MAXLEN - 2;
 301         sendBuf[pos] = '\n';
 302         sendBuf[pos+1] = '\0';
 303         write_socket(client, sendBuf, pos+1);
 304     }
 305 }
 306
 307 #undef BOTID
 308 #undef BOTALIAS