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.23 2002/05/27 13:09:26 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         /* Pr\9ffen, ob Name als Channelname gueltig */
 349
 350         CHAR *ptr, badchars[] = " ,:\x07";
 351
 352         assert( Name != NULL );
 353
 354         if(( Name[0] != '#' ) || ( strlen( Name ) >= CHANNEL_NAME_LEN )) return FALSE;
 355
 356         ptr = Name;
 357         while( *ptr )
 358         {
 359                 if( strchr( badchars, *ptr )) return FALSE;
 360                 ptr++;
 361         }
 362
 363         return TRUE;
 364 } /* Channel_IsValidName */
 365
 366
 367 GLOBAL BOOLEAN
 368 Channel_ModeAdd( CHANNEL *Chan, CHAR Mode )
 369 {
 370         /* Mode soll gesetzt werden. TRUE wird geliefert, wenn der
 371          * Mode neu gesetzt wurde, FALSE, wenn der Channel den Mode
 372          * bereits hatte. */
 373
 374         CHAR x[2];
 375
 376         assert( Chan != NULL );
 377
 378         x[0] = Mode; x[1] = '\0';
 379         if( ! strchr( Chan->modes, x[0] ))
 380         {
 381                 /* Client hat den Mode noch nicht -> setzen */
 382                 strcat( Chan->modes, x );
 383                 return TRUE;
 384         }
 385         else return FALSE;
 386 } /* Channel_ModeAdd */
 387
 388
 389 GLOBAL BOOLEAN
 390 Channel_ModeDel( CHANNEL *Chan, CHAR Mode )
 391 {
 392         /* Mode soll geloescht werden. TRUE wird geliefert, wenn der
 393          * Mode entfernt wurde, FALSE, wenn der Channel den Mode
 394          * ueberhaupt nicht hatte. */
 395
 396         CHAR x[2], *p;
 397
 398         assert( Chan != NULL );
 399
 400         x[0] = Mode; x[1] = '\0';
 401
 402         p = strchr( Chan->modes, x[0] );
 403         if( ! p ) return FALSE;
 404
 405         /* Client hat den Mode -> loeschen */
 406         while( *p )
 407         {
 408                 *p = *(p + 1);
 409                 p++;
 410         }
 411         return TRUE;
 412 } /* Channel_ModeDel */
 413
 414
 415 GLOBAL BOOLEAN
 416 Channel_UserModeAdd( CHANNEL *Chan, CLIENT *Client, CHAR Mode )
 417 {
 418         /* Channel-User-Mode soll gesetzt werden. TRUE wird geliefert,
 419          * wenn der Mode neu gesetzt wurde, FALSE, wenn der User den
 420          * Channel-Mode bereits hatte. */
 421
 422         CL2CHAN *cl2chan;
 423         CHAR x[2];
 424
 425         assert( Chan != NULL );
 426         assert( Client != NULL );
 427
 428         cl2chan = Get_Cl2Chan( Chan, Client );
 429         assert( cl2chan != NULL );
 430
 431         x[0] = Mode; x[1] = '\0';
 432         if( ! strchr( cl2chan->modes, x[0] ))
 433         {
 434                 /* Client hat den Mode noch nicht -> setzen */
 435                 strcat( cl2chan->modes, x );
 436                 return TRUE;
 437         }
 438         else return FALSE;
 439 } /* Channel_UserModeAdd */
 440
 441
 442 GLOBAL BOOLEAN
 443 Channel_UserModeDel( CHANNEL *Chan, CLIENT *Client, CHAR Mode )
 444 {
 445         /* Channel-User-Mode soll geloescht werden. TRUE wird geliefert,
 446          * wenn der Mode entfernt wurde, FALSE, wenn der User den Channel-Mode
 447          * ueberhaupt nicht hatte. */
 448
 449         CL2CHAN *cl2chan;
 450         CHAR x[2], *p;
 451
 452         assert( Chan != NULL );
 453         assert( Client != NULL );
 454
 455         cl2chan = Get_Cl2Chan( Chan, Client );
 456         assert( cl2chan != NULL );
 457
 458         x[0] = Mode; x[1] = '\0';
 459
 460         p = strchr( cl2chan->modes, x[0] );
 461         if( ! p ) return FALSE;
 462
 463         /* Client hat den Mode -> loeschen */
 464         while( *p )
 465         {
 466                 *p = *(p + 1);
 467                 p++;
 468         }
 469         return TRUE;
 470 } /* Channel_UserModeDel */
 471
 472
 473 GLOBAL CHAR *
 474 Channel_UserModes( CHANNEL *Chan, CLIENT *Client )
 475 {
 476         /* Channel-Modes eines Users liefern */
 477
 478         CL2CHAN *cl2chan;
 479
 480         assert( Chan != NULL );
 481         assert( Client != NULL );
 482
 483         cl2chan = Get_Cl2Chan( Chan, Client );
 484         assert( cl2chan != NULL );
 485
 486         return cl2chan->modes;
 487 } /* Channel_UserModes */
 488
 489
 490 GLOBAL BOOLEAN
 491 Channel_IsMemberOf( CHANNEL *Chan, CLIENT *Client )
 492 {
 493         /* Pruefen, ob Client Mitglied in Channel ist */
 494
 495         assert( Chan != NULL );
 496         assert( Client != NULL );
 497
 498         if( Get_Cl2Chan( Chan, Client )) return TRUE;
 499         else return FALSE;
 500 } /* Channel_IsMemberOf */
 501
 502
 503 GLOBAL CHAR *
 504 Channel_Topic( CHANNEL *Chan )
 505 {
 506         assert( Chan != NULL );
 507         return Chan->topic;
 508 } /* Channel_Topic */
 509
 510
 511 GLOBAL VOID
 512 Channel_SetTopic( CHANNEL *Chan, CHAR *Topic )
 513 {
 514         assert( Chan != NULL );
 515         assert( Topic != NULL );
 516
 517         strncpy( Chan->topic, Topic, CHANNEL_TOPIC_LEN - 1 );
 518         Chan->topic[CHANNEL_TOPIC_LEN - 1] = '\0';
 519 } /* Channel_SetTopic */
 520
 521
 522 GLOBAL BOOLEAN
 523 Channel_Write( CHANNEL *Chan, CLIENT *From, CLIENT *Client, CHAR *Text )
 524 {
 525         BOOLEAN is_member, has_voice, is_op, ok;
 526
 527         /* Okay, Ziel ist ein Channel */
 528         is_member = has_voice = is_op = FALSE;
 529         if( Channel_IsMemberOf( Chan, From ))
 530         {
 531                 is_member = TRUE;
 532                 if( strchr( Channel_UserModes( Chan, From ), 'v' )) has_voice = TRUE;
 533                 if( strchr( Channel_UserModes( Chan, From ), 'o' )) is_op = TRUE;
 534         }
 535
 536         /* pruefen, ob Client in Channel schreiben darf */
 537         ok = TRUE;
 538         if( strchr( Channel_Modes( Chan ), 'n' ) && ( ! is_member )) ok = FALSE;
 539         if( strchr( Channel_Modes( Chan ), 'm' ) && ( ! is_op ) && ( ! has_voice )) ok = FALSE;
 540
 541         if( ! ok ) return IRC_WriteStrClient( From, ERR_CANNOTSENDTOCHAN_MSG, Client_ID( From ), Channel_Name( Chan ));
 542
 543         /* Text senden */
 544         if( Client_Conn( From ) > NONE ) Conn_UpdateIdle( Client_Conn( From ));
 545         return IRC_WriteStrChannelPrefix( Client, Chan, From, TRUE, "PRIVMSG %s :%s", Channel_Name( Chan ), Text );
 546 } /* Channel_Write */
 547
 548
 549
 550 LOCAL CHANNEL *
 551 New_Chan( CHAR *Name )
 552 {
 553         /* Neue Channel-Struktur anlegen */
 554
 555         CHANNEL *c;
 556
 557         assert( Name != NULL );
 558
 559         c = malloc( sizeof( CHANNEL ));
 560         if( ! c )
 561         {
 562                 Log( LOG_EMERG, "Can't allocate memory!" );
 563                 return NULL;
 564         }
 565         c->next = NULL;
 566         strncpy( c->name, Name, CHANNEL_NAME_LEN - 1 );
 567         c->name[CHANNEL_NAME_LEN - 1] = '\0';
 568         strcpy( c->modes, "" );
 569         strcpy( c->topic, "" );
 570         c->hash = Hash( c->name );
 571
 572         Log( LOG_DEBUG, "Created new channel structure for \"%s\".", Name );
 573
 574         return c;
 575 } /* New_Chan */
 576
 577
 578 LOCAL CL2CHAN *
 579 Get_Cl2Chan( CHANNEL *Chan, CLIENT *Client )
 580 {
 581         CL2CHAN *cl2chan;
 582
 583         assert( Chan != NULL );
 584         assert( Client != NULL );
 585
 586         cl2chan = My_Cl2Chan;
 587         while( cl2chan )
 588         {
 589                 if(( cl2chan->channel == Chan ) && ( cl2chan->client == Client )) return cl2chan;
 590                 cl2chan = cl2chan->next;
 591         }
 592         return NULL;
 593 } /* Get_Cl2Chan */
 594
 595
 596 LOCAL CL2CHAN *
 597 Add_Client( CHANNEL *Chan, CLIENT *Client )
 598 {
 599         CL2CHAN *cl2chan;
 600
 601         assert( Chan != NULL );
 602         assert( Client != NULL );
 603
 604         /* neue CL2CHAN-Struktur anlegen */
 605         cl2chan = malloc( sizeof( CL2CHAN ));
 606         if( ! cl2chan )
 607         {
 608                 Log( LOG_EMERG, "Can't allocate memory!" );
 609                 return NULL;
 610         }
 611         cl2chan->channel = Chan;
 612         cl2chan->client = Client;
 613         strcpy( cl2chan->modes, "" );
 614
 615         /* Verketten */
 616         cl2chan->next = My_Cl2Chan;
 617         My_Cl2Chan = cl2chan;
 618
 619         Log( LOG_DEBUG, "User \"%s\" joined channel \"%s\".", Client_Mask( Client ), Chan->name );
 620
 621         return cl2chan;
 622 } /* Add_Client */
 623
 624
 625 LOCAL BOOLEAN
 626 Remove_Client( CHANNEL *Chan, CLIENT *Client, CLIENT *Origin, CHAR *Reason, BOOLEAN ServerPART )
 627 {
 628         CL2CHAN *cl2chan, *last_cl2chan;
 629         CHANNEL *c;
 630
 631         assert( Chan != NULL );
 632         assert( Client != NULL );
 633         assert( Origin != NULL );
 634         assert( Reason != NULL );
 635
 636         last_cl2chan = NULL;
 637         cl2chan = My_Cl2Chan;
 638         while( cl2chan )
 639         {
 640                 if(( cl2chan->channel == Chan ) && ( cl2chan->client == Client )) break;
 641                 last_cl2chan = cl2chan;
 642                 cl2chan = cl2chan->next;
 643         }
 644         if( ! cl2chan ) return FALSE;
 645
 646         c = cl2chan->channel;
 647         assert( c != NULL );
 648
 649         /* Aus Verkettung loesen und freigeben */
 650         if( last_cl2chan ) last_cl2chan->next = cl2chan->next;
 651         else My_Cl2Chan = cl2chan->next;
 652         free( cl2chan );
 653
 654         if( ServerPART ) IRC_WriteStrServersPrefix( Origin, Client, "PART %s :%s", c->name, Reason );
 655         IRC_WriteStrChannelPrefix( Origin, c, Client, FALSE, "PART %s :%s", c->name, Reason );
 656         if(( Client_Conn( Origin ) > NONE ) && ( Client_Type( Origin ) == CLIENT_USER )) IRC_WriteStrClientPrefix( Origin, Client, "PART %s :%s", c->name, Reason );
 657
 658         Log( LOG_DEBUG, "User \"%s\" left channel \"%s\" (%s).", Client_Mask( Client ), c->name, Reason );
 659
 660         /* Wenn Channel nun leer und nicht pre-defined: loeschen */
 661         if( ! strchr( Channel_Modes( Chan ), 'P' ))
 662         {
 663                 if( ! Get_First_Cl2Chan( NULL, Chan )) Delete_Channel( Chan );
 664         }
 665
 666         return TRUE;
 667 } /* Remove_Client */
 668
 669
 670 LOCAL CL2CHAN *
 671 Get_First_Cl2Chan( CLIENT *Client, CHANNEL *Chan )
 672 {
 673         return Get_Next_Cl2Chan( My_Cl2Chan, Client, Chan );
 674 } /* Get_First_Cl2Chan */
 675
 676
 677 LOCAL CL2CHAN *
 678 Get_Next_Cl2Chan( CL2CHAN *Start, CLIENT *Client, CHANNEL *Channel )
 679 {
 680         CL2CHAN *cl2chan;
 681
 682         assert( Client != NULL || Channel != NULL );
 683
 684         cl2chan = Start;
 685         while( cl2chan )
 686         {
 687                 if(( Client ) && ( cl2chan->client == Client )) return cl2chan;
 688                 if(( Channel ) && ( cl2chan->channel == Channel )) return cl2chan;
 689                 cl2chan = cl2chan->next;
 690         }
 691         return NULL;
 692 } /* Get_Next_Cl2Chan */
 693
 694
 695 LOCAL BOOLEAN
 696 Delete_Channel( CHANNEL *Chan )
 697 {
 698         /* Channel-Struktur loeschen */
 699
 700         CHANNEL *chan, *last_chan;
 701
 702         last_chan = NULL;
 703         chan = My_Channels;
 704         while( chan )
 705         {
 706                 if( chan == Chan ) break;
 707                 last_chan = chan;
 708                 chan = chan->next;
 709         }
 710         if( ! chan ) return FALSE;
 711
 712         Log( LOG_DEBUG, "Freed channel structure for \"%s\".", Chan->name );
 713
 714         /* Neu verketten und freigeben */
 715         if( last_chan ) last_chan->next = chan->next;
 716         else My_Channels = chan->next;
 717         free( chan );
 718
 719         return TRUE;
 720 } /* Delete_Channel */
 721
 722
 723 /* -eof- */