Blob


1 /*
2 * ngIRCd -- The Next Generation IRC Daemon
3 * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 * Please read the file COPYING, README and AUTHORS for more information.
10 *
11 * Management of IRC lists: ban, invite, ...
12 */
15 #include "portab.h"
17 static char UNUSED id[] = "$Id: lists.c,v 1.15 2004/04/25 15:40:19 alex Exp $";
19 #include "imp.h"
20 #include <assert.h>
22 #include "defines.h"
23 #include "conn.h"
24 #include "client.h"
25 #include "channel.h"
26 #include "log.h"
27 #include "match.h"
28 #include "messages.h"
29 #include "irc-write.h"
31 #include <stdlib.h>
32 #include <string.h>
33 #include <strings.h>
35 #include "exp.h"
36 #include "lists.h"
39 #define MASK_LEN 2*CLIENT_HOST_LEN
42 typedef struct _C2C
43 {
44 struct _C2C *next;
45 CHAR mask[MASK_LEN];
46 CHANNEL *channel;
47 BOOLEAN onlyonce;
48 } C2C;
51 LOCAL C2C *My_Invites, *My_Bans;
54 LOCAL C2C *New_C2C PARAMS(( CHAR *Mask, CHANNEL *Chan, BOOLEAN OnlyOnce ));
56 LOCAL BOOLEAN Check_List PARAMS(( C2C **Cl2Chan, CLIENT *Client, CHANNEL *Chan ));
57 LOCAL BOOLEAN Already_Registered PARAMS(( C2C *Cl2Chan, CHAR *Mask, CHANNEL *Chan ));
61 GLOBAL VOID
62 Lists_Init( VOID )
63 {
64 /* Modul initialisieren */
66 My_Invites = My_Bans = NULL;
67 } /* Lists_Init */
70 GLOBAL VOID
71 Lists_Exit( VOID )
72 {
73 /* Modul abmelden */
75 C2C *c2c, *next;
77 /* Invite-Lists freigeben */
78 c2c = My_Invites;
79 while( c2c )
80 {
81 next = c2c->next;
82 free( c2c );
83 c2c = next;
84 }
86 /* Ban-Lists freigeben */
87 c2c = My_Bans;
88 while( c2c )
89 {
90 next = c2c->next;
91 free( c2c );
92 c2c = next;
93 }
94 } /* Lists_Exit */
97 GLOBAL BOOLEAN
98 Lists_CheckInvited( CLIENT *Client, CHANNEL *Chan )
99 {
100 return Check_List( &My_Invites, Client, Chan );
101 } /* Lists_CheckInvited */
104 GLOBAL BOOLEAN
105 Lists_IsInviteEntry( CHAR *Mask, CHANNEL *Chan )
107 assert( Mask != NULL );
108 assert( Chan != NULL );
110 return Already_Registered( My_Invites, Mask, Chan );
111 } /* Lists_IsInviteEntry */
114 GLOBAL BOOLEAN
115 Lists_AddInvited( CHAR *Mask, CHANNEL *Chan, BOOLEAN OnlyOnce )
117 C2C *c2c;
119 assert( Mask != NULL );
120 assert( Chan != NULL );
122 if( Already_Registered( My_Invites, Mask, Chan )) return TRUE;
124 c2c = New_C2C( Mask, Chan, OnlyOnce );
125 if( ! c2c )
127 Log( LOG_ERR, "Can't add new invite list entry!" );
128 return FALSE;
131 /* verketten */
132 c2c->next = My_Invites;
133 My_Invites = c2c;
135 Log( LOG_DEBUG, "Added \"%s\" to invite list for \"%s\".", Mask, Channel_Name( Chan ));
136 return TRUE;
137 } /* Lists_AddInvited */
140 GLOBAL VOID
141 Lists_DelInvited( CHAR *Mask, CHANNEL *Chan )
143 C2C *c2c, *last, *next;
145 assert( Mask != NULL );
146 assert( Chan != NULL );
148 last = NULL;
149 c2c = My_Invites;
150 while( c2c )
152 next = c2c->next;
153 if(( c2c->channel == Chan ) && ( strcasecmp( c2c->mask, Mask ) == 0 ))
155 /* dieser Eintrag muss geloescht werden */
156 Log( LOG_DEBUG, "Deleted \"%s\" from invite list for \"%s\"." , c2c->mask, Channel_Name( Chan ));
157 if( last ) last->next = next;
158 else My_Invites = next;
159 free( c2c );
161 else last = c2c;
162 c2c = next;
164 } /* Lists_DelInvited */
167 GLOBAL BOOLEAN
168 Lists_ShowInvites( CLIENT *Client, CHANNEL *Channel )
170 C2C *c2c;
172 assert( Client != NULL );
173 assert( Channel != NULL );
175 c2c = My_Invites;
176 while( c2c )
178 if( c2c->channel == Channel )
180 /* Eintrag fuer Channel gefunden; ausgeben: */
181 if( ! IRC_WriteStrClient( Client, RPL_INVITELIST_MSG, Client_ID( Client ), Channel_Name( Channel ), c2c->mask )) return DISCONNECTED;
183 c2c = c2c->next;
185 return IRC_WriteStrClient( Client, RPL_ENDOFINVITELIST_MSG, Client_ID( Client ), Channel_Name( Channel ));
186 } /* Lists_ShowInvites */
189 GLOBAL BOOLEAN
190 Lists_SendInvites( CLIENT *Client )
192 C2C *c2c;
194 assert( Client != NULL );
196 c2c = My_Invites;
197 while( c2c )
199 if( ! IRC_WriteStrClient( Client, "MODE %s +I %s", Channel_Name( c2c->channel ), c2c->mask )) return DISCONNECTED;
200 c2c = c2c->next;
202 return CONNECTED;
203 } /* Lists_SendInvites */
206 GLOBAL BOOLEAN
207 Lists_SendBans( CLIENT *Client )
209 C2C *c2c;
211 assert( Client != NULL );
213 c2c = My_Bans;
214 while( c2c )
216 if( ! IRC_WriteStrClient( Client, "MODE %s +b %s", Channel_Name( c2c->channel ), c2c->mask )) return DISCONNECTED;
217 c2c = c2c->next;
219 return CONNECTED;
220 } /* Lists_SendBans */
223 GLOBAL BOOLEAN
224 Lists_CheckBanned( CLIENT *Client, CHANNEL *Chan )
226 return Check_List( &My_Bans, Client, Chan );
227 } /* Lists_CheckBanned */
230 GLOBAL BOOLEAN
231 Lists_IsBanEntry( CHAR *Mask, CHANNEL *Chan )
233 assert( Mask != NULL );
234 assert( Chan != NULL );
236 return Already_Registered( My_Bans, Mask, Chan );
237 } /* Lists_IsBanEntry */
240 GLOBAL BOOLEAN
241 Lists_AddBanned( CHAR *Mask, CHANNEL *Chan )
243 C2C *c2c;
245 assert( Mask != NULL );
246 assert( Chan != NULL );
248 if( Already_Registered( My_Bans, Mask, Chan )) return TRUE;
250 c2c = New_C2C( Mask, Chan, FALSE );
251 if( ! c2c )
253 Log( LOG_ERR, "Can't add new ban list entry!" );
254 return FALSE;
257 /* verketten */
258 c2c->next = My_Bans;
259 My_Bans = c2c;
261 Log( LOG_DEBUG, "Added \"%s\" to ban list for \"%s\".", Mask, Channel_Name( Chan ));
262 return TRUE;
263 } /* Lists_AddBanned */
266 GLOBAL VOID
267 Lists_DelBanned( CHAR *Mask, CHANNEL *Chan )
269 C2C *c2c, *last, *next;
271 assert( Mask != NULL );
272 assert( Chan != NULL );
274 last = NULL;
275 c2c = My_Bans;
276 while( c2c )
278 next = c2c->next;
279 if(( c2c->channel == Chan ) && ( strcasecmp( c2c->mask, Mask ) == 0 ))
281 /* dieser Eintrag muss geloescht werden */
282 Log( LOG_DEBUG, "Deleted \"%s\" from ban list for \"%s\"." , c2c->mask, Channel_Name( Chan ));
283 if( last ) last->next = next;
284 else My_Bans = next;
285 free( c2c );
287 else last = c2c;
288 c2c = next;
290 } /* Lists_DelBanned */
293 GLOBAL BOOLEAN
294 Lists_ShowBans( CLIENT *Client, CHANNEL *Channel )
296 C2C *c2c;
298 assert( Client != NULL );
299 assert( Channel != NULL );
301 c2c = My_Bans;
302 while( c2c )
304 if( c2c->channel == Channel )
306 /* Eintrag fuer Channel gefunden; ausgeben: */
307 if( ! IRC_WriteStrClient( Client, RPL_BANLIST_MSG, Client_ID( Client ), Channel_Name( Channel ), c2c->mask )) return DISCONNECTED;
309 c2c = c2c->next;
311 return IRC_WriteStrClient( Client, RPL_ENDOFBANLIST_MSG, Client_ID( Client ), Channel_Name( Channel ));
312 } /* Lists_ShowBans */
315 GLOBAL VOID
316 Lists_DeleteChannel( CHANNEL *Chan )
318 /* Channel wurde geloescht, Invite- und Ban-Lists aufraeumen */
320 C2C *c2c, *last, *next;
322 /* Invite-List */
323 last = NULL;
324 c2c = My_Invites;
325 while( c2c )
327 next = c2c->next;
328 if( c2c->channel == Chan )
330 /* dieser Eintrag muss geloescht werden */
331 Log( LOG_DEBUG, "Deleted \"%s\" from invite list for \"%s\"." , c2c->mask, Channel_Name( Chan ));
332 if( last ) last->next = next;
333 else My_Invites = next;
334 free( c2c );
336 else last = c2c;
337 c2c = next;
340 /* Ban-List */
341 last = NULL;
342 c2c = My_Bans;
343 while( c2c )
345 next = c2c->next;
346 if( c2c->channel == Chan )
348 /* dieser Eintrag muss geloescht werden */
349 Log( LOG_DEBUG, "Deleted \"%s\" from ban list for \"%s\"." , c2c->mask, Channel_Name( Chan ));
350 if( last ) last->next = next;
351 else My_Bans = next;
352 free( c2c );
354 else last = c2c;
355 c2c = next;
357 } /* Lists_DeleteChannel */
360 GLOBAL CHAR *
361 Lists_MakeMask( CHAR *Pattern )
363 /* Hier wird aus einem "beliebigen" Pattern eine gueltige IRC-Mask erzeugt.
364 * Diese ist aber nur bis zum naechsten Aufruf von Lists_MakeMask() gueltig,
365 * da ein einziger globaler Puffer verwendet wird. ->Umkopieren!*/
367 STATIC CHAR TheMask[MASK_LEN];
368 CHAR *excl, *at;
370 assert( Pattern != NULL );
372 excl = strchr( Pattern, '!' );
373 at = strchr( Pattern, '@' );
375 if(( at ) && ( at < excl )) excl = NULL;
377 if(( ! at ) && ( ! excl ))
379 /* weder ! noch @ vorhanden: als Nick annehmen */
380 strlcpy( TheMask, Pattern, sizeof( TheMask ) - 5 );
381 strlcat( TheMask, "!*@*", sizeof( TheMask ));
382 return TheMask;
385 if(( ! at ) && ( excl ))
387 /* Domain fehlt */
388 strlcpy( TheMask, Pattern, sizeof( TheMask ) - 3 );
389 strlcat( TheMask, "@*", sizeof( TheMask ));
390 return TheMask;
393 if(( at ) && ( ! excl ))
395 /* User fehlt */
396 *at = '\0'; at++;
397 strlcpy( TheMask, Pattern, sizeof( TheMask ) - strlen( at ) - 4 );
398 strlcat( TheMask, "!*@", sizeof( TheMask ));
399 strlcat( TheMask, at, sizeof( TheMask ));
400 return TheMask;
403 /* alle Teile vorhanden */
404 strlcpy( TheMask, Pattern, sizeof( TheMask ));
405 return TheMask;
406 } /* Lists_MakeMask */
409 LOCAL C2C *
410 New_C2C( CHAR *Mask, CHANNEL *Chan, BOOLEAN OnlyOnce )
412 C2C *c2c;
414 assert( Mask != NULL );
415 assert( Chan != NULL );
417 /* Speicher fuer Eintrag anfordern */
418 c2c = (C2C *)malloc( sizeof( C2C ));
419 if( ! c2c )
421 Log( LOG_EMERG, "Can't allocate memory! [New_C2C]" );
422 return NULL;
425 strlcpy( c2c->mask, Mask, sizeof( c2c->mask ));
426 c2c->channel = Chan;
427 c2c->onlyonce = OnlyOnce;
429 return c2c;
430 } /* New_C2C */
433 LOCAL BOOLEAN
434 Check_List( C2C **Cl2Chan, CLIENT *Client, CHANNEL *Chan )
436 C2C *c2c, *last;
438 assert( Cl2Chan != NULL );
439 assert( Client != NULL );
440 assert( Chan != NULL );
442 c2c = *Cl2Chan;
443 last = NULL;
445 while( c2c )
447 if( c2c->channel == Chan )
449 /* Ok, richtiger Channel. Passt die Maske? */
450 if( Match( c2c->mask, Client_Mask( Client )))
452 /* Treffer! */
453 if( c2c->onlyonce )
455 /* Eintrag loeschen */
456 Log( LOG_DEBUG, "Deleted \"%s\" from %s list for \"%s\".", c2c->mask, *Cl2Chan == My_Invites ? "invite" : "ban", Channel_Name( Chan ));
457 if( last ) last->next = c2c->next;
458 else *Cl2Chan = c2c->next;
459 free( c2c );
461 return TRUE;
464 last = c2c;
465 c2c = c2c->next;
468 return FALSE;
469 } /* Check_List */
472 LOCAL BOOLEAN
473 Already_Registered( C2C *List, CHAR *Mask, CHANNEL *Chan )
475 C2C *c2c;
477 c2c = List;
478 while( c2c )
480 if(( c2c->channel == Chan ) && ( strcasecmp( c2c->mask, Mask ) == 0 )) return TRUE;
481 c2c = c2c->next;
483 return FALSE;
484 } /* Already_Registered */
487 /* -eof- */