src/ngircd/irc.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: irc.c,v 1.92 2002/06/10 21:08:45 alex Exp $
  13  *
  14  * irc.c: IRC-Befehle
  15  */
  16
  17
  18 #include "portab.h"
  19
  20 #include "imp.h"
  21 #include <assert.h>
  22 #include <errno.h>
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26
  27 #include "ngircd.h"
  28 #include "conn.h"
  29 #include "client.h"
  30 #include "channel.h"
  31 #include "resolve.h"
  32 #include "conf.h"
  33 #include "conn.h"
  34 #include "irc-write.h"
  35 #include "log.h"
  36 #include "messages.h"
  37 #include "parse.h"
  38 #include "tool.h"
  39
  40 #include "exp.h"
  41 #include "irc.h"
  42
  43
  44 GLOBAL BOOLEAN
  45 IRC_MOTD( CLIENT *Client, REQUEST *Req )
  46 {
  47         assert( Client != NULL );
  48         assert( Req != NULL );
  49
  50         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
  51
  52         /* Falsche Anzahl Parameter? */
  53         if( Req->argc != 0 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
  54
  55         return IRC_Show_MOTD( Client );
  56 } /* IRC_MOTD */
  57
  58
  59 GLOBAL BOOLEAN
  60 IRC_PRIVMSG( CLIENT *Client, REQUEST *Req )
  61 {
  62         CLIENT *cl, *from;
  63         CHANNEL *chan;
  64
  65         assert( Client != NULL );
  66         assert( Req != NULL );
  67
  68         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
  69
  70         /* Falsche Anzahl Parameter? */
  71         if( Req->argc == 0 ) return IRC_WriteStrClient( Client, ERR_NORECIPIENT_MSG, Client_ID( Client ), Req->command );
  72         if( Req->argc == 1 ) return IRC_WriteStrClient( Client, ERR_NOTEXTTOSEND_MSG, Client_ID( Client ));
  73         if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
  74
  75         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
  76         else from = Client;
  77         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
  78
  79         cl = Client_Search( Req->argv[0] );
  80         if( cl )
  81         {
  82                 /* Okay, Ziel ist ein Client. Aber ist es auch ein User? */
  83                 if( Client_Type( cl ) != CLIENT_USER ) return IRC_WriteStrClient( from, ERR_NOSUCHNICK_MSG, Client_ID( from ), Req->argv[0] );
  84
  85                 /* Okay, Ziel ist ein User */
  86                 if(( Client_Type( Client ) != CLIENT_SERVER ) && ( strchr( Client_Modes( cl ), 'a' )))
  87                 {
  88                         /* Ziel-User ist AWAY: Meldung verschicken */
  89                         if( ! IRC_WriteStrClient( from, RPL_AWAY_MSG, Client_ID( from ), Client_ID( cl ), Client_Away( cl ))) return DISCONNECTED;
  90                 }
  91
  92                 /* Text senden */
  93                 if( Client_Conn( from ) > NONE ) Conn_UpdateIdle( Client_Conn( from ));
  94                 return IRC_WriteStrClientPrefix( cl, from, "PRIVMSG %s :%s", Client_ID( cl ), Req->argv[1] );
  95         }
  96
  97         chan = Channel_Search( Req->argv[0] );
  98         if( chan ) return Channel_Write( chan, from, Client, Req->argv[1] );
  99
 100         return IRC_WriteStrClient( from, ERR_NOSUCHNICK_MSG, Client_ID( from ), Req->argv[0] );
 101 } /* IRC_PRIVMSG */
 102
 103
 104 GLOBAL BOOLEAN
 105 IRC_NOTICE( CLIENT *Client, REQUEST *Req )
 106 {
 107         CLIENT *to, *from;
 108
 109         assert( Client != NULL );
 110         assert( Req != NULL );
 111
 112         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 113
 114         /* Falsche Anzahl Parameter? */
 115         if( Req->argc != 2 ) return CONNECTED;
 116
 117         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
 118         else from = Client;
 119         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
 120
 121         to = Client_Search( Req->argv[0] );
 122         if( to )
 123         {
 124                 /* Okay, Ziel ist ein User */
 125                 return IRC_WriteStrClientPrefix( to, from, "NOTICE %s :%s", Client_ID( to ), Req->argv[1] );
 126         }
 127         else return CONNECTED;
 128 } /* IRC_NOTICE */
 129
 130
 131 GLOBAL BOOLEAN
 132 IRC_NAMES( CLIENT *Client, REQUEST *Req )
 133 {
 134         CHAR rpl[COMMAND_LEN], *ptr;
 135         CLIENT *target, *from, *c;
 136         CHANNEL *chan;
 137
 138         assert( Client != NULL );
 139         assert( Req != NULL );
 140
 141         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 142
 143         /* Falsche Anzahl Parameter? */
 144         if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 145
 146         /* From aus Prefix ermitteln */
 147         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
 148         else from = Client;
 149         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
 150
 151         if( Req->argc == 2 )
 152         {
 153                 /* an anderen Server forwarden */
 154                 target = Client_Search( Req->argv[1] );
 155                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
 156
 157                 if( target != Client_ThisServer( ))
 158                 {
 159                         /* Ok, anderer Server ist das Ziel: forwarden */
 160                         return IRC_WriteStrClientPrefix( target, from, "NAMES %s :%s", Req->argv[0], Req->argv[1] );
 161                 }
 162         }
 163
 164         if( Req->argc > 0 )
 165         {
 166                 /* bestimmte Channels durchgehen */
 167                 ptr = strtok( Req->argv[0], "," );
 168                 while( ptr )
 169                 {
 170                         chan = Channel_Search( ptr );
 171                         if( chan )
 172                         {
 173                                 /* Namen ausgeben */
 174                                 if( ! IRC_Send_NAMES( from, chan )) return DISCONNECTED;
 175                         }
 176                         if( ! IRC_WriteStrClient( from, RPL_ENDOFNAMES_MSG, Client_ID( from ), ptr )) return DISCONNECTED;
 177
 178                         /* naechsten Namen ermitteln */
 179                         ptr = strtok( NULL, "," );
 180                 }
 181                 return CONNECTED;
 182         }
 183
 184         /* alle Channels durchgehen */
 185         chan = Channel_First( );
 186         while( chan )
 187         {
 188                 /* Namen ausgeben */
 189                 if( ! IRC_Send_NAMES( from, chan )) return DISCONNECTED;
 190
 191                 /* naechster Channel */
 192                 chan = Channel_Next( chan );
 193         }
 194
 195         /* Nun noch alle Clients ausgeben, die in keinem Channel sind */
 196         c = Client_First( );
 197         sprintf( rpl, RPL_NAMREPLY_MSG, Client_ID( from ), "*", "*" );
 198         while( c )
 199         {
 200                 if(( Client_Type( c ) == CLIENT_USER ) && ( Channel_FirstChannelOf( c ) == NULL ) && ( ! strchr( Client_Modes( c ), 'i' )))
 201                 {
 202                         /* Okay, das ist ein User: anhaengen */
 203                         if( rpl[strlen( rpl ) - 1] != ':' ) strcat( rpl, " " );
 204                         strcat( rpl, Client_ID( c ));
 205
 206                         if( strlen( rpl ) > ( LINE_LEN - CLIENT_NICK_LEN - 4 ))
 207                         {
 208                                 /* Zeile wird zu lang: senden! */
 209                                 if( ! IRC_WriteStrClient( from, rpl )) return DISCONNECTED;
 210                                 sprintf( rpl, RPL_NAMREPLY_MSG, Client_ID( from ), "*", "*" );
 211                         }
 212                 }
 213
 214                 /* naechster Client */
 215                 c = Client_Next( c );
 216         }
 217         if( rpl[strlen( rpl ) - 1] != ':')
 218         {
 219                 /* es wurden User gefunden */
 220                 if( ! IRC_WriteStrClient( from, rpl )) return DISCONNECTED;
 221         }
 222
 223         return IRC_WriteStrClient( from, RPL_ENDOFNAMES_MSG, Client_ID( from ), "*" );
 224 } /* IRC_NAMES */
 225
 226
 227 GLOBAL BOOLEAN
 228 IRC_ISON( CLIENT *Client, REQUEST *Req )
 229 {
 230         CHAR rpl[COMMAND_LEN];
 231         CLIENT *c;
 232         CHAR *ptr;
 233         INT i;
 234
 235         assert( Client != NULL );
 236         assert( Req != NULL );
 237
 238         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 239
 240         /* Falsche Anzahl Parameter? */
 241         if(( Req->argc < 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 242
 243         strcpy( rpl, RPL_ISON_MSG );
 244         for( i = 0; i < Req->argc; i++ )
 245         {
 246                 ptr = strtok( Req->argv[i], " " );
 247                 while( ptr )
 248                 {
 249                         ngt_TrimStr( ptr );
 250                         c = Client_Search( ptr );
 251                         if( c && ( Client_Type( c ) == CLIENT_USER ))
 252                         {
 253                                 /* Dieser Nick ist "online" */
 254                                 strcat( rpl, ptr );
 255                                 strcat( rpl, " " );
 256                         }
 257                         ptr = strtok( NULL, " " );
 258                 }
 259         }
 260         if( rpl[strlen( rpl ) - 1] == ' ' ) rpl[strlen( rpl ) - 1] = '\0';
 261
 262         return IRC_WriteStrClient( Client, rpl, Client_ID( Client ) );
 263 } /* IRC_ISON */
 264
 265
 266 GLOBAL BOOLEAN
 267 IRC_WHOIS( CLIENT *Client, REQUEST *Req )
 268 {
 269         CLIENT *from, *target, *c;
 270         CHAR str[LINE_LEN + 1], *ptr = NULL;
 271         CL2CHAN *cl2chan;
 272         CHANNEL *chan;
 273
 274         assert( Client != NULL );
 275         assert( Req != NULL );
 276
 277         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 278
 279         /* Falsche Anzahl Parameter? */
 280         if(( Req->argc < 1 ) || ( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 281
 282         /* Client suchen */
 283         c = Client_Search( Req->argv[Req->argc - 1] );
 284         if(( ! c ) || ( Client_Type( c ) != CLIENT_USER )) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->argv[Req->argc - 1] );
 285
 286         /* Empfaenger des WHOIS suchen */
 287         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
 288         else from = Client;
 289         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
 290
 291         /* Forwarden an anderen Server? */
 292         if( Req->argc > 1 )
 293         {
 294                 /* angegebenen Ziel-Server suchen */
 295                 target = Client_Search( Req->argv[1] );
 296                 if( ! target ) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[1] );
 297                 ptr = Req->argv[1];
 298         }
 299         else target = Client_ThisServer( );
 300
 301         assert( target != NULL );
 302
 303         if(( Client_NextHop( target ) != Client_ThisServer( )) && ( Client_Type( Client_NextHop( target )) == CLIENT_SERVER )) return IRC_WriteStrClientPrefix( target, from, "WHOIS %s :%s", Req->argv[0], ptr );
 304
 305         /* Nick, User und Name */
 306         if( ! IRC_WriteStrClient( from, RPL_WHOISUSER_MSG, Client_ID( from ), Client_ID( c ), Client_User( c ), Client_Hostname( c ), Client_Info( c ))) return DISCONNECTED;
 307
 308         /* Server */
 309         if( ! IRC_WriteStrClient( from, RPL_WHOISSERVER_MSG, Client_ID( from ), Client_ID( c ), Client_ID( Client_Introducer( c )), Client_Info( Client_Introducer( c )))) return DISCONNECTED;
 310
 311         /* Channels */
 312         sprintf( str, RPL_WHOISCHANNELS_MSG, Client_ID( from ), Client_ID( c ));
 313         cl2chan = Channel_FirstChannelOf( c );
 314         while( cl2chan )
 315         {
 316                 chan = Channel_GetChannel( cl2chan );
 317                 assert( chan != NULL );
 318
 319                 /* Channel-Name anhaengen */
 320                 if( str[strlen( str ) - 1] != ':' ) strcat( str, " " );
 321                 if( strchr( Channel_UserModes( chan, c ), 'o' )) strcat( str, "@" );
 322                 else if( strchr( Channel_UserModes( chan, c ), 'v' )) strcat( str, "+" );
 323                 strcat( str, Channel_Name( chan ));
 324
 325                 if( strlen( str ) > ( LINE_LEN - CHANNEL_NAME_LEN - 4 ))
 326                 {
 327                         /* Zeile wird zu lang: senden! */
 328                         if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
 329                         sprintf( str, RPL_WHOISCHANNELS_MSG, Client_ID( from ), Client_ID( c ));
 330                 }
 331
 332                 /* naechstes Mitglied suchen */
 333                 cl2chan = Channel_NextChannelOf( c, cl2chan );
 334         }
 335         if( str[strlen( str ) - 1] != ':')
 336         {
 337                 /* Es sind noch Daten da, die gesendet werden muessen */
 338                 if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
 339         }
 340
 341         /* IRC-Operator? */
 342         if( Client_HasMode( c, 'o' ))
 343         {
 344                 if( ! IRC_WriteStrClient( from, RPL_WHOISOPERATOR_MSG, Client_ID( from ), Client_ID( c ))) return DISCONNECTED;
 345         }
 346
 347         /* Idle (nur lokale Clients) */
 348         if( Client_Conn( c ) > NONE )
 349         {
 350                 if( ! IRC_WriteStrClient( from, RPL_WHOISIDLE_MSG, Client_ID( from ), Client_ID( c ), Conn_GetIdle( Client_Conn ( c )))) return DISCONNECTED;
 351         }
 352
 353         /* Away? */
 354         if( Client_HasMode( c, 'a' ))
 355         {
 356                 if( ! IRC_WriteStrClient( from, RPL_AWAY_MSG, Client_ID( from ), Client_ID( c ), Client_Away( c ))) return DISCONNECTED;
 357         }
 358
 359         /* End of Whois */
 360         return IRC_WriteStrClient( from, RPL_ENDOFWHOIS_MSG, Client_ID( from ), Client_ID( c ));
 361 } /* IRC_WHOIS */
 362
 363
 364 GLOBAL BOOLEAN
 365 IRC_WHO( CLIENT *Client, REQUEST *Req )
 366 {
 367         BOOLEAN ok, only_ops;
 368         CHAR flags[8], *ptr;
 369         CL2CHAN *cl2chan;
 370         CHANNEL *chan;
 371         CLIENT *c;
 372
 373         assert( Client != NULL );
 374         assert( Req != NULL );
 375
 376         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 377
 378         /* Falsche Anzahl Parameter? */
 379         if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 380
 381         only_ops = FALSE;
 382         chan = NULL;
 383
 384         if( Req->argc == 2 )
 385         {
 386                 /* Nur OPs anzeigen? */
 387                 if( strcmp( Req->argv[1], "o" ) == 0 ) only_ops = TRUE;
 388 #ifdef STRICT_RFC
 389                 else return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 390 #endif
 391         }
 392
 393         if( Req->argc >= 1 )
 394         {
 395                 /* wurde ein Channel oder Nick-Mask angegeben? */
 396                 chan = Channel_Search( Req->argv[0] );
 397         }
 398
 399         if( chan )
 400         {
 401                 /* User eines Channels ausgeben */
 402                 if( ! IRC_Send_WHO( Client, chan, only_ops )) return DISCONNECTED;
 403         }
 404
 405         c = Client_First( );
 406         while( c )
 407         {
 408                 if(( Client_Type( c ) == CLIENT_USER ) && ( ! strchr( Client_Modes( c ), 'i' )))
 409                 {
 410                         ok = FALSE;
 411                         if( Req->argc == 0 ) ok = TRUE;
 412                         else
 413                         {
 414                                 if( strcasecmp( Req->argv[0], Client_ID( c )) == 0 ) ok = TRUE;
 415                                 else if( strcmp( Req->argv[0], "0" ) == 0 ) ok = TRUE;
 416                         }
 417
 418                         if( ok && (( ! only_ops ) || ( strchr( Client_Modes( c ), 'o' ))))
 419                         {
 420                                 /* Flags zusammenbasteln */
 421                                 strcpy( flags, "H" );
 422                                 if( strchr( Client_Modes( c ), 'o' )) strcat( flags, "*" );
 423
 424                                 /* ausgeben */
 425                                 cl2chan = Channel_FirstChannelOf( c );
 426                                 if( cl2chan ) ptr = Channel_Name( Channel_GetChannel( cl2chan ));
 427                                 else ptr = "*";
 428                                 if( ! IRC_WriteStrClient( Client, RPL_WHOREPLY_MSG, Client_ID( Client ), ptr, Client_User( c ), Client_Hostname( c ), Client_ID( Client_Introducer( c )), Client_ID( c ), flags, Client_Hops( c ), Client_Info( c ))) return DISCONNECTED;
 429                         }
 430                 }
 431
 432                 /* naechster Client */
 433                 c = Client_Next( c );
 434         }
 435
 436         if( chan ) return IRC_WriteStrClient( Client, RPL_ENDOFWHO_MSG, Client_ID( Client ), Channel_Name( chan ));
 437         else if( Req->argc == 0 ) return IRC_WriteStrClient( Client, RPL_ENDOFWHO_MSG, Client_ID( Client ), "*" );
 438         else return IRC_WriteStrClient( Client, RPL_ENDOFWHO_MSG, Client_ID( Client ), Req->argv[0] );
 439 } /* IRC_WHO */
 440
 441
 442 GLOBAL BOOLEAN
 443 IRC_USERHOST( CLIENT *Client, REQUEST *Req )
 444 {
 445         CHAR rpl[COMMAND_LEN];
 446         CLIENT *c;
 447         INT max, i;
 448
 449         assert( Client != NULL );
 450         assert( Req != NULL );
 451
 452         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 453
 454         /* Falsche Anzahl Parameter? */
 455         if(( Req->argc < 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 456
 457         if( Req->argc > 5 ) max = 5;
 458         else max = Req->argc;
 459
 460         strcpy( rpl, RPL_USERHOST_MSG );
 461         for( i = 0; i < max; i++ )
 462         {
 463                 c = Client_Search( Req->argv[i] );
 464                 if( c && ( Client_Type( c ) == CLIENT_USER ))
 465                 {
 466                         /* Dieser Nick ist "online" */
 467                         strcat( rpl, Client_ID( c ));
 468                         if( Client_HasMode( c, 'o' )) strcat( rpl, "*" );
 469                         strcat( rpl, "=" );
 470                         if( Client_HasMode( c, 'a' )) strcat( rpl, "-" );
 471                         else strcat( rpl, "+" );
 472                         strcat( rpl, Client_User( c ));
 473                         strcat( rpl, "@" );
 474                         strcat( rpl, Client_Hostname( c ));
 475                         strcat( rpl, " " );
 476                 }
 477         }
 478         if( rpl[strlen( rpl ) - 1] == ' ' ) rpl[strlen( rpl ) - 1] = '\0';
 479
 480         return IRC_WriteStrClient( Client, rpl, Client_ID( Client ) );
 481 } /* IRC_USERHOST */
 482
 483
 484 GLOBAL BOOLEAN
 485 IRC_ERROR( CLIENT *Client, REQUEST *Req )
 486 {
 487         assert( Client != NULL );
 488         assert( Req != NULL );
 489
 490         if( Req->argc < 1 ) Log( LOG_NOTICE, "Got ERROR from \"%s\"!", Client_Mask( Client ));
 491         else Log( LOG_NOTICE, "Got ERROR from \"%s\": %s!", Client_Mask( Client ), Req->argv[0] );
 492
 493         return CONNECTED;
 494 } /* IRC_ERROR */
 495
 496
 497 GLOBAL BOOLEAN
 498 IRC_LUSERS( CLIENT *Client, REQUEST *Req )
 499 {
 500         CLIENT *target, *from;
 501
 502         assert( Client != NULL );
 503         assert( Req != NULL );
 504
 505         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 506
 507         /* Falsche Anzahl Parameter? */
 508         if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 509
 510         /* Absender ermitteln */
 511         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
 512         else from = Client;
 513         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
 514
 515         /* An anderen Server forwarden? */
 516         if( Req->argc == 2 )
 517         {
 518                 target = Client_Search( Req->argv[1] );
 519                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
 520                 else if( target != Client_ThisServer( )) return IRC_WriteStrClientPrefix( target, from, "LUSERS %s %s", Req->argv[0], Req->argv[1] );
 521         }
 522
 523         /* Wer ist der Absender? */
 524         if( Client_Type( Client ) == CLIENT_SERVER ) target = Client_Search( Req->prefix );
 525         else target = Client;
 526         if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
 527
 528         IRC_Send_LUSERS( target );
 529
 530         return CONNECTED;
 531 } /* IRC_LUSERS */
 532
 533
 534 GLOBAL BOOLEAN
 535 IRC_LINKS( CLIENT *Client, REQUEST *Req )
 536 {
 537         CLIENT *target, *from, *c;
 538         CHAR *mask;
 539
 540         assert( Client != NULL );
 541         assert( Req != NULL );
 542
 543         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 544
 545         /* Falsche Anzahl Parameter? */
 546         if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 547
 548         /* Server-Mask ermitteln */
 549         if( Req->argc > 0 ) mask = Req->argv[Req->argc - 1];
 550         else mask = "*";
 551
 552         /* Absender ermitteln */
 553         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
 554         else from = Client;
 555         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
 556
 557         /* An anderen Server forwarden? */
 558         if( Req->argc == 2 )
 559         {
 560                 target = Client_Search( Req->argv[0] );
 561                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[0] );
 562                 else if( target != Client_ThisServer( )) return IRC_WriteStrClientPrefix( target, from, "LINKS %s %s", Req->argv[0], Req->argv[1] );
 563         }
 564
 565         /* Wer ist der Absender? */
 566         if( Client_Type( Client ) == CLIENT_SERVER ) target = Client_Search( Req->prefix );
 567         else target = Client;
 568         if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
 569
 570         c = Client_First( );
 571         while( c )
 572         {
 573                 if( Client_Type( c ) == CLIENT_SERVER )
 574                 {
 575                         if( ! IRC_WriteStrClient( target, RPL_LINKS_MSG, Client_ID( target ), Client_ID( c ), Client_ID( Client_TopServer( c ) ? Client_TopServer( c ) : Client_ThisServer( )), Client_Hops( c ), Client_Info( c ))) return DISCONNECTED;
 576                 }
 577                 c = Client_Next( c );
 578         }
 579
 580         return IRC_WriteStrClient( target, RPL_ENDOFLINKS_MSG, Client_ID( target ), mask );
 581 } /* IRC_LINKS */
 582
 583
 584 GLOBAL BOOLEAN
 585 IRC_VERSION( CLIENT *Client, REQUEST *Req )
 586 {
 587         CLIENT *target, *prefix;
 588
 589         assert( Client != NULL );
 590         assert( Req != NULL );
 591
 592         /* Falsche Anzahl Parameter? */
 593         if(( Req->argc > 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 594
 595         /* Ziel suchen */
 596         if( Req->argc == 1 ) target = Client_Search( Req->argv[0] );
 597         else target = Client_ThisServer( );
 598
 599         /* Prefix ermitteln */
 600         if( Client_Type( Client ) == CLIENT_SERVER ) prefix = Client_Search( Req->prefix );
 601         else prefix = Client;
 602         if( ! prefix ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
 603
 604         /* An anderen Server weiterleiten? */
 605         if( target != Client_ThisServer( ))
 606         {
 607                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[0] );
 608
 609                 /* forwarden */
 610                 IRC_WriteStrClientPrefix( target, prefix, "VERSION %s", Req->argv[0] );
 611                 return CONNECTED;
 612         }
 613
 614         /* mit Versionsinfo antworten */
 615         return IRC_WriteStrClient( Client, RPL_VERSION_MSG, Client_ID( prefix ), PACKAGE, VERSION, NGIRCd_DebugLevel, Conf_ServerName, NGIRCd_VersionAddition( ));
 616 } /* IRC_VERSION */
 617
 618
 619 GLOBAL BOOLEAN
 620 IRC_KILL( CLIENT *Client, REQUEST *Req )
 621 {
 622         CLIENT *prefix, *c;
 623
 624         assert( Client != NULL );
 625         assert( Req != NULL );
 626
 627         if( Client_Type( Client ) != CLIENT_SERVER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 628
 629         /* Falsche Anzahl Parameter? */
 630         if(( Req->argc != 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 631
 632         prefix = Client_Search( Req->prefix );
 633         if( ! prefix )
 634         {
 635                 Log( LOG_WARNING, "Got KILL with invalid prefix: \"%s\"!", Req->prefix );
 636                 prefix = Client_ThisServer( );
 637         }
 638
 639         Log( LOG_NOTICE, "Got KILL command from \"%s\" for \"%s\": %s", Client_Mask( prefix ), Req->argv[0], Req->argv[1] );
 640
 641         /* andere Server benachrichtigen */
 642         IRC_WriteStrServersPrefix( Client, prefix, "KILL %s :%s", Req->argv[0], Req->argv[1] );
 643
 644         /* haben wir selber einen solchen Client? */
 645         c = Client_Search( Req->argv[0] );
 646         if( c && ( Client_Conn( c ) != NONE )) Conn_Close( Client_Conn( c ), NULL, Req->argv[1], TRUE );
 647
 648         return CONNECTED;
 649 } /* IRC_KILL */
 650
 651
 652 GLOBAL BOOLEAN
 653 IRC_Show_MOTD( CLIENT *Client )
 654 {
 655         BOOLEAN ok;
 656         CHAR line[127];
 657         FILE *fd;
 658
 659         assert( Client != NULL );
 660
 661         fd = fopen( Conf_MotdFile, "r" );
 662         if( ! fd )
 663         {
 664                 Log( LOG_WARNING, "Can't read MOTD file \"%s\": %s", Conf_MotdFile, strerror( errno ));
 665                 return IRC_WriteStrClient( Client, ERR_NOMOTD_MSG, Client_ID( Client ) );
 666         }
 667
 668         IRC_WriteStrClient( Client, RPL_MOTDSTART_MSG, Client_ID( Client ), Client_ID( Client_ThisServer( )));
 669         while( TRUE )
 670         {
 671                 if( ! fgets( line, 126, fd )) break;
 672                 if( line[strlen( line ) - 1] == '\n' ) line[strlen( line ) - 1] = '\0';
 673                 if( ! IRC_WriteStrClient( Client, RPL_MOTD_MSG, Client_ID( Client ), line ))
 674                 {
 675                         fclose( fd );
 676                         return FALSE;
 677                 }
 678         }
 679         ok = IRC_WriteStrClient( Client, RPL_ENDOFMOTD_MSG, Client_ID( Client ) );
 680
 681         fclose( fd );
 682
 683         return ok;
 684 } /* IRC_Show_MOTD */
 685
 686
 687 GLOBAL BOOLEAN
 688 IRC_Send_NAMES( CLIENT *Client, CHANNEL *Chan )
 689 {
 690         BOOLEAN is_visible, is_member;
 691         CHAR str[LINE_LEN + 1];
 692         CL2CHAN *cl2chan;
 693         CLIENT *cl;
 694
 695         assert( Client != NULL );
 696         assert( Chan != NULL );
 697
 698         if( Channel_IsMemberOf( Chan, Client )) is_member = TRUE;
 699         else is_member = FALSE;
 700
 701         /* Alle Mitglieder suchen */
 702         sprintf( str, RPL_NAMREPLY_MSG, Client_ID( Client ), "=", Channel_Name( Chan ));
 703         cl2chan = Channel_FirstMember( Chan );
 704         while( cl2chan )
 705         {
 706                 cl = Channel_GetClient( cl2chan );
 707
 708                 if( strchr( Client_Modes( cl ), 'i' )) is_visible = FALSE;
 709                 else is_visible = TRUE;
 710
 711                 if( is_member || is_visible )
 712                 {
 713                         /* Nick anhaengen */
 714                         if( str[strlen( str ) - 1] != ':' ) strcat( str, " " );
 715                         if( strchr( Channel_UserModes( Chan, cl ), 'o' )) strcat( str, "@" );
 716                         else if( strchr( Channel_UserModes( Chan, cl ), 'v' )) strcat( str, "+" );
 717                         strcat( str, Client_ID( cl ));
 718
 719                         if( strlen( str ) > ( LINE_LEN - CLIENT_NICK_LEN - 4 ))
 720                         {
 721                                 /* Zeile wird zu lang: senden! */
 722                                 if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
 723                                 sprintf( str, RPL_NAMREPLY_MSG, Client_ID( Client ), "=", Channel_Name( Chan ));
 724                         }
 725                 }
 726
 727                 /* naechstes Mitglied suchen */
 728                 cl2chan = Channel_NextMember( Chan, cl2chan );
 729         }
 730         if( str[strlen( str ) - 1] != ':')
 731         {
 732                 /* Es sind noch Daten da, die gesendet werden muessen */
 733                 if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
 734         }
 735
 736         return CONNECTED;
 737 } /* IRC_Send_NAMES */
 738
 739
 740 GLOBAL BOOLEAN
 741 IRC_Send_WHO( CLIENT *Client, CHANNEL *Chan, BOOLEAN OnlyOps )
 742 {
 743         BOOLEAN is_visible, is_member;
 744         CL2CHAN *cl2chan;
 745         CHAR flags[8];
 746         CLIENT *c;
 747
 748         assert( Client != NULL );
 749         assert( Chan != NULL );
 750
 751         if( Channel_IsMemberOf( Chan, Client )) is_member = TRUE;
 752         else is_member = FALSE;
 753
 754         /* Alle Mitglieder suchen */
 755         cl2chan = Channel_FirstMember( Chan );
 756         while( cl2chan )
 757         {
 758                 c = Channel_GetClient( cl2chan );
 759
 760                 if( strchr( Client_Modes( c ), 'i' )) is_visible = FALSE;
 761                 else is_visible = TRUE;
 762
 763                 if( is_member || is_visible )
 764                 {
 765                         /* Flags zusammenbasteln */
 766                         strcpy( flags, "H" );
 767                         if( strchr( Client_Modes( c ), 'o' )) strcat( flags, "*" );
 768                         if( strchr( Channel_UserModes( Chan, c ), 'o' )) strcat( flags, "@" );
 769                         else if( strchr( Channel_UserModes( Chan, c ), 'v' )) strcat( flags, "+" );
 770
 771                         /* ausgeben */
 772                         if(( ! OnlyOps ) || ( strchr( Client_Modes( c ), 'o' )))
 773                         {
 774                                 if( ! IRC_WriteStrClient( Client, RPL_WHOREPLY_MSG, Client_ID( Client ), Channel_Name( Chan ), Client_User( c ), Client_Hostname( c ), Client_ID( Client_Introducer( c )), Client_ID( c ), flags, Client_Hops( c ), Client_Info( c ))) return DISCONNECTED;
 775                         }
 776                 }
 777
 778                 /* naechstes Mitglied suchen */
 779                 cl2chan = Channel_NextMember( Chan, cl2chan );
 780         }
 781         return CONNECTED;
 782 } /* IRC_Send_WHO */
 783
 784
 785 GLOBAL BOOLEAN
 786 IRC_Send_LUSERS( CLIENT *Client )
 787 {
 788         INT cnt;
 789
 790         assert( Client != NULL );
 791
 792         /* Users, Services und Serevr im Netz */
 793         if( ! IRC_WriteStrClient( Client, RPL_LUSERCLIENT_MSG, Client_ID( Client ), Client_UserCount( ), Client_ServiceCount( ), Client_ServerCount( ))) return DISCONNECTED;
 794
 795         /* IRC-Operatoren im Netz */
 796         cnt = Client_OperCount( );
 797         if( cnt > 0 )
 798         {
 799                 if( ! IRC_WriteStrClient( Client, RPL_LUSEROP_MSG, Client_ID( Client ), cnt )) return DISCONNECTED;
 800         }
 801
 802         /* Unbekannt Verbindungen */
 803         cnt = Client_UnknownCount( );
 804         if( cnt > 0 )
 805         {
 806                 if( ! IRC_WriteStrClient( Client, RPL_LUSERUNKNOWN_MSG, Client_ID( Client ), cnt )) return DISCONNECTED;
 807         }
 808
 809         /* Channels im Netz */
 810         if( ! IRC_WriteStrClient( Client, RPL_LUSERCHANNELS_MSG, Client_ID( Client ), Channel_Count( ))) return DISCONNECTED;
 811
 812         /* Channels im Netz */
 813         if( ! IRC_WriteStrClient( Client, RPL_LUSERME_MSG, Client_ID( Client ), Client_MyUserCount( ), Client_MyServiceCount( ), Client_MyServerCount( ))) return DISCONNECTED;
 814
 815         return CONNECTED;
 816 } /* IRC_Send_LUSERS */
 817
 818
 819 /* -eof- */