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.100 2002/11/22 23:31:56 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 CONNECTED;
 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 ) && ( Client_Type( to ) == CLIENT_USER ))
 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, "%s", 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, "%s", 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, "%s", 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, "%s", 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, "%s", 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_WHOWAS( CLIENT *Client, REQUEST *Req )
 366 {
 367         assert( Client != NULL );
 368         assert( Req != NULL );
 369
 370         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 371
 372         /* Falsche Anzahl Parameter? */
 373         if(( Req->argc < 1 ) || ( Req->argc > 3 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 374
 375         /* ... */
 376
 377         return CONNECTED;
 378 } /* IRC_WHOWAS */
 379
 380
 381 GLOBAL BOOLEAN
 382 IRC_WHO( CLIENT *Client, REQUEST *Req )
 383 {
 384         BOOLEAN ok, only_ops;
 385         CHAR flags[8], *ptr;
 386         CL2CHAN *cl2chan;
 387         CHANNEL *chan;
 388         CLIENT *c;
 389
 390         assert( Client != NULL );
 391         assert( Req != NULL );
 392
 393         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 394
 395         /* Falsche Anzahl Parameter? */
 396         if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 397
 398         only_ops = FALSE;
 399         chan = NULL;
 400
 401         if( Req->argc == 2 )
 402         {
 403                 /* Nur OPs anzeigen? */
 404                 if( strcmp( Req->argv[1], "o" ) == 0 ) only_ops = TRUE;
 405 #ifdef STRICT_RFC
 406                 else return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 407 #endif
 408         }
 409
 410         if( Req->argc >= 1 )
 411         {
 412                 /* wurde ein Channel oder Nick-Mask angegeben? */
 413                 chan = Channel_Search( Req->argv[0] );
 414         }
 415
 416         if( chan )
 417         {
 418                 /* User eines Channels ausgeben */
 419                 if( ! IRC_Send_WHO( Client, chan, only_ops )) return DISCONNECTED;
 420         }
 421
 422         c = Client_First( );
 423         while( c )
 424         {
 425                 if(( Client_Type( c ) == CLIENT_USER ) && ( ! strchr( Client_Modes( c ), 'i' )))
 426                 {
 427                         ok = FALSE;
 428                         if( Req->argc == 0 ) ok = TRUE;
 429                         else
 430                         {
 431                                 if( strcasecmp( Req->argv[0], Client_ID( c )) == 0 ) ok = TRUE;
 432                                 else if( strcmp( Req->argv[0], "0" ) == 0 ) ok = TRUE;
 433                         }
 434
 435                         if( ok && (( ! only_ops ) || ( strchr( Client_Modes( c ), 'o' ))))
 436                         {
 437                                 /* Flags zusammenbasteln */
 438                                 strcpy( flags, "H" );
 439                                 if( strchr( Client_Modes( c ), 'o' )) strcat( flags, "*" );
 440
 441                                 /* ausgeben */
 442                                 cl2chan = Channel_FirstChannelOf( c );
 443                                 if( cl2chan ) ptr = Channel_Name( Channel_GetChannel( cl2chan ));
 444                                 else ptr = "*";
 445                                 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;
 446                         }
 447                 }
 448
 449                 /* naechster Client */
 450                 c = Client_Next( c );
 451         }
 452
 453         if( chan ) return IRC_WriteStrClient( Client, RPL_ENDOFWHO_MSG, Client_ID( Client ), Channel_Name( chan ));
 454         else if( Req->argc == 0 ) return IRC_WriteStrClient( Client, RPL_ENDOFWHO_MSG, Client_ID( Client ), "*" );
 455         else return IRC_WriteStrClient( Client, RPL_ENDOFWHO_MSG, Client_ID( Client ), Req->argv[0] );
 456 } /* IRC_WHO */
 457
 458
 459 GLOBAL BOOLEAN
 460 IRC_USERHOST( CLIENT *Client, REQUEST *Req )
 461 {
 462         CHAR rpl[COMMAND_LEN];
 463         CLIENT *c;
 464         INT max, i;
 465
 466         assert( Client != NULL );
 467         assert( Req != NULL );
 468
 469         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 470
 471         /* Falsche Anzahl Parameter? */
 472         if(( Req->argc < 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 473
 474         if( Req->argc > 5 ) max = 5;
 475         else max = Req->argc;
 476
 477         strcpy( rpl, RPL_USERHOST_MSG );
 478         for( i = 0; i < max; i++ )
 479         {
 480                 c = Client_Search( Req->argv[i] );
 481                 if( c && ( Client_Type( c ) == CLIENT_USER ))
 482                 {
 483                         /* Dieser Nick ist "online" */
 484                         strcat( rpl, Client_ID( c ));
 485                         if( Client_HasMode( c, 'o' )) strcat( rpl, "*" );
 486                         strcat( rpl, "=" );
 487                         if( Client_HasMode( c, 'a' )) strcat( rpl, "-" );
 488                         else strcat( rpl, "+" );
 489                         strcat( rpl, Client_User( c ));
 490                         strcat( rpl, "@" );
 491                         strcat( rpl, Client_Hostname( c ));
 492                         strcat( rpl, " " );
 493                 }
 494         }
 495         if( rpl[strlen( rpl ) - 1] == ' ' ) rpl[strlen( rpl ) - 1] = '\0';
 496
 497         return IRC_WriteStrClient( Client, "%s", rpl, Client_ID( Client ) );
 498 } /* IRC_USERHOST */
 499
 500
 501 GLOBAL BOOLEAN
 502 IRC_ERROR( CLIENT *Client, REQUEST *Req )
 503 {
 504         assert( Client != NULL );
 505         assert( Req != NULL );
 506
 507         if( Req->argc < 1 ) Log( LOG_NOTICE, "Got ERROR from \"%s\"!", Client_Mask( Client ));
 508         else Log( LOG_NOTICE, "Got ERROR from \"%s\": %s!", Client_Mask( Client ), Req->argv[0] );
 509
 510         return CONNECTED;
 511 } /* IRC_ERROR */
 512
 513
 514 GLOBAL BOOLEAN
 515 IRC_LUSERS( CLIENT *Client, REQUEST *Req )
 516 {
 517         CLIENT *target, *from;
 518
 519         assert( Client != NULL );
 520         assert( Req != NULL );
 521
 522         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 523
 524         /* Falsche Anzahl Parameter? */
 525         if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 526
 527         /* Absender ermitteln */
 528         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
 529         else from = Client;
 530         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
 531
 532         /* An anderen Server forwarden? */
 533         if( Req->argc == 2 )
 534         {
 535                 target = Client_Search( Req->argv[1] );
 536                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
 537                 else if( target != Client_ThisServer( )) return IRC_WriteStrClientPrefix( target, from, "LUSERS %s %s", Req->argv[0], Req->argv[1] );
 538         }
 539
 540         /* Wer ist der Absender? */
 541         if( Client_Type( Client ) == CLIENT_SERVER ) target = Client_Search( Req->prefix );
 542         else target = Client;
 543         if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
 544
 545         IRC_Send_LUSERS( target );
 546
 547         return CONNECTED;
 548 } /* IRC_LUSERS */
 549
 550
 551 GLOBAL BOOLEAN
 552 IRC_LINKS( CLIENT *Client, REQUEST *Req )
 553 {
 554         CLIENT *target, *from, *c;
 555         CHAR *mask;
 556
 557         assert( Client != NULL );
 558         assert( Req != NULL );
 559
 560         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 561
 562         /* Falsche Anzahl Parameter? */
 563         if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 564
 565         /* Server-Mask ermitteln */
 566         if( Req->argc > 0 ) mask = Req->argv[Req->argc - 1];
 567         else mask = "*";
 568
 569         /* Absender ermitteln */
 570         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
 571         else from = Client;
 572         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
 573
 574         /* An anderen Server forwarden? */
 575         if( Req->argc == 2 )
 576         {
 577                 target = Client_Search( Req->argv[0] );
 578                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[0] );
 579                 else if( target != Client_ThisServer( )) return IRC_WriteStrClientPrefix( target, from, "LINKS %s %s", Req->argv[0], Req->argv[1] );
 580         }
 581
 582         /* Wer ist der Absender? */
 583         if( Client_Type( Client ) == CLIENT_SERVER ) target = Client_Search( Req->prefix );
 584         else target = Client;
 585         if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
 586
 587         c = Client_First( );
 588         while( c )
 589         {
 590                 if( Client_Type( c ) == CLIENT_SERVER )
 591                 {
 592                         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;
 593                 }
 594                 c = Client_Next( c );
 595         }
 596
 597         return IRC_WriteStrClient( target, RPL_ENDOFLINKS_MSG, Client_ID( target ), mask );
 598 } /* IRC_LINKS */
 599
 600
 601 GLOBAL BOOLEAN
 602 IRC_VERSION( CLIENT *Client, REQUEST *Req )
 603 {
 604         CLIENT *target, *prefix;
 605
 606         assert( Client != NULL );
 607         assert( Req != NULL );
 608
 609         /* Falsche Anzahl Parameter? */
 610         if(( Req->argc > 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 611
 612         /* Ziel suchen */
 613         if( Req->argc == 1 ) target = Client_Search( Req->argv[0] );
 614         else target = Client_ThisServer( );
 615
 616         /* Prefix ermitteln */
 617         if( Client_Type( Client ) == CLIENT_SERVER ) prefix = Client_Search( Req->prefix );
 618         else prefix = Client;
 619         if( ! prefix ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
 620
 621         /* An anderen Server weiterleiten? */
 622         if( target != Client_ThisServer( ))
 623         {
 624                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[0] );
 625
 626                 /* forwarden */
 627                 IRC_WriteStrClientPrefix( target, prefix, "VERSION %s", Req->argv[0] );
 628                 return CONNECTED;
 629         }
 630
 631         /* mit Versionsinfo antworten */
 632         return IRC_WriteStrClient( Client, RPL_VERSION_MSG, Client_ID( prefix ), PACKAGE, VERSION, NGIRCd_DebugLevel, Conf_ServerName, NGIRCd_VersionAddition( ));
 633 } /* IRC_VERSION */
 634
 635
 636 GLOBAL BOOLEAN
 637 IRC_KILL( CLIENT *Client, REQUEST *Req )
 638 {
 639         CLIENT *prefix, *c;
 640
 641         assert( Client != NULL );
 642         assert( Req != NULL );
 643
 644         if( Client_Type( Client ) != CLIENT_SERVER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 645
 646         /* Falsche Anzahl Parameter? */
 647         if(( Req->argc != 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 648
 649         prefix = Client_Search( Req->prefix );
 650         if( ! prefix )
 651         {
 652                 Log( LOG_WARNING, "Got KILL with invalid prefix: \"%s\"!", Req->prefix );
 653                 prefix = Client_ThisServer( );
 654         }
 655
 656         Log( LOG_NOTICE, "Got KILL command from \"%s\" for \"%s\": %s", Client_Mask( prefix ), Req->argv[0], Req->argv[1] );
 657
 658         /* andere Server benachrichtigen */
 659         IRC_WriteStrServersPrefix( Client, prefix, "KILL %s :%s", Req->argv[0], Req->argv[1] );
 660
 661         /* haben wir selber einen solchen Client? */
 662         c = Client_Search( Req->argv[0] );
 663         if( c )
 664         {
 665                 /* Ja, wir haben einen solchen Client */
 666                 if( Client_Conn( c ) != NONE ) Conn_Close( Client_Conn( c ), NULL, Req->argv[1], TRUE );
 667                 else Client_Destroy( c, NULL, Req->argv[1], TRUE );
 668         }
 669         else Log( LOG_NOTICE, "Client with nick \"%s\" is unknown here.", Req->argv[0] );
 670
 671         return CONNECTED;
 672 } /* IRC_KILL */
 673
 674
 675 GLOBAL BOOLEAN
 676 IRC_ADMIN(CLIENT *Client, REQUEST *Req )
 677 {
 678         CLIENT *target, *prefix;
 679
 680         assert( Client != NULL );
 681         assert( Req != NULL );
 682
 683         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
 684
 685         /* Falsche Anzahl Parameter? */
 686         if(( Req->argc > 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 687
 688         /* Ziel suchen */
 689         if( Req->argc == 1 ) target = Client_Search( Req->argv[0] );
 690         else target = Client_ThisServer( );
 691
 692         /* Prefix ermitteln */
 693         if( Client_Type( Client ) == CLIENT_SERVER ) prefix = Client_Search( Req->prefix );
 694         else prefix = Client;
 695         if( ! prefix ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
 696
 697         /* An anderen Server weiterleiten? */
 698         if( target != Client_ThisServer( ))
 699         {
 700                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[0] );
 701
 702                 /* forwarden */
 703                 IRC_WriteStrClientPrefix( target, prefix, "ADMIN %s", Req->argv[0] );
 704                 return CONNECTED;
 705         }
 706
 707         /* mit Versionsinfo antworten */
 708         if( ! IRC_WriteStrClient( Client, RPL_ADMINME_MSG, Client_ID( prefix ), Conf_ServerName )) return DISCONNECTED;
 709         if( ! IRC_WriteStrClient( Client, RPL_ADMINLOC1_MSG, Client_ID( prefix ), Conf_ServerAdmin1 )) return DISCONNECTED;
 710         if( ! IRC_WriteStrClient( Client, RPL_ADMINLOC2_MSG, Client_ID( prefix ), Conf_ServerAdmin2 )) return DISCONNECTED;
 711         if( ! IRC_WriteStrClient( Client, RPL_ADMINEMAIL_MSG, Client_ID( prefix ), Conf_ServerAdminMail )) return DISCONNECTED;
 712
 713         return CONNECTED;
 714 } /* IRC_ADMIN */
 715
 716
 717
 718 GLOBAL BOOLEAN
 719 IRC_Show_MOTD( CLIENT *Client )
 720 {
 721         BOOLEAN ok;
 722         CHAR line[127];
 723         FILE *fd;
 724
 725         assert( Client != NULL );
 726
 727         fd = fopen( Conf_MotdFile, "r" );
 728         if( ! fd )
 729         {
 730                 Log( LOG_WARNING, "Can't read MOTD file \"%s\": %s", Conf_MotdFile, strerror( errno ));
 731                 return IRC_WriteStrClient( Client, ERR_NOMOTD_MSG, Client_ID( Client ) );
 732         }
 733
 734         IRC_WriteStrClient( Client, RPL_MOTDSTART_MSG, Client_ID( Client ), Client_ID( Client_ThisServer( )));
 735         while( TRUE )
 736         {
 737                 if( ! fgets( line, 126, fd )) break;
 738                 if( line[strlen( line ) - 1] == '\n' ) line[strlen( line ) - 1] = '\0';
 739                 if( ! IRC_WriteStrClient( Client, RPL_MOTD_MSG, Client_ID( Client ), line ))
 740                 {
 741                         fclose( fd );
 742                         return FALSE;
 743                 }
 744         }
 745         ok = IRC_WriteStrClient( Client, RPL_ENDOFMOTD_MSG, Client_ID( Client ) );
 746
 747         fclose( fd );
 748
 749         return ok;
 750 } /* IRC_Show_MOTD */
 751
 752
 753 GLOBAL BOOLEAN
 754 IRC_Send_NAMES( CLIENT *Client, CHANNEL *Chan )
 755 {
 756         BOOLEAN is_visible, is_member;
 757         CHAR str[LINE_LEN + 1];
 758         CL2CHAN *cl2chan;
 759         CLIENT *cl;
 760
 761         assert( Client != NULL );
 762         assert( Chan != NULL );
 763
 764         if( Channel_IsMemberOf( Chan, Client )) is_member = TRUE;
 765         else is_member = FALSE;
 766
 767         /* Alle Mitglieder suchen */
 768         sprintf( str, RPL_NAMREPLY_MSG, Client_ID( Client ), "=", Channel_Name( Chan ));
 769         cl2chan = Channel_FirstMember( Chan );
 770         while( cl2chan )
 771         {
 772                 cl = Channel_GetClient( cl2chan );
 773
 774                 if( strchr( Client_Modes( cl ), 'i' )) is_visible = FALSE;
 775                 else is_visible = TRUE;
 776
 777                 if( is_member || is_visible )
 778                 {
 779                         /* Nick anhaengen */
 780                         if( str[strlen( str ) - 1] != ':' ) strcat( str, " " );
 781                         if( strchr( Channel_UserModes( Chan, cl ), 'o' )) strcat( str, "@" );
 782                         else if( strchr( Channel_UserModes( Chan, cl ), 'v' )) strcat( str, "+" );
 783                         strcat( str, Client_ID( cl ));
 784
 785                         if( strlen( str ) > ( LINE_LEN - CLIENT_NICK_LEN - 4 ))
 786                         {
 787                                 /* Zeile wird zu lang: senden! */
 788                                 if( ! IRC_WriteStrClient( Client, "%s", str )) return DISCONNECTED;
 789                                 sprintf( str, RPL_NAMREPLY_MSG, Client_ID( Client ), "=", Channel_Name( Chan ));
 790                         }
 791                 }
 792
 793                 /* naechstes Mitglied suchen */
 794                 cl2chan = Channel_NextMember( Chan, cl2chan );
 795         }
 796         if( str[strlen( str ) - 1] != ':')
 797         {
 798                 /* Es sind noch Daten da, die gesendet werden muessen */
 799                 if( ! IRC_WriteStrClient( Client, "%s", str )) return DISCONNECTED;
 800         }
 801
 802         return CONNECTED;
 803 } /* IRC_Send_NAMES */
 804
 805
 806 GLOBAL BOOLEAN
 807 IRC_Send_WHO( CLIENT *Client, CHANNEL *Chan, BOOLEAN OnlyOps )
 808 {
 809         BOOLEAN is_visible, is_member;
 810         CL2CHAN *cl2chan;
 811         CHAR flags[8];
 812         CLIENT *c;
 813
 814         assert( Client != NULL );
 815         assert( Chan != NULL );
 816
 817         if( Channel_IsMemberOf( Chan, Client )) is_member = TRUE;
 818         else is_member = FALSE;
 819
 820         /* Alle Mitglieder suchen */
 821         cl2chan = Channel_FirstMember( Chan );
 822         while( cl2chan )
 823         {
 824                 c = Channel_GetClient( cl2chan );
 825
 826                 if( strchr( Client_Modes( c ), 'i' )) is_visible = FALSE;
 827                 else is_visible = TRUE;
 828
 829                 if( is_member || is_visible )
 830                 {
 831                         /* Flags zusammenbasteln */
 832                         strcpy( flags, "H" );
 833                         if( strchr( Client_Modes( c ), 'o' )) strcat( flags, "*" );
 834                         if( strchr( Channel_UserModes( Chan, c ), 'o' )) strcat( flags, "@" );
 835                         else if( strchr( Channel_UserModes( Chan, c ), 'v' )) strcat( flags, "+" );
 836
 837                         /* ausgeben */
 838                         if(( ! OnlyOps ) || ( strchr( Client_Modes( c ), 'o' )))
 839                         {
 840                                 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;
 841                         }
 842                 }
 843
 844                 /* naechstes Mitglied suchen */
 845                 cl2chan = Channel_NextMember( Chan, cl2chan );
 846         }
 847         return CONNECTED;
 848 } /* IRC_Send_WHO */
 849
 850
 851 GLOBAL BOOLEAN
 852 IRC_Send_LUSERS( CLIENT *Client )
 853 {
 854         LONG cnt;
 855
 856         assert( Client != NULL );
 857
 858         /* Users, Services und Serevr im Netz */
 859         if( ! IRC_WriteStrClient( Client, RPL_LUSERCLIENT_MSG, Client_ID( Client ), Client_UserCount( ), Client_ServiceCount( ), Client_ServerCount( ))) return DISCONNECTED;
 860
 861         /* IRC-Operatoren im Netz */
 862         cnt = Client_OperCount( );
 863         if( cnt > 0 )
 864         {
 865                 if( ! IRC_WriteStrClient( Client, RPL_LUSEROP_MSG, Client_ID( Client ), cnt )) return DISCONNECTED;
 866         }
 867
 868         /* Unbekannt Verbindungen */
 869         cnt = Client_UnknownCount( );
 870         if( cnt > 0 )
 871         {
 872                 if( ! IRC_WriteStrClient( Client, RPL_LUSERUNKNOWN_MSG, Client_ID( Client ), cnt )) return DISCONNECTED;
 873         }
 874
 875         /* Channels im Netz */
 876         if( ! IRC_WriteStrClient( Client, RPL_LUSERCHANNELS_MSG, Client_ID( Client ), Channel_Count( ))) return DISCONNECTED;
 877
 878         /* Channels im Netz */
 879         if( ! IRC_WriteStrClient( Client, RPL_LUSERME_MSG, Client_ID( Client ), Client_MyUserCount( ), Client_MyServiceCount( ), Client_MyServerCount( ))) return DISCONNECTED;
 880
 881         return CONNECTED;
 882 } /* IRC_Send_LUSERS */
 883
 884
 885 /* -eof- */