added LIBC_SCCS condition for sccs ids

[unix-history] / usr / src / lib / libc / gen / opendir.c

/*
* Copyright (c) 1983 Regents of the University of California.
* All rights reserved.  The Berkeley software License Agreement
* specifies the terms and conditions for redistribution.
*/

#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid[] = "@(#)opendir.c   5.2 (Berkeley) %G%";
#endif LIBC_SCCS and not lint

#include <sys/param.h>
#include <sys/dir.h>

/*
* open a directory.
*/
DIR *
opendir(name)
       char *name;
{
       register DIR *dirp;
       register int fd;

       if ((fd = open(name, 0)) == -1)
               return NULL;
       if ((dirp = (DIR *)malloc(sizeof(DIR))) == NULL) {
               close (fd);
               return NULL;
       }
       dirp->dd_fd = fd;
       dirp->dd_loc = 0;
       return dirp;
}