src/ngircd/parse.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: parse.c,v 1.26 2002/02/27 18:23:46 alex Exp $
  13  *
  14  * parse.c: Parsen der Client-Anfragen
  15  *
  16  * $Log: parse.c,v $
  17  * Revision 1.26  2002/02/27 18:23:46  alex
  18  * - IRC-Befehl "AWAY" implementert.
  19  *
  20  * Revision 1.25  2002/02/26 20:52:15  alex
  21  * - Fehler bei Fehlermeldung wg. unbekanntem Prefix behoben.
  22  *
  23  * Revision 1.24  2002/02/23 21:39:48  alex
  24  * - IRC-Befehl KILL sowie Kills bei Nick Collsisions implementiert.
  25  *
  26  * Revision 1.23  2002/02/17 23:38:58  alex
  27  * - neuer IRC-Befehl VERSION implementiert: IRC_VERSION().
  28  *
  29  * Revision 1.22  2002/01/21 00:01:37  alex
  30  * - neue Befehle JOIN und PART.
  31  *
  32  * Revision 1.21  2002/01/18 11:12:11  alex
  33  * - der Sniffer wird nun nur noch aktiviert, wenn auf Kommandozeile angegeben.
  34  *
  35  * Revision 1.20  2002/01/11 23:50:55  alex
  36  * - LINKS implementiert, LUSERS begonnen.
  37  *
  38  * Revision 1.19  2002/01/09 01:08:42  alex
  39  * - Parses handhabt Leerzeichen zw. Parametern nun etwas "lockerer".
  40  *
  41  * Revision 1.18  2002/01/07 15:29:11  alex
  42  * - Status-Codes an den Server selber werden ignoriert, besseres Logging.
  43  *
  44  * Revision 1.17  2002/01/06 17:41:44  alex
  45  * - die Fehlermeldung "unbekannter Befehl" hatte ein falsches Format.
  46  *
  47  * Revision 1.16  2002/01/05 23:23:20  alex
  48  * - generisches Forwarding von Zahlen-Statuscodes implementiert.
  49  *
  50  * Revision 1.15  2002/01/05 01:42:08  alex
  51  * - an Server werden keine ERRORS mehr wegen unbekannter Befehle geschickt.
  52  *
  53  * Revision 1.14  2002/01/04 17:56:45  alex
  54  * - neuer Befehl SQUIT.
  55  *
  56  * Revision 1.13  2002/01/04 01:20:02  alex
  57  * - Client-Strukruren werden nur noch ueber Funktionen angesprochen.
  58  *
  59  * Revision 1.12  2002/01/03 02:24:49  alex
  60  * - neue Befehle NJOIN und SERVER begonnen.
  61  *
  62  * Revision 1.11  2002/01/02 02:43:22  alex
  63  * - Copyright-Texte aktualisiert.
  64  * - neuer Befehl ERROR.
  65  *
  66  * Revision 1.10  2001/12/31 15:33:13  alex
  67  * - neuer Befehl NAMES, kleinere Bugfixes.
  68  * - Bug bei PING behoben: war zu restriktiv implementiert :-)
  69  *
  70  * Revision 1.9  2001/12/31 02:18:51  alex
  71  * - viele neue Befehle (WHOIS, ISON, OPER, DIE, RESTART),
  72  * - neuen Header "defines.h" mit (fast) allen Konstanten.
  73  * - Code Cleanups und viele "kleine" Aenderungen & Bugfixes.
  74  *
  75  * Revision 1.8  2001/12/29 03:08:19  alex
  76  * - Fuehrende und folgende Leerzeichen etc. in Requests werden geloescht.
  77  * - Logmeldungen (mal wieder) ein wenig angepasst.
  78  *
  79  * Revision 1.7  2001/12/27 19:13:21  alex
  80  * - neue Befehle NOTICE und PRIVMSG.
  81  * - Debug-Logging ein wenig reduziert.
  82  *
  83  * Revision 1.6  2001/12/26 14:45:37  alex
  84  * - "Code Cleanups".
  85  *
  86  * Revision 1.5  2001/12/26 03:23:03  alex
  87  * - PING/PONG-Befehle implementiert.
  88  *
  89  * Revision 1.4  2001/12/25 22:04:26  alex
  90  * - Aenderungen an den Debug- und Logging-Funktionen.
  91  *
  92  * Revision 1.3  2001/12/25 19:18:36  alex
  93  * - Gross- und Kleinschreibung der IRC-Befehle wird ignoriert.
  94  * - bessere Debug-Ausgaben.
  95  *
  96  * Revision 1.2  2001/12/23 21:56:47  alex
  97  * - bessere Debug-Ausgaben,
  98  * - Bug im Parameter-Parser behoben (bei "langem" Parameter)
  99  * - erste IRC-Befehle werden erkannt :-)
 100  *
 101  * Revision 1.1  2001/12/21 23:53:16  alex
 102  * - Modul zum Parsen von Client-Requests begonnen.
 103  */
 104
 105
 106 #include <portab.h>
 107 #include "global.h"
 108
 109 #include <imp.h>
 110 #include <assert.h>
 111 #include <stdlib.h>
 112 #include <stdio.h>
 113 #include <string.h>
 114
 115 #include "ngircd.h"
 116 #include "client.h"
 117 #include "conn.h"
 118 #include "irc.h"
 119 #include "log.h"
 120 #include "messages.h"
 121 #include "tool.h"
 122
 123 #include <exp.h>
 124 #include "parse.h"
 125
 126
 127 LOCAL VOID Init_Request( REQUEST *Req );
 128
 129 LOCAL BOOLEAN Parse_Error( CONN_ID Idx, CHAR *Error );
 130
 131 LOCAL BOOLEAN Validate_Prefix( REQUEST *Req );
 132 LOCAL BOOLEAN Validate_Command( REQUEST *Req );
 133 LOCAL BOOLEAN Validate_Args( REQUEST *Req );
 134
 135 LOCAL BOOLEAN Handle_Request( CONN_ID Idx, REQUEST *Req );
 136
 137
 138 GLOBAL VOID Parse_Init( VOID )
 139 {
 140 } /* Parse_Init */
 141
 142
 143 GLOBAL VOID Parse_Exit( VOID )
 144 {
 145 } /* Parse_Exit */
 146
 147
 148 GLOBAL BOOLEAN Parse_Request( CONN_ID Idx, CHAR *Request )
 149 {
 150         /* Client-Request parsen. Bei einem schwerwiegenden Fehler wird
 151          * die Verbindung geschlossen und FALSE geliefert.
 152          * Der Aufbau gueltiger Requests ist in RFC 2812, 2.3 definiert. */
 153
 154         REQUEST req;
 155         CHAR *start, *ptr;
 156
 157         assert( Idx >= 0 );
 158         assert( Request != NULL );
 159
 160 #ifdef SNIFFER
 161         if( NGIRCd_Sniffer ) Log( LOG_DEBUG, " <- connection %d: '%s'.", Idx, Request );
 162 #endif
 163
 164         Init_Request( &req );
 165
 166         /* Fuehrendes und folgendes "Geraffel" verwerfen */
 167         ngt_TrimStr( Request );
 168
 169         /* gibt es ein Prefix? */
 170         if( Request[0] == ':' )
 171         {
 172                 /* Prefix vorhanden */
 173                 req.prefix = Request + 1;
 174                 ptr = strchr( Request, ' ' );
 175                 if( ! ptr ) return Parse_Error( Idx, "Prefix without command!?" );
 176                 *ptr = '\0';
 177 #ifndef STRICT_RFC
 178                 /* multiple Leerzeichen als Trenner zwischen
 179                  * Prefix und Befehl ignorieren */
 180                 while( *(ptr + 1) == ' ' ) ptr++;
 181 #endif
 182                 start = ptr + 1;
 183         }
 184         else start = Request;
 185
 186         if( ! Validate_Prefix( &req )) return Parse_Error( Idx, "Invalid prefix");
 187
 188         /* Befehl */
 189         ptr = strchr( start, ' ' );
 190         if( ptr )
 191         {
 192                 *ptr = '\0';
 193 #ifndef STRICT_RFC
 194                 /* multiple Leerzeichen als Trenner vor
 195                 *Parametertrennern ignorieren */
 196                 while( *(ptr + 1) == ' ' ) ptr++;
 197 #endif
 198         }
 199         req.command = start;
 200
 201         if( ! Validate_Command( &req )) return Parse_Error( Idx, "Invalid command" );
 202
 203         /* Argumente, Parameter */
 204         if( ptr )
 205         {
 206                 /* Prinzipiell gibt es welche :-) */
 207                 start = ptr + 1;
 208                 while( start )
 209                 {
 210                         /* Parameter-String "zerlegen" */
 211                         if( start[0] == ':' )
 212                         {
 213                                 req.argv[req.argc] = start + 1;
 214                                 ptr = NULL;
 215                         }
 216                         else
 217                         {
 218                                 req.argv[req.argc] = start;
 219                                 ptr = strchr( start, ' ' );
 220                                 if( ptr )
 221                                 {
 222                                         *ptr = '\0';
 223 #ifndef STRICT_RFC
 224                                         /* multiple Leerzeichen als
 225                                          * Parametertrenner ignorieren */
 226                                         while( *(ptr + 1) == ' ' ) ptr++;
 227 #endif
 228                                 }
 229                         }
 230
 231                         req.argc++;
 232
 233                         if( start[0] == ':' ) break;
 234                         if( req.argc > 14 ) break;
 235
 236                         if( ptr ) start = ptr + 1;
 237                         else start = NULL;
 238                 }
 239         }
 240
 241         if( ! Validate_Args( &req )) return Parse_Error( Idx, "Invalid argument(s)" );
 242
 243         return Handle_Request( Idx, &req );
 244 } /* Parse_Request */
 245
 246
 247 LOCAL VOID Init_Request( REQUEST *Req )
 248 {
 249         /* Neue Request-Struktur initialisieren */
 250
 251         INT i;
 252
 253         assert( Req != NULL );
 254
 255         Req->prefix = NULL;
 256         Req->command = NULL;
 257         for( i = 0; i < 15; Req->argv[i++] = NULL );
 258         Req->argc = 0;
 259 } /* Init_Request */
 260
 261
 262 LOCAL BOOLEAN Parse_Error( CONN_ID Idx, CHAR *Error )
 263 {
 264         /* Fehler beim Parsen. Fehlermeldung an den Client schicken.
 265          * TRUE: Connection wurde durch diese Funktion nicht geschlossen,
 266          * FALSE: Connection wurde terminiert. */
 267
 268         assert( Idx >= 0 );
 269         assert( Error != NULL );
 270
 271         Log( LOG_DEBUG, "Connection %d: Parse error: %s", Idx, Error );
 272         return Conn_WriteStr( Idx, "ERROR :Parse error: %s", Error );
 273 } /* Parse_Error */
 274
 275
 276 LOCAL BOOLEAN Validate_Prefix( REQUEST *Req )
 277 {
 278         assert( Req != NULL );
 279         return TRUE;
 280 } /* Validate_Prefix */
 281
 282
 283 LOCAL BOOLEAN Validate_Command( REQUEST *Req )
 284 {
 285         assert( Req != NULL );
 286         return TRUE;
 287 } /* Validate_Comman */
 288
 289
 290 LOCAL BOOLEAN Validate_Args( REQUEST *Req )
 291 {
 292         assert( Req != NULL );
 293         return TRUE;
 294 } /* Validate_Args */
 295
 296
 297 LOCAL BOOLEAN Handle_Request( CONN_ID Idx, REQUEST *Req )
 298 {
 299         /* Client-Request verarbeiten. Bei einem schwerwiegenden Fehler
 300          * wird die Verbindung geschlossen und FALSE geliefert. */
 301
 302         CLIENT *client, *target, *prefix;
 303         CHAR str[LINE_LEN];
 304         INT i;
 305
 306         assert( Idx >= 0 );
 307         assert( Req != NULL );
 308         assert( Req->command != NULL );
 309
 310         client = Client_GetFromConn( Idx );
 311         assert( client != NULL );
 312
 313         /* Statuscode, der geforwarded werden muss? */
 314         if(( strlen( Req->command ) == 3 ) && ( atoi( Req->command ) > 100 ))
 315         {
 316                 /* Befehl ist ein Statuscode */
 317
 318                 /* Zielserver ermitteln */
 319                 if(( Client_Type( client ) == CLIENT_SERVER ) && ( Req->argc > 0 )) target = Client_GetFromID( Req->argv[0] );
 320                 else target = NULL;
 321                 if( ! target )
 322                 {
 323                         if( Req->argc > 0 ) Log( LOG_WARNING, "Unknown target for status code: \"%s\"", Req->argv[0] );
 324                         else Log( LOG_WARNING, "Unknown target for status code!" );
 325                         return TRUE;
 326                 }
 327                 if( target == Client_ThisServer( ))
 328                 {
 329                         Log( LOG_DEBUG, "Ignored status code %s from \"%s\".", Req->command, Client_ID( client ));
 330                         return TRUE;
 331                 }
 332
 333                 /* Quell-Client ermitteln */
 334                 if( ! Req->prefix[0] )
 335                 {
 336                         Log( LOG_WARNING, "Got status code without prefix!?" );
 337                         return TRUE;
 338                 }
 339                 else prefix = Client_GetFromID( Req->prefix );
 340                 if( ! prefix )
 341                 {
 342                         Log( LOG_WARNING, "Got status code from unknown source: \"%s\"", Req->prefix );
 343                         return TRUE;
 344                 }
 345
 346                 /* Statuscode weiterleiten */
 347                 strcpy( str, Req->command );
 348                 for( i = 0; i < Req->argc; i++ )
 349                 {
 350                         if( i < Req->argc - 1 ) strcat( str, " " );
 351                         else strcat( str, " :" );
 352                         strcat( str, Req->argv[i] );
 353                 }
 354                 return IRC_WriteStrClientPrefix( target, prefix, str );
 355         }
 356
 357         if( strcasecmp( Req->command, "PASS" ) == 0 ) return IRC_PASS( client, Req );
 358         else if( strcasecmp( Req->command, "NICK" ) == 0 ) return IRC_NICK( client, Req );
 359         else if( strcasecmp( Req->command, "USER" ) == 0 ) return IRC_USER( client, Req );
 360         else if( strcasecmp( Req->command, "SERVER" ) == 0 ) return IRC_SERVER( client, Req );
 361         else if( strcasecmp( Req->command, "NJOIN" ) == 0 ) return IRC_NJOIN( client, Req );
 362         else if( strcasecmp( Req->command, "QUIT" ) == 0 ) return IRC_QUIT( client, Req );
 363         else if( strcasecmp( Req->command, "SQUIT" ) == 0 ) return IRC_SQUIT( client, Req );
 364         else if( strcasecmp( Req->command, "PING" ) == 0 ) return IRC_PING( client, Req );
 365         else if( strcasecmp( Req->command, "PONG" ) == 0 ) return IRC_PONG( client, Req );
 366         else if( strcasecmp( Req->command, "MOTD" ) == 0 ) return IRC_MOTD( client, Req );
 367         else if( strcasecmp( Req->command, "PRIVMSG" ) == 0 ) return IRC_PRIVMSG( client, Req );
 368         else if( strcasecmp( Req->command, "NOTICE" ) == 0 ) return IRC_NOTICE( client, Req );
 369         else if( strcasecmp( Req->command, "MODE" ) == 0 ) return IRC_MODE( client, Req );
 370         else if( strcasecmp( Req->command, "NAMES" ) == 0 ) return IRC_NAMES( client, Req );
 371         else if( strcasecmp( Req->command, "ISON" ) == 0 ) return IRC_ISON( client, Req );
 372         else if( strcasecmp( Req->command, "WHOIS" ) == 0 ) return IRC_WHOIS( client, Req );
 373         else if( strcasecmp( Req->command, "USERHOST" ) == 0 ) return IRC_USERHOST( client, Req );
 374         else if( strcasecmp( Req->command, "OPER" ) == 0 ) return IRC_OPER( client, Req );
 375         else if( strcasecmp( Req->command, "DIE" ) == 0 ) return IRC_DIE( client, Req );
 376         else if( strcasecmp( Req->command, "RESTART" ) == 0 ) return IRC_RESTART( client, Req );
 377         else if( strcasecmp( Req->command, "ERROR" ) == 0 ) return IRC_ERROR( client, Req );
 378         else if( strcasecmp( Req->command, "LUSERS" ) == 0 ) return IRC_LUSERS( client, Req );
 379         else if( strcasecmp( Req->command, "LINKS" ) == 0 ) return IRC_LINKS( client, Req );
 380         else if( strcasecmp( Req->command, "JOIN" ) == 0 ) return IRC_JOIN( client, Req );
 381         else if( strcasecmp( Req->command, "PART" ) == 0 ) return IRC_PART( client, Req );
 382         else if( strcasecmp( Req->command, "VERSION" ) == 0 ) return IRC_VERSION( client, Req );
 383         else if( strcasecmp( Req->command, "KILL" ) == 0 ) return IRC_KILL( client, Req );
 384         else if( strcasecmp( Req->command, "AWAY" ) == 0 ) return IRC_AWAY( client, Req );
 385
 386         /* Unbekannter Befehl */
 387         if( Client_Type( client ) != CLIENT_SERVER ) IRC_WriteStrClient( client, ERR_UNKNOWNCOMMAND_MSG, Client_ID( client ), Req->command );
 388         Log( LOG_DEBUG, "Connection %d: Unknown command \"%s\", %d %s,%s prefix.", Client_Conn( client ), Req->command, Req->argc, Req->argc == 1 ? "parameter" : "parameters", Req->prefix ? "" : " no" );
 389
 390         return TRUE;
 391 } /* Handle_Request */
 392
 393
 394 /* -eof- */