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