Merge branch 'master' into kbrepeat

[cc65] / libsrc / cbm / opendir.c

diff --git a/libsrc/cbm/opendir.c b/libsrc/cbm/opendir.c
index 569c4918a34c975446af369262cf69e4b7d26706..b39e6b77ec76a502ceae0508e17791b94157937c 100644 (file)
--- a/libsrc/cbm/opendir.c
+++ b/libsrc/cbm/opendir.c
@@ -1,10 +1,9 @@
 /*
- * Ullrich von Bassewitz, 2012-05-30. Based on code by Groepaz.
- */
+** Ullrich von Bassewitz, 2012-05-30. Based on code by Groepaz.
+*/
 
 #include <stdlib.h>
 #include <string.h>
-#include <dirent.h>
 #include <fcntl.h>
 #include <unistd.h>
 #include <errno.h>
@@ -12,23 +11,35 @@
 
 
 
-DIR* __fastcall__ opendir (const char*)
-{                           
-    unsigned char buf[32];
+DIR* __fastcall__ opendir (register const char* name)
+{
+    unsigned char buf[2];
     DIR* dir = 0;
     DIR d;
 
-    /* Setup file name and offset */
+    /* Setup the actual file name that is sent to the disk. We accept "0:",
+    ** "1:" and "." as directory names.
+    */
     d.name[0] = '$';
-    d.name[1] = '\0';
-    d.off     = 0;
+    if (name == 0 || name[0] == '\0' || (name[0] == '.' && name[1] == '\0')) {
+        d.name[1] = '\0';
+    } else if ((name[0] == '0' || name[0] == '1') && name[1] == ':' && name[2] == '\0') {
+        d.name[1] = name[0];
+        d.name[2] = '\0';
+    } else {
+        errno = EINVAL;
+        goto exitpoint;
+    }
+
+    /* Set the offset of the first entry */
+    d.off = sizeof (buf);
 
     /* Open the directory on disk for reading */
     d.fd = open (d.name, O_RDONLY);
     if (d.fd >= 0) {
 
-        /* Skip the disk header */
-        if (_dirread (&d, buf, 32)) {
+        /* Skip the load address */         
+        if (_dirread (&d, buf, sizeof (buf))) {
 
             /* Allocate memory for the DIR structure returned */
             dir = malloc (sizeof (*dir));
@@ -43,6 +54,7 @@ DIR* __fastcall__ opendir (const char*)
         }
     }
 
+exitpoint:
     /* Done */
     return dir;
 }