echo.c (2338B)
- // utils-std: Collection of commonly available Unix tools
- // SPDX-FileCopyrightText: 2017 Haelwenn (lanodan) Monnier <contact+utils@hacktivis.me>
- // SPDX-License-Identifier: MPL-2.0
- #define _POSIX_C_SOURCE 200809L
- #include <stdbool.h>
- #include <stdio.h> // perror
- #include <string.h> // strlen
- #include <unistd.h> // write
- static void
- unescape(char *str, size_t *len)
- {
- char *start = str;
- char *store = str;
- for(; str < (start + *len); ++str, ++store)
- {
- if(*str != '\\')
- {
- *store = *str;
- continue;
- }
- switch(*++str)
- {
- case '\\': // POSIX
- default:
- *store = *str;
- break;
- case 'a':
- *store = '\a';
- break;
- case 'b':
- *store = '\b';
- break;
- case 'c':
- goto unescape_end;
- case 'f':
- *store = '\f';
- break;
- case 'n':
- *store = '\n';
- break;
- case 'r':
- *store = '\r';
- break;
- case 't':
- *store = '\t';
- break;
- case 'v':
- *store = '\v';
- break;
- case '0': /* \0 \0n \0nn \0nnn */
- {
- int value = 0;
- int i = 0;
- for(; i < 4 && str[i] >= '0' && str[i] <= '7'; i++)
- {
- value <<= 3;
- value += str[i] - '0';
- }
- str += (i - 1);
- *store = (char)value;
- break;
- }
- }
- }
- unescape_end:
- *store = '\0';
- *len = (size_t)(store - start);
- }
- int
- main(int argc, char *argv[])
- {
- size_t arg_len = 0;
- bool opt_n = false, opt_e = false;
- argc--;
- argv++;
- for(; argc > 0;)
- {
- if(argv[0][0] != '-') break;
- /* '-' and '--' needs to be passed as-is so no argc--,argv++ */
- if(argv[0][1] == '\0' || (argv[0][1] == '-' && argv[0][2] == '\0')) break;
- for(int i = 1; argv[0][i] != '\0'; i++)
- {
- switch(argv[0][i])
- {
- case 'n':
- opt_n = true;
- break;
- case 'e':
- opt_e = true;
- break;
- case 'E':
- opt_e = false;
- break;
- default:
- break;
- }
- }
- argc--;
- argv++;
- }
- for(int i = 0; i < argc; i++)
- {
- size_t len = strlen(argv[i]);
- argv[i][len] = ' ';
- arg_len += len + 1; // str + space
- }
- if(arg_len == 0)
- {
- if(opt_n) return 0;
- if(write(1, "\n", 1) < 1)
- {
- perror("echo: error: Failed writing");
- return 1;
- }
- return 0;
- }
- else
- argv[0][arg_len - 1] = '\n';
- if(opt_n) arg_len--; // no newline
- if(opt_e) unescape(*argv, &arg_len);
- ssize_t nwrite = write(1, *argv, arg_len);
- if(nwrite < (ssize_t)arg_len)
- {
- perror("echo: error: Failed writing");
- return 1;
- }
- return 0;
- }