gno/bin/less/optfunc.c

382 lines
5.7 KiB
C
Raw Normal View History

/*
* Handling functions for command line options.
*
* Most options are handled by the generic code in option.c.
* But all string options, and a few non-string options, require
* special handling specific to the particular option.
* This special processing is done by the "handling functions" in this file.
*
* Each handling function is passed a "type" and, if it is a string
* option, the string which should be "assigned" to the option.
* The type may be one of:
* INIT The option is being initialized from the command line.
* TOGGLE The option is being changed from within the program.
* QUERY The setting of the option is merely being queried.
*/
#pragma noroot
#include "less.h"
#include "option.h"
#ifdef _ORCAC_
segment "LoadSegONE";
#endif
extern int nbufs;
extern int ispipe;
extern int cbufs;
extern int pr_type;
extern int nohelp;
extern int plusoption;
extern char *prproto[];
extern char *eqproto;
extern IFILE curr_ifile;
#if LOGFILE
extern char *namelogfile;
extern int force_logfile;
extern int logfile;
extern char *glob();
#endif
#if TAGS
public int tagoption = 0;
extern char *tagfile;
extern char *tagpattern;
extern char *tags;
#endif
#if __MSDOS__
public char *window_box = NULL;
extern int directvideo;
extern int output_mode;
#endif
#if LOGFILE
/*
* Handler for -o option.
*/
public void
opt_o(type, s)
int type;
char *s;
{
PARG parg;
switch (type)
{
case INIT:
namelogfile = s;
break;
case TOGGLE:
if (!ispipe)
{
error("Input is not a pipe", NULL_PARG);
return;
}
if (logfile >= 0)
{
error("Log file is already in use", NULL_PARG);
return;
}
s = skipsp(s);
namelogfile = glob(s);
if (namelogfile == NULL)
namelogfile = save(s);
use_logfile(s);
sync_logfile();
break;
case QUERY:
if (logfile < 0)
error("No log file", NULL_PARG);
else
{
parg.p_string = namelogfile;
error("Log file \"%s\"", &parg);
}
break;
}
}
/*
* Handler for -O option.
*/
public void
opt__O(type, s)
int type;
char *s;
{
force_logfile = 1;
opt_o(type, s);
}
/*
* Handlers for obsolete -l and -L options.
*/
public void
opt_l(type, s)
int type;
char *s;
{
error("The -l option is obsolete. Use -o", NULL_PARG);
}
public void
opt__L(type, s)
int type;
char *s;
{
error("The -L option is obsolete. Use -O", NULL_PARG);
}
#endif
#if USERFILE
public void
opt_k(type, s)
int type;
char *s;
{
PARG parg;
switch (type)
{
case INIT:
if (add_cmdtable(s))
{
parg.p_string = s;
error("Cannot use lesskey file \"%s\"", &parg);
}
break;
case QUERY:
case TOGGLE:
error("Cannot query the -k flag", NULL_PARG);
break;
}
}
#endif
#if TAGS
/*
* Handler for -t option.
*/
public void
opt_t(type, s)
int type;
char *s;
{
char *curr_filename;
switch (type)
{
case INIT:
tagoption = 1;
findtag(s);
break;
case TOGGLE:
findtag(skipsp(s));
if (tagfile != NULL)
{
curr_filename = get_filename(curr_ifile);
if (edit(tagfile, 0) == 0)
if (tagsearch())
(void) edit(curr_filename, 0);
}
break;
case QUERY:
error("Tag is required after -t", NULL_PARG);
break;
}
}
/*
* Handler for -T option.
*/
public void
opt__T(type, s)
int type;
char *s;
{
PARG parg;
switch (type)
{
case INIT:
tags = s;
break;
case TOGGLE:
s = skipsp(s);
tags = glob(s);
if (tags == NULL)
tags = save(s);
break;
case QUERY:
parg.p_string = tags;
error("Tags file \"%s\"", &parg);
break;
}
}
#endif
/*
* Handler for -p option.
*/
public void
opt_p(type, s)
int type;
register char *s;
{
switch (type)
{
case INIT:
/*
* Unget a search command for the specified string.
* {{ This won't work if the "/" command is
* changed or invalidated by a .lesskey file. }}
*/
plusoption = 1;
ungetsc(s);
ungetsc("/");
break;
case QUERY:
error("Pattern is required after -p", NULL_PARG);
break;
}
}
/*
* Handler for -P option.
*/
public void
opt__P(type, s)
int type;
register char *s;
{
register char **proto;
PARG parg;
switch (type)
{
case INIT:
case TOGGLE:
/*
* Figure out which prototype string should be changed.
*/
switch (*s)
{
case 'm': proto = &prproto[PR_MEDIUM]; s++; break;
case 'M': proto = &prproto[PR_LONG]; s++; break;
case '=': proto = &eqproto; s++; break;
default: proto = &prproto[pr_type]; break;
}
free(*proto);
*proto = save(s);
break;
case QUERY:
parg.p_string = prproto[pr_type];
error("%s", &parg);
break;
}
}
/*
* Handler for the -b option.
*/
/*ARGSUSED*/
public void
opt_b(type, s)
int type;
char *s;
{
switch (type)
{
case TOGGLE:
case QUERY:
/*
* Allocate the new number of buffers.
*/
cbufs = ch_nbuf(cbufs);
break;
case INIT:
break;
}
}
#if __MSDOS__
/*
* Handler for -v option. (use BIOS or direct video)
*/
public void
opt_v(type, s)
int type;
register char *s;
{
switch (type)
{
case INIT:
case TOGGLE:
if (output_mode == 2)
directvideo = 1;
else
directvideo = 0;
break;
case QUERY:
break;
}
}
/*
* Handler for -W option. (set/modify window boundaries)
*/
public void
opt_W(type, s)
int type;
register char *s;
{
PARG parg;
switch (type)
{
case INIT:
window_box = save(s);
break; /* get_term will take care of actually setting window */
#ifdef MOVE_WINDOW
case TOGGLE:
if (window_box != NULL)
free(window_box);
window_box = save(s);
reset_window();
break;
#endif
case QUERY:
parg.p_string = window_box;
error("%s", &parg);
break;
}
}
#endif
/*
* "-?" means display a help message.
* If from the command line, exit immediately.
*/
/*ARGSUSED*/
public void
opt_query(type, s)
int type;
char *s;
{
if (nohelp)
return;
switch (type)
{
case QUERY:
case TOGGLE:
error("Use \"h\" for help", NULL_PARG);
break;
case INIT:
raw_mode(1);
init();
help();
quit(0);
/*NOTREACHED*/
}
}