From 5fd83771641d15c418f747bd343ba6738d3875f7 Mon Sep 17 00:00:00 2001 From: Cameron Katri Date: Sun, 9 May 2021 14:20:58 -0400 Subject: Import macOS userland adv_cmds-176 basic_cmds-55 bootstrap_cmds-116.100.1 developer_cmds-66 diskdev_cmds-667.40.1 doc_cmds-53.60.1 file_cmds-321.40.3 mail_cmds-35 misc_cmds-34 network_cmds-606.40.1 patch_cmds-17 remote_cmds-63 shell_cmds-216.60.1 system_cmds-880.60.2 text_cmds-106 --- text_cmds/lam/lam.c | 234 ++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 234 insertions(+) create mode 100644 text_cmds/lam/lam.c (limited to 'text_cmds/lam/lam.c') diff --git a/text_cmds/lam/lam.c b/text_cmds/lam/lam.c new file mode 100644 index 0000000..cd24920 --- /dev/null +++ b/text_cmds/lam/lam.c @@ -0,0 +1,234 @@ +/*- + * Copyright (c) 1993 + * 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 + * are met: + * 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 + * SUCH DAMAGE. + */ + +#ifndef lint +static const char copyright[] = +"@(#) Copyright (c) 1993\n\ + The Regents of the University of California. All rights reserved.\n"; +#endif /* not lint */ + +#ifndef lint +#if 0 +static char sccsid[] = "@(#)lam.c 8.1 (Berkeley) 6/6/93"; +#endif +#endif /* not lint */ +#include +__FBSDID("$FreeBSD: src/usr.bin/lam/lam.c,v 1.14 2005/08/05 01:04:36 jmallett Exp $"); + +/* + * lam - laminate files + * Author: John Kunze, UCB + */ + +#include +#include +#include +#include +#include +#include + +#define MAXOFILES 20 +#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 */ + const char *sepstring; /* string to print before each line */ + const char *format; /* printf(3) style string spec. */ +} input[MAXOFILES]; + +int morefiles; /* set by getargs(), changed by gatherline() */ +int nofinalnl; /* normally append \n to each output line */ +char line[BIGBUFSIZ]; +char *linep; + +static char *gatherline(struct openfile *); +static void getargs(char *[]); +static char *pad(struct openfile *); +static void usage(void); + +int +main(int argc, char *argv[]) +{ + struct openfile *ip; + + if (argc == 1) + usage(); + getargs(argv); + if (!morefiles) + usage(); + for (;;) { + linep = line; + for (ip = input; ip->fp != NULL; ip++) + linep = gatherline(ip); + if (!morefiles) + exit(0); + fputs(line, stdout); + fputs(ip->sepstring, stdout); + if (!nofinalnl) + putchar('\n'); + } +} + +static void +getargs(char *av[]) +{ + struct openfile *ip = input; + char *p, *c; + static char fmtbuf[BUFSIZ]; + char *fmtp = fmtbuf; + int P, S, F, T; + + P = S = F = T = 0; /* capitalized options */ + while ((p = *++av) != NULL) { + if (*p != '-' || !p[1]) { + if (++morefiles >= MAXOFILES) + errx(1, "too many input files"); + if (*p == '-') + ip->fp = stdin; + else if ((ip->fp = fopen(p, "r")) == NULL) { + err(1, "%s", p); + } + ip->pad = P; + if (!ip->sepstring) + ip->sepstring = (S ? (ip-1)->sepstring : ""); + if (!ip->format) + ip->format = ((P || F) ? (ip-1)->format : "%s"); + if (!ip->eol) + ip->eol = (T ? (ip-1)->eol : '\n'); + ip++; + continue; + } + c = ++p; + switch (tolower((unsigned char)*c)) { + case 's': + if (*++p || (p = *++av)) + ip->sepstring = p; + else + usage(); + S = (*c == 'S' ? 1 : 0); + break; + case 't': + if (*++p || (p = *++av)) + ip->eol = *p; + else + usage(); + T = (*c == 'T' ? 1 : 0); + nofinalnl = 1; + break; + case 'p': + ip->pad = 1; + P = (*c == 'P' ? 1 : 0); + /* FALLTHROUGH */ + case 'f': + F = (*c == 'F' ? 1 : 0); + if (*++p || (p = *++av)) { + fmtp += strlen(fmtp) + 1; + if (fmtp >= fmtbuf + sizeof(fmtbuf)) + errx(1, "no more format space"); + /* restrict format string to only valid width formatters */ + if (strspn(p, "-.0123456789") != strlen(p)) + errx(1, "invalid format string `%s'", p); + if (snprintf(fmtp, fmtbuf + sizeof(fmtbuf) - fmtp, "%%%ss", p) + >= fmtbuf + sizeof(fmtbuf) - fmtp) + errx(1, "no more format space"); + ip->format = fmtp; + } + else + usage(); + break; + default: + usage(); + } + } + ip->fp = NULL; + if (!ip->sepstring) + ip->sepstring = ""; +} + +static char * +pad(struct openfile *ip) +{ + char *lp = linep; + + strlcpy(lp, ip->sepstring, line + sizeof(line) - lp); + lp += strlen(lp); + if (ip->pad) { + snprintf(lp, line + sizeof(line) - lp, ip->format, ""); + lp += strlen(lp); + } + return (lp); +} + +static char * +gatherline(struct openfile *ip) +{ + char s[BUFSIZ]; + int c; + char *p; + char *lp = linep; + char *end = s + sizeof(s) - 1; + + if (ip->eof) + return (pad(ip)); + for (p = s; (c = fgetc(ip->fp)) != EOF && p < end; p++) + if ((*p = c) == ip->eol) + break; + *p = '\0'; + if (c == EOF) { + ip->eof = 1; + if (ferror(ip->fp)) { + err(EX_IOERR, NULL); + } + if (ip->fp == stdin) + fclose(stdin); + morefiles--; + return (pad(ip)); + } + strlcpy(lp, ip->sepstring, line + sizeof(line) - lp); + lp += strlen(lp); + snprintf(lp, line + sizeof(line) - lp, ip->format, s); + lp += strlen(lp); + return (lp); +} + +static void +usage() +{ + fprintf(stderr, "%s\n%s\n", +"usage: lam [ -f min.max ] [ -s sepstring ] [ -t c ] file ...", +" lam [ -p min.max ] [ -s sepstring ] [ -t c ] file ..."); + exit(1); +} -- cgit v1.2.3-56-ge451