* The Regents of the University of California. All rights reserved.
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the University of
* California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
static char copyright
[] =
"@(#) Copyright (c) 1993\n\
The Regents of the University of California. All rights reserved.\n";
static char sccsid
[] = "@(#)lam.c 8.1 (Berkeley) 6/6/93";
* Author: John Kunze, UCB
#define BIGBUFSIZ 5 * BUFSIZ
struct openfile
{ /* open file structure */
FILE *fp
; /* file pointer */
short eof
; /* eof flag */
short pad
; /* pad flag for missing columns */
char eol
; /* end of line character */
char *sepstring
; /* string to print before each line */
char *format
; /* printf(3) style string spec. */
int morefiles
; /* set by getargs(), changed by gatherline() */
int nofinalnl
; /* normally append \n to each output line */
void error
__P((char *, char *));
char *gatherline
__P((struct openfile
*));
void getargs
__P((char *[]));
char *pad
__P((struct openfile
*));
register struct openfile
*ip
;
error("lam - laminate files", "");
for (ip
= input
; ip
->fp
!= NULL
; ip
++)
fputs(ip
->sepstring
, stdout
);
register struct openfile
*ip
= input
;
static char fmtbuf
[BUFSIZ
];
P
= S
= F
= T
= 0; /* capitalized options */
while ((p
= *++av
) != NULL
) {
if (*p
!= '-' || !p
[1]) {
else if ((ip
->fp
= fopen(p
, "r")) == NULL
) {
ip
->sepstring
= (S
? (ip
-1)->sepstring
: "");
ip
->format
= ((P
|| F
) ? (ip
-1)->format
: "%s");
ip
->eol
= (T
? (ip
-1)->eol
: '\n');
switch (*(c
= ++p
) | 040) {
error("Need string after -%s", c
);
error("Need character after -%s", c
);
if (*++p
|| (p
= *++av
)) {
fmtp
+= strlen(fmtp
) + 1;
if (fmtp
> fmtbuf
+ BUFSIZ
)
error("No more format space", "");
sprintf(fmtp
, "%%%ss", p
);
error("Need string after -%s", c
);
error("What do you mean by -%s?", c
);
register char *p
= ip
->sepstring
;
register char *lp
= linep
;
sprintf(lp
, ip
->format
, "");
register char *lp
= linep
;
for (p
= s
; (c
= fgetc(ip
->fp
)) != EOF
&& p
< end
; p
++)
sprintf(lp
, ip
->format
, s
);
fprintf(stderr
, "lam: ");
"\nUsage: lam [ -[fp] min.max ] [ -s sepstring ] [ -t c ] file ...\n");
if (strncmp("lam - ", msg
, 6) == 0)
fprintf(stderr
, "Options:\n\t%s\t%s\t%s\t%s\t%s",
"-f min.max field widths for file fragments\n",
"-p min.max like -f, but pad missing fragments\n",
"-s sepstring fragment separator\n",
"-t c input line terminator is c, no \\n after output lines\n",
"Capitalized options affect more than one file.\n");