1/*
2 * rlcat - cat(1) using readline
3 *
4 * usage: rlcat
5 */
6
7/* Copyright (C) 1987-2002 Free Software Foundation, Inc.
8
9   This file is part of the GNU Readline Library, a library for
10   reading lines of text with interactive input and history editing.
11
12   The GNU Readline Library is free software; you can redistribute it
13   and/or modify it under the terms of the GNU General Public License
14   as published by the Free Software Foundation; either version 2, or
15   (at your option) any later version.
16
17   The GNU Readline Library is distributed in the hope that it will be
18   useful, but WITHOUT ANY WARRANTY; without even the implied warranty
19   of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20   GNU General Public License for more details.
21
22   The GNU General Public License is often shipped with GNU software, and
23   is generally kept in a file called COPYING or LICENSE.  If you do not
24   have a copy of the license, write to the Free Software Foundation,
25   59 Temple Place, Suite 330, Boston, MA 02111 USA. */
26
27#if defined (HAVE_CONFIG_H)
28#  include <config.h>
29#endif
30
31#ifdef HAVE_UNISTD_H
32#  include <unistd.h>
33#endif
34
35#include <sys/types.h>
36#include "posixstat.h"
37
38#include <stdio.h>
39#include <ctype.h>
40#include <string.h>
41#include <errno.h>
42
43#ifndef errno
44extern int errno;
45#endif
46
47#if defined (READLINE_LIBRARY)
48#  include "readline.h"
49#  include "history.h"
50#else
51#  include <readline/readline.h>
52#  include <readline/history.h>
53#endif
54
55extern int optind;
56extern char *optarg;
57
58static int stdcat();
59
60static char *progname;
61static int vflag;
62
63static void
64usage()
65{
66  fprintf (stderr, "%s: usage: %s [-vEVN] [filename]\n", progname, progname);
67}
68
69int
70main (argc, argv)
71     int argc;
72     char **argv;
73{
74  char *temp;
75  int opt, Vflag, Nflag;
76
77  progname = strrchr(argv[0], '/');
78  if (progname == 0)
79    progname = argv[0];
80  else
81    progname++;
82
83  vflag = Vflag = Nflag = 0;
84  while ((opt = getopt(argc, argv, "vEVN")) != EOF)
85    {
86      switch (opt)
87	{
88	case 'v':
89	  vflag = 1;
90	  break;
91	case 'V':
92	  Vflag = 1;
93	  break;
94	case 'E':
95	  Vflag = 0;
96	  break;
97	case 'N':
98	  Nflag = 1;
99	  break;
100	default:
101	  usage ();
102	  exit (2);
103	}
104    }
105
106  argc -= optind;
107  argv += optind;
108
109  if (isatty(0) == 0 || argc || Nflag)
110    return stdcat(argc, argv);
111
112  rl_variable_bind ("editing-mode", Vflag ? "vi" : "emacs");
113  while (temp = readline (""))
114    {
115      if (*temp)
116        add_history (temp);
117      printf ("%s\n", temp);
118    }
119
120  return (ferror (stdout));
121}
122
123static int
124fcopy(fp)
125     FILE *fp;
126{
127  int c;
128  char *x;
129
130  while ((c = getc(fp)) != EOF)
131    {
132      if (vflag && isascii ((unsigned char)c) && isprint((unsigned char)c) == 0)
133	{
134	  x = rl_untranslate_keyseq (c);
135	  if (fputs (x, stdout) != 0)
136	    return 1;
137	}
138      else if (putchar (c) == EOF)
139        return 1;
140    }
141  return (ferror (stdout));
142}
143
144int
145stdcat (argc, argv)
146     int argc;
147     char **argv;
148{
149  int  i, fd, r;
150  char *s;
151  FILE *fp;
152
153  if (argc == 0)
154    return (fcopy(stdin));
155
156  for (i = 0, r = 1; i < argc; i++)
157    {
158      if (*argv[i] == '-' && argv[i][1] == 0)
159	fp = stdin;
160      else
161	{
162	  fp = fopen (argv[i], "r");
163	  if (fp == 0)
164	    {
165	      fprintf (stderr, "%s: %s: cannot open: %s\n", progname, argv[i], strerror(errno));
166	      continue;
167	    }
168        }
169      r = fcopy (fp);
170      if (fp != stdin)
171	fclose(fp);
172    }
173  return r;
174}
175