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
33 * @(#) Copyright (c) 1993 The Regents of the University of California. All rights reserved.
34 * @(#)lam.c 8.1 (Berkeley) 6/6/93
35 * $FreeBSD: src/usr.bin/lam/lam.c,v 1.3.2.3 2001/08/11 03:03:19 mike Exp $
36 * $DragonFly: src/usr.bin/lam/lam.c,v 1.3 2003/10/04 20:36:47 hmp Exp $
40 * lam - laminate files
41 * Author: John Kunze, UCB
51 #define BIGBUFSIZ 5 * BUFSIZ
53 struct openfile
{ /* open file structure */
54 FILE *fp
; /* file pointer */
55 short eof
; /* eof flag */
56 short pad
; /* pad flag for missing columns */
57 char eol
; /* end of line character */
58 const char *sepstring
; /* string to print before each line */
59 const char *format
; /* printf(3) style string spec. */
62 int morefiles
; /* set by getargs(), changed by gatherline() */
63 int nofinalnl
; /* normally append \n to each output line */
67 static char *gatherline(struct openfile
*);
68 static void getargs(char *[]);
69 static char *pad(struct openfile
*);
70 static void usage(void);
73 main(int argc __unused
, char *argv
[])
82 for (ip
= input
; ip
->fp
!= NULL
; ip
++)
83 linep
= gatherline(ip
);
87 fputs(ip
->sepstring
, stdout
);
96 struct openfile
*ip
= input
;
98 static char fmtbuf
[BUFSIZ
];
102 P
= S
= F
= T
= 0; /* capitalized options */
103 while ((p
= *++av
) != NULL
) {
104 if (*p
!= '-' || !p
[1]) {
105 if (++morefiles
>= MAXOFILES
)
106 errx(1, "too many input files");
109 else if ((ip
->fp
= fopen(p
, "r")) == NULL
) {
114 ip
->sepstring
= (S
? (ip
-1)->sepstring
: "");
116 ip
->format
= ((P
|| F
) ? (ip
-1)->format
: "%s");
118 ip
->eol
= (T
? (ip
-1)->eol
: '\n');
123 switch (tolower(*c
)) {
125 if (*++p
|| (p
= *++av
))
128 errx(1, "need string after -%s", c
);
129 S
= (*c
== 'S' ? 1 : 0);
132 if (*++p
|| (p
= *++av
))
135 errx(1, "need character after -%s", c
);
136 T
= (*c
== 'T' ? 1 : 0);
141 P
= (*c
== 'P' ? 1 : 0);
144 F
= (*c
== 'F' ? 1 : 0);
145 if (*++p
|| (p
= *++av
)) {
146 fmtp
+= strlen(fmtp
) + 1;
147 if (fmtp
>= fmtbuf
+ sizeof(fmtbuf
))
148 errx(1, "no more format space");
149 /* restrict format string to only valid width formatters */
150 if (strspn(p
, "-.0123456789") != strlen(p
))
151 errx(1, "invalid format string `%s'", p
);
152 if (snprintf(fmtp
, fmtbuf
+ sizeof(fmtbuf
) - fmtp
, "%%%ss", p
)
153 >= fmtbuf
+ sizeof(fmtbuf
) - fmtp
)
154 errx(1, "no more format space");
158 errx(1, "need string after -%s", c
);
161 errx(1, "what do you mean by -%s?", c
);
171 pad(struct openfile
*ip
)
175 strlcpy(lp
, ip
->sepstring
, line
+ sizeof(line
) - lp
);
178 snprintf(lp
, line
+ sizeof(line
) - lp
, ip
->format
, "");
185 gatherline(struct openfile
*ip
)
191 char *end
= s
+ sizeof(s
) - 1;
195 for (p
= s
; (c
= fgetc(ip
->fp
)) != EOF
&& p
< end
; p
++)
196 if ((*p
= c
) == ip
->eol
)
206 strlcpy(lp
, ip
->sepstring
, line
+ sizeof(line
) - lp
);
208 snprintf(lp
, line
+ sizeof(line
) - lp
, ip
->format
, s
);
216 fprintf(stderr
, "%s\n%s\n",
217 "usage: lam [ -f min.max ] [ -s sepstring ] [ -t c ] file ...",
218 " lam [ -p min.max ] [ -s sepstring ] [ -t c ] file ...");