Annotation of mandoc/mdocml.c, Revision 1.11
1.11 ! kristaps 1: /* $Id: mdocml.c,v 1.10 2008/11/24 14:24:55 kristaps Exp $ */
1.1 kristaps 2: /*
3: * Copyright (c) 2008 Kristaps Dzonsons <kristaps@kth.se>
4: *
5: * Permission to use, copy, modify, and distribute this software for any
6: * purpose with or without fee is hereby granted, provided that the
7: * above copyright notice and this permission notice appear in all
8: * copies.
9: *
10: * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL
11: * WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED
12: * WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE
13: * AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
14: * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
15: * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
16: * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
17: * PERFORMANCE OF THIS SOFTWARE.
18: */
19: #include <sys/param.h>
20: #include <sys/stat.h>
21:
22: #include <assert.h>
23: #include <err.h>
24: #include <fcntl.h>
25: #include <getopt.h>
26: #include <stdio.h>
27: #include <stdlib.h>
28: #include <string.h>
29: #include <unistd.h>
30:
31: #include "libmdocml.h"
32:
1.9 kristaps 33: #define BUFFER_IN_DEF BUFSIZ /* See begin_bufs. */
34: #define BUFFER_OUT_DEF BUFSIZ /* See begin_bufs. */
1.2 kristaps 35:
1.9 kristaps 36: static void usage(void);
37:
38: static int begin_io(const struct md_args *,
1.5 kristaps 39: char *, char *);
1.9 kristaps 40: static int leave_io(const struct md_buf *,
1.5 kristaps 41: const struct md_buf *, int);
1.9 kristaps 42: static int begin_bufs(const struct md_args *,
1.5 kristaps 43: struct md_buf *, struct md_buf *);
44: static int leave_bufs(const struct md_buf *,
45: const struct md_buf *, int);
1.1 kristaps 46:
47: int
48: main(int argc, char *argv[])
49: {
50: int c;
51: char *out, *in;
1.5 kristaps 52: struct md_args args;
1.1 kristaps 53:
54: extern char *optarg;
55: extern int optind;
56:
1.4 kristaps 57: out = in = NULL;
1.10 kristaps 58:
59: (void)memset(&args, 0, sizeof(struct md_args));
1.1 kristaps 60:
1.11 ! kristaps 61: while (-1 != (c = getopt(argc, argv, "o:")))
1.1 kristaps 62: switch (c) {
63: case ('o'):
64: out = optarg;
65: break;
66: default:
67: usage();
68: return(1);
69: }
70:
71: argv += optind;
1.4 kristaps 72: argc -= optind;
1.1 kristaps 73:
1.4 kristaps 74: if (1 == argc)
75: in = *argv++;
1.1 kristaps 76:
1.10 kristaps 77: args.type = MD_DUMMY;
1.5 kristaps 78:
79: return(begin_io(&args, out ? out : "-", in ? in : "-"));
1.1 kristaps 80: }
81:
82:
1.9 kristaps 83: /*
84: * Close out file descriptors opened in begin_io. If the descriptor
85: * refers to stdin/stdout, then do nothing.
86: */
1.1 kristaps 87: static int
1.5 kristaps 88: leave_io(const struct md_buf *out,
89: const struct md_buf *in, int c)
1.1 kristaps 90: {
1.4 kristaps 91: assert(out);
1.1 kristaps 92: assert(in);
93:
1.4 kristaps 94: if (-1 != in->fd && -1 == close(in->fd)) {
95: assert(in->name);
96: warn("%s", in->name);
97: c = 1;
98: }
99: if (-1 != out->fd && STDOUT_FILENO != out->fd &&
100: -1 == close(out->fd)) {
101: assert(out->name);
102: warn("%s", out->name);
103: c = 1;
104: }
1.1 kristaps 105:
1.4 kristaps 106: return(c);
1.1 kristaps 107: }
108:
109:
1.9 kristaps 110: /*
111: * Open file descriptors or assign stdin/stdout, if dictated by the "-"
112: * token instead of a filename.
113: */
1.1 kristaps 114: static int
1.5 kristaps 115: begin_io(const struct md_args *args, char *out, char *in)
1.1 kristaps 116: {
1.5 kristaps 117: struct md_buf fi;
118: struct md_buf fo;
1.4 kristaps 119:
120: #define FI_FL O_RDONLY
121: #define FO_FL O_WRONLY|O_CREAT|O_TRUNC
1.1 kristaps 122:
1.5 kristaps 123: assert(args);
1.1 kristaps 124: assert(out);
125: assert(in);
126:
1.5 kristaps 127: bzero(&fi, sizeof(struct md_buf));
128: bzero(&fo, sizeof(struct md_buf));
1.1 kristaps 129:
1.4 kristaps 130: fi.fd = STDIN_FILENO;
131: fo.fd = STDOUT_FILENO;
1.1 kristaps 132:
1.4 kristaps 133: fi.name = in;
134: fo.name = out;
1.1 kristaps 135:
1.4 kristaps 136: if (0 != strncmp(fi.name, "-", 1))
137: if (-1 == (fi.fd = open(fi.name, FI_FL, 0))) {
138: warn("%s", fi.name);
139: return(leave_io(&fo, &fi, 1));
140: }
1.1 kristaps 141:
1.4 kristaps 142: if (0 != strncmp(fo.name, "-", 1))
143: if (-1 == (fo.fd = open(fo.name, FO_FL, 0644))) {
144: warn("%s", fo.name);
145: return(leave_io(&fo, &fi, 1));
146: }
1.1 kristaps 147:
1.5 kristaps 148: return(leave_io(&fo, &fi, begin_bufs(args, &fo, &fi)));
1.4 kristaps 149: }
1.1 kristaps 150:
151:
1.9 kristaps 152: /*
153: * Free buffers allocated in begin_bufs.
154: */
1.4 kristaps 155: static int
1.5 kristaps 156: leave_bufs(const struct md_buf *out,
157: const struct md_buf *in, int c)
1.4 kristaps 158: {
159: assert(out);
160: assert(in);
161: if (out->buf)
162: free(out->buf);
163: if (in->buf)
164: free(in->buf);
1.1 kristaps 165: return(c);
166: }
167:
168:
1.9 kristaps 169: /*
170: * Allocate buffers to the maximum of either the input file's blocksize
171: * or BUFFER_IN_DEF/BUFFER_OUT_DEF, which should be around BUFSIZE.
172: */
1.1 kristaps 173: static int
1.5 kristaps 174: begin_bufs(const struct md_args *args,
175: struct md_buf *out, struct md_buf *in)
1.1 kristaps 176: {
177: struct stat stin, stout;
1.5 kristaps 178: int c;
1.1 kristaps 179:
1.5 kristaps 180: assert(args);
1.1 kristaps 181: assert(in);
182: assert(out);
183:
184: if (-1 == fstat(in->fd, &stin)) {
1.3 kristaps 185: warn("%s", in->name);
1.1 kristaps 186: return(1);
1.8 kristaps 187: } else if (0 == stin.st_size) {
188: warnx("%s: empty file", in->name);
189: return(1);
1.1 kristaps 190: } else if (-1 == fstat(out->fd, &stout)) {
1.3 kristaps 191: warn("%s", out->name);
1.1 kristaps 192: return(1);
193: }
194:
1.3 kristaps 195: in->bufsz = MAX(stin.st_blksize, BUFFER_IN_DEF);
196: out->bufsz = MAX(stout.st_blksize, BUFFER_OUT_DEF);
1.1 kristaps 197:
1.3 kristaps 198: if (NULL == (in->buf = malloc(in->bufsz))) {
1.1 kristaps 199: warn("malloc");
1.4 kristaps 200: return(leave_bufs(out, in, 1));
1.3 kristaps 201: } else if (NULL == (out->buf = malloc(out->bufsz))) {
1.1 kristaps 202: warn("malloc");
1.4 kristaps 203: return(leave_bufs(out, in, 1));
1.1 kristaps 204: }
205:
1.5 kristaps 206: c = md_run(args, out, in);
207: return(leave_bufs(out, in, -1 == c ? 1 : 0));
1.1 kristaps 208: }
209:
210:
211: static void
212: usage(void)
213: {
214: extern char *__progname;
215:
1.11 ! kristaps 216: (void)printf("usage: %s [-o outfile] [infile]\n", __progname);
1.1 kristaps 217: }
CVSweb