]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * NOperserv Fakeuser module | |
3 | * | |
4 | * Allows fakeusers to be added so as to block nicks, for example. | |
5 | * | |
6 | * Copyright (c) Tim Gordon 2006. | |
7 | */ | |
8 | ||
9 | #include "../core/schedule.h" | |
10 | #include "../localuser/localuser.h" | |
11 | #include "../localuser/localuserchannel.h" | |
12 | #include "../irc/irc_config.h" | |
13 | #include "../lib/irc_string.h" | |
14 | #include "../control/control.h" | |
15 | #include "../channel/channel.h" | |
16 | #include "../dbapi/dbapi.h" | |
17 | #include "../lib/strlfunc.h" | |
18 | #include "../lib/version.h" | |
19 | #include <string.h> | |
20 | #include <stdlib.h> | |
21 | ||
22 | MODULE_VERSION(""); | |
23 | ||
24 | /* #define SIT_CHANNEL "#qnet.fakeusers" */ | |
25 | #define KILL_WAIT 10 | |
26 | #define KILL_TIME 60 | |
27 | ||
28 | typedef struct fakeuser { | |
29 | nick *user; | |
30 | time_t lastkill; | |
31 | struct fakeuser *next; | |
32 | } fakeuser; | |
33 | ||
34 | typedef struct user_details { | |
35 | char nick[NICKLEN + 1]; | |
36 | char ident[USERLEN + 1]; | |
37 | char host[HOSTLEN + 1]; | |
38 | char realname[REALLEN + 1]; | |
39 | time_t lastkill; | |
40 | struct user_details *next; | |
41 | void *schedule; | |
42 | } user_details; | |
43 | ||
44 | fakeuser *fakeuserlist = NULL; | |
45 | user_details *killeduserlist = NULL; | |
46 | int fakeusercount = 0; | |
47 | int killedusercount = 0; | |
48 | ||
49 | void fakeuser_cleanup(); | |
50 | int fakeuser_loaddb(); | |
51 | void fakeusers_load(DBConn *dbconn, void *tag); | |
52 | void fakeuser_handler(nick *user, int command, void **params); | |
53 | int fakeadd(void *sender, int cargc, char **cargv); | |
54 | int fakelist(void *sender, int cargc, char **cargv); | |
55 | int fakekill(void *sender, int cargc, char **cargv); | |
56 | void reconnectfake(void *details); | |
57 | ||
58 | void _init() { | |
59 | if (!fakeuser_loaddb()) | |
60 | { | |
61 | Error("noperserv_fakeuser", ERR_FATAL, "Cannot load database"); | |
62 | return; | |
63 | } | |
64 | registercontrolhelpcmd("fakeuser", NO_OPER, 4, &fakeadd, "Usage: FAKEUSER nick <ident> <host> <realname>\nCreates a fake user."); | |
65 | registercontrolhelpcmd("fakelist", NO_OPER, 0, &fakelist, "Usage: FAKELIST\nLists all fake users."); | |
66 | registercontrolhelpcmd("fakekill", NO_OPER, 2, &fakekill, "Usage: FAKEKILL nick <reason>\nRemoves a fake user"); | |
67 | } | |
68 | ||
69 | void _fini() { | |
70 | fakeuser_cleanup(); | |
71 | deregistercontrolcmd("fakeuser", &fakeadd); | |
72 | deregistercontrolcmd("fakelist", &fakelist); | |
73 | deregistercontrolcmd("fakekill", &fakekill); | |
74 | } | |
75 | ||
76 | void fakeuser_cleanup() | |
77 | { | |
78 | fakeuser *fake; | |
79 | user_details *killed; | |
80 | void *next; | |
81 | for (fake = fakeuserlist; fake; fake = next) | |
82 | { | |
83 | deregisterlocaluser(fake->user, "Signing off"); | |
84 | next = fake->next; | |
85 | free(fake); | |
86 | } | |
87 | for (killed = killeduserlist; killed; killed = next) | |
88 | { | |
89 | deleteschedule(killed->schedule, &reconnectfake, killed); | |
90 | next = killed->next; | |
91 | free(killed); | |
92 | } | |
93 | fakeusercount = 0; | |
94 | killedusercount = 0; | |
95 | fakeuserlist = NULL; | |
96 | killeduserlist = NULL; | |
97 | } | |
98 | ||
99 | int fakeuser_loaddb() | |
100 | // Called from _init | |
101 | { | |
102 | if (!dbconnected()) | |
103 | return 0; | |
104 | fakeuser_cleanup(); | |
105 | dbcreatequery("CREATE TABLE noperserv.fakeusers (" | |
106 | "nick VARCHAR(%d) NOT NULL," | |
107 | "ident VARCHAR(%d) NOT NULL," | |
108 | "host VARCHAR(%d) NOT NULL," | |
109 | "realname VARCHAR(%d) NOT NULL," | |
110 | "PRIMARY KEY (nick))", NICKLEN, USERLEN, HOSTLEN, REALLEN); | |
111 | dbasyncquery(&fakeusers_load, NULL, "SELECT nick, ident, host, realname FROM noperserv.fakeusers"); | |
112 | return 1; | |
113 | } | |
114 | ||
115 | void fakeusers_load(DBConn *dbconn, void *tag) | |
116 | // Called automatically when the async database query finishes | |
117 | { | |
118 | DBResult *pgres = dbgetresult(dbconn); | |
119 | user_details details; | |
120 | ||
121 | if (!dbquerysuccessful(pgres)) { | |
122 | Error("noperserv_fakeuser", ERR_FATAL, "Error loading fakeuser list."); | |
123 | dbclear(pgres); | |
124 | return; | |
125 | } | |
126 | ||
127 | details.lastkill = 0; | |
128 | details.schedule = NULL; | |
129 | while(dbfetchrow(pgres)) { | |
130 | strlcpy(details.nick, dbgetvalue(pgres, 0), NICKLEN + 1); | |
131 | strlcpy(details.ident, dbgetvalue(pgres, 1), USERLEN + 1); | |
132 | strlcpy(details.host, dbgetvalue(pgres, 2), HOSTLEN + 1); | |
133 | strlcpy(details.realname, dbgetvalue(pgres, 3), REALLEN + 1); | |
134 | reconnectfake(&details); | |
135 | } | |
136 | dbclear(pgres); | |
137 | } | |
138 | ||
139 | user_details *getdetails(nick *user) | |
140 | { | |
141 | user_details *details; | |
142 | details = malloc(sizeof(user_details)); | |
143 | if (!details) | |
144 | return NULL; | |
145 | strlcpy(details->nick, user->nick, NICKLEN + 1); | |
146 | strlcpy(details->ident, user->ident, USERLEN + 1); | |
147 | strlcpy(details->host, user->host->name->content, HOSTLEN + 1); | |
148 | strlcpy(details->realname, user->realname->name->content, REALLEN + 1); | |
149 | details->schedule = NULL; | |
150 | details->lastkill = 0; | |
151 | return details; | |
152 | } | |
153 | ||
154 | #define ERR_EXISTS 1 | |
155 | #define ERR_MEM 2 | |
156 | #define ERR_WONTKILL 3 | |
157 | int err_code; | |
158 | ||
159 | nick *register_fakeuser(user_details *details) | |
160 | { | |
161 | nick *user; | |
162 | if ((user = getnickbynick(details->nick)) && (IsOper(user) || IsService(user) || IsXOper(user))) { | |
163 | err_code = ERR_WONTKILL; | |
164 | return NULL; | |
165 | } | |
166 | ||
167 | err_code = ERR_MEM; | |
168 | return registerlocaluser(details->nick, details->ident, details->host, details->realname, | |
169 | NULL, UMODE_INV | UMODE_DEAF, &fakeuser_handler); | |
170 | } | |
171 | ||
172 | fakeuser *ll_add(user_details *details) | |
173 | // Adds to the (sorted) linked list | |
174 | { | |
175 | fakeuser *fake, *newfake; | |
176 | int cmp; | |
177 | ||
178 | if (fakeuserlist) | |
179 | { | |
180 | cmp = ircd_strcmp(details->nick, fakeuserlist->user->nick); | |
181 | if (!cmp) | |
182 | { | |
183 | err_code = ERR_EXISTS; | |
184 | return NULL; | |
185 | } | |
186 | } | |
187 | else | |
188 | cmp = -1; | |
189 | if (cmp < 0) | |
190 | { | |
191 | newfake = malloc(sizeof(fakeuser)); | |
192 | if (!newfake) | |
193 | { | |
194 | err_code = ERR_MEM; | |
195 | return NULL; | |
196 | } | |
197 | newfake->user = register_fakeuser(details); | |
198 | if (!newfake->user) | |
199 | { | |
200 | free(newfake); | |
201 | return NULL; //errcode already set by register_fakeuser | |
202 | } | |
203 | newfake->lastkill = details->lastkill; | |
204 | newfake->next = fakeuserlist; | |
205 | fakeuserlist = newfake; | |
206 | fakeusercount++; | |
207 | return newfake; | |
208 | } | |
209 | for (fake = fakeuserlist; fake->next; fake = fake->next) | |
210 | { | |
211 | cmp = ircd_strcmp(details->nick, fake->next->user->nick); | |
212 | if (!cmp) | |
213 | { | |
214 | err_code = ERR_EXISTS; | |
215 | return NULL; | |
216 | } | |
217 | if (cmp < 0) | |
218 | { | |
219 | newfake = malloc(sizeof(fakeuser)); | |
220 | if (!newfake) | |
221 | { | |
222 | err_code = ERR_MEM; | |
223 | return NULL; | |
224 | } | |
225 | newfake->user = register_fakeuser(details); | |
226 | if (!newfake->user) | |
227 | { | |
228 | free(newfake); | |
229 | return NULL; //errcode already set by register_fakeuser | |
230 | } | |
231 | newfake->lastkill = details->lastkill; | |
232 | newfake->next = fake->next; | |
233 | fake->next = newfake; | |
234 | fakeusercount++; | |
235 | return newfake; | |
236 | } | |
237 | } | |
238 | newfake = malloc(sizeof(fakeuser)); | |
239 | if (!newfake) | |
240 | { | |
241 | err_code = ERR_MEM; | |
242 | return NULL; | |
243 | } | |
244 | newfake->user = register_fakeuser(details); | |
245 | if (!newfake->user) | |
246 | { | |
247 | free(newfake); | |
248 | return NULL; //errcode already set by register_fakeuser | |
249 | } | |
250 | newfake->lastkill = details->lastkill; | |
251 | newfake->next = NULL; | |
252 | fake->next = newfake; | |
253 | fakeusercount++; | |
254 | return newfake; | |
255 | } | |
256 | ||
257 | void kll_add(user_details *details) | |
258 | //Adds to the (sorted) linked list of killed users | |
259 | { | |
260 | int cmp; | |
261 | user_details *killed; | |
262 | ||
263 | if (killeduserlist) | |
264 | cmp = ircd_strcmp(details->nick, killeduserlist->nick); | |
265 | else | |
266 | cmp = -1; | |
267 | if (cmp < 0) //Add to the start of the list | |
268 | { | |
269 | details->next = killeduserlist; | |
270 | killeduserlist = details; | |
271 | killedusercount++; | |
272 | return; | |
273 | } | |
274 | for (killed = killeduserlist; killed->next; killed = killed->next) | |
275 | { | |
276 | cmp = ircd_strcmp(details->nick, killed->next->nick); | |
277 | if (cmp < 0) | |
278 | { | |
279 | details->next = killed->next; | |
280 | killed->next = details; | |
281 | killedusercount++; | |
282 | return; | |
283 | } | |
284 | } | |
285 | details->next = NULL; | |
286 | killed->next = details; | |
287 | killedusercount++; | |
288 | return; | |
289 | } | |
290 | ||
291 | fakeuser *ll_remove(char *nickname) | |
292 | //Removes from the linked list | |
293 | { | |
294 | fakeuser *fake, *rmfake; | |
295 | int cmp; | |
296 | ||
297 | if (!fakeuserlist) | |
298 | return NULL; | |
299 | cmp = ircd_strcmp(nickname, fakeuserlist->user->nick); | |
300 | if (cmp < 0) | |
301 | return NULL; | |
302 | if (!cmp) | |
303 | { | |
304 | rmfake = fakeuserlist; | |
305 | fakeuserlist = fakeuserlist->next; | |
306 | fakeusercount--; | |
307 | rmfake->next = NULL; | |
308 | return rmfake; | |
309 | } | |
310 | for (fake = fakeuserlist; fake->next; fake = fake->next) | |
311 | { | |
312 | rmfake = fake->next; | |
313 | cmp = ircd_strcmp(nickname, rmfake->user->nick); | |
314 | if (cmp < 0) | |
315 | return NULL; | |
316 | if (!cmp) | |
317 | { | |
318 | fake->next = rmfake->next; | |
319 | fakeusercount--; | |
320 | rmfake->next = NULL; | |
321 | return rmfake; | |
322 | } | |
323 | } | |
324 | return NULL; | |
325 | } | |
326 | ||
327 | user_details *kll_remove(char *nickname) //Removes from the killed user linked list | |
328 | { | |
329 | user_details *details, *rmdetails; | |
330 | int cmp; | |
331 | ||
332 | if (!killeduserlist) | |
333 | return NULL; | |
334 | cmp = ircd_strcmp(nickname, killeduserlist->nick); | |
335 | if (cmp < 0) | |
336 | return NULL; | |
337 | if (!cmp) | |
338 | { | |
339 | rmdetails = killeduserlist; | |
340 | killeduserlist = killeduserlist->next; | |
341 | rmdetails->next = NULL; | |
342 | killedusercount--; | |
343 | return rmdetails; | |
344 | } | |
345 | for (details = killeduserlist; details->next; details = details->next) | |
346 | { | |
347 | rmdetails = details->next; | |
348 | cmp = ircd_strcmp(nickname, rmdetails->nick); | |
349 | if (cmp < 0) | |
350 | return NULL; | |
351 | if (!cmp) | |
352 | { | |
353 | details->next = rmdetails->next; | |
354 | rmdetails->next = NULL; | |
355 | killedusercount--; | |
356 | return rmdetails; | |
357 | } | |
358 | } | |
359 | return NULL; | |
360 | } | |
361 | ||
362 | void fakeuser_handler(nick *user, int command, void **params) | |
363 | { | |
364 | if (command == LU_KILLED) | |
365 | { | |
366 | user_details *details; | |
367 | fakeuser *item; | |
368 | time_t timenow = time(NULL); | |
369 | ||
370 | details = getdetails(user); | |
371 | item = ll_remove(details->nick); | |
372 | if (!item) | |
373 | { | |
374 | controlwall(NO_OPER, NL_FAKEUSERS, "Error: A fakeuser was killed, but wasn't found in the list"); | |
375 | Error("noperserv_fakeuser", ERR_ERROR, "A fakeuser was killed, but wasn't found in the list"); | |
376 | return; | |
377 | } | |
378 | ||
379 | details->lastkill = item->lastkill; | |
380 | free(item); | |
381 | ||
382 | if (timenow - details->lastkill < KILL_TIME) { | |
383 | char escnick[NICKLEN * 2 + 1]; | |
384 | controlwall(NO_OPER, NL_FAKEUSERS, "Fake user %s!%s@%s (%s) KILL'ed twice under in %d seconds. Removing.", details->nick, details->ident, details->host, details->realname, KILL_TIME); | |
385 | dbescapestring(escnick, details->nick, strlen(details->nick)); | |
386 | dbquery("DELETE FROM noperserv.fakeusers WHERE nick = '%s'", escnick); | |
387 | return; | |
388 | } | |
389 | details->lastkill = timenow; | |
390 | ||
391 | /* | |
392 | controlwalls(NO_OPER, NL_FAKEUSERS, "Fake user %s!%s@%s (%s) was KILL'ed", details->nick, | |
393 | details->ident, details->host, details->realname); | |
394 | */ | |
395 | details->schedule = scheduleoneshot(time(NULL) + KILL_WAIT, &reconnectfake, details); | |
396 | if (!details->schedule) | |
397 | { | |
398 | Error("noperserv_fakeuser", ERR_ERROR, "Couldn't reschedule fakeuser for reconnect"); | |
399 | free(details); | |
400 | return; | |
401 | } | |
402 | kll_add(details); | |
403 | } | |
404 | } | |
405 | ||
406 | //Usage: FAKEUSER nick <ident> <host> <realname> | |
407 | int fakeadd(void *sender, int cargc, char **cargv) | |
408 | { | |
409 | user_details details, *killed; | |
410 | char escnick[NICKLEN * 2 + 1], escident[USERLEN * 2 + 1], eschost[HOSTLEN * 2 + 1], escreal[REALLEN * 2 + 1]; | |
411 | nick *newnick; | |
412 | fakeuser *newfake; | |
413 | ||
414 | if (cargc == 0) | |
415 | return CMD_USAGE; | |
416 | strlcpy(details.nick, cargv[0], NICKLEN + 1); | |
417 | if (cargc < 4) | |
418 | strlcpy(details.realname, cargv[0], REALLEN + 1); | |
419 | else | |
420 | strlcpy(details.realname, cargv[3], REALLEN + 1); | |
421 | if (cargc < 3) | |
422 | { | |
423 | strlcpy(details.host, cargv[0], NICKLEN + 1); | |
424 | strlcat(details.host, ".fakeusers.quakenet.org", HOSTLEN + 1); | |
425 | } | |
426 | else | |
427 | strlcpy(details.host, cargv[2], HOSTLEN + 1); | |
428 | if (cargc < 2) | |
429 | strlcpy(details.ident, cargv[0], USERLEN + 1); | |
430 | else | |
431 | strlcpy(details.ident, cargv[1], USERLEN + 1); | |
432 | ||
433 | details.lastkill = 0; | |
434 | ||
435 | newfake = ll_add(&details); | |
436 | if (!newfake) | |
437 | { | |
438 | if (err_code == ERR_EXISTS) | |
439 | controlreply(sender, "Error: fakeuser already exists"); | |
440 | else if (err_code == ERR_MEM) | |
441 | { | |
442 | controlreply(sender, "Error: memory error!!"); | |
443 | Error("noperserv_fakeuser", ERR_STOP, "malloc error"); | |
444 | } | |
445 | else if (err_code == ERR_WONTKILL) | |
446 | controlreply(sender, "Nick already exists and I won't kill it"); | |
447 | else | |
448 | { | |
449 | controlreply(sender, "Unknown error when adding fakeuser"); | |
450 | Error("noperserv_fakeuser", ERR_ERROR, "Unknown error when adding fakeuser"); | |
451 | } | |
452 | return CMD_ERROR; | |
453 | } | |
454 | newnick = newfake->user; | |
455 | dbescapestring(escnick, newnick->nick, strlen(newnick->nick)); | |
456 | dbescapestring(escident, newnick->ident, strlen(newnick->ident)); | |
457 | dbescapestring(eschost, newnick->host->name->content, newnick->host->name->length); | |
458 | dbescapestring(escreal, newnick->realname->name->content, newnick->realname->name->length); | |
459 | if ((killed = kll_remove(newnick->nick))) //Is this nickname scheduled to reconnect? | |
460 | { | |
461 | deleteschedule(killed->schedule, &reconnectfake, killed); | |
462 | free(killed); | |
463 | dbquery("UPDATE noperserv.fakeusers SET ident = '%s', host = '%s', realname = '%s' WHERE nick = '%s'", | |
464 | escident, eschost, escreal, escnick); | |
465 | } | |
466 | else | |
467 | dbquery("INSERT INTO noperserv.fakeusers (nick, ident, host, realname) VALUES ('%s', '%s', '%s', '%s')", | |
468 | escnick, escident, eschost, escreal); | |
469 | controlreply(sender, "Added fake user %s", newnick->nick); | |
470 | controlwall(NO_OPER, NL_FAKEUSERS, "Fake user %s!%s@%s (%s) added by %s/%s", newnick->nick, newnick->ident, | |
471 | newnick->host->name->content, newnick->realname->name->content, ((nick*)sender)->nick, ((nick*)sender)->authname); | |
472 | #ifdef SIT_CHANNEL | |
473 | { | |
474 | channel *sitchannel; | |
475 | if (!(sitchannel = findchannel(SIT_CHANNEL))) | |
476 | sitchannel = createchannel(SIT_CHANNEL); | |
477 | localjoinchannel(newnick, sitchannel); | |
478 | } | |
479 | #endif | |
480 | return CMD_OK; | |
481 | } | |
482 | ||
483 | //Usage: FAKELIST | |
484 | int fakelist(void *sender, int cargc, char **cargv) | |
485 | { | |
486 | fakeuser *fake; | |
487 | if (fakeusercount == 1) | |
488 | controlreply(sender, "1 fakeuser is currently connected"); | |
489 | else | |
490 | controlreply(sender, "%d fakeusers are currently connected", fakeusercount); | |
491 | for(fake = fakeuserlist; fake; fake = fake->next) | |
492 | controlreply(sender, "%s!%s@%s (%s)", fake->user->nick, fake->user->ident, | |
493 | fake->user->host->name->content, fake->user->realname->name->content); | |
494 | if (killeduserlist) | |
495 | { | |
496 | user_details *k_fake; | |
497 | if (fakeusercount == 1) | |
498 | controlreply(sender, "1 fakeuser is currently waiting to reconnect"); | |
499 | else | |
500 | controlreply(sender, "%d fakeusers are currently waiting to reconnect", killedusercount); | |
501 | for(k_fake = killeduserlist; k_fake; k_fake = k_fake->next) | |
502 | controlreply(sender, "%s!%s@%s (%s)", k_fake->nick, k_fake->ident, k_fake->host, k_fake->realname); | |
503 | } | |
504 | return CMD_OK; | |
505 | } | |
506 | ||
507 | //Usage: FAKEKILL nick <reason> | |
508 | int fakekill(void *sender, int cargc, char **cargv) | |
509 | { | |
510 | fakeuser *fake; | |
511 | user_details *k_fake; | |
512 | char escnick[NICKLEN * 2 + 1]; | |
513 | if (cargc == 0) | |
514 | return CMD_USAGE; | |
515 | if ((fake = ll_remove(cargv[0]))) | |
516 | { | |
517 | dbescapestring(escnick, fake->user->nick, strlen(fake->user->nick)); | |
518 | dbquery("DELETE FROM noperserv.fakeusers WHERE nick = '%s'", escnick); | |
519 | controlreply(sender, "Killed fake user %s", fake->user->nick); | |
520 | controlwall(NO_OPER, NL_FAKEUSERS, "Fake user %s!%s@%s (%s) removed by %s/%s", fake->user->nick, fake->user->ident, | |
521 | fake->user->host->name->content, fake->user->realname->name->content, ((nick*)sender)->nick, ((nick*)sender)->authname); | |
522 | if (cargc > 1) | |
523 | deregisterlocaluser(fake->user, cargv[1]); | |
524 | else | |
525 | deregisterlocaluser(fake->user, "Signing off"); | |
526 | free(fake); | |
527 | return CMD_OK; | |
528 | } | |
529 | if ((k_fake = kll_remove(cargv[0]))) //Fakeuser might be waiting to rejoin | |
530 | { | |
531 | dbescapestring(escnick, k_fake->nick, strlen(k_fake->nick)); | |
532 | dbquery("DELETE FROM noperserv.fakeusers WHERE nick = '%s'", escnick); | |
533 | controlreply(sender, "Killed fake user %s", k_fake->nick); | |
534 | controlwall(NO_OPER, NL_FAKEUSERS, "Fake user %s!%s@%s (%s) removed by %s/%s", k_fake->nick, | |
535 | k_fake->ident, k_fake->host, k_fake->realname, ((nick*)sender)->nick, ((nick*)sender)->authname); | |
536 | free(k_fake); | |
537 | return CMD_OK; | |
538 | } | |
539 | controlreply(sender, "No fakeuser with that nick exists"); | |
540 | return CMD_ERROR; | |
541 | } | |
542 | ||
543 | void reconnectfake(void *details) | |
544 | //Called after the timeout period has expired since a fakeuser was killed, or on load | |
545 | { | |
546 | fakeuser *fake; | |
547 | user_details *u_details = details; | |
548 | if (u_details->schedule) | |
549 | kll_remove(u_details->nick); //Fakeuser was /kill'd | |
550 | fake = ll_add(u_details); | |
551 | if (u_details->schedule) | |
552 | free(u_details); | |
553 | if (!fake) | |
554 | return; | |
555 | #ifdef SIT_CHANNEL | |
556 | { | |
557 | channel *sitchannel; | |
558 | if (!(sitchannel = findchannel(SIT_CHANNEL))) | |
559 | sitchannel = createchannel(SIT_CHANNEL); | |
560 | localjoinchannel(fake->user, sitchannel); | |
561 | } | |
562 | #endif | |
563 | } |