echocfg.c

/* echocfg.c */

/* SBBSecho configuration utility 											*/

/* $Id$ */

/****************************************************************************
 * @format.tab-size 4		(Plain Text/Source Code File Header)			*
 * @format.use-tabs true	(see http://www.synchro.net/ptsc_hdr.html)		*
 *																			*
 * Copyright Rob Swindell - http://www.synchro.net/copyright.html			*
 *																			*
 * This program is free software; you can redistribute it and/or			*
 * modify it under the terms of the GNU General Public License				*
 * as published by the Free Software Foundation; either version 2			*
 * of the License, or (at your option) any later version.					*
 * See the GNU General Public License for more details: gpl.txt or			*
 * http://www.fsf.org/copyleft/gpl.html										*
 *																			*
 * Anonymous FTP access to the most recent released source is available at	*
 * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net	*
 *																			*
 * Anonymous CVS access to the development source and modification history	*
 * is available at cvs.synchro.net:/cvsroot/sbbs, example:					*
 * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs login			*
 *     (just hit return, no password is necessary)							*
 * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs checkout src		*
 *																			*
 * For Synchronet coding style and modification guidelines, see				*
 * http://www.synchro.net/source.html										*
 *																			*
 * You are encouraged to submit any modifications (preferably in Unix diff	*
 * format) via e-mail to mods@synchro.net									*
 *																			*
 * Note: If this box doesn't appear square, then you need to fix your tabs.	*
 ****************************************************************************/

/* Portions written by Allen Christiansen 1994-1996 						*/

#include <stdio.h>

#undef JAVASCRIPT

/* XPDEV Headers */
#include "gen_defs.h"

#define __COLORS
#include "ciolib.h"
#include "uifc.h"
#include "sbbs.h"
#include "sbbsecho.h"

char **opt;

sbbsecho_cfg_t cfg;
uifcapi_t uifc;

void bail(int code)
{

	if(uifc.bail!=NULL)
		uifc.bail();
	exit(code);
}

/* These correlate with the LOG_* definitions in syslog.h/gen_defs.h */
static char* logLevelStringList[] 
	= {"Emergency", "Alert", "Critical", "Error", "Warning", "Notice", "Informational", "Debugging", NULL};

int main(int argc, char **argv)
{
	char str[256],*p;
	int i,j,k,x,dflt,nodeop=0,packop=0,listop=0;
	echolist_t savlistcfg;
	nodecfg_t savnodecfg;
	arcdef_t savarcdef;
	BOOL door_mode=FALSE;
	int		ciolib_mode=CIOLIB_MODE_AUTO;
	unsigned int u;
	char	sysop_aliases[256];
	sbbsecho_cfg_t orig_cfg;

	fprintf(stderr,"\nSBBSecho Configuration  Version %u.%02u  Copyright %s "
		"Rob Swindell\n\n",SBBSECHO_VERSION_MAJOR, SBBSECHO_VERSION_MINOR, __DATE__+7);

	memset(&cfg,0,sizeof(cfg));
	str[0]=0;
	for(i=1;i<argc;i++) {
		if(argv[i][0]=='-')
			switch(toupper(argv[i][1])) {
                case 'D':
					printf("NOTICE: The -d option is deprecated, use -id instead\r\n");
					SLEEP(2000);
                    door_mode=TRUE;
                    break;
                case 'L':
                    uifc.scrn_len=atoi(argv[i]+2);
                    break;
                case 'E':
                    uifc.esc_delay=atoi(argv[i]+2);
                    break;
				case 'I':
					switch(toupper(argv[i][2])) {
						case 'A':
							ciolib_mode=CIOLIB_MODE_ANSI;
							break;
						case 'C':
							ciolib_mode=CIOLIB_MODE_CURSES;
							break;
						case 0:
							printf("NOTICE: The -i option is deprecated, use -if instead\r\n");
							SLEEP(2000);
						case 'F':
							ciolib_mode=CIOLIB_MODE_CURSES_IBM;
							break;
						case 'X':
							ciolib_mode=CIOLIB_MODE_X;
							break;
						case 'W':
							ciolib_mode=CIOLIB_MODE_CONIO;
							break;
						case 'D':
		                    door_mode=TRUE;
		                    break;
						default:
							goto USAGE;
					}
					break;
		        case 'M':   /* Monochrome mode */
        			uifc.mode|=UIFC_MONO;
                    break;
                case 'C':
        			uifc.mode|=UIFC_COLOR;
                    break;
                case 'V':
                    textmode(atoi(argv[i]+2));
                    break;
                default:
					USAGE:
                    printf("\nusage: echocfg [ctrl_dir] [options]"
                        "\n\noptions:\n\n"
                        "-c  =  force color mode\r\n"
						"-m  =  force monochrome mode\r\n"
                        "-e# =  set escape delay to #msec\r\n"
						"-iX =  set interface mode to X (default=auto) where X is one of:\r\n"
#ifdef __unix__
						"       X = X11 mode\r\n"
						"       C = Curses mode\r\n"
						"       F = Curses mode with forced IBM charset\r\n"
#else
						"       W = Win32 native mode\r\n"
#endif
						"       A = ANSI mode\r\n"
						"       D = standard input/output/door mode\r\n"
                        "-v# =  set video mode to # (default=auto)\r\n"
                        "-l# =  set screen lines to # (default=auto-detect)\r\n"
                        );
        			exit(0);
		}
		else
			strcpy(str,argv[1]);
	}
	if(str[0]==0) {
		p=getenv("SBBSCTRL");
		if(!p) {
			p=getenv("SBBSNODE");
			if(!p) {
				printf("usage: echocfg [cfg_file]\n");
				exit(1); 
			}
			strcpy(str,p);
			backslash(str);
			strcat(str,"../ctrl/sbbsecho.ini"); 
		}
		else {
			strcpy(str,p);
			backslash(str);
			strcat(str,"sbbsecho.ini"); 
		} 
	}
	SAFECOPY(cfg.cfgfile,str);

	if(!sbbsecho_read_ini(&cfg)) {
		fprintf(stderr, "ERROR %d (%s) reading %s\n", errno, strerror(errno), cfg.cfgfile);
		exit(1);
	}
	orig_cfg = cfg;

	// savnum=0;
	if((opt=(char **)malloc(sizeof(char *)*1000))==NULL) {
		puts("memory allocation error\n");
		exit(1); 
	}
	for(i=0;i<1000;i++)
		if((opt[i]=(char *)malloc(MAX_OPLN+1))==NULL) {
			puts("memory allocation error\n");
			exit(1); 
		}
	uifc.size=sizeof(uifc);
	if(!door_mode) {
		i=initciolib(ciolib_mode);
		if(i!=0) {
    		printf("ciolib library init returned error %d\n",i);
    		exit(1);
		}
    	i=uifcini32(&uifc);  /* curses/conio/X/ANSI */
	}
	else
    	i=uifcinix(&uifc);  /* stdio */

	if(i!=0) {
		printf("uifc library init returned error %d\n",i);
		exit(1);
	}

	uifc.timedisplay = NULL;
	sprintf(str,"SBBSecho Config v%u.%02u",SBBSECHO_VERSION_MAJOR, SBBSECHO_VERSION_MINOR);
	uifc.scrn(str);
	p=cfg.cfgfile;
	if(strlen(p) + strlen(str) + 4 > uifc.scrn_width)
		p=getfname(cfg.cfgfile);
	uifc.printf(uifc.scrn_width-(strlen(p)+1),1,uifc.bclr|(uifc.cclr<<4),p);

	dflt=0;
	while(1) {
		if(memcmp(&cfg, &orig_cfg, sizeof(cfg)) != 0)
			uifc.changes = TRUE;
		uifc.helpbuf=
	"~ SBBSecho Configuration ~\r\n\r\n"
	"This program allows you to easily configure the Synchronet BBS\r\n"
	"FidoNet-style EchoMail program known as `SBBSecho`.  Alternatively, you\r\n"
	"may edit the SBBSecho configuration file (e.g. `ctrl/sbbsecho.ini`) using\r\n"
	"an ASCII/plain-text editor.\r\n"
	"\r\n"
	"For detailed documentation, see `http://wiki.synchro.net/util:sbbsecho`\r\n"
	"\r\n"
	"`Mailer Type` should normally be set to `Binkley/FLO` to enable SBBSecho's\r\n"
	"\"Binkley-Style Outbound\" operating mode (a.k.a. `BSO` or `FLO` mode).\r\n"
	"If you are using an `Attach`, `ArcMail`, or `FrontDoor` style FidoNet\r\n"
	"mailer, then set this setting to `ArcMail/Attach`, but know that most\r\n"
	"modern FidoNet mailers are Binkley-Style and therefore that mode of\r\n"
	"operation in SBBSecho is more widely tested and supported.\r\n"
	"\r\n"
	"`Log Level` should normally be set to `Informational` but if you're\r\n"
	"experiencing problems with SBBSecho and would like more verbose log\r\n"
	"output, set this to `Debugging`. If you want less verbose logging,\r\n"
	"set to higher-severity levels to reduce the number of log messages.\r\n"
	"\r\n"
	"The `Linked Nodes` sub-menu is where you configure your FidoNet-style\r\n"
	"links: other FidoNet-style nodes/systems you directly connect with.\r\n"
	"\r\n"
	"The `Archive Types` sub-menu is where you configure your archive\r\n"
	"programs (a.k.a. \"packers\") used for the packing and unpacking of\r\n"
	"EchoMail bundle files (usually in 'zip' format).\r\n"
	"\r\n"
	"The `NetMail Settings` sub-menu is where you configure NetMail-specific\r\n"
	"settings.\r\n"
	"\r\n"
	"The `EchoMail Settings` sub-menu is where you configure EchoMail-specific\r\n"
	"settings.\r\n"
	"\r\n"
	"The `Paths and Filenames` sub-menu is where you configure your system's\r\n"
	"directory and file paths used by SBBSecho.\r\n"
	"\r\n"
	"The `Additional EchoLists` sub-menu is for configuring additional\r\n"
	"(optional) lists of FidoNet-style message areas in `FIDONET.NA` format.\r\n"
	"These lists, if configured, are used in addition to your main\r\n"
	"`Area File` (e.g. AREAS.BBS) for advanced AreaFix/AreaMgr operations."
	;
		i=0;
		sprintf(opt[i++],"%-25s %s","Mailer Type"
			,cfg.flo_mailer ? "Binkley/FLO":"ArcMail/Attach");
		sprintf(opt[i++],"%-25s %s","Log Level",logLevelStringList[cfg.log_level]);
		sprintf(opt[i++],"Linked Nodes...");
		sprintf(opt[i++],"Archive Types...");
		sprintf(opt[i++],"NetMail Settings...");
		sprintf(opt[i++],"EchoMail Settings...");
		sprintf(opt[i++],"Paths and Filenames...");
		sprintf(opt[i++],"Additional EchoLists...");
		if(uifc.changes)
			snprintf(opt[i++],MAX_OPLN-1,"Save Changes to %s", getfname(cfg.cfgfile));
		opt[i][0]=0;
		switch(uifc.list(WIN_ORG|WIN_MID|WIN_ACT|WIN_ESC,0,0,45,&dflt,0
			,"Configure SBBSecho",opt)) {

			case 0:
				cfg.flo_mailer = !cfg.flo_mailer;
				break;

			case 1:
	uifc.helpbuf=
	"~ Log Level ~\r\n"
	"\r\n"
	"Select the minimum severity of log entries to be logged to the log file.\r\n"
	"The default/normal setting is `Informational`.";
				j=cfg.log_level;
				i=uifc.list(WIN_MID,0,0,0,&j,0,"Log Level",logLevelStringList);
				if(i>=0 && i<=LOG_DEBUG)
					cfg.log_level=i;
				break;


			case 2:
				i=0;
				while(1) {
					uifc.helpbuf=
	"~ Linked Nodes ~\r\n\r\n"
	"From this menu you can configure the settings for your linked\r\n"
	"FidoNet-style nodes (uplinks and downlinks).\r\n"
	"\r\n"
	"A single node configuration can represent one node or a collection\r\n"
	"of nodes, by using the `ALL` wildcard word."
	;

					for(u=0;u<cfg.nodecfgs;u++)
						snprintf(opt[u], MAX_OPLN-1, "%-23s %s"
							,faddrtoa(&cfg.nodecfg[u].addr)
							,cfg.nodecfg[u].comment);
					opt[u][0]=0;
					i=uifc.list(WIN_SAV|WIN_INS|WIN_DEL|WIN_ACT|WIN_GET|WIN_PUT
						|WIN_INSACT|WIN_DELACT|WIN_XTR
						,0,0,0,&i,0,"Linked Nodes",opt);
					if(i==-1)
						break;
					if((i&MSK_ON)==MSK_INS) {
						i&=MSK_OFF;
						str[0]=0;
	uifc.helpbuf=
	"~ Address ~\r\n\r\n"
	"This is the FidoNet style address of the node you wish to add (4D).\r\n";
						if(uifc.input(WIN_MID|WIN_SAV,0,0
							,"Node Address (ALL wildcard allowed)",str
							,25,K_EDIT)<1)
							continue;
						if((cfg.nodecfg=(nodecfg_t *)realloc(cfg.nodecfg
							,sizeof(nodecfg_t)*(cfg.nodecfgs+1)))==NULL) {
							printf("\nMemory Allocation Error\n");
							exit(1); 
						}
						for(j=cfg.nodecfgs;j>i;j--)
							memcpy(&cfg.nodecfg[j],&cfg.nodecfg[j-1]
								,sizeof(nodecfg_t));
						cfg.nodecfgs++;
						memset(&cfg.nodecfg[i],0,sizeof(nodecfg_t));
						cfg.nodecfg[i].addr=atofaddr(str);
						uifc.changes=TRUE;
						continue; 
					}

					if((i&MSK_ON)==MSK_DEL) {
						i&=MSK_OFF;
						cfg.nodecfgs--;
						if(cfg.nodecfgs<=0) {
							cfg.nodecfgs=0;
							continue; 
						}
						for(u=i;u<cfg.nodecfgs;u++)
							memcpy(&cfg.nodecfg[u],&cfg.nodecfg[u+1]
								,sizeof(nodecfg_t));
						if((cfg.nodecfg=(nodecfg_t *)realloc(cfg.nodecfg
							,sizeof(nodecfg_t)*(cfg.nodecfgs)))==NULL) {
							printf("\nMemory Allocation Error\n");
							exit(1); 
						}
						uifc.changes=TRUE;
						continue; 
					}
					if((i&MSK_ON)==MSK_GET) {
						i&=MSK_OFF;
						memcpy(&savnodecfg,&cfg.nodecfg[i],sizeof(nodecfg_t));
						continue; 
					}
					if((i&MSK_ON)==MSK_PUT) {
						i&=MSK_OFF;
						memcpy(&cfg.nodecfg[i],&savnodecfg,sizeof(nodecfg_t));
						uifc.changes=TRUE;
						continue; 
					}
					while(1) {
	uifc.helpbuf=
	"~ Linked Node Settings ~\r\n\r\n"
	"These are the settings available for each configured node:\r\n"
	"\r\n"
	"`Address` is the FidoNet-style address in the Zone:Net/Node (3D) or\r\n"
	"Zone:Net/Node.Point (4D) format. The wildcard word '`ALL`' may be used\r\n"
	"in place of one of the fields to create a node configuration which\r\n"
	"will apply to *all* nodes matching that address pattern.\r\n"
	"e.g. '`1:ALL`' matches all nodes within FidoNet Zone 1.\r\n"
	"\r\n"
	"`Comment` is a note to yourself about this node. Setting this to the\r\n"
	"user or sysop name corresponding with the configured node can be\r\n"
	"a helpful reminder to yourself later.\r\n"
	"\r\n"
	"`Archive Type` is the name of an archive type corresponding with one of\r\n"
	"your configured archive types or '`None`'.  This archive type will\r\n"
	"be used when creating EchoMail bundles or if `None`, raw/uncompressed\r\n"
	"EchoMail packets will be sent to this node.\r\n"
	"This setting may be managed by the node using NetMail/AreaFix requests.\r\n"
	"\r\n"
	"`Packet Type` is the type of outbound packet generated for this node.\r\n"
	"Incoming packet types are automatically detected from among the list\r\n"
	"of supported packet types (2, 2.2, and 2+).\r\n"
	"The default outbound packet type is type `2+`.\r\n"
	"\r\n"
	"`Packet Password` is an optional password that may be added to outbound\r\n"
	"packets for this node.  Incoming packets from this node must also have\r\n"
	"the same password value if this password is configured (not blank).\r\n"
	"Packet passwords are case insensitive.\r\n"
	"\r\n"
	"`Areafix Password` is an optional password used to enable Areafix\r\n"
	"NetMail requests from this node.\r\n"
	"Areafix Passwords are case insensitive.\r\n"
	"This setting may be managed by the node using NetMail/AreaFix requests.\r\n"
	"\r\n"
	"`Areafix Keys` is a list of keys which enable access to one or more\r\n"
	"Additional EchoLists.\r\n"
	"\r\n"
	"`Status` is the default mode for sending mail to this node: `Normal`, `Hold`\r\n"
	"(wait for pickup) or `Crash` (immediate).\r\n"
	"\r\n"
	"`Direct` determines whether to connect to this node directly (whenever\r\n"
	"possible) when sending mail to this node.\r\n"
	"\r\n"
	"`Passive` is used to temporarily disable the packing and sending of\r\n"
	"EchoMail for a node.  The opposite of Passive is `Active`.\r\n"
	"This setting may be managed by the node using NetMail/AreaFix requests.\r\n"
	"\r\n"
	"`Send Notify List` is used to flag nodes that you want notified via\r\n"
	"NetMail of their current AreaFix settings whenever SBBSecho is run\r\n"
	"with the '`G`' option.\r\n"
	"\r\n"
	"`Route To` is only used in Binkley-Style Outbound (BSO/FLO) operating\r\n"
	"mode and is used to set the FidoNet address to route mail for this node.\r\n"
	"\r\n"
	"`Inbox Directory` is only used in BSO operating mode and is an optional\r\n"
	"alternate directory to search for incoming files from this node (e.g.\r\n"
	"used in combination with BinkD's ibox setting).\r\n"
	"\r\n"
	"`Outbox Directory` is only used in BSO operating mode and is an optional\r\n"
	"alternate directory to place outbound files for this node (e.g. used\r\n"
	"in combination with BinkD's obox setting).\r\n"
	;
						j=0;
						snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Address"
							,faddrtoa(&cfg.nodecfg[i].addr));
						snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Comment"
							,cfg.nodecfg[i].comment);
						snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Archive Type"
							,cfg.nodecfg[i].archive ==  SBBSECHO_ARCHIVE_NONE ?
							"None":cfg.nodecfg[i].archive->name);
						snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Packet Type"
							,pktTypeStringList[cfg.nodecfg[i].pkt_type]);
						snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Packet Password"
							,cfg.nodecfg[i].pktpwd);
						snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Areafix Password"
							,cfg.nodecfg[i].password);
						snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Areafix Keys"
							,strListCombine(cfg.nodecfg[i].keys,str,sizeof(str),","));
						snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Status"
							,mailStatusStringList[cfg.nodecfg[i].status]);
						snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Direct"
							,cfg.nodecfg[i].direct ? "Yes":"No");
						snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Passive"
							,cfg.nodecfg[i].passive ? "Yes":"No");
						snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Send Notify List"
							,cfg.nodecfg[i].send_notify ? "Yes" : "No");
						if(cfg.flo_mailer) {
							snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s","Route To"
								,cfg.nodecfg[i].route.zone
								? faddrtoa(&cfg.nodecfg[i].route) : "Disabled");
							snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s", "Inbox Directory", cfg.nodecfg[i].inbox);
							snprintf(opt[j++],MAX_OPLN-1,"%-30.30s %s", "Outbox Directory", cfg.nodecfg[i].outbox);
						}
						opt[j][0]=0;
						SAFEPRINTF(str, "Linked Node - %s"
							,cfg.nodecfg[i].comment[0] ? cfg.nodecfg[i].comment : faddrtoa(&cfg.nodecfg[i].addr));
						k=uifc.list(WIN_MID|WIN_ACT|WIN_SAV,0,0,60,&nodeop,0,str,opt);
						if(k==-1)
							break;
						switch(k) {
							case 0:
	uifc.helpbuf=
	"~ Address ~\r\n\r\n"
	"This is the FidoNet style address of this linked node.\r\n";
								strcpy(str,faddrtoa(&cfg.nodecfg[i].addr));
								if(uifc.input(WIN_MID|WIN_SAV,0,0
									,"Node Address (ALL wildcard allowed)",str
									,25,K_EDIT|K_UPPER)>0)
									cfg.nodecfg[i].addr=atofaddr(str);
								break;
							case 1:
	uifc.helpbuf=
	"~ Comment ~\r\n\r\n"
	"This is an optional comment for the node (e.g. the sysop's name).\r\n"
	"This is used for informational purposes only.\r\n";
								uifc.input(WIN_MID|WIN_SAV,0,0
									,"Comment"
									,cfg.nodecfg[i].comment,sizeof(cfg.nodecfg[i].comment)-1
									,K_EDIT);
								break;
							case 2:
	uifc.helpbuf=
	"~ Archive Type ~\r\n\r\n"
	"This is the archive type that will be used for compressing packets\r\n"
	"into archive bundles for this node.\r\n";
								int cur=cfg.arcdefs;
								for(u=0;u<cfg.arcdefs;u++) {
									if(cfg.nodecfg[i].archive == &cfg.arcdef[u])
										cur=u;
									strcpy(opt[u],cfg.arcdef[u].name);
								}
								strcpy(opt[u++],"None");
								opt[u][0]=0;
								k=uifc.list(WIN_RHT|WIN_SAV,0,0,0,&cur,0
									,"Archive Type",opt);
								if(k==-1)
									break;
								if((unsigned)k>=cfg.arcdefs)
									cfg.nodecfg[i].archive = SBBSECHO_ARCHIVE_NONE;
								else
									cfg.nodecfg[i].archive = &cfg.arcdef[k];
								uifc.changes=TRUE;
								break;
							case 3:
	uifc.helpbuf=
	"~ Packet Type ~\r\n\r\n"
	"This is the packet header type that will be used in mail packets\r\n"
	"created for this node.  SBBSecho defaults to using packet type `2+`.\r\n";
								j=cfg.nodecfg[i].pkt_type;
								k=uifc.list(WIN_RHT|WIN_SAV,0,0,0,&j,0,"Packet Type"
									,pktTypeStringList);
								if(k==-1)
									break;
								cfg.nodecfg[i].pkt_type=k;
								uifc.changes=TRUE;
								break;
							case 4:
	uifc.helpbuf=
	"~ Packet Password ~\r\n\r\n"
	"This is an optional password that SBBSecho will place into packets\r\n"
	"destined for this node.\r\n";
								uifc.input(WIN_MID|WIN_SAV,0,0
									,"Packet Password (optional)"
									,cfg.nodecfg[i].pktpwd,sizeof(cfg.nodecfg[i].pktpwd)-1
									,K_EDIT|K_UPPER);
								break;
							case 5:
	uifc.helpbuf=
	"~ Areafix Password ~\r\n\r\n"
	"This is the password that will be used by this node when doing remote\r\n"
	"AreaManager / Areafix functions.\r\n";
								uifc.input(WIN_MID|WIN_SAV,0,0
									,"Areafix Password"
									,cfg.nodecfg[i].password,sizeof(cfg.nodecfg[i].password)-1
									,K_EDIT|K_UPPER);
								break;
							case 6:
	uifc.helpbuf=
	"~ Areafix Keys ~\r\n\r\n"
	"This is a named-key to to be given to this node allowing access to one or\r\n"
	"more of the configured echolists\r\n";
								while(1) {
									for(j=0; cfg.nodecfg[i].keys!=NULL && cfg.nodecfg[i].keys[j]!=NULL ;j++)
										strcpy(opt[j],cfg.nodecfg[i].keys[j]);
									opt[j][0]=0;
									k=uifc.list(WIN_SAV|WIN_INS|WIN_DEL|WIN_ACT|
										WIN_XTR|WIN_INSACT|WIN_DELACT|WIN_RHT
										,0,0,0,&k,0,"Areafix Keys",opt);
									if(k==-1)
										break;
									if((k&MSK_ON)==MSK_INS) {
										k&=MSK_OFF;
										if(uifc.input(WIN_MID|WIN_SAV,0,0
											,"Areafix Key",str,SBBSECHO_MAX_KEY_LEN
											,K_UPPER)<1)
											continue;
										strListInsert(&cfg.nodecfg[i].keys, str, k);
										uifc.changes=TRUE;
										continue; 
									}

									if((k&MSK_ON)==MSK_DEL) {
										k&=MSK_OFF;
										strListRemove(&cfg.nodecfg[i].keys, k);
										uifc.changes=TRUE;
										continue; 
									}
									SAFECOPY(str,cfg.nodecfg[i].keys[k]);
									uifc.input(WIN_MID|WIN_SAV,0,0,"Areafix Key"
										,str,SBBSECHO_MAX_KEY_LEN,K_EDIT|K_UPPER);
									strListReplace(cfg.nodecfg[i].keys, k, str);
									uifc.changes=TRUE;
									continue; 
								}
								break;
							case 7:
	uifc.helpbuf=
	"~ Mail Status ~\r\n\r\n"
	"Set the mail status for this node: `Normal`, `Hold`, or `Crash`.\r\n";
								j=cfg.nodecfg[i].status;
								k=uifc.list(WIN_RHT|WIN_SAV,0,0,0,&j,0,"Mail Status"
									,mailStatusStringList);
								if(k==-1)
									break;
								if(cfg.nodecfg[i].status!=k) {
									cfg.nodecfg[i].status=k;
									uifc.changes=TRUE;
								}
								break;
							case 8:
								k = !cfg.nodecfg[i].direct;
								switch(uifc.list(WIN_MID|WIN_SAV,0,0,0,&k,0
									,"Direct Delivery",uifcYesNoOpts)) {
									case 0:	cfg.nodecfg[i].direct = true;	uifc.changes=TRUE; break;
									case 1:	cfg.nodecfg[i].direct = false;	uifc.changes=TRUE; break;
								}
								break;
							case 9:
								k = !cfg.nodecfg[i].passive;
								switch(uifc.list(WIN_MID|WIN_SAV,0,0,0,&k,0
									,"Passive Node",uifcYesNoOpts)) {
									case 0:	cfg.nodecfg[i].passive = true;	uifc.changes=TRUE; break;
									case 1:	cfg.nodecfg[i].passive = false;	uifc.changes=TRUE; break;
								}
								break;
							case 10:
								k = !cfg.nodecfg[i].send_notify;
								switch(uifc.list(WIN_MID|WIN_SAV,0,0,0,&k,0
									,"Send AreaFix Notifications",uifcYesNoOpts)) {
									case 0:	cfg.nodecfg[i].send_notify = true;	uifc.changes=TRUE; break;
									case 1:	cfg.nodecfg[i].send_notify = false;	uifc.changes=TRUE; break;
								}
								break;
							case 11:
	uifc.helpbuf=
	"~ Route To ~\r\n\r\n"
	"When using a BSO/FLO type mailer, this is the Fido address to route mail\r\n"
	"for this node(s) to.\r\n"
	"\r\n"
	"This option is normally only used with wildcard type node entries\r\n"
	"(e.g. `ALL`, or `1:ALL`, `2:ALL`, etc.) and is used to route non-direct\r\n"
	"NetMail packets to your uplink node (hub).\r\n";
								strcpy(str,faddrtoa(&cfg.nodecfg[i].route));
								if(uifc.input(WIN_MID|WIN_SAV,0,0
									,"Node Address to Route To",str
									,25,K_EDIT) >= 0) {
									if(str[0])
										cfg.nodecfg[i].route=atofaddr(str);
									else
										cfg.nodecfg[i].route.zone=0;
									uifc.changes=TRUE;
								}
								break;
							case 12:
								uifc.input(WIN_MID|WIN_SAV,0,0,"Inbound FileBox Directory"
									,cfg.nodecfg[i].inbox, sizeof(cfg.nodecfg[i].inbox)-1
									,K_EDIT);
								break;
							case 13:
								uifc.input(WIN_MID|WIN_SAV,0,0,"Outbound FileBox Directory"
									,cfg.nodecfg[i].outbox, sizeof(cfg.nodecfg[i].outbox)-1
									,K_EDIT);
								break;
						} 
					} 
				}
				break;

			case 6:	/* Paths and Filenames... */
				j=0;
				while(1) {
					i=0;
					snprintf(opt[i++],MAX_OPLN-1,"%-30.30s %s","Insecure Inbound Directory"
						,cfg.inbound);
					snprintf(opt[i++],MAX_OPLN-1,"%-30.30s %s","Secure Inbound Directory"
						,cfg.secure_inbound[0] ? cfg.secure_inbound : "<None>");
					snprintf(opt[i++],MAX_OPLN-1,"%-30.30s %s","Outbound Directory"
						,cfg.outbound);
					snprintf(opt[i++],MAX_OPLN-1,"%-30.30s %s","Area File"
						,cfg.areafile);
					snprintf(opt[i++],MAX_OPLN-1,"%-30.30s %s","Log File"
						,cfg.logfile[0] ? cfg.logfile
						: "SCFG->data/sbbsecho.log");
					opt[i][0]=0;
					uifc.helpbuf=
						"~ Paths and Filenames ~\r\n\r\n"
						"From this menu you can configure the paths that SBBSecho will use\r\n"
						"when importing, exporting and logging.\r\n";
					j=uifc.list(WIN_MID|WIN_ACT,0,0,60,&j,0
						,"Paths and Filenames",opt);
					if(j==-1)
						break;
					switch(j) {
						case 0:
	uifc.helpbuf=
	"~ Insecure Inbound Directory ~\r\n\r\n"
	"This is the complete path (drive and directory) where your FTN\r\n"
	"mailer stores, and where SBBSecho will look for, incoming message\r\n"
	"bundles and packets.";
							uifc.input(WIN_MID|WIN_SAV,0,0,"Insecure Inbound Directory"
								,cfg.inbound,sizeof(cfg.inbound)-1
								,K_EDIT);
							break;

						case 1:
	uifc.helpbuf=
	"~ Secure Inbound Directory ~\r\n\r\n"
	"This is the complete path (drive and directory) where your FTN\r\n"
	"mailer stores, and where SBBSecho will look for, incoming message\r\n"
	"bundles and packets for SECURE (password-protected) sessions.";
							uifc.input(WIN_MID|WIN_SAV,0,0,"Secure Inbound Directory"
								,cfg.secure_inbound,sizeof(cfg.secure_inbound)-1
								,K_EDIT);
							break;

						case 2:
	uifc.helpbuf=
	"~ Outbound Directory ~\r\n\r\n"
	"This is the complete path (drive and directory) where your FTN\r\n"
	"mailer will look for, and where SBBSecho will place, outgoing\r\n"
	"message bundles and packets."
	"\r\n"
	"In Binkely-Style Outbound mode, this serves as the base directory\r\n"
	"name for special foreign zone and point destination nodes as well."
	;
							uifc.input(WIN_MID|WIN_SAV,0,0,"Outbound Directory"
								,cfg.outbound,sizeof(cfg.outbound)-1
								,K_EDIT);
							break;

						case 3:
	uifc.helpbuf=
	"~ Area File ~\r\n\r\n"
	"This is the complete path (drive, directory, and filename) of the\r\n"
	"file SBBSecho will use as your main FidoNet-style Area File (e.g.\r\n"
	"`AREAS.BBS`).";
							uifc.input(WIN_MID|WIN_SAV,0,0,"Area File"
								,cfg.areafile,sizeof(cfg.areafile)-1
								,K_EDIT);
							break;

						case 4:
	uifc.helpbuf=
	"~ Log File ~\r\n\r\n"
	"This is the complete path (drive, directory, and filename) of the\r\n"
	"file SBBSecho will use to log information each time it is run\r\n"
	"(default is `sbbsecho.log`)."
	;
							uifc.input(WIN_MID|WIN_SAV,0,0,"Log File"
								,cfg.logfile,sizeof(cfg.logfile)-1
								,K_EDIT);
							break; 
					} 
				}
				break;

			case 4:	/* NetMail Settings */
				j=0;
				while(1) {
					uifc.helpbuf=
	"`Sysop Aliases` is a comma-separated list of names by which the sysop\r\n"
	"    (user #1) may receive NetMail messages, in addition to the alias\r\n"
	"    and real name associated with their BBS user account.\r\n"
	"    This setting defaults to just '`SYSOP`'.\r\n"
	"\r\n"
    "`Default Recipient` is the name of the user account you wish to receive\r\n"
	"    inbound NetMail messages that have been addressed to an unrecognized\r\n"
	"    user name or alias.\r\n"
	"\r\n"
	"`Fuzzy Zone Operation` when set to `Yes`, if SBBSecho receives an inbound\r\n"
	"    netmail with no international zone information, it will compare the\r\n"
	"    net/node of the destination to the net/node information in your AKAs\r\n"
	"    and assume the zone of a matching AKA.\r\n"
	"    This setting defaults to `No`.\r\n"
	"\r\n"
	"`Kill/Ignore Empty NetMail Messages` will instruct SBBSecho to simply\r\n"
	"    discard (not import or export) NetMail messages without any body.\r\n"
	"    This setting defaults to `Yes`.\r\n"
	"\r\n"
	"`Delete Processed NetMail Messages` will instruct SBBSecho to delete\r\n"
	"    NetMail messages/files after they have been sent or imported.\r\n"
	"    When set to `No`, SBBSecho will mark them as Sent or Received instead.\r\n"
	"    This setting defaults to `Yes`.\r\n"
	"\r\n"
	"`Ignore NetMail Destination Address` will instruct SBBSecho to treat\r\n"
	"    all NetMail as though it is destined for one of your systems's FTN\r\n"
	"    addresses (AKAs) and potentially import it.\r\n"
	"    This setting defaults to `No`.\r\n"
	"\r\n"
	"`Ignore Netmail 'Received' Attribute` will instruct SBBSecho to import\r\n"
	"    NetMail messages even when their 'Received' attribute flag is set.\r\n"
	"    This setting defaults to `No`.\r\n"
	"\r\n"
	"`Ignore NetMail 'Local' Attribute` will instruct SBBSecho to import\r\n"
	"    NetMail messages even when their 'Local' attribute flag is set.\r\n"
	"    This setting defaults to `No`.\r\n"
	"\r\n"
	"`Maximum Age of Imported NetMail` allows you to optionally set an age\r\n"
	"    limit (in days) of NetMail messages that may be imported.\r\n"
	"    This setting defaults to `None` (no maximum age).\r\n"
;
					i=0;
					strListCombine(cfg.sysop_alias_list, sysop_aliases, sizeof(sysop_aliases)-1, ",");
					snprintf(opt[i++],MAX_OPLN-1,"%-40.40s%s", "Sysop Aliases",sysop_aliases);
					snprintf(opt[i++],MAX_OPLN-1,"%-40.40s%s", "Default Recipient"
						,cfg.default_recipient);
					snprintf(opt[i++],MAX_OPLN-1,"%-40.40s%-3.3s","Fuzzy Zone Operation"
						,cfg.fuzzy_zone ? "Yes":"No");
					snprintf(opt[i++],MAX_OPLN-1,"%-40.40s%-3.3s","Kill/Ignore Empty NetMail "
						"Messages",cfg.kill_empty_netmail ? "Yes":"No");
					snprintf(opt[i++],MAX_OPLN-1,"%-40.40s%-3.3s","Delete Processed NetMail"
						,cfg.delete_netmail ? "Yes":"No");
					snprintf(opt[i++],MAX_OPLN-1,"%-40.40s%-3.3s","Ignore NetMail Destination Address"
						,cfg.ignore_netmail_dest_addr ? "Yes" : "No");
					snprintf(opt[i++],MAX_OPLN-1,"%-40.40s%-3.3s","Ignore NetMail 'Received' Attribute"
						,cfg.ignore_netmail_recv_attr ? "Yes" : "No");
					snprintf(opt[i++],MAX_OPLN-1,"%-40.40s%-3.3s","Ignore NetMail 'Local' Attribute"
						,cfg.ignore_netmail_local_attr ? "Yes" : "No");
					if(cfg.max_netmail_age)
						sprintf(str,"%1.0f days", cfg.max_netmail_age / (24.0*60.0*60.0));
					else
						strcpy(str, "None");
					snprintf(opt[i++],MAX_OPLN-1,"%-40.40s%s","Maximum Age of Imported NetMail"	, str);
					opt[i][0]=0;
					j=uifc.list(WIN_ACT,0,0,60,&j,0,"NetMail Settings",opt);
					if(j==-1)
						break;
					switch(j) {
						case 0:
							uifc.helpbuf=
							"~ Sysop Aliases ~\r\n\r\n"
							"This is a comma-separated list of additional `To` names that the sysop\r\n"
							"(user #1) can receive netmail by. When specifying multiple aliases,\r\n"
							"they must be separated by a single comma and no extra white-space\r\n"
							"(e.g. \"SYSOP,COORDINATOR\"). The default value is just `SYSOP`.\r\n";
							if(uifc.input(WIN_MID|WIN_BOT|WIN_SAV,0,0,"Sysop Aliases (comma separated)"
								,sysop_aliases
								,sizeof(sysop_aliases)-1,K_EDIT|K_UPPER) >= 0) {
								strListFree(&cfg.sysop_alias_list);
								cfg.sysop_alias_list = strListSplit(NULL, sysop_aliases, ",");
							}
							break;
						case 1:
							uifc.input(WIN_MID|WIN_SAV,0,0,"Default Recipient"
								,cfg.default_recipient, sizeof(cfg.default_recipient)-1
								,K_EDIT|K_UPPER);
							break;
						case 2:
							k = !cfg.fuzzy_zone;
							switch(uifc.list(WIN_MID|WIN_SAV,0,0,0,&k,0
								,"Fuzzy Zone Operation",uifcYesNoOpts)) {
								case 0:	cfg.fuzzy_zone = true;	break;
								case 1:	cfg.fuzzy_zone = false;	break;
							}
							break;
						case 3:
							k = !cfg.kill_empty_netmail;
							switch(uifc.list(WIN_MID|WIN_SAV,0,0,0,&k,0
								,"Delete Empty NetMail",uifcYesNoOpts)) {
								case 0:	cfg.kill_empty_netmail = true;	break;
								case 1:	cfg.kill_empty_netmail = false;	break;
							}
							break;
						case 4:
							k = !cfg.delete_netmail;
							switch(uifc.list(WIN_MID|WIN_SAV,0,0,0,&k,0
								,"Delete Processed NetMail",uifcYesNoOpts)) {
								case 0:	cfg.delete_netmail = true;	break;
								case 1:	cfg.delete_netmail = false;	break;
							}
							break;
						case 5:
							k = !cfg.ignore_netmail_dest_addr;
							switch(uifc.list(WIN_MID|WIN_SAV,0,0,0,&k,0
								,"Ignore NetMail Destination Address",uifcYesNoOpts)) {
								case 0:	cfg.ignore_netmail_dest_addr = true;	break;
								case 1:	cfg.ignore_netmail_dest_addr = false;	break;
							}
							break;
						case 6:
							k = !cfg.ignore_netmail_recv_attr;
							switch(uifc.list(WIN_MID|WIN_SAV,0,0,0,&k,0
								,"Ignore NetMail 'Received' Attribute",uifcYesNoOpts)) {
								case 0:	cfg.ignore_netmail_recv_attr = true;	break;
								case 1:	cfg.ignore_netmail_recv_attr = false;	break;
							}
							break;
						case 7:
							k = !cfg.ignore_netmail_local_attr;
							switch(uifc.list(WIN_MID|WIN_SAV,0,0,0,&k,0
								,"Ignore NetMail 'Local' Attribute",uifcYesNoOpts)) {
								case 0:	cfg.ignore_netmail_local_attr = true;	break;
								case 1:	cfg.ignore_netmail_local_attr = false;	break;
							}
							break;
						case 8:
							uifc.helpbuf=
							"~ Maximum Age of Imported NetMail ~\r\n\r\n"
							"Maximum age (in days) of NetMail that may be imported. The age is based\r\n"
							"on the date supplied in the message header and may be incorrect in some\r\n"
							"conditions (e.g. erroneous software or incorrect system date).\r\n"
							"Set this value to `0` to disable this feature (no maximum age imposed)."
							;
							if(cfg.max_netmail_age)
								sprintf(str,"%1.0f", cfg.max_netmail_age / (24.0*60.0*60.0));
							else
								strcpy(str, "None");
							if(uifc.input(WIN_MID|WIN_BOT|WIN_SAV,0,0,"Maximum NetMail Age (in Days)"
								,str, 5, K_EDIT) >= 0)
								cfg.max_netmail_age = (long) (strtod(str, NULL) * (24.0*60.0*60.0));
							break;

					} 
				}
				break;

			case 5:	/* EchoMail Settings */
				j=0;
				while(1) {
					uifc.helpbuf=
	"`Area Manager` is the BBS user name or alias to notify (via email) of\r\n"
	"    AreaFix activities and errors.  This setting defaults to `SYSOP`.\r\n"
	"\r\n"
	"`Maximum Packet Size` is the largest packet file size that SBBSecho will\r\n"
	"    normally create (in bytes).\r\n"
	"    This settings defaults to `250K` (250 Kilobytes, or 256,000 bytes).\r\n"
	"\r\n"
	"`Maximum Bundle Size` is the largest bundle file size that SBBSecho will\r\n"
	"    normally create (in bytes).\r\n"
	"    This settings defaults to `250K` (250 Kilobytes, or 256,000 bytes).\r\n"
	"\r\n"
	"`Secure Operation` tells SBBSecho to check the Area File (e.g. AREAS.BBS)\r\n"
	"    to insure that the packet origin (FTN address) of EchoMail messages\r\n"
	"    is already linked to the EchoMail area where the message was posted.\r\n"
	"    This setting defaults to `No`.\r\n"
	"\r\n"
	"`Notify Users of Received EchoMail` tells SBBSecho to send telegrams\r\n"
	"    (short messages) to BBS users when EchoMail addressed to their name\r\n"
	"    or alias has been imported into a message base that the user has\r\n"
	"    access to read.\r\n"
	"\r\n"
	"`Convert Existing Tear Lines` tells SBBSecho to convert any tear lines\r\n"
	"    (`---`) existing in the message text to `===`.\r\n"
	"    This setting defaults to `No`.\r\n"
	"\r\n"
	"`Allow Nodes to Add Areas from Area File` when set to `Yes` allows linked\r\n"
	"    nodes to add areas listed in your Area File (e.g. `AREAS.BBS`).\r\n"
	"    This setting defaults to `Yes`.\r\n"
	"\r\n"
	"`Strip Line Feeds From Outgoing Messages` when set to `Yes` instructs\r\n"
	"    SBBSecho to remove any line-feed (ASCII 10) characters from the body\r\n"
	"    text of messages being exported to FidoNet EchoMail.\r\n"
	"    This setting defaults to `No`.\r\n"
	"\r\n"
	"`Circular Path Detection` when `Enabled` will cause SBBSecho, during\r\n"
	"    EchoMail import, to check the PATH kludge lines for any of the\r\n"
	"    system's AKAs and if found (indicating a message loop), not import\r\n"
	"    the message.\r\n"
	"\r\n"
	"`Outbound Bundle Attachments` may be either `Deleted` (killed) or `Truncated`\r\n"
	"    (changed to 0-bytes in length) after being sent by your mailer.\r\n"
	"\r\n"
	"`Zone Blind SEEN-BY and PATH Lines` when `Enabled` will cause SBBSecho\r\n"
	"    to assume that node numbers are not duplicated across zones and\r\n"
	"    that a net/node combination in either of these Kludge lines should\r\n"
	"    be used to identify a specific node regardless of which zone that\r\n"
	"    node is located (thus breaking the rules of FidoNet 3D addressing).\r\n"
	"\r\n"
	"`Maximum Age of Imported EchoMail` allows you to optionally set an age\r\n"
	"    limit (in days) of EchoMail messages that may be imported.\r\n"
	"    This setting defaults to `60` (60 days).\r\n"
	;

					i=0;
					snprintf(opt[i++],MAX_OPLN-1,"%-45.45s%s", "Area Manager",cfg.areamgr);
					snprintf(opt[i++],MAX_OPLN-1,"%-45.45s%luK","Maximum Packet Size"
						,cfg.maxpktsize/1024UL);
					snprintf(opt[i++],MAX_OPLN-1,"%-45.45s%luK","Maximum Bundle Size"
						,cfg.maxbdlsize/1024UL);
					snprintf(opt[i++],MAX_OPLN-1,"%-45.45s%-3.3s","Secure Operation"
						,cfg.secure_echomail ? "Yes":"No");
					snprintf(opt[i++],MAX_OPLN-1,"%-45.45s%-3.3s","Notify Users of Received EchoMail"
						,cfg.echomail_notify ? "Yes":"No");
					snprintf(opt[i++],MAX_OPLN-1,"%-45.45s%-3.3s","Convert Existing Tear Lines"
						,cfg.convert_tear ? "Yes":"No");
					snprintf(opt[i++],MAX_OPLN-1,"%-45.45s%-3.3s","Allow Nodes to Add Areas "
						"from Area File",cfg.add_from_echolists_only ?"No":"Yes");
					snprintf(opt[i++],MAX_OPLN-1,"%-45.45s%-3.3s","Strip Line Feeds "
						"from Outgoing Messages",cfg.strip_lf ? "Yes":"No");
					snprintf(opt[i++],MAX_OPLN-1,"%-45.45s%s","Circular Path Detection"
						,cfg.check_path ? "Enabled" : "Disabled");
					snprintf(opt[i++],MAX_OPLN-1,"%-45.45s%s","Outbound Bundle Attachments"
						,cfg.trunc_bundles ? "Truncate" : "Delete");
					if(cfg.zone_blind)
						sprintf(str,"Zones 1-%u", cfg.zone_blind_threshold);
					else
						strcpy(str,"Disabled");
					snprintf(opt[i++],MAX_OPLN-1,"%-45.45s%s","Zone Blind SEEN-BY and PATH Lines", str);
					if(cfg.max_echomail_age)
						sprintf(str,"%1.0f days", ((float)cfg.max_echomail_age) / (24.0*60.0*60.0));