1 /*
2  * ngIRCd -- The Next Generation IRC Daemon
3  * Copyright (c)2001-2005 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  */
13 
14 
15 #include "portab.h"
16 
17 static char UNUSED id[] = "$Id: lists.c,v 1.17 2005/03/19 18:43:49 fw Exp $";
18 
19 #include "imp.h"
20 #include <assert.h>
21 
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"
30 
31 #include <stdlib.h>
32 #include <string.h>
33 #include <strings.h>
34 
35 #include "exp.h"
36 #include "lists.h"
37 
38 
39 #define MASK_LEN 2*CLIENT_HOST_LEN
40 
41 
42 typedef struct _C2C
43 {
44 	struct _C2C *next;
45 	char mask[MASK_LEN];
46 	CHANNEL *channel;
47 	bool onlyonce;
48 } C2C;
49 
50 
51 LOCAL C2C *My_Invites, *My_Bans;
52 
53 
54 LOCAL C2C *New_C2C PARAMS(( char *Mask, CHANNEL *Chan, bool OnlyOnce ));
55 
56 LOCAL bool Check_List PARAMS(( C2C **Cl2Chan, CLIENT *Client, CHANNEL *Chan ));
57 LOCAL bool Already_Registered PARAMS(( C2C *Cl2Chan, char *Mask, CHANNEL *Chan ));
58 
59 
60 
61 GLOBAL void
62 Lists_Init( void )
63 {
64 	/* Modul initialisieren */
65 
66 	My_Invites = My_Bans = NULL;
67 } /* Lists_Init */
68 
69 
70 GLOBAL void
71 Lists_Exit( void )
72 {
73 	/* Modul abmelden */
74 
75 	C2C *c2c, *next;
76 
77 	/* Invite-Lists freigeben */
78 	c2c = My_Invites;
79 	while( c2c )
80 	{
81 		next = c2c->next;
82 		free( c2c );
83 		c2c = next;
84 	}
85 
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 */
95 
96 
97 GLOBAL bool
98 Lists_CheckInvited( CLIENT *Client, CHANNEL *Chan )
99 {
100 	return Check_List( &My_Invites, Client, Chan );
101 } /* Lists_CheckInvited */
102 
103 
104 GLOBAL bool
105 Lists_IsInviteEntry( char *Mask, CHANNEL *Chan )
106 {
107 	assert( Mask != NULL );
108 	assert( Chan != NULL );
109 	
110 	return Already_Registered( My_Invites, Mask, Chan );
111 } /* Lists_IsInviteEntry */
112 
113 
114 GLOBAL bool
115 Lists_AddInvited( char *Mask, CHANNEL *Chan, bool OnlyOnce )
116 {
117 	C2C *c2c;
118 
119 	assert( Mask != NULL );
120 	assert( Chan != NULL );
121 
122 	if( Already_Registered( My_Invites, Mask, Chan )) return true;
123 	
124 	c2c = New_C2C( Mask, Chan, OnlyOnce );
125 	if( ! c2c )
126 	{
127 		Log( LOG_ERR, "Can't add new invite list entry!" );
128 		return false;
129 	}
130 
131 	/* verketten */
132 	c2c->next = My_Invites;
133 	My_Invites = c2c;
134 
135 	Log( LOG_DEBUG, "Added \"%s\" to invite list for \"%s\".", Mask, Channel_Name( Chan ));
136 	return true;
137 } /* Lists_AddInvited */
138 
139 
140 GLOBAL void
141 Lists_DelInvited( char *Mask, CHANNEL *Chan )
142 {
143 	C2C *c2c, *last, *next;
144 
145 	assert( Mask != NULL );
146 	assert( Chan != NULL );
147 
148 	last = NULL;
149 	c2c = My_Invites;
150 	while( c2c )
151 	{
152 		next = c2c->next;
153 		if(( c2c->channel == Chan ) && ( strcasecmp( c2c->mask, Mask ) == 0 ))
154 		{
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 );
160 		}
161 		else last = c2c;
162 		c2c = next;
163 	}
164 } /* Lists_DelInvited */
165 
166 
167 GLOBAL bool
168 Lists_ShowInvites( CLIENT *Client, CHANNEL *Channel )
169 {
170 	C2C *c2c;
171 
172 	assert( Client != NULL );
173 	assert( Channel != NULL );
174 
175 	c2c = My_Invites;
176 	while( c2c )
177 	{
178 		if( c2c->channel == Channel )
179 		{
180 			/* Eintrag fuer Channel gefunden; ausgeben: */
181 			if( ! IRC_WriteStrClient( Client, RPL_INVITELIST_MSG, Client_ID( Client ), Channel_Name( Channel ), c2c->mask )) return DISCONNECTED;
182 		}
183 		c2c = c2c->next;
184 	}
185 	return IRC_WriteStrClient( Client, RPL_ENDOFINVITELIST_MSG, Client_ID( Client ), Channel_Name( Channel ));
186 } /* Lists_ShowInvites */
187 
188 
189 GLOBAL bool
190 Lists_SendInvites( CLIENT *Client )
191 {
192 	C2C *c2c;
193 	
194 	assert( Client != NULL );
195 	
196 	c2c = My_Invites;
197 	while( c2c )
198 	{
199 		if( ! IRC_WriteStrClient( Client, "MODE %s +I %s", Channel_Name( c2c->channel ), c2c->mask )) return DISCONNECTED;
200 		c2c = c2c->next;
201 	}
202 	return CONNECTED;
203 } /* Lists_SendInvites */
204 
205 
206 GLOBAL bool
207 Lists_SendBans( CLIENT *Client )
208 {
209 	C2C *c2c;
210 	
211 	assert( Client != NULL );
212 	
213 	c2c = My_Bans;
214 	while( c2c )
215 	{
216 		if( ! IRC_WriteStrClient( Client, "MODE %s +b %s", Channel_Name( c2c->channel ), c2c->mask )) return DISCONNECTED;
217 		c2c = c2c->next;
218 	}
219 	return CONNECTED;
220 } /* Lists_SendBans */
221 
222 
223 GLOBAL bool
224 Lists_CheckBanned( CLIENT *Client, CHANNEL *Chan )
225 {
226 	return Check_List( &My_Bans, Client, Chan );
227 } /* Lists_CheckBanned */
228 
229 
230 GLOBAL bool
231 Lists_IsBanEntry( char *Mask, CHANNEL *Chan )
232 {
233 	assert( Mask != NULL );
234 	assert( Chan != NULL );
235 	
236 	return Already_Registered( My_Bans, Mask, Chan );
237 } /* Lists_IsBanEntry */
238 
239 
240 GLOBAL bool
241 Lists_AddBanned( char *Mask, CHANNEL *Chan )
242 {
243 	C2C *c2c;
244 
245 	assert( Mask != NULL );
246 	assert( Chan != NULL );
247 
248 	if( Already_Registered( My_Bans, Mask, Chan )) return true;
249 
250 	c2c = New_C2C( Mask, Chan, false );
251 	if( ! c2c )
252 	{
253 		Log( LOG_ERR, "Can't add new ban list entry!" );
254 		return false;
255 	}
256 
257 	/* verketten */
258 	c2c->next = My_Bans;
259 	My_Bans = c2c;
260 
261 	Log( LOG_DEBUG, "Added \"%s\" to ban list for \"%s\".", Mask, Channel_Name( Chan ));
262 	return true;
263 } /* Lists_AddBanned */
264 
265 
266 GLOBAL void
267 Lists_DelBanned( char *Mask, CHANNEL *Chan )
268 {
269 	C2C *c2c, *last, *next;
270 
271 	assert( Mask != NULL );
272 	assert( Chan != NULL );
273 
274 	last = NULL;
275 	c2c = My_Bans;
276 	while( c2c )
277 	{
278 		next = c2c->next;
279 		if(( c2c->channel == Chan ) && ( strcasecmp( c2c->mask, Mask ) == 0 ))
280 		{
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 );
286 		}
287 		else last = c2c;
288 		c2c = next;
289 	}
290 } /* Lists_DelBanned */
291 
292 
293 GLOBAL bool
294 Lists_ShowBans( CLIENT *Client, CHANNEL *Channel )
295 {
296 	C2C *c2c;
297 
298 	assert( Client != NULL );
299 	assert( Channel != NULL );
300 
301 	c2c = My_Bans;
302 	while( c2c )
303 	{
304 		if( c2c->channel == Channel )
305 		{
306 			/* Eintrag fuer Channel gefunden; ausgeben: */
307 			if( ! IRC_WriteStrClient( Client, RPL_BANLIST_MSG, Client_ID( Client ), Channel_Name( Channel ), c2c->mask )) return DISCONNECTED;
308 		}
309 		c2c = c2c->next;
310 	}
311 	return IRC_WriteStrClient( Client, RPL_ENDOFBANLIST_MSG, Client_ID( Client ), Channel_Name( Channel ));
312 } /* Lists_ShowBans */
313 
314 
315 GLOBAL void
316 Lists_DeleteChannel( CHANNEL *Chan )
317 {
318 	/* Channel wurde geloescht, Invite- und Ban-Lists aufraeumen */
319 
320 	C2C *c2c, *last, *next;
321 
322 	/* Invite-List */
323 	last = NULL;
324 	c2c = My_Invites;
325 	while( c2c )
326 	{
327 		next = c2c->next;
328 		if( c2c->channel == Chan )
329 		{
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 );
335 		}
336 		else last = c2c;
337 		c2c = next;
338 	}
339 
340 	/* Ban-List */
341 	last = NULL;
342 	c2c = My_Bans;
343 	while( c2c )
344 	{
345 		next = c2c->next;
346 		if( c2c->channel == Chan )
347 		{
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 );
353 		}
354 		else last = c2c;
355 		c2c = next;
356 	}
357 } /* Lists_DeleteChannel */
358 
359 
360 GLOBAL char *
361 Lists_MakeMask( char *Pattern )
362 {
363 	/* This function generats a valid IRC mask of "any" string. This
364 	 * mask is only valid until the next call to Lists_MakeMask(),
365 	 * because a single global buffer is used. You have to copy the
366 	 * generated mask to some sane location yourself! */
367 
368 	static char TheMask[MASK_LEN];
369 	char *excl, *at;
370 
371 	assert( Pattern != NULL );
372 
373 	excl = strchr( Pattern, '!' );
374 	at = strchr( Pattern, '@' );
375 
376 	if(( at ) && ( at < excl )) excl = NULL;
377 
378 	if(( ! at ) && ( ! excl ))
379 	{
380 		/* Neither "!" nor "@" found: use string as nick name */
381 		strlcpy( TheMask, Pattern, sizeof( TheMask ) - 5 );
382 		strlcat( TheMask, "!*@*", sizeof( TheMask ));
383 		return TheMask;
384 	}
385 
386 	if(( ! at ) && ( excl ))
387 	{
388 		/* Domain part is missing */
389 		strlcpy( TheMask, Pattern, sizeof( TheMask ) - 3 );
390 		strlcat( TheMask, "@*", sizeof( TheMask ));
391 		return TheMask;
392 	}
393 
394 	if(( at ) && ( ! excl ))
395 	{
396 		/* User name is missing */
397 		*at = '\0'; at++;
398 		strlcpy( TheMask, Pattern, sizeof( TheMask ) - 5 );
399 		strlcat( TheMask, "!*@", sizeof( TheMask ));
400 		strlcat( TheMask, at, sizeof( TheMask ));
401 		return TheMask;
402 	}
403 
404 	/* All parts (nick, user and domain name) are given */
405 	strlcpy( TheMask, Pattern, sizeof( TheMask ));
406 	return TheMask;
407 } /* Lists_MakeMask */
408 
409 
410 LOCAL C2C *
411 New_C2C( char *Mask, CHANNEL *Chan, bool OnlyOnce )
412 {
413 	C2C *c2c;
414 	
415 	assert( Mask != NULL );
416 	assert( Chan != NULL );
417 
418 	/* Speicher fuer Eintrag anfordern */
419 	c2c = (C2C *)malloc( sizeof( C2C ));
420 	if( ! c2c )
421 	{
422 		Log( LOG_EMERG, "Can't allocate memory! [New_C2C]" );
423 		return NULL;
424 	}
425 
426 	strlcpy( c2c->mask, Mask, sizeof( c2c->mask ));
427 	c2c->channel = Chan;
428 	c2c->onlyonce = OnlyOnce;
429 
430 	return c2c;
431 } /* New_C2C */
432 
433 
434 LOCAL bool
435 Check_List( C2C **Cl2Chan, CLIENT *Client, CHANNEL *Chan )
436 {
437 	C2C *c2c, *last;
438 
439 	assert( Cl2Chan != NULL );
440 	assert( Client != NULL );
441 	assert( Chan != NULL );
442 
443 	c2c = *Cl2Chan;
444 	last = NULL;
445 
446 	while( c2c )
447 	{
448 		if( c2c->channel == Chan )
449 		{
450 			/* Ok, richtiger Channel. Passt die Maske? */
451 			if( Match( c2c->mask, Client_Mask( Client )))
452 			{
453 				/* Treffer! */
454 				if( c2c->onlyonce )
455 				{
456 					/* Eintrag loeschen */
457 					Log( LOG_DEBUG, "Deleted \"%s\" from %s list for \"%s\".", c2c->mask, *Cl2Chan == My_Invites ? "invite" : "ban", Channel_Name( Chan ));
458 					if( last ) last->next = c2c->next;
459 					else *Cl2Chan = c2c->next;
460 					free( c2c );
461 				}
462 				return true;
463 			}
464 		}
465 		last = c2c;
466 		c2c = c2c->next;
467 	}
468 
469 	return false;
470 } /* Check_List */
471 
472 
473 LOCAL bool
474 Already_Registered( C2C *List, char *Mask, CHANNEL *Chan )
475 {
476 	C2C *c2c;
477 
478 	c2c = List;
479 	while( c2c )
480 	{
481 		if(( c2c->channel == Chan ) && ( strcasecmp( c2c->mask, Mask ) == 0 )) return true;
482 		c2c = c2c->next;
483 	}
484 	return false;
485 } /* Already_Registered */
486 
487 
488 /* -eof- */