int cmd_lfnfor(char *param)
{
if(strnicmp(param, "COMPLETE", 8) == 0) {
switch(onoffStr(¶m[8])) {
default:
error_on_off();
return 1;
case OO_Null: case OO_Empty:
displayString(TEXT_MSG_LFNFOR_COMPLETE_STATE, lfncomplete ?
D_ON : D_OFF );
break;
case OO_Off: lfncomplete = 0; break;
case OO_On: lfncomplete = 1; break;
}
}
else switch(onoffStr(param)) {
default:
error_on_off();
return 1;
case OO_Null: case OO_Empty:
displayString(TEXT_MSG_LFNFOR_STATE, lfnfor ? D_ON : D_OFF);
break;
case OO_Off: lfnfor = 0; break;
case OO_On: lfnfor = 1; break;
}
return 0;
}
static int do_echo(char *param, void (*fct)(unsigned,...))
{ int status;
if(param && *param) {
status = isspace(*param);
/* Unlike other internal commands, puncation characters
are not removed by ECHO */
param = ltrimsp(param + 1);
} else status = 1;
switch(onoffStr(param)) {
case OO_On: gflag_echo = 1; goto chkGFlgPrompt;
case OO_Off: gflag_echo = 0;
chkGFlgPrompt:
if(!gflag_batchlevel)
gflag_dispPrompt = gflag_echo;
break;
case OO_Null: case OO_Empty:
default:
if(status) {
fct(TEXT_MSG_ECHO_STATE, gflag_echo ? D_ON : D_OFF);
break;
}
/**FALL THROUGH**/
param = "";
case OO_Other:
fct(TEXT_ECHO, param);
}
return 0;
}
int cmd_fddebug(char *param)
{
switch(onoffStr(param)) {
default: {
FILE *f;
char *p;
if((p = strdup(trimcl(param))) == 0) {
error_out_of_memory();
return 1;
}
if(stricmp(param, "stderr") == 0) f = stderr;
else if(stricmp(param, "stdout") == 0) f = stdout;
else if((f = fopen(param, "at")) == 0) {
error_open_file(param);
return 2;
}
if(dbg_logfile != stderr && dbg_logfile != stdout)
fclose(dbg_logfile);
dbg_logfile = f;
free(dbg_logname);
dbg_logname = p;
/* FALL THROUGH */
}
case OO_On: fddebug = 1; break;
case OO_Null: case OO_Empty:
displayString(TEXT_MSG_FDDEBUG_STATE, fddebug ? D_ON : D_OFF);
displayString(TEXT_MSG_FDDEBUG_TARGET
, dbg_logname? dbg_logname: "stdout");
break;
case OO_Off: fddebug = 0; break;
}
return 0;
}
int cmd_echo(char *param)
{ int nostatus;
dprintf( ("[ECHO: %s]\n", param) );
if(param && *param) {
nostatus = !isspace(*param);
/* Unlike other internal commands, puncation characters
are not removed by ECHO */
++param;
} else nostatus = 0;
switch(onoffStr(param)) {
case OO_Null: case OO_Empty:
default:
if(nostatus)
putchar('\n');
else
displayString(TEXT_MSG_ECHO_STATE, echo ? D_ON : D_OFF);
break;
case OO_Off: echo = 0; break;
case OO_On: echo = 1; break;
case OO_Other:
puts(param);
}
return 0;
}
int cmd_echo(char *param)
{ int nostatus;
/*
* Perform ECHO command.
*/
dprintf( ("[ECHO: %s]\n", param) );
if(param && *param) {
nostatus = !isspace(*param);
param = ltrim(param + 1);
} else nostatus = 0;
switch(onoffStr(param)) {
case OO_Null: case OO_Empty:
default:
if(nostatus)
putchar('\n');
else
displayString(TEXT_MSG_ECHO_STATE, echo ? D_ON : D_OFF);
break;
case OO_Off: echo = 0; break;
case OO_On: echo = 1; break;
case OO_Other:
puts(param);
}
return 0;
}
int cmd_verify(char *param)
{
switch(onoffStr(param)) {
default:
displayString(TEXT_ERROR_ON_OR_OFF);
return 1;
case OO_Null: case OO_Empty:
displayString(TEXT_MSG_VERIFY_STATE, getverify() ? D_ON : D_OFF);
break;
case OO_Off: setverify(0); break;
case OO_On: setverify(1); break;
}
return 0;
}
int cmd_break(char *param)
{
switch(onoffStr(param)) {
default:
error_on_off();
return 1;
case OO_Null: case OO_Empty:
displayString(TEXT_MSG_BREAK_STATE, getbreak() ? D_ON : D_OFF);
break;
case OO_Off: setbreak(0); break;
case OO_On: setbreak(1); break;
}
return 0;
}
