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     MYSQL_RES *res;
  48     MYSQL_ROW row;
  49
  50     printf_mysql_query("SELECT `automodes`, `oper_user`, `oper_pass` FROM `bots` WHERE `id` = '%d'", client->clientid);
  51     res = mysql_use();
  52     if ((row = mysql_fetch_row(res)) != NULL) {
  53         if(row[1] && row[2]) {
  54             putsock(client, "OPER %s %s", row[1], row[2]);
  55         }
  56         putsock(client, "MODE %s +%s", client->user->nick, row[0]);
  57     }
  58
  59     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);
  60     res = mysql_use();
  61
  62     while ((row = mysql_fetch_row(res)) != NULL) {
  63         putsock(client, "JOIN %s %s", row[0], row[1]);
  64     }
  65 }
  66
  67 static void neonfun_trigger_callback(int clientid, struct ChanNode *chan, char *trigger) {
  68     MYSQL_RES *res;
  69     MYSQL_ROW row;
  70     loadChannelSettings(chan);
  71     if(!(chan->flags & CHANFLAG_CHAN_REGISTERED)) {
  72         strcpy(trigger, "+");
  73         return;
  74     }
  75     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);
  76     res = mysql_use();
  77     if(!(row = mysql_fetch_row(res))) {
  78         strcpy(trigger, "+");
  79         return;
  80     }
  81     if(row[0] && *row[0])
  82         strcpy(trigger, row[0]);
  83     else
  84         strcpy(trigger, ((row[1] && *row[1]) ? row[1] : "~"));
  85 }
  86
  87 static void start_bots(int type) {
  88     struct ClientSocket *client;
  89     MYSQL_RES *res, *res2;
  90     MYSQL_ROW row;
  91
  92     if(type == MODSTATE_STARTSTOP) {
  93         printf_mysql_query("SELECT `nick`, `ident`, `realname`, `server`, `port`, `pass`, `textbot`, `id`, `queue`, `ssl`, `bind` FROM `bots` WHERE `botclass` = '%d' AND `active` = '1'", BOTID);
  94         res = mysql_use();
  95
  96         while ((row = mysql_fetch_row(res)) != NULL) {
  97             client = create_socket(row[3], atoi(row[4]), row[10], row[5], row[0], row[1], row[2]);
  98             client->flags |= (strcmp(row[6], "0") ? SOCKET_FLAG_PREFERRED : 0);
  99             client->flags |= (strcmp(row[8], "0") ? SOCKET_FLAG_USE_QUEUE : 0);
 100             client->flags |= (strcmp(row[9], "0") ? SOCKET_FLAG_SSL : 0);
 101             client->flags |= SOCKET_FLAG_SILENT;
 102             client->botid = BOTID;
 103             client->clientid = atoi(row[7]);
 104             connect_socket(client);
 105         }
 106     }
 107
 108     printf_mysql_query("SELECT `command`, `function`, `parameters`, `global_access`, `chan_access`, `flags` FROM `bot_binds` WHERE `botclass` = '%d'", BOTID);
 109     res2 = mysql_use();
 110     while ((row = mysql_fetch_row(res2)) != NULL) {
 111         if(bind_cmd_to_command(BOTID, row[0], row[1])) {
 112             if(row[2] && strcmp(row[2], "")) {
 113                 bind_set_parameters(BOTID, row[0], row[2]);
 114             }
 115             if(row[3]) {
 116                 bind_set_global_access(BOTID, row[0], atoi(row[3]));
 117             }
 118             if(row[4]) {
 119                 bind_set_channel_access(BOTID, row[0], row[4]);
 120             }
 121             if(strcmp(row[5], "0"))
 122                 bind_set_bind_flags(BOTID, row[0], atoi(row[5]));
 123         }
 124     }
 125     bind_unbound_required_functions(BOTID);
 126 }
 127
 128 static void neonfun_parted(struct ChanUser *chanuser, char *reason) {
 129     uno_event_part(chanuser);
 130     fourwins_event_part(chanuser);
 131 }
 132
 133 static void neonfun_quitted(struct UserNode *user, char *reason) {
 134     uno_event_quit(user);
 135     fourwins_event_quit(user);
 136 }
 137
 138 static int neonfun_freechan(struct ChanNode *chan) {
 139     uno_event_freechan(chan);
 140     fourwins_event_freechan(chan);
 141     return 0;
 142 }
 143
 144 void init_NeonFun(int type) {
 145     set_bot_alias(BOTID, BOTALIAS);
 146     start_bots(type);
 147
 148     if(type == MODSTATE_REBIND) return;
 149
 150     //register events
 151     bind_bot_ready(neonfun_bot_ready, module_id);
 152     bind_part(neonfun_parted, module_id);
 153     bind_quit(neonfun_quitted, module_id);
 154     bind_freechan(neonfun_freechan, module_id);
 155
 156     set_trigger_callback(BOTID, module_id, neonfun_trigger_callback);
 157 }
 158
 159 void loop_NeonFun() {
 160
 161 }
 162
 163 void free_NeonFun(int type) {
 164     unbind_allcmd(BOTID);
 165     if(type == MODSTATE_STARTSTOP) {
 166         //disconnect all our bots
 167         struct ClientSocket *client;
 168         for(client = getBots(0, NULL); client; client = getBots(0, client)) {
 169             if(client->botid == BOTID) {
 170                 unbind_botwise_allcmd(0, client->clientid);
 171                 close_socket(client);
 172                 break;
 173             }
 174         }
 175     }
 176 }
 177
 178 char* getSetting(struct UserNode *user, struct ChanNode *chan, const char *setting) {
 179     char *uname = "";
 180     int cid = 0;
 181     MYSQL_RES *res;
 182     MYSQL_ROW row;
 183     if(user) {
 184         uname = ((user->flags & USERFLAG_ISAUTHED) ? user->auth : "*");
 185     }
 186     if(chan) {
 187         loadChannelSettings(chan);
 188         if(chan->flags & CHANFLAG_CHAN_REGISTERED)
 189             cid = chan->channel_id;
 190     }
 191     printf_mysql_query("SELECT `value` FROM `fundata` WHERE `user` = '%s' AND `cid` = '%d' AND `name` = '%s'", escape_string(uname), cid, escape_string(setting));
 192     res = mysql_use();
 193     if ((row = mysql_fetch_row(res)) != NULL) {
 194         return row[0];
 195     } else
 196         return NULL;
 197 }
 198
 199 void setSetting(struct UserNode *user, struct ChanNode *chan, const char *setting, const char *value) {
 200     char *uname = "";
 201     int cid = 0;
 202     MYSQL_RES *res;
 203     MYSQL_ROW row;
 204     if(user) {
 205         uname = ((user->flags & USERFLAG_ISAUTHED) ? user->auth : "*");
 206     }
 207     if(chan) {
 208         loadChannelSettings(chan);
 209         if(chan->flags & CHANFLAG_CHAN_REGISTERED)
 210             cid = chan->channel_id;
 211     }
 212     printf_mysql_query("SELECT `id`, `value` FROM `fundata` WHERE `user` = '%s' AND `cid` = '%d' AND `name` = '%s'", escape_string(uname), cid, escape_string(setting));
 213     res = mysql_use();
 214     if ((row = mysql_fetch_row(res)) != NULL) {
 215         if(strcmp(row[1], value))
 216             printf_mysql_query("UPDATE `fundata` SET `value` = '%s' WHERE `id` = '%s'", escape_string(value), row[0]);
 217     } else
 218         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));
 219 }
 220
 221 void uno_reply(struct uno_game *game, struct UserNode *user, const char *text, ...) {
 222     struct ClientSocket *client = game->textbot;
 223     const char *reply_format = get_language_string(user, text);
 224     if(reply_format == NULL)
 225         reply_format = text;
 226     char formatBuf[MAXLEN];
 227     sprintf(formatBuf, "PRIVMSG %s :[UNO] %s", game->channel->name, reply_format);
 228     va_list arg_list;
 229     char sendBuf[MAXLEN];
 230     int pos;
 231     if (!(client->flags & SOCKET_FLAG_CONNECTED)) return;
 232     sendBuf[0] = '\0';
 233     va_start(arg_list, text);
 234     pos = vsnprintf(sendBuf, MAXLEN - 2, formatBuf, arg_list);
 235     va_end(arg_list);
 236     if (pos < 0 || pos > (MAXLEN - 2)) pos = MAXLEN - 2;
 237     sendBuf[pos] = '\n';
 238     sendBuf[pos+1] = '\0';
 239     write_socket(client, sendBuf, pos+1);
 240 }
 241
 242 void fourwins_reply(struct fourwins_game *game, const char *text, ...) {
 243     struct ClientSocket *client = game->textbot;
 244     struct fourwins_guest *guest;
 245     int guest_count = 0;
 246     for(guest = game->guests; guest; guest = guest->next) {
 247         guest_count++;
 248     }
 249     struct ChanUser *chanusers[guest_count + 2];
 250     chanusers[0] = game->player[0];
 251     chanusers[1] = game->player[1];
 252     guest_count = 0;
 253     for(guest = game->guests; guest; guest = guest->next) {
 254         chanusers[2 + (guest_count++)] = guest->chanuser;
 255     }
 256     int i;
 257     guest_count += 2;
 258     for(i = 0; i < guest_count; i++) {
 259         const char *reply_format = get_language_string(chanusers[i]->user, text);
 260         if(reply_format == NULL)
 261             reply_format = text;
 262         char formatBuf[MAXLEN];
 263         sprintf(formatBuf, "NOTICE %s :[4WINS] %s", chanusers[i]->user->nick, reply_format);
 264         va_list arg_list;
 265         char sendBuf[MAXLEN];
 266         int pos;
 267         if (!(client->flags & SOCKET_FLAG_CONNECTED)) return;
 268         sendBuf[0] = '\0';
 269         va_start(arg_list, text);
 270         pos = vsnprintf(sendBuf, MAXLEN - 2, formatBuf, arg_list);
 271         va_end(arg_list);
 272         if (pos < 0 || pos > (MAXLEN - 2)) pos = MAXLEN - 2;
 273         sendBuf[pos] = '\n';
 274         sendBuf[pos+1] = '\0';
 275         write_socket(client, sendBuf, pos+1);
 276     }
 277 }
 278
 279 #undef BOTID
 280 #undef BOTALIAS