diff options
| author | user <user@clank> | 2026-07-18 00:38:38 +0200 |
|---|---|---|
| committer | user <user@clank> | 2026-07-18 00:38:38 +0200 |
| commit | ba2d7ae1d7b319645b10aaa31a7f664f9f80c25c (patch) | |
| tree | e01e6c7c710a661defe2515ff9657f08cddcb283 /usr/wc.c | |
| parent | tools: gbtype prints hub errors to stderr and exits 1 (diff) | |
| download | gbos-ba2d7ae1d7b319645b10aaa31a7f664f9f80c25c.tar.gz gbos-ba2d7ae1d7b319645b10aaa31a7f664f9f80c25c.tar.xz gbos-ba2d7ae1d7b319645b10aaa31a7f664f9f80c25c.zip | |
refactor: c/ -> usr/, compiled program blobs out of the source tree
Userland sources live in usr/ (fits the Unix theme better than 'c').
SDCC output .bin blobs land in build/usr/ with the other build artifacts
instead of littering the source dir; programs.asm INCBINs them from there.
Byte-identical ROM.
Diffstat (limited to 'usr/wc.c')
| -rw-r--r-- | usr/wc.c | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/usr/wc.c b/usr/wc.c new file mode 100644 index 0000000..4fa48ee --- /dev/null +++ b/usr/wc.c @@ -0,0 +1,32 @@ +#include "gbos.h" +/* wc [-l][-w][-c] [file]: count lines/words/chars of a file or stdin. */ +void main(void) { + char *argv[8]; + unsigned char argc = argv_parse(argv, 8); + unsigned char wl = hasflag(argv, argc, 'l'); + unsigned char ww = hasflag(argv, argc, 'w'); + unsigned char wch = hasflag(argv, argc, 'c'); + unsigned int lines = 0, words = 0, chars = 0; + unsigned char inword = 0, first = 1, i, fd = NOFD; + char *fname = 0; + int ch; + if (!wl && !ww && !wch) { wl = ww = wch = 1; } + for (i = 0; i < argc; i++) if (argv[i][0] != '-') { fname = argv[i]; break; } + if (fname) { + fd = open(fname, O_READ); + if (fd > 3) { puts("wc: no such file"); nl(); return; } + } + for (;;) { + if (fd > 3) { char c = readc(); if (c == EOF) break; ch = c; } + else { ch = fgetc(fd); if (ch < 0) break; } + chars++; + if (ch == '\n') lines++; + if (ch == ' ' || ch == '\n' || ch == '\r' || ch == '\t') inword = 0; + else if (!inword) { inword = 1; words++; } + } + if (fd != NOFD) close(fd); + if (wl) { putu(lines); first = 0; } + if (ww) { if (!first) putc(' '); putu(words); first = 0; } + if (wch) { if (!first) putc(' '); putu(chars); } + nl(); +} |
