New configuration option "SyslogFacility"
[ngircd-alex.git] / src / ngircd / conf.c
1 /*
2  * ngIRCd -- The Next Generation IRC Daemon
3  * Copyright (c)2001-2010 Alexander Barton (alex@barton.de)
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 2 of the License, or
8  * (at your option) any later version.
9  * Please read the file COPYING, README and AUTHORS for more information.
10  *
11  * Configuration management (reading, parsing & validation)
12  */
13
14
15 #include "portab.h"
16
17 #include "imp.h"
18 #include <assert.h>
19 #include <errno.h>
20 #ifdef PROTOTYPES
21 #       include <stdarg.h>
22 #else
23 #       include <varargs.h>
24 #endif
25 #include <stdio.h>
26 #include <stdlib.h>
27 #include <string.h>
28 #include <strings.h>
29 #include <unistd.h>
30 #include <pwd.h>
31 #include <grp.h>
32 #include <sys/types.h>
33 #include <unistd.h>
34
35 #ifdef HAVE_CTYPE_H
36 # include <ctype.h>
37 #endif
38
39 #include "array.h"
40 #include "ngircd.h"
41 #include "conn.h"
42 #include "channel.h"
43 #include "defines.h"
44 #include "log.h"
45 #include "match.h"
46 #include "tool.h"
47
48 #include "exp.h"
49 #include "conf.h"
50
51
52 static bool Use_Log = true;
53 static CONF_SERVER New_Server;
54 static int New_Server_Idx;
55
56 static size_t Conf_Oper_Count;
57 static size_t Conf_Channel_Count;
58 static char Conf_MotdFile[FNAME_LEN];
59
60 static void Set_Defaults PARAMS(( bool InitServers ));
61 static bool Read_Config PARAMS(( bool ngircd_starting ));
62 static bool Validate_Config PARAMS(( bool TestOnly, bool Rehash ));
63
64 static void Handle_GLOBAL PARAMS(( int Line, char *Var, char *Arg ));
65 static void Handle_OPERATOR PARAMS(( int Line, char *Var, char *Arg ));
66 static void Handle_SERVER PARAMS(( int Line, char *Var, char *Arg ));
67 static void Handle_CHANNEL PARAMS(( int Line, char *Var, char *Arg ));
68
69 static void Config_Error PARAMS(( const int Level, const char *Format, ... ));
70
71 static void Config_Error_NaN PARAMS(( const int LINE, const char *Value ));
72 static void Config_Error_TooLong PARAMS(( const int LINE, const char *Value ));
73
74 static void Init_Server_Struct PARAMS(( CONF_SERVER *Server ));
75
76 #ifdef WANT_IPV6
77 #define DEFAULT_LISTEN_ADDRSTR "::,0.0.0.0"
78 #else
79 #define DEFAULT_LISTEN_ADDRSTR "0.0.0.0"
80 #endif
81
82 #ifdef SSL_SUPPORT
83 struct SSLOptions Conf_SSLOptions;
84
85 static void
86 ConfSSL_Init(void)
87 {
88         free(Conf_SSLOptions.KeyFile);
89         Conf_SSLOptions.KeyFile = NULL;
90
91         free(Conf_SSLOptions.CertFile);
92         Conf_SSLOptions.CertFile = NULL;
93
94         free(Conf_SSLOptions.DHFile);
95         Conf_SSLOptions.DHFile = NULL;
96         array_free_wipe(&Conf_SSLOptions.KeyFilePassword);
97 }
98
99 static bool
100 ssl_print_configvar(const char *name, const char *file)
101 {
102         FILE *fp;
103
104         if (!file) {
105                 printf("  %s =\n", name);
106                 return true;
107         }
108
109         fp = fopen(file, "r");
110         if (fp)
111                 fclose(fp);
112         else
113                 fprintf(stderr, "ERROR: %s \"%s\": %s\n",
114                         name, file, strerror(errno));
115
116         printf("  %s = %s\n", name, file);
117         return fp != NULL;
118 }
119
120 static bool
121 ConfSSL_Puts(void)
122 {
123         bool ret;
124
125         ret = ssl_print_configvar("SSLKeyFile", Conf_SSLOptions.KeyFile);
126
127         if (!ssl_print_configvar("SSLCertFile", Conf_SSLOptions.CertFile))
128                 ret = false;
129
130         if (!ssl_print_configvar("SSLDHFile", Conf_SSLOptions.DHFile))
131                 ret = false;
132
133         if (array_bytes(&Conf_SSLOptions.KeyFilePassword))
134                 puts("  SSLKeyFilePassword = <secret>");
135
136         array_free_wipe(&Conf_SSLOptions.KeyFilePassword);
137
138         return ret;
139 }
140 #endif
141
142 static char *
143 strdup_warn(const char *str)
144 {
145         char *ptr = strdup(str);
146         if (!ptr)
147                 Config_Error(LOG_ERR, "Could not allocate mem for string: %s", str);
148         return ptr;
149 }
150
151
152 static void
153 ports_puts(array *a)
154 {
155         size_t len;
156         UINT16 *ports;
157         len = array_length(a, sizeof(UINT16));
158         if (len--) {
159                 ports = (UINT16*) array_start(a);
160                 printf("%u", (unsigned int) *ports);
161                 while (len--) {
162                         ports++;
163                         printf(", %u", (unsigned int) *ports);
164                 }
165         }
166         putc('\n', stdout);
167 }
168
169
170 static void
171 ports_parse(array *a, int Line, char *Arg)
172 {
173         char *ptr;
174         int port;
175         UINT16 port16;
176
177         array_trunc(a);
178
179         /* Ports on that the server should listen. More port numbers
180          * must be separated by "," */
181         ptr = strtok( Arg, "," );
182         while (ptr) {
183                 ngt_TrimStr(ptr);
184                 port = atoi(ptr);
185                 if (port > 0 && port < 0xFFFF) {
186                         port16 = (UINT16) port;
187                         if (!array_catb(a, (char*)&port16, sizeof port16))
188                                 Config_Error(LOG_ERR, "%s, line %d Could not add port number %ld: %s",
189                                                         NGIRCd_ConfFile, Line, port, strerror(errno));
190                 } else {
191                         Config_Error( LOG_ERR, "%s, line %d (section \"Global\"): Illegal port number %ld!",
192                                                                         NGIRCd_ConfFile, Line, port );
193                 }
194
195                 ptr = strtok( NULL, "," );
196         }
197 }
198
199
200 GLOBAL void
201 Conf_Init( void )
202 {
203         Read_Config( true );
204         Validate_Config(false, false);
205 } /* Config_Init */
206
207
208 GLOBAL bool
209 Conf_Rehash( void )
210 {
211         if (!Read_Config(false))
212                 return false;
213         Validate_Config(false, true);
214
215         /* Update CLIENT structure of local server */
216         Client_SetInfo(Client_ThisServer(), Conf_ServerInfo);
217         return true;
218 } /* Config_Rehash */
219
220
221 static const char*
222 yesno_to_str(int boolean_value)
223 {
224         if (boolean_value)
225                 return "yes";
226         return "no";
227 }
228
229
230 static void
231 opers_free(void)
232 {
233         struct Conf_Oper *op;
234         size_t len;
235         
236         len = array_length(&Conf_Opers, sizeof(*op));
237         op = array_start(&Conf_Opers);
238         while (len--) {
239                 free(op->mask);
240                 op++;
241         }
242         array_free(&Conf_Opers);
243 }
244
245 static void
246 opers_puts(void)
247 {
248         struct Conf_Oper *op;
249         size_t len;
250         
251         len = array_length(&Conf_Opers, sizeof(*op));
252         op = array_start(&Conf_Opers);
253         while (len--) {
254                 assert(op->name[0]);
255
256                 puts("[OPERATOR]");
257                 printf("  Name = %s\n", op->name);
258                 printf("  Password = %s\n", op->pwd);
259                 printf("  Mask = %s\n\n", op->mask ? op->mask : "");
260                 op++;
261         }
262 }
263
264
265 GLOBAL int
266 Conf_Test( void )
267 {
268         /* Read configuration, validate and output it. */
269
270         struct passwd *pwd;
271         struct group *grp;
272         unsigned int i;
273         bool config_valid;
274         size_t predef_channel_count;
275         struct Conf_Channel *predef_chan;
276
277         Use_Log = false;
278
279         if (! Read_Config(true))
280                 return 1;
281
282         config_valid = Validate_Config(true, false);
283
284         /* If stdin and stdout ("you can read our nice message and we can
285          * read in your keypress") are valid tty's, wait for a key: */
286         if( isatty( fileno( stdin )) && isatty( fileno( stdout ))) {
287                 puts( "OK, press enter to see a dump of your service configuration ..." );
288                 getchar( );
289         } else {
290                 puts( "Ok, dump of your server configuration follows:\n" );
291         }
292
293         puts( "[GLOBAL]" );
294         printf("  Name = %s\n", Conf_ServerName);
295         printf("  Info = %s\n", Conf_ServerInfo);
296 #ifndef PAM
297         printf("  Password = %s\n", Conf_ServerPwd);
298 #endif
299         printf("  WebircPassword = %s\n", Conf_WebircPwd);
300         printf("  AdminInfo1 = %s\n", Conf_ServerAdmin1);
301         printf("  AdminInfo2 = %s\n", Conf_ServerAdmin2);
302         printf("  AdminEMail = %s\n", Conf_ServerAdminMail);
303         printf("  MotdFile = %s\n", Conf_MotdFile);
304         printf("  MotdPhrase = %.32s\n", array_bytes(&Conf_Motd) ? (const char*) array_start(&Conf_Motd) : "");
305         printf("  ChrootDir = %s\n", Conf_Chroot);
306         printf("  PidFile = %s\n", Conf_PidFile);
307         printf("  Listen = %s\n", Conf_ListenAddress);
308         fputs("  Ports = ", stdout);
309         ports_puts(&Conf_ListenPorts);
310 #ifdef SSL_SUPPORT
311         fputs("  SSLPorts = ", stdout);
312         ports_puts(&Conf_SSLOptions.ListenPorts);
313         if (!ConfSSL_Puts())
314                 config_valid = false;
315 #endif
316
317         pwd = getpwuid(Conf_UID);
318         if (pwd)
319                 printf("  ServerUID = %s\n", pwd->pw_name);
320         else
321                 printf("  ServerUID = %ld\n", (long)Conf_UID);
322         grp = getgrgid(Conf_GID);
323         if (grp)
324                 printf("  ServerGID = %s\n", grp->gr_name);
325         else
326                 printf("  ServerGID = %ld\n", (long)Conf_GID);
327 #ifdef SYSLOG
328         printf("  SyslogFacility = %s\n",
329                ngt_SyslogFacilityName(Conf_SyslogFacility));
330 #endif
331         printf("  PingTimeout = %d\n", Conf_PingTimeout);
332         printf("  PongTimeout = %d\n", Conf_PongTimeout);
333         printf("  ConnectRetry = %d\n", Conf_ConnectRetry);
334         printf("  OperCanUseMode = %s\n", yesno_to_str(Conf_OperCanMode));
335         printf("  OperServerMode = %s\n", yesno_to_str(Conf_OperServerMode));
336         printf("  AllowRemoteOper = %s\n", yesno_to_str(Conf_AllowRemoteOper));
337         printf("  PredefChannelsOnly = %s\n", yesno_to_str(Conf_PredefChannelsOnly));
338         printf("  NoDNS = %s\n", yesno_to_str(Conf_NoDNS));
339         printf("  NoIdent = %s\n", yesno_to_str(Conf_NoIdent));
340         printf("  NoPAM = %s\n", yesno_to_str(Conf_NoPAM));
341
342 #ifdef WANT_IPV6
343         printf("  ConnectIPv4 = %s\n", yesno_to_str(Conf_ConnectIPv6));
344         printf("  ConnectIPv6 = %s\n", yesno_to_str(Conf_ConnectIPv4));
345 #endif
346         printf("  MaxConnections = %ld\n", Conf_MaxConnections);
347         printf("  MaxConnectionsIP = %d\n", Conf_MaxConnectionsIP);
348         printf("  MaxJoins = %d\n", Conf_MaxJoins > 0 ? Conf_MaxJoins : -1);
349         printf("  MaxNickLength = %u\n\n", Conf_MaxNickLength - 1);
350
351         opers_puts();
352
353         for( i = 0; i < MAX_SERVERS; i++ ) {
354                 if( ! Conf_Server[i].name[0] ) continue;
355
356                 /* Valid "Server" section */
357                 puts( "[SERVER]" );
358                 printf( "  Name = %s\n", Conf_Server[i].name );
359                 printf( "  Host = %s\n", Conf_Server[i].host );
360                 printf( "  Port = %u\n", (unsigned int)Conf_Server[i].port );
361 #ifdef SSL_SUPPORT
362                 printf( "  SSLConnect = %s\n", Conf_Server[i].SSLConnect?"yes":"no");
363 #endif
364                 printf( "  MyPassword = %s\n", Conf_Server[i].pwd_in );
365                 printf( "  PeerPassword = %s\n", Conf_Server[i].pwd_out );
366                 printf( "  ServiceMask = %s\n", Conf_Server[i].svs_mask);
367                 printf( "  Group = %d\n", Conf_Server[i].group );
368                 printf( "  Passive = %s\n\n", Conf_Server[i].flags & CONF_SFLAG_DISABLED ? "yes" : "no");
369         }
370
371         predef_channel_count = array_length(&Conf_Channels, sizeof(*predef_chan));
372         predef_chan = array_start(&Conf_Channels);
373
374         for (i = 0; i < predef_channel_count; i++, predef_chan++) {
375                 if (!predef_chan->name[0])
376                         continue;
377
378                 /* Valid "Channel" section */
379                 puts( "[CHANNEL]" );
380                 printf("  Name = %s\n", predef_chan->name);
381                 printf("  Modes = %s\n", predef_chan->modes);
382                 printf("  Key = %s\n", predef_chan->key);
383                 printf("  MaxUsers = %lu\n", predef_chan->maxusers);
384                 printf("  Topic = %s\n", predef_chan->topic);
385                 printf("  KeyFile = %s\n\n", predef_chan->keyfile);
386         }
387
388         return (config_valid ? 0 : 1);
389 } /* Conf_Test */
390
391
392 GLOBAL void
393 Conf_UnsetServer( CONN_ID Idx )
394 {
395         /* Set next time for next connection attempt, if this is a server
396          * link that is (still) configured here. If the server is set as
397          * "once", delete it from our configuration.
398          * Non-Server-Connections will be silently ignored. */
399
400         int i;
401         time_t t;
402
403         /* Check all our configured servers */
404         for( i = 0; i < MAX_SERVERS; i++ ) {
405                 if( Conf_Server[i].conn_id != Idx ) continue;
406
407                 /* Gotcha! Mark server configuration as "unused": */
408                 Conf_Server[i].conn_id = NONE;
409
410                 if( Conf_Server[i].flags & CONF_SFLAG_ONCE ) {
411                         /* Delete configuration here */
412                         Init_Server_Struct( &Conf_Server[i] );
413                 } else {
414                         /* Set time for next connect attempt */
415                         t = time(NULL);
416                         if (Conf_Server[i].lasttry < t - Conf_ConnectRetry) {
417                                 /* The connection has been "long", so we don't
418                                  * require the next attempt to be delayed. */
419                                 Conf_Server[i].lasttry =
420                                         t - Conf_ConnectRetry + RECONNECT_DELAY;
421                         } else
422                                 Conf_Server[i].lasttry = t;
423                 }
424         }
425 } /* Conf_UnsetServer */
426
427
428 GLOBAL void
429 Conf_SetServer( int ConfServer, CONN_ID Idx )
430 {
431         /* Set connection for specified configured server */
432
433         assert( ConfServer > NONE );
434         assert( Idx > NONE );
435
436         Conf_Server[ConfServer].conn_id = Idx;
437 } /* Conf_SetServer */
438
439
440 GLOBAL int
441 Conf_GetServer( CONN_ID Idx )
442 {
443         /* Get index of server in configuration structure */
444
445         int i = 0;
446
447         assert( Idx > NONE );
448
449         for( i = 0; i < MAX_SERVERS; i++ ) {
450                 if( Conf_Server[i].conn_id == Idx ) return i;
451         }
452         return NONE;
453 } /* Conf_GetServer */
454
455
456 GLOBAL bool
457 Conf_EnableServer( const char *Name, UINT16 Port )
458 {
459         /* Enable specified server and adjust port */
460
461         int i;
462
463         assert( Name != NULL );
464
465         for( i = 0; i < MAX_SERVERS; i++ ) {
466                 if( strcasecmp( Conf_Server[i].name, Name ) == 0 ) {
467                         /* Gotcha! Set port and enable server: */
468                         Conf_Server[i].port = Port;
469                         Conf_Server[i].flags &= ~CONF_SFLAG_DISABLED;
470                         return (Conf_Server[i].port && Conf_Server[i].host[0]);
471                 }
472         }
473         return false;
474 } /* Conf_EnableServer */
475
476
477 GLOBAL bool
478 Conf_EnablePassiveServer(const char *Name)
479 {
480         /* Enable specified server */
481         int i;
482
483         assert( Name != NULL );
484         for (i = 0; i < MAX_SERVERS; i++) {
485                 if ((strcasecmp( Conf_Server[i].name, Name ) == 0) && (Conf_Server[i].port > 0)) {
486                         /* BINGO! Enable server */
487                         Conf_Server[i].flags &= ~CONF_SFLAG_DISABLED;
488                         return true;
489                 }
490         }
491         return false;
492 } /* Conf_EnablePassiveServer */
493
494
495 GLOBAL bool
496 Conf_DisableServer( const char *Name )
497 {
498         /* Enable specified server and adjust port */
499
500         int i;
501
502         assert( Name != NULL );
503
504         for( i = 0; i < MAX_SERVERS; i++ ) {
505                 if( strcasecmp( Conf_Server[i].name, Name ) == 0 ) {
506                         /* Gotcha! Disable and disconnect server: */
507                         Conf_Server[i].flags |= CONF_SFLAG_DISABLED;
508                         if( Conf_Server[i].conn_id > NONE ) Conn_Close( Conf_Server[i].conn_id, NULL, "Server link terminated on operator request", true);
509                         return true;
510                 }
511         }
512         return false;
513 } /* Conf_DisableServer */
514
515
516 GLOBAL bool
517 Conf_AddServer( const char *Name, UINT16 Port, const char *Host, const char *MyPwd, const char *PeerPwd )
518 {
519         /* Add new server to configuration */
520
521         int i;
522
523         assert( Name != NULL );
524         assert( Host != NULL );
525         assert( MyPwd != NULL );
526         assert( PeerPwd != NULL );
527
528         /* Search unused item in server configuration structure */
529         for( i = 0; i < MAX_SERVERS; i++ ) {
530                 /* Is this item used? */
531                 if( ! Conf_Server[i].name[0] ) break;
532         }
533         if( i >= MAX_SERVERS ) return false;
534
535         Init_Server_Struct( &Conf_Server[i] );
536         strlcpy( Conf_Server[i].name, Name, sizeof( Conf_Server[i].name ));
537         strlcpy( Conf_Server[i].host, Host, sizeof( Conf_Server[i].host ));
538         strlcpy( Conf_Server[i].pwd_out, MyPwd, sizeof( Conf_Server[i].pwd_out ));
539         strlcpy( Conf_Server[i].pwd_in, PeerPwd, sizeof( Conf_Server[i].pwd_in ));
540         Conf_Server[i].port = Port;
541         Conf_Server[i].flags = CONF_SFLAG_ONCE;
542
543         return true;
544 } /* Conf_AddServer */
545
546
547 /**
548  * Check if the given nick name is an service
549  */
550 GLOBAL bool
551 Conf_IsService(int ConfServer, const char *Nick)
552 {
553         return MatchCaseInsensitive(Conf_Server[ConfServer].svs_mask, Nick);
554 } /* Conf_IsService */
555
556
557 /**
558  * Initialize configuration settings with their default values.
559  */
560 static void
561 Set_Defaults(bool InitServers)
562 {
563         int i;
564
565         strcpy(Conf_ServerName, "");
566         snprintf(Conf_ServerInfo, sizeof Conf_ServerInfo, "%s %s",
567                  PACKAGE_NAME, PACKAGE_VERSION);
568         strcpy(Conf_ServerPwd, "");
569
570         strcpy(Conf_ServerAdmin1, "");
571         strcpy(Conf_ServerAdmin2, "");
572         strcpy(Conf_ServerAdminMail, "");
573
574         strlcpy(Conf_MotdFile, SYSCONFDIR, sizeof(Conf_MotdFile));
575         strlcat(Conf_MotdFile, MOTD_FILE, sizeof(Conf_MotdFile));
576
577         Conf_UID = Conf_GID = 0;
578         strlcpy(Conf_Chroot, CHROOT_DIR, sizeof(Conf_Chroot));
579         strlcpy(Conf_PidFile, PID_FILE, sizeof(Conf_PidFile));
580
581         free(Conf_ListenAddress);
582         Conf_ListenAddress = NULL;
583
584         Conf_PingTimeout = 120;
585         Conf_PongTimeout = 20;
586         Conf_ConnectRetry = 60;
587         Conf_NoDNS = false;
588         Conf_NoIdent = false;
589         Conf_NoPAM = false;
590
591         Conf_Oper_Count = 0;
592         Conf_Channel_Count = 0;
593
594         Conf_OperCanMode = false;
595         Conf_OperServerMode = false;
596         Conf_AllowRemoteOper = false;
597         Conf_PredefChannelsOnly = false;
598
599         Conf_ConnectIPv4 = true;
600         Conf_ConnectIPv6 = true;
601
602         Conf_MaxConnections = 0;
603         Conf_MaxConnectionsIP = 5;
604         Conf_MaxJoins = 10;
605         Conf_MaxNickLength = CLIENT_NICK_LEN_DEFAULT;
606
607 #ifdef SYSLOG
608 #ifdef LOG_LOCAL5
609         Conf_SyslogFacility = LOG_LOCAL5;
610 #else
611         Conf_SyslogFacility = 0;
612 #endif
613 #endif
614
615         /* Initialize server configuration structures */
616         if (InitServers) {
617                 for (i = 0; i < MAX_SERVERS;
618                      Init_Server_Struct(&Conf_Server[i++]));
619         }
620 } /* Set_Defaults */
621
622
623 static bool
624 no_listenports(void)
625 {
626         size_t cnt = array_bytes(&Conf_ListenPorts);
627 #ifdef SSL_SUPPORT
628         cnt += array_bytes(&Conf_SSLOptions.ListenPorts);
629 #endif
630         return cnt == 0;
631 }
632
633 static void
634 Read_Motd(const char *filename)
635 {
636         char line[127];
637         FILE *fp;
638
639         if (*filename == '\0')
640                 return;
641
642         fp = fopen(filename, "r");
643         if (!fp) {
644                 Log(LOG_WARNING, "Can't read MOTD file \"%s\": %s",
645                                         filename, strerror(errno));
646                 return;
647         }
648
649         array_free(&Conf_Motd);
650
651         while (fgets(line, (int)sizeof line, fp)) {
652                 ngt_TrimLastChr( line, '\n');
653
654                 /* add text including \0 */
655                 if (!array_catb(&Conf_Motd, line, strlen(line) + 1)) {
656                         Log(LOG_WARNING, "Cannot add MOTD text: %s", strerror(errno));
657                         break;
658                 }
659         }
660         fclose(fp);
661 }
662
663 static bool
664 Read_Config( bool ngircd_starting )
665 {
666         /* Read configuration file. */
667
668         char section[LINE_LEN], str[LINE_LEN], *var, *arg, *ptr;
669         const UINT16 defaultport = 6667;
670         int line, i, n;
671         FILE *fd;
672
673         /* Open configuration file */
674         fd = fopen( NGIRCd_ConfFile, "r" );
675         if( ! fd ) {
676                 /* No configuration file found! */
677                 Config_Error( LOG_ALERT, "Can't read configuration \"%s\": %s",
678                                         NGIRCd_ConfFile, strerror( errno ));
679                 if (!ngircd_starting)
680                         return false;
681                 Config_Error( LOG_ALERT, "%s exiting due to fatal errors!", PACKAGE_NAME );
682                 exit( 1 );
683         }
684
685         opers_free();
686         Set_Defaults( ngircd_starting );
687
688         Config_Error( LOG_INFO, "Reading configuration from \"%s\" ...", NGIRCd_ConfFile );
689
690         /* Clean up server configuration structure: mark all already
691          * configured servers as "once" so that they are deleted
692          * after the next disconnect and delete all unused servers.
693          * And delete all servers which are "duplicates" of servers
694          * that are already marked as "once" (such servers have been
695          * created by the last rehash but are now useless). */
696         for( i = 0; i < MAX_SERVERS; i++ ) {
697                 if( Conf_Server[i].conn_id == NONE ) Init_Server_Struct( &Conf_Server[i] );
698                 else {
699                         /* This structure is in use ... */
700                         if( Conf_Server[i].flags & CONF_SFLAG_ONCE ) {
701                                 /* Check for duplicates */
702                                 for( n = 0; n < MAX_SERVERS; n++ ) {
703                                         if( n == i ) continue;
704
705                                         if( Conf_Server[i].conn_id == Conf_Server[n].conn_id ) {
706                                                 Init_Server_Struct( &Conf_Server[n] );
707 #ifdef DEBUG
708                                                 Log(LOG_DEBUG,"Deleted unused duplicate server %d (kept %d).",
709                                                                                                 n, i );
710 #endif
711                                         }
712                                 }
713                         } else {
714                                 /* Mark server as "once" */
715                                 Conf_Server[i].flags |= CONF_SFLAG_ONCE;
716                                 Log( LOG_DEBUG, "Marked server %d as \"once\"", i );
717                         }
718                 }
719         }
720
721         /* Initialize variables */
722         line = 0;
723         strcpy( section, "" );
724         Init_Server_Struct( &New_Server );
725         New_Server_Idx = NONE;
726 #ifdef SSL_SUPPORT
727         ConfSSL_Init();
728 #endif
729         /* Read configuration file */
730         while( true ) {
731                 if( ! fgets( str, LINE_LEN, fd )) break;
732                 ngt_TrimStr( str );
733                 line++;
734
735                 /* Skip comments and empty lines */
736                 if( str[0] == ';' || str[0] == '#' || str[0] == '\0' ) continue;
737
738                 /* Is this the beginning of a new section? */
739                 if(( str[0] == '[' ) && ( str[strlen( str ) - 1] == ']' )) {
740                         strlcpy( section, str, sizeof( section ));
741                         if( strcasecmp( section, "[GLOBAL]" ) == 0 )
742                                 continue;
743
744                         if( strcasecmp( section, "[SERVER]" ) == 0 ) {
745                                 /* Check if there is already a server to add */
746                                 if( New_Server.name[0] ) {
747                                         /* Copy data to "real" server structure */
748                                         assert( New_Server_Idx > NONE );
749                                         Conf_Server[New_Server_Idx] = New_Server;
750                                 }
751
752                                 /* Re-init structure for new server */
753                                 Init_Server_Struct( &New_Server );
754
755                                 /* Search unused item in server configuration structure */
756                                 for( i = 0; i < MAX_SERVERS; i++ ) {
757                                         /* Is this item used? */
758                                         if( ! Conf_Server[i].name[0] ) break;
759                                 }
760                                 if( i >= MAX_SERVERS ) {
761                                         /* Oops, no free item found! */
762                                         Config_Error( LOG_ERR, "Too many servers configured." );
763                                         New_Server_Idx = NONE;
764                                 }
765                                 else New_Server_Idx = i;
766                                 continue;
767                         }
768                         if (strcasecmp(section, "[CHANNEL]") == 0) {
769                                 Conf_Channel_Count++;
770                                 continue;
771                         }
772                         if (strcasecmp(section, "[OPERATOR]") == 0) {
773                                 Conf_Oper_Count++;
774                                 continue;
775                         }
776
777                         Config_Error( LOG_ERR, "%s, line %d: Unknown section \"%s\"!", NGIRCd_ConfFile, line, section );
778                         section[0] = 0x1;
779                 }
780                 if( section[0] == 0x1 ) continue;
781
782                 /* Split line into variable name and parameters */
783                 ptr = strchr( str, '=' );
784                 if( ! ptr ) {
785                         Config_Error( LOG_ERR, "%s, line %d: Syntax error!", NGIRCd_ConfFile, line );
786                         continue;
787                 }
788                 *ptr = '\0';
789                 var = str; ngt_TrimStr( var );
790                 arg = ptr + 1; ngt_TrimStr( arg );
791
792                 if( strcasecmp( section, "[GLOBAL]" ) == 0 ) Handle_GLOBAL( line, var, arg );
793                 else if( strcasecmp( section, "[OPERATOR]" ) == 0 ) Handle_OPERATOR( line, var, arg );
794                 else if( strcasecmp( section, "[SERVER]" ) == 0 ) Handle_SERVER( line, var, arg );
795                 else if( strcasecmp( section, "[CHANNEL]" ) == 0 ) Handle_CHANNEL( line, var, arg );
796                 else Config_Error( LOG_ERR, "%s, line %d: Variable \"%s\" outside section!", NGIRCd_ConfFile, line, var );
797         }
798
799         /* Close configuration file */
800         fclose( fd );
801
802         /* Check if there is still a server to add */
803         if( New_Server.name[0] ) {
804                 /* Copy data to "real" server structure */
805                 assert( New_Server_Idx > NONE );
806                 Conf_Server[New_Server_Idx] = New_Server;
807         }
808
809         /* not a single listening port? Add default. */
810         if (no_listenports() &&
811                 !array_copyb(&Conf_ListenPorts, (char*) &defaultport, sizeof defaultport))
812         {
813                 Config_Error(LOG_ALERT, "Could not add default listening Port %u: %s",
814                                         (unsigned int) defaultport, strerror(errno));
815
816                 exit(1);
817         }
818
819         if (!Conf_ListenAddress)
820                 Conf_ListenAddress = strdup_warn(DEFAULT_LISTEN_ADDRSTR);
821
822         if (!Conf_ListenAddress) {
823                 Config_Error(LOG_ALERT, "%s exiting due to fatal errors!", PACKAGE_NAME);
824                 exit(1);
825         }
826
827         /* No MOTD phrase configured? (re)try motd file. */
828         if (array_bytes(&Conf_Motd) == 0)
829                 Read_Motd(Conf_MotdFile);
830         return true;
831 } /* Read_Config */
832
833
834 static bool
835 Check_ArgIsTrue( const char *Arg )
836 {
837         if( strcasecmp( Arg, "yes" ) == 0 ) return true;
838         if( strcasecmp( Arg, "true" ) == 0 ) return true;
839         if( atoi( Arg ) != 0 ) return true;
840
841         return false;
842 } /* Check_ArgIsTrue */
843
844
845 static unsigned int Handle_MaxNickLength(int Line, const char *Arg)
846 {
847         unsigned new;
848
849         new = (unsigned) atoi(Arg) + 1;
850         if (new > CLIENT_NICK_LEN) {
851                 Config_Error(LOG_WARNING,
852                              "%s, line %d: Value of \"MaxNickLength\" exceeds %u!",
853                              NGIRCd_ConfFile, Line, CLIENT_NICK_LEN - 1);
854                 return CLIENT_NICK_LEN;
855         }
856         if (new < 2) {
857                 Config_Error(LOG_WARNING,
858                              "%s, line %d: Value of \"MaxNickLength\" must be at least 1!",
859                              NGIRCd_ConfFile, Line);
860                 return 2;
861         }
862         return new;
863 } /* Handle_MaxNickLength */
864
865
866
867 static void
868 Handle_GLOBAL( int Line, char *Var, char *Arg )
869 {
870         struct passwd *pwd;
871         struct group *grp;
872         size_t len;
873         
874         assert( Line > 0 );
875         assert( Var != NULL );
876         assert( Arg != NULL );
877         
878         if( strcasecmp( Var, "Name" ) == 0 ) {
879                 /* Server name */
880                 len = strlcpy( Conf_ServerName, Arg, sizeof( Conf_ServerName ));
881                 if (len >= sizeof( Conf_ServerName ))
882                         Config_Error_TooLong( Line, Var );
883                 return;
884         }
885         if( strcasecmp( Var, "Info" ) == 0 ) {
886                 /* Info text of server */
887                 len = strlcpy( Conf_ServerInfo, Arg, sizeof( Conf_ServerInfo ));
888                 if (len >= sizeof( Conf_ServerInfo ))
889                         Config_Error_TooLong ( Line, Var );
890                 return;
891         }
892         if( strcasecmp( Var, "Password" ) == 0 ) {
893                 /* Global server password */
894                 len = strlcpy( Conf_ServerPwd, Arg, sizeof( Conf_ServerPwd ));
895                 if (len >= sizeof( Conf_ServerPwd ))
896                         Config_Error_TooLong( Line, Var );
897                 return;
898         }
899         if (strcasecmp(Var, "WebircPassword") == 0) {
900                 /* Password required for WEBIRC command */
901                 len = strlcpy(Conf_WebircPwd, Arg, sizeof(Conf_WebircPwd));
902                 if (len >= sizeof(Conf_WebircPwd))
903                         Config_Error_TooLong(Line, Var);
904                 return;
905         }
906         if( strcasecmp( Var, "AdminInfo1" ) == 0 ) {
907                 /* Administrative info #1 */
908                 len = strlcpy( Conf_ServerAdmin1, Arg, sizeof( Conf_ServerAdmin1 ));
909                 if (len >= sizeof( Conf_ServerAdmin1 ))
910                         Config_Error_TooLong ( Line, Var );
911                 return;
912         }
913         if( strcasecmp( Var, "AdminInfo2" ) == 0 ) {
914                 /* Administrative info #2 */
915                 len = strlcpy( Conf_ServerAdmin2, Arg, sizeof( Conf_ServerAdmin2 ));
916                 if (len >= sizeof( Conf_ServerAdmin2 ))
917                         Config_Error_TooLong ( Line, Var );
918                 return;
919         }
920         if( strcasecmp( Var, "AdminEMail" ) == 0 ) {
921                 /* Administrative email contact */
922                 len = strlcpy( Conf_ServerAdminMail, Arg, sizeof( Conf_ServerAdminMail ));
923                 if (len >= sizeof( Conf_ServerAdminMail ))
924                         Config_Error_TooLong( Line, Var );
925                 return;
926         }
927
928         if( strcasecmp( Var, "Ports" ) == 0 ) {
929                 ports_parse(&Conf_ListenPorts, Line, Arg);
930                 return;
931         }
932         if( strcasecmp( Var, "MotdFile" ) == 0 ) {
933                 len = strlcpy( Conf_MotdFile, Arg, sizeof( Conf_MotdFile ));
934                 if (len >= sizeof( Conf_MotdFile ))
935                         Config_Error_TooLong( Line, Var );
936                 Read_Motd(Arg);
937                 return;
938         }
939         if( strcasecmp( Var, "MotdPhrase" ) == 0 ) {
940                 /* "Message of the day" phrase (instead of file) */
941                 len = strlen(Arg);
942                 if (len == 0)
943                         return;
944                 if (len >= LINE_LEN) {
945                         Config_Error_TooLong( Line, Var );
946                         return;
947                 }
948                 if (!array_copyb(&Conf_Motd, Arg, len + 1))
949                         Config_Error(LOG_WARNING, "%s, line %d: Could not append MotdPhrase: %s",
950                                                         NGIRCd_ConfFile, Line, strerror(errno));
951                 return;
952         }
953         if( strcasecmp( Var, "ChrootDir" ) == 0 ) {
954                 /* directory for chroot() */
955                 len = strlcpy( Conf_Chroot, Arg, sizeof( Conf_Chroot ));
956                 if (len >= sizeof( Conf_Chroot ))
957                         Config_Error_TooLong( Line, Var );
958                 return;
959         }
960         if ( strcasecmp( Var, "PidFile" ) == 0 ) {
961                 /* name of pidfile */
962                 len = strlcpy( Conf_PidFile, Arg, sizeof( Conf_PidFile ));
963                 if (len >= sizeof( Conf_PidFile ))
964                         Config_Error_TooLong( Line, Var );
965                 return;
966         }
967         if( strcasecmp( Var, "ServerUID" ) == 0 ) {
968                 /* UID the daemon should switch to */
969                 pwd = getpwnam( Arg );
970                 if( pwd ) Conf_UID = pwd->pw_uid;
971                 else {
972 #ifdef HAVE_ISDIGIT
973                         if( ! isdigit( (int)*Arg )) Config_Error_NaN( Line, Var );
974                         else
975 #endif
976                         Conf_UID = (unsigned int)atoi( Arg );
977                 }
978                 return;
979         }
980         if( strcasecmp( Var, "ServerGID" ) == 0 ) {
981                 /* GID the daemon should use */
982                 grp = getgrnam( Arg );
983                 if( grp ) Conf_GID = grp->gr_gid;
984                 else {
985 #ifdef HAVE_ISDIGIT
986                         if( ! isdigit( (int)*Arg )) Config_Error_NaN( Line, Var );
987                         else
988 #endif
989                         Conf_GID = (unsigned int)atoi( Arg );
990                 }
991                 return;
992         }
993         if( strcasecmp( Var, "PingTimeout" ) == 0 ) {
994                 /* PING timeout */
995                 Conf_PingTimeout = atoi( Arg );
996                 if( Conf_PingTimeout < 5 ) {
997                         Config_Error( LOG_WARNING, "%s, line %d: Value of \"PingTimeout\" too low!",
998                                                                         NGIRCd_ConfFile, Line );
999                         Conf_PingTimeout = 5;
1000                 }
1001                 return;
1002         }
1003         if( strcasecmp( Var, "PongTimeout" ) == 0 ) {
1004                 /* PONG timeout */
1005                 Conf_PongTimeout = atoi( Arg );
1006                 if( Conf_PongTimeout < 5 ) {
1007                         Config_Error( LOG_WARNING, "%s, line %d: Value of \"PongTimeout\" too low!",
1008                                                                         NGIRCd_ConfFile, Line );
1009                         Conf_PongTimeout = 5;
1010                 }
1011                 return;
1012         }
1013         if( strcasecmp( Var, "ConnectRetry" ) == 0 ) {
1014                 /* Seconds between connection attempts to other servers */
1015                 Conf_ConnectRetry = atoi( Arg );
1016                 if( Conf_ConnectRetry < 5 ) {
1017                         Config_Error( LOG_WARNING, "%s, line %d: Value of \"ConnectRetry\" too low!",
1018                                                                         NGIRCd_ConfFile, Line );
1019                         Conf_ConnectRetry = 5;
1020                 }
1021                 return;
1022         }
1023         if( strcasecmp( Var, "PredefChannelsOnly" ) == 0 ) {
1024                 /* Should we only allow pre-defined-channels? (i.e. users cannot create their own channels) */
1025                 Conf_PredefChannelsOnly = Check_ArgIsTrue( Arg );
1026                 return;
1027         }
1028         if( strcasecmp( Var, "NoDNS" ) == 0 ) {
1029                 /* don't do reverse dns lookups when clients connect? */
1030                 Conf_NoDNS = Check_ArgIsTrue( Arg );
1031                 return;
1032         }
1033         if (strcasecmp(Var, "NoIdent") == 0) {
1034                 /* don't do IDENT lookups when clients connect? */
1035                 Conf_NoIdent = Check_ArgIsTrue(Arg);
1036 #ifndef IDENTAUTH
1037                 if (!Conf_NoIdent) {
1038                         /* user has enabled ident lookups explicitly, but ... */
1039                         Config_Error(LOG_WARNING,
1040                                 "%s: line %d: NoIdent=False, but ngircd was built without IDENT support",
1041                                 NGIRCd_ConfFile, Line);
1042                 }
1043 #endif
1044                 return;
1045         }
1046         if(strcasecmp(Var, "NoPAM") == 0) {
1047                 /* don't use PAM library to authenticate users */
1048                 Conf_NoPAM = Check_ArgIsTrue(Arg);
1049                 return;
1050         }
1051 #ifdef WANT_IPV6
1052         /* the default setting for all the WANT_IPV6 special options is 'true' */
1053         if( strcasecmp( Var, "ConnectIPv6" ) == 0 ) {
1054                 /* connect to other hosts using ipv6, if they have an AAAA record? */
1055                 Conf_ConnectIPv6 = Check_ArgIsTrue( Arg );
1056                 return;
1057         }
1058         if( strcasecmp( Var, "ConnectIPv4" ) == 0 ) {
1059                 /* connect to other hosts using ipv4.
1060                  * again, this can be used for ipv6-only setups */
1061                 Conf_ConnectIPv4 = Check_ArgIsTrue( Arg );
1062                 return;
1063         }
1064 #endif
1065         if( strcasecmp( Var, "OperCanUseMode" ) == 0 ) {
1066                 /* Are IRC operators allowed to use MODE in channels they aren't Op in? */
1067                 Conf_OperCanMode = Check_ArgIsTrue( Arg );
1068                 return;
1069         }
1070         if( strcasecmp( Var, "OperServerMode" ) == 0 ) {
1071                 /* Mask IRC operator as if coming from the server? (ircd-irc2 compat hack) */
1072                 Conf_OperServerMode = Check_ArgIsTrue( Arg );
1073                 return;
1074         }
1075         if(strcasecmp(Var, "AllowRemoteOper") == 0) {
1076                 /* Are remote IRC operators allowed to control this server? */
1077                 Conf_AllowRemoteOper = Check_ArgIsTrue(Arg);
1078                 return;
1079         }
1080         if( strcasecmp( Var, "MaxConnections" ) == 0 ) {
1081                 /* Maximum number of connections. 0 -> "no limit". */
1082 #ifdef HAVE_ISDIGIT
1083                 if( ! isdigit( (int)*Arg )) Config_Error_NaN( Line, Var);
1084                 else
1085 #endif
1086                 Conf_MaxConnections = atol( Arg );
1087                 return;
1088         }
1089         if( strcasecmp( Var, "MaxConnectionsIP" ) == 0 ) {
1090                 /* Maximum number of simultaneous connections from one IP. 0 -> "no limit" */
1091 #ifdef HAVE_ISDIGIT
1092                 if( ! isdigit( (int)*Arg )) Config_Error_NaN( Line, Var );
1093                 else
1094 #endif
1095                 Conf_MaxConnectionsIP = atoi( Arg );
1096                 return;
1097         }
1098         if( strcasecmp( Var, "MaxJoins" ) == 0 ) {
1099                 /* Maximum number of channels a user can join. 0 -> "no limit". */
1100 #ifdef HAVE_ISDIGIT
1101                 if( ! isdigit( (int)*Arg )) Config_Error_NaN( Line, Var );
1102                 else
1103 #endif
1104                 Conf_MaxJoins = atoi( Arg );
1105                 return;
1106         }
1107         if( strcasecmp( Var, "MaxNickLength" ) == 0 ) {
1108                 /* Maximum length of a nick name; must be same on all servers
1109                  * within the IRC network! */
1110                 Conf_MaxNickLength = Handle_MaxNickLength(Line, Arg);
1111                 return;
1112         }
1113
1114         if( strcasecmp( Var, "Listen" ) == 0 ) {
1115                 /* IP-Address to bind sockets */
1116                 if (Conf_ListenAddress) {
1117                         Config_Error(LOG_ERR, "Multiple Listen= options, ignoring: %s", Arg);
1118                         return;
1119                 }
1120                 Conf_ListenAddress = strdup_warn(Arg);
1121                 /*
1122                  * if allocation fails, we're in trouble:
1123                  * we cannot ignore the error -- otherwise ngircd
1124                  * would listen on all interfaces.
1125                  */
1126                 if (!Conf_ListenAddress) {
1127                         Config_Error(LOG_ALERT, "%s exiting due to fatal errors!", PACKAGE_NAME);
1128                         exit(1);
1129                 }
1130                 return;
1131         }
1132
1133 #ifdef SSL_SUPPORT
1134         if( strcasecmp( Var, "SSLPorts" ) == 0 ) {
1135                 ports_parse(&Conf_SSLOptions.ListenPorts, Line, Arg);
1136                 return;
1137         }
1138
1139         if( strcasecmp( Var, "SSLKeyFile" ) == 0 ) {
1140                 assert(Conf_SSLOptions.KeyFile == NULL );
1141                 Conf_SSLOptions.KeyFile = strdup_warn(Arg);
1142                 return;
1143         }
1144         if( strcasecmp( Var, "SSLCertFile" ) == 0 ) {
1145                 assert(Conf_SSLOptions.CertFile == NULL );
1146                 Conf_SSLOptions.CertFile = strdup_warn(Arg);
1147                 return;
1148         }
1149
1150         if( strcasecmp( Var, "SSLKeyFilePassword" ) == 0 ) {
1151                 assert(array_bytes(&Conf_SSLOptions.KeyFilePassword) == 0);
1152                 if (!array_copys(&Conf_SSLOptions.KeyFilePassword, Arg))
1153                         Config_Error( LOG_ERR, "%s, line %d (section \"Global\"): Could not copy %s: %s!",
1154                                                                 NGIRCd_ConfFile, Line, Var, strerror(errno));
1155                 return;
1156         }
1157         if( strcasecmp( Var, "SSLDHFile" ) == 0 ) {
1158                 assert(Conf_SSLOptions.DHFile == NULL);
1159                 Conf_SSLOptions.DHFile = strdup_warn( Arg );
1160                 return;
1161         }
1162 #endif
1163 #ifdef SYSLOG
1164         if (strcasecmp(Var, "SyslogFacility") == 0) {
1165                 Conf_SyslogFacility = ngt_SyslogFacilityID(Arg,
1166                                                            Conf_SyslogFacility);
1167                 return;
1168         }
1169 #endif
1170         Config_Error(LOG_ERR, "%s, line %d (section \"Global\"): Unknown variable \"%s\"!",
1171                                                                 NGIRCd_ConfFile, Line, Var);
1172 } /* Handle_GLOBAL */
1173
1174
1175 static void
1176 Handle_OPERATOR( int Line, char *Var, char *Arg )
1177 {
1178         size_t len;
1179         struct Conf_Oper *op;
1180
1181         assert( Line > 0 );
1182         assert( Var != NULL );
1183         assert( Arg != NULL );
1184         assert( Conf_Oper_Count > 0 );
1185
1186         op = array_alloc(&Conf_Opers, sizeof(*op), Conf_Oper_Count - 1);
1187         if (!op) {
1188                 Config_Error(LOG_ERR, "Could not allocate memory for operator (%d:%s = %s)", Line, Var, Arg);
1189                 return;
1190         }
1191
1192         if (strcasecmp(Var, "Name") == 0) {
1193                 /* Name of IRC operator */
1194                 len = strlcpy(op->name, Arg, sizeof(op->name));
1195                 if (len >= sizeof(op->name))
1196                                 Config_Error_TooLong(Line, Var);
1197                 return;
1198         }
1199         if (strcasecmp(Var, "Password") == 0) {
1200                 /* Password of IRC operator */
1201                 len = strlcpy(op->pwd, Arg, sizeof(op->pwd));
1202                 if (len >= sizeof(op->pwd))
1203                                 Config_Error_TooLong(Line, Var);
1204                 return;
1205         }
1206         if (strcasecmp(Var, "Mask") == 0) {
1207                 if (op->mask)
1208                         return; /* Hostname already configured */
1209                 op->mask = strdup_warn( Arg );
1210                 return;
1211         }
1212         Config_Error( LOG_ERR, "%s, line %d (section \"Operator\"): Unknown variable \"%s\"!",
1213                                                                 NGIRCd_ConfFile, Line, Var );
1214 } /* Handle_OPERATOR */
1215
1216
1217 static void
1218 Handle_SERVER( int Line, char *Var, char *Arg )
1219 {
1220         long port;
1221         size_t len;
1222         
1223         assert( Line > 0 );
1224         assert( Var != NULL );
1225         assert( Arg != NULL );
1226
1227         /* Ignore server block if no space is left in server configuration structure */
1228         if( New_Server_Idx <= NONE ) return;
1229
1230         if( strcasecmp( Var, "Host" ) == 0 ) {
1231                 /* Hostname of the server */
1232                 len = strlcpy( New_Server.host, Arg, sizeof( New_Server.host ));
1233                 if (len >= sizeof( New_Server.host ))
1234                         Config_Error_TooLong ( Line, Var );
1235                 return;
1236         }
1237         if( strcasecmp( Var, "Name" ) == 0 ) {
1238                 /* Name of the server ("Nick"/"ID") */
1239                 len = strlcpy( New_Server.name, Arg, sizeof( New_Server.name ));
1240                 if (len >= sizeof( New_Server.name ))
1241                         Config_Error_TooLong( Line, Var );
1242                 return;
1243         }
1244         if (strcasecmp(Var, "Bind") == 0) {
1245                 if (ng_ipaddr_init(&New_Server.bind_addr, Arg, 0))
1246                         return;
1247
1248                 Config_Error(LOG_ERR, "%s, line %d (section \"Server\"): Can't parse IP address \"%s\"",
1249                                 NGIRCd_ConfFile, Line, Arg);
1250                 return;
1251         }
1252         if( strcasecmp( Var, "MyPassword" ) == 0 ) {
1253                 /* Password of this server which is sent to the peer */
1254                 if (*Arg == ':') {
1255                         Config_Error(LOG_ERR,
1256                                 "%s, line %d (section \"Server\"): MyPassword must not start with ':'!",
1257                                                                                 NGIRCd_ConfFile, Line);
1258                 }
1259                 len = strlcpy( New_Server.pwd_in, Arg, sizeof( New_Server.pwd_in ));
1260                 if (len >= sizeof( New_Server.pwd_in ))
1261                         Config_Error_TooLong( Line, Var );
1262                 return;
1263         }
1264         if( strcasecmp( Var, "PeerPassword" ) == 0 ) {
1265                 /* Passwort of the peer which must be received */
1266                 len = strlcpy( New_Server.pwd_out, Arg, sizeof( New_Server.pwd_out ));
1267                 if (len >= sizeof( New_Server.pwd_out ))
1268                         Config_Error_TooLong( Line, Var );
1269                 return;
1270         }
1271         if( strcasecmp( Var, "Port" ) == 0 ) {
1272                 /* Port to which this server should connect */
1273                 port = atol( Arg );
1274                 if( port > 0 && port < 0xFFFF )
1275                         New_Server.port = (UINT16)port;
1276                 else
1277                         Config_Error( LOG_ERR, "%s, line %d (section \"Server\"): Illegal port number %ld!",
1278                                                                                 NGIRCd_ConfFile, Line, port );
1279                 return;
1280         }
1281 #ifdef SSL_SUPPORT
1282         if( strcasecmp( Var, "SSLConnect" ) == 0 ) {
1283                 New_Server.SSLConnect = Check_ArgIsTrue(Arg);
1284                 return;
1285         }
1286 #endif
1287         if( strcasecmp( Var, "Group" ) == 0 ) {
1288                 /* Server group */
1289 #ifdef HAVE_ISDIGIT
1290                 if( ! isdigit( (int)*Arg ))
1291                         Config_Error_NaN( Line, Var );
1292                 else
1293 #endif
1294                 New_Server.group = atoi( Arg );
1295                 return;
1296         }
1297         if( strcasecmp( Var, "Passive" ) == 0 ) {
1298                 if (Check_ArgIsTrue(Arg))
1299                         New_Server.flags |= CONF_SFLAG_DISABLED;
1300                 return;
1301         }
1302         if (strcasecmp(Var, "ServiceMask") == 0) {
1303                 len = strlcpy(New_Server.svs_mask, ngt_LowerStr(Arg),
1304                               sizeof(New_Server.svs_mask));
1305                 if (len >= sizeof(New_Server.svs_mask))
1306                         Config_Error_TooLong(Line, Var);
1307                 return;
1308         }
1309
1310         Config_Error( LOG_ERR, "%s, line %d (section \"Server\"): Unknown variable \"%s\"!",
1311                                                                 NGIRCd_ConfFile, Line, Var );
1312 } /* Handle_SERVER */
1313
1314
1315 static bool
1316 Handle_Channelname(struct Conf_Channel *new_chan, const char *name)
1317 {
1318         size_t size = sizeof(new_chan->name);
1319         char *dest = new_chan->name;
1320
1321         if (!Channel_IsValidName(name)) {
1322                 /*
1323                  * maybe user forgot to add a '#'.
1324                  * This is only here for user convenience.
1325                  */
1326                 *dest = '#';
1327                 --size;
1328                 ++dest;
1329         }
1330         return size > strlcpy(dest, name, size);
1331 }
1332
1333
1334 static void
1335 Handle_CHANNEL(int Line, char *Var, char *Arg)
1336 {
1337         size_t len;
1338         size_t chancount;
1339         struct Conf_Channel *chan;
1340
1341         assert( Line > 0 );
1342         assert( Var != NULL );
1343         assert( Arg != NULL );
1344         assert(Conf_Channel_Count > 0);
1345
1346         chancount = Conf_Channel_Count - 1;
1347
1348         chan = array_alloc(&Conf_Channels, sizeof(*chan), chancount);
1349         if (!chan) {
1350                 Config_Error(LOG_ERR, "Could not allocate memory for predefined channel (%d:%s = %s)", Line, Var, Arg);
1351                 return;
1352         }
1353         if (strcasecmp(Var, "Name") == 0) {
1354                 if (!Handle_Channelname(chan, Arg))
1355                         Config_Error_TooLong(Line, Var);
1356                 return;
1357         }
1358         if (strcasecmp(Var, "Modes") == 0) {
1359                 /* Initial modes */
1360                 len = strlcpy(chan->modes, Arg, sizeof(chan->modes));
1361                 if (len >= sizeof(chan->modes))
1362                         Config_Error_TooLong( Line, Var );
1363                 return;
1364         }
1365         if( strcasecmp( Var, "Topic" ) == 0 ) {
1366                 /* Initial topic */
1367                 len = strlcpy(chan->topic, Arg, sizeof(chan->topic));
1368                 if (len >= sizeof(chan->topic))
1369                         Config_Error_TooLong( Line, Var );
1370                 return;
1371         }
1372         if( strcasecmp( Var, "Key" ) == 0 ) {
1373                 /* Initial Channel Key (mode k) */
1374                 len = strlcpy(chan->key, Arg, sizeof(chan->key));
1375                 if (len >= sizeof(chan->key))
1376                         Config_Error_TooLong(Line, Var);
1377                 return;
1378         }
1379         if( strcasecmp( Var, "MaxUsers" ) == 0 ) {
1380                 /* maximum user limit, mode l */
1381                 chan->maxusers = (unsigned long) atol(Arg);
1382                 if (chan->maxusers == 0)
1383                         Config_Error_NaN(Line, Var);
1384                 return;
1385         }
1386         if (strcasecmp(Var, "KeyFile") == 0) {
1387                 /* channel keys */
1388                 len = strlcpy(chan->keyfile, Arg, sizeof(chan->keyfile));
1389                 if (len >= sizeof(chan->keyfile))
1390                         Config_Error_TooLong(Line, Var);
1391                 return;
1392         }
1393
1394         Config_Error( LOG_ERR, "%s, line %d (section \"Channel\"): Unknown variable \"%s\"!",
1395                                                                 NGIRCd_ConfFile, Line, Var );
1396 } /* Handle_CHANNEL */
1397
1398
1399 static bool
1400 Validate_Config(bool Configtest, bool Rehash)
1401 {
1402         /* Validate configuration settings. */
1403
1404 #ifdef DEBUG
1405         int i, servers, servers_once;
1406 #endif
1407         bool config_valid = true;
1408         char *ptr;
1409
1410         /* Validate configured server name, see RFC 2812 section 2.3.1 */
1411         ptr = Conf_ServerName;
1412         do {
1413                 if (*ptr >= 'a' && *ptr <= 'z') continue;
1414                 if (*ptr >= 'A' && *ptr <= 'Z') continue;
1415                 if (*ptr >= '0' && *ptr <= '9') continue;
1416                 if (ptr > Conf_ServerName) {
1417                         if (*ptr == '.' || *ptr == '-')
1418                                 continue;
1419                 }
1420                 Conf_ServerName[0] = '\0';
1421                 break;
1422         } while (*(++ptr));
1423
1424         if (!Conf_ServerName[0]) {
1425                 /* No server name configured! */
1426                 config_valid = false;
1427                 Config_Error(LOG_ALERT,
1428                              "No (valid) server name configured in \"%s\" (section 'Global': 'Name')!",
1429                              NGIRCd_ConfFile);
1430                 if (!Configtest && !Rehash) {
1431                         Config_Error(LOG_ALERT,
1432                                      "%s exiting due to fatal errors!",
1433                                      PACKAGE_NAME);
1434                         exit(1);
1435                 }
1436         }
1437
1438         if (Conf_ServerName[0] && !strchr(Conf_ServerName, '.')) {
1439                 /* No dot in server name! */
1440                 config_valid = false;
1441                 Config_Error(LOG_ALERT,
1442                              "Invalid server name configured in \"%s\" (section 'Global': 'Name'): Dot missing!",
1443                              NGIRCd_ConfFile);
1444                 if (!Configtest) {
1445                         Config_Error(LOG_ALERT,
1446                                      "%s exiting due to fatal errors!",
1447                                      PACKAGE_NAME);
1448                         exit(1);
1449                 }
1450         }
1451
1452 #ifdef STRICT_RFC
1453         if (!Conf_ServerAdminMail[0]) {
1454                 /* No administrative contact configured! */
1455                 config_valid = false;
1456                 Config_Error(LOG_ALERT,
1457                              "No administrator email address configured in \"%s\" ('AdminEMail')!",
1458                              NGIRCd_ConfFile);
1459                 if (!Configtest) {
1460                         Config_Error(LOG_ALERT,
1461                                      "%s exiting due to fatal errors!",
1462                                      PACKAGE_NAME);
1463                         exit(1);
1464                 }
1465         }
1466 #endif
1467
1468         if (!Conf_ServerAdmin1[0] && !Conf_ServerAdmin2[0]
1469             && !Conf_ServerAdminMail[0]) {
1470                 /* No administrative information configured! */
1471                 Config_Error(LOG_WARNING,
1472                              "No administrative information configured but required by RFC!");
1473         }
1474
1475 #ifdef PAM
1476         if (Conf_ServerPwd[0])
1477                 Config_Error(LOG_ERR,
1478                              "This server uses PAM, \"Password\" will be ignored!");
1479 #endif
1480
1481 #ifdef DEBUG
1482         servers = servers_once = 0;
1483         for (i = 0; i < MAX_SERVERS; i++) {
1484                 if (Conf_Server[i].name[0]) {
1485                         servers++;
1486                         if (Conf_Server[i].flags & CONF_SFLAG_ONCE)
1487                                 servers_once++;
1488                 }
1489         }
1490         Log(LOG_DEBUG,
1491             "Configuration: Operators=%d, Servers=%d[%d], Channels=%d",
1492             Conf_Oper_Count, servers, servers_once, Conf_Channel_Count);
1493 #endif
1494
1495         return config_valid;
1496 } /* Validate_Config */
1497
1498
1499 static void
1500 Config_Error_TooLong ( const int Line, const char *Item )
1501 {
1502         Config_Error( LOG_WARNING, "%s, line %d: Value of \"%s\" too long!", NGIRCd_ConfFile, Line, Item );
1503 }
1504
1505
1506 static void
1507 Config_Error_NaN( const int Line, const char *Item )
1508 {
1509         Config_Error( LOG_WARNING, "%s, line %d: Value of \"%s\" is not a number!",
1510                                                 NGIRCd_ConfFile, Line, Item );
1511 }
1512
1513
1514 #ifdef PROTOTYPES
1515 static void Config_Error( const int Level, const char *Format, ... )
1516 #else
1517 static void Config_Error( Level, Format, va_alist )
1518 const int Level;
1519 const char *Format;
1520 va_dcl
1521 #endif
1522 {
1523         /* Error! Write to console and/or logfile. */
1524
1525         char msg[MAX_LOG_MSG_LEN];
1526         va_list ap;
1527
1528         assert( Format != NULL );
1529
1530 #ifdef PROTOTYPES
1531         va_start( ap, Format );
1532 #else
1533         va_start( ap );
1534 #endif
1535         vsnprintf( msg, MAX_LOG_MSG_LEN, Format, ap );
1536         va_end( ap );
1537         
1538         /* During "normal operations" the log functions of the daemon should
1539          * be used, but during testing of the configuration file, all messages
1540          * should go directly to the console: */
1541         if (Use_Log) Log( Level, "%s", msg );
1542         else puts( msg );
1543 } /* Config_Error */
1544
1545
1546 #ifdef DEBUG
1547
1548 GLOBAL void
1549 Conf_DebugDump(void)
1550 {
1551         int i;
1552
1553         Log(LOG_DEBUG, "Configured servers:");
1554         for (i = 0; i < MAX_SERVERS; i++) {
1555                 if (! Conf_Server[i].name[0])
1556                         continue;
1557                 Log(LOG_DEBUG,
1558                     " - %s: %s:%d, last=%ld, group=%d, flags=%d, conn=%d",
1559                     Conf_Server[i].name, Conf_Server[i].host,
1560                     Conf_Server[i].port, Conf_Server[i].lasttry,
1561                     Conf_Server[i].group, Conf_Server[i].flags,
1562                     Conf_Server[i].conn_id);
1563         }
1564 } /* Conf_DebugDump */
1565
1566 #endif
1567
1568
1569 static void
1570 Init_Server_Struct( CONF_SERVER *Server )
1571 {
1572         /* Initialize server configuration structur to default values */
1573
1574         assert( Server != NULL );
1575
1576         memset( Server, 0, sizeof (CONF_SERVER) );
1577
1578         Server->group = NONE;
1579         Server->lasttry = time( NULL ) - Conf_ConnectRetry + STARTUP_DELAY;
1580
1581         if( NGIRCd_Passive ) Server->flags = CONF_SFLAG_DISABLED;
1582
1583         Proc_InitStruct(&Server->res_stat);
1584         Server->conn_id = NONE;
1585         memset(&Server->bind_addr, 0, sizeof(&Server->bind_addr));
1586 } /* Init_Server_Struct */
1587
1588
1589 /* -eof- */