aboutsummaryrefslogtreecommitdiff
path: root/src/main.c
blob: c26f8d9dabc2758b32d0dec97dd12b1bb06125b9 (plain)
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
#include <libgen.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.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"

int color = 1;

void run(FILE *fp, char *filename, int tty) {
  const char *invert_t = color ? INVERT_T : "";
  const char *uinvert_t = color ? UINVERT_T : "";
  const char *grey = color ? GREY : "";
  const char *reset = color ? RESET : "";

  struct filedata f;
  f = readfile(fp);

  if (tty) {
    char *addon = f.binary ? " <binary>" : "";
    fprintf(stderr, "\r%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 (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);
  }
}

int main(int argc, char *argv[]) {
  char *no_color = getenv("NO_COLOR");

  if (no_color != NULL && no_color[0] != '\0') {
    color = 0;
  }

  if (argc > 1) {
    for (int i = 1; i < argc; i++) { // start at one to offset argv[0]
      FILE *fp = fopen(argv[i], "rb");
      if (fp == NULL)
        die(argv[i]);

      int tty = isatty(STDOUT_FILENO);
      run(fp, argv[i], tty);
      fclose(fp);

      if (i + 1 != argc) {
        fprintf(stderr, "\r\n"); // separate concurrent files
      }
    }
  } else {
    run(stdin, "stdin", 1); // for piped-input or repl-like behavior
  }

  return 0;
}