1 files changed, 39 insertions, 19 deletions

diff --git a/src/main.c b/src/main.c
index 296373f..c3a1115 100644
--- a/src/main.c
+++ b/src/main.c
@@ -20,6 +20,7 @@ WITH REGARD TO THIS SOFTWARE.
 #include "uxn.c"
 #include "ppu.c"
 #include "apu.c"
+#include "file.c"
 #include "text.h"
 
 //
@@ -220,27 +221,46 @@ datetime_talk(Device *d, u8 b0, u8 w) {
 
 void
 file_talk(Device *d, u8 b0, u8 w) {
-    u8 read = b0 == 0xd;
-    if(w && (read || b0 == 0xf)) {
-        char *name = (char *)&d->mem[mempeek16(d->dat, 0x8)];
-        u16 result = 0, length = mempeek16(d->dat, 0xa);
-        u16 offset = mempeek16(d->dat, 0x4);
-        u16 addr = mempeek16(d->dat, b0 - 1);
-        OpenMode mode = FS_OPEN_READ;
-        if (!read) {
-            mode = offset ? FS_OPEN_APPEND : FS_OPEN_WRITE;
-        }
-        File file = fs_open_file(name, mode);
-        if (file.index != FS_NULL) {
-            if(fs_seek(&file, offset, SEEK_SET) != -1) {
-                if (read) {
-                    result = fs_read(&d->mem[addr], length, &file);
-                } else {
-                    result = fs_write(&d->mem[addr], length, &file);
+    if (w) {
+        u16 a, b, res;
+        switch(b0) {
+            case 0x5: {
+                DEVPEEK16(a, 0x4);
+                DEVPEEK16(b, 0xa);
+                if(b > 0x10000 - a) {
+                    b = 0x10000 - a;
                 }
-            }
+                res = file_stat(&d->mem[a], b);
+                DEVPOKE16(0x2, res);
+            } break;
+            case 0x6: {
+                // res = file_delete();
+                // DEVPOKE16(0x2, res);
+            } break;
+            case 0x9: {
+                DEVPEEK16(a, 0x8);
+                res = file_init(&d->mem[a]);
+                DEVPOKE16(0x2, res);
+            } break;
+            case 0xd: {
+                DEVPEEK16(a, 0xc);
+                DEVPEEK16(b, 0xa);
+                if(b > 0x10000 - a) {
+                    b = 0x10000 - a;
+                }
+                res = file_read(&d->mem[a], b);
+                DEVPOKE16(0x2, res);
+            } break;
+            case 0xf: {
+                DEVPEEK16(a, 0xe);
+                DEVPEEK16(b, 0xa);
+                if(b > 0x10000 - a) {
+                    b = 0x10000 - a;
+                }
+                res = file_write(&d->mem[a], b, d->dat[0x7]);
+                DEVPOKE16(0x2, res);
+            } break;
         }
-        mempoke16(d->dat, 0x2, result);
     }
 }