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.24 2002/05/30 16:52:21 alex Exp $
  13  *
  14  * channel.c: Management der Channels
  15  */
  16
  17
  18 #define __channel_c__
  19
  20
  21 #include "portab.h"
  22
  23 #include "imp.h"
  24 #include <assert.h>
  25 #include <stdlib.h>
  26 #include <string.h>
  27
  28 #include "conn.h"
  29 #include "client.h"
  30
  31 #include "exp.h"
  32 #include "channel.h"
  33
  34 #include "imp.h"
  35 #include "irc-write.h"
  36 #include "resolve.h"
  37 #include "conf.h"
  38 #include "hash.h"
  39 #include "log.h"
  40 #include "messages.h"
  41
  42 #include "exp.h"
  43
  44
  45 LOCAL CHANNEL *My_Channels;
  46 LOCAL CL2CHAN *My_Cl2Chan;
  47
  48
  49 LOCAL CHANNEL *New_Chan PARAMS(( CHAR *Name ));
  50 LOCAL CL2CHAN *Get_Cl2Chan PARAMS(( CHANNEL *Chan, CLIENT *Client ));
  51 LOCAL CL2CHAN *Add_Client PARAMS(( CHANNEL *Chan, CLIENT *Client ));
  52 LOCAL BOOLEAN Remove_Client PARAMS(( CHANNEL *Chan, CLIENT *Client, CLIENT *Origin, CHAR *Reason, BOOLEAN ServerPART ));
  53 LOCAL CL2CHAN *Get_First_Cl2Chan PARAMS(( CLIENT *Client, CHANNEL *Chan ));
  54 LOCAL CL2CHAN *Get_Next_Cl2Chan PARAMS(( CL2CHAN *Start, CLIENT *Client, CHANNEL *Chan ));
  55 LOCAL BOOLEAN Delete_Channel PARAMS(( CHANNEL *Chan ));
  56
  57
  58 GLOBAL VOID
  59 Channel_Init( VOID )
  60 {
  61         CHANNEL *chan;
  62         CHAR *c;
  63         INT i;
  64
  65         My_Channels = NULL;
  66         My_Cl2Chan = NULL;
  67
  68         /* Vordefinierte persistente Channels erzeugen */
  69         for( i = 0; i < Conf_Channel_Count; i++ )
  70         {
  71                 /* Ist ein Name konfiguriert? */
  72                 if( ! Conf_Channel[i].name ) continue;
  73
  74                 /* Gueltiger Channel-Name? */
  75                 if( ! Channel_IsValidName( Conf_Channel[i].name ))
  76                 {
  77                         Log( LOG_ERR, "Can't create pre-defined channel: invalid name: \"%s\"!", Conf_Channel[i].name );
  78                         continue;
  79                 }
  80
  81                 /* Channel anlegen */
  82                 chan = New_Chan( Conf_Channel[i].name );
  83                 if( chan )
  84                 {
  85                         /* Verketten */
  86                         chan->next = My_Channels;
  87                         My_Channels = chan;
  88                         Channel_ModeAdd( chan, 'P' );
  89                         Channel_SetTopic( chan, Conf_Channel[i].topic );
  90                         c = Conf_Channel[i].modes;
  91                         while( *c ) Channel_ModeAdd( chan, *c++ );
  92                         Log( LOG_INFO, "Created pre-defined channel \"%s\".", Conf_Channel[i].name );
  93                 }
  94                 else Log( LOG_ERR, "Can't create pre-defined channel \"%s\"!", Conf_Channel[i].name );
  95         }
  96 } /* Channel_Init */
  97
  98
  99 GLOBAL VOID
 100 Channel_Exit( VOID )
 101 {
 102         CHANNEL *c, *c_next;
 103         CL2CHAN *cl2chan, *cl2chan_next;
 104
 105         /* Channel-Strukturen freigeben */
 106         c = My_Channels;
 107         while( c )
 108         {
 109                 c_next = c->next;
 110                 free( c );
 111                 c = c_next;
 112         }
 113
 114         /* Channel-Zuordnungstabelle freigeben */
 115         cl2chan = My_Cl2Chan;
 116         while( c )
 117         {
 118                 cl2chan_next = cl2chan->next;
 119                 free( cl2chan );
 120                 cl2chan = cl2chan_next;
 121         }
 122 } /* Channel_Exit */
 123
 124
 125 GLOBAL BOOLEAN
 126 Channel_Join( CLIENT *Client, CHAR *Name )
 127 {
 128         CHANNEL *chan;
 129
 130         assert( Client != NULL );
 131         assert( Name != NULL );
 132
 133         /* Valider Channel-Name? */
 134         if( ! Channel_IsValidName( Name ))
 135         {
 136                 IRC_WriteStrClient( Client, ERR_NOSUCHCHANNEL_MSG, Client_ID( Client ), Name );
 137                 return FALSE;
 138         }
 139
 140         /* Channel suchen */
 141         chan = Channel_Search( Name );
 142         if( chan )
 143         {
 144                 /* Ist der Client bereits Mitglied? */
 145                 if( Get_Cl2Chan( chan, Client )) return FALSE;
 146         }
 147         else
 148         {
 149                 /* Gibt es noch nicht? Dann neu anlegen: */
 150                 chan = New_Chan( Name );
 151                 if( ! chan ) return FALSE;
 152
 153                 /* Verketten */
 154                 chan->next = My_Channels;
 155                 My_Channels = chan;
 156         }
 157
 158         /* User dem Channel hinzufuegen */
 159         if( ! Add_Client( chan, Client )) return FALSE;
 160         else return TRUE;
 161 } /* Channel_Join */
 162
 163
 164 GLOBAL BOOLEAN
 165 Channel_Part( CLIENT *Client, CLIENT *Origin, CHAR *Name, CHAR *Reason )
 166 {
 167         CHANNEL *chan;
 168
 169         assert( Client != NULL );
 170         assert( Name != NULL );
 171
 172         /* Channel suchen */
 173         chan = Channel_Search( Name );
 174         if(( ! chan ) || ( ! Get_Cl2Chan( chan, Client )))
 175         {
 176                 IRC_WriteStrClient( Client, ERR_NOSUCHCHANNEL_MSG, Client_ID( Client ), Name );
 177                 return FALSE;
 178         }
 179
 180         /* User aus Channel entfernen */
 181         if( ! Remove_Client( chan, Client, Origin, Reason, TRUE )) return FALSE;
 182         else return TRUE;
 183 } /* Channel_Part */
 184
 185
 186 GLOBAL VOID
 187 Channel_RemoveClient( CLIENT *Client, CHAR *Reason )
 188 {
 189         CHANNEL *c, *next_c;
 190
 191         assert( Client != NULL );
 192
 193         c = My_Channels;
 194         while( c )
 195         {
 196                 next_c = c->next;
 197                 Remove_Client( c, Client, Client_ThisServer( ), Reason, FALSE );
 198                 c = next_c;
 199         }
 200 } /* Channel_RemoveClient */
 201
 202
 203 GLOBAL INT
 204 Channel_Count( VOID )
 205 {
 206         CHANNEL *c;
 207         INT count;
 208
 209         count = 0;
 210         c = My_Channels;
 211         while( c )
 212         {
 213                 count++;
 214                 c = c->next;
 215         }
 216         return count;
 217 } /* Channel_Count */
 218
 219
 220 GLOBAL INT
 221 Channel_MemberCount( CHANNEL *Chan )
 222 {
 223         CL2CHAN *cl2chan;
 224         INT count;
 225
 226         assert( Chan != NULL );
 227
 228         count = 0;
 229         cl2chan = My_Cl2Chan;
 230         while( cl2chan )
 231         {
 232                 if( cl2chan->channel == Chan ) count++;
 233                 cl2chan = cl2chan->next;
 234         }
 235         return count;
 236 } /* Channel_MemberCount */
 237
 238
 239 GLOBAL CHAR *
 240 Channel_Name( CHANNEL *Chan )
 241 {
 242         assert( Chan != NULL );
 243         return Chan->name;
 244 } /* Channel_Name */
 245
 246
 247 GLOBAL CHAR *
 248 Channel_Modes( CHANNEL *Chan )
 249 {
 250         assert( Chan != NULL );
 251         return Chan->modes;
 252 } /* Channel_Modes */
 253
 254
 255 GLOBAL CHANNEL *
 256 Channel_First( VOID )
 257 {
 258         return My_Channels;
 259 } /* Channel_First */
 260
 261
 262 GLOBAL CHANNEL *
 263 Channel_Next( CHANNEL *Chan )
 264 {
 265         assert( Chan != NULL );
 266         return Chan->next;
 267 } /* Channel_Next */
 268
 269
 270 GLOBAL CHANNEL *
 271 Channel_Search( CHAR *Name )
 272 {
 273         /* Channel-Struktur suchen */
 274
 275         CHANNEL *c;
 276         UINT32 search_hash;
 277
 278         assert( Name != NULL );
 279
 280         search_hash = Hash( Name );
 281         c = My_Channels;
 282         while( c )
 283         {
 284                 if( search_hash == c->hash )
 285                 {
 286                         /* lt. Hash-Wert: Treffer! */
 287                         if( strcasecmp( Name, c->name ) == 0 ) return c;
 288                 }
 289                 c = c->next;
 290         }
 291         return NULL;
 292 } /* Channel_Search */
 293
 294
 295 GLOBAL CL2CHAN *
 296 Channel_FirstMember( CHANNEL *Chan )
 297 {
 298         assert( Chan != NULL );
 299         return Get_First_Cl2Chan( NULL, Chan );
 300 } /* Channel_FirstMember */
 301
 302
 303 GLOBAL CL2CHAN *
 304 Channel_NextMember( CHANNEL *Chan, CL2CHAN *Cl2Chan )
 305 {
 306         assert( Chan != NULL );
 307         assert( Cl2Chan != NULL );
 308         return Get_Next_Cl2Chan( Cl2Chan->next, NULL, Chan );
 309 } /* Channel_NextMember */
 310
 311
 312 GLOBAL CL2CHAN *
 313 Channel_FirstChannelOf( CLIENT *Client )
 314 {
 315         assert( Client != NULL );
 316         return Get_First_Cl2Chan( Client, NULL );
 317 } /* Channel_FirstChannelOf */
 318
 319
 320 GLOBAL CL2CHAN *
 321 Channel_NextChannelOf( CLIENT *Client, CL2CHAN *Cl2Chan )
 322 {
 323         assert( Client != NULL );
 324         assert( Cl2Chan != NULL );
 325         return Get_Next_Cl2Chan( Cl2Chan->next, Client, NULL );
 326 } /* Channel_NextChannelOf */
 327
 328
 329 GLOBAL CLIENT *
 330 Channel_GetClient( CL2CHAN *Cl2Chan )
 331 {
 332         assert( Cl2Chan != NULL );
 333         return Cl2Chan->client;
 334 } /* Channel_GetClient */
 335
 336
 337 GLOBAL CHANNEL *
 338 Channel_GetChannel( CL2CHAN *Cl2Chan )
 339 {
 340         assert( Cl2Chan != NULL );
 341         return Cl2Chan->channel;
 342 } /* Channel_GetChannel */
 343
 344
 345 GLOBAL BOOLEAN
 346 Channel_IsValidName( CHAR *Name )
 347 {
 348         /* Pruefen, ob Name als Channelname gueltig */
 349
 350         CHAR *ptr, badchars[10];
 351
 352         assert( Name != NULL );
 353
 354         if(( Name[0] != '#' ) || ( strlen( Name ) >= CHANNEL_NAME_LEN )) return FALSE;
 355
 356         ptr = Name;
 357         strcpy( badchars, " ,:\x07" );
 358         while( *ptr )
 359         {
 360                 if( strchr( badchars, *ptr )) return FALSE;
 361                 ptr++;
 362         }
 363
 364         return TRUE;
 365 } /* Channel_IsValidName */
 366
 367
 368 GLOBAL BOOLEAN
 369 Channel_ModeAdd( CHANNEL *Chan, CHAR Mode )
 370 {
 371         /* Mode soll gesetzt werden. TRUE wird geliefert, wenn der
 372          * Mode neu gesetzt wurde, FALSE, wenn der Channel den Mode
 373          * bereits hatte. */
 374
 375         CHAR x[2];
 376
 377         assert( Chan != NULL );
 378
 379         x[0] = Mode; x[1] = '\0';
 380         if( ! strchr( Chan->modes, x[0] ))
 381         {
 382                 /* Client hat den Mode noch nicht -> setzen */
 383                 strcat( Chan->modes, x );
 384                 return TRUE;
 385         }
 386         else return FALSE;
 387 } /* Channel_ModeAdd */
 388
 389
 390 GLOBAL BOOLEAN
 391 Channel_ModeDel( CHANNEL *Chan, CHAR Mode )
 392 {
 393         /* Mode soll geloescht werden. TRUE wird geliefert, wenn der
 394          * Mode entfernt wurde, FALSE, wenn der Channel den Mode
 395          * ueberhaupt nicht hatte. */
 396
 397         CHAR x[2], *p;
 398
 399         assert( Chan != NULL );
 400
 401         x[0] = Mode; x[1] = '\0';
 402
 403         p = strchr( Chan->modes, x[0] );
 404         if( ! p ) return FALSE;
 405
 406         /* Client hat den Mode -> loeschen */
 407         while( *p )
 408         {
 409                 *p = *(p + 1);
 410                 p++;
 411         }
 412         return TRUE;
 413 } /* Channel_ModeDel */
 414
 415
 416 GLOBAL BOOLEAN
 417 Channel_UserModeAdd( CHANNEL *Chan, CLIENT *Client, CHAR Mode )
 418 {
 419         /* Channel-User-Mode soll gesetzt werden. TRUE wird geliefert,
 420          * wenn der Mode neu gesetzt wurde, FALSE, wenn der User den
 421          * Channel-Mode bereits hatte. */
 422
 423         CL2CHAN *cl2chan;
 424         CHAR x[2];
 425
 426         assert( Chan != NULL );
 427         assert( Client != NULL );
 428
 429         cl2chan = Get_Cl2Chan( Chan, Client );
 430         assert( cl2chan != NULL );
 431
 432         x[0] = Mode; x[1] = '\0';
 433         if( ! strchr( cl2chan->modes, x[0] ))
 434         {
 435                 /* Client hat den Mode noch nicht -> setzen */
 436                 strcat( cl2chan->modes, x );
 437                 return TRUE;
 438         }
 439         else return FALSE;
 440 } /* Channel_UserModeAdd */
 441
 442
 443 GLOBAL BOOLEAN
 444 Channel_UserModeDel( CHANNEL *Chan, CLIENT *Client, CHAR Mode )
 445 {
 446         /* Channel-User-Mode soll geloescht werden. TRUE wird geliefert,
 447          * wenn der Mode entfernt wurde, FALSE, wenn der User den Channel-Mode
 448          * ueberhaupt nicht hatte. */
 449
 450         CL2CHAN *cl2chan;
 451         CHAR x[2], *p;
 452
 453         assert( Chan != NULL );
 454         assert( Client != NULL );
 455
 456         cl2chan = Get_Cl2Chan( Chan, Client );
 457         assert( cl2chan != NULL );
 458
 459         x[0] = Mode; x[1] = '\0';
 460
 461         p = strchr( cl2chan->modes, x[0] );
 462         if( ! p ) return FALSE;
 463
 464         /* Client hat den Mode -> loeschen */
 465         while( *p )
 466         {
 467                 *p = *(p + 1);
 468                 p++;
 469         }
 470         return TRUE;
 471 } /* Channel_UserModeDel */
 472
 473
 474 GLOBAL CHAR *
 475 Channel_UserModes( CHANNEL *Chan, CLIENT *Client )
 476 {
 477         /* Channel-Modes eines Users liefern */
 478
 479         CL2CHAN *cl2chan;
 480
 481         assert( Chan != NULL );
 482         assert( Client != NULL );
 483
 484         cl2chan = Get_Cl2Chan( Chan, Client );
 485         assert( cl2chan != NULL );
 486
 487         return cl2chan->modes;
 488 } /* Channel_UserModes */
 489
 490
 491 GLOBAL BOOLEAN
 492 Channel_IsMemberOf( CHANNEL *Chan, CLIENT *Client )
 493 {
 494         /* Pruefen, ob Client Mitglied in Channel ist */
 495
 496         assert( Chan != NULL );
 497         assert( Client != NULL );
 498
 499         if( Get_Cl2Chan( Chan, Client )) return TRUE;
 500         else return FALSE;
 501 } /* Channel_IsMemberOf */
 502
 503
 504 GLOBAL CHAR *
 505 Channel_Topic( CHANNEL *Chan )
 506 {
 507         assert( Chan != NULL );
 508         return Chan->topic;
 509 } /* Channel_Topic */
 510
 511
 512 GLOBAL VOID
 513 Channel_SetTopic( CHANNEL *Chan, CHAR *Topic )
 514 {
 515         assert( Chan != NULL );
 516         assert( Topic != NULL );
 517
 518         strncpy( Chan->topic, Topic, CHANNEL_TOPIC_LEN - 1 );
 519         Chan->topic[CHANNEL_TOPIC_LEN - 1] = '\0';
 520 } /* Channel_SetTopic */
 521
 522
 523 GLOBAL BOOLEAN
 524 Channel_Write( CHANNEL *Chan, CLIENT *From, CLIENT *Client, CHAR *Text )
 525 {
 526         BOOLEAN is_member, has_voice, is_op, ok;
 527
 528         /* Okay, Ziel ist ein Channel */
 529         is_member = has_voice = is_op = FALSE;
 530         if( Channel_IsMemberOf( Chan, From ))
 531         {
 532                 is_member = TRUE;
 533                 if( strchr( Channel_UserModes( Chan, From ), 'v' )) has_voice = TRUE;
 534                 if( strchr( Channel_UserModes( Chan, From ), 'o' )) is_op = TRUE;
 535         }
 536
 537         /* pruefen, ob Client in Channel schreiben darf */
 538         ok = TRUE;
 539         if( strchr( Channel_Modes( Chan ), 'n' ) && ( ! is_member )) ok = FALSE;
 540         if( strchr( Channel_Modes( Chan ), 'm' ) && ( ! is_op ) && ( ! has_voice )) ok = FALSE;
 541
 542         if( ! ok ) return IRC_WriteStrClient( From, ERR_CANNOTSENDTOCHAN_MSG, Client_ID( From ), Channel_Name( Chan ));
 543
 544         /* Text senden */
 545         if( Client_Conn( From ) > NONE ) Conn_UpdateIdle( Client_Conn( From ));
 546         return IRC_WriteStrChannelPrefix( Client, Chan, From, TRUE, "PRIVMSG %s :%s", Channel_Name( Chan ), Text );
 547 } /* Channel_Write */
 548
 549
 550
 551 LOCAL CHANNEL *
 552 New_Chan( CHAR *Name )
 553 {
 554         /* Neue Channel-Struktur anlegen */
 555
 556         CHANNEL *c;
 557
 558         assert( Name != NULL );
 559
 560         c = malloc( sizeof( CHANNEL ));
 561         if( ! c )
 562         {
 563                 Log( LOG_EMERG, "Can't allocate memory!" );
 564                 return NULL;
 565         }
 566         c->next = NULL;
 567         strncpy( c->name, Name, CHANNEL_NAME_LEN - 1 );
 568         c->name[CHANNEL_NAME_LEN - 1] = '\0';
 569         strcpy( c->modes, "" );
 570         strcpy( c->topic, "" );
 571         c->hash = Hash( c->name );
 572
 573         Log( LOG_DEBUG, "Created new channel structure for \"%s\".", Name );
 574
 575         return c;
 576 } /* New_Chan */
 577
 578
 579 LOCAL CL2CHAN *
 580 Get_Cl2Chan( CHANNEL *Chan, CLIENT *Client )
 581 {
 582         CL2CHAN *cl2chan;
 583
 584         assert( Chan != NULL );
 585         assert( Client != NULL );
 586
 587         cl2chan = My_Cl2Chan;
 588         while( cl2chan )
 589         {
 590                 if(( cl2chan->channel == Chan ) && ( cl2chan->client == Client )) return cl2chan;
 591                 cl2chan = cl2chan->next;
 592         }
 593         return NULL;
 594 } /* Get_Cl2Chan */
 595
 596
 597 LOCAL CL2CHAN *
 598 Add_Client( CHANNEL *Chan, CLIENT *Client )
 599 {
 600         CL2CHAN *cl2chan;
 601
 602         assert( Chan != NULL );
 603         assert( Client != NULL );
 604
 605         /* neue CL2CHAN-Struktur anlegen */
 606         cl2chan = malloc( sizeof( CL2CHAN ));
 607         if( ! cl2chan )
 608         {
 609                 Log( LOG_EMERG, "Can't allocate memory!" );
 610                 return NULL;
 611         }
 612         cl2chan->channel = Chan;
 613         cl2chan->client = Client;
 614         strcpy( cl2chan->modes, "" );
 615
 616         /* Verketten */
 617         cl2chan->next = My_Cl2Chan;
 618         My_Cl2Chan = cl2chan;
 619
 620         Log( LOG_DEBUG, "User \"%s\" joined channel \"%s\".", Client_Mask( Client ), Chan->name );
 621
 622         return cl2chan;
 623 } /* Add_Client */
 624
 625
 626 LOCAL BOOLEAN
 627 Remove_Client( CHANNEL *Chan, CLIENT *Client, CLIENT *Origin, CHAR *Reason, BOOLEAN ServerPART )
 628 {
 629         CL2CHAN *cl2chan, *last_cl2chan;
 630         CHANNEL *c;
 631
 632         assert( Chan != NULL );
 633         assert( Client != NULL );
 634         assert( Origin != NULL );
 635         assert( Reason != NULL );
 636
 637         last_cl2chan = NULL;
 638         cl2chan = My_Cl2Chan;
 639         while( cl2chan )
 640         {
 641                 if(( cl2chan->channel == Chan ) && ( cl2chan->client == Client )) break;
 642                 last_cl2chan = cl2chan;
 643                 cl2chan = cl2chan->next;
 644         }
 645         if( ! cl2chan ) return FALSE;
 646
 647         c = cl2chan->channel;
 648         assert( c != NULL );
 649
 650         /* Aus Verkettung loesen und freigeben */
 651         if( last_cl2chan ) last_cl2chan->next = cl2chan->next;
 652         else My_Cl2Chan = cl2chan->next;
 653         free( cl2chan );
 654
 655         if( ServerPART ) IRC_WriteStrServersPrefix( Origin, Client, "PART %s :%s", c->name, Reason );
 656         IRC_WriteStrChannelPrefix( Origin, c, Client, FALSE, "PART %s :%s", c->name, Reason );
 657         if(( Client_Conn( Origin ) > NONE ) && ( Client_Type( Origin ) == CLIENT_USER )) IRC_WriteStrClientPrefix( Origin, Client, "PART %s :%s", c->name, Reason );
 658
 659         Log( LOG_DEBUG, "User \"%s\" left channel \"%s\" (%s).", Client_Mask( Client ), c->name, Reason );
 660
 661         /* Wenn Channel nun leer und nicht pre-defined: loeschen */
 662         if( ! strchr( Channel_Modes( Chan ), 'P' ))
 663         {
 664                 if( ! Get_First_Cl2Chan( NULL, Chan )) Delete_Channel( Chan );
 665         }
 666
 667         return TRUE;
 668 } /* Remove_Client */
 669
 670
 671 LOCAL CL2CHAN *
 672 Get_First_Cl2Chan( CLIENT *Client, CHANNEL *Chan )
 673 {
 674         return Get_Next_Cl2Chan( My_Cl2Chan, Client, Chan );
 675 } /* Get_First_Cl2Chan */
 676
 677
 678 LOCAL CL2CHAN *
 679 Get_Next_Cl2Chan( CL2CHAN *Start, CLIENT *Client, CHANNEL *Channel )
 680 {
 681         CL2CHAN *cl2chan;
 682
 683         assert( Client != NULL || Channel != NULL );
 684
 685         cl2chan = Start;
 686         while( cl2chan )
 687         {
 688                 if(( Client ) && ( cl2chan->client == Client )) return cl2chan;
 689                 if(( Channel ) && ( cl2chan->channel == Channel )) return cl2chan;
 690                 cl2chan = cl2chan->next;
 691         }
 692         return NULL;
 693 } /* Get_Next_Cl2Chan */
 694
 695
 696 LOCAL BOOLEAN
 697 Delete_Channel( CHANNEL *Chan )
 698 {
 699         /* Channel-Struktur loeschen */
 700
 701         CHANNEL *chan, *last_chan;
 702
 703         last_chan = NULL;
 704         chan = My_Channels;
 705         while( chan )
 706         {
 707                 if( chan == Chan ) break;
 708                 last_chan = chan;
 709                 chan = chan->next;
 710         }
 711         if( ! chan ) return FALSE;
 712
 713         Log( LOG_DEBUG, "Freed channel structure for \"%s\".", Chan->name );
 714
 715         /* Neu verketten und freigeben */
 716         if( last_chan ) last_chan->next = chan->next;
 717         else My_Channels = chan->next;
 718         free( chan );
 719
 720         return TRUE;
 721 } /* Delete_Channel */
 722
 723
 724 /* -eof- */