/* * config.c	Read and write the configuration file(s). * *		This file is part of the minicom communications package, *		Copyright 1991-1995 Miquel van Smoorenburg. * *		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. * * // fmg 12/20/93 - Added color selection to Screen & Keyboard menu * // fmg 2/15/94 - Added macro filename & Macro define selection to *                  Screen & Keyboard menu. Added window for macro *                  definition. * // jl 04.09.97 - Added configuring the character conversion tables * // jl 09.09.97 - Save conversion table filename in the config file and *                  read the table at startup * // jl 22.02.98 - Setting for filename selection window * // acme 25.02.98 - i18n * // jl 05.04.98 - Handling the P_MUL option *    jl 06.07.98 - the P_CONVCAP option *    jl 10.07.98 - moved functions pfix_home and do_log to file common.c *    jl 29.11.98 - the P_SHOWSPD option *    jl 05.04.99 - logging options menu *    er 18-Apr-99 - the P_MULTILINE option *    jl 11.02.2000 - the P_STOPB option */#ifdef HAVE_CONFIG_H#include <config.h>#endif#include "rcsid.h"RCSID("$Id: config.c,v 1.7 2000/10/28 12:51:43 walker Exp $")#include "port.h"#include "minicom.h"#include "intl.h"void doconv();   /* jl 04.09.97 *//* Read in parameters. */void read_parms(){  FILE *fp;  int f;  char buf[64];  char *p;  /* Read global parameters */  if ((fp = fopen(parfile, "r")) == (FILE *)NULL) {  	if (real_uid == 0) {  		fputs(  _("minicom: WARNING: configuration file not found, using defaults\n"),stderr);  		sleep(2);  		return;  	}  	fprintf(stderr,	_("minicom: there is no global configuration file %s\n"), parfile);  	fputs(_("Ask your sysadm to create one (with minicom -s).\n"), stderr);  	exit(1);  }  readpars(fp, 1);  fclose(fp);  /* Read personal parameters */  if ((fp = sfopen(pparfile, "r")) != (FILE *)NULL) {	readpars(fp, 0);	fclose(fp);  }  /* fmg - set colors from readin values (Jcolor Xlates name to #) */  mfcolor = Jcolor(P_MFG); mbcolor = Jcolor(P_MBG);  tfcolor = Jcolor(P_TFG); tbcolor = Jcolor(P_TBG);  sfcolor = Jcolor(P_SFG); sbcolor = Jcolor(P_SBG); #if _HAVE_MACROS  /* fmg - Read personal macros */  if (P_MACROS[0] != 0) { /* fmg - null length? */	if ((fp = sfopen(pfix_home(P_MACROS), "r")) == NULL) {		if (errno != ENOENT) {                	fprintf(stderr,                _("minicom: cannot open macro file %s\n"), pfix_home(P_MACROS));                	sleep(1); /* fmg - give the "slow" ones time to read :-) */		}        } else {                readmacs(fp, 0);                fclose(fp);        }  } /* fmg - but it's perfectly OK if macros file name is NULL... */  if (P_CONVF[0] != 0) { /* jl 09.09.97 */    loadconv(P_CONVF);  }#endif  /* This code is to use old configuration files. */  for(f = PROTO_BASE; f < MAXPROTO; f++) {	if (P_PNAME(f)[0] && P_PIORED(f) != 'Y' && P_PIORED(f) != 'N') {		strncpy(buf, P_PNAME(f) - 2, sizeof(buf));		strcpy(P_PNAME(f), buf);		P_PIORED(f) = 'Y';		P_PFULL(f) = 'N';	}  }  p = mbasename(P_LOCK);  if (strncmp(p, "LCK", 3) == 0) *p = 0;}/* * fmg - Convert color word to number */int Jcolor(s)char *s;{        char c1, c3;        c1 = toupper(s[0]); /* fmg - it's already up but why tempt it? */        c3 = toupper(s[2]);        switch (c1)        {                case 'G'        : return (GREEN);                case 'Y'        : return (YELLOW);                case 'W'        : return (WHITE);                case 'R'        : return (RED);                case 'M'        : return (MAGENTA);                case 'C'        : return (CYAN);                case 'B'        : if (c3 == 'A')                                        return (BLACK);                                  if (c3 == 'U')                                        return (BLUE);                                  else                                        break;        }        return (-1); /* fmg - should never get here */} /* * See if we have write access to a file. * If it is not there, see if the directory is writable. */int waccess(s)char *s;{  char *p;  char buf[128];  struct stat stt;  /* We use stat instead of access(s, F_OK) because I couldn't get   * that to work under BSD 4.3 ...   */  if (stat(s, &stt) == 0) {	if (access(s, W_OK) == 0)		return(XA_OK_EXIST);	return(-1);  }  strncpy(buf, s, sizeof(buf)-1);  buf[sizeof(buf)-1]=0;  if((p = strrchr(buf, '/')) == (char *)NULL)  	strcpy(buf, ".");  else  	*p = '\0';  if (access(buf, W_OK) == 0)	return(XA_OK_NOTEXIST);  return(-1);}#if _HAVE_MACROS/* * fmg - Read in a macro, but first check to see if it's * allowed to do so. * * TODO: have System macros and user macros (in theory it's already there * since user can specify their own macros file (unless root makes it * private... that's silly) ... anyways, you know what I mean...) */static void mgets(w, x, y, s, len, maxl)WIN *w;int x, y;char *s;int len;int maxl;{  struct macs *m = (struct macs *)s;  if ((m->flags & PRIVATE) && real_uid != 0) {        werror(_("You are not allowed to change this parameter"));        return;  }  wlocate(w, x, y);  (void) wgets(w, s, len, maxl);  m->flags |= CHANGED;}#endif/* * Read in a string, but first check to see if it's * allowed to do so. */static void pgets(w, x, y, s, len, maxl)WIN *w;int x, y;char *s;int len;int maxl;{  struct pars *p = (struct pars *)s;  if ((p->flags & PRIVATE) && real_uid != 0) {  	werror(_("You are not allowed to change this parameter"));  	return;  }  wlocate(w, x, y);  (void) wgets(w, s, len, maxl);  p->flags |= CHANGED;}/* * Mark a variable as changed. */static void markch(s)char *s;{  struct pars *p = (struct pars *)s;  p->flags |= CHANGED;}/* * Set a string to a given value, but only if we're allowed to. */static void psets(s, w)char *s, *w;{  struct pars *p = (struct pars *)s;  if ((p->flags & PRIVATE) && real_uid != 0) {  	werror(_("You are not allowed to change this parameter"));  	return;  }  strcpy(s, w);  p->flags |= CHANGED;}/* * Get a a character from the keyboard. Translate lower * to uppercase and '\r' to '\n'. */static int rwxgetch(){  int c;  c = wxgetch();  if (islower(c)) c = toupper(c);  if (c == '\n' || c == '\r' || c == '\033') return('\n');  return(c);}#ifdef LOGFILEstatic void dologopt(){  WIN *w;  int c;  char *logfnstr = _(" A - File name (empty=disable) :"),       *logconn  = _(" B - Log connects and hangups  :"),       *logxfer  = _(" C - Log file transfers        :"),       *question = _("Change which setting?");  w = wopen(5, 4, 75, 8, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);  wtitle(w, TMID, _("Logging options"));  wprintf(w, "%s %s\n", logfnstr, P_LOGFNAME);  wprintf(w, "%s %s\n", logconn, _(P_LOGCONN));  wprintf(w, "%s %s\n", logxfer, _(P_LOGXFER));  wlocate(w, 4, 4);  wputs(w, question);  wredraw(w, 1);  while(1) {    wlocate(w, strlen(question) + 5, 5);    c = rwxgetch();    switch(c) {      case '\n':	wclose(w, 1);	return;      case 'A':	pgets(w, strlen(logfnstr) + 1, 0,	      P_LOGFNAME, PARS_VAL_LEN, PARS_VAL_LEN);	strcpy(logfname,P_LOGFNAME);	break;      case 'B':	strcpy(P_LOGCONN, yesno(P_LOGCONN[0] == 'N'));	wlocate(w, strlen(logconn) + 1, 1);	wprintf(w, "%s  ", _(P_LOGCONN));	markch(P_LOGCONN);	break;      case 'C':	strcpy(P_LOGXFER, yesno(P_LOGXFER[0] == 'N'));	wlocate(w, strlen(logxfer) + 1, 2);	wprintf(w, "%s  ", _(P_LOGXFER));	markch(P_LOGXFER);	break;      default:	break;    }  }}#endifstatic void dopath(){  WIN *w;  int c;  char* download_directory = _(" A - Download directory :"),      * upload_directory = _(" B - Upload directory   :"),      * script_directory = _(" C - Script directory   :"),      * script_program = _(" D - Script program     :"),      * kermit_program = _(" E - Kermit program     :"),      * log_settings   = _(" F - Logging options"),      * question = _("Change which setting?");    w = wopen(5, 5, 75, 12, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);  wprintf(w, "%s %.44s\n", download_directory, P_DOWNDIR);  wprintf(w, "%s %.44s\n", upload_directory, P_UPDIR);  wprintf(w, "%s %.44s\n", script_directory, P_SCRIPTDIR);  wprintf(w, "%s %.44s\n", script_program, P_SCRIPTPROG);  wprintf(w, "%s %.44s\n", kermit_program, P_KERMIT);#ifdef LOGFILE  wprintf(w, "%s\n", log_settings);#endif  wlocate(w, 4, 8);  wputs(w, question);  wredraw(w, 1);  while(1) {      wlocate(w, strlen (question) + 5, 8);      c = rwxgetch();      switch(c) {  	case '\n':  		wclose(w, 1);  		return;  	case 'A':  		pgets(w, strlen (download_directory) + 1, 0, P_DOWNDIR, 64, 64);		init_dir('d');  		break;  	case 'B':  		pgets(w, strlen (upload_directory) + 1, 1, P_UPDIR, 64, 64);		init_dir('u');  		break;  	case 'C':  		pgets(w, strlen (script_directory) + 1, 2, P_SCRIPTDIR, 64, 64);  		break;  	case 'D':  		pgets(w, strlen (script_program) + 1, 3, P_SCRIPTPROG, 64, 64);  		break;  	case 'E':  		pgets(w, strlen (kermit_program) + 1, 4, P_KERMIT, 64, 64);  		break;#ifdef LOGFILE  	case 'F':		dologopt();		break;  #endif  	default:  		break;      }  }}char *yesno(k)int k;{  return(k ? N_("Yes") : N_("No "));}/* * Input the definition of an up/download protocol. */static void inputproto(w, n)WIN *w;int n;{  int c = 0;  mpars[PROTO_BASE + n].flags |= CHANGED;  if (P_PNAME(n)[0] == '\0') {  	P_PNN(n) = 'Y';  	P_PUD(n) = 'U';	P_PFULL(n) = 'N';	P_PPROG(n)[0] = 0;	P_PIORED(n) = 'Y';  	wlocate(w, 4, n+1);  	wputs(w, "       ");  }  wlocate(w, 4, n+1);  (void ) wgets(w, P_PNAME(n), 10, 64);  pgets(w, 15, n+1, P_PPROG(n), 31, 64);  do {	wlocate(w, 47, n+1);	wprintf(w, "%c", P_PNN(n));	c = rwxgetch();	if (c == 'Y') P_PNN(n) = 'Y';	if (c == 'N') P_PNN(n) = 'N';  } while(c != '\r' && c != '\n');  do {	wlocate(w, 52, n+1);	wprintf(w, "%c", P_PUD(n));	c = rwxgetch();	if (c == 'U') P_PUD(n) = 'U';	if (c == 'D') P_PUD(n) = 'D';  } while(c != '\r' && c != '\n');  do {	wlocate(w, 57, n+1);	wprintf(w, "%c", P_PFULL(n));	c = rwxgetch();	if (c == 'Y') P_PFULL(n) = 'Y';	if (c == 'N') P_PFULL(n) = 'N';  } while(c != '\r' && c != '\n');  do {	wlocate(w, 65, n+1);	wprintf(w, "%c", P_PIORED(n));	c = rwxgetch();	if (c == 'Y') P_PIORED(n) = 'Y';	if (c == 'N') P_PIORED(n) = 'N';  } while(c != '\r' && c != '\n');  do {    	wlocate(w, 73, n+1);	wprintf(w, "%c", P_MUL(n));	c = rwxgetch();	if (c == 'Y') P_MUL(n) = 'Y';	if (c == 'N') P_MUL(n) = 'N';  } while (c != '\r' && c != '\n');}static void doproto(){  WIN *w;  int f, c;  char* zmodem_download = _("M  Zmodem download string activates..."),      * use_filename_selection = _("N  Use filename selection window......"),      * prompt_downdir =         _("O  Prompt for download directory......"),      * question = _("Change which setting? (SPACE to delete)");  w = wopen(1, 3, 78, 20, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);  wputs(w, _("     Name             Program"));  wlocate(w, 46, 0);  wputs(w, _("Name U/D FullScr IO-Red. Multi"));  for(f = 0; f < 12; f++) {     wlocate(w, 1, f+1);     if (P_PNAME(f)[0])  	wprintf(w, "%c  %-10.10s %-31.31s %c    %c    %c       %c       %c",		'A' + f,