+GLOBAL BOOLEAN Channel_Join( CLIENT *Client, CHAR *Name )
+{
+ CHANNEL *chan;
+
+ assert( Client != NULL );
+ assert( Name != NULL );
+
+ /* Valider Channel-Name? */
+ if(( Name[0] != '#' ) || ( strlen( Name ) >= CHANNEL_NAME_LEN ))
+ {
+ IRC_WriteStrClient( Client, ERR_NOSUCHCHANNEL_MSG, Client_ID( Client ), Name );
+ return FALSE;
+ }
+
+ /* Channel suchen */
+ chan = Get_Chan( Name );
+ if( chan )
+ {
+ /* Ist der Client bereits Mitglied? */
+ if( Get_Cl2Chan( chan, Client )) return FALSE;
+ }
+ else
+ {
+ /* Gibt es noch nicht? Dann neu anlegen: */
+ chan = New_Chan( Name );
+ if( ! chan ) return FALSE;
+
+ /* Verketten */
+ chan->next = My_Channels;
+ My_Channels = chan;
+ }
+
+ /* User dem Channel hinzufuegen */
+ if( ! Add_Client( chan, Client )) return FALSE;
+ else return TRUE;
+} /* Channel_Join */
+
+
+GLOBAL BOOLEAN Channel_Part( CLIENT *Client, CLIENT *Origin, CHAR *Name, CHAR *Reason )
+{
+ CHANNEL *chan;
+
+ assert( Client != NULL );
+ assert( Name != NULL );
+
+ /* Channel suchen */
+ chan = Get_Chan( Name );
+ if(( ! chan ) || ( ! Get_Cl2Chan( chan, Client )))
+ {
+ IRC_WriteStrClient( Client, ERR_NOSUCHCHANNEL_MSG, Client_ID( Client ), Name );
+ return FALSE;
+ }
+
+ /* User aus Channel entfernen */
+ if( ! Remove_Client( chan, Client, Origin, Reason )) return FALSE;
+ else return TRUE;
+} /* Channel_Part */
+
+
+GLOBAL VOID Channel_RemoveClient( CLIENT *Client, CHAR *Reason )
+{
+ CHANNEL *c, *next_c;
+
+ assert( Client != NULL );
+
+ c = My_Channels;
+ while( c )
+ {
+ next_c = c->next;
+ Remove_Client( c, Client, Client_ThisServer( ), Reason );
+ c = next_c;
+ }
+} /* Channel_RemoveClient */
+
+
+GLOBAL INT Channel_Count( VOID )
+{
+ CHANNEL *c;
+ INT count;
+
+ count = 0;
+ c = My_Channels;
+ while( c )
+ {
+ count++;
+ c = c->next;
+ }
+ return count;
+} /* Channel_Count */
+
+
+LOCAL CHANNEL *Get_Chan( CHAR *Name )
+{
+ /* Channel-Struktur suchen */
+
+ CHANNEL *c;
+
+ assert( Name != NULL );
+ c = My_Channels;
+ while( c )
+ {
+ if( strcasecmp( Name, c->name ) == 0 ) return c;
+ c = c->next;
+ }
+ return NULL;
+} /* Get_Chan */
+
+
+LOCAL CHANNEL *New_Chan( CHAR *Name )
+{
+ /* Neue Channel-Struktur anlegen */
+
+ CHANNEL *c;
+
+ assert( Name != NULL );
+
+ c = malloc( sizeof( CHANNEL ));
+ if( ! c )
+ {
+ Log( LOG_EMERG, "Can't allocate memory!" );
+ return NULL;
+ }
+ c->next = NULL;
+ strncpy( c->name, Name, CHANNEL_NAME_LEN );
+ c->name[CHANNEL_NAME_LEN - 1] = '\0';
+ strcpy( c->modes, "" );
+
+ Log( LOG_DEBUG, "Created new channel structure for \"%s\".", Name );
+
+ return c;
+} /* New_Chan */
+
+
+LOCAL CL2CHAN *Get_Cl2Chan( CHANNEL *Chan, CLIENT *Client )
+{
+ CL2CHAN *cl2chan;
+
+ assert( Chan != NULL );
+ assert( Client != NULL );
+
+ cl2chan = My_Cl2Chan;
+ while( cl2chan )
+ {
+ if(( cl2chan->channel == Chan ) && ( cl2chan->client == Client )) return cl2chan;
+ cl2chan = cl2chan->next;
+ }
+ return NULL;
+} /* Get_Cl2Chan */
+
+
+LOCAL CL2CHAN *Add_Client( CHANNEL *Chan, CLIENT *Client )
+{
+ CL2CHAN *cl2chan;
+
+ assert( Chan != NULL );
+ assert( Client != NULL );
+
+ cl2chan = malloc( sizeof( CL2CHAN ));
+ if( ! cl2chan )
+ {
+ Log( LOG_EMERG, "Can't allocate memory!" );
+ return NULL;
+ }
+ cl2chan->channel = Chan;
+ cl2chan->client = Client;
+
+ /* Verketten */
+ cl2chan->next = My_Cl2Chan;
+ My_Cl2Chan = cl2chan;
+
+ return cl2chan;
+} /* Add_Client */
+
+
+LOCAL BOOLEAN Remove_Client( CHANNEL *Chan, CLIENT *Client, CLIENT *Origin, CHAR *Reason )
+{
+ CL2CHAN *cl2chan, *last_cl2chan;
+ CHANNEL *c;
+
+ assert( Chan != NULL );
+ assert( Client != NULL );
+ assert( Origin != NULL );
+ assert( Reason != NULL );
+
+ last_cl2chan = NULL;
+ cl2chan = My_Cl2Chan;
+ while( cl2chan )
+ {
+ if(( cl2chan->channel == Chan ) && ( cl2chan->client == Client )) break;
+ last_cl2chan = cl2chan;
+ cl2chan = cl2chan->next;
+ }
+ if( ! cl2chan ) return FALSE;
+
+ c = cl2chan->channel;
+ assert( c != NULL );
+
+ /* Aus Verkettung loesen und freigeben */
+ if( last_cl2chan ) last_cl2chan->next = cl2chan->next;
+ else My_Cl2Chan = cl2chan->next;
+ free( cl2chan );
+
+ IRC_WriteStrServersPrefix( Origin, Client, "PART %s :%s", c->name, Reason );
+ IRC_WriteStrRelatedChannelPrefix( Origin, c->name, Client, "PART %s :%s", c->name, Reason );
+
+ Log( LOG_DEBUG, "User \"%s\" left channel \"%s\" (%s).", Client_Mask( Client ), c->name, Reason );
+
+ /* Wenn Channel nun leer: loeschen */
+ if( ! Get_First_Cl2Chan( NULL, Chan )) Delete_Channel( Chan );
+
+ return TRUE;
+} /* Remove_Client */
+
+
+LOCAL CL2CHAN *Get_First_Cl2Chan( CLIENT *Client, CHANNEL *Chan )
+{
+ return Get_Next_Cl2Chan( My_Cl2Chan, Client, Chan );
+} /* Get_First_Cl2Chan */
+
+
+LOCAL CL2CHAN *Get_Next_Cl2Chan( CL2CHAN *Start, CLIENT *Client, CHANNEL *Channel )
+{
+ CL2CHAN *cl2chan;
+
+ assert( Client != NULL || Channel != NULL );
+
+ cl2chan = Start;
+ while( cl2chan )
+ {
+ if(( Client ) && ( cl2chan->client == Client )) return cl2chan;
+ if(( Channel ) && ( cl2chan->channel == Channel )) return cl2chan;
+ cl2chan = cl2chan->next;
+ }
+ return NULL;
+} /* Get_Next_Cl2Chan */
+
+
+LOCAL BOOLEAN Delete_Channel( CHANNEL *Chan )
+{
+ /* Channel-Struktur loeschen */
+
+ CHANNEL *chan, *last_chan;
+
+ last_chan = NULL;
+ chan = My_Channels;
+ while( chan )
+ {
+ if( chan == Chan ) break;
+ last_chan = chan;
+ chan = chan->next;
+ }
+ if( ! chan ) return FALSE;
+
+ Log( LOG_DEBUG, "Freed channel structure for \"%s\".", Chan->name );
+
+ /* Neu verketten und freigeben */
+ if( last_chan ) last_chan->next = chan->next;
+ else My_Channels = chan->next;
+ free( chan );
+
+ return TRUE;
+} /* Delete_Channel */
+
+