|
|
1.1 root 1: /*
2: * Copyright (c) 1983 Regents of the University of California.
3: * All rights reserved.
4: *
5: * Redistribution and use in source and binary forms are permitted
6: * provided that: (1) source distributions retain this entire copyright
7: * notice and comment, and (2) distributions including binaries display
8: * the following acknowledgement: ``This product includes software
9: * developed by the University of California, Berkeley and its contributors''
10: * in the documentation or other materials provided with the distribution
11: * and in all advertising materials mentioning features or use of this
12: * software. Neither the name of the University nor the names of its
13: * contributors may be used to endorse or promote products derived
14: * from this software without specific prior written permission.
15: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
16: * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
17: * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
18: */
19:
20: #if defined(LIBC_SCCS) && !defined(lint)
21: static char sccsid[] = "@(#)opendir.c 5.10 (Berkeley) 6/1/90";
22: #endif /* LIBC_SCCS and not lint */
23:
24: #include <sys/param.h>
25: #include <dirent.h>
26: #include <fcntl.h>
27:
28: char *malloc();
29: long _rewinddir;
30:
31: /*
32: * open a directory.
33: */
34: DIR *
35: opendir(name)
36: char *name;
37: {
38: register DIR *dirp;
39: register int fd;
40:
41: if ((fd = open(name, 0)) == -1)
42: return NULL;
43: if (fcntl(fd, F_SETFD, 1) == -1 ||
44: (dirp = (DIR *)malloc(sizeof(DIR))) == NULL) {
45: close (fd);
46: return NULL;
47: }
48: /*
49: * If CLSIZE is an exact multiple of DIRBLKSIZ, use a CLSIZE
50: * buffer that it cluster boundary aligned.
51: * Hopefully this can be a big win someday by allowing page trades
52: * to user space to be done by getdirentries()
53: */
54: if ((CLSIZE % DIRBLKSIZ) == 0) {
55: dirp->dd_buf = malloc(CLSIZE);
56: dirp->dd_len = CLSIZE;
57: } else {
58: dirp->dd_buf = malloc(DIRBLKSIZ);
59: dirp->dd_len = DIRBLKSIZ;
60: }
61: if (dirp->dd_buf == NULL) {
62: close (fd);
63: return NULL;
64: }
65: dirp->dd_fd = fd;
66: dirp->dd_loc = 0;
67: dirp->dd_seek = 0;
68: /*
69: * Set up seek point for rewinddir.
70: */
71: _rewinddir = telldir(dirp);
72: return dirp;
73: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.