105 lines
1.4 KiB
C
105 lines
1.4 KiB
C
#include <u.h>
|
|
#include <libc.h>
|
|
#include <bio.h>
|
|
|
|
Biobuf *fin;
|
|
Biobuf fout;
|
|
|
|
#define MINSPAN 6 /* Min characters in string (default) */
|
|
#define BUFSIZE 70
|
|
|
|
void stringit(char *);
|
|
int isprint(Rune);
|
|
|
|
static int minspan = MINSPAN;
|
|
|
|
static void
|
|
usage(void)
|
|
{
|
|
fprint(2, "usage: %s [-m min] [file...]\n", argv0);
|
|
exits("usage");
|
|
}
|
|
|
|
void
|
|
main(int argc, char **argv)
|
|
{
|
|
int i;
|
|
|
|
ARGBEGIN{
|
|
case 'm':
|
|
minspan = atoi(EARGF(usage()));
|
|
break;
|
|
default:
|
|
usage();
|
|
break;
|
|
}ARGEND
|
|
Binit(&fout, 1, OWRITE);
|
|
if(argc < 1) {
|
|
stringit("/fd/0");
|
|
exits(0);
|
|
}
|
|
|
|
for(i = 0; i < argc; i++) {
|
|
if(argc > 2)
|
|
print("%s:\n", argv[i]);
|
|
|
|
stringit(argv[i]);
|
|
}
|
|
|
|
exits(0);
|
|
}
|
|
|
|
void
|
|
stringit(char *str)
|
|
{
|
|
long posn, start;
|
|
int cnt = 0;
|
|
long c;
|
|
|
|
Rune buf[BUFSIZE];
|
|
|
|
if ((fin = Bopen(str, OREAD)) == 0) {
|
|
perror("open");
|
|
return;
|
|
}
|
|
|
|
start = 0;
|
|
posn = Boffset(fin);
|
|
while((c = Bgetrune(fin)) >= 0) {
|
|
if(isprint(c)) {
|
|
if(start == 0)
|
|
start = posn;
|
|
buf[cnt++] = c;
|
|
if(cnt == BUFSIZE-1) {
|
|
buf[cnt] = 0;
|
|
Bprint(&fout, "%8ld: %S ...\n", start, buf);
|
|
start = 0;
|
|
cnt = 0;
|
|
}
|
|
} else {
|
|
if(cnt >= minspan) {
|
|
buf[cnt] = 0;
|
|
Bprint(&fout, "%8ld: %S\n", start, buf);
|
|
}
|
|
start = 0;
|
|
cnt = 0;
|
|
}
|
|
posn = Boffset(fin);
|
|
}
|
|
|
|
if(cnt >= minspan){
|
|
buf[cnt] = 0;
|
|
Bprint(&fout, "%8ld: %S\n", start, buf);
|
|
}
|
|
Bterm(fin);
|
|
}
|
|
|
|
int
|
|
isprint(Rune r)
|
|
{
|
|
if (r != Runeerror)
|
|
if ((r >= ' ' && r < 0x7F) || r > 0xA0)
|
|
return 1;
|
|
return 0;
|
|
}
|