3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 static const char copyright[] =
36 "@(#) Copyright (c) 1993\n\
37 The Regents of the University of California. All rights reserved.\n";
42 static char sccsid[] = "@(#)lam.c 8.1 (Berkeley) 6/6/93";
44 static const char rcsid[] =
45 "$FreeBSD: src/usr.bin/lam/lam.c,v 1.3.2.3 2001/08/11 03:03:19 mike Exp $";
49 * lam - laminate files
50 * Author: John Kunze, UCB
60 #define BIGBUFSIZ 5 * BUFSIZ
62 struct openfile { /* open file structure */
63 FILE *fp; /* file pointer */
64 short eof; /* eof flag */
65 short pad; /* pad flag for missing columns */
66 char eol; /* end of line character */
67 const char *sepstring; /* string to print before each line */
68 const char *format; /* printf(3) style string spec. */
71 int morefiles; /* set by getargs(), changed by gatherline() */
72 int nofinalnl; /* normally append \n to each output line */
76 static char *gatherline(struct openfile *);
77 static void getargs(char *[]);
78 static char *pad(struct openfile *);
79 static void usage(void);
82 main(int argc __unused, char *argv[])
91 for (ip = input; ip->fp != NULL; ip++)
92 linep = gatherline(ip);
96 fputs(ip->sepstring, stdout);
105 struct openfile *ip = input;
107 static char fmtbuf[BUFSIZ];
111 P = S = F = T = 0; /* capitalized options */
112 while ((p = *++av) != NULL) {
113 if (*p != '-' || !p[1]) {
114 if (++morefiles >= MAXOFILES)
115 errx(1, "too many input files");
118 else if ((ip->fp = fopen(p, "r")) == NULL) {
123 ip->sepstring = (S ? (ip-1)->sepstring : "");
125 ip->format = ((P || F) ? (ip-1)->format : "%s");
127 ip->eol = (T ? (ip-1)->eol : '\n');
132 switch (tolower(*c)) {
134 if (*++p || (p = *++av))
137 errx(1, "need string after -%s", c);
138 S = (*c == 'S' ? 1 : 0);
141 if (*++p || (p = *++av))
144 errx(1, "need character after -%s", c);
145 T = (*c == 'T' ? 1 : 0);
150 P = (*c == 'P' ? 1 : 0);
153 F = (*c == 'F' ? 1 : 0);
154 if (*++p || (p = *++av)) {
155 fmtp += strlen(fmtp) + 1;
156 if (fmtp >= fmtbuf + sizeof(fmtbuf))
157 errx(1, "no more format space");
158 /* restrict format string to only valid width formatters */
159 if (strspn(p, "-.0123456789") != strlen(p))
160 errx(1, "invalid format string `%s'", p);
161 if (snprintf(fmtp, fmtbuf + sizeof(fmtbuf) - fmtp, "%%%ss", p)
162 >= fmtbuf + sizeof(fmtbuf) - fmtp)
163 errx(1, "no more format space");
167 errx(1, "need string after -%s", c);
170 errx(1, "what do you mean by -%s?", c);
180 pad(struct openfile *ip)
184 strlcpy(lp, ip->sepstring, line + sizeof(line) - lp);
187 snprintf(lp, line + sizeof(line) - lp, ip->format, "");
194 gatherline(struct openfile *ip)
200 char *end = s + sizeof(s) - 1;
204 for (p = s; (c = fgetc(ip->fp)) != EOF && p < end; p++)
205 if ((*p = c) == ip->eol)
215 strlcpy(lp, ip->sepstring, line + sizeof(line) - lp);
217 snprintf(lp, line + sizeof(line) - lp, ip->format, s);
225 fprintf(stderr, "%s\n%s\n",
226 "usage: lam [ -f min.max ] [ -s sepstring ] [ -t c ] file ...",
227 " lam [ -p min.max ] [ -s sepstring ] [ -t c ] file ...");