fixed small memory leak in event_neonserv_mode.c
[NeonServV5.git] / src / event_neonserv_mode.c
1 /* event_neonserv_mode.c - NeonServ v5.3
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
18 static USERLIST_CALLBACK(neonserv_event_mode_userlist_lookup);
19 static void neonserv_event_mode_async1(struct ClientSocket *client, struct UserNode *user, struct ChanNode *chan, char *modes, char **argv, int argc);
20 static int neonserv_cmd_mode_botwar_detect(struct ClientSocket *client, struct UserNode *user, struct ChanNode *chan);
21
22 static int botwar_detect_executed;
23
24 struct neonserv_event_mode_cache {
25     struct ClientSocket *client;
26     struct UserNode *user;
27     char *modes;
28     char **argv;
29     int argc;
30 };
31
32 static void neonserv_event_mode(struct UserNode *user, struct ChanNode *chan, char *modes, char **argv, int argc) {
33     struct ClientSocket *client = getBotForChannel(chan);
34     if(!client) return; //we can't "see" this event
35     if(isNetworkService(user)) return;
36     loadChannelSettings(chan);
37     if(!(chan->flags & CHANFLAG_CHAN_REGISTERED)) return;
38     struct neonserv_event_mode_cache *cache = malloc(sizeof(*cache));
39     char **temp_argv = NULL;
40     if(argc) 
41         temp_argv = malloc(argc*sizeof(*temp_argv));
42     if (!cache || (argc && !temp_argv)) {
43         perror("malloc() failed");
44         return;
45     }
46     if(argc) {
47         int i;
48         for(i = 0; i < argc; i++) {
49             temp_argv[i] = strdup(argv[i]);
50         }
51     }
52     cache->client = client;
53     cache->user = user;
54     cache->modes = strdup(modes);
55     cache->argv = temp_argv;
56     cache->argc = argc;
57     get_userlist_with_invisible(chan, neonserv_event_mode_userlist_lookup, cache);
58 }
59
60 static USERLIST_CALLBACK(neonserv_event_mode_userlist_lookup) {
61     struct neonserv_event_mode_cache *cache = data;
62     neonserv_event_mode_async1(cache->client, cache->user, chan, cache->modes, cache->argv, cache->argc);
63     if(cache->argc) {
64         int i;
65         for(i = 0; i < cache->argc; i++) {
66             free(cache->argv[i]);
67         }
68         free(cache->argv);
69     }
70     free(cache->modes);
71     free(cache);
72 }
73
74 static void neonserv_event_mode_async1(struct ClientSocket *client, struct UserNode *user, struct ChanNode *chan, char *modes, char **argv, int argc) {
75     struct ClientSocket *textclient = ((client->flags & SOCKET_FLAG_PREFERRED) ? client : get_prefered_bot(client->botid));
76     botwar_detect_executed = 0;
77     MYSQL_ROW row, defaults = NULL;
78     int i, arg, add = 1, skip = 0;
79     unsigned int modetype;
80     int db_canop, db_canhalfop, db_canvoice, db_canban, db_enfmodes, db_getop, db_gethalfop, db_getvoice;
81     struct ModeNode *modelock = createModeNode(NULL);
82     struct ModeBuffer *modeBuf;
83     struct UserNode *cuser;
84     struct ChanUser *chanuser;
85     int with_halfops = get_int_field("General.have_halfop");
86     modeBuf = initModeBuffer(client, chan);
87     printf_mysql_query("SELECT `channel_canop`, `channel_canvoice`, `channel_canban`, `channel_enfmodes`, `channel_modes`, `channel_getop`, `channel_getvoice`, `channel_gethalfop`, `channel_canhalfop` FROM `channels` WHERE `channel_id` = '%d'", chan->channel_id);
88     row = mysql_fetch_row(mysql_use());
89     if(row[0] == NULL || row[1] == NULL || row[2] == NULL || row[3] == NULL || row[4] == NULL || row[5] == NULL || row[6] == NULL || (row[7] == NULL && with_halfops) || (row[8] == NULL && with_halfops)) {
90         printf_mysql_query("SELECT `channel_canop`, `channel_canvoice`, `channel_canban`, `channel_enfmodes`, `channel_modes`, `channel_getop`, `channel_getvoice`, `channel_gethalfop`, `channel_canhalfop` FROM `channels` WHERE `channel_name` = 'defaults'");
91         defaults = mysql_fetch_row(mysql_use());
92     }
93     db_canop = atoi((row[0] ? row[0] : defaults[0]));
94     db_canvoice = atoi((row[1] ? row[1] : defaults[1]));
95     db_canban = atoi((row[2] ? row[2] : defaults[2]));
96     db_enfmodes = atoi((row[3] ? row[3] : defaults[3]));
97     db_getop = atoi((row[5] ? row[5] : defaults[5]));
98     db_getvoice = atoi((row[6] ? row[6] : defaults[6]));
99     db_gethalfop = (with_halfops ? atoi((row[7] ? row[7] : defaults[7])) : 0);
100     db_canhalfop = (with_halfops ? atoi((row[8] ? row[8] : defaults[8])) : 0);
101     if(row[4])
102         parseModeString(modelock, row[4]);
103     else if(defaults[4])
104         parseModeString(modelock, defaults[4]);
105     int uaccess = getChannelAccess(user, chan);
106     int caccess;
107     char *carg;
108     int sent_modes_locked = 0;
109     char deop_user = 0;
110     char tmp[MAXLEN];
111     arg = 0;
112     for(i = 0; i < strlen(modes); i++) {
113         switch(modes[i]) {
114             case '+':
115                 add = 1;
116                 break;
117             case '-':
118                 add = 0;
119                 break;
120             case 'o':
121             case 'h':
122             case 'v':
123                 if(arg == argc) {
124                     break;
125                 }
126                 carg = argv[arg++];
127                 cuser = searchUserByNick(carg);
128                 if(!cuser) {
129                     break; //internal Bot error - this should never happen
130                 }
131                 caccess = getChannelAccess(cuser, chan);
132                 if(modes[i] == 'o' && !add && cuser == client->user) {
133                     //someone deopped the bot???
134                     requestOp(client->user, chan);
135                 }
136                 if((modes[i] == 'o' || (modes[i] == 'h' && !with_halfops)) && !(add && isBot(cuser))) {
137                     if(uaccess < db_canop) {
138                         reply(textclient, user, "NS_MODE_ENFOPS", chan->name);
139                         db_canop = -1;
140                         if(uaccess < db_getop)
141                             deop_user = 1;
142                     }
143                     if(db_canop == -1 && caccess < db_getop) {
144                         if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
145                             modeBufferSet(modeBuf, !add, modes[i], carg);
146                         break;
147                     }
148                 } else if(modes[i] == 'h' && with_halfops && !(add && isBot(cuser))) {
149                     if(uaccess < db_canhalfop) {
150                         reply(textclient, user, "NS_MODE_ENFOPS", chan->name);
151                         db_canhalfop = -1;
152                         if(uaccess < db_gethalfop)
153                             deop_user = 1;
154                     }
155                     if(db_canhalfop == -1 && caccess < db_gethalfop) {
156                         if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
157                             modeBufferSet(modeBuf, !add, modes[i], carg);
158                         break;
159                     }
160                 } else if(modes[i] == 'v' && !(add && isBot(cuser))) {
161                     if(uaccess < db_canvoice) {
162                         reply(textclient, user, "NS_MODE_ENFVOICE", chan->name);
163                         db_canvoice = -1;
164                         if(uaccess < db_getop)
165                             deop_user = 1;
166                     }
167                     if(db_canvoice == -1 && caccess < db_getvoice) {
168                         if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
169                             modeBufferSet(modeBuf, !add, modes[i], carg);
170                         break;
171                     }
172                 }
173                 if(!add) {
174                     //check protection
175                     if(isBot(cuser)) {
176                         //don't send this - just try to reop
177                         //reply(textclient, user, "NS_SERVICE_IMMUNE", cuser->nick);
178                         if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
179                             modeBufferSet(modeBuf, !add, modes[i], carg);
180                         break;
181                     }
182                     if(isUserProtected(chan, cuser, user)) {
183                         reply(textclient, user, "NS_USER_PROTECTED", cuser->nick);
184                         if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
185                             modeBufferSet(modeBuf, !add, modes[i], carg);
186                         if(uaccess < db_getop)
187                             deop_user = 1;
188                         break;
189                     }
190                 }
191                 break;
192             case 'b':
193                 if(arg == argc) {
194                     break;
195                 }
196                 carg = argv[arg++];
197                 if(uaccess < db_canban) {
198                     reply(textclient, user, "NS_MODE_CANBAN", chan->name);
199                     db_canban = -1;
200                 }
201                 if(db_canban == -1) {
202                     if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
203                         modeBufferSet(modeBuf, !add, modes[i], carg);
204                     if(uaccess < db_getop)
205                         deop_user = 1;
206                     break;
207                 }
208                 char hostmask_buffer[NICKLEN+USERLEN+HOSTLEN+3];
209                 char usermask[NICKLEN+USERLEN+HOSTLEN+3];
210                 int match_count = 0;
211                 carg = make_banmask(carg, hostmask_buffer);
212                 if(add) {
213                     for(chanuser = getChannelUsers(chan, NULL); chanuser; chanuser = getChannelUsers(chan, chanuser)) {
214                         cuser = chanuser->user;
215                         sprintf(usermask, "%s!%s@%s", cuser->nick, cuser->ident, cuser->host);
216                         if(!match(carg, usermask)) {
217                             if(isUserProtected(chan, cuser, user)) {
218                                 reply(textclient, user, "NS_USER_PROTECTED", cuser->nick);
219                                 skip = 1;
220                                 break;
221                             }
222                             match_count++;
223                         }
224                     }
225                     if(match_count > 4 && (match_count * 3) > chan->usercount) {
226                         reply(textclient, user, "NS_LAME_MASK_WARNING", carg, match_count);
227                     }
228                 }
229                 if(skip) {
230                     if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
231                         modeBufferSet(modeBuf, !add, modes[i], carg);
232                     if(uaccess < db_getop)
233                         deop_user = 1;
234                 }
235                 break;
236             default:
237                 modetype = getModeType(modelock, modes[i]);
238                 if(modetype == 0) {
239                     break; //unknown mode
240                 }
241                 
242                 if(add && (modetype & CHANNEL_MODE_TYPE) != CHANNEL_MODE_TYPE_D) {
243                     if(arg == argc) {
244                         break;
245                     }
246                     carg = argv[arg++];
247                     if((modetype & CHANNEL_MODE_VALUE) == CHANNEL_MODE_VALUE_STRING && isModeSet(modelock, modes[i])) {
248                         char *modelock_val = getModeValue(modelock, modes[i]);
249                         if(stricmp(carg, modelock_val) && uaccess < db_enfmodes && !isGodMode(user)) {
250                             if(!sent_modes_locked) {
251                                 getFullModeString(modelock, tmp);
252                                 reply(textclient, user, "NS_MODE_LOCKED", tmp, chan->name);
253                                 sent_modes_locked = 1;
254                                 if(uaccess < db_getop)
255                                     deop_user = 1;
256                             }
257                             if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
258                                 modeBufferSet(modeBuf, add, modes[i], modelock_val);
259                             break;
260                         }
261                     }
262                     if((modetype & CHANNEL_MODE_VALUE) == CHANNEL_MODE_VALUE_STRING && isModeSet(modelock, modes[i])) {
263                         int *modelock_val = getModeValue(modelock, modes[i]);
264                         if(atoi(carg) != *modelock_val && uaccess < db_enfmodes && !isGodMode(user)) {
265                             if(!sent_modes_locked) {
266                                 getFullModeString(modelock, tmp);
267                                 reply(textclient, user, "NS_MODE_LOCKED", tmp, chan->name);
268                                 sent_modes_locked = 1;
269                                 if(uaccess < db_getop)
270                                     deop_user = 1;
271                             }
272                             sprintf(tmp, "%d", *modelock_val);
273                             if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
274                                 modeBufferSet(modeBuf, add, modes[i], tmp);
275                             break;
276                         }
277                     }
278                 } else if(!add && (modetype & CHANNEL_MODE_TYPE) == CHANNEL_MODE_TYPE_B) {
279                     if(arg == argc) {
280                         break;
281                     }
282                     carg = argv[arg++];
283                 } else
284                     carg = NULL;
285                 if(isModeAffected(modelock, modes[i]) && add == !isModeSet(modelock, modes[i]) && uaccess < db_enfmodes && !isGodMode(user)) {
286                     if(!sent_modes_locked) {
287                         getFullModeString(modelock, tmp);
288                         reply(textclient, user, "NS_MODE_LOCKED", tmp, chan->name);
289                         sent_modes_locked = 1;
290                         if(uaccess < db_getop)
291                             deop_user = 1;
292                     }
293                     if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
294                         modeBufferSet(modeBuf, !add, modes[i], carg);
295                     break;
296                 }
297                 break;
298         }
299     }
300     if(deop_user && !neonserv_cmd_mode_botwar_detect(client, user, chan)) {
301         modeBufferDeop(modeBuf, user->nick);
302     }
303     freeModeBuffer(modeBuf);
304     freeModeNode(modelock);
305 }
306
307 static int neonserv_cmd_mode_botwar_detect(struct ClientSocket *client, struct UserNode *user, struct ChanNode *chan) {
308     struct ChanUser *chanuser = getChanUser(user, chan);
309     if(!chanuser) return 0; //flying super cow?
310     if(time(0) - chanuser->changeTime > BOTWAR_DETECTION_TIME) {
311         chanuser->changeTime = time(0);
312         chanuser->chageEvents = 1;
313     } else {
314         if(!botwar_detect_executed)
315             chanuser->chageEvents++;
316         botwar_detect_executed = 1;
317         if(chanuser->chageEvents >= BOTWAR_DETECTION_EVENTS || chanuser->chageEvents < 0) {
318             //BOTWAR!
319             chanuser->changeTime = time(0);
320             if(chanuser->chageEvents > 0) {
321                 char *alertchan = get_string_field("General.alertchan");
322                 putsock(client, "NOTICE @%s :%s %s", chan->name, get_language_string(user, "NS_BOTWAR_DETECTED"), (alertchan ? get_language_string(user, "NS_BOTWAR_REPORTED") : ""));
323                 if(alertchan) {
324                     struct ChanNode *alertchan_chan = getChanByName(alertchan);
325                     struct ClientSocket *alertclient;
326                     if(alertchan_chan && (alertclient = getBotForChannel(chan)) != NULL) {
327                         char msgBuf[MAXLEN];
328                         putsock(alertclient, "PRIVMSG %s :%s", alertchan_chan->name, build_language_string(NULL, msgBuf, "NS_BOTWAR_ALERT", chan->name, user->nick));
329                     }
330                 }
331             }
332             chanuser->chageEvents = -2;
333             return 1;
334         }
335     }
336     return 0;
337 }
338