added event_mode
[NeonServV5.git] / src / event_neonserv_mode.c
1 /* event_neonserv_mode.c - NeonServ v5.0
2  * Copyright (C) 2011  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
21 struct neonserv_event_mode_cache {
22     struct ClientSocket *client;
23     struct UserNode *user;
24     char *modes;
25     char **argv;
26     int argc;
27 };
28
29 static void neonserv_event_mode(struct UserNode *user, struct ChanNode *chan, char *modes, char **argv, int argc) {
30     struct ClientSocket *client = getBotForChannel(chan);
31     if(!client) return; //we can't "see" this event
32     if(user->flags & (USERFLAG_ISBOT | USERFLAG_ISIRCOP)) return;
33     loadChannelSettings(chan);
34     if(!(chan->flags & CHANFLAG_CHAN_REGISTERED)) return;
35     struct neonserv_event_mode_cache *cache = malloc(sizeof(*cache));
36     char **temp_argv = NULL;
37     if(argc) 
38         temp_argv = malloc(argc*sizeof(*temp_argv));
39     if (!cache || (argc && !temp_argv)) {
40         perror("malloc() failed");
41         return;
42     }
43     if(argc) {
44         int i;
45         for(i = 0; i < argc; i++) {
46             temp_argv[i] = strdup(argv[i]);
47         }
48     }
49     cache->client = client;
50     cache->user = user;
51     cache->modes = strdup(modes);
52     cache->argv = temp_argv;
53     cache->argc = argc;
54     get_userlist_with_invisible(chan, neonserv_event_mode_userlist_lookup, cache);
55 }
56
57 static USERLIST_CALLBACK(neonserv_event_mode_userlist_lookup) {
58     struct neonserv_event_mode_cache *cache = data;
59     neonserv_event_mode_async1(cache->client, cache->user, chan, cache->modes, cache->argv, cache->argc);
60     if(cache->argc) {
61         int i;
62         for(i = 0; i < cache->argc; i++) {
63             free(cache->argv[i]);
64         }
65         free(cache->argv);
66     }
67     free(cache);
68 }
69
70 static void neonserv_event_mode_async1(struct ClientSocket *client, struct UserNode *user, struct ChanNode *chan, char *modes, char **argv, int argc) {
71     struct ClientSocket *textclient = ((client->flags & SOCKET_FLAG_PREFERRED) ? client : get_prefered_bot(client->botid));
72     MYSQL_ROW row, defaults = NULL;
73     int i, arg, add = 1, skip = 0;
74     unsigned int modetype;
75     int db_canop, db_canvoice, db_canban, db_enfmodes;
76     struct ModeNode *modelock = createModeNode(NULL);
77     struct ModeBuffer *modeBuf;
78     struct UserNode *cuser;
79     struct ChanUser *chanuser;
80     modeBuf = initModeBuffer(client, chan);
81     printf_mysql_query("SELECT `channel_canop`, `channel_canvoice`, `channel_canban`, `channel_enfmodes`, `channel_modes` FROM `channels` WHERE `channel_id` = '%d'", chan->channel_id);
82     row = mysql_fetch_row(mysql_use());
83     if(row[0] == NULL || row[1] == NULL || row[2] == NULL || row[3] == NULL) {
84         printf_mysql_query("SELECT `channel_canop`, `channel_canvoice`, `channel_canban`, `channel_enfmodes`, `channel_modes` FROM `channels` WHERE `channel_name` = 'defaults'");
85         defaults = mysql_fetch_row(mysql_use());
86     }
87     db_canop = atoi((row[0] ? row[0] : defaults[0]));
88     db_canvoice = atoi((row[1] ? row[1] : defaults[1]));
89     db_canban = atoi((row[2] ? row[2] : defaults[2]));
90     db_enfmodes = atoi((row[3] ? row[3] : defaults[3]));
91     if(row[4])
92         parseModeString(modelock, row[4]);
93     else if(defaults[4])
94         parseModeString(modelock, defaults[4]);
95     int uaccess = getChannelAccess(user, chan, 0);
96     char *carg;
97     int sent_modes_locked = 0;
98     char tmp[MAXLEN];
99     arg = 0;
100     for(i = 0; i < strlen(modes); i++) {
101         switch(modes[i]) {
102             case '+':
103                 add = 1;
104                 break;
105             case '-':
106                 add = 0;
107                 break;
108             case 'o':
109             case 'v':
110                 if(arg == argc) {
111                     break;
112                 }
113                 carg = argv[arg++];
114                 if(modes[i] == 'o') {
115                     if(uaccess < db_canop) {
116                         reply(textclient, user, "NS_MODE_ENFOPS", chan->name);
117                         db_canop = -1;
118                     }
119                     if(db_canop == -1) {
120                         modeBufferSet(modeBuf, !add, modes[i], carg);
121                         break;
122                     }
123                 } else {
124                     if(uaccess < db_canvoice) {
125                         reply(textclient, user, "NS_MODE_ENFVOICE", chan->name);
126                         db_canvoice = -1;
127                     }
128                     if(db_canvoice == -1) {
129                         modeBufferSet(modeBuf, !add, modes[i], carg);
130                         break;
131                     }
132                 }
133                 cuser = searchUserByNick(carg);
134                 if(!cuser) {
135                     break; //internal Bot error - this should never happen
136                 }
137                 if(!add) {
138                     //check protection
139                     if(isBot(cuser)) {
140                         reply(textclient, user, "NS_SERVICE_IMMUNE", cuser->nick);
141                         modeBufferSet(modeBuf, !add, modes[i], carg);
142                         break;
143                     }
144                     if(isUserProtected(chan, cuser, user)) {
145                         reply(textclient, user, "NS_USER_PROTECTED", cuser->nick);
146                         modeBufferSet(modeBuf, !add, modes[i], carg);
147                         break;
148                     }
149                 }
150                 break;
151             case 'b':
152                 if(arg == argc) {
153                     break;
154                 }
155                 carg = argv[arg++];
156                 if(uaccess < db_canban) {
157                     reply(textclient, user, "NS_MODE_CANBAN", chan->name);
158                     db_canban = -1;
159                 }
160                 if(db_canban == -1) {
161                     modeBufferSet(modeBuf, !add, modes[i], carg);
162                     break;
163                 }
164                 char hostmask_buffer[NICKLEN+USERLEN+HOSTLEN+3];
165                 char usermask[NICKLEN+USERLEN+HOSTLEN+3];
166                 int match_count = 0;
167                 carg = make_banmask(carg, hostmask_buffer);
168                 if(add) {
169                     for(chanuser = getChannelUsers(chan, NULL); chanuser; chanuser = getChannelUsers(chan, chanuser)) {
170                         cuser = chanuser->user;
171                         sprintf(usermask, "%s!%s@%s", cuser->nick, cuser->ident, cuser->host);
172                         if(!match(carg, usermask)) {
173                             if(isUserProtected(chan, cuser, user)) {
174                                 reply(textclient, user, "NS_USER_PROTECTED", cuser->nick);
175                                 skip = 1;
176                                 break;
177                             }
178                             match_count++;
179                         }
180                     }
181                     if(match_count > 4 && (match_count * 3) > chan->usercount) {
182                         reply(textclient, user, "NS_LAME_MASK_WARNING", carg, match_count);
183                     }
184                 }
185                 if(skip) {
186                     modeBufferSet(modeBuf, !add, modes[i], carg);
187                 }
188                 break;
189             default:
190                 modetype = getModeType(modelock, modes[i]);
191                 if(modetype == 0) {
192                     break; //unknown mode
193                 }
194                 
195                 if(add && (modetype & CHANNEL_MODE_TYPE) != CHANNEL_MODE_TYPE_D) {
196                     if(arg == argc) {
197                         break;
198                     }
199                     carg = argv[arg++];
200                     if((modetype & CHANNEL_MODE_VALUE) == CHANNEL_MODE_VALUE_STRING && isModeSet(modelock, modes[i])) {
201                         char *modelock_val = getModeValue(modelock, modes[i]);
202                         if(stricmp(carg, modelock_val) && uaccess < db_enfmodes && !isGodMode(user)) {
203                             if(!sent_modes_locked) {
204                                 getFullModeString(modelock, tmp);
205                                 reply(textclient, user, "NS_MODE_LOCKED", tmp, chan->name);
206                                 sent_modes_locked = 1;
207                             }
208                             modeBufferSet(modeBuf, add, modes[i], modelock_val);
209                             break;
210                         }
211                     }
212                     if((modetype & CHANNEL_MODE_VALUE) == CHANNEL_MODE_VALUE_STRING && isModeSet(modelock, modes[i])) {
213                         int *modelock_val = getModeValue(modelock, modes[i]);
214                         if(atoi(carg) != *modelock_val && uaccess < db_enfmodes && !isGodMode(user)) {
215                             if(!sent_modes_locked) {
216                                 getFullModeString(modelock, tmp);
217                                 reply(textclient, user, "NS_MODE_LOCKED", tmp, chan->name);
218                                 sent_modes_locked = 1;
219                             }
220                             sprintf(tmp, "%d", *modelock_val);
221                             modeBufferSet(modeBuf, add, modes[i], tmp);
222                             break;
223                         }
224                     }
225                 } else if(!add && (modetype & CHANNEL_MODE_TYPE) == CHANNEL_MODE_TYPE_B) {
226                     if(arg == argc) {
227                         break;
228                     }
229                     carg = argv[arg++];
230                 } else
231                     carg = NULL;
232                 if(isModeAffected(modelock, modes[i]) && add == !isModeSet(modelock, modes[i]) && uaccess < db_enfmodes && !isGodMode(user)) {
233                     if(!sent_modes_locked) {
234                         getFullModeString(modelock, tmp);
235                         reply(textclient, user, "NS_MODE_LOCKED", tmp, chan->name);
236                         sent_modes_locked = 1;
237                     }
238                     modeBufferSet(modeBuf, !add, modes[i], carg);
239                     break;
240                 }
241                 break;
242         }
243     }
244     freeModeBuffer(modeBuf);
245     freeModeNode(modelock);
246 }