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.1 | 141 +++++++++++++++++++++++++++++++ text_cmds/lam/lam.c | 234 ++++++++++++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 375 insertions(+) create mode 100644 text_cmds/lam/lam.1 create mode 100644 text_cmds/lam/lam.c (limited to 'text_cmds/lam') diff --git a/text_cmds/lam/lam.1 b/text_cmds/lam/lam.1 new file mode 100644 index 0000000..9986577 --- /dev/null +++ b/text_cmds/lam/lam.1 @@ -0,0 +1,141 @@ +.\" 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. +.\" +.\" @(#)lam.1 8.1 (Berkeley) 6/6/93 +.\" $FreeBSD: src/usr.bin/lam/lam.1,v 1.13 2004/08/12 11:34:34 tjr Exp $ +.\" +.Dd August 12, 2004 +.Dt LAM 1 +.Os +.Sh NAME +.Nm lam +.Nd laminate files +.Sh SYNOPSIS +.Nm +.Op Fl f Ar min . Ns Ar max +.Op Fl s Ar sepstring +.Op Fl t Ar c +.Ar +.Nm +.Op Fl p Ar min . Ns Ar max +.Op Fl s Ar sepstring +.Op Fl t Ar c +.Ar +.Sh DESCRIPTION +The +.Nm +utility copies the named files side by side onto the standard output. +The +.Em n-th +input lines from the input +.Ar files +are considered fragments of the single long +.Em n-th +output line into which they are assembled. +The name `\fB\-\fP' means the standard input, and may be repeated. +.Pp +Normally, each option affects only the +.Ar file +after it. +If the option letter is capitalized it affects all subsequent files +until it appears again uncapitalized. +The options are described below: +.Bl -tag -width indent +.It Fl f Ar min . Ns Ar max +Print line fragments according to the format string +.Ar min . Ns Ar max , +where +.Ar min +is the minimum field width and +.Ar max +the maximum field width. +If +.Ar min +begins with a zero, zeros will be added to make up the field width, +and if it begins with a `\-', the fragment will be left-adjusted +within the field. +.It Fl p Ar min . Ns Ar max +Like +.Fl f , +but pad this file's field when end-of-file is reached +and other files are still active. +.It Fl s Ar sepstring +Print +.Ar sepstring +before printing line fragments from the next file. +This option may appear after the last file. +.It Fl t Ar c +The input line terminator is +.Ar c +instead of a newline. +The newline normally appended to each output line is omitted. +.El +.Pp +To print files simultaneously for easy viewing use +.Xr pr 1 . +.Sh EXAMPLES +The command +.Bd -literal +lam file1 file2 file3 file4 +.Ed +.Pp +joins 4 files together along each line. +To merge the lines from four different files use +.Bd -literal +lam file1 \-S "\\ +" file2 file3 file4 +.Ed +.Pp +Every 2 lines of a file may be joined on one line with +.Bd -literal +lam \- \- < file +.Ed +.Pp +and a form letter with substitutions keyed by `@' can be done with +.Bd -literal +lam \-t @ letter changes +.Ed +.Sh SEE ALSO +.Xr join 1 , +.Xr paste 1 , +.Xr pr 1 , +.Xr printf 3 +.Sh STANDARDS +Some of the functionality of +.Nm +is standardized as the +.Xr paste 1 +utility by +.St -p1003.2 . +.Sh BUGS +The +.Nm +utility does not recognize multibyte characters. 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