/* $OpenBSD: getNAME.c,v 1.5 1997/11/13 04:15:25 millert Exp $ */ /* $NetBSD: getNAME.c,v 1.7.2.1 1997/11/10 19:54:46 thorpej 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[] = "@(#)getNAME.c 8.1 (Berkeley) 6/30/93"; #else static char rcsid[] = "$OpenBSD: getNAME.c,v 1.5 1997/11/13 04:15:25 millert Exp $"; #endif #endif /* not lint */ /* * Get name sections from manual pages. * -t for building toc * -i for building intro entries * -w for querying type of manual source * other apropos database */ #include #include #include #if 0 #include #endif #ifdef LINUX #include #endif int tocrc; int intro; int typeflag; void doname __P((char *)); void dorefname __P((char *)); void getfrom __P((char *)); void split __P((char *, char *)); void trimln __P((char *)); void usage __P((void)); int main __P((int, char *[])); char *__progname; int main(argc, argv) int argc; char *argv[]; { int ch; __progname = basename(argv[0]); while ((ch = getopt(argc, argv, "itw")) != -1) switch (ch) { case 'i': intro = 1; break; case 't': tocrc = 1; break; case 'w': typeflag = 1; break; case '?': default: usage(); } argc -= optind; argv += optind; if (!*argv) usage(); for (; *argv; ++argv) getfrom(*argv); exit(0); } void getfrom(pathname) char *pathname; { int i = 0; char *name, *loc, *s, *t; char headbuf[BUFSIZ]; char linbuf[BUFSIZ]; char savebuf[BUFSIZ]; char *hdr; if (freopen(pathname, "r", stdin) == 0) { perror(pathname); return; } name = basename(pathname); for (;;) { if (fgets(headbuf, sizeof(headbuf), stdin) == NULL) { if (typeflag) printf("%-60s UNKNOWN\n", pathname); return; } if (headbuf[0] != '.') continue; if ((headbuf[1] == 'T' && headbuf[2] == 'H') || (headbuf[1] == 't' && headbuf[2] == 'h')) break; if (headbuf[1] == 'D' && headbuf[2] == 't') goto newman; } if (typeflag) { printf("%-60s OLD\n", pathname); return; } for (;;) { if (fgets(linbuf, sizeof(linbuf), stdin) == NULL) return; if (linbuf[0] != '.') continue; if (linbuf[1] == 'S' && linbuf[2] == 'H') break; if (linbuf[1] == 's' && linbuf[2] == 'h') break; } trimln(headbuf); if (tocrc) doname(name); linbuf[0] = '\0'; for (;;) { if (fgets(headbuf, sizeof(headbuf), stdin) == NULL) break; if (headbuf[0] == '.') { if (headbuf[1] == 'S' && headbuf[2] == 'H') break; if (headbuf[1] == 's' && headbuf[2] == 'h') break; if (headbuf[1] == '\\' && headbuf[2] == '"') continue; if (headbuf[1] == 'b' && headbuf[2] == 'r') { if (intro) split(linbuf, name); else printf("%s\n", linbuf); linbuf[0] = 0; i = 0; continue; } } if (i != 0) strncat(linbuf, " ", sizeof(linbuf) - 1); i++; trimln(headbuf); hdr = headbuf; if (hdr[0] == '.') { for (++hdr; *hdr && isalpha(*hdr); ++hdr) ; while (isspace(*hdr)) ++hdr; } strncat(linbuf, hdr, sizeof(linbuf) - 1); /* change the \- into (N) - */ if ((s = strstr(linbuf, "\\-")) != NULL) { strcpy(savebuf, s+1); if ((t = strchr(name, '.')) != NULL) { t++; *s++ = '('; while (*t) *s++ = *t++; *s++ = ')'; *s++ = ' '; *s++ = '\0'; } strncat(linbuf, savebuf, sizeof(linbuf) - strlen(savebuf) - 1); } } if (intro) split(linbuf, name); else printf("%s\n", linbuf); return; newman: if (typeflag) { printf("%-60s NEW\n", pathname); return; } for (;;) { if (fgets(linbuf, sizeof(linbuf), stdin) == NULL) return; if (linbuf[0] != '.') continue; if (linbuf[1] == 'S' && linbuf[2] == 'h') break; } trimln(headbuf); if (tocrc) doname(name); linbuf[0] = '\0'; for (;;) { if (fgets(headbuf, sizeof(headbuf), stdin) == NULL) break; if (headbuf[0] == '.') { if (headbuf[1] == 'S' && headbuf[2] == 'h') break; if (headbuf[1] == '\\' && headbuf[2] == '"') continue; if (headbuf[1] == 'b' && headbuf[2] == 'r') { if (intro) split(linbuf, name); else printf("%s\n", linbuf); linbuf[0] = 0; i = 0; continue; } } if (i != 0) strncat(linbuf, " ", sizeof(linbuf) - 1); i++; trimln(headbuf); for (loc = strchr(headbuf, ' '); loc; loc = strchr(loc, ' ')) if (loc[1] == ',') strcpy(loc, &loc[1]); else loc++; if (headbuf[0] != '.') { strncat(linbuf, headbuf, sizeof(linbuf) - 1); } else { /* * Get rid of quotes in macros. */ for (loc = strchr(&headbuf[4], '"'); loc; ) { strcpy(loc, &loc[1]); loc = strchr(loc, '"'); } /* * Handle cross references */ if (headbuf[1] == 'X' && headbuf[2] == 'r') { for (loc = &headbuf[4]; *loc != ' '; loc++) continue; loc[0] = '('; loc[2] = ')'; loc[3] = '\0'; } /* * Put dash between names and description. * Put section and dash between names and description. */ if (headbuf[1] == 'N' && headbuf[2] == 'd') { if ((t = strchr(name, '.')) != NULL) { strncat(linbuf, "(", sizeof(linbuf)-1); strncat(linbuf, t+1, sizeof(linbuf)-1); strncat(linbuf, ") ", sizeof(linbuf)-1); } strncat(linbuf, "- ", sizeof(linbuf) - 1); } /* * Skip over macro names. */ hdr = headbuf; for (++hdr; isalpha(*hdr); ++hdr) ; while (isspace(*hdr)) ++hdr; strncat(linbuf, hdr, sizeof(linbuf) - 1); } } if (intro) split(linbuf, name); else printf("%s\n", linbuf); } void trimln(cp) register char *cp; { while (*cp) cp++; if (*--cp == '\n') *cp = 0; } void doname(name) char *name; { register char *dp = name, *ep; again: while (*dp && *dp != '.') putchar(*dp++); if (*dp) for (ep = dp+1; *ep; ep++) if (*ep == '.') { putchar(*dp++); goto again; } putchar('('); if (*dp) dp++; while (*dp) putchar (*dp++); putchar(')'); putchar(' '); } void split(line, name) char *line, *name; { register char *cp, *dp; char *sp, *sep; cp = strchr(line, '-'); if (cp == 0) return; sp = cp + 1; for (--cp; *cp == ' ' || *cp == '\t' || *cp == '\\'; cp--) ; *++cp = '\0'; while (*sp && (*sp == ' ' || *sp == '\t')) sp++; for (sep = "", dp = line; dp && *dp; dp = cp, sep = "\n") { cp = strchr(dp, ','); if (cp) { register char *tp; for (tp = cp - 1; *tp == ' ' || *tp == '\t'; tp--) ; *++tp = '\0'; for (++cp; *cp == ' ' || *cp == '\t'; cp++) ; } printf("%s%s\t", sep, dp); dorefname(name); printf("\t%s", sp); } } void dorefname(name) char *name; { register char *dp = name, *ep; again: while (*dp && *dp != '.') putchar(*dp++); if (*dp) for (ep = dp+1; *ep; ep++) if (*ep == '.') { putchar(*dp++); goto again; } putchar('.'); if (*dp) dp++; while (*dp) putchar (*dp++); } void usage() { (void)fprintf(stderr, "usage: getNAME [-itw] file ...\n"); exit(1); }