| OLD | NEW |
| (Empty) |
| 1 /* | |
| 2 | |
| 3 Implementation of POSIX directory browsing functions and types for Win32. | |
| 4 | |
| 5 Author: Kevlin Henney (kevlin@acm.org, kevlin@curbralan.com) | |
| 6 History: Created March 1997. Updated June 2003. | |
| 7 Rights: See end of file. | |
| 8 | |
| 9 */ | |
| 10 | |
| 11 #include <dirent.h> | |
| 12 #include <errno.h> | |
| 13 #include <io.h> /* _findfirst and _findnext set errno iff they return -1 */ | |
| 14 #include <stdlib.h> | |
| 15 #include <string.h> | |
| 16 | |
| 17 #ifdef __cplusplus | |
| 18 extern "C" | |
| 19 { | |
| 20 #endif | |
| 21 | |
| 22 struct DIR | |
| 23 { | |
| 24 long handle; /* -1 for failed rewind */ | |
| 25 struct _finddata_t info; | |
| 26 struct dirent result; /* d_name null iff first time */ | |
| 27 char *name; /* null-terminated char string */ | |
| 28 }; | |
| 29 | |
| 30 DIR *opendir(const char *name) | |
| 31 { | |
| 32 DIR *dir = 0; | |
| 33 | |
| 34 if(name && name[0]) | |
| 35 { | |
| 36 size_t base_length = strlen(name); | |
| 37 const char *all = /* search pattern must end with suitable wildcard */ | |
| 38 strchr("/\\", name[base_length - 1]) ? "*" : "/*"; | |
| 39 | |
| 40 if((dir = (DIR *) malloc(sizeof *dir)) != 0 && | |
| 41 (dir->name = (char *) malloc(base_length + strlen(all) + 1)) != 0) | |
| 42 { | |
| 43 strcat(strcpy(dir->name, name), all); | |
| 44 | |
| 45 if((dir->handle = (long) _findfirst(dir->name, &dir->info)) != -1) | |
| 46 { | |
| 47 dir->result.d_name = 0; | |
| 48 } | |
| 49 else /* rollback */ | |
| 50 { | |
| 51 free(dir->name); | |
| 52 free(dir); | |
| 53 dir = 0; | |
| 54 } | |
| 55 } | |
| 56 else /* rollback */ | |
| 57 { | |
| 58 free(dir); | |
| 59 dir = 0; | |
| 60 errno = ENOMEM; | |
| 61 } | |
| 62 } | |
| 63 else | |
| 64 { | |
| 65 errno = EINVAL; | |
| 66 } | |
| 67 | |
| 68 return dir; | |
| 69 } | |
| 70 | |
| 71 int closedir(DIR *dir) | |
| 72 { | |
| 73 int result = -1; | |
| 74 | |
| 75 if(dir) | |
| 76 { | |
| 77 if(dir->handle != -1) | |
| 78 { | |
| 79 result = _findclose(dir->handle); | |
| 80 } | |
| 81 | |
| 82 free(dir->name); | |
| 83 free(dir); | |
| 84 } | |
| 85 | |
| 86 if(result == -1) /* map all errors to EBADF */ | |
| 87 { | |
| 88 errno = EBADF; | |
| 89 } | |
| 90 | |
| 91 return result; | |
| 92 } | |
| 93 | |
| 94 struct dirent *readdir(DIR *dir) | |
| 95 { | |
| 96 struct dirent *result = 0; | |
| 97 | |
| 98 if(dir && dir->handle != -1) | |
| 99 { | |
| 100 if(!dir->result.d_name || _findnext(dir->handle, &dir->info) != -1) | |
| 101 { | |
| 102 result = &dir->result; | |
| 103 result->d_name = dir->info.name; | |
| 104 } | |
| 105 } | |
| 106 else | |
| 107 { | |
| 108 errno = EBADF; | |
| 109 } | |
| 110 | |
| 111 return result; | |
| 112 } | |
| 113 | |
| 114 void rewinddir(DIR *dir) | |
| 115 { | |
| 116 if(dir && dir->handle != -1) | |
| 117 { | |
| 118 _findclose(dir->handle); | |
| 119 dir->handle = (long) _findfirst(dir->name, &dir->info); | |
| 120 dir->result.d_name = 0; | |
| 121 } | |
| 122 else | |
| 123 { | |
| 124 errno = EBADF; | |
| 125 } | |
| 126 } | |
| 127 | |
| 128 #ifdef __cplusplus | |
| 129 } | |
| 130 #endif | |
| 131 | |
| 132 /* | |
| 133 | |
| 134 Copyright Kevlin Henney, 1997, 2003. All rights reserved. | |
| 135 | |
| 136 Permission to use, copy, modify, and distribute this software and its | |
| 137 documentation for any purpose is hereby granted without fee, provided | |
| 138 that this copyright and permissions notice appear in all copies and | |
| 139 derivatives. | |
| 140 | |
| 141 This software is supplied "as is" without express or implied warranty. | |
| 142 | |
| 143 But that said, if there are any problems please get in touch. | |
| 144 | |
| 145 */ | |
| OLD | NEW |