src/ngircd/channel.c

   1 /*
   2  * ngIRCd -- The Next Generation IRC Daemon
   3  * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
   4  *
   5  * Dieses Programm ist freie Software. Sie koennen es unter den Bedingungen
   6  * der GNU General Public License (GPL), wie von der Free Software Foundation
   7  * herausgegeben, weitergeben und/oder modifizieren, entweder unter Version 2
   8  * der Lizenz oder (wenn Sie es wuenschen) jeder spaeteren Version.
   9  * Naehere Informationen entnehmen Sie bitter der Datei COPYING. Eine Liste
  10  * der an ngIRCd beteiligten Autoren finden Sie in der Datei AUTHORS.
  11  *
  12  * $Id: channel.c,v 1.10 2002/01/28 01:16:15 alex Exp $
  13  *
  14  * channel.c: Management der Channels
  15  *
  16  * $Log: channel.c,v $
  17  * Revision 1.10  2002/01/28 01:16:15  alex
  18  * - neue Funktionen Channel_Name(), Channel_First() und Channel_Next().
  19  *
  20  * Revision 1.9  2002/01/27 22:47:11  alex
  21  * - PART wird nicht mehr an den Server verschickt, von dem es empfangen wurde.
  22  *
  23  * Revision 1.8  2002/01/27 21:56:54  alex
  24  * - weitere Anpassungen an Chennals, v.a. ueber Server-Links.
  25  *
  26  * Revision 1.7  2002/01/27 17:14:33  alex
  27  * - diverse Aenderungen fuer Channels ueber mehrere Server.
  28  *
  29  * Revision 1.6  2002/01/26 18:41:55  alex
  30  * - CHANNEL- und CL2CHAN-Strukturen in Header verlegt,
  31  * - einige neue Funktionen (Channel_GetChannel(), Channel_FirstMember(), ...)
  32  *
  33  * Revision 1.5  2002/01/21 00:12:29  alex
  34  * - begonnen, Channels zu implementieren :-)
  35  *
  36  * Revision 1.4  2002/01/16 22:09:07  alex
  37  * - neue Funktion Channel_Count().
  38  *
  39  * Revision 1.3  2002/01/02 02:42:58  alex
  40  * - Copyright-Texte aktualisiert.
  41  *
  42  * Revision 1.2  2001/12/31 02:18:51  alex
  43  * - viele neue Befehle (WHOIS, ISON, OPER, DIE, RESTART),
  44  * - neuen Header "defines.h" mit (fast) allen Konstanten.
  45  * - Code Cleanups und viele "kleine" Aenderungen & Bugfixes.
  46  *
  47  * Revision 1.1  2001/12/14 08:13:43  alex
  48  * - neues Modul begonnen :-)
  49  */
  50
  51
  52 #define __channel_c__
  53
  54
  55 #include <portab.h>
  56 #include "global.h"
  57
  58 #include <imp.h>
  59 #include <assert.h>
  60 #include <stdlib.h>
  61 #include <string.h>
  62
  63 #include "client.h"
  64 #include "irc.h"
  65 #include "log.h"
  66 #include "messages.h"
  67
  68 #include <exp.h>
  69 #include "channel.h"
  70
  71
  72 LOCAL CHANNEL *My_Channels;
  73 LOCAL CL2CHAN *My_Cl2Chan;
  74
  75
  76 LOCAL CHANNEL *New_Chan( CHAR *Name );
  77 LOCAL CL2CHAN *Get_Cl2Chan( CHANNEL *Chan, CLIENT *Client );
  78 LOCAL CL2CHAN *Add_Client( CHANNEL *Chan, CLIENT *Client );
  79 LOCAL BOOLEAN Remove_Client( CHANNEL *Chan, CLIENT *Client, CLIENT *Origin, CHAR *Reason, BOOLEAN ServerPART );
  80 LOCAL CL2CHAN *Get_First_Cl2Chan( CLIENT *Client, CHANNEL *Chan );
  81 LOCAL CL2CHAN *Get_Next_Cl2Chan( CL2CHAN *Start, CLIENT *Client, CHANNEL *Chan );
  82 LOCAL BOOLEAN Delete_Channel( CHANNEL *Chan );
  83
  84
  85 GLOBAL VOID Channel_Init( VOID )
  86 {
  87         My_Channels = NULL;
  88         My_Cl2Chan = NULL;
  89 } /* Channel_Init */
  90
  91
  92 GLOBAL VOID Channel_Exit( VOID )
  93 {
  94         CHANNEL *c, *c_next;
  95         CL2CHAN *cl2chan, *cl2chan_next;
  96
  97         /* Channel-Strukturen freigeben */
  98         c = My_Channels;
  99         while( c )
 100         {
 101                 c_next = c->next;
 102                 free( c );
 103                 c = c_next;
 104         }
 105
 106         /* Channel-Zuordnungstabelle freigeben */
 107         cl2chan = My_Cl2Chan;
 108         while( c )
 109         {
 110                 cl2chan_next = cl2chan->next;
 111                 free( cl2chan );
 112                 cl2chan = cl2chan_next;
 113         }
 114 } /* Channel_Exit */
 115
 116
 117 GLOBAL BOOLEAN Channel_Join( CLIENT *Client, CHAR *Name )
 118 {
 119         CHANNEL *chan;
 120
 121         assert( Client != NULL );
 122         assert( Name != NULL );
 123
 124         /* Valider Channel-Name? */
 125         if(( Name[0] != '#' ) || ( strlen( Name ) >= CHANNEL_NAME_LEN ))
 126         {
 127                 IRC_WriteStrClient( Client, ERR_NOSUCHCHANNEL_MSG, Client_ID( Client ), Name );
 128                 return FALSE;
 129         }
 130
 131         /* Channel suchen */
 132         chan = Channel_Search( Name );
 133         if( chan )
 134         {
 135                 /* Ist der Client bereits Mitglied? */
 136                 if( Get_Cl2Chan( chan, Client )) return FALSE;
 137         }
 138         else
 139         {
 140                 /* Gibt es noch nicht? Dann neu anlegen: */
 141                 chan = New_Chan( Name );
 142                 if( ! chan ) return FALSE;
 143
 144                 /* Verketten */
 145                 chan->next = My_Channels;
 146                 My_Channels = chan;
 147         }
 148
 149         /* User dem Channel hinzufuegen */
 150         if( ! Add_Client( chan, Client )) return FALSE;
 151         else return TRUE;
 152 } /* Channel_Join */
 153
 154
 155 GLOBAL BOOLEAN Channel_Part( CLIENT *Client, CLIENT *Origin, CHAR *Name, CHAR *Reason )
 156 {
 157         CHANNEL *chan;
 158
 159         assert( Client != NULL );
 160         assert( Name != NULL );
 161
 162         /* Channel suchen */
 163         chan = Channel_Search( Name );
 164         if(( ! chan ) || ( ! Get_Cl2Chan( chan, Client )))
 165         {
 166                 IRC_WriteStrClient( Client, ERR_NOSUCHCHANNEL_MSG, Client_ID( Client ), Name );
 167                 return FALSE;
 168         }
 169
 170         /* User aus Channel entfernen */
 171         if( ! Remove_Client( chan, Client, Origin, Reason, TRUE )) return FALSE;
 172         else return TRUE;
 173 } /* Channel_Part */
 174
 175
 176 GLOBAL VOID Channel_RemoveClient( CLIENT *Client, CHAR *Reason )
 177 {
 178         CHANNEL *c, *next_c;
 179
 180         assert( Client != NULL );
 181
 182         c = My_Channels;
 183         while( c )
 184         {
 185                 next_c = c->next;
 186                 Remove_Client( c, Client, Client_ThisServer( ), Reason, FALSE );
 187                 c = next_c;
 188         }
 189 } /* Channel_RemoveClient */
 190
 191
 192 GLOBAL INT Channel_Count( VOID )
 193 {
 194         CHANNEL *c;
 195         INT count;
 196
 197         count = 0;
 198         c = My_Channels;
 199         while( c )
 200         {
 201                 count++;
 202                 c = c->next;
 203         }
 204         return count;
 205 } /* Channel_Count */
 206
 207
 208 GLOBAL CHAR *Channel_Name( CHANNEL *Chan )
 209 {
 210         assert( Chan != NULL );
 211         return Chan->name;
 212 } /* Channel_Name */
 213
 214
 215 GLOBAL CHANNEL *Channel_First( VOID )
 216 {
 217         return My_Channels;
 218 } /* Channel_First */
 219
 220
 221 GLOBAL CHANNEL *Channel_Next( CHANNEL *Chan )
 222 {
 223         assert( Chan != NULL );
 224         return Chan->next;
 225 } /* Channel_Next */
 226
 227
 228 GLOBAL CHANNEL *Channel_Search( CHAR *Name )
 229 {
 230         /* Channel-Struktur suchen */
 231
 232         CHANNEL *c;
 233
 234         assert( Name != NULL );
 235         c = My_Channels;
 236         while( c )
 237         {
 238                 if( strcasecmp( Name, c->name ) == 0 ) return c;
 239                 c = c->next;
 240         }
 241         return NULL;
 242 } /* Channel_Search */
 243
 244
 245 GLOBAL CL2CHAN *Channel_FirstMember( CHANNEL *Chan )
 246 {
 247         assert( Chan != NULL );
 248         return Get_First_Cl2Chan( NULL, Chan );
 249 } /* Channel_IsMember */
 250
 251
 252 GLOBAL CL2CHAN *Channel_NextMember( CHANNEL *Chan, CL2CHAN *Cl2Chan )
 253 {
 254         assert( Chan != NULL );
 255         assert( Cl2Chan != NULL );
 256         return Get_Next_Cl2Chan( Cl2Chan->next, NULL, Chan );
 257 } /* Channel_NextMember */
 258
 259
 260 GLOBAL CLIENT *Channel_GetClient( CL2CHAN *Cl2Chan )
 261 {
 262         assert( Cl2Chan != NULL );
 263         return Cl2Chan->client;
 264 } /* Channel_GetClient */
 265
 266
 267 GLOBAL CHANNEL *Channel_GetChannel( CL2CHAN *Cl2Chan )
 268 {
 269         assert( Cl2Chan != NULL );
 270         return Cl2Chan->channel;
 271 } /* Channel_GetChannel */
 272
 273
 274 LOCAL CHANNEL *New_Chan( CHAR *Name )
 275 {
 276         /* Neue Channel-Struktur anlegen */
 277
 278         CHANNEL *c;
 279
 280         assert( Name != NULL );
 281
 282         c = malloc( sizeof( CHANNEL ));
 283         if( ! c )
 284         {
 285                 Log( LOG_EMERG, "Can't allocate memory!" );
 286                 return NULL;
 287         }
 288         c->next = NULL;
 289         strncpy( c->name, Name, CHANNEL_NAME_LEN );
 290         c->name[CHANNEL_NAME_LEN - 1] = '\0';
 291         strcpy( c->modes, "" );
 292
 293         Log( LOG_DEBUG, "Created new channel structure for \"%s\".", Name );
 294
 295         return c;
 296 } /* New_Chan */
 297
 298
 299 LOCAL CL2CHAN *Get_Cl2Chan( CHANNEL *Chan, CLIENT *Client )
 300 {
 301         CL2CHAN *cl2chan;
 302
 303         assert( Chan != NULL );
 304         assert( Client != NULL );
 305
 306         cl2chan = My_Cl2Chan;
 307         while( cl2chan )
 308         {
 309                 if(( cl2chan->channel == Chan ) && ( cl2chan->client == Client )) return cl2chan;
 310                 cl2chan = cl2chan->next;
 311         }
 312         return NULL;
 313 } /* Get_Cl2Chan */
 314
 315
 316 LOCAL CL2CHAN *Add_Client( CHANNEL *Chan, CLIENT *Client )
 317 {
 318         CL2CHAN *cl2chan;
 319
 320         assert( Chan != NULL );
 321         assert( Client != NULL );
 322
 323         cl2chan = malloc( sizeof( CL2CHAN ));
 324         if( ! cl2chan )
 325         {
 326                 Log( LOG_EMERG, "Can't allocate memory!" );
 327                 return NULL;
 328         }
 329         cl2chan->channel = Chan;
 330         cl2chan->client = Client;
 331
 332         /* Verketten */
 333         cl2chan->next = My_Cl2Chan;
 334         My_Cl2Chan = cl2chan;
 335
 336         Log( LOG_DEBUG, "User \"%s\" joined channel \"%s\".", Client_Mask( Client ), Chan->name );
 337
 338         return cl2chan;
 339 } /* Add_Client */
 340
 341
 342 LOCAL BOOLEAN Remove_Client( CHANNEL *Chan, CLIENT *Client, CLIENT *Origin, CHAR *Reason, BOOLEAN ServerPART )
 343 {
 344         CL2CHAN *cl2chan, *last_cl2chan;
 345         CHANNEL *c;
 346
 347         assert( Chan != NULL );
 348         assert( Client != NULL );
 349         assert( Origin != NULL );
 350         assert( Reason != NULL );
 351
 352         last_cl2chan = NULL;
 353         cl2chan = My_Cl2Chan;
 354         while( cl2chan )
 355         {
 356                 if(( cl2chan->channel == Chan ) && ( cl2chan->client == Client )) break;
 357                 last_cl2chan = cl2chan;
 358                 cl2chan = cl2chan->next;
 359         }
 360         if( ! cl2chan ) return FALSE;
 361
 362         c = cl2chan->channel;
 363         assert( c != NULL );
 364
 365         /* Aus Verkettung loesen und freigeben */
 366         if( last_cl2chan ) last_cl2chan->next = cl2chan->next;
 367         else My_Cl2Chan = cl2chan->next;
 368         free( cl2chan );
 369
 370         if( ServerPART ) IRC_WriteStrServersPrefix( Origin, Client, "PART %s :%s", c->name, Reason );
 371         IRC_WriteStrChannelPrefix( Origin, c, Client, FALSE, "PART %s :%s", c->name, Reason );
 372         if(( Client_Conn( Origin ) > NONE ) && ( Client_Type( Origin ) == CLIENT_USER )) IRC_WriteStrClientPrefix( Origin, Client, "PART %s :%s", c->name, Reason );
 373
 374         Log( LOG_DEBUG, "User \"%s\" left channel \"%s\" (%s).", Client_Mask( Client ), c->name, Reason );
 375
 376         /* Wenn Channel nun leer: loeschen */
 377         if( ! Get_First_Cl2Chan( NULL, Chan )) Delete_Channel( Chan );
 378
 379         return TRUE;
 380 } /* Remove_Client */
 381
 382
 383 LOCAL CL2CHAN *Get_First_Cl2Chan( CLIENT *Client, CHANNEL *Chan )
 384 {
 385         return Get_Next_Cl2Chan( My_Cl2Chan, Client, Chan );
 386 } /* Get_First_Cl2Chan */
 387
 388
 389 LOCAL CL2CHAN *Get_Next_Cl2Chan( CL2CHAN *Start, CLIENT *Client, CHANNEL *Channel )
 390 {
 391         CL2CHAN *cl2chan;
 392
 393         assert( Client != NULL || Channel != NULL );
 394
 395         cl2chan = Start;
 396         while( cl2chan )
 397         {
 398                 if(( Client ) && ( cl2chan->client == Client )) return cl2chan;
 399                 if(( Channel ) && ( cl2chan->channel == Channel )) return cl2chan;
 400                 cl2chan = cl2chan->next;
 401         }
 402         return NULL;
 403 } /* Get_Next_Cl2Chan */
 404
 405
 406 LOCAL BOOLEAN Delete_Channel( CHANNEL *Chan )
 407 {
 408         /* Channel-Struktur loeschen */
 409
 410         CHANNEL *chan, *last_chan;
 411
 412         last_chan = NULL;
 413         chan = My_Channels;
 414         while( chan )
 415         {
 416                 if( chan == Chan ) break;
 417                 last_chan = chan;
 418                 chan = chan->next;
 419         }
 420         if( ! chan ) return FALSE;
 421
 422         Log( LOG_DEBUG, "Freed channel structure for \"%s\".", Chan->name );
 423
 424         /* Neu verketten und freigeben */
 425         if( last_chan ) last_chan->next = chan->next;
 426         else My_Channels = chan->next;
 427         free( chan );
 428
 429         return TRUE;
 430 } /* Delete_Channel */
 431
 432
 433 /* -eof- */