sbase/tail.c

157 lines
3.0 KiB
C
Raw Normal View History

2011-05-27 10:13:38 +00:00
/* See LICENSE file for copyright and license details. */
#include <sys/stat.h>
2015-02-09 14:30:23 +00:00
#include <stdint.h>
2011-05-26 17:18:42 +00:00
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
2011-05-26 17:18:42 +00:00
#include "text.h"
#include "utf.h"
2011-05-26 17:18:42 +00:00
#include "util.h"
2015-02-09 17:46:47 +00:00
static int fflag = 0;
static size_t num = 10;
static char mode = 'n';
static void
2015-02-09 17:46:47 +00:00
dropinit(FILE *fp, const char *str)
{
Rune r;
char *buf = NULL;
2015-02-09 14:47:08 +00:00
size_t size = 0, i = 0;
ssize_t len;
if (mode == 'n') {
while (i < num && (len = getline(&buf, &size, fp)) >= 0)
if (len > 0 && buf[len - 1] == '\n')
i++;
} else {
while (i < num && (len = efgetrune(&r, fp, str)))
i++;
}
free(buf);
concat(fp, str, stdout, "<stdout>");
}
static void
2015-02-09 17:46:47 +00:00
taketail(FILE *fp, const char *str)
{
Rune *r = NULL;
char **ring = NULL;
2015-02-09 14:47:08 +00:00
size_t i, j, *size = NULL;
if (mode == 'n') {
2015-02-09 17:46:47 +00:00
ring = ecalloc(num, sizeof *ring);
size = ecalloc(num, sizeof *size);
for (i = j = 0; getline(&ring[i], &size[i], fp) != -1; )
2015-02-09 17:46:47 +00:00
i = j = (i + 1) % num;
} else {
2015-02-09 17:46:47 +00:00
r = ecalloc(num, sizeof *r);
for (i = j = 0; efgetrune(&r[i], fp, str); )
2015-02-09 17:46:47 +00:00
i = j = (i + 1) % num;
}
if (ferror(fp))
eprintf("%s: read error:", str);
do {
if (ring && ring[j]) {
fputs(ring[j], stdout);
free(ring[j]);
2015-02-09 17:46:47 +00:00
} else if (r) {
efputrune(&r[j], stdout, "<stdout>");
}
2015-02-09 17:46:47 +00:00
} while ((j = (j + 1) % num) != i);
free(ring);
free(size);
2015-02-09 17:46:47 +00:00
free(r);
}
2011-05-26 17:18:42 +00:00
2013-06-14 18:20:47 +00:00
static void
usage(void)
{
eprintf("usage: %s [-f] [-c num | -n num | -num] [file ...]\n", argv0);
2013-06-14 18:20:47 +00:00
}
2011-05-26 17:18:42 +00:00
int
main(int argc, char *argv[])
{
struct stat st1, st2;
2011-05-26 17:18:42 +00:00
FILE *fp;
2015-02-09 17:46:47 +00:00
size_t tmpsize;
int ret = 0, newline, many;
2015-02-09 17:46:47 +00:00
char *numstr, *tmp;
void (*tail)(FILE *, const char *) = taketail;
2011-05-26 17:18:42 +00:00
2013-06-14 18:20:47 +00:00
ARGBEGIN {
case 'f':
fflag = 1;
break;
case 'c':
2013-06-14 18:20:47 +00:00
case 'n':
mode = ARGC();
numstr = EARGF(usage());
num = MIN(llabs(estrtonum(numstr, LLONG_MIN + 1, MIN(LLONG_MAX, SIZE_MAX))), SIZE_MAX);
if (strchr(numstr, '+'))
2013-06-14 18:20:47 +00:00
tail = dropinit;
break;
ARGNUM:
num = ARGNUMF();
break;
2013-06-14 18:20:47 +00:00
default:
usage();
} ARGEND;
if (!argc)
2015-02-09 17:46:47 +00:00
tail(stdin, "<stdin>");
else {
if ((many = argc > 1) && fflag)
usage();
for (newline = 0; *argv; argc--, argv++) {
if (!(fp = fopen(*argv, "r"))) {
weprintf("fopen %s:", *argv);
ret = 1;
2013-11-12 10:45:18 +00:00
continue;
}
2014-11-20 23:09:14 +00:00
if (many)
printf("%s==> %s <==\n", newline ? "\n" : "", *argv);
if (stat(*argv, &st1) < 0)
eprintf("stat %s:", *argv);
if (!(S_ISFIFO(st1.st_mode) || S_ISREG(st1.st_mode)))
fflag = 0;
2014-11-20 23:09:14 +00:00
newline = 1;
tail(fp, *argv);
if (!fflag) {
fclose(fp);
continue;
}
for (tmp = NULL, tmpsize = 0;;) {
while (getline(&tmp, &tmpsize, fp) >= 0) {
fputs(tmp, stdout);
fflush(stdout);
}
if (ferror(fp))
eprintf("readline %s:", *argv);
clearerr(fp);
/* ignore error in case file was removed, we continue
* tracking the existing open file descriptor */
if (!stat(*argv, &st2)) {
if (st2.st_size < st1.st_size) {
fprintf(stderr, "%s: file truncated\n", *argv);
rewind(fp);
}
st1 = st2;
}
sleep(1);
}
2013-11-12 10:45:18 +00:00
}
}
return ret;
2011-05-26 17:18:42 +00:00
}