Head

GCC Code Coverage Report

Directory:	./		Exec	Total	Coverage
File:	usr.bin/lam/lam.c	Lines:	0	94	0.0 %
Date:	2016-12-06	Branches:	0	80	0.0 %


/*	$OpenBSD: lam.c,v 1.19 2015/10/09 01:37:08 deraadt Exp $	*/
/*	$NetBSD: lam.c,v 1.2 1994/11/14 20:27:42 jtc Exp $	*/

/*-
 * 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. 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 - laminate files
 *	Author:  John Kunze, UCB
 */

#include <sys/param.h>	/* NOFILE_MAX */

#include <ctype.h>
#include <err.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>

#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. */
}	input[NOFILE_MAX + 1];	/* last one is for the last -s arg. */
#define INPUTSIZE sizeof(input) / sizeof(*input)

int	numfiles;		/* number of open files */
int	nofinalnl;		/* normally append \n to each output line */
char	line[BIGBUFSIZ];
char	*linep;

void	 usage(void);
char	*gatherline(struct openfile *);
void	 getargs(int, char *[]);
char	*pad(struct openfile *);

int
main(int argc, char *argv[])
{
	int i;

	if (pledge("stdio rpath wpath cpath", NULL) == -1)
		err(1, "pledge");

	/* Process arguments, set numfiles to file argument count. */
	getargs(argc, argv);
	if (numfiles == 0)
		usage();
	/* Concatenate lines from each file, then print. */
	for (;;) {
		linep = line;
		/*
		 * For each file that has a line to print, numfile is
		 * incremented.  Thus if numfiles is 0, we are done.
		 */
		numfiles = 0;
		for (i = 0; i < INPUTSIZE - 1 && input[i].fp != NULL; i++)
			linep = gatherline(&input[i]);
		if (numfiles == 0)
			exit(0);
		fputs(line, stdout);
		/* Print terminating -s argument. */
		fputs(input[i].sepstring, stdout);
		if (!nofinalnl)
			putchar('\n');
	}
}

void
getargs(int argc, char *argv[])
{
	struct openfile *ip = input;
	char *p;
	int ch, P, S, F, T;
	size_t siz;

	P = S = F = T = 0;		/* capitalized options */
	while (optind < argc) {
		switch (ch = getopt(argc, argv, "F:f:P:p:S:s:T:t:")) {
		case 'F': case 'f':
			F = (ch == 'F');
			/* Validate format string argument. */
			for (p = optarg; *p != '\0'; p++)
				if (!isdigit((unsigned char)*p) &&
				    *p != '.' && *p != '-')
					errx(1, "%s: invalid width specified",
					     optarg);
			/* '%' + width + 's' + '\0' */
			siz = p - optarg + 3;
			if ((p = realloc(ip->format, siz)) == NULL)
				err(1, NULL);
			snprintf(p, siz, "%%%ss", optarg);
			ip->format = p;
			break;
		case 'P': case 'p':
			P = (ch == 'P');
			ip->pad = 1;
			break;
		case 'S': case 's':
			S = (ch == 'S');
			ip->sepstring = optarg;
			break;
		case 'T': case 't':
			T = (ch == 'T');
			if (strlen(optarg) != 1)
				usage();
			ip->eol = optarg[0];
			nofinalnl = 1;
			break;
		case -1:
			if (optind >= argc)
				break;		/* to support "--" */
			/* This is a file, not a flag. */
			++numfiles;
			if (numfiles >= INPUTSIZE)
				errx(1, "too many files");
			if (strcmp(argv[optind], "-") == 0)
				ip->fp = stdin;
			else if ((ip->fp = fopen(argv[optind], "r")) == NULL)
				err(1, "%s", argv[optind]);
			ip->pad = P;
			if (ip->sepstring == NULL)
				ip->sepstring = S ? (ip-1)->sepstring : "";
			if (ip->format == NULL)
				ip->format = (P || F) ? (ip-1)->format : "%s";
			if (ip->eol == '\0')
				ip->eol = T ? (ip-1)->eol : '\n';
			ip++;
			optind++;
			break;
		default:
			usage();
			/* NOTREACHED */
		}
	}
	ip->fp = NULL;
	if (ip->sepstring == NULL)
		ip->sepstring = "";
}

char *
pad(struct openfile *ip)
{
	size_t n;
	char *lp = linep;

	n = strlcpy(lp, ip->sepstring,  line + sizeof(line) - lp);
	lp += (n < line + sizeof(line) - lp) ? n : strlen(lp);
	if (ip->pad) {
		n = snprintf(lp, line + sizeof(line) - lp, ip->format, "");
		if (n > 0)
			lp += (n < line + sizeof(line) - lp) ? n : strlen(lp);
	}
	return (lp);
}

/*
 * Grab line from file, appending to linep.  Increments numfiles if file
 * is still open.
 */
char *
gatherline(struct openfile *ip)
{
	size_t n;
	char s[BUFSIZ];
	char *p;
	char *lp = linep;
	char *end = s + BUFSIZ - 1;
	int c;

	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 (ip->fp == stdin)
			fclose(stdin);
		return (pad(ip));
	}
	/* Something will be printed. */
	numfiles++;
	n = strlcpy(lp, ip->sepstring, line + sizeof(line) - lp);
	lp += (n < line + sizeof(line) - lp) ? n : strlen(lp);
	n = snprintf(lp, line + sizeof(line) - lp, ip->format, s);
	if (n > 0)
		lp += (n < line + sizeof(line) - lp) ? n : strlen(lp);
	return (lp);
}

void
usage(void)
{
	extern char *__progname;

	fprintf(stderr,
	    "usage: %s [-f min.max] [-p min.max] [-s sepstring] [-t c] file ...\n",
	    __progname);
	exit(1);
}


Generated by: GCOVR (Version 3.3)

Line	Branch	Exec	Source
1			/* $OpenBSD: lam.c,v 1.19 2015/10/09 01:37:08 deraadt Exp $ */
2			/* $NetBSD: lam.c,v 1.2 1994/11/14 20:27:42 jtc Exp $ */
3
4			/*-
5			* Copyright (c) 1993
6			* The Regents of the University of California. All rights reserved.
7			*
8			* Redistribution and use in source and binary forms, with or without
9			* modification, are permitted provided that the following conditions
10			* are met:
11			* 1. Redistributions of source code must retain the above copyright
12			* notice, this list of conditions and the following disclaimer.
13			* 2. Redistributions in binary form must reproduce the above copyright
14			* notice, this list of conditions and the following disclaimer in the
15			* documentation and/or other materials provided with the distribution.
16			* 3. Neither the name of the University nor the names of its contributors
17			* may be used to endorse or promote products derived from this software
18			* without specific prior written permission.
19			*
20			* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21			* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22			* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23			* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24			* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25			* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26			* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27			* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28			* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29			* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30			* SUCH DAMAGE.
31			*/
32
33			/*
34			* lam - laminate files
35			* Author: John Kunze, UCB
36			*/
37
38			#include <sys/param.h> /* NOFILE_MAX */
39
40			#include <ctype.h>
41			#include <err.h>
42			#include <stdio.h>
43			#include <stdlib.h>
44			#include <string.h>
45			#include <unistd.h>
46
47			#define BIGBUFSIZ 5 * BUFSIZ
48
49			struct openfile { /* open file structure */
50			FILE fp; / file pointer */
51			short eof; /* eof flag */
52			short pad; /* pad flag for missing columns */
53			char eol; /* end of line character */
54			char sepstring; / string to print before each line */
55			char format; / printf(3) style string spec. */
56			} input[NOFILE_MAX + 1]; /* last one is for the last -s arg. */
57			#define INPUTSIZE sizeof(input) / sizeof(*input)
58
59			int numfiles; /* number of open files */
60			int nofinalnl; /* normally append \n to each output line */
61			char line[BIGBUFSIZ];
62			char *linep;
63
64			void usage(void);
65			char gatherline(struct openfile );
66			void getargs(int, char *[]);
67			char pad(struct openfile );
68
69			int
70			main(int argc, char *argv[])
71			{
72			int i;
73
74			if (pledge("stdio rpath wpath cpath", NULL) == -1)
75			err(1, "pledge");
76
77			/* Process arguments, set numfiles to file argument count. */
78			getargs(argc, argv);
79			if (numfiles == 0)
80			usage();
81			/* Concatenate lines from each file, then print. */
82			for (;;) {
83			linep = line;
84			/*
85			* For each file that has a line to print, numfile is
86			* incremented. Thus if numfiles is 0, we are done.
87			*/
88			numfiles = 0;
89			for (i = 0; i < INPUTSIZE - 1 && input[i].fp != NULL; i++)
90			linep = gatherline(&input[i]);
91			if (numfiles == 0)
92			exit(0);
93			fputs(line, stdout);
94			/* Print terminating -s argument. */
95			fputs(input[i].sepstring, stdout);
96			if (!nofinalnl)
97			putchar('\n');
98			}
99			}
100
101			void
102			getargs(int argc, char *argv[])
103			{
104			struct openfile *ip = input;
105			char *p;
106			int ch, P, S, F, T;
107			size_t siz;
108
109			P = S = F = T = 0; /* capitalized options */
110			while (optind < argc) {
111			switch (ch = getopt(argc, argv, "F:f:P:p:S:s:T:t:")) {
112			case 'F': case 'f':
113			F = (ch == 'F');
114			/* Validate format string argument. */
115			for (p = optarg; *p != '\0'; p++)
116			if (!isdigit((unsigned char)*p) &&
117			p != '.' && p != '-')
118			errx(1, "%s: invalid width specified",
119			optarg);
120			/* '%' + width + 's' + '\0' */
121			siz = p - optarg + 3;
122			if ((p = realloc(ip->format, siz)) == NULL)
123			err(1, NULL);
124			snprintf(p, siz, "%%%ss", optarg);
125			ip->format = p;
126			break;
127			case 'P': case 'p':
128			P = (ch == 'P');
129			ip->pad = 1;
130			break;
131			case 'S': case 's':
132			S = (ch == 'S');
133			ip->sepstring = optarg;
134			break;
135			case 'T': case 't':
136			T = (ch == 'T');
137			if (strlen(optarg) != 1)
138			usage();
139			ip->eol = optarg[0];
140			nofinalnl = 1;
141			break;
142			case -1:
143			if (optind >= argc)
144			break; /* to support "--" */
145			/* This is a file, not a flag. */
146			++numfiles;
147			if (numfiles >= INPUTSIZE)
148			errx(1, "too many files");
149			if (strcmp(argv[optind], "-") == 0)
150			ip->fp = stdin;
151			else if ((ip->fp = fopen(argv[optind], "r")) == NULL)
152			err(1, "%s", argv[optind]);
153			ip->pad = P;
154			if (ip->sepstring == NULL)
155			ip->sepstring = S ? (ip-1)->sepstring : "";
156			if (ip->format == NULL)
157			ip->format = (P \|\| F) ? (ip-1)->format : "%s";
158			if (ip->eol == '\0')
159			ip->eol = T ? (ip-1)->eol : '\n';
160			ip++;
161			optind++;
162			break;
163			default:
164			usage();
165			/* NOTREACHED */
166			}
167			}
168			ip->fp = NULL;
169			if (ip->sepstring == NULL)
170			ip->sepstring = "";
171			}
172
173			char *
174			pad(struct openfile *ip)
175			{
176			size_t n;
177			char *lp = linep;
178
179			n = strlcpy(lp, ip->sepstring, line + sizeof(line) - lp);
180			lp += (n < line + sizeof(line) - lp) ? n : strlen(lp);
181			if (ip->pad) {
182			n = snprintf(lp, line + sizeof(line) - lp, ip->format, "");
183			if (n > 0)
184			lp += (n < line + sizeof(line) - lp) ? n : strlen(lp);
185			}
186			return (lp);
187			}
188
189			/*
190			* Grab line from file, appending to linep. Increments numfiles if file
191			* is still open.
192			*/
193			char *
194			gatherline(struct openfile *ip)
195			{
196			size_t n;
197			char s[BUFSIZ];
198			char *p;
199			char *lp = linep;
200			char *end = s + BUFSIZ - 1;
201			int c;
202
203			if (ip->eof)
204			return (pad(ip));
205			for (p = s; (c = fgetc(ip->fp)) != EOF && p < end; p++)
206			if ((*p = c) == ip->eol)
207			break;
208			*p = '\0';
209			if (c == EOF) {
210			ip->eof = 1;
211			if (ip->fp == stdin)
212			fclose(stdin);
213			return (pad(ip));
214			}
215			/* Something will be printed. */
216			numfiles++;
217			n = strlcpy(lp, ip->sepstring, line + sizeof(line) - lp);
218			lp += (n < line + sizeof(line) - lp) ? n : strlen(lp);
219			n = snprintf(lp, line + sizeof(line) - lp, ip->format, s);
220			if (n > 0)
221			lp += (n < line + sizeof(line) - lp) ? n : strlen(lp);
222			return (lp);
223			}
224
225			void
226			usage(void)
227			{
228			extern char *__progname;
229
230			fprintf(stderr,
231			"usage: %s [-f min.max] [-p min.max] [-s sepstring] [-t c] file ...\n",
232			__progname);
233			exit(1);
234			}