version 1.2, 2008/11/22 16:55:02 |
version 1.8, 2008/11/23 22:30:53 |
|
|
|
|
#include "libmdocml.h" |
#include "libmdocml.h" |
|
|
struct md_file { |
#define BUFFER_IN_DEF BUFSIZ |
int fd; |
#define BUFFER_OUT_DEF BUFSIZ |
const char *name; |
|
}; |
|
|
|
struct md_buf { |
|
struct md_file *file; |
|
char *buf; |
|
size_t bufsz; |
|
size_t line; |
|
}; |
|
|
|
struct md_mbuf { |
|
struct md_buf *buf; |
|
size_t pos; |
|
}; |
|
|
|
static void usage(void); |
static void usage(void); |
|
static int begin_io(const struct md_args *, |
|
char *, char *); |
|
static int leave_io(const struct md_buf *, |
|
const struct md_buf *, int); |
|
static int begin_bufs(const struct md_args *, |
|
struct md_buf *, struct md_buf *); |
|
static int leave_bufs(const struct md_buf *, |
|
const struct md_buf *, int); |
|
|
static int md_begin(const char *, const char *); |
|
static int md_begin_io(const char *, const char *); |
|
static int md_begin_bufs(struct md_file *, struct md_file *); |
|
static int md_run(struct md_buf *, struct md_buf *); |
|
static int md_line(struct md_mbuf *, const struct md_buf *, |
|
const char *, size_t); |
|
|
|
static ssize_t md_buf_fill(struct md_buf *); |
|
static int md_buf_flush(struct md_mbuf *); |
|
|
|
static int md_buf_putchar(struct md_mbuf *, char); |
|
static int md_buf_puts(struct md_mbuf *, |
|
const char *, size_t); |
|
|
|
|
|
int |
int |
main(int argc, char *argv[]) |
main(int argc, char *argv[]) |
{ |
{ |
int c; |
int c; |
char *out, *in; |
char *out, *in; |
|
struct md_args args; |
|
|
extern char *optarg; |
extern char *optarg; |
extern int optind; |
extern int optind; |
|
|
out = NULL; |
out = in = NULL; |
|
|
while (-1 != (c = getopt(argc, argv, "o:"))) |
while (-1 != (c = getopt(argc, argv, "o:"))) |
switch (c) { |
switch (c) { |
Line 86 main(int argc, char *argv[]) |
|
Line 66 main(int argc, char *argv[]) |
|
} |
} |
|
|
argv += optind; |
argv += optind; |
if (1 != (argc -= optind)) { |
argc -= optind; |
usage(); |
|
return(1); |
|
} |
|
|
|
argc--; |
if (1 == argc) |
in = *argv++; |
in = *argv++; |
|
|
return(md_begin(out, in)); |
args.type = MD_HTML4_STRICT; |
} |
args.dbg = MD_DBG_TREE; |
|
|
|
return(begin_io(&args, out ? out : "-", in ? in : "-")); |
static int |
|
md_begin(const char *out, const char *in) |
|
{ |
|
char buf[MAXPATHLEN]; |
|
|
|
assert(in); |
|
if (out) |
|
return(md_begin_io(out, in)); |
|
|
|
if (strlcpy(buf, in, MAXPATHLEN) >= MAXPATHLEN) |
|
warnx("output filename too long"); |
|
else if (strlcat(buf, ".html", MAXPATHLEN) >= MAXPATHLEN) |
|
warnx("output filename too long"); |
|
else |
|
return(md_begin_io(buf, in)); |
|
|
|
return(1); |
|
} |
} |
|
|
|
|
static int |
static int |
md_begin_io(const char *out, const char *in) |
leave_io(const struct md_buf *out, |
|
const struct md_buf *in, int c) |
{ |
{ |
int c; |
|
struct md_file fin, fout; |
|
|
|
assert(out); |
assert(out); |
assert(in); |
assert(in); |
|
|
/* TODO: accept "-" as both input and output. */ |
if (-1 != in->fd && -1 == close(in->fd)) { |
|
assert(in->name); |
fin.name = in; |
warn("%s", in->name); |
|
|
if (-1 == (fin.fd = open(fin.name, O_RDONLY, 0))) { |
|
warn("%s", fin.name); |
|
return(1); |
|
} |
|
|
|
fout.name = out; |
|
|
|
fout.fd = open(fout.name, O_WRONLY | O_CREAT | O_TRUNC, 0644); |
|
if (-1 == fout.fd) { |
|
warn("%s", fout.name); |
|
if (-1 == close(fin.fd)) |
|
warn("%s", fin.name); |
|
return(1); |
|
} |
|
|
|
c = md_begin_bufs(&fout, &fin); |
|
|
|
if (-1 == close(fin.fd)) { |
|
warn("%s", in); |
|
c = 1; |
c = 1; |
} |
} |
if (-1 == close(fout.fd)) { |
if (-1 != out->fd && STDOUT_FILENO != out->fd && |
warn("%s", out); |
-1 == close(out->fd)) { |
|
assert(out->name); |
|
warn("%s", out->name); |
c = 1; |
c = 1; |
} |
} |
|
|
Line 162 md_begin_io(const char *out, const char *in) |
|
Line 102 md_begin_io(const char *out, const char *in) |
|
|
|
|
|
static int |
static int |
md_begin_bufs(struct md_file *out, struct md_file *in) |
begin_io(const struct md_args *args, char *out, char *in) |
{ |
{ |
struct stat stin, stout; |
struct md_buf fi; |
struct md_buf inbuf, outbuf; |
struct md_buf fo; |
int c; |
|
|
|
assert(in); |
#define FI_FL O_RDONLY |
|
#define FO_FL O_WRONLY|O_CREAT|O_TRUNC |
|
|
|
assert(args); |
assert(out); |
assert(out); |
|
assert(in); |
|
|
if (-1 == fstat(in->fd, &stin)) { |
bzero(&fi, sizeof(struct md_buf)); |
warn("fstat: %s", in->name); |
bzero(&fo, sizeof(struct md_buf)); |
return(1); |
|
} else if (-1 == fstat(out->fd, &stout)) { |
|
warn("fstat: %s", out->name); |
|
return(1); |
|
} |
|
|
|
inbuf.file = in; |
fi.fd = STDIN_FILENO; |
inbuf.line = 1; |
fo.fd = STDOUT_FILENO; |
/*inbuf.bufsz = MAX(stin.st_blksize, BUFSIZ);*/ |
|
inbuf.bufsz = 256; |
|
|
|
outbuf.file = out; |
fi.name = in; |
outbuf.line = 1; |
fo.name = out; |
/*outbuf.bufsz = MAX(stout.st_blksize, BUFSIZ);*/ |
|
outbuf.bufsz = 256; |
|
|
|
if (NULL == (inbuf.buf = malloc(inbuf.bufsz))) { |
if (0 != strncmp(fi.name, "-", 1)) |
warn("malloc"); |
if (-1 == (fi.fd = open(fi.name, FI_FL, 0))) { |
return(1); |
warn("%s", fi.name); |
} else if (NULL == (outbuf.buf = malloc(outbuf.bufsz))) { |
return(leave_io(&fo, &fi, 1)); |
warn("malloc"); |
} |
free(inbuf.buf); |
|
return(1); |
|
} |
|
|
|
c = md_run(&outbuf, &inbuf); |
if (0 != strncmp(fo.name, "-", 1)) |
|
if (-1 == (fo.fd = open(fo.name, FO_FL, 0644))) { |
|
warn("%s", fo.name); |
|
return(leave_io(&fo, &fi, 1)); |
|
} |
|
|
free(inbuf.buf); |
return(leave_io(&fo, &fi, begin_bufs(args, &fo, &fi))); |
free(outbuf.buf); |
|
|
|
return(c); |
|
} |
} |
|
|
|
|
static ssize_t |
static int |
md_buf_fill(struct md_buf *in) |
leave_bufs(const struct md_buf *out, |
|
const struct md_buf *in, int c) |
{ |
{ |
ssize_t ssz; |
assert(out); |
|
|
assert(in); |
assert(in); |
assert(in->file); |
if (out->buf) |
assert(in->buf); |
free(out->buf); |
assert(in->bufsz > 0); |
if (in->buf) |
assert(in->file->name); |
free(in->buf); |
|
return(c); |
if (-1 == (ssz = read(in->file->fd, in->buf, in->bufsz))) |
|
warn("%s", in->file->name); |
|
else |
|
(void)printf("%s: filled %zd bytes\n", |
|
in->file->name, ssz); |
|
|
|
return(ssz); |
|
} |
} |
|
|
|
|
static int |
static int |
md_run(struct md_buf *out, struct md_buf *in) |
begin_bufs(const struct md_args *args, |
|
struct md_buf *out, struct md_buf *in) |
{ |
{ |
struct md_mbuf mbuf; |
struct stat stin, stout; |
ssize_t sz, i; |
int c; |
char line[BUFSIZ]; |
|
size_t pos; |
|
|
|
|
assert(args); |
assert(in); |
assert(in); |
assert(out); |
assert(out); |
|
|
mbuf.buf = out; |
if (-1 == fstat(in->fd, &stin)) { |
mbuf.pos = 0; |
warn("%s", in->name); |
|
|
/* LINTED */ |
|
for (pos = 0; ; ) { |
|
if (-1 == (sz = md_buf_fill(in))) |
|
return(1); |
|
else if (0 == sz) |
|
break; |
|
|
|
for (i = 0; i < sz; i++) { |
|
if ('\n' == in->buf[i]) { |
|
if (md_line(&mbuf, in, line, pos)) |
|
return(1); |
|
in->line++; |
|
pos = 0; |
|
continue; |
|
} |
|
|
|
if (pos < BUFSIZ) { |
|
/* LINTED */ |
|
line[pos++] = in->buf[i]; |
|
continue; |
|
} |
|
|
|
warnx("%s: line %zu too long", |
|
in->file->name, in->line); |
|
return(1); |
|
} |
|
} |
|
|
|
if (0 != pos && md_line(&mbuf, in, line, pos)) |
|
return(1); |
return(1); |
|
} else if (0 == stin.st_size) { |
return(md_buf_flush(&mbuf) ? 0 : 1); |
warnx("%s: empty file", in->name); |
} |
|
|
|
|
|
static int |
|
md_buf_flush(struct md_mbuf *buf) |
|
{ |
|
ssize_t sz; |
|
|
|
assert(buf); |
|
assert(buf->buf); |
|
assert(buf->buf->file); |
|
assert(buf->buf->buf); |
|
assert(buf->buf->file->name); |
|
|
|
(void)printf("%s: flushing %zu bytes\n", |
|
buf->buf->file->name, buf->pos); |
|
|
|
if (0 == buf->pos) |
|
return(1); |
return(1); |
|
} else if (-1 == fstat(out->fd, &stout)) { |
sz = write(buf->buf->file->fd, buf->buf->buf, buf->pos); |
warn("%s", out->name); |
|
return(1); |
if (-1 == sz) { |
|
warn("%s", buf->buf->file->name); |
|
return(0); |
|
} else if ((size_t)sz != buf->pos) { |
|
warnx("%s: short write", buf->buf->file->name); |
|
return(0); |
|
} |
} |
|
|
buf->pos = 0; |
in->bufsz = MAX(stin.st_blksize, BUFFER_IN_DEF); |
return(1); |
out->bufsz = MAX(stout.st_blksize, BUFFER_OUT_DEF); |
} |
|
|
|
|
if (NULL == (in->buf = malloc(in->bufsz))) { |
static int |
warn("malloc"); |
md_buf_putchar(struct md_mbuf *buf, char c) |
return(leave_bufs(out, in, 1)); |
{ |
} else if (NULL == (out->buf = malloc(out->bufsz))) { |
return(md_buf_puts(buf, &c, 1)); |
warn("malloc"); |
} |
return(leave_bufs(out, in, 1)); |
|
|
|
|
static int |
|
md_buf_puts(struct md_mbuf *buf, const char *p, size_t sz) |
|
{ |
|
size_t ssz; |
|
|
|
assert(p); |
|
assert(buf); |
|
assert(buf->buf); |
|
|
|
while (buf->pos + sz > buf->buf->bufsz) { |
|
ssz = buf->buf->bufsz - buf->pos; |
|
(void)memcpy(buf->buf->buf + buf->pos, p, ssz); |
|
p += ssz; |
|
sz -= ssz; |
|
buf->pos += ssz; |
|
|
|
if ( ! md_buf_flush(buf)) |
|
return(0); |
|
} |
} |
|
|
(void)memcpy(buf->buf->buf + buf->pos, p, sz); |
c = md_run(args, out, in); |
buf->pos += sz; |
return(leave_bufs(out, in, -1 == c ? 1 : 0)); |
return(1); |
|
} |
} |
|
|
|
|
static int |
|
md_line(struct md_mbuf *out, const struct md_buf *in, |
|
const char *buf, size_t sz) |
|
{ |
|
|
|
assert(buf); |
|
assert(out); |
|
assert(in); |
|
|
|
if ( ! md_buf_puts(out, buf, sz)) |
|
return(1); |
|
if ( ! md_buf_putchar(out, '\n')) |
|
return(1); |
|
|
|
return(0); |
|
} |
|
|
|
|
|
static void |
static void |
usage(void) |
usage(void) |
{ |
{ |
extern char *__progname; |
extern char *__progname; |
|
|
(void)printf("usage: %s [-o outfile] infile\n", __progname); |
(void)printf("usage: %s [-o outfile] [infile]\n", __progname); |
} |
} |