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
|
#include <libgen.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include "arg.h"
#include "file.h"
#include "util.h"
#define INVERT_T "\x1b[7m"
#define UINVERT_T "\x1b[27m"
#define GREY "\x1b[90m"
#define RESET "\x1b[0m"
void run(FILE *fp, char *filename, bool tty) {
const char *invert_t = conf.color ? INVERT_T : "";
const char *uinvert_t = conf.color ? UINVERT_T : "";
const char *grey = conf.color ? GREY : "";
const char *reset = conf.color ? RESET : "";
struct filedata f;
f = readfile(fp);
if (tty) {
char *addon = f.binary ? "<binary>" : "";
fprintf(stderr, "\r\x1b[2K%s%s%s%s\r\n", invert_t, basename(filename),
addon, uinvert_t);
}
int lcpad = intlen(f.lc);
f.lc = 0;
char pc = '\0';
char c;
for (size_t i = 0; i < f.len; i++) {
c = f.buf[i];
if ((conf.lines && tty && !f.binary) && (pc == '\n' || i == 0)) {
f.lc++;
int padlen = lcpad - intlen(f.lc);
char padding[padlen];
if (padlen)
memset(padding, ' ', padlen);
fprintf(stderr, "\r%s%s%d:%s ", grey, padlen > 0 ? padding : "", f.lc,
reset); // padlen < 1 causes undefined
}
pc = c;
printf("%c", c);
}
fflush(stdout); // prevent timing inconsistencies between stdout and stderr
if (tty) {
float rounded;
char *format = formatbytes(f.len, &rounded);
char *cnewline = c == '\n' ? "" : "\n";
fprintf(stderr, "\r%s%s%.2f %s%s\r\n", cnewline, invert_t, rounded, format,
uinvert_t);
}
}
void initconf(void) {
conf.color = true;
conf.lines = true;
conf.has_read_stdin = false;
}
void clearstdin(void) {
// from
// https://stackoverflow.com/questions/7898215/how-to-clear-input-buffer-in-c
fseek(stdin, 0, SEEK_END);
}
int main(int argc, char *argv[]) {
initconf();
// init no_color first so that args take priority
char *no_color = getenv("NO_COLOR");
if (no_color != NULL && no_color[0] != '\0') {
conf.color = false;
}
bool tty = isatty(STDOUT_FILENO);
if (argc > 1) {
int offset = parseargs(argc, argv);
for (int i = offset; i < argc; i++) {
if (*argv[i] == '-') {
if (conf.has_read_stdin)
clearstdin();
conf.has_read_stdin = true;
run(stdin, "stdin", tty);
continue;
}
FILE *fp = fopen(argv[i], "rb");
if (fp == NULL)
die(argv[i]);
run(fp, argv[i], tty);
fclose(fp);
if (tty && (i + 1 != argc)) {
fprintf(stderr, "\r\n"); // separate concurrent files in tty
}
}
if (offset == argc) {
run(stdin, "stdin", tty);
}
} else {
run(stdin, "stdin", tty); // for piped-input or repl-like behavior
}
return EXIT_SUCCESS;
}
|
