mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-11-27 03:51:15 +08:00
1b17e76665
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Locally modified files: Makefile.in, configure.in, configure
(regenerated), config.h.in (regenerated), readline.h, rltty.c,
shell.c signals.c.
Locally added files: acconfig.h, config/*, config.h.bot,
cross-build/*, doc/inc-hit.texinfo.
New files: USAGE, rlprivate.h, rlshell.h, xmalloc.h.
examples:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
New files: excallback.c, rlfe.c.
doc:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Regenerated inc-hist.texinfo as copy of hsuser.texinfo, for
inclusion in the gdb manual.
New file: rluserman.texinfo
132 lines
2.2 KiB
C
132 lines
2.2 KiB
C
/*
|
|
* rl - command-line interface to read a line from the standard input
|
|
* (or another fd) using readline.
|
|
*
|
|
* usage: rl [-p prompt] [-u unit] [-d default] [-n nchars]
|
|
*/
|
|
|
|
#if defined (HAVE_CONFIG_H)
|
|
# include <config.h>
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
#include <sys/types.h>
|
|
#include "posixstat.h"
|
|
|
|
#if defined (READLINE_LIBRARY)
|
|
# include "readline.h"
|
|
# include "history.h"
|
|
#else
|
|
# include <readline/readline.h>
|
|
# include <readline/history.h>
|
|
#endif
|
|
|
|
extern int optind;
|
|
extern char *optarg;
|
|
|
|
#if !defined (strchr) && !defined (__STDC__)
|
|
extern char *strrchr();
|
|
#endif
|
|
|
|
static char *progname;
|
|
static char *deftext;
|
|
|
|
static int
|
|
set_deftext ()
|
|
{
|
|
if (deftext)
|
|
{
|
|
rl_insert_text (deftext);
|
|
deftext = (char *)NULL;
|
|
rl_startup_hook = (Function *)NULL;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static void
|
|
usage()
|
|
{
|
|
fprintf (stderr, "%s: usage: %s [-p prompt] [-u unit] [-d default] [-n nchars]\n",
|
|
progname, progname);
|
|
}
|
|
|
|
int
|
|
main (argc, argv)
|
|
int argc;
|
|
char **argv;
|
|
{
|
|
char *temp, *prompt;
|
|
struct stat sb;
|
|
int opt, fd, nch;
|
|
FILE *ifp;
|
|
|
|
progname = strrchr(argv[0], '/');
|
|
if (progname == 0)
|
|
progname = argv[0];
|
|
else
|
|
progname++;
|
|
|
|
/* defaults */
|
|
prompt = "readline$ ";
|
|
fd = nch = 0;
|
|
deftext = (char *)0;
|
|
|
|
while ((opt = getopt(argc, argv, "p:u:d:n:")) != EOF)
|
|
{
|
|
switch (opt)
|
|
{
|
|
case 'p':
|
|
prompt = optarg;
|
|
break;
|
|
case 'u':
|
|
fd = atoi(optarg);
|
|
if (fd < 0)
|
|
{
|
|
fprintf (stderr, "%s: bad file descriptor `%s'\n", progname, optarg);
|
|
exit (2);
|
|
}
|
|
break;
|
|
case 'd':
|
|
deftext = optarg;
|
|
break;
|
|
case 'n':
|
|
nch = atoi(optarg);
|
|
if (nch < 0)
|
|
{
|
|
fprintf (stderr, "%s: bad value for -n: `%s'\n", progname, optarg);
|
|
exit (2);
|
|
}
|
|
break;
|
|
default:
|
|
usage ();
|
|
exit (2);
|
|
}
|
|
}
|
|
|
|
if (fd != 0)
|
|
{
|
|
if (fstat (fd, &sb) < 0)
|
|
{
|
|
fprintf (stderr, "%s: %d: bad file descriptor\n", progname, fd);
|
|
exit (1);
|
|
}
|
|
ifp = fdopen (fd, "r");
|
|
rl_instream = ifp;
|
|
}
|
|
|
|
if (deftext && *deftext)
|
|
rl_startup_hook = set_deftext;
|
|
|
|
if (nch > 0)
|
|
rl_num_chars_to_read = nch;
|
|
|
|
temp = readline (prompt);
|
|
|
|
/* Test for EOF. */
|
|
if (temp == 0)
|
|
exit (1);
|
|
|
|
puts (temp);
|
|
exit (0);
|
|
}
|