From d6583bb2a13f329cf0332ef2570eb8bb8fc0e39c Mon Sep 17 00:00:00 2001 From: Theo de Raadt Date: Wed, 18 Oct 1995 08:53:40 +0000 Subject: initial import of NetBSD tree --- usr.bin/soelim/Makefile | 6 ++ usr.bin/soelim/soelim.1 | 90 ++++++++++++++++++++++++++ usr.bin/soelim/soelim.c | 165 ++++++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 261 insertions(+) create mode 100644 usr.bin/soelim/Makefile create mode 100644 usr.bin/soelim/soelim.1 create mode 100644 usr.bin/soelim/soelim.c (limited to 'usr.bin/soelim') diff --git a/usr.bin/soelim/Makefile b/usr.bin/soelim/Makefile new file mode 100644 index 00000000000..e2b64fc68bc --- /dev/null +++ b/usr.bin/soelim/Makefile @@ -0,0 +1,6 @@ +# $NetBSD: Makefile,v 1.3 1994/12/21 08:11:23 jtc Exp $ +# @(#)Makefile 8.1 (Berkeley) 6/6/93 + +PROG= soelim + +.include diff --git a/usr.bin/soelim/soelim.1 b/usr.bin/soelim/soelim.1 new file mode 100644 index 00000000000..fd246aa8c89 --- /dev/null +++ b/usr.bin/soelim/soelim.1 @@ -0,0 +1,90 @@ +.\" $NetBSD: soelim.1,v 1.3 1994/12/21 08:11:24 jtc Exp $ +.\" +.\" Copyright (c) 1980, 1990, 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. +.\" +.\" @(#)soelim.1 8.1 (Berkeley) 6/6/93 +.\" +.Dd June 6, 1993 +.Dt SOELIM 1 +.Os BSD 3 +.Sh NAME +.Nm soelim +.Nd eliminate \&.so's from nroff input +.Sh SYNOPSIS +.Nm soelim +.Op Ar file ... +.Sh DESCRIPTION +.Nm Soelim +reads the specified files or the standard input and performs the textual +inclusion implied by the +.Xr nroff 1 +directives of the form: +.Pp +.Dl \&.so somefile +.Pp +The directives need to appear at the beginning of input lines. +This is useful since programs such as +.Xr tbl 1 +do not normally do this; it allows the placement of individual tables +in separate files to be run as a part of a large document. +.Pp +An argument consisting of a single minus +.Ql Fl +is taken to be +a file name corresponding to the standard input. +.Pp +Note that inclusion can be suppressed by using +.Ql \e' +instead of +.Ql \e. , +i.e. +.Pp +.Dl \'so /usr/lib/tmac.s +.Pp +A sample usage of +.Nm soelim +would be +.Pp +.Bd -literal -offset indent -compact +soelim exum?.n \&| tbl \&| nroff \-ms \&| col \&| lpr +.Ed +.Sh SEE ALSO +.Xr colcrt 1 , +.Xr more 1 +.Sh BUGS +The format of the source commands must involve no strangeness \- +exactly one blank must precede and no blanks follow the file name. +.Sh HISTORY +The +.Nm +command appeared in +.Bx 3.0 . diff --git a/usr.bin/soelim/soelim.c b/usr.bin/soelim/soelim.c new file mode 100644 index 00000000000..529ae0fedfd --- /dev/null +++ b/usr.bin/soelim/soelim.c @@ -0,0 +1,165 @@ +/* $NetBSD: soelim.c,v 1.3 1994/12/21 08:11:26 jtc Exp $ */ + +/* + * Copyright (c) 1980, 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 char copyright[] = +"@(#) Copyright (c) 1980, 1993\n\ + The Regents of the University of California. All rights reserved.\n"; +#endif /* not lint */ + +#ifndef lint +#if 0 +static char sccsid[] = "@(#)soelim.c 8.1 (Berkeley) 6/6/93"; +#endif +static char rcsid[] = "$NetBSD: soelim.c,v 1.3 1994/12/21 08:11:26 jtc Exp $"; +#endif /* not lint */ + +#include +/* + * soelim - a filter to process n/troff input eliminating .so's + * + * Author: Bill Joy UCB July 8, 1977 + * + * This program eliminates .so's from a n/troff input stream. + * It can be used to prepare safe input for submission to the + * phototypesetter since the software supporting the operator + * doesn't let him do chdir. + * + * This is a kludge and the operator should be given the + * ability to do chdir. + * + * This program is more generally useful, it turns out, because + * the program tbl doesn't understand ".so" directives. + */ +#define STDIN_NAME "-" + +main(argc, argv) + int argc; + char *argv[]; +{ + + argc--; + argv++; + if (argc == 0) { + (void)process(STDIN_NAME); + exit(0); + } + do { + (void)process(argv[0]); + argv++; + argc--; + } while (argc > 0); + exit(0); +} + +int process(file) + char *file; +{ + register char *cp; + register int c; + char fname[BUFSIZ]; + FILE *soee; + int isfile; + + if (!strcmp(file, STDIN_NAME)) { + soee = stdin; + } else { + soee = fopen(file, "r"); + if (soee == NULL) { + perror(file); + return(-1); + } + } + for (;;) { + c = getc(soee); + if (c == EOF) + break; + if (c != '.') + goto simple; + c = getc(soee); + if (c != 's') { + putchar('.'); + goto simple; + } + c = getc(soee); + if (c != 'o') { + printf(".s"); + goto simple; + } + do + c = getc(soee); + while (c == ' ' || c == '\t'); + cp = fname; + isfile = 0; + for (;;) { + switch (c) { + + case ' ': + case '\t': + case '\n': + case EOF: + goto donename; + + default: + *cp++ = c; + c = getc(soee); + isfile++; + continue; + } + } +donename: + if (cp == fname) { + printf(".so"); + goto simple; + } + *cp = 0; + if (process(fname) < 0) + if (isfile) + printf(".so %s\n", fname); + continue; +simple: + if (c == EOF) + break; + putchar(c); + if (c != '\n') { + c = getc(soee); + goto simple; + } + } + if (soee != stdin) { + fclose(soee); + } + return(0); +} -- cgit v1.2.3