833c2aebb4
After a short correspondence with Otto Moerbeek it turned out mallocarray() is only in the OpenBSD-Kernel, because the kernel- malloc doesn't have realloc. Userspace applications should rather use reallocarray with an explicit NULL-pointer. Assuming reallocarray() will become available in c-stdlibs in the next few years, we nip mallocarray() in the bud to allow an easy transition to a system-provided version when the day comes.
93 lines
1.5 KiB
C
93 lines
1.5 KiB
C
/* See LICENSE file for copyright and license details. */
|
|
#include <limits.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
|
|
#include "utf.h"
|
|
#include "util.h"
|
|
|
|
static char *format = "";
|
|
|
|
static void
|
|
strings(FILE *fp, const char *fname, size_t len)
|
|
{
|
|
Rune r, *rbuf;
|
|
size_t i, bread;
|
|
off_t off;
|
|
|
|
rbuf = ereallocarray(NULL, len, sizeof(*rbuf));
|
|
|
|
for (off = 0, i = 0; (bread = efgetrune(&r, fp, fname)); ) {
|
|
off += bread;
|
|
if (r == Runeerror)
|
|
continue;
|
|
if (!isprintrune(r)) {
|
|
if (i > len)
|
|
putchar('\n');
|
|
i = 0;
|
|
continue;
|
|
}
|
|
if (i < len) {
|
|
rbuf[i++] = r;
|
|
continue;
|
|
} else if (i > len) {
|
|
efputrune(&r, stdout, "<stdout>");
|
|
continue;
|
|
}
|
|
printf(format, (long)off - i);
|
|
for (i = 0; i < len; i++)
|
|
efputrune(rbuf + i, stdout, "<stdout>");
|
|
efputrune(&r, stdout, "<stdout>");
|
|
i++;
|
|
}
|
|
free(rbuf);
|
|
}
|
|
|
|
static void
|
|
usage(void)
|
|
{
|
|
eprintf("usage: %s [-a] [-n num] [-t format] [file ...]\n", argv0);
|
|
}
|
|
|
|
int
|
|
main(int argc, char *argv[])
|
|
{
|
|
FILE *fp;
|
|
size_t len = 4;
|
|
int ret = 0;
|
|
char f;
|
|
|
|
ARGBEGIN {
|
|
case 'a':
|
|
break;
|
|
case 'n':
|
|
len = estrtonum(EARGF(usage()), 1, LLONG_MAX);
|
|
break;
|
|
case 't':
|
|
format = estrdup("%8l#: ");
|
|
f = *EARGF(usage());
|
|
if (f == 'd' || f == 'o' || f == 'x')
|
|
format[3] = f;
|
|
else
|
|
usage();
|
|
break;
|
|
default:
|
|
usage();
|
|
} ARGEND;
|
|
|
|
if (argc == 0) {
|
|
strings(stdin, "<stdin>", len);
|
|
} else {
|
|
for (; argc > 0; argc--, argv++) {
|
|
if (!(fp = fopen(argv[0], "r"))) {
|
|
weprintf("fopen %s:", argv[0]);
|
|
ret = 1;
|
|
continue;
|
|
}
|
|
strings(fp, argv[0], len);
|
|
fclose(fp);
|
|
}
|
|
}
|
|
return ret;
|
|
}
|