src/ngircd/lists.c

   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- */