1997-06-07 12:17:44 +00:00
|
|
|
/*
|
|
|
|
* rl - command-line interface to read a line from the standard input
|
|
|
|
* (or another fd) using readline.
|
|
|
|
*
|
2000-03-19 21:18:09 +00:00
|
|
|
* usage: rl [-p prompt] [-u unit] [-d default] [-n nchars]
|
1997-06-07 12:17:44 +00:00
|
|
|
*/
|
|
|
|
|
|
|
|
#if defined (HAVE_CONFIG_H)
|
1998-04-28 06:22:20 +00:00
|
|
|
# include <config.h>
|
1997-06-07 12:17:44 +00:00
|
|
|
#endif
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <sys/types.h>
|
|
|
|
#include "posixstat.h"
|
2000-03-19 21:18:09 +00:00
|
|
|
|
|
|
|
#if defined (READLINE_LIBRARY)
|
|
|
|
# include "readline.h"
|
|
|
|
# include "history.h"
|
|
|
|
#else
|
|
|
|
# include <readline/readline.h>
|
|
|
|
# include <readline/history.h>
|
|
|
|
#endif
|
1997-06-07 12:17:44 +00:00
|
|
|
|
|
|
|
extern int optind;
|
|
|
|
extern char *optarg;
|
|
|
|
|
1998-04-28 06:22:20 +00:00
|
|
|
#if !defined (strchr) && !defined (__STDC__)
|
1997-06-07 12:17:44 +00:00
|
|
|
extern char *strrchr();
|
1998-04-28 06:22:20 +00:00
|
|
|
#endif
|
1997-06-07 12:17:44 +00:00
|
|
|
|
|
|
|
static char *progname;
|
|
|
|
static char *deftext;
|
|
|
|
|
|
|
|
static int
|
|
|
|
set_deftext ()
|
|
|
|
{
|
|
|
|
if (deftext)
|
|
|
|
{
|
|
|
|
rl_insert_text (deftext);
|
|
|
|
deftext = (char *)NULL;
|
2001-04-11 02:33:07 +00:00
|
|
|
rl_startup_hook = (rl_hook_func_t *)NULL;
|
1997-06-07 12:17:44 +00:00
|
|
|
}
|
2000-03-19 21:18:09 +00:00
|
|
|
return 0;
|
1997-06-07 12:17:44 +00:00
|
|
|
}
|
|
|
|
|
1999-05-28 01:59:23 +00:00
|
|
|
static void
|
1997-06-07 12:17:44 +00:00
|
|
|
usage()
|
|
|
|
{
|
2000-03-19 21:18:09 +00:00
|
|
|
fprintf (stderr, "%s: usage: %s [-p prompt] [-u unit] [-d default] [-n nchars]\n",
|
1997-06-07 12:17:44 +00:00
|
|
|
progname, progname);
|
|
|
|
}
|
|
|
|
|
2000-03-19 21:18:09 +00:00
|
|
|
int
|
1997-06-07 12:17:44 +00:00
|
|
|
main (argc, argv)
|
|
|
|
int argc;
|
|
|
|
char **argv;
|
|
|
|
{
|
|
|
|
char *temp, *prompt;
|
|
|
|
struct stat sb;
|
2000-03-19 21:18:09 +00:00
|
|
|
int opt, fd, nch;
|
1997-06-07 12:17:44 +00:00
|
|
|
FILE *ifp;
|
|
|
|
|
|
|
|
progname = strrchr(argv[0], '/');
|
|
|
|
if (progname == 0)
|
|
|
|
progname = argv[0];
|
|
|
|
else
|
|
|
|
progname++;
|
|
|
|
|
|
|
|
/* defaults */
|
|
|
|
prompt = "readline$ ";
|
2000-03-19 21:18:09 +00:00
|
|
|
fd = nch = 0;
|
1997-06-07 12:17:44 +00:00
|
|
|
deftext = (char *)0;
|
|
|
|
|
2000-03-19 21:18:09 +00:00
|
|
|
while ((opt = getopt(argc, argv, "p:u:d:n:")) != EOF)
|
1997-06-07 12:17:44 +00:00
|
|
|
{
|
|
|
|
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;
|
2000-03-19 21:18:09 +00:00
|
|
|
case 'n':
|
|
|
|
nch = atoi(optarg);
|
|
|
|
if (nch < 0)
|
|
|
|
{
|
|
|
|
fprintf (stderr, "%s: bad value for -n: `%s'\n", progname, optarg);
|
|
|
|
exit (2);
|
|
|
|
}
|
|
|
|
break;
|
1997-06-07 12:17:44 +00:00
|
|
|
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;
|
|
|
|
|
2000-03-19 21:18:09 +00:00
|
|
|
if (nch > 0)
|
|
|
|
rl_num_chars_to_read = nch;
|
|
|
|
|
1997-06-07 12:17:44 +00:00
|
|
|
temp = readline (prompt);
|
|
|
|
|
|
|
|
/* Test for EOF. */
|
|
|
|
if (temp == 0)
|
|
|
|
exit (1);
|
|
|
|
|
2001-04-11 02:33:07 +00:00
|
|
|
printf ("%s\n", temp);
|
1997-06-07 12:17:44 +00:00
|
|
|
exit (0);
|
|
|
|
}
|