/*
* 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.
* You should have received a copy of the GNU General Public License along
* with this program; if not, write to the Free Software Foundation, Inc.,
* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
*
* // 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 <limits.h>
#include "port.h"
#include "minicom.h"
#include "intl.h"
void doconv(void); /* jl 04.09.97 */
/* Read in parameters. */
void read_parms(void)
{
FILE *fp;
int f;
char buf[64];
char *p;
/* Read global parameters */
if ((fp = fopen(parfile, "r"))) {
readpars(fp, CONFIG_GLOBAL);
fclose(fp);
}
/* Read personal parameters */
if ((fp = fopen(pparfile, "r")) != NULL) {
readpars(fp, CONFIG_PERSONAL);
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);
/* fmg - Read personal macros */
if (P_MACROS[0] != 0) { /* fmg - null length? */
if ((fp = fopen(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);
}
/* 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));
buf[sizeof(buf) - 1] = '\0';
strcpy(P_PNAME(f), buf);
P_PIORED(f) = 'Y';
P_PFULL(f) = 'N';
}
}
if ((p = strrchr(P_LOCK, '/')) != NULL && strncmp(p, "/LCK", 4) == 0)
*p = 0;
}
/*
* fmg - Convert color word to number
*/
int Jcolor(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(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;
}
/*
* 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(WIN *w, int x, int y, char *s, int len, int maxl)
{
struct macs *m = (struct macs *)s;
mc_wlocate(w, x, y);
mc_wgets(w, s, len, maxl);
m->flags |= CHANGED;
}
/*
* Read in a string, but first check to see if it's
* allowed to do so.
*/
static void pgets(WIN *w, int x, int y, char *s, int len, unsigned int maxl,
int extend_tilde)
{
struct pars *p = (struct pars *)s;
char *home = NULL;
mc_wlocate(w, x, y);
mc_wgets(w, s, len, maxl);
if (extend_tilde &&
s[0] == '~' && (s[1] == '/' || s[1] == 0) &&
(home = getenv("HOME")) && strlen(s) + strlen(home) <= maxl) {
int i = 0;
memmove(s + strlen(home), s + 1, strlen(s));
memcpy(s, home, strlen(home));
mc_wlocate(w, x, y);
for (i = 0; i < (len >= w->xs - x ? w->xs - x - 1 : len) && *s; i++) {
wchar_t wc;
s += one_mbtowc(&wc, s, MB_LEN_MAX);
mc_wputc(w, wc);
}
mc_wflush();
}
p->flags |= CHANGED;
}
/*
* Mark a variable as changed.
*/
static void markch(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(char *s, const char *w)
{
struct pars *p = (struct pars *)s;
strcpy(s, w);
p->flags |= CHANGED;
}
/*
* Get a a character from the keyboard. Translate lower
* to uppercase and '\r' to '\n'.
*/
static int rwxgetch(void)
{
int c = wxgetch();
if (islower(c))
c = toupper(c);
if (c == '\n' || c == '\r' || c == '\033')
return '\n';
return c;
}
#ifdef LOGFILE
static void dologopt(void)
{
WIN *w;
int c;
char *logfnstr = _(" A - File name (empty=disable) :");
char *logconn = _(" B - Log connects and hangups :");
char *logxfer = _(" C - Log file transfers :");
char *question = _("Change which setting?");
w = mc_wopen(5, 4, 75, 8, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
mc_wtitle(w, TMID, _("Logging options"));
mc_wprintf(w, "%s %s\n", logfnstr, P_LOGFNAME);
mc_wprintf(w, "%s %s\n", logconn, _(P_LOGCONN));
mc_wprintf(w, "%s %s\n", logxfer, _(P_LOGXFER));
mc_wlocate(w, 4, 4);
mc_wputs(w, question);
mc_wredraw(w, 1);
while(1) {
mc_wlocate(w, mbslen(question) + 5, 5);
c = rwxgetch();
switch(c) {
case '\n':
mc_wclose(w, 1);
return;
case 'A':
pgets(w, mbslen(logfnstr) + 1, 0,
P_LOGFNAME, PARS_VAL_LEN, PARS_VAL_LEN, 1);
strcpy(logfname,P_LOGFNAME);
break;
case 'B':
strcpy(P_LOGCONN, yesno(P_LOGCONN[0] == 'N'));
mc_wlocate(w, mbslen(logconn) + 1, 1);
mc_wprintf(w, "%s ", _(P_LOGCONN));
markch(P_LOGCONN);
break;
case 'C':
strcpy(P_LOGXFER, yesno(P_LOGXFER[0] == 'N'));
mc_wlocate(w, mbslen(logxfer) + 1, 2);
mc_wprintf(w, "%s ", _(P_LOGXFER));
markch(P_LOGXFER);
break;
default:
break;
}
}
}
#endif
static void dopath(void)
{
WIN *w;
int c;
char *download_directory = _(" A - Download directory :");
char *upload_directory = _(" B - Upload directory :");
char *script_directory = _(" C - Script directory :");
char *script_program = _(" D - Script program :");
char *kermit_program = _(" E - Kermit program :");
#ifdef LOGFILE
char *log_settings = _(" F - Logging options");
#endif
char *question = _("Change which setting?");
w = mc_wopen(5, 5, 75, 12, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
mc_wprintf(w, "%s %.44s\n", download_directory, P_DOWNDIR);
mc_wprintf(w, "%s %.44s\n", upload_directory, P_UPDIR);
mc_wprintf(w, "%s %.44s\n", script_directory, P_SCRIPTDIR);
mc_wprintf(w, "%s %.44s\n", script_program, P_SCRIPTPROG);
mc_wprintf(w, "%s %.44s\n", kermit_program, P_KERMIT);
#ifdef LOGFILE
mc_wprintf(w, "%s\n", log_settings);
#endif
mc_wlocate(w, 4, 8);
mc_wputs(w, question);
mc_wredraw(w, 1);
while(1) {
mc_wlocate(w, mbslen (question) + 5, 8);
c = rwxgetch();
switch(c) {
case '\n':
mc_wclose(w, 1);
return;
case 'A':
pgets(w, mbslen (download_directory) + 1, 0, P_DOWNDIR, 64, 64, 1);
init_dir('d');
break;
case 'B':
pgets(w, mbslen (upload_directory) + 1, 1, P_UPDIR, 64, 64, 1);
init_dir('u');
break;
case 'C':
pgets(w, mbslen (script_directory) + 1, 2, P_SCRIPTDIR, 64, 64, 1);
break;
case 'D':
pgets(w, mbslen (script_program) + 1, 3, P_SCRIPTPROG, 64, 64, 1);
break;
case 'E':
pgets(w, mbslen (kermit_program) + 1, 4, P_KERMIT, 64, 64, 1);
break;
#ifdef LOGFILE
case 'F':
dologopt();
break;
#endif
default:
break;
}
}
}
const char *yesno(int k)
{
return(k ? N_("Yes") : N_("No "));
}
/*
* Input the definition of an up/download protocol.
*/
static void inputproto(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';
mc_wlocate(w, 4, n+1);
mc_wputs(w, " ");
}
mc_wlocate(w, 4, n + 1);
mc_wgets(w, P_PNAME(n), 10, 64);
pgets(w, 15, n+1, P_PPROG(n), 31, 64, 0);
do {
mc_wlocate(w, 47, n + 1);
mc_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 {
mc_wlocate(w, 52, n + 1);
mc_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 {
mc_wlocate(w, 57, n + 1);
mc_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 {
mc_wlocate(w, 65, n + 1);
mc_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 {
mc_wlocate(w, 73, n + 1);
mc_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(void)
{
WIN *w;
int f, c;
char *zmodem_download = _("M Zmodem download string activates...");
char *use_filename_selection = _("N Use filename selection window......");
char *prompt_downdir = _("O Prompt for download directory......");
char *question = _("Change which setting? (SPACE to delete)");
w = mc_wopen(1, 3, 78, 20, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
mc_wputs(w, _(" Name Program"));
mc_wlocate(w, 46, 0);
mc_wputs(w,
/* TRANSLATORS:
* Name: Protocol sends filename internally
* U/D: Command is used for upload or download
* FullScr: Command runs fullscreen
* IO-Red: Redirect output of commands to logfile
* Multi: Protocol can transfer multiple files at once */
_("Name U/D FullScr IO-Red. Multi"));
for (f = 0; f < 12; f++) {
mc_wlocate(w, 1, f + 1);
if (P_PNAME(f)[0])
mc_wprintf(w, "%c %-10.10s %-31.31s %c %c %c %c %c",
'A' + f,
P_PNAME(f), P_PPROG(f),
P_PNN(f), P_PUD(f),
P_PFULL(f), P_PIORED(f),
P_MUL(f));
else
mc_wprintf(w, "%c -", 'A' + f);
}
mc_wlocate(w, 1, 13);
mc_wprintf(w, "%s %c", zmodem_download, P_PAUTO[0]);
mc_wlocate(w, 1, 14);
mc_wprintf(w, "%s %s", use_filename_selection, _(P_FSELW));
mc_wlocate(w, 1, 15);
mc_wprintf(w, "%s %s", prompt_downdir, _(P_ASKDNDIR));
mc_wlocate(w, 3, 17);
mc_wputs(w, question);
mc_wredraw(w, 1);
do {
mc_wlocate(w, mbslen (question) + 4, 17);
c = rwxgetch();
if (c >= 'A' && c <= 'L')
inputproto(w, c - 'A');
if (c == ' ') {
mc_wlocate(w, 3, 17);
mc_wputs(w, _("Delete which protocol? "));
mc_wclreol(w);
c = rwxgetch();
if (c >= 'A' && c <= 'L') {
P_PNAME(c - 'A')[0] = '\0';
mpars[PROTO_BASE + (c - 'A')].flags |= CHANGED;
mc_wlocate(w, 3, c - 'A' + 1);
mc_wclreol(w);
mc_wputs(w, " -");
}
mc_wlocate(w, 3, 17);
mc_wputs(w, question);
c = ' ';
}
else if (c == 'M') {
mc_wlocate(w, mbslen (zmodem_download) + 2, 13);
mc_wprintf(w, " \b");
c = rwxgetch();
if (c >= 'A' && c <= 'L') {
P_PAUTO[0] = c;
markch(P_PAUTO);
mc_wprintf(w, "%c", c);
} else if (c == '\n' || c == ' ') {
P_PAUTO[0] = ' ';
markch(P_PAUTO);
} else {
mc_wprintf(w, "%c", P_PAUTO[0]);
}
c = 0;
}
else if (c == 'N') {
strcpy(P_FSELW, yesno(P_FSELW[0] == 'N'));
if (P_FSELW[0] == 'N') {
strcpy(P_ASKDNDIR, "No ");
mc_wlocate(w, mbslen (prompt_downdir) + 2, 15);
mc_wprintf(w, "%s ", _(P_ASKDNDIR));
markch(P_ASKDNDIR);
}
mc_wlocate(w, mbslen (use_filename_selection) + 2, 14);
mc_wprintf(w, "%s ", _(P_FSELW));
markch(P_FSELW);
}
else if (c == 'O') {
strcpy(P_ASKDNDIR, yesno(P_ASKDNDIR[0] == 'N'));
if (P_ASKDNDIR[0] == 'Y') {
strcpy(P_FSELW, "Yes");
mc_wlocate(w, mbslen (use_filename_selection) + 2, 14);
mc_wprintf(w, "%s ", _(P_FSELW));
markch(P_FSELW);
}
mc_wlocate(w, mbslen (prompt_downdir) + 2, 15);
mc_wprintf(w, "%s ", _(P_ASKDNDIR));
markch(P_ASKDNDIR);
}
} while (c != '\n');
mc_wclose(w, 1);
}
static void doserial(void)
{
WIN *w;
char *serial_device = _(" A - Serial Device :");
#if !HAVE_LOCKDEV
char *lockfile_location = _(" B - Lockfile Location :");
#endif
char *callin_program = _(" C - Callin Program :");
char *callout_program = _(" D - Callout Program :");
char *bps_par_bits = _(" E - Bps/Par/Bits :");
char *hardware_flow_control = _(" F - Hardware Flow Control :");
char *software_flow_control = _(" G - Software Flow Control :");
char *question = _("Change which setting?");
w = mc_wopen(5, 4, 75, 12, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
mc_wprintf(w, "%s %.41s\n", serial_device, P_PORT);
#if !HAVE_LOCKDEV
mc_wprintf(w, "%s %.41s\n", lockfile_location, P_LOCK);
#else
mc_wprintf(w, "\n");
#endif
mc_wprintf(w, "%s %.41s\n", callin_program, P_CALLIN);
mc_wprintf(w, "%s %.41s\n", callout_program, P_CALLOUT);
mc_wprintf(w, "%s %s %s%s%s\n",
bps_par_bits, P_BAUDRATE, P_BITS, P_PARITY, P_STOPB);
mc_wprintf(w, "%s %s\n", hardware_flow_control, _(P_HASRTS));
mc_wprintf(w, "%s %s\n", software_flow_control, _(P_HASXON));
mc_wlocate(w, 4, 8);
mc_wputs(w, question);
mc_wredraw(w, 1);
while(1) {
mc_wlocate(w, mbslen (question) + 5, 8);
switch (rwxgetch()) {
case '\n':
mc_wclose(w, 1);
return;
case 'A':
pgets(w, mbslen (serial_device) + 1, 0, P_PORT, 64, 64, 1);
break;
#if !HAVE_LOCKDEV
case 'B':
pgets(w, mbslen (lockfile_location) + 1, 1, P_LOCK, 64, 64, 1);
break;
#endif
case 'C':
pgets(w, mbslen (callin_program) + 1, 2, P_CALLIN, 64, 64, 1);
break;
case 'D':
pgets(w, mbslen (callout_program) + 1, 3, P_CALLOUT, 64, 64, 1);
break;
case 'E':
get_bbp(P_BAUDRATE, P_BITS, P_PARITY, P_STOPB, 0);
if (portfd >= 0)
port_init();
mc_wlocate(w, mbslen (bps_par_bits) + 1, 4);
mc_wprintf(w, "%s %s%s%s \n", P_BAUDRATE, P_BITS, P_PARITY, P_STOPB);
show_status();
markch(P_BAUDRATE);
markch(P_BITS);
markch(P_PARITY);
markch(P_STOPB);
break;
case 'F':
strcpy(P_HASRTS, yesno(P_HASRTS[0] == 'N'));
mc_wlocate(w, mbslen (hardware_flow_control) + 1, 5);
mc_wprintf(w, "%s ", _(P_HASRTS));
if (portfd >= 0)
port_init();
markch(P_HASRTS);
break;
case 'G':
strcpy(P_HASXON, yesno(P_HASXON[0] == 'N'));
mc_wlocate(w, mbslen (software_flow_control) + 1, 6);
mc_wprintf(w, "%s ", _(P_HASXON));
if (portfd >= 0)
port_init();
markch(P_HASXON);
break;
default:
break;
}
}
}
char * sspd(char *sptyp)
{
if (sptyp[0] == 'd')
return (_("DTE speed "));
else
return (_("line speed"));
}
static void domodem(void)
{
WIN *w;
char *str;
int c, x, y, ypos, maxl, string_size;
const char *init_string = _(" A - Init string .........");
const char *reset_string = _(" B - Reset string ........");
const char *dialing_prefix_1 = _(" C - Dialing prefix #1....");
const char *dialing_suffix_1 = _(" D - Dialing suffix #1....");
const char *dialing_prefix_2 = _(" E - Dialing prefix #2....");
const char *dialing_suffix_2 = _(" F - Dialing suffix #2....");
const char *dialing_prefix_3 = _(" G - Dialing prefix #3....");
const char *dialing_suffix_3 = _(" H - Dialing suffix #3....");
const char *connect_string = _(" I - Connect string ......");
const char *no_connect_strings = _(" J - No connect strings ..");
const char *hangup_string = _(" K - Hang-up string ......");
const char *dial_cancel_string = _(" L - Dial cancel string ..");
const char *dial_time = _(" M - Dial time ...........");
const char *delay_before_redial = _(" N - Delay before redial .");
const char *number_of_tries = _(" O - Number of tries .....");
const char *dtr_drop_time = _(" P - DTR drop time (0=no).");
const char *auto_bps_detect = _(" Q - Auto bps detect .....");
const char *modem_has_dcd_line = _(" R - Modem has DCD line ..");
const char *shown_speed = _(" S - Status line shows ...");
const char *multi_node = _(" T - Multi-line untag ....");
const char *question = _("Change which setting?");
const char *defaults[] =
{
"~^M~AT S7=45 S0=0 L1 V1 X4 &c1 E1 Q0^M",
"^M~ATZ^M~",
};
w = mc_wopen(2, 2, 77, 22, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
dirflush = 0;
mc_wtitle(w, TMID, _("Modem and dialing parameter setup"));
mc_wprintf(w, "\n");
mc_wprintf(w, "%s %.48s\n", init_string, P_MINIT);
mc_wprintf(w, "%s %.48s\n", reset_string, P_MRESET);
mc_wprintf(w, "%s %.48s\n", dialing_prefix_1, P_MDIALPRE);
mc_wprintf(w, "%s %.48s\n", dialing_suffix_1, P_MDIALSUF);
mc_wprintf(w, "%s %.48s\n", dialing_prefix_2, P_MDIALPRE2);
mc_wprintf(w, "%s %.48s\n", dialing_suffix_2, P_MDIALSUF2);
mc_wprintf(w, "%s %.48s\n", dialing_prefix_3, P_MDIALPRE3);
mc_wprintf(w, "%s %.48s\n", dialing_suffix_3, P_MDIALSUF3);
mc_wprintf(w, "%s %.48s\n", connect_string, P_MCONNECT);
mc_wprintf(w, "%s %-20.20s %.20s\n", no_connect_strings, P_MNOCON1, P_MNOCON2);
mc_wlocate(w, mbslen (no_connect_strings) + 1, 11);
mc_wprintf(w, "%-20.20s %.20s\n", P_MNOCON3, P_MNOCON4);
mc_wprintf(w, "%s %.48s\n", hangup_string, P_MHANGUP);
mc_wprintf(w, "%s %.48s\n", dial_cancel_string, P_MDIALCAN);
mc_wprintf(w, "\n");
mc_wprintf(w, "%s %.3s\n", dial_time, P_MDIALTIME);
mc_wprintf(w, "%s %.3s\n", delay_before_redial, P_MRDELAY);
mc_wprintf(w, "%s %.3s\n", number_of_tries, P_MRETRIES);
mc_wprintf(w, "%s %.3s\n", dtr_drop_time, P_MDROPDTR);
mc_wlocate(w, 34, 15);
mc_wprintf(w, "%s %s\n", auto_bps_detect, _(P_MAUTOBAUD));
mc_wlocate(w, 34, 16);
mc_wprintf(w, "%s %s\n", modem_has_dcd_line, _(P_HASDCD));
mc_wlocate(w, 34, 17);
mc_wprintf(w, "%s %s\n", shown_speed, sspd(P_SHOWSPD));
mc_wlocate(w, 34, 18); /* Option for multi-node untag */
mc_wprintf(w, "%s %s\n", multi_node, _(P_MULTILINE)); /* er 18-Apr-99 */
mc_wlocate(w, 1, 20);
mc_wprintf(w, "%s ", question);
x = w->curx; y = w->cury;
mc_wprintf(w, _(" Return or Esc to exit. Edit A+B to get defaults."));
mc_wredraw(w, 1);
while (1) {
mc_wlocate(w, x, y);
mc_wflush();
c = rwxgetch();
ypos = 1;
maxl = 64;
string_size = 0;
switch(c) {
case 'M':
if (string_size == 0)
string_size = mbslen(dial_time);
case 'N':
if (string_size == 0)
string_size = mbslen(delay_before_redial);
case 'O':
if (string_size == 0)
string_size = mbslen(number_of_tries);
case 'P':
if (string_size == 0)
string_size = mbslen(dtr_drop_time);
ypos++;
maxl = 4;
case 'K':
if (string_size == 0)
string_size = mbslen(hangup_string);
case 'L':
if (string_size == 0)
string_size = mbslen(dial_cancel_string);
ypos -= 2;
c += 3;
case 'A':
if (string_size == 0)
string_size = mbslen(init_string);
case 'B':
if (string_size == 0)
string_size = mbslen(reset_string);
case 'C':
if (string_size == 0)
string_size = mbslen(dialing_prefix_1);
case 'D':
if (string_size == 0)
string_size = mbslen(dialing_suffix_1);
case 'E':
if (string_size == 0)
string_size = mbslen(dialing_prefix_2);
case 'F':
if (string_size == 0)
string_size = mbslen(dialing_suffix_2);
case 'G':
if (string_size == 0)
string_size = mbslen(dialing_prefix_3);
case 'H':
if (string_size == 0)
string_size = mbslen(dialing_suffix_3);
case 'I':
if (string_size == 0)
string_size = mbslen(connect_string);
{
int loc = c - 'A';
/* Calculate adress of string to modify */
str = P_MINIT + loc * sizeof(struct pars);
/* Nowadays (2011), the modem init and reset strings are seldomly
* used, so we initialize those values to an empty string and
* offer the default value when trying to set those strings from
* an empty value */
if ((loc == 0 || loc == 1) && !*str)
{
strncpy(str, defaults[loc], PARS_VAL_LEN);
str[PARS_VAL_LEN - 1] = 0;
mc_wlocate(w, string_size + 1, 1 + loc);
mc_wprintf(w, "%.48s\n", str);
}
pgets(w, string_size + 1, ypos + loc, str, maxl, maxl, 0);
}
break;
case 'J':
string_size = mbslen (no_connect_strings);
/* Walk through all four */
pgets(w, string_size + 1, 10, P_MNOCON1, 20, 64, 0);
pgets(w, string_size + 1 + 22, 10, P_MNOCON2, 20, 64, 0);
pgets(w, string_size + 1 , 11, P_MNOCON3, 20, 64, 0);
pgets(w, string_size + 1 + 22, 11, P_MNOCON4, 20, 64, 0);
break;
case 'Q':
psets(P_MAUTOBAUD, yesno(P_MAUTOBAUD[0] == 'N'));
mc_wlocate(w, 35 + mbslen (auto_bps_detect), 15);
mc_wputs(w, _(P_MAUTOBAUD));
break;
case 'R':
psets(P_HASDCD, yesno(P_HASDCD[0] == 'N'));
mc_wlocate(w, 35 + mbslen (modem_has_dcd_line), 16);
mc_wputs(w, _(P_HASDCD));
break;
case 'S':
psets(P_SHOWSPD, P_SHOWSPD[0] == 'd' ? "l": "d");
mc_wlocate(w, 35 + mbslen (shown_speed), 17);
mc_wputs(w, sspd(P_SHOWSPD));
show_status();
break;
case 'T': /* Update for multi-node */
psets(P_MULTILINE, yesno(P_MULTILINE[0] == 'N' ));
mc_wlocate(w, 35 + mbslen(multi_node), 18);
mc_wputs(w, _(P_MULTILINE));
break;
/* er 18-Apr-99 */
case '\n':
dirflush = 1;
mc_wclose(w, 1);
return;
default:
break;
}
}
}
/*
* Screen and keyboard menu.
*/
static void doscrkeyb(void)
{
WIN *w, *w1;
int c;
int once = 0;
int clr = 1;
int tmp_c; /* fmg - need it to color keep in sanity checks */
char buf[16];
int miny = 2, maxy = 22;
int old_stat = P_STATLINE[0];
FILE *fp;
char *command_key = _(" A - Command key is :");
char *backspace_key = _(" B - Backspace key sends :");
char *status_line = _(" C - Status line is :");
char *alarm_sound = _(" D - Alarm sound :");
char *foreground_color_menu = _(" E - Foreground Color (menu):");
char *background_color_menu = _(" F - Background Color (menu):");
char *foreground_color_term = _(" G - Foreground Color (term):");
char *background_color_term = _(" H - Background Color (term):");
char *foreground_color_stat = _(" I - Foreground Color (stat):");
char *background_color_stat = _(" J - Background Color (stat):");
char *history_buffer_size = _(" K - History Buffer Size :");
char *macros_file = _(" L - Macros file :");
char *macros_enabled = _(" N - Macros enabled :");
char *character_conversion = _(" O - Character conversion :");
char *add_linefeed = _(" P - Add linefeed :");
char *local_echo_str = _(" Q - Local echo :");
char *line_wrap = _(" R - Line Wrap :");
char *display_hex_str = _(" S - Hex Display :");
char *add_carriagereturn = _(" T - Add carriage return :");
char *question = _("Change which setting? (Esc to exit)");
w = mc_wopen(15, miny, 69, maxy, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
mc_wtitle(w, TMID, _("Screen and keyboard"));
mc_wprintf(w, "%s %s\n", command_key, P_ESCAPE);
mc_wprintf(w, "%s %s\n", backspace_key, P_BACKSPACE);
mc_wprintf(w, "%s %s\n", status_line, _(P_STATLINE));
mc_wprintf(w, "%s %s\n", alarm_sound, _(P_SOUND));
/* fmg - colors support */
mc_wprintf(w, "%s %s\n", foreground_color_menu, _(J_col[mfcolor]));
mc_wprintf(w, "%s %s\n", background_color_menu, _(J_col[mbcolor]));
mc_wprintf(w, "%s %s\n", foreground_color_term, _(J_col[tfcolor]));
mc_wprintf(w, "%s %s\n", background_color_term, _(J_col[tbcolor]));
mc_wprintf(w, "%s %s\n", foreground_color_stat, _(J_col[sfcolor]));
mc_wprintf(w, "%s %s\n", background_color_stat, _(J_col[sbcolor]));
/* MARK updated 02/17/95 - Configurable history buffer size */
mc_wprintf(w, "%s %s\n", history_buffer_size, P_HISTSIZE);
/* fmg - macros support */
mc_wprintf(w, "%s %s\n", macros_file, P_MACROS);
mc_wprintf(w, _(" M - Edit Macros\n"));
mc_wprintf(w, "%s %s\n", macros_enabled, _(P_MACENAB));
mc_wprintf(w, "%s %s\n", character_conversion, P_CONVF);
mc_wprintf(w, "%s %s\n", add_linefeed, _(P_ADDLINEFEED));
mc_wprintf(w, "%s %s\n", local_echo_str, _(P_LOCALECHO));
mc_wprintf(w, "%s %s\n", line_wrap, _(P_LINEWRAP));
mc_wprintf(w, "%s %s\n", display_hex_str, _(P_DISPLAYHEX));
mc_wprintf(w, "%s %s\n", add_carriagereturn, _(P_ADDCARRIAGERETURN));
mc_wredraw(w, 1);
while (1) {
if (clr) {
mc_wlocate(w, 2, maxy - miny);
mc_wprintf(w, "%s ", question);
mc_wclreol(w);
clr = 0;
} else
mc_wlocate(w, mbslen (question) + 3, maxy - miny);
if (once) { /* fmg - allow to force looping */
c = once;
once = 0;
} else
c = rwxgetch();
#if 0 /* This might save us someday */
if (!usecolor && (c >= 'E' && c <= 'J')) {
werror(_("You can't change colors in black and white mode"));
continue;
}
#endif
switch(c) {
case '\n':
/* fmg - sanity checks... "we found the enemy and he is us" :-) */
if (mfcolor == mbcolor) { /* oops... */
tmp_c = mfcolor; /* save color (same for both, right?) */
mfcolor = WHITE; /* make sure they can see error :-) */
mbcolor = BLACK;
werror(_("Menu foreground == background color, change!"));
mfcolor = tmp_c; /* restore colors */
mbcolor = tmp_c;
break;
}
if (tfcolor == tbcolor) { /* oops... */
tmp_c = mfcolor; /* save color (same for both, right?) */
mfcolor = WHITE; /* make sure they can see error :-) */
mbcolor = BLACK;
werror(_("Terminal foreground == background color, change!"));
mfcolor = tmp_c; /* restore colors */
mbcolor = tmp_c;
break;
}
/* fmg - I'll let them change sfcolor=sbcolor because it's just
another way of turning "off" the status line... */
/* MARK updated 02/17/95, Warn user to restart */
/* minicom if they changed history buffer size */
if (atoi(P_HISTSIZE) != num_hist_lines) {
w1 = mc_wopen(14, 9, 70, 15, BSINGLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
mc_wtitle(w1, TMID, _("History Buffer Size"));
mc_wputs(w1, _("\n\
You have changed the history buffer size.\n\
You will need to save the configuration file and\n\
restart minicom for the change to take effect.\n\n\
Hit a key to Continue... "));
mc_wredraw(w1, 1);
c = wxgetch();
mc_wclose(w1, 1);
}
mc_wclose(w, 1);
/* If status line enabled/disabled resize screen. */
if (P_STATLINE[0] != old_stat)
init_emul(terminal, 0);
return;
case 'A':
w1 = mc_wopen(11, 8, 73, 17, BSINGLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
mc_wtitle(w1, TMID, _("Program new command key"));
mc_wputs(w1, _(
"\n Press the new command key. If you want to use\n"
" the META or ALT key enter:\n\n"
" o SPACE if your meta key sets the 8th bit high\n"
" o ESC if your meta key sends the ESCAPE prefix (standard)\n"
"\n\n Press new command key: "));
mc_wredraw(w1, 1);
c = wxgetch();
mc_wclose(w1, 1);
if (c == ' ')
strcpy(buf, N_("Meta-8th bit "));
else if (c == 27)
strcpy(buf, N_("Escape (Meta)"));
else
sprintf(buf, "^%c ", (c & 0x1f) + 'A' - 1);
psets(P_ESCAPE, buf);
mc_wlocate(w, mbslen (command_key) + 1, 0);
mc_wputs(w, _(buf));
clr = 1;
alt_override = 0;
switch(P_ESCAPE[0]) {
case '^':
c = P_ESCAPE[1] & 31;
break;
case 'E':
c = 27;
break;
default:
c = 128;
break;
}
keyboard(KSETESC, c);
show_status();
break;
case 'B':
if (P_BACKSPACE[0] == 'D')
psets(P_BACKSPACE, "BS");
else
psets(P_BACKSPACE, "DEL");
mc_wlocate(w, mbslen (backspace_key) + 1, 1);
mc_wprintf(w, "%s ", P_BACKSPACE);
keyboard(KSETBS, P_BACKSPACE[0] == 'B' ? 8 : 127);
break;
case 'C':
if (P_STATLINE[0] == 'e') {
psets(P_STATLINE, N_("disabled"));
tempst = 1;
} else {
psets(P_STATLINE, N_("enabled"));
/* See if it fits on screen */
if (LINES > 24)
tempst = 0;
}
mc_wlocate(w, mbslen (status_line) + 1, 2);
mc_wprintf(w, "%s ", _(P_STATLINE));
break;
case 'D':
psets(P_SOUND, yesno(P_SOUND[0] == 'N'));
mc_wlocate(w, mbslen (alarm_sound) + 1, 3);
mc_wprintf(w, "%s", _(P_SOUND));
break;
case 'E': /* fmg - letters cycle colors */
if (mfcolor == WHITE)
mfcolor = BLACK;
else
mfcolor++;
psets(P_MFG, J_col[mfcolor]);
mc_wlocate(w, mbslen (foreground_color_menu) + 1, 4);
mc_wprintf(w, "%s ", _(J_col[mfcolor]));
break;
case 'F': /* fmg - letters cycle colors */
if (mbcolor == WHITE)
mbcolor = BLACK;
else
mbcolor++;
psets(P_MBG, J_col[mbcolor]);
mc_wlocate(w, mbslen (background_color_menu) + 1, 5);
mc_wprintf(w, "%s ", _(J_col[mbcolor]));
break;
case 'G': /* fmg - letters cycle colors */
if (tfcolor == WHITE)
tfcolor = BLACK;
else
tfcolor++;
psets(P_TFG, J_col[tfcolor]);
mc_wlocate(w, mbslen (foreground_color_term) + 1, 6);
mc_wprintf(w, "%s ", _(J_col[tfcolor]));
if (us)
vt_pinit(us, tfcolor, tbcolor);
break;
case 'H': /* fmg - letters cycle colors */
if (tbcolor == WHITE)
tbcolor = BLACK;
else
tbcolor++;
psets(P_TBG, J_col[tbcolor]);
mc_wlocate(w, mbslen (background_color_term) + 1, 7);
mc_wprintf(w, "%s ", _(J_col[tbcolor]));
if (us)
vt_pinit(us, tfcolor, tbcolor);
break;
case 'I': /* fmg - letters cycle colors & redraw stat line */
if (sfcolor == WHITE)
sfcolor = BLACK;
else
sfcolor++;
/* fmg - this causes redraw of status line (if any)
in current color */
if (st) {
mc_wclose(st,0);
st = mc_wopen(0, LINES - 1, COLS - 1, LINES - 1, BNONE,
XA_NORMAL, sfcolor, sbcolor, 1, 0, 1);
show_status();
}
psets(P_SFG, J_col[sfcolor]);
mc_wlocate(w, mbslen (foreground_color_stat) + 1, 8);
mc_wprintf(w, "%s ", _(J_col[sfcolor]));
break;
case 'J': /* fmg - letters cycle colors & redraw stat line */
if (sbcolor == WHITE)
sbcolor = BLACK;
else
sbcolor++;
/* fmg - this causes redraw of status line (if any)
in current color */
if (st) {
mc_wclose(st,0);
st = mc_wopen(0, LINES - 1, COLS - 1, LINES - 1, BNONE,
XA_NORMAL, sfcolor, sbcolor, 1, 0, 0);
show_status();
}
psets(P_SBG, J_col[sbcolor]);
mc_wlocate(w, mbslen (background_color_stat) + 1, 9);
mc_wprintf(w, "%s ", _(J_col[sbcolor]));
break;
case 'K': /* MARK updated 02/17/95 - Config history size */
pgets(w, mbslen (history_buffer_size) + 1, 10,
P_HISTSIZE, 6, 6, 0);
/* In case gibberish or a value was out of bounds, */
/* limit history buffer size between 0 to 5000 lines */
/* 5000 line history at 80 columns consumes about */
/* 800 kilobytes including chars and attrs bytes! */
if (atoi(P_HISTSIZE) <= 0)
strcpy(P_HISTSIZE,"0");
else if (atoi(P_HISTSIZE) >= 5000)
strcpy(P_HISTSIZE,"5000");
mc_wlocate(w, mbslen (history_buffer_size) + 1, 10);
mc_wprintf(w, "%s ", P_HISTSIZE);
break;
case 'L': /* fmg - get local macros storage file */
pgets(w, mbslen (macros_file) + 1, 11, P_MACROS, 64, 64, 1);
/* Try to open the file to read it in. */
fp = fopen(pfix_home(P_MACROS), "r+");
if (fp == NULL) {
if (errno == EPERM) {
/* Permission denied, hacker! */
werror(_("ERROR: you do not have permission to create a file there!"));
once = 'J'; /* fmg - re-enter it! */
continue;
}
if (errno != ENOENT) {
/* File does exist, but cannot be opened. */
werror(_("ERROR: cannot open macro file %s"),
pfix_home(P_MACROS));
}
continue;
}
/* Read macros from the file. */
werror(_("Reading macros"));
readmacs(fp, 0);
fclose(fp);
break;
case 'M': /* fmg - Bring up macro editing window */
domacros();
break;
case 'N':
psets(P_MACENAB, yesno(P_MACENAB[0] == 'N'));
mc_wlocate(w, mbslen (macros_enabled) + 1, 13);
mc_wprintf(w, "%s", _(P_MACENAB));
break;
case 'O': /* Character conversions - jl / 04.09.97 */
doconv();
mc_wlocate(w, mbslen (character_conversion) + 1, 14);
mc_wprintf(w, "%-16.16s", _(P_CONVF));
break;
case 'P':
psets(P_ADDLINEFEED, yesno(P_ADDLINEFEED[0] == 'N'));
mc_wlocate(w, mbslen (add_linefeed) + 1, 15);
mc_wprintf(w, "%s", _(P_ADDLINEFEED));
break;
case 'Q':
psets(P_LOCALECHO, yesno(P_LOCALECHO[0] == 'N'));
mc_wlocate(w, mbslen (local_echo_str) + 1, 16);
mc_wprintf(w, "%s", _(P_LOCALECHO));
break;
case 'R':
psets(P_LINEWRAP, yesno(P_LINEWRAP[0] == 'N'));
mc_wlocate(w, mbslen (line_wrap) + 1, 17);
mc_wprintf(w, "%s", _(P_LINEWRAP));
break;
case 'S':
psets(P_DISPLAYHEX, yesno(P_DISPLAYHEX[0] == 'N'));
mc_wlocate(w, mbslen(display_hex_str) + 1, 18);
mc_wprintf(w, "%s", _(P_DISPLAYHEX));
display_hex = strcasecmp(P_DISPLAYHEX, "yes") == 0;
break;
case 'T':
psets(P_ADDCARRIAGERETURN, yesno(P_ADDCARRIAGERETURN[0] == 'N'));
mc_wlocate(w, mbslen (add_carriagereturn) + 1, 19);
mc_wprintf(w, "%s", _(P_ADDCARRIAGERETURN));
break;
}
}
}
/*
* This is the 'T' menu - terminal parameters. Does NOT set the new
* terminal type, but returns it to the calling functions that has
* to call init_emul itself.
*/
int dotermmenu(void)
{
WIN *w;
int c;
int new_term = -1;
int old_stat = P_STATLINE[0];
char buf[8];
char *terminal_emulation = _(" A - Terminal emulation :");
char *backspace_key_sends = _(" B - Backspace key sends :");
char *status_line = _(" C - Status line is :");
char *msg_nl_delay = _(" D - Newline tx delay (ms) :");
char *msg_answerback = _(" E - ENQ answerback :");
char *msg_ch_delay = _(" F - Character tx delay (ms) :");
char *question = _("Change which setting?");
w = mc_wopen(15, 7, 64, 15, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
mc_wtitle(w, TMID, _("Terminal settings"));
mc_wprintf(w, "\n");
mc_wprintf(w, "%s %s\n", terminal_emulation, terminal == VT100 ? "VT102" : "ANSI");
mc_wprintf(w, "%s %s\n", backspace_key_sends, P_BACKSPACE);
mc_wprintf(w, "%s %s\n", status_line, _(P_STATLINE));
mc_wprintf(w, "%s %d\n", msg_nl_delay, vt_nl_delay);
mc_wprintf(w, "%s %s\n", msg_answerback, P_ANSWERBACK);
mc_wprintf(w, "%s %d\n", msg_ch_delay, vt_ch_delay);
mc_wlocate(w, 4, 7);
mc_wputs(w, question);
mc_wredraw(w, 1);
while (1) {
mc_wlocate(w, mbslen (question) + 5, 7);
c = rwxgetch();
switch(c) {
case '\n':
mc_wclose(w, 1);
/* If status line enabled/disabled resize screen. */
if (P_STATLINE[0] != old_stat && new_term < 0)
init_emul(terminal, 0);
return new_term;
case 'A':
if (new_term < 0)
new_term = terminal;
if (new_term == VT100) {
new_term = ANSI;
psets(P_BACKSPACE, "BS");
} else {
new_term = VT100;
psets(P_BACKSPACE, "DEL");
}
mc_wlocate(w, mbslen (terminal_emulation) + 1, 1);
mc_wprintf(w, "%s ", new_term == VT100 ? "VT102" : "ANSI");
mc_wlocate(w, mbslen (backspace_key_sends) + 1, 2);
mc_wprintf(w, "%s ", P_BACKSPACE);
keyboard(KSETBS, P_BACKSPACE[0] == 'B' ? 8 : 127);
break;
case 'B':
if (P_BACKSPACE[0] == 'D')
psets(P_BACKSPACE, "BS");
else
psets(P_BACKSPACE, "DEL");
mc_wlocate(w, mbslen (backspace_key_sends) + 1, 2);
mc_wprintf(w, "%s ", P_BACKSPACE);
keyboard(KSETBS, P_BACKSPACE[0] == 'B' ? 8 : 127);
break;
case 'C':
if (P_STATLINE[0] == 'e') {
psets(P_STATLINE, N_("disabled"));
tempst = 1;
} else {
psets(P_STATLINE, N_("enabled"));
/* See if it fits on screen */
if (LINES > 24 || use_status)
tempst = 0;
}
mc_wlocate(w, mbslen (status_line) + 1, 3);
mc_wprintf(w, "%s ", _(P_STATLINE));
break;
case 'D':
sprintf(buf, "%d", vt_nl_delay);
mc_wlocate(w, mbslen(msg_nl_delay) + 1, 4);
mc_wgets(w, buf, 5, 5);
vt_nl_delay = atoi(buf);
mc_wlocate(w, mbslen(msg_nl_delay) + 1, 4);
mc_wprintf(w, "%-4d", vt_nl_delay);
break;
case 'E':
pgets(w, strlen(msg_answerback) + 1, 5, P_ANSWERBACK, 50, 50, 0);
break;
case 'F':
sprintf(buf, "%d", vt_ch_delay);
mc_wlocate(w, mbslen(msg_ch_delay) + 1, 6);
mc_wgets(w, buf, 5, 5);
vt_ch_delay = atoi(buf);
mc_wlocate(w, mbslen(msg_ch_delay) + 1, 6);
mc_wprintf(w, "%-4d", vt_ch_delay);
break;
default:
break;
}
}
}
/*
* Save the configuration.
*/
void vdodflsave(void)
{
dodflsave();
}
/*
* Save the configuration.
*/
int dodflsave(void)
{
FILE *fp;
char *fname = dosetup ? parfile : pparfile;
if ((fp = fopen(fname, "w")) == NULL) {
werror(_("Cannot write to %s"), fname);
return -1;
}
writepars(fp, dosetup);
fclose(fp);
if (dosetup)
chmod(fname, (mode_t) 0644);
werror(_("Configuration saved"));
return domacsave() < 0 ? -1 : 0;
}
/*
* Save the macros. (fmg)
*/
int domacsave(void)
{
FILE *fp;
/* fmg - do some basic silly-mortal checks and allow for recovery */
if (!strcmp(P_MACCHG,"CHANGED")) {
if (strlen(P_MACROS) == 0) { /* fmg - they might want to know... */
werror(_("ERROR: Macros have changed but no filename is set!"));
return -1;
} else {
if ((fp = fopen(pfix_home(P_MACROS), "w")) == (FILE *)NULL) {
werror(_("Cannot write macros file %s"),
pfix_home(P_MACROS));
return -1;
}
writemacs(fp);
fclose(fp);
werror(_("Macros saved"));
strcpy(P_MACCHG,"SAVED"); /* fmg - reset after save */
return 0;
}
}
return 0;
}
/*
* Save the configuration, ask a name for it.
*/
static void donamsave(void)
{
char ifile[128];
char *s;
ifile[0] = 0;
s = input(_("Give name to save this configuration?"), ifile);
if (s != (char *)0 && *s != 0) {
snprintf(parfile, sizeof(parfile), "%s/minirc.%s", CONFDIR, s);
dodflsave();
}
}
static void (*funcs1[])(void) = {
dopath,
doproto,
doserial,
domodem,
doscrkeyb,
vdodflsave,
donamsave,
NULL,
NULL
};
char some_string[64];
static char const *menu1[] = {
N_("Filenames and paths"),
N_("File transfer protocols"),
N_("Serial port setup"),
N_("Modem and dialing"),
N_("Screen and keyboard"),
some_string,
N_("Save setup as.."),
N_("Exit"),
N_("Exit from Minicom"),
NULL,
};
int config(int setup)
{
int c;
char *s;
/* Find out extension of parameter file */
s = parfile + strlen(CONFDIR) + 8;
snprintf(some_string, sizeof(some_string), _("Save setup as %s"), s);
some_string[sizeof(some_string) - 1] = 0;
if (!setup)
menu1[8] = NULL;
c = mc_wselect(13, 10, menu1, funcs1, _("configuration"), stdattr, mfcolor, mbcolor);
if (c == 9)
return 1;
return 0;
}
/* fmg 1/11/94 Color names for menu */
const char *J_col[] =
{ N_("BLACK"), N_("RED"), N_("GREEN"), N_("YELLOW"),
N_("BLUE"), N_("MAGENTA"), N_("CYAN"), N_("WHITE") };
static const unsigned int speeds[] =
{ 300, 1200, 2400, 4800, 9600,
19200, 38400, 57600, 115200, 230400,
460800, 500000, 576000, 921600, 1000000,
1152000, 1500000, 2000000, 2500000, 3000000,
3500000, 4000000
};
#define NR_SPEEDS (sizeof(speeds) / sizeof(speeds[0]))
int speed_valid(unsigned int speed)
{
unsigned i;
for (i = 0; i < NR_SPEEDS; ++i)
if (speed == speeds[i])
return 1;
return 0;
}
/*
* Ask user for Baudrate, Bits and Parity
*/
void get_bbp(char *ba, char *bi, char *pa, char *stopb, int curr_ok)
{
int c;
WIN *w;
int x, y;
w = mc_wopen(23, 4, 58, 18, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
mc_wtitle(w, TMID, _("Comm Parameters"));
dirflush = 0;
mc_wlocate(w, 0, 3);
mc_wputs(w, _(" Speed Parity Data\n"));
mc_wputs(w, _(" A: <next> L: None S: 5\n"));
mc_wputs(w, _(" B: <prev> M: Even T: 6\n"));
mc_wputs(w, _(" C: 9600 N: Odd U: 7\n"));
mc_wputs(w, _(" D: 38400 O: Mark V: 8\n"));
mc_wputs(w, _(" E: 115200 P: Space\n"));
mc_wputs(w, "\n");
mc_wputs(w, _(" Stopbits\n"));
mc_wputs(w, _(" W: 1 Q: 8-N-1\n"));
mc_wputs(w, _(" X: 2 R: 7-E-1\n"));
if (curr_ok)
mc_wputs(w, _(" K: Current\n"));
else
mc_wputs(w, "\n");
mc_wputs(w, _("\n Choice, or <Enter> to exit? "));
x = w->curx;
y = w->cury;
mc_wredraw(w, 1);
while (1) {
mc_wlocate(w, 5, 1);
mc_wprintf(w, _("Current: %5s %s%s%s "), ba, bi, pa, stopb);
mc_wlocate(w, x, y);
mc_wflush();
c = wxgetch();
switch(c) {
case 27:
case '\n':
case '\r':
dirflush = 1;
mc_wclose(w, 1);
return;
default:
update_bbp_from_char(c, ba, bi, pa, stopb, curr_ok);
break;
}
}
}
/* Update the baud rate variables using the given character as the menu
* option selected.
*/
int update_bbp_from_char(char c, char *ba, char *bi, char *pa, char *stopb,
int curr_ok)
{
int characterRecognised = 1;
unsigned i;
int speed_idx = 0; /* Default value is the first value of the speeds array */
int delta = -1;
unsigned max_speed = m_getmaxspd();
char tmps[15];
int update_ba = 0;
/* We have strings for the baud rate, find the index in the speeds array */
for (i = 0; !speed_idx && i < NR_SPEEDS; i++) {
snprintf(tmps, sizeof(tmps), "%d", speeds[i]);
tmps[sizeof(tmps) - 1] = 0;
if (!strcmp(tmps, ba))
speed_idx = i;
}
bi[1] = 0;
pa[1] = 0;
switch(c = toupper(c)) {
case 'A':
delta = 1;
case 'B':
speed_idx += delta;
if (speed_idx < 0)
speed_idx = NR_SPEEDS - 1;
else if (speed_idx > (int)NR_SPEEDS - 1
|| max_speed < speeds[speed_idx])
speed_idx = 0;
case 'C':
case 'D':
case 'E':
if (c == 'C')
speed_idx = 4;
else if (c == 'D')
speed_idx = 6;
else if (c == 'E')
speed_idx = 8;
case 'K':
if (c == 'K' && !curr_ok)
break;
update_ba = 1;
break;
case 'L':
pa[0] = 'N';
break;
case 'M':
pa[0] = 'E';
break;
case 'N':
pa[0] = 'O';
break;
case 'O':
pa[0] = 'M';
break;
case 'P':
pa[0] = 'S';
break;
case 'Q':
pa[0] = 'N';
bi[0] = '8';
stopb[0] = '1';
break;
case 'R':
pa[0] = 'E';
bi[0] = '7';
stopb[0] = '1';
break;
case 'S':
bi[0] = '5';
break;
case 'T':
bi[0] = '6';
break;
case 'U':
bi[0] = '7';
break;
case 'V':
bi[0] = '8';
break;
case 'W':
stopb[0] = '1';
break;
case 'X':
stopb[0] = '2';
break;
default:
characterRecognised = 0;
break;
}
if (update_ba)
sprintf(ba, "%d", speeds[speed_idx]); /* XXX: uff, how long is 'ba' ? */
return characterRecognised;
}
/*
* fmg - part of the Macros menu, "[none]" beats (null) :-)
*/
static void out_mac(WIN *w, char *s, char n)
{
mc_wprintf(w, " %c : %.67s\n", n, s ? s : "[none]");
}
/*
* fmg - Macros editing window
*/
void domacros(void)
{
WIN *w;
int clr = 1;
int Jch = '1', Jm = 0; /* fmg - ok, so I was lazy.. */
char* question = _("Change which setting? (Esc to exit)");
w = mc_wopen(3, 6, 75, 24, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
mc_wtitle(w, TMID, _("F1 to F10 Macros"));
mc_wprintf(w, "\n");
out_mac(w,mmacs[Jm++].value, Jch++);
out_mac(w,mmacs[Jm++].value, Jch++);
out_mac(w,mmacs[Jm++].value, Jch++);
out_mac(w,mmacs[Jm++].value, Jch++);
out_mac(w,mmacs[Jm++].value, Jch++);
out_mac(w,mmacs[Jm++].value, Jch++);
out_mac(w,mmacs[Jm++].value, Jch++);
out_mac(w,mmacs[Jm++].value, Jch++);
out_mac(w,mmacs[Jm++].value, Jch++);
Jch = 'A'; /* fmg - ran out of single digits... */
out_mac(w,mmacs[Jm++].value, Jch++);
mc_wredraw(w, 1);
while(1) {
mc_wlocate(w, 1, 14);
mc_wputs(w, _(" (LEGEND: ^M = C-M, ^L = C-L, ^G = C-G, ^R = C-R, ^~ = pause 1 second,"));
mc_wlocate(w, 1, 15);
mc_wputs(w, _(" \\u = username, \\p = password, \\\\ = \\, \\e = toggle echo, "));
mc_wlocate(w, 1, 16);
mc_wputs(w, _(" \\l = toggle LF, \\bX1..Xn<sp> = change baud rate. Example: \"\\beq \""));
mc_wlocate(w, 1, 17);
mc_wputs(w, _(" = 115200 8N1. (See the \"Comm Parameters\" menu for valid values of X.))"));
if (clr) {
mc_wlocate(w, 1, 12);
mc_wprintf(w, "%s ", question);
mc_wclreol(w);
clr = 0;
} else
mc_wlocate(w, mbslen (question) + 2, 12);
switch (rwxgetch()) {
case '\n':
mc_wclose(w, 1);
return;
case '1':
mgets(w, 5, 1, P_MAC1, 72, MAC_LEN);
strcpy(P_MACCHG,_("CHANGED")); /* fmg - ...I'm ashamed */
mc_wlocate(w, 0, 1);
out_mac(w,P_MAC1, '1');
break;
case '2':
mgets(w, 5, 2, P_MAC2, 72, MAC_LEN);
strcpy(P_MACCHG,"CHANGED"); /* fmg - ... really, I am */
mc_wlocate(w, 0, 2);
out_mac(w,P_MAC2, '2');
break;
case '3':
mgets(w, 5, 3, P_MAC3, 72, MAC_LEN);
strcpy(P_MACCHG,"CHANGED"); /* fmg - ... this is the */
mc_wlocate(w, 0, 3);
out_mac(w,P_MAC3, '3');
break;
case '4':
mgets(w, 5, 4, P_MAC4, 72, MAC_LEN);
strcpy(P_MACCHG,"CHANGED"); /* fmg - ... first entry on */
mc_wlocate(w, 0, 4);
out_mac(w,P_MAC4, '4');
break;
case '5':
mgets(w, 5, 5, P_MAC5, 72, MAC_LEN);
strcpy(P_MACCHG,"CHANGED"); /* fmg - ... my TODO list. */
mc_wlocate(w, 0, 5);
out_mac(w,P_MAC5, '5');
break;
case '6':
mgets(w, 5, 6, P_MAC6, 72, MAC_LEN);
strcpy(P_MACCHG,"CHANGED"); /* fmg - ... and, come to think */
mc_wlocate(w, 0, 6);
out_mac(w,P_MAC6, '6');
break;
case '7':
mgets(w, 5, 7, P_MAC7, 72, MAC_LEN);
strcpy(P_MACCHG,"CHANGED"); /* fmg - ... of it, I no longer */
mc_wlocate(w, 0, 7);
out_mac(w,P_MAC7, '7');
break;
case '8':
mgets(w, 5, 8, P_MAC8, 72, MAC_LEN);
strcpy(P_MACCHG,"CHANGED"); /* fmg - ... even use this... */
mc_wlocate(w, 0, 8);
out_mac(w,P_MAC8, '8');
break;
case '9':
mgets(w, 5, 9, P_MAC9, 72, MAC_LEN);
strcpy(P_MACCHG,"CHANGED"); /* fmg - ... [sigh] */
mc_wlocate(w, 0, 9);
out_mac(w,P_MAC9, '9');
break;
case 'A':
mgets(w, 5, 10, P_MAC10, 72, MAC_LEN);
strcpy(P_MACCHG,"CHANGED"); /* fmg - ... [sigh] */
mc_wlocate(w, 0, 10);
out_mac(w,P_MAC10, 'A');
break;
}
}
}
/* is this *REALLY* a printable or non-printable character?
* the isprint() function seems to consider all chars > 127d non-printable..
* jl 10.03.1998
*/
int prch(int c)
{
if (c < 32 || c == 127 || c == 155)
return (' ');
else
return (c);
}
/* Edit the character conversion tables. jl 04.09.97 */
void doconv(void)
{
WIN *w;
int i, j, k, l, h,
offs = 32,
ymax = 22,
redraw = 1;
char buf[64];
char *prompt;
h = 16;
w = mc_wopen (1, 1, 77, ymax, BDOUBLE, stdattr, mfcolor, mbcolor, 0, 0, 1);
mc_wtitle(w, TMID, _("Character conversion"));
while (1) {
if (redraw) {
mc_winclr(w);
mc_wprintf(w,
_(" char in out char in out char in out char in out\n"));
for (i = offs, j = i+h, k = j+h, l = k+h;
i < offs+h && i < 256;
i++, j++, k++, l++) {
mc_wprintf(w, "%3d (%c) %3d %3d ",
i, prch(i), (int) vt_inmap[i], (int) vt_outmap[i]);
if (j < 256)
mc_wprintf(w, "%3d (%c) %3d %3d ",
j, prch(j), (int) vt_inmap[j], (int) vt_outmap[j]);
else
mc_wprintf(w, " ");
if (k < 256)
mc_wprintf(w, "%3d (%c) %3d %3d ",
k, prch(k), (int) vt_inmap[k], (int) vt_outmap[k]);
else
mc_wprintf(w, " ");
if (l < 256)
mc_wprintf(w, "%3d (%c) %3d %3d\n",
l, prch(l), (int) vt_inmap[l], (int) vt_outmap[l]);
else
mc_wprintf(w, " \n");
}
mc_wprintf(w, _("\n A - load table\tB - save table"));
if (P_CONVF[0])
mc_wprintf(w, _("\tfile:%s"),P_CONVF);
mc_wprintf(w, _("\n C - edit char\tD - next screen\tE - prev screen\n"));
mc_wprintf(w, _(" F - convert capture: %s\n"), _(P_CONVCAP));
mc_wredraw(w, 1);
redraw = 0;
}
mc_wlocate(w, 1, ymax - 1);
mc_wclreol(w);
mc_wflush();
switch (toupper(rwxgetch())) {
case '\n':
mc_wclose(w, 1); return;
break;
case 'A':
strcpy(buf,P_CONVF);
prompt=_("Load file: %s");
mc_wprintf(w, prompt, buf);
pgets(w, mbslen(prompt) - 1, ymax - 1, P_CONVF, 64, 64, 1);
if (loadconv(P_CONVF) == 0) {
if (strcmp(P_CONVF,buf))
markch(P_CONVF);
redraw = 1;
} else
strcpy(P_CONVF,buf);
break;
case 'B':
strcpy(buf,P_CONVF);
prompt=_("Save as file: %s");
mc_wprintf(w, prompt, buf);
pgets(w, mbslen(prompt) - 1, ymax - 1, P_CONVF, 64, 64, 1);
if (saveconv(P_CONVF) == 0) {
if (strcmp(P_CONVF,buf))
markch(P_CONVF);
redraw = 1;
} else
strcpy(P_CONVF,buf);
break;
case 'C':
prompt = _("Character to be edited: ");
mc_wprintf(w, "%s", prompt);
buf[0] = 0;
i = -1;
mc_wlocate(w, mbslen(prompt), ymax - 1);
mc_wgets(w, buf, 7, 7);
sscanf(buf, "%d", &i);
if (i > 255 || i < 0) {
werror(_("Input character ascii value 0-255"));
break;
}
sprintf(buf, "%u",(unsigned int) vt_inmap[i]);
mc_wlocate(w, 30, ymax - 1);
prompt=_("Change input to: %s");
mc_wprintf(w, prompt,buf);
mc_wlocate(w, mbslen(prompt) + 28, ymax - 1);
mc_wgets(w, buf, 7, 7);
sscanf(buf, "%d", &j);
if (j > 255 || j < 0) {
werror(_("Input character ascii value 0-255"));
break;
}
else vt_inmap[i] = j;
sprintf(buf, "%u",(unsigned int) vt_outmap[i]);
mc_wlocate(w, 54, ymax - 1);
prompt = _("Change output to: %s");
mc_wprintf(w, prompt, buf);
mc_wlocate(w, mbslen(prompt) + 52, ymax - 1);
mc_wgets(w, buf, 7, 7);
sscanf(buf, "%d", &j);
if (j > 255 || j < 0) {
werror(_("Input character ascii value 0-255"));
break;
}
else vt_outmap[i] = j;
redraw = 1;
break;
case 'D':
offs += 4 * h;
if (offs > 255)
offs = 0;
redraw = 1;
break;
case 'E':
offs -= 4 * h;
if (offs < 0)
offs = 0;
redraw = 1;
break;
case 'F':
strcpy(P_CONVCAP, yesno(P_CONVCAP[0] == 'N'));
markch(P_CONVCAP);
redraw = 1;
break;
}
}
}
int loadconv(char *buf)
{
FILE *fp;
int err = 0;
if ((fp = fopen(pfix_home(buf), "rb")) == (FILE *)NULL) {
werror(_("Cannot open conversion table %s"), pfix_home(buf));
return 1;
}
if ( fread(vt_inmap, sizeof(vt_inmap), (size_t)1, fp) != 1
|| fread(vt_outmap, sizeof(vt_outmap), (size_t)1, fp) != 1)
{
werror(_("Cannot read conversion table %s"), pfix_home(buf));
err = 1;
}
fclose(fp);
return err;
}
int saveconv(char *buf)
{
FILE *fp;
if ((fp = fopen(pfix_home(buf), "wb")) == (FILE *)NULL) {
werror(_("Cannot write conversion table %s"), pfix_home(buf));
return 1;
}
fwrite(vt_inmap, sizeof(vt_inmap), (size_t)1, fp);
fwrite(vt_outmap, sizeof(vt_outmap), (size_t)1, fp);
fclose(fp);
return 0;
}