- /* From aus Prefix ermitteln */
- if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
- else from = Client;
- if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
-
- if( Req->argc == 2 )
- {
- /* an anderen Server forwarden */
- target = Client_Search( Req->argv[1] );
- if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
-
- if( target != Client_ThisServer( ))
- {
- /* Ok, anderer Server ist das Ziel: forwarden */
- return IRC_WriteStrClientPrefix( target, from, "NAMES %s :%s", Req->argv[0], Req->argv[1] );
- }
- }
-
- if( Req->argc > 0 )
- {
- /* bestimmte Channels durchgehen */
- ptr = strtok( Req->argv[0], "," );
- while( ptr )
- {
- chan = Channel_Search( ptr );
- if( chan )
- {
- /* Namen ausgeben */
- if( ! IRC_Send_NAMES( from, chan )) return DISCONNECTED;
- }
- if( ! IRC_WriteStrClient( from, RPL_ENDOFNAMES_MSG, Client_ID( from ), ptr )) return DISCONNECTED;
-
- /* naechsten Namen ermitteln */
- ptr = strtok( NULL, "," );
- }
- return CONNECTED;
- }
-
- /* alle Channels durchgehen */
- chan = Channel_First( );
- while( chan )
- {
- /* Namen ausgeben */
- if( ! IRC_Send_NAMES( from, chan )) return DISCONNECTED;
-
- /* naechster Channel */
- chan = Channel_Next( chan );
- }
-
- /* Nun noch alle Clients ausgeben, die in keinem Channel sind */
- c = Client_First( );
- sprintf( rpl, RPL_NAMREPLY_MSG, Client_ID( from ), "*", "*" );
- while( c )
- {
- if(( Client_Type( c ) == CLIENT_USER ) && ( Channel_FirstChannelOf( c ) == NULL ) && ( ! strchr( Client_Modes( c ), 'i' )))
- {
- /* Okay, das ist ein User: anhaengen */
- if( rpl[strlen( rpl ) - 1] != ':' ) strcat( rpl, " " );
- strcat( rpl, Client_ID( c ));
-
- if( strlen( rpl ) > ( LINE_LEN - CLIENT_NICK_LEN - 4 ))
- {
- /* Zeile wird zu lang: senden! */
- if( ! IRC_WriteStrClient( from, rpl )) return DISCONNECTED;
- sprintf( rpl, RPL_NAMREPLY_MSG, Client_ID( from ), "*", "*" );
- }
- }
-
- /* naechster Client */
- c = Client_Next( c );
- }
- if( rpl[strlen( rpl ) - 1] != ':')
- {
- /* es wurden User gefunden */
- if( ! IRC_WriteStrClient( from, rpl )) return DISCONNECTED;
- }
-
- return IRC_WriteStrClient( from, RPL_ENDOFNAMES_MSG, Client_ID( from ), "*" );
-} /* IRC_NAMES */
-
-
-GLOBAL BOOLEAN
-IRC_ISON( CLIENT *Client, REQUEST *Req )
-{
- CHAR rpl[COMMAND_LEN];
- CLIENT *c;
- CHAR *ptr;
- INT i;
-
- assert( Client != NULL );
- assert( Req != NULL );
-
- if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
-
- /* Falsche Anzahl Parameter? */
- if(( Req->argc < 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
-
- strcpy( rpl, RPL_ISON_MSG );
- for( i = 0; i < Req->argc; i++ )
- {
- ptr = strtok( Req->argv[i], " " );
- while( ptr )
- {
- ngt_TrimStr( ptr );
- c = Client_Search( ptr );
- if( c && ( Client_Type( c ) == CLIENT_USER ))
- {
- /* Dieser Nick ist "online" */
- strcat( rpl, ptr );
- strcat( rpl, " " );
- }
- ptr = strtok( NULL, " " );
- }
- }
- if( rpl[strlen( rpl ) - 1] == ' ' ) rpl[strlen( rpl ) - 1] = '\0';
-
- return IRC_WriteStrClient( Client, rpl, Client_ID( Client ) );
-} /* IRC_ISON */
-
-
-GLOBAL BOOLEAN
-IRC_WHOIS( CLIENT *Client, REQUEST *Req )
-{
- CLIENT *from, *target, *c;
- CHAR str[LINE_LEN + 1], *ptr = NULL;
- CL2CHAN *cl2chan;
- CHANNEL *chan;
-
- assert( Client != NULL );
- assert( Req != NULL );
-
- if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
-
- /* Falsche Anzahl Parameter? */
- if(( Req->argc < 1 ) || ( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
-
- /* Client suchen */
- c = Client_Search( Req->argv[Req->argc - 1] );
- if(( ! c ) || ( Client_Type( c ) != CLIENT_USER )) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->argv[Req->argc - 1] );
-
- /* Empfaenger des WHOIS suchen */