InfoMagic Source Code 1993 July/THE_SOURCE_CODE_CD_ROM.iso/bsd_srcs/usr.bin/man/whatis/whatis.c

C/C++ Source or Header | 1991-04-18 | 4.9 KB | 203 lines

/*
 * Copyright (c) 1987 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
char copyright[] =
"@(#) Copyright (c) 1987 Regents of the University of California.\n\
 All rights reserved.\n";
#endif /* not lint */

#ifndef lint
static char sccsid[] = "@(#)whatis.c    5.6 (Berkeley) 6/1/90";
#endif /* not lint */

#include <sys/param.h>
#include <stdio.h>
#include <ctype.h>
#include <string.h>
#include <stdlib.h>
#include "../man/pathnames.h"

#define    MAXLINELEN    256            /* max line handled */

char *progname;

static int *found, foundman;

main(argc, argv)
    int argc;
    char **argv;
{
    extern char *optarg;
    extern int optind;
    register char *beg, **p;
    int ch;
    char *p_augment, *p_path, **getdb();

    progname = "whatis";
    while ((ch = getopt(argc, argv, "M:m:P:")) != EOF)
        switch((char)ch) {
        case 'M':
        case 'P':        /* backward compatible */
            p_path = optarg;
            break;
        case 'm':
            p_augment = optarg;
            break;
        case '?':
        default:
            usage();
        }
    argv += optind;
    argc -= optind;

    if (argc < 1)
        usage();

    /*NOSTRICT*/
    if (!(found = (int *)malloc((u_int)argc)))
        enomem();
    bzero((char *)found, argc * sizeof(int));

    for (p = argv; *p; ++p)            /* trim full paths */
        if (beg = rindex(*p, '/'))
            *p = beg + 1;

    if (p_augment)
        whatis(argv, p_augment, 1);
    if (p_path || (p_path = getenv("MANPATH")))
        whatis(argv, p_path, 1);
    else
        for (p = getdb(); *p; ++p)
            whatis(argv, *p, 0);

    if (!foundman) {
        fprintf(stderr, "whatis: no %s file found.\n", _PATH_WHATIS);
        exit(1);
    }
    for (p = argv; *p; ++p)
        if (!found[p - argv])
            printf("%s: not found\n", *p);
}

whatis(argv, path, buildpath)
    char **argv, *path;
    int buildpath;
{
    register char *end, *name, **p;
    char buf[MAXLINELEN + 1], wbuf[MAXLINELEN + 1];

    for (name = path; name; name = end) {    /* through name list */
        if (end = index(name, ':'))
            *end++ = '\0';

        if (buildpath) {
            char hold[MAXPATHLEN + 1];

            (void)sprintf(hold, "%s/%s", name, _PATH_WHATIS);
            name = hold;
        }

        if (!freopen(name, "r", stdin))
            continue;

        foundman = 1;

        /* for each file found */
        while (fgets(buf, sizeof(buf), stdin)) {
            dashtrunc(buf, wbuf);
            for (p = argv; *p; ++p)
                if (match(wbuf, *p)) {
                    printf("%s", buf);
                    found[p - argv] = 1;

                    /* only print line once */
                    while (*++p)
                        if (match(wbuf, *p))
                            found[p - argv] = 1;
                    break;
                }
        }
    }
}

/*
 * match --
 *    match a full word
 */
match(bp, str)
    register char *bp, *str;
{
    register int len;
    register char *start;

    if (!*str || !*bp)
        return(0);
    for (len = strlen(str);;) {
        for (; *bp && !isdigit(*bp) && !isalpha(*bp); ++bp);
        if (!*bp)
            break;
        for (start = bp++;
            *bp && (*bp == '_' || isdigit(*bp) || isalpha(*bp)); ++bp);
        if (bp - start == len && !strncasecmp(start, str, len))
            return(1);
    }
    return(0);
}

/*
 * dashtrunc --
 *    truncate a string at " - "
 */
dashtrunc(from, to)
    register char *from, *to;
{
    register int ch;

    for (; (ch = *from) && ch != '\n' &&
        (ch != ' ' || from[1] != '-' || from[2] != ' '); ++from)
        *to++ = ch;
    *to = '\0';
}

/*
 * usage --
 *    print usage message and die
 */
usage()
{
    (void)fprintf(stderr,
        "usage: whatis [-M path] [-m path] command ...\n");
    exit(1);
}