lib/lp/next.c

/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*  Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/*    All Rights Reserved   */


#ident  "%Z%%M% %I% %E% SMI"    /* SVr4.0 1.10  */
/* LINTLIBRARY */

#include "string.h"
#include "errno.h"

#include "lp.h"

#if defined(__STDC__)
static int      is ( char *, char *, unsigned int );
#else
static int      is();
#endif

/**
 ** next_x() - GO TO NEXT ENTRY UNDER PARENT DIRECTORY
 **/

char *
#if defined(__STDC__)
next_x (
    char *          parent,
    long *          lastdirp,
    unsigned int        what
)
#else
next_x (parent, lastdirp, what)
    char            *parent;
    long            *lastdirp;
    unsigned int        what;
#endif
{
    DIR         *dirp;

    register char       *ret = 0;

    struct dirent       *direntp;


    if (!(dirp = Opendir(parent)))
        return (0);

    if (*lastdirp != -1)
        Seekdir (dirp, *lastdirp);

    do
        direntp = Readdir(dirp);
    while (
        direntp
         && (
            STREQU(direntp->d_name, ".")
             || STREQU(direntp->d_name, "..")
             || !is(parent, direntp->d_name, what)
        )
    );

    if (direntp) {
        if (!(ret = Strdup(direntp->d_name)))
            errno = ENOMEM;
        *lastdirp = Telldir(dirp);
    } else {
        errno = ENOENT;
        *lastdirp = -1;
    }

    Closedir (dirp);

    return (ret);
}

static int
#if defined(__STDC__)
is (
    char *          parent,
    char *          name,
    unsigned int        what
)
#else
is (parent, name, what)
    char            *parent;
    char            *name;
    unsigned int        what;
#endif
{
    char            *path;

    struct stat     statbuf;

    if (!(path = makepath(parent, name, (char *)0)))
        return (0);
    if (Stat(path, &statbuf) == -1) {
        Free (path);
        return (0);
    }
    Free (path);
    return ((statbuf.st_mode & S_IFMT) == what);
}