1 files changed, 95 insertions, 0 deletions
diff --git a/newlib/libc/sys/go32/dir.c b/newlib/libc/sys/go32/dir.c
new file mode 100644
index 0000000..ba3831a
--- /dev/null
+++ b/newlib/libc/sys/go32/dir.c
@@ -0,0 +1,95 @@
+#include <string.h>
+
+#include "sys/dir.h"
+#include "sys/dirent.h"
+#include <errno.h>
+
+DIR *opendir(char *name)
+{
+  int length;
+  DIR *dir = (DIR *)malloc(sizeof(DIR));
+  dir->num_read = 0;
+  dir->name = (char *)malloc(strlen(name)+6);
+  strcpy(dir->name, name);
+
+  /* Append a "." if we got only the device name */
+  if (dir->name[1] == ':' && strlen(dir->name) == 2)
+      strcat(dir->name, ".");
+
+  /* Strip trailing slashes, so we can append "/*.*" */
+  while (1)
+  {
+      length = strlen(dir->name);
+      if (length == 0) break;
+      if (dir->name[length - 1] == '/' ||
+	  dir->name[length - 1] == '\\')
+	  dir->name[length - 1] = '\0';
+      else
+	  break;
+  }
+
+  strcat(dir->name, "/*.*");
+  return dir;
+}
+
+
+
+static char *strlwr(char *s)
+{
+  char *p = s;
+  while (*s)
+  {
+    if ((*s >= 'A') && (*s <= 'Z'))
+      *s += 'a'-'A';
+    s++;
+  }
+  return p;
+}
+
+struct dirent *readdir(DIR *dir)
+{
+  int done;
+  int oerrno = errno;
+  if (dir->num_read)
+    done = findnext(&dir->ff);
+  else
+    done = findfirst(dir->name, &dir->ff,
+		     FA_ARCH|FA_RDONLY|FA_DIREC|FA_HIDDEN|FA_SYSTEM);
+  if (done)
+  {
+    if (errno == ENMFILE)
+      errno = oerrno;
+    return 0;
+  }
+  dir->num_read ++;
+  dir->de.d_namlen = strlen(dir->ff.ff_name);
+  strcpy(dir->de.d_name,dir->ff.ff_name);
+  strlwr(dir->de.d_name);
+  return &dir->de;
+}
+
+long telldir(DIR *dir)
+{
+  return dir->num_read;
+}
+
+void seekdir(DIR *dir, long loc)
+{
+  int i;
+  rewinddir(dir);
+  for (i=0; i<loc; i++)
+    readdir(dir);
+}
+
+void rewinddir(DIR *dir)
+{
+  dir->num_read = 0;
+}
+
+int closedir(DIR *dir)
+{
+  free(dir->name);
+  free(dir);
+  return 0;
+}
+