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