File: ekko.c

package info (click to toggle)
cssc 1.4.1-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, bullseye, forky, sid, trixie
  • size: 11,368 kB
  • sloc: cpp: 39,446; ansic: 17,403; sh: 11,328; python: 3,923; makefile: 1,929; perl: 342; awk: 15; sed: 15
file content (197 lines) | stat: -rw-r--r-- 5,753 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
/*
 * ekko.c: Part of GNU CSSC.   This file was derived from the src/echo.c
 *         file in GNU sh-utils.  That was derived from part of GNU Bash.
 *         If you actually want an echo(1) lookalike, see GNU sh-utils.
 *         This program has been lobotomised :-)
 *
 * echo.c, derived from code echo.c in Bash.
 *
 *  Copyright (C) 1987, 1989, 1991, 1992, 1993, 1994, 1995, 1996, 1998,
 *  2007, 2019 Free Software Foundation, Inc.
 *
 *    This program is free software: you can redistribute it and/or modify
 *    it under the terms of the GNU General Public License as published by
 *    the Free Software Foundation, either version 3 of the License, or
 *    (at your option) any later version.
 *
 *    This program is distributed in the hope that it will be useful,
 *    but WITHOUT ANY WARRANTY; without even the implied warranty of
 *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *    GNU General Public License for more details.
 *
 *    You should have received a copy of the GNU General Public License
 *    along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
#include <config.h>

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>


/* echo [-neE] [arg ...]
Output the ARGs.  If -n is specified, the trailing newline is
suppressed.  If the -e option is given, interpretation of the
following backslash-escaped characters is turned on:
        \a      alert (bell)
        \b      backspace
        \c      suppress trailing newline
        \f      form feed
        \n      new line
        \r      carriage return
        \t      horizontal tab
        \v      vertical tab
        \\      backslash
        \num    the character whose ASCII code is NUM (octal).

You can explicitly turn off the interpretation of the above characters
on System V systems with the -E option.
*/

/* If defined, interpret backslash escapes if -e is given.  */
#define V9_ECHO

/* If defined, interpret backslash escapes unless -E is given.
   V9_ECHO must also be defined.  */
#define V9_DEFAULT

#if defined (V9_ECHO)
#  if defined (V9_DEFAULT)
#    define VALID_ECHO_OPTIONS "neE"
#  else
#    define VALID_ECHO_OPTIONS "ne"
#  endif /* !V9_DEFAULT */
#else /* !V9_ECHO */
#  define VALID_ECHO_OPTIONS "n"
#endif /* !V9_ECHO */

/* The name this program was run with. */
char *program_name;

/* Print the words in LIST to standard output.  If the first word is
   `-n', then don't print a trailing newline.  We also support the
   echo syntax from Version 9 unix systems. */

int
main (int argc, char **argv)
{
  int display_return = 1, do_v9 = 0;

  program_name = argv[0];

/* System V machines already have a /bin/sh with a v9 behaviour.  We
   use the identical behaviour for these machines so that the
   existing system shell scripts won't barf. */
#if defined (V9_ECHO) && defined (V9_DEFAULT)
  do_v9 = 1;
#endif

  --argc;
  ++argv;

  while (argc > 0 && *argv[0] == '-')
    {
      register char *temp;
      register int i;

      /* If it appears that we are handling options, then make sure that
         all of the options specified are actually valid.  Otherwise, the
         string should just be echoed. */
      temp = argv[0] + 1;

      for (i = 0; temp[i]; i++)
        {
          if (strrchr (VALID_ECHO_OPTIONS, temp[i]) == 0)
            goto just_echo;
        }

      if (!*temp)
        goto just_echo;

      /* All of the options in TEMP are valid options to ECHO.
         Handle them. */
      while (*temp)
        {
          if (*temp == 'n')
            display_return = 0;
#if defined (V9_ECHO)
          else if (*temp == 'e')
            do_v9 = 1;
#if defined (V9_DEFAULT)
          else if (*temp == 'E')
            do_v9 = 0;
#endif /* V9_DEFAULT */
#endif /* V9_ECHO */
          else
            goto just_echo;

          temp++;
        }
      argc--;
      argv++;
    }

just_echo:

  if (argc > 0)
    {
#if defined (V9_ECHO)
      if (do_v9)
        {
          while (argc > 0)
            {
              register char *s = argv[0];
              register int c;

              while ((c = *s++))
                {
                  if (c == '\\' && *s)
                    {
                      switch (c = *s++)
                        {
                        case 'a': c = '\007'; break;
                        case 'b': c = '\b'; break;
                        case 'c': display_return = 0; continue;
                        case 'f': c = '\f'; break;
                        case 'n': c = '\n'; break;
                        case 'r': c = '\r'; break;
                        case 't': c = '\t'; break;
                        case 'v': c = (int) 0x0B; break;
                        case '0': case '1': case '2': case '3':
                        case '4': case '5': case '6': case '7':
                          c -= '0';
                          if (*s >= '0' && *s <= '7')
                            c = c * 8 + (*s++ - '0');
                          if (*s >= '0' && *s <= '7')
                            c = c * 8 + (*s++ - '0');
                          break;
                        case '\\': break;
                        default:  putchar ('\\'); break;
                        }
                    }
                  putchar(c);
                }
              argc--;
              argv++;
              if (argc > 0)
                putchar(' ');
            }
        }
      else
#endif /* V9_ECHO */
        {
          while (argc > 0)
            {
              fputs (argv[0], stdout);
              argc--;
              argv++;
              if (argc > 0)
                putchar (' ');
            }
        }
    }
  if (display_return)
    putchar ('\n');
  exit (0);
}