1 files changed, 106 insertions, 0 deletions

diff --git a/win32/dirent.c b/win32/dirent.c
new file mode 100644
index 000000000..795fc779c
--- /dev/null
+++ b/win32/dirent.c
@@ -0,0 +1,106 @@
+#include "libbb.h"
+
+struct DIR {
+        struct dirent dd_dir;
+        HANDLE dd_handle;     /* FindFirstFile handle */
+        int dd_stat;          /* 0-based index */
+};
+
+static inline void finddata2dirent(struct dirent *ent, WIN32_FIND_DATAA *fdata)
+{
+        /* copy file name from WIN32_FIND_DATA to dirent */
+        strcpy(ent->d_name, fdata->cFileName);
+
+        if ((fdata->dwFileAttributes & FILE_ATTRIBUTE_REPARSE_POINT) &&
+                        (fdata->dwReserved0 == IO_REPARSE_TAG_SYMLINK ||
+                        fdata->dwReserved0 ==  IO_REPARSE_TAG_MOUNT_POINT ||
+                        fdata->dwReserved0 ==  IO_REPARSE_TAG_APPEXECLINK))
+                ent->d_type = DT_LNK;
+        else if (fdata->dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
+                ent->d_type = DT_DIR;
+        else
+                ent->d_type = DT_REG;
+}
+
+DIR *opendir(const char *name)
+{
+        char pattern[MAX_PATH];
+        WIN32_FIND_DATAA fdata;
+        HANDLE h;
+        int len;
+        DIR *dir;
+
+        /* check that name is not NULL */
+        if (!name) {
+                errno = EINVAL;
+                return NULL;
+        }
+        /* check that the pattern won't be too long for FindFirstFileA */
+        len = strlen(name);
+        if (len + 2 >= MAX_PATH) {
+                errno = ENAMETOOLONG;
+                return NULL;
+        }
+        /* copy name to temp buffer */
+        strcpy(pattern, name);
+
+        /* append optional '/' and wildcard '*' */
+        if (len && !is_dir_sep(pattern[len - 1]))
+                pattern[len++] = '/';
+        pattern[len++] = '*';
+        pattern[len] = 0;
+
+        /* open find handle */
+        h = FindFirstFileA(pattern, &fdata);
+        if (h == INVALID_HANDLE_VALUE) {
+                DWORD err = GetLastError();
+                errno = (err == ERROR_DIRECTORY) ? ENOTDIR : err_win_to_posix();
+                return NULL;
+        }
+
+        /* initialize DIR structure and copy first dir entry */
+        dir = xmalloc(sizeof(DIR));
+        dir->dd_handle = h;
+        dir->dd_stat = 0;
+        finddata2dirent(&dir->dd_dir, &fdata);
+        return dir;
+}
+
+struct dirent *readdir(DIR *dir)
+{
+        if (!dir) {
+                errno = EBADF; /* No set_errno for mingw */
+                return NULL;
+        }
+
+        /* if first entry, dirent has already been set up by opendir */
+        if (dir->dd_stat) {
+                /* get next entry and convert from WIN32_FIND_DATA to dirent */
+                WIN32_FIND_DATAA fdata;
+                if (FindNextFileA(dir->dd_handle, &fdata)) {
+                        finddata2dirent(&dir->dd_dir, &fdata);
+                } else {
+                        DWORD lasterr = GetLastError();
+                        /* POSIX says you shouldn't set errno when readdir can't
+                           find any more files; so, if another error we leave it set. */
+                        if (lasterr != ERROR_NO_MORE_FILES)
+                                errno = err_win_to_posix();
+                        return NULL;
+                }
+        }
+
+        ++dir->dd_stat;
+        return &dir->dd_dir;
+}
+
+int closedir(DIR *dir)
+{
+        if (!dir) {
+                errno = EBADF;
+                return -1;
+        }
+
+        FindClose(dir->dd_handle);
+        free(dir);
+        return 0;
+}