* Naehere Informationen entnehmen Sie bitter der Datei COPYING. Eine Liste
* der an ngIRCd beteiligten Autoren finden Sie in der Datei AUTHORS.
*
- * $Id: channel.c,v 1.3 2002/01/02 02:42:58 alex Exp $
+ * $Id: channel.c,v 1.21 2002/04/23 19:51:31 alex Exp $
*
* channel.c: Management der Channels
- *
- * $Log: channel.c,v $
- * Revision 1.3 2002/01/02 02:42:58 alex
- * - Copyright-Texte aktualisiert.
- *
- * Revision 1.2 2001/12/31 02:18:51 alex
- * - viele neue Befehle (WHOIS, ISON, OPER, DIE, RESTART),
- * - neuen Header "defines.h" mit (fast) allen Konstanten.
- * - Code Cleanups und viele "kleine" Aenderungen & Bugfixes.
- *
- * Revision 1.1 2001/12/14 08:13:43 alex
- * - neues Modul begonnen :-)
- *
*/
-#include <portab.h>
-#include "global.h"
+#define __channel_c__
+
+
+#include "portab.h"
-#include <imp.h>
+#include "imp.h"
#include <assert.h>
+#include <stdlib.h>
+#include <string.h>
-#include <exp.h>
+#include "client.h"
+#include "hash.h"
+#include "irc-write.h"
+#include "log.h"
+#include "messages.h"
+
+#include "exp.h"
#include "channel.h"
LOCAL CHANNEL *My_Channels;
+LOCAL CL2CHAN *My_Cl2Chan;
+
+
+LOCAL CHANNEL *New_Chan( CHAR *Name );
+LOCAL CL2CHAN *Get_Cl2Chan( CHANNEL *Chan, CLIENT *Client );
+LOCAL CL2CHAN *Add_Client( CHANNEL *Chan, CLIENT *Client );
+LOCAL BOOLEAN Remove_Client( CHANNEL *Chan, CLIENT *Client, CLIENT *Origin, CHAR *Reason, BOOLEAN ServerPART );
+LOCAL CL2CHAN *Get_First_Cl2Chan( CLIENT *Client, CHANNEL *Chan );
+LOCAL CL2CHAN *Get_Next_Cl2Chan( CL2CHAN *Start, CLIENT *Client, CHANNEL *Chan );
+LOCAL BOOLEAN Delete_Channel( CHANNEL *Chan );
GLOBAL VOID Channel_Init( VOID )
{
My_Channels = NULL;
+ My_Cl2Chan = NULL;
} /* Channel_Init */
GLOBAL VOID Channel_Exit( VOID )
{
+ CHANNEL *c, *c_next;
+ CL2CHAN *cl2chan, *cl2chan_next;
+
+ /* Channel-Strukturen freigeben */
+ c = My_Channels;
+ while( c )
+ {
+ c_next = c->next;
+ free( c );
+ c = c_next;
+ }
+
+ /* Channel-Zuordnungstabelle freigeben */
+ cl2chan = My_Cl2Chan;
+ while( c )
+ {
+ cl2chan_next = cl2chan->next;
+ free( cl2chan );
+ cl2chan = cl2chan_next;
+ }
} /* Channel_Exit */
+GLOBAL BOOLEAN Channel_Join( CLIENT *Client, CHAR *Name )
+{
+ CHANNEL *chan;
+
+ assert( Client != NULL );
+ assert( Name != NULL );
+
+ /* Valider Channel-Name? */
+ if( ! Channel_IsValidName( Name ))
+ {
+ IRC_WriteStrClient( Client, ERR_NOSUCHCHANNEL_MSG, Client_ID( Client ), Name );
+ return FALSE;
+ }
+
+ /* Channel suchen */
+ chan = Channel_Search( 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 = Channel_Search( 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, TRUE )) 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, FALSE );
+ 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 */
+
+
+GLOBAL INT Channel_MemberCount( CHANNEL *Chan )
+{
+ CL2CHAN *cl2chan;
+ INT count;
+
+ assert( Chan != NULL );
+
+ count = 0;
+ cl2chan = My_Cl2Chan;
+ while( cl2chan )
+ {
+ if( cl2chan->channel == Chan ) count++;
+ cl2chan = cl2chan->next;
+ }
+ return count;
+} /* Channel_MemberCount */
+
+
+GLOBAL CHAR *Channel_Name( CHANNEL *Chan )
+{
+ assert( Chan != NULL );
+ return Chan->name;
+} /* Channel_Name */
+
+
+GLOBAL CHAR *Channel_Modes( CHANNEL *Chan )
+{
+ assert( Chan != NULL );
+ return Chan->modes;
+} /* Channel_Modes */
+
+
+GLOBAL CHANNEL *Channel_First( VOID )
+{
+ return My_Channels;
+} /* Channel_First */
+
+
+GLOBAL CHANNEL *Channel_Next( CHANNEL *Chan )
+{
+ assert( Chan != NULL );
+ return Chan->next;
+} /* Channel_Next */
+
+
+GLOBAL CHANNEL *Channel_Search( CHAR *Name )
+{
+ /* Channel-Struktur suchen */
+
+ CHANNEL *c;
+ UINT32 search_hash;
+
+ assert( Name != NULL );
+
+ search_hash = Hash( Name );
+ c = My_Channels;
+ while( c )
+ {
+ if( search_hash == c->hash )
+ {
+ /* lt. Hash-Wert: Treffer! */
+ if( strcasecmp( Name, c->name ) == 0 ) return c;
+ }
+ c = c->next;
+ }
+ return NULL;
+} /* Channel_Search */
+
+
+GLOBAL CL2CHAN *Channel_FirstMember( CHANNEL *Chan )
+{
+ assert( Chan != NULL );
+ return Get_First_Cl2Chan( NULL, Chan );
+} /* Channel_FirstMember */
+
+
+GLOBAL CL2CHAN *Channel_NextMember( CHANNEL *Chan, CL2CHAN *Cl2Chan )
+{
+ assert( Chan != NULL );
+ assert( Cl2Chan != NULL );
+ return Get_Next_Cl2Chan( Cl2Chan->next, NULL, Chan );
+} /* Channel_NextMember */
+
+
+GLOBAL CL2CHAN *Channel_FirstChannelOf( CLIENT *Client )
+{
+ assert( Client != NULL );
+ return Get_First_Cl2Chan( Client, NULL );
+} /* Channel_FirstChannelOf */
+
+
+GLOBAL CL2CHAN *Channel_NextChannelOf( CLIENT *Client, CL2CHAN *Cl2Chan )
+{
+ assert( Client != NULL );
+ assert( Cl2Chan != NULL );
+ return Get_Next_Cl2Chan( Cl2Chan->next, Client, NULL );
+} /* Channel_NextChannelOf */
+
+
+GLOBAL CLIENT *Channel_GetClient( CL2CHAN *Cl2Chan )
+{
+ assert( Cl2Chan != NULL );
+ return Cl2Chan->client;
+} /* Channel_GetClient */
+
+
+GLOBAL CHANNEL *Channel_GetChannel( CL2CHAN *Cl2Chan )
+{
+ assert( Cl2Chan != NULL );
+ return Cl2Chan->channel;
+} /* Channel_GetChannel */
+
+
+GLOBAL BOOLEAN Channel_IsValidName( CHAR *Name )
+{
+ /* Pr\9ffen, ob Name als Channelname gueltig */
+
+ CHAR *ptr, badchars[] = " ,:\x07";
+
+ assert( Name != NULL );
+
+ if(( Name[0] != '#' ) || ( strlen( Name ) >= CHANNEL_NAME_LEN )) return FALSE;
+
+ ptr = Name;
+ while( *ptr )
+ {
+ if( strchr( badchars, *ptr )) return FALSE;
+ ptr++;
+ }
+
+ return TRUE;
+} /* Channel_IsValidName */
+
+
+GLOBAL BOOLEAN Channel_ModeAdd( CHANNEL *Chan, CHAR Mode )
+{
+ /* Mode soll gesetzt werden. TRUE wird geliefert, wenn der
+ * Mode neu gesetzt wurde, FALSE, wenn der Channel den Mode
+ * bereits hatte. */
+
+ CHAR x[2];
+
+ assert( Chan != NULL );
+
+ x[0] = Mode; x[1] = '\0';
+ if( ! strchr( Chan->modes, x[0] ))
+ {
+ /* Client hat den Mode noch nicht -> setzen */
+ strcat( Chan->modes, x );
+ return TRUE;
+ }
+ else return FALSE;
+} /* Channel_ModeAdd */
+
+
+GLOBAL BOOLEAN Channel_ModeDel( CHANNEL *Chan, CHAR Mode )
+{
+ /* Mode soll geloescht werden. TRUE wird geliefert, wenn der
+ * Mode entfernt wurde, FALSE, wenn der Channel den Mode
+ * ueberhaupt nicht hatte. */
+
+ CHAR x[2], *p;
+
+ assert( Chan != NULL );
+
+ x[0] = Mode; x[1] = '\0';
+
+ p = strchr( Chan->modes, x[0] );
+ if( ! p ) return FALSE;
+
+ /* Client hat den Mode -> loeschen */
+ while( *p )
+ {
+ *p = *(p + 1);
+ p++;
+ }
+ return TRUE;
+} /* Channel_ModeDel */
+
+
+GLOBAL BOOLEAN Channel_UserModeAdd( CHANNEL *Chan, CLIENT *Client, CHAR Mode )
+{
+ /* Channel-User-Mode soll gesetzt werden. TRUE wird geliefert,
+ * wenn der Mode neu gesetzt wurde, FALSE, wenn der User den
+ * Channel-Mode bereits hatte. */
+
+ CL2CHAN *cl2chan;
+ CHAR x[2];
+
+ assert( Chan != NULL );
+ assert( Client != NULL );
+
+ cl2chan = Get_Cl2Chan( Chan, Client );
+ assert( cl2chan != NULL );
+
+ x[0] = Mode; x[1] = '\0';
+ if( ! strchr( cl2chan->modes, x[0] ))
+ {
+ /* Client hat den Mode noch nicht -> setzen */
+ strcat( cl2chan->modes, x );
+ return TRUE;
+ }
+ else return FALSE;
+} /* Channel_UserModeAdd */
+
+
+GLOBAL BOOLEAN Channel_UserModeDel( CHANNEL *Chan, CLIENT *Client, CHAR Mode )
+{
+ /* Channel-User-Mode soll geloescht werden. TRUE wird geliefert,
+ * wenn der Mode entfernt wurde, FALSE, wenn der User den Channel-Mode
+ * ueberhaupt nicht hatte. */
+
+ CL2CHAN *cl2chan;
+ CHAR x[2], *p;
+
+ assert( Chan != NULL );
+ assert( Client != NULL );
+
+ cl2chan = Get_Cl2Chan( Chan, Client );
+ assert( cl2chan != NULL );
+
+ x[0] = Mode; x[1] = '\0';
+
+ p = strchr( cl2chan->modes, x[0] );
+ if( ! p ) return FALSE;
+
+ /* Client hat den Mode -> loeschen */
+ while( *p )
+ {
+ *p = *(p + 1);
+ p++;
+ }
+ return TRUE;
+} /* Channel_UserModeDel */
+
+
+GLOBAL CHAR *Channel_UserModes( CHANNEL *Chan, CLIENT *Client )
+{
+ /* Channel-Modes eines Users liefern */
+
+ CL2CHAN *cl2chan;
+
+ assert( Chan != NULL );
+ assert( Client != NULL );
+
+ cl2chan = Get_Cl2Chan( Chan, Client );
+ assert( cl2chan != NULL );
+
+ return cl2chan->modes;
+} /* Channel_UserModes */
+
+
+GLOBAL BOOLEAN Channel_IsMemberOf( CHANNEL *Chan, CLIENT *Client )
+{
+ /* Pruefen, ob Client Mitglied in Channel ist */
+
+ assert( Chan != NULL );
+ assert( Client != NULL );
+
+ if( Get_Cl2Chan( Chan, Client )) return TRUE;
+ else return FALSE;
+} /* Channel_IsMemberOf */
+
+
+GLOBAL CHAR *Channel_Topic( CHANNEL *Chan )
+{
+ assert( Chan != NULL );
+ return Chan->topic;
+} /* Channel_Topic */
+
+
+GLOBAL VOID Channel_SetTopic( CHANNEL *Chan, CHAR *Topic )
+{
+ assert( Chan != NULL );
+ assert( Topic != NULL );
+
+ strncpy( Chan->topic, Topic, CHANNEL_TOPIC_LEN - 1 );
+ Chan->topic[CHANNEL_TOPIC_LEN - 1] = '\0';
+} /* Channel_SetTopic */
+
+
+GLOBAL BOOLEAN Channel_Write( CHANNEL *Chan, CLIENT *From, CLIENT *Client, CHAR *Text )
+{
+ BOOLEAN is_member, has_voice, is_op, ok;
+
+ /* Okay, Ziel ist ein Channel */
+ is_member = has_voice = is_op = FALSE;
+ if( Channel_IsMemberOf( Chan, From ))
+ {
+ is_member = TRUE;
+ if( strchr( Channel_UserModes( Chan, From ), 'v' )) has_voice = TRUE;
+ if( strchr( Channel_UserModes( Chan, From ), 'o' )) is_op = TRUE;
+ }
+
+ /* pruefen, ob Client in Channel schreiben darf */
+ ok = TRUE;
+ if( strchr( Channel_Modes( Chan ), 'n' ) && ( ! is_member )) ok = FALSE;
+ if( strchr( Channel_Modes( Chan ), 'm' ) && ( ! is_op ) && ( ! has_voice )) ok = FALSE;
+
+ if( ! ok ) return IRC_WriteStrClient( From, ERR_CANNOTSENDTOCHAN_MSG, Client_ID( From ), Channel_Name( Chan ));
+
+ /* Text senden */
+ if( Client_Conn( From ) > NONE ) Conn_UpdateIdle( Client_Conn( From ));
+ return IRC_WriteStrChannelPrefix( Client, Chan, From, TRUE, "PRIVMSG %s :%s", Channel_Name( Chan ), Text );
+} /* Channel_Write */
+
+
+
+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 - 1 );
+ c->name[CHANNEL_NAME_LEN - 1] = '\0';
+ strcpy( c->modes, "" );
+ strcpy( c->topic, "" );
+ c->hash = Hash( c->name );
+
+ 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 );
+
+ /* neue CL2CHAN-Struktur anlegen */
+ cl2chan = malloc( sizeof( CL2CHAN ));
+ if( ! cl2chan )
+ {
+ Log( LOG_EMERG, "Can't allocate memory!" );
+ return NULL;
+ }
+ cl2chan->channel = Chan;
+ cl2chan->client = Client;
+ strcpy( cl2chan->modes, "" );
+
+ /* Verketten */
+ cl2chan->next = My_Cl2Chan;
+ My_Cl2Chan = cl2chan;
+
+ Log( LOG_DEBUG, "User \"%s\" joined channel \"%s\".", Client_Mask( Client ), Chan->name );
+
+ return cl2chan;
+} /* Add_Client */
+
+
+LOCAL BOOLEAN Remove_Client( CHANNEL *Chan, CLIENT *Client, CLIENT *Origin, CHAR *Reason, BOOLEAN ServerPART )
+{
+ 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 );
+
+ if( ServerPART ) IRC_WriteStrServersPrefix( Origin, Client, "PART %s :%s", c->name, Reason );
+ IRC_WriteStrChannelPrefix( Origin, c, Client, FALSE, "PART %s :%s", c->name, Reason );
+ if(( Client_Conn( Origin ) > NONE ) && ( Client_Type( Origin ) == CLIENT_USER )) IRC_WriteStrClientPrefix( Origin, 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 */
+
+
/* -eof- */