]> arthur.barton.de Git - ngircd-alex.git/blob - src/ngircd/conn.c
- neue Defines fuer max. Anzahl Server und Operatoren.
[ngircd-alex.git] / src / ngircd / conn.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: conn.c,v 1.25 2002/01/02 02:44:36 alex Exp $
13  *
14  * connect.h: Verwaltung aller Netz-Verbindungen ("connections")
15  *
16  * $Log: conn.c,v $
17  * Revision 1.25  2002/01/02 02:44:36  alex
18  * - neue Defines fuer max. Anzahl Server und Operatoren.
19  *
20  * Revision 1.24  2002/01/01 18:25:44  alex
21  * - #include's fuer stdlib.h ergaenzt.
22  *
23  * Revision 1.23  2001/12/31 02:18:51  alex
24  * - viele neue Befehle (WHOIS, ISON, OPER, DIE, RESTART),
25  * - neuen Header "defines.h" mit (fast) allen Konstanten.
26  * - Code Cleanups und viele "kleine" Aenderungen & Bugfixes.
27  *
28  * Revision 1.22  2001/12/30 19:26:11  alex
29  * - Unterstuetzung fuer die Konfigurationsdatei eingebaut.
30  *
31  * Revision 1.21  2001/12/29 22:33:36  alex
32  * - bessere Dokumentation des Modules bzw. der Funktionen.
33  *
34  * Revision 1.20  2001/12/29 22:09:43  alex
35  * - kleinere Aenderungen ("clean-ups") bei Logging (Resolver).
36  *
37  * Revision 1.19  2001/12/29 21:53:57  alex
38  * - Da hatte ich mich wohl ein wenig verrannt; jetzt sollte der Resolver
39  *   aber tatsaechlich funktionieren.
40  *
41  * Revision 1.18  2001/12/29 20:17:25  alex
42  * - asyncronen Resolver (IP->Name) implementiert, dadurch div. Aenderungen.
43  *
44  * Revision 1.17  2001/12/29 03:06:16  alex
45  * - Loglevel (nochmal) angepasst.
46  *
47  * Revision 1.16  2001/12/27 19:32:44  alex
48  * - bei "Null-Requests" wird nichts mehr geloggt. Uberfluessig, da normal.
49  *
50  * Revision 1.15  2001/12/27 16:35:04  alex
51  * - vergessene Variable bei Ping-Timeout-Logmeldung ergaenzt. Opsa.
52  *
53  * Revision 1.14  2001/12/26 14:45:37  alex
54  * - "Code Cleanups".
55  *
56  * Revision 1.13  2001/12/26 03:36:57  alex
57  * - Verbindungen mit Lesefehlern werden nun korrekt terminiert.
58  *
59  * Revision 1.12  2001/12/26 03:20:53  alex
60  * - PING/PONG-Timeout implementiert.
61  *
62  * Revision 1.11  2001/12/25 23:15:16  alex
63  * - buffer werden nun periodisch geprueft, keine haengenden Clients mehr.
64  *
65  * Revision 1.10  2001/12/25 22:03:47  alex
66  * - Conn_Close() eingefuehrt: war die lokale Funktion Close_Connection().
67  *
68  * Revision 1.9  2001/12/24 01:32:33  alex
69  * - in Conn_WriteStr() wurde das CR+LF nicht angehaengt!
70  * - Fehler-Ausgaben vereinheitlicht.
71  *
72  * Revision 1.8  2001/12/23 22:02:54  alex
73  * - Conn_WriteStr() nimmt nun variable Parameter,
74  * - diverse kleinere Aenderungen.
75  *
76  * Revision 1.7  2001/12/21 22:24:25  alex
77  * - kleinere Aenderungen an den Log-Meldungen,
78  * - Parse_Request() wird aufgerufen.
79  *
80  * Revision 1.6  2001/12/15 00:11:55  alex
81  * - Lese- und Schreib-Puffer implementiert.
82  * - einige neue (Unter-)Funktionen eingefuehrt.
83  * - diverse weitere kleinere Aenderungen.
84  *
85  * Revision 1.5  2001/12/14 08:16:47  alex
86  * - Begonnen, Client-spezifische Lesepuffer zu implementieren.
87  * - Umstellung auf Datentyp "CONN_ID".
88  *
89  * Revision 1.4  2001/12/13 02:04:16  alex
90  * - boesen "Speicherschiesser" in Log() gefixt.
91  *
92  * Revision 1.3  2001/12/13 01:33:09  alex
93  * - Conn_Handler() unterstuetzt nun einen Timeout.
94  * - fuer Verbindungen werden keine FILE-Handles mehr benutzt.
95  * - kleinere "Code Cleanups" ;-)
96  *
97  * Revision 1.2  2001/12/12 23:32:02  alex
98  * - diverse Erweiterungen und Verbesserungen (u.a. sind nun mehrere
99  *   Verbindungen und Listen-Sockets moeglich).
100  *
101  * Revision 1.1  2001/12/12 17:18:38  alex
102  * - Modul zur Verwaltung aller Netzwerk-Verbindungen begonnen.
103  */
104
105
106 #include <portab.h>
107 #include "global.h"
108
109 #include <imp.h>
110 #include <assert.h>
111 #include <stdarg.h>
112 #include <stdio.h>
113 #include <stdlib.h>
114 #include <unistd.h>
115 #include <errno.h>
116 #include <fcntl.h>
117 #include <string.h>
118 #include <sys/socket.h>
119 #include <sys/time.h>
120 #include <sys/types.h>
121 #include <time.h>
122 #include <netinet/in.h>
123 #include <arpa/inet.h>
124 #include <netdb.h>
125
126 #ifdef HAVE_STDINT_H
127 #include <stdint.h>                     /* u.a. fuer Mac OS X */
128 #endif
129
130 #include "ngircd.h"
131 #include "client.h"
132 #include "conf.h"
133 #include "log.h"
134 #include "parse.h"
135 #include "tool.h"
136
137 #include <exp.h>
138 #include "conn.h"
139
140
141 #define SERVER_WAIT NONE - 1
142
143
144 typedef struct _Connection
145 {
146         INT sock;                       /* Socket Handle */
147         struct sockaddr_in addr;        /* Adresse des Client */
148         RES_STAT *res_stat;             /* "Resolver-Status", s.o. */
149         CHAR host[HOST_LEN];            /* Hostname */
150         CHAR rbuf[READBUFFER_LEN];      /* Lesepuffer */
151         INT rdatalen;                   /* Laenge der Daten im Lesepuffer */
152         CHAR wbuf[WRITEBUFFER_LEN];     /* Schreibpuffer */
153         INT wdatalen;                   /* Laenge der Daten im Schreibpuffer */
154         INT our_server;                 /* wenn von uns zu connectender Server: ID */
155         time_t lastdata;                /* Letzte Aktivitaet */
156         time_t lastping;                /* Letzter PING */
157         time_t lastprivmsg;             /* Letzte PRIVMSG */
158 } CONNECTION;
159
160
161 LOCAL VOID Handle_Read( INT sock );
162 LOCAL BOOLEAN Handle_Write( CONN_ID Idx );
163 LOCAL VOID New_Connection( INT Sock );
164 LOCAL CONN_ID Socket2Index( INT Sock );
165 LOCAL VOID Read_Request( CONN_ID Idx );
166 LOCAL BOOLEAN Try_Write( CONN_ID Idx );
167 LOCAL VOID Handle_Buffer( CONN_ID Idx );
168 LOCAL VOID Check_Connections( VOID );
169 LOCAL VOID Check_Servers( VOID );
170 LOCAL VOID Init_Conn_Struct( INT Idx );
171 LOCAL VOID New_Server( INT Server, CONN_ID Idx );
172
173 LOCAL RES_STAT *ResolveAddr( struct sockaddr_in *Addr );
174 LOCAL RES_STAT *ResolveName( CHAR *Host );
175 LOCAL VOID Do_ResolveAddr( struct sockaddr_in *Addr, INT w_fd );
176 LOCAL VOID Do_ResolveName( CHAR *Host, INT w_fd );
177 LOCAL VOID Read_Resolver_Result( INT r_fd );
178 LOCAL CHAR *Resolv_Error( INT H_Error );
179
180
181 LOCAL fd_set My_Listeners;
182 LOCAL fd_set My_Sockets;
183 LOCAL fd_set My_Resolvers;
184
185 LOCAL INT My_Max_Fd;
186
187 LOCAL CONNECTION My_Connections[MAX_CONNECTIONS];
188
189
190 GLOBAL VOID Conn_Init( VOID )
191 {
192         /* Modul initialisieren: statische Strukturen "ausnullen". */
193
194         CONN_ID i;
195
196         /* zu Beginn haben wir keine Verbindungen */
197         FD_ZERO( &My_Listeners );
198         FD_ZERO( &My_Sockets );
199         FD_ZERO( &My_Resolvers );
200
201         My_Max_Fd = 0;
202
203         /* Connection-Struktur initialisieren */
204         for( i = 0; i < MAX_CONNECTIONS; i++ ) Init_Conn_Struct( i );
205 } /* Conn_Init */
206
207
208 GLOBAL VOID Conn_Exit( VOID )
209 {
210         /* Modul abmelden: alle noch offenen Connections
211          * schliessen und freigeben. */
212
213         CONN_ID idx;
214         INT i;
215
216         /* Sockets schliessen */
217         for( i = 0; i < My_Max_Fd + 1; i++ )
218         {
219                 if( FD_ISSET( i, &My_Sockets ))
220                 {
221                         for( idx = 0; idx < MAX_CONNECTIONS; idx++ )
222                         {
223                                 if( My_Connections[idx].sock == i ) break;
224                         }
225                         if( idx < MAX_CONNECTIONS ) Conn_Close( idx, "Server going down ..." );
226                         else if( FD_ISSET( i, &My_Listeners ))
227                         {
228                                 close( i );
229                                 Log( LOG_INFO, "Listening socket %d closed.", i );
230                         }
231                         else
232                         {
233                                 close( i );
234                                 Log( LOG_WARNING, "Unknown connection %d closed.", i );
235                         }
236                 }
237         }
238 } /* Conn_Exit */
239
240
241 GLOBAL BOOLEAN Conn_NewListener( CONST INT Port )
242 {
243         /* Neuen Listen-Socket erzeugen: der Server wartet dann auf
244          * dem angegebenen Port auf Verbindungen. Kann der Listen-
245          * Socket nicht erteugt werden, so wird NULL geliefert.*/
246
247         struct sockaddr_in addr;
248         INT sock, on = 1;
249
250         /* Server-"Listen"-Socket initialisieren */
251         memset( &addr, 0, sizeof( addr ));
252         addr.sin_family = AF_INET;
253         addr.sin_port = htons( Port );
254         addr.sin_addr.s_addr = htonl( INADDR_ANY );
255
256         /* Socket erzeugen */
257         sock = socket( PF_INET, SOCK_STREAM, 0);
258         if( sock < 0 )
259         {
260                 Log( LOG_ALERT, "Can't create socket: %s!", strerror( errno ));
261                 return FALSE;
262         }
263
264         /* Socket-Optionen setzen */
265         if( fcntl( sock, F_SETFL, O_NONBLOCK ) != 0 )
266         {
267                 Log( LOG_ALERT, "Can't enable non-blocking mode: %s!", strerror( errno ));
268                 close( sock );
269                 return FALSE;
270         }
271         if( setsockopt( sock, SOL_SOCKET, SO_REUSEADDR, &on, (socklen_t)sizeof( on )) != 0)
272         {
273                 Log( LOG_CRIT, "Can't set socket options: %s!", strerror( errno ));
274                 /* dieser Fehler kann ignoriert werden. */
275         }
276
277         /* an Port binden */
278         if( bind( sock, (struct sockaddr *)&addr, (socklen_t)sizeof( addr )) != 0 )
279         {
280                 Log( LOG_ALERT, "Can't bind socket: %s!", strerror( errno ));
281                 close( sock );
282                 return FALSE;
283         }
284
285         /* in "listen mode" gehen :-) */
286         if( listen( sock, 10 ) != 0 )
287         {
288                 Log( LOG_ALERT, "Can't listen on soecket: %s!", strerror( errno ));
289                 close( sock );
290                 return FALSE;
291         }
292
293         /* Neuen Listener in Strukturen einfuegen */
294         FD_SET( sock, &My_Listeners );
295         FD_SET( sock, &My_Sockets );
296
297         if( sock > My_Max_Fd ) My_Max_Fd = sock;
298
299         Log( LOG_INFO, "Now listening on port %d (socket %d).", Port, sock );
300
301         return TRUE;
302 } /* Conn_NewListener */
303
304
305 GLOBAL VOID Conn_Handler( INT Timeout )
306 {
307         /* Aktive Verbindungen ueberwachen. Mindestens alle "Timeout"
308          * Sekunden wird die Funktion verlassen. Folgende Aktionen
309          * werden durchgefuehrt:
310          *  - neue Verbindungen annehmen,
311          *  - Server-Verbindungen aufbauen,
312          *  - geschlossene Verbindungen loeschen,
313          *  - volle Schreibpuffer versuchen zu schreiben,
314          *  - volle Lesepuffer versuchen zu verarbeiten,
315          *  - Antworten von Resolver Sub-Prozessen annehmen.
316          */
317
318         fd_set read_sockets, write_sockets;
319         struct timeval tv;
320         time_t start;
321         INT i;
322
323         start = time( NULL );
324         while(( time( NULL ) - start < Timeout ) && ( ! NGIRCd_Quit ))
325         {
326                 Check_Servers( );
327
328                 Check_Connections( );
329
330                 /* Timeout initialisieren */
331                 tv.tv_sec = 0;
332                 tv.tv_usec = 50000;
333
334                 /* noch volle Lese-Buffer suchen */
335                 for( i = 0; i < MAX_CONNECTIONS; i++ )
336                 {
337                         if(( My_Connections[i].sock > NONE ) && ( My_Connections[i].rdatalen > 0 ))
338                         {
339                                 /* Kann aus dem Buffer noch ein Befehl extrahiert werden? */
340                                 Handle_Buffer( i );
341                         }
342                 }
343                 
344                 /* noch volle Schreib-Puffer suchen */
345                 FD_ZERO( &write_sockets );
346                 for( i = 0; i < MAX_CONNECTIONS; i++ )
347                 {
348                         if(( My_Connections[i].sock > NONE ) && ( My_Connections[i].wdatalen > 0 ))
349                         {
350                                 /* Socket der Verbindung in Set aufnehmen */
351                                 FD_SET( My_Connections[i].sock, &write_sockets );
352                         }
353                 }
354
355                 /* von welchen Sockets koennte gelesen werden? */
356                 read_sockets = My_Sockets;
357                 for( i = 0; i < MAX_CONNECTIONS; i++ )
358                 {
359                         if(( My_Connections[i].sock > NONE ) && ( My_Connections[i].host[0] == '\0' ))
360                         {
361                                 /* Hier muss noch auf den Resolver Sub-Prozess gewartet werden */
362                                 FD_CLR( My_Connections[i].sock, &read_sockets );
363                         }
364                 }
365                 for( i = 0; i < My_Max_Fd + 1; i++ )
366                 {
367                         /* Pipes von Resolver Sub-Prozessen aufnehmen */
368                         if( FD_ISSET( i, &My_Resolvers ))
369                         {
370                                 FD_SET( i, &read_sockets );
371                         }
372                 }
373
374                 /* Auf Aktivitaet warten */
375                 if( select( My_Max_Fd + 1, &read_sockets, &write_sockets, NULL, &tv ) == -1 )
376                 {
377                         if( errno != EINTR ) Log( LOG_ALERT, "select(): %s!", strerror( errno ));
378                         return;
379                 }
380
381                 /* Koennen Daten geschrieben werden? */
382                 for( i = 0; i < My_Max_Fd + 1; i++ )
383                 {
384                         if( FD_ISSET( i, &write_sockets )) Handle_Write( Socket2Index( i ));
385                 }
386
387                 /* Daten zum Lesen vorhanden? */
388                 for( i = 0; i < My_Max_Fd + 1; i++ )
389                 {
390                         if( FD_ISSET( i, &read_sockets )) Handle_Read( i );
391                 }
392         }
393 } /* Conn_Handler */
394
395
396 GLOBAL BOOLEAN Conn_WriteStr( CONN_ID Idx, CHAR *Format, ... )
397 {
398         /* String in Socket schreiben. CR+LF wird von dieser Funktion
399          * automatisch angehaengt. Im Fehlerfall wird dir Verbindung
400          * getrennt und FALSE geliefert. */
401
402         CHAR buffer[COMMAND_LEN];
403         BOOLEAN ok;
404         va_list ap;
405
406         va_start( ap, Format );
407         if( vsnprintf( buffer, COMMAND_LEN - 2, Format, ap ) == COMMAND_LEN - 2 )
408         {
409                 Log( LOG_ALERT, "String too long to send (connection %d)!", Idx );
410                 Conn_Close( Idx, "Server error: String too long to send!" );
411                 return FALSE;
412         }
413
414 #ifdef SNIFFER
415         Log( LOG_DEBUG, " -> connection %d: '%s'.", Idx, buffer );
416 #endif
417
418         strcat( buffer, "\r\n" );
419         ok = Conn_Write( Idx, buffer, strlen( buffer ));
420
421         va_end( ap );
422         return ok;
423 } /* Conn_WriteStr */
424
425
426 GLOBAL BOOLEAN Conn_Write( CONN_ID Idx, CHAR *Data, INT Len )
427 {
428         /* Daten in Socket schreiben. Bei "fatalen" Fehlern wird
429          * der Client disconnectiert und FALSE geliefert. */
430
431         assert( Idx >= 0 );
432         assert( My_Connections[Idx].sock > NONE );
433         assert( Data != NULL );
434         assert( Len > 0 );
435
436         /* pruefen, ob Daten im Schreibpuffer sind. Wenn ja, zunaechst
437          * pruefen, ob diese gesendet werden koennen */
438         if( My_Connections[Idx].wdatalen > 0 )
439         {
440                 if( ! Try_Write( Idx )) return FALSE;
441         }
442
443         /* pruefen, ob im Schreibpuffer genuegend Platz ist */
444         if( WRITEBUFFER_LEN - My_Connections[Idx].wdatalen - Len <= 0 )
445         {
446                 /* der Puffer ist dummerweise voll ... */
447                 Log( LOG_NOTICE, "Write buffer overflow (connection %d)!", Idx );
448                 Conn_Close( Idx, NULL );
449                 return FALSE;
450         }
451
452         /* Daten in Puffer kopieren */
453         memcpy( My_Connections[Idx].wbuf + My_Connections[Idx].wdatalen, Data, Len );
454         My_Connections[Idx].wdatalen += Len;
455
456         /* pruefen, on Daten vorhanden sind und geschrieben werden koennen */
457         if( My_Connections[Idx].wdatalen > 0 )
458         {
459                 if( ! Try_Write( Idx )) return FALSE;
460         }
461
462         return TRUE;
463 } /* Conn_Write */
464
465
466 GLOBAL VOID Conn_Close( CONN_ID Idx, CHAR *Msg )
467 {
468         /* Verbindung schliessen. Evtl. noch von Resolver
469          * Sub-Prozessen offene Pipes werden geschlossen. */
470
471         CLIENT *c;
472         
473         assert( Idx >= 0 );
474         assert( My_Connections[Idx].sock > NONE );
475
476         if( Msg )
477         {
478                 Conn_WriteStr( Idx, "ERROR :%s", Msg );
479                 if( My_Connections[Idx].sock == NONE ) return;
480         }
481
482         if( close( My_Connections[Idx].sock ) != 0 )
483         {
484                 Log( LOG_ERR, "Error closing connection %d with %s:%d - %s!", Idx, inet_ntoa( My_Connections[Idx].addr.sin_addr ), ntohs( My_Connections[Idx].addr.sin_port), strerror( errno ));
485         }
486         else
487         {
488                 Log( LOG_NOTICE, "Connection %d with %s:%d closed.", Idx, inet_ntoa( My_Connections[Idx].addr.sin_addr ), ntohs( My_Connections[Idx].addr.sin_port ));
489         }
490
491         c = Client_GetFromConn( Idx );
492         if( c ) Client_Destroy( c );
493
494         if( My_Connections[Idx].res_stat )
495         {
496                 /* Resolver-Strukturen freigeben, wenn noch nicht geschehen */
497                 FD_CLR( My_Connections[Idx].res_stat->pipe[0], &My_Resolvers );
498                 close( My_Connections[Idx].res_stat->pipe[0] );
499                 close( My_Connections[Idx].res_stat->pipe[1] );
500                 free( My_Connections[Idx].res_stat );
501         }
502
503         /* Bei Server-Verbindungen lasttry-Zeitpunkt auf "jetzt" setzen */
504         if( My_Connections[Idx].our_server >= 0 ) Conf_Server[My_Connections[Idx].our_server].lasttry = time( NULL );
505
506         FD_CLR( My_Connections[Idx].sock, &My_Sockets );
507         My_Connections[Idx].sock = NONE;
508 } /* Conn_Close */
509
510
511 GLOBAL VOID Conn_UpdateIdle( CONN_ID Idx )
512 {
513         /* Idle-Timer zuruecksetzen */
514
515         assert( Idx >= 0 );
516         My_Connections[Idx].lastprivmsg = time( NULL );
517 }
518
519
520 GLOBAL INT32 Conn_GetIdle( CONN_ID Idx )
521 {
522         /* Idle-Time einer Verbindung liefern (in Sekunden) */
523
524         assert( Idx >= 0 );
525         return time( NULL ) - My_Connections[Idx].lastprivmsg;
526 } /* Conn_GetIdle */
527
528
529 LOCAL BOOLEAN Try_Write( CONN_ID Idx )
530 {
531         /* Versuchen, Daten aus dem Schreib-Puffer in den
532          * Socket zu schreiben. */
533
534         fd_set write_socket;
535
536         assert( Idx >= 0 );
537         assert( My_Connections[Idx].sock > NONE );
538         assert( My_Connections[Idx].wdatalen > 0 );
539
540         FD_ZERO( &write_socket );
541         FD_SET( My_Connections[Idx].sock, &write_socket );
542         if( select( My_Connections[Idx].sock + 1, NULL, &write_socket, NULL, 0 ) == -1 )
543         {
544                 /* Fehler! */
545                 if( errno != EINTR )
546                 {
547                         Log( LOG_ALERT, "select(): %s!", strerror( errno ));
548                         Conn_Close( Idx, NULL );
549                         return FALSE;
550                 }
551         }
552
553         if( FD_ISSET( My_Connections[Idx].sock, &write_socket )) return Handle_Write( Idx );
554         else return TRUE;
555 } /* Try_Write */
556
557
558 LOCAL VOID Handle_Read( INT Sock )
559 {
560         /* Aktivitaet auf einem Socket verarbeiten:
561          *  - neue Clients annehmen,
562          *  - Daten von Clients verarbeiten,
563          *  - Resolver-Rueckmeldungen annehmen. */
564
565         CONN_ID idx;
566
567         assert( Sock >= 0 );
568         
569         if( FD_ISSET( Sock, &My_Listeners ))
570         {
571                 /* es ist einer unserer Listener-Sockets: es soll
572                  * also eine neue Verbindung aufgebaut werden. */
573
574                 New_Connection( Sock );
575         }
576         else if( FD_ISSET( Sock, &My_Resolvers ))
577         {
578                 /* Rueckmeldung von einem Resolver Sub-Prozess */
579
580                 Read_Resolver_Result( Sock );
581         }
582         else
583         {
584                 /* Ein Client Socket: entweder ein User oder Server */
585
586                 idx = Socket2Index( Sock );
587                 Read_Request( idx );
588         }
589 } /* Handle_Read */
590
591
592 LOCAL BOOLEAN Handle_Write( CONN_ID Idx )
593 {
594         /* Daten aus Schreibpuffer versenden */
595
596         INT len;
597
598         assert( Idx >= 0 );
599         assert( My_Connections[Idx].sock > NONE );
600         assert( My_Connections[Idx].wdatalen > 0 );
601
602         /* Daten schreiben */
603         len = send( My_Connections[Idx].sock, My_Connections[Idx].wbuf, My_Connections[Idx].wdatalen, 0 );
604         if( len < 0 )
605         {
606                 /* Oops, ein Fehler! */
607                 Log( LOG_ALERT, "Write error (buffer) on connection %d: %s!", Idx, strerror( errno ));
608                 Conn_Close( Idx, NULL );
609                 return FALSE;
610         }
611
612         /* Puffer anpassen */
613         My_Connections[Idx].wdatalen -= len;
614         memmove( My_Connections[Idx].wbuf, My_Connections[Idx].wbuf + len, My_Connections[Idx].wdatalen );
615
616         return TRUE;
617 } /* Handle_Write */
618
619
620 LOCAL VOID New_Connection( INT Sock )
621 {
622         /* Neue Client-Verbindung von Listen-Socket annehmen und
623          * CLIENT-Struktur anlegen. */
624
625         struct sockaddr_in new_addr;
626         INT new_sock, new_sock_len;
627         RES_STAT *s;
628         CONN_ID idx;
629
630         assert( Sock >= 0 );
631
632         new_sock_len = sizeof( new_addr );
633         new_sock = accept( Sock, (struct sockaddr *)&new_addr, (socklen_t *)&new_sock_len );
634         if( new_sock < 0 )
635         {
636                 Log( LOG_CRIT, "Can't accept connection: %s!", strerror( errno ));
637                 return;
638         }
639
640         /* Freie Connection-Struktur suschen */
641         for( idx = 0; idx < MAX_CONNECTIONS; idx++ ) if( My_Connections[idx].sock == NONE ) break;
642         if( idx >= MAX_CONNECTIONS )
643         {
644                 Log( LOG_ALERT, "Can't accept connection: limit reached (%d)!", MAX_CONNECTIONS );
645                 close( new_sock );
646                 return;
647         }
648
649         /* Client-Struktur initialisieren */
650         if( ! Client_NewLocal( idx, inet_ntoa( new_addr.sin_addr )))
651         {
652                 Log( LOG_ALERT, "Can't accept connection: can't create client structure!" );
653                 close( new_sock );
654                 return;
655         }
656
657         /* Verbindung registrieren */
658         Init_Conn_Struct( idx );
659         My_Connections[idx].sock = new_sock;
660         My_Connections[idx].addr = new_addr;
661
662         /* Neuen Socket registrieren */
663         FD_SET( new_sock, &My_Sockets );
664         if( new_sock > My_Max_Fd ) My_Max_Fd = new_sock;
665
666         Log( LOG_NOTICE, "Accepted connection %d from %s:%d on socket %d.", idx, inet_ntoa( new_addr.sin_addr ), ntohs( new_addr.sin_port), Sock );
667
668         /* Hostnamen ermitteln */
669         s = ResolveAddr( &new_addr );
670         if( s )
671         {
672                 /* Sub-Prozess wurde asyncron gestartet */
673                 My_Connections[idx].res_stat = s;
674         }
675         else
676         {
677                 /* kann Namen nicht aufloesen */
678                 strcpy( My_Connections[idx].host, inet_ntoa( new_addr.sin_addr ));
679         }
680 } /* New_Connection */
681
682
683 LOCAL CONN_ID Socket2Index( INT Sock )
684 {
685         /* zum Socket passende Connection suchen */
686
687         CONN_ID idx;
688
689         assert( Sock >= 0 );
690
691         for( idx = 0; idx < MAX_CONNECTIONS; idx++ ) if( My_Connections[idx].sock == Sock ) break;
692
693         assert( idx < MAX_CONNECTIONS );
694         return idx;
695 } /* Socket2Index */
696
697
698 LOCAL VOID Read_Request( CONN_ID Idx )
699 {
700         /* Daten von Socket einlesen und entsprechend behandeln.
701          * Tritt ein Fehler auf, so wird der Socket geschlossen. */
702
703         INT len;
704
705         assert( Idx >= 0 );
706         assert( My_Connections[Idx].sock > NONE );
707
708         len = recv( My_Connections[Idx].sock, My_Connections[Idx].rbuf + My_Connections[Idx].rdatalen, READBUFFER_LEN - My_Connections[Idx].rdatalen - 1, 0 );
709         My_Connections[Idx].rbuf[READBUFFER_LEN - 1] = '\0';
710
711         if( len == 0 )
712         {
713                 /* Socket wurde geschlossen */
714                 Log( LOG_INFO, "%s:%d is closing the connection ...", inet_ntoa( My_Connections[Idx].addr.sin_addr ), ntohs( My_Connections[Idx].addr.sin_port));
715                 Conn_Close( Idx, NULL );
716                 return;
717         }
718
719         if( len < 0 )
720         {
721                 /* Fehler beim Lesen */
722                 Log( LOG_ALERT, "Read error on connection %d: %s!", Idx, strerror( errno ));
723                 Conn_Close( Idx, NULL );
724                 return;
725         }
726
727         /* Lesebuffer updaten */
728         My_Connections[Idx].rdatalen += len;
729         assert( My_Connections[Idx].rdatalen <= READBUFFER_LEN );
730         My_Connections[Idx].rbuf[My_Connections[Idx].rdatalen] = '\0';
731
732         if( My_Connections[Idx].rdatalen > COMMAND_LEN )
733         {
734                 /* Eine Anfrage darf(!) nicht laenger als 512 Zeichen
735                  * (incl. CR+LF!) werden; vgl. RFC 2812. Wenn soetwas
736                  * empfangen wird, wird der Client disconnectiert. */
737                 Log( LOG_ALERT, "Request too long (connection %d)!", Idx );
738                 Conn_Close( Idx, "Request too long!" );
739                 return;
740         }
741
742         /* Timestamp aktualisieren */
743         My_Connections[Idx].lastdata = time( NULL );
744
745         Handle_Buffer( Idx );
746 } /* Read_Request */
747
748
749 LOCAL VOID Handle_Buffer( CONN_ID Idx )
750 {
751         /* Daten im Lese-Puffer einer Verbindung verarbeiten. */
752
753         CHAR *ptr, *ptr1, *ptr2;
754         INT len, delta;
755         
756         /* Eine komplette Anfrage muss mit CR+LF enden, vgl.
757          * RFC 2812. Haben wir eine? */
758         ptr = strstr( My_Connections[Idx].rbuf, "\r\n" );
759
760         if( ptr ) delta = 2;
761         else
762         {
763                 /* Nicht RFC-konforme Anfrage mit nur CR oder LF? Leider
764                  * machen soetwas viele Clients, u.a. "mIRC" :-( */
765                 ptr1 = strchr( My_Connections[Idx].rbuf, '\r' );
766                 ptr2 = strchr( My_Connections[Idx].rbuf, '\n' );
767                 delta = 1;
768                 if( ptr1 && ptr2 ) ptr = ptr1 > ptr2 ? ptr2 : ptr1;
769                 else if( ptr1 ) ptr = ptr1;
770                 else if( ptr2 ) ptr = ptr2;
771         }
772
773         if( ptr )
774         {
775                 /* Ende der Anfrage wurde gefunden */
776                 *ptr = '\0';
777                 len = ( ptr - My_Connections[Idx].rbuf ) + delta;
778                 if( len > delta )
779                 {
780                         /* Es wurde ein Request gelesen */
781                         if( ! Parse_Request( Idx, My_Connections[Idx].rbuf )) return;
782                 }
783
784                 /* Puffer anpassen */
785                 My_Connections[Idx].rdatalen -= len;
786                 memmove( My_Connections[Idx].rbuf, My_Connections[Idx].rbuf + len, My_Connections[Idx].rdatalen );
787         }
788 } /* Handle_Buffer */
789
790
791 LOCAL VOID Check_Connections( VOID )
792 {
793         /* Pruefen, ob Verbindungen noch "alive" sind. Ist dies
794          * nicht der Fall, zunaechst PING-PONG spielen und, wenn
795          * auch das nicht "hilft", Client disconnectieren. */
796
797         CLIENT *c;
798         INT i;
799
800         for( i = 0; i < MAX_CONNECTIONS; i++ )
801         {
802                 if( My_Connections[i].sock == NONE ) continue;
803
804                 c = Client_GetFromConn( i );
805                 if( c && (( c->type == CLIENT_USER ) || ( c->type == CLIENT_SERVER ) || ( c->type == CLIENT_SERVICE )))
806                 {
807                         /* verbundener User, Server oder Service */
808                         if( My_Connections[i].lastping > My_Connections[i].lastdata )
809                         {
810                                 /* es wurde bereits ein PING gesendet */
811                                 if( My_Connections[i].lastping < time( NULL ) - Conf_PongTimeout )
812                                 {
813                                         /* Timeout */
814                                         Log( LOG_INFO, "Connection %d: PING timeout.", i );
815                                         Conn_Close( i, "PING timeout" );
816                                 }
817                         }
818                         else if( My_Connections[i].lastdata < time( NULL ) - Conf_PingTimeout )
819                         {
820                                 /* es muss ein PING gesendet werden */
821                                 Log( LOG_DEBUG, "Connection %d: sending PING ...", i );
822                                 My_Connections[i].lastping = time( NULL );
823                                 Conn_WriteStr( i, "PING :%s", This_Server->nick );
824                         }
825                 }
826                 else
827                 {
828                         /* noch nicht vollstaendig aufgebaute Verbindung */
829                         if( My_Connections[i].lastdata < time( NULL ) - Conf_PingTimeout )
830                         {
831                                 /* Timeout */
832                                 Log( LOG_INFO, "Connection %d: Timeout.", i );
833                                 Conn_Close( i, "Timeout" );
834                         }
835                 }
836         }
837 } /* Check_Connections */
838
839
840 LOCAL VOID Check_Servers( VOID )
841 {
842         /* Pruefen, ob Server-Verbindungen aufgebaut werden
843          * muessen bzw. koennen */
844
845         INT idx, i, n;
846         RES_STAT *s;
847         
848         for( i = 0; i < Conf_Server_Count; i++ )
849         {
850                 /* Ist ein Hostname und Port definiert? */
851                 if(( ! Conf_Server[i].host[0] ) || ( ! Conf_Server[i].port > 0 )) continue;
852                 
853                 /* Haben wir schon eine Verbindung? */
854                 for( n = 0; n < MAX_CONNECTIONS; n++ )
855                 {
856                         if(( My_Connections[n].sock != NONE ) && ( My_Connections[n].our_server == i ))
857                         {
858                                 /* Komplett aufgebaute Verbindung? */
859                                 if( My_Connections[n].sock > NONE ) break;
860
861                                 /* IP schon aufgeloest? */
862                                 if( My_Connections[n].res_stat == NULL ) New_Server( i, n );
863                         }
864                 }
865                 if( n < MAX_CONNECTIONS ) continue;
866                 
867                 /* Wann war der letzte Connect-Versuch? */
868                 if( Conf_Server[i].lasttry > time( NULL ) - Conf_ConnectRetry ) continue;
869
870                 /* Okay, Verbindungsaufbau versuchen */
871                 Conf_Server[i].lasttry = time( NULL );
872
873                 /* Freie Connection-Struktur suschen */
874                 for( idx = 0; idx < MAX_CONNECTIONS; idx++ ) if( My_Connections[idx].sock == NONE ) break;
875                 if( idx >= MAX_CONNECTIONS )
876                 {
877                         Log( LOG_ALERT, "Can't establist server connection: connection limit reached (%d)!", MAX_CONNECTIONS );
878                         return;
879                 }
880                 Log( LOG_DEBUG, "Preparing connection %d for \"%s\" ...", idx, Conf_Server[i].host );
881
882                 /* Verbindungs-Struktur initialisieren */
883                 Init_Conn_Struct( idx );
884                 My_Connections[idx].sock = SERVER_WAIT;
885                 My_Connections[idx].our_server = i;
886                 
887                 /* Hostnamen in IP aufloesen */
888                 s = ResolveName( Conf_Server[i].host );
889                 if( s )
890                 {
891                         /* Sub-Prozess wurde asyncron gestartet */
892                         My_Connections[idx].res_stat = s;
893                 }
894                 else
895                 {
896                         /* kann Namen nicht aufloesen: Connection-Struktur freigeben */
897                         Init_Conn_Struct( idx );
898                 }
899         }
900 } /* Check_Servers */
901
902
903 LOCAL VOID New_Server( INT Server, CONN_ID Idx )
904 {
905         /* Neue Server-Verbindung aufbauen */
906
907         struct sockaddr_in new_addr;
908         struct in_addr inaddr;
909         INT new_sock;
910
911         assert( Server >= 0 );
912         assert( Idx >= 0 );
913
914         /* Wurde eine gueltige IP-Adresse gefunden? */
915         if( ! Conf_Server[Server].ip[0] )
916         {
917                 /* Nein. Verbindung wieder freigeben: */
918                 Init_Conn_Struct( Idx );
919                 Log( LOG_ERR, "Can't connect to \"%s\" (connection %d): ip address unknown!", Conf_Server[Server].host, Idx );
920                 return;
921         }
922         
923         Log( LOG_INFO, "Establishing connection to \"%s\", %s (connection %d) ... ", Conf_Server[Server].host, Conf_Server[Server].ip, Idx );
924
925         if( inet_aton( Conf_Server[Server].ip, &inaddr ) == 0 )
926         {
927                 /* Konnte Adresse nicht konvertieren */
928                 Init_Conn_Struct( Idx );
929                 Log( LOG_ERR, "Can't connect to \"%s\" (connection %d): can't convert ip address %s!", Conf_Server[Server].host, Idx, Conf_Server[Server].ip );
930                 return;
931         }
932
933         memset( &new_addr, 0, sizeof( new_addr ));
934         new_addr.sin_family = AF_INET;
935         new_addr.sin_addr = inaddr;
936         new_addr.sin_port = htons( Conf_Server[Server].port );
937
938         new_sock = socket( PF_INET, SOCK_STREAM, 0 );
939         if ( new_sock < 0 )
940         {
941                 Init_Conn_Struct( Idx );
942                 Log( LOG_ALERT, "Can't create socket: %s!", strerror( errno ));
943                 return;
944         }
945         if( connect( new_sock, (struct sockaddr *)&new_addr, sizeof( new_addr )) < 0)
946         {
947                 close( new_sock );
948                 Init_Conn_Struct( Idx );
949                 Log( LOG_ALERT, "Can't connect socket: %s!", strerror( errno ));
950                 return;
951         }
952
953         /* Client-Struktur initialisieren */
954         if( ! Client_NewLocal( Idx, inet_ntoa( new_addr.sin_addr )))
955         {
956                 close( new_sock );
957                 Init_Conn_Struct( Idx );
958                 Log( LOG_ALERT, "Can't establish connection: can't create client structure!" );
959                 return;
960         }
961         
962         /* Verbindung registrieren */
963         My_Connections[Idx].sock = new_sock;
964         My_Connections[Idx].addr = new_addr;
965         strcpy( My_Connections[Idx].host, Conf_Server[Server].host );
966
967         /* Neuen Socket registrieren */
968         FD_SET( new_sock, &My_Sockets );
969         if( new_sock > My_Max_Fd ) My_Max_Fd = new_sock;
970 } /* New_Server */
971
972
973 LOCAL VOID Init_Conn_Struct( INT Idx )
974 {
975         /* Connection-Struktur initialisieren */
976
977         My_Connections[Idx].sock = NONE;
978         My_Connections[Idx].res_stat = NULL;
979         My_Connections[Idx].host[0] = '\0';
980         My_Connections[Idx].rbuf[0] = '\0';
981         My_Connections[Idx].rdatalen = 0;
982         My_Connections[Idx].wbuf[0] = '\0';
983         My_Connections[Idx].wdatalen = 0;
984         My_Connections[Idx].our_server = -1;
985         My_Connections[Idx].lastdata = time( NULL );
986         My_Connections[Idx].lastping = 0;
987         My_Connections[Idx].lastprivmsg = time( NULL );
988 } /* Init_Conn_Struct */
989
990
991 LOCAL RES_STAT *ResolveAddr( struct sockaddr_in *Addr )
992 {
993         /* IP (asyncron!) aufloesen. Bei Fehler, z.B. wenn der
994          * Child-Prozess nicht erzeugt werden kann, wird NULL geliefert.
995          * Der Host kann dann nicht aufgeloest werden. */
996
997         RES_STAT *s;
998         INT pid;
999
1000         /* Speicher anfordern */
1001         s = malloc( sizeof( RES_STAT ));
1002         if( ! s )
1003         {
1004                 Log( LOG_ALERT, "Resolver: Can't alloc memory!" );
1005                 return NULL;
1006         }
1007
1008         /* Pipe fuer Antwort initialisieren */
1009         if( pipe( s->pipe ) != 0 )
1010         {
1011                 free( s );
1012                 Log( LOG_ALERT, "Resolver: Can't create output pipe: %s!", strerror( errno ));
1013                 return NULL;
1014         }
1015
1016         /* Sub-Prozess erzeugen */
1017         pid = fork( );
1018         if( pid > 0 )
1019         {
1020                 /* Haupt-Prozess */
1021                 Log( LOG_DEBUG, "Resolver for %s created (PID %d).", inet_ntoa( Addr->sin_addr ), pid );
1022                 FD_SET( s->pipe[0], &My_Resolvers );
1023                 if( s->pipe[0] > My_Max_Fd ) My_Max_Fd = s->pipe[0];
1024                 s->pid = pid;
1025                 return s;
1026         }
1027         else if( pid == 0 )
1028         {
1029                 /* Sub-Prozess */
1030                 Log_Init_Resolver( );
1031                 Do_ResolveAddr( Addr, s->pipe[1] );
1032                 Log_Exit_Resolver( );
1033                 exit( 0 );
1034         }
1035         else
1036         {
1037                 /* Fehler */
1038                 free( s );
1039                 Log( LOG_ALERT, "Resolver: Can't fork: %s!", strerror( errno ));
1040                 return NULL;
1041         }
1042 } /* ResolveAddr */
1043
1044
1045 LOCAL RES_STAT *ResolveName( CHAR *Host )
1046 {
1047         /* Hostnamen (asyncron!) aufloesen. Bei Fehler, z.B. wenn der
1048         * Child-Prozess nicht erzeugt werden kann, wird NULL geliefert.
1049         * Der Host kann dann nicht aufgeloest werden. */
1050
1051         RES_STAT *s;
1052         INT pid;
1053
1054         /* Speicher anfordern */
1055         s = malloc( sizeof( RES_STAT ));
1056         if( ! s )
1057         {
1058                 Log( LOG_ALERT, "Resolver: Can't alloc memory!" );
1059                 return NULL;
1060         }
1061
1062         /* Pipe fuer Antwort initialisieren */
1063         if( pipe( s->pipe ) != 0 )
1064         {
1065                 free( s );
1066                 Log( LOG_ALERT, "Resolver: Can't create output pipe: %s!", strerror( errno ));
1067                 return NULL;
1068         }
1069
1070         /* Sub-Prozess erzeugen */
1071         pid = fork( );
1072         if( pid > 0 )
1073         {
1074                 /* Haupt-Prozess */
1075                 Log( LOG_DEBUG, "Resolver for \"%s\" created (PID %d).", Host, pid );
1076                 FD_SET( s->pipe[0], &My_Resolvers );
1077                 if( s->pipe[0] > My_Max_Fd ) My_Max_Fd = s->pipe[0];
1078                 s->pid = pid;
1079                 return s;
1080         }
1081         else if( pid == 0 )
1082         {
1083                 /* Sub-Prozess */
1084                 Log_Init_Resolver( );
1085                 Do_ResolveName( Host, s->pipe[1] );
1086                 Log_Exit_Resolver( );
1087                 exit( 0 );
1088         }
1089         else
1090         {
1091                 /* Fehler */
1092                 free( s );
1093                 Log( LOG_ALERT, "Resolver: Can't fork: %s!", strerror( errno ));
1094                 return NULL;
1095         }
1096 } /* ResolveName */
1097
1098
1099 LOCAL VOID Do_ResolveAddr( struct sockaddr_in *Addr, INT w_fd )
1100 {
1101         /* Resolver Sub-Prozess: IP aufloesen und Ergebnis in Pipe schreiben. */
1102
1103         CHAR hostname[HOST_LEN];
1104         struct hostent *h;
1105
1106         Log_Resolver( LOG_DEBUG, "Now resolving %s ...", inet_ntoa( Addr->sin_addr ));
1107
1108         /* Namen aufloesen */
1109         h = gethostbyaddr( (CHAR *)&Addr->sin_addr, sizeof( Addr->sin_addr ), AF_INET );
1110         if( h ) strcpy( hostname, h->h_name );
1111         else
1112         {
1113                 Log_Resolver( LOG_WARNING, "Can't resolve address %s: code %s!", inet_ntoa( Addr->sin_addr ), Resolv_Error( h_errno ));
1114                 strcpy( hostname, inet_ntoa( Addr->sin_addr ));
1115         }
1116
1117         /* Antwort an Parent schreiben */
1118         if( write( w_fd, hostname, strlen( hostname ) + 1 ) != ( strlen( hostname ) + 1 ))
1119         {
1120                 Log_Resolver( LOG_ALERT, "Resolver: Can't write to parent: %s!", strerror( errno ));
1121                 close( w_fd );
1122                 return;
1123         }
1124
1125         Log_Resolver( LOG_DEBUG, "Ok, translated %s to \"%s\".", inet_ntoa( Addr->sin_addr ), hostname );
1126 } /* Do_ResolveAddr */
1127
1128
1129 LOCAL VOID Do_ResolveName( CHAR *Host, INT w_fd )
1130 {
1131         /* Resolver Sub-Prozess: Name aufloesen und Ergebnis in Pipe schreiben. */
1132
1133         CHAR ip[16];
1134         struct hostent *h;
1135         struct in_addr *addr;
1136
1137         Log_Resolver( LOG_DEBUG, "Now resolving \"%s\" ...", Host );
1138
1139         /* Namen aufloesen */
1140         h = gethostbyname( Host );
1141         if( h )
1142         {
1143                 addr = (struct in_addr *)h->h_addr;
1144                 strcpy( ip, inet_ntoa( *addr ));
1145         }
1146         else
1147         {
1148                 Log_Resolver( LOG_WARNING, "Can't resolve \"%s\": %s!", Host, Resolv_Error( h_errno ));
1149                 strcpy( ip, "" );
1150         }
1151
1152         /* Antwort an Parent schreiben */
1153         if( write( w_fd, ip, strlen( ip ) + 1 ) != ( strlen( ip ) + 1 ))
1154         {
1155                 Log_Resolver( LOG_ALERT, "Resolver: Can't write to parent: %s!", strerror( errno ));
1156                 close( w_fd );
1157                 return;
1158         }
1159
1160         if( ip[0] ) Log_Resolver( LOG_DEBUG, "Ok, translated \"%s\" to %s.", Host, ip );
1161 } /* Do_ResolveName */
1162
1163
1164 LOCAL VOID Read_Resolver_Result( INT r_fd )
1165 {
1166         /* Ergebnis von Resolver Sub-Prozess aus Pipe lesen
1167         * und entsprechende Connection aktualisieren */
1168
1169         CHAR result[HOST_LEN];
1170         CLIENT *c;
1171         INT len, i;
1172
1173         FD_CLR( r_fd, &My_Resolvers );
1174
1175         /* Anfrage vom Parent lesen */
1176         len = read( r_fd, result, HOST_LEN);
1177         if( len < 0 )
1178         {
1179                 /* Fehler beim Lesen aus der Pipe */
1180                 close( r_fd );
1181                 Log( LOG_ALERT, "Resolver: Can't read result: %s!", strerror( errno ));
1182                 return;
1183         }
1184         result[len] = '\0';
1185
1186         /* zugehoerige Connection suchen */
1187         for( i = 0; i < MAX_CONNECTIONS; i++ )
1188         {
1189                 if(( My_Connections[i].sock != NONE ) && ( My_Connections[i].res_stat ) && ( My_Connections[i].res_stat->pipe[0] == r_fd )) break;
1190         }
1191         if( i >= MAX_CONNECTIONS )
1192         {
1193                 /* Opsa! Keine passende Connection gefunden!? Vermutlich
1194                  * wurde sie schon wieder geschlossen. */
1195                 close( r_fd );
1196                 Log( LOG_DEBUG, "Resolver: Got result for unknown connection!?" );
1197                 return;
1198         }
1199
1200         /* Aufraeumen */
1201         close( My_Connections[i].res_stat->pipe[0] );
1202         close( My_Connections[i].res_stat->pipe[1] );
1203         free( My_Connections[i].res_stat );
1204         My_Connections[i].res_stat = NULL;
1205
1206         if( My_Connections[i].sock > NONE )
1207         {
1208                 /* Eingehende Verbindung: Hostnamen setzen */
1209                 strcpy( My_Connections[i].host, result );
1210                 c = Client_GetFromConn( i );
1211                 if( c ) Client_SetHostname( c, result );
1212         }
1213         else
1214         {
1215                 /* Ausgehende Verbindung (=Server): IP setzen */
1216                 assert( My_Connections[i].our_server >= 0 );
1217                 strcpy( Conf_Server[My_Connections[i].our_server].ip, result );
1218         }
1219 } /* Read_Resolver_Result */
1220
1221
1222 LOCAL CHAR *Resolv_Error( INT H_Error )
1223 {
1224         /* Fehlerbeschreibung fuer H_Error liefern */
1225
1226         switch( H_Error )
1227         {
1228                 case HOST_NOT_FOUND:
1229                         return "host not found";
1230                 case NO_ADDRESS:
1231                         return "name valid but no IP address defined";
1232                 case NO_RECOVERY:
1233                         return "name server error";
1234                 case TRY_AGAIN:
1235                         return "name server temporary not available";
1236                 default:
1237                         return "unknown error";
1238         }
1239 } /* Resolv_Error */
1240
1241
1242 /* -eof- */