Another year is about to end... So we have to update these damn copyright information :P
[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);
71 }
72
73 static void neonserv_event_mode_async1(struct ClientSocket *client, struct UserNode *user, struct ChanNode *chan, char *modes, char **argv, int argc) {
74     struct ClientSocket *textclient = ((client->flags & SOCKET_FLAG_PREFERRED) ? client : get_prefered_bot(client->botid));
75     botwar_detect_executed = 0;
76     MYSQL_ROW row, defaults = NULL;
77     int i, arg, add = 1, skip = 0;
78     unsigned int modetype;
79     int db_canop, db_canvoice, db_canban, db_enfmodes, db_getop, db_getvoice;
80     struct ModeNode *modelock = createModeNode(NULL);
81     struct ModeBuffer *modeBuf;
82     struct UserNode *cuser;
83     struct ChanUser *chanuser;
84     modeBuf = initModeBuffer(client, chan);
85     printf_mysql_query("SELECT `channel_canop`, `channel_canvoice`, `channel_canban`, `channel_enfmodes`, `channel_modes`, `channel_getop`, `channel_getvoice` FROM `channels` WHERE `channel_id` = '%d'", chan->channel_id);
86     row = mysql_fetch_row(mysql_use());
87     if(row[0] == NULL || row[1] == NULL || row[2] == NULL || row[3] == NULL || row[4] == NULL || row[5] == NULL || row[6] == NULL) {
88         printf_mysql_query("SELECT `channel_canop`, `channel_canvoice`, `channel_canban`, `channel_enfmodes`, `channel_modes`, `channel_getop`, `channel_getvoice` FROM `channels` WHERE `channel_name` = 'defaults'");
89         defaults = mysql_fetch_row(mysql_use());
90     }
91     db_canop = atoi((row[0] ? row[0] : defaults[0]));
92     db_canvoice = atoi((row[1] ? row[1] : defaults[1]));
93     db_canban = atoi((row[2] ? row[2] : defaults[2]));
94     db_enfmodes = atoi((row[3] ? row[3] : defaults[3]));
95     db_getop = atoi((row[5] ? row[5] : defaults[5]));
96     db_getvoice = atoi((row[6] ? row[6] : defaults[6]));
97     if(row[4])
98         parseModeString(modelock, row[4]);
99     else if(defaults[4])
100         parseModeString(modelock, defaults[4]);
101     int uaccess = getChannelAccess(user, chan);
102     int caccess;
103     char *carg;
104     int sent_modes_locked = 0;
105     char deop_user = 0;
106     char tmp[MAXLEN];
107     arg = 0;
108     for(i = 0; i < strlen(modes); i++) {
109         switch(modes[i]) {
110             case '+':
111                 add = 1;
112                 break;
113             case '-':
114                 add = 0;
115                 break;
116             case 'o':
117             case 'v':
118                 if(arg == argc) {
119                     break;
120                 }
121                 carg = argv[arg++];
122                 cuser = searchUserByNick(carg);
123                 if(!cuser) {
124                     break; //internal Bot error - this should never happen
125                 }
126                 caccess = getChannelAccess(cuser, chan);
127                 if(modes[i] == 'o' && !(add && isBot(cuser))) {
128                     if(uaccess < db_canop) {
129                         reply(textclient, user, "NS_MODE_ENFOPS", chan->name);
130                         db_canop = -1;
131                         if(uaccess < db_getop)
132                             deop_user = 1;
133                     }
134                     if(db_canop == -1 && caccess < db_getop) {
135                         if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
136                             modeBufferSet(modeBuf, !add, modes[i], carg);
137                         break;
138                     }
139                 } else if(modes[i] == 'v') {
140                     if(uaccess < db_canvoice) {
141                         reply(textclient, user, "NS_MODE_ENFVOICE", chan->name);
142                         db_canvoice = -1;
143                         if(uaccess < db_getop)
144                             deop_user = 1;
145                     }
146                     if(db_canvoice == -1 && caccess < db_getvoice) {
147                         if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
148                             modeBufferSet(modeBuf, !add, modes[i], carg);
149                         break;
150                     }
151                 }
152                 if(!add) {
153                     //check protection
154                     if(isBot(cuser)) {
155                         //don't send this - just try to reop
156                         //reply(textclient, user, "NS_SERVICE_IMMUNE", cuser->nick);
157                         if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
158                             modeBufferSet(modeBuf, !add, modes[i], carg);
159                         break;
160                     }
161                     if(isUserProtected(chan, cuser, user)) {
162                         reply(textclient, user, "NS_USER_PROTECTED", cuser->nick);
163                         if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
164                             modeBufferSet(modeBuf, !add, modes[i], carg);
165                         if(uaccess < db_getop)
166                             deop_user = 1;
167                         break;
168                     }
169                 }
170                 break;
171             case 'b':
172                 if(arg == argc) {
173                     break;
174                 }
175                 carg = argv[arg++];
176                 if(uaccess < db_canban) {
177                     reply(textclient, user, "NS_MODE_CANBAN", chan->name);
178                     db_canban = -1;
179                 }
180                 if(db_canban == -1) {
181                     if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
182                         modeBufferSet(modeBuf, !add, modes[i], carg);
183                     if(uaccess < db_getop)
184                         deop_user = 1;
185                     break;
186                 }
187                 char hostmask_buffer[NICKLEN+USERLEN+HOSTLEN+3];
188                 char usermask[NICKLEN+USERLEN+HOSTLEN+3];
189                 int match_count = 0;
190                 carg = make_banmask(carg, hostmask_buffer);
191                 if(add) {
192                     for(chanuser = getChannelUsers(chan, NULL); chanuser; chanuser = getChannelUsers(chan, chanuser)) {
193                         cuser = chanuser->user;
194                         sprintf(usermask, "%s!%s@%s", cuser->nick, cuser->ident, cuser->host);
195                         if(!match(carg, usermask)) {
196                             if(isUserProtected(chan, cuser, user)) {
197                                 reply(textclient, user, "NS_USER_PROTECTED", cuser->nick);
198                                 skip = 1;
199                                 break;
200                             }
201                             match_count++;
202                         }
203                     }
204                     if(match_count > 4 && (match_count * 3) > chan->usercount) {
205                         reply(textclient, user, "NS_LAME_MASK_WARNING", carg, match_count);
206                     }
207                 }
208                 if(skip) {
209                     if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
210                         modeBufferSet(modeBuf, !add, modes[i], carg);
211                     if(uaccess < db_getop)
212                         deop_user = 1;
213                 }
214                 break;
215             default:
216                 modetype = getModeType(modelock, modes[i]);
217                 if(modetype == 0) {
218                     break; //unknown mode
219                 }
220                 
221                 if(add && (modetype & CHANNEL_MODE_TYPE) != CHANNEL_MODE_TYPE_D) {
222                     if(arg == argc) {
223                         break;
224                     }
225                     carg = argv[arg++];
226                     if((modetype & CHANNEL_MODE_VALUE) == CHANNEL_MODE_VALUE_STRING && isModeSet(modelock, modes[i])) {
227                         char *modelock_val = getModeValue(modelock, modes[i]);
228                         if(stricmp(carg, modelock_val) && uaccess < db_enfmodes && !isGodMode(user)) {
229                             if(!sent_modes_locked) {
230                                 getFullModeString(modelock, tmp);
231                                 reply(textclient, user, "NS_MODE_LOCKED", tmp, chan->name);
232                                 sent_modes_locked = 1;
233                                 if(uaccess < db_getop)
234                                     deop_user = 1;
235                             }
236                             if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
237                                 modeBufferSet(modeBuf, add, modes[i], modelock_val);
238                             break;
239                         }
240                     }
241                     if((modetype & CHANNEL_MODE_VALUE) == CHANNEL_MODE_VALUE_STRING && isModeSet(modelock, modes[i])) {
242                         int *modelock_val = getModeValue(modelock, modes[i]);
243                         if(atoi(carg) != *modelock_val && uaccess < db_enfmodes && !isGodMode(user)) {
244                             if(!sent_modes_locked) {
245                                 getFullModeString(modelock, tmp);
246                                 reply(textclient, user, "NS_MODE_LOCKED", tmp, chan->name);
247                                 sent_modes_locked = 1;
248                                 if(uaccess < db_getop)
249                                     deop_user = 1;
250                             }
251                             sprintf(tmp, "%d", *modelock_val);
252                             if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
253                                 modeBufferSet(modeBuf, add, modes[i], tmp);
254                             break;
255                         }
256                     }
257                 } else if(!add && (modetype & CHANNEL_MODE_TYPE) == CHANNEL_MODE_TYPE_B) {
258                     if(arg == argc) {
259                         break;
260                     }
261                     carg = argv[arg++];
262                 } else
263                     carg = NULL;
264                 if(isModeAffected(modelock, modes[i]) && add == !isModeSet(modelock, modes[i]) && 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                     if(!neonserv_cmd_mode_botwar_detect(client, user, chan))
273                         modeBufferSet(modeBuf, !add, modes[i], carg);
274                     break;
275                 }
276                 break;
277         }
278     }
279     if(deop_user && !neonserv_cmd_mode_botwar_detect(client, user, chan)) {
280         modeBufferDeop(modeBuf, user->nick);
281     }
282     freeModeBuffer(modeBuf);
283     freeModeNode(modelock);
284 }
285
286 static int neonserv_cmd_mode_botwar_detect(struct ClientSocket *client, struct UserNode *user, struct ChanNode *chan) {
287     struct ChanUser *chanuser = getChanUser(user, chan);
288     if(!chanuser) return 0; //flying super cow?
289     if(time(0) - chanuser->changeTime > BOTWAR_DETECTION_TIME) {
290         chanuser->changeTime = time(0);
291         chanuser->chageEvents = 1;
292     } else {
293         if(!botwar_detect_executed)
294             chanuser->chageEvents++;
295         botwar_detect_executed = 1;
296         if(chanuser->chageEvents >= BOTWAR_DETECTION_EVENTS || chanuser->chageEvents < 0) {
297             //BOTWAR!
298             chanuser->changeTime = time(0);
299             if(chanuser->chageEvents > 0) {
300                 putsock(client, "NOTICE @%s :%s %s", chan->name, get_language_string(user, "NS_BOTWAR_DETECTED"), (BOTWAR_ALERT_CHAN ? get_language_string(user, "NS_BOTWAR_REPORTED") : ""));
301                 if(BOTWAR_ALERT_CHAN) {
302                     struct ChanNode *alertchan = getChanByName(BOTWAR_ALERT_CHAN);
303                     struct ClientSocket *alertclient;
304                     if(alertchan && (alertclient = getBotForChannel(chan)) != NULL) {
305                         char msgBuf[MAXLEN];
306                         putsock(alertclient, "PRIVMSG %s :%s", alertchan->name, build_language_string(NULL, msgBuf, "NS_BOTWAR_ALERT", chan->name, user->nick));
307                     }
308                 }
309             }
310             chanuser->chageEvents = -2;
311             return 1;
312         }
313     }
314     return 0;
315 }
316