1
0
mirror of git://git.suckless.org/sbase synced 2024-12-23 07:25:07 +00:00
sbase/expand.c
sin b8edf3b4ee Add weprintf() and replace fprintf(stderr, ...) calls
There is still some programs left to be updated for this.

Many of these programs would stop on the first file that they
could not open.
2013-11-13 11:41:43 +00:00

112 lines
1.5 KiB
C

/* See LICENSE file for copyright and license details. */
#include <stdio.h>
#include <stdlib.h>
#include <wchar.h>
#include "util.h"
typedef struct {
FILE *fp;
const char *name;
} Fdescr;
static int expand(Fdescr *f, int tabstop);
static void
usage(void)
{
eprintf("usage: %s [-i] [-t n] [file...]\n", argv0);
}
int
main(int argc, char *argv[])
{
Fdescr dsc;
FILE *fp;
int tabstop = 8;
ARGBEGIN {
case 'i':
eprintf("not implemented\n");
case 't':
tabstop = estrtol(EARGF(usage()), 0);
break;
default:
usage();
} ARGEND;
if (argc == 0) {
dsc.name = "<stdin>";
dsc.fp = stdin;
expand(&dsc, tabstop);
} else {
for (; argc > 0; argc--) {
if (!(fp = fopen(*argv, "r"))) {
weprintf("fopen %s:", *argv);
continue;
}
dsc.name = *argv;
dsc.fp = fp;
expand(&dsc, tabstop);
fclose(fp);
argv++;
}
}
return EXIT_SUCCESS;
}
static wint_t
in(Fdescr *f)
{
wint_t c = fgetwc(f->fp);
if (c == WEOF && ferror(f->fp))
eprintf("'%s' read error:", f->name);
return c;
}
static void
out(wint_t c)
{
putwchar(c);
if (ferror(stdout))
eprintf("write error:");
}
static int
expand(Fdescr *dsc, int tabstop)
{
int col = 0;
wint_t c;
for (;;) {
c = in(dsc);
if (c == WEOF)
break;
switch (c) {
case '\t':
do {
col++;
out(' ');
} while (col & (tabstop - 1));
break;
case '\b':
if (col)
col--;
out(c);
break;
case '\n':
col = 0;
out(c);
break;
default:
col++;
out(c);
break;
}
}
return 0;
}