Add to path

Seggan · Nov 1, 2023 · e97afdd · e97afdd
1 parent b5fb54f
commit e97afdd
Show file tree

Hide file tree

Showing 3 changed files with 38 additions and 1 deletion.
diff --git a/docs/lang/std/path.papyri b/docs/lang/std/path.papyri
@@ -53,8 +53,14 @@ Opens the file at the given path for writing and returns an output stream.
 @h3 { parent(path: string): string }
 Returns the parent directory of the given path.
 
+@h3 { read_all(path: string): bytes }
+Reads the entire file at the given path and returns the contents as a byte array.
+
 @h3 { resolve(base: string, other: string): string }
 Resolves the given path `other` against the base path `base` and returns the resolved path as a string.
 
 @h3 { root(path: string): string }
 Returns the root of the given path.
+
+@h3 { write_all(path: string, data: bytes) }
+Writes the given byte array to the file at the given path.
diff --git a/lang/src/main/kotlin/io/github/seggan/metis/compilation/Compiler.kt b/lang/src/main/kotlin/io/github/seggan/metis/compilation/Compiler.kt
@@ -21,6 +21,9 @@ class Compiler private constructor(
     private val enclosingCompiler: Compiler?
 ) {
 
+    /**
+     * Creates a new compiler
+     */
     constructor() : this(emptyList(), null)
 
     private val localStack = ArrayDeque<Local>()

diff --git a/lang/src/main/kotlin/io/github/seggan/metis/runtime/intrinsics/NativeLibrary.kt b/lang/src/main/kotlin/io/github/seggan/metis/runtime/intrinsics/NativeLibrary.kt
@@ -127,7 +127,10 @@ object PathLib : NativeLibrary("path") {
         lib["normalize"] = pathFunction { it.normalize().toString().metisValue() }
         lib["absolute"] = pathFunction { it.toAbsolutePath().toString().metisValue() }
         lib["resolve"] = twoArgFunction { self, other ->
-            fileSystem.getPath(self.stringValue()).resolve(other.stringValue()).toString().metisValue()
+            currentDir.resolve(fileSystem.getPath(self.stringValue()))
+                .resolve(other.stringValue())
+                .toString()
+                .metisValue()
         }
         lib["parent"] = pathFunction { it.parent.toString().metisValue() }
         lib["base_name"] = pathFunction { it.fileName.toString().metisValue() }
@@ -167,6 +170,31 @@ object PathLib : NativeLibrary("path") {
                 )
             }
         }
+
+        lib["read_all"] = pathFunction {
+            try {
+                it.readBytes().metisValue()
+            } catch (e: NoSuchFileException) {
+                throw MetisRuntimeException(
+                    "IoError",
+                    "File not found: ${it.absolutePathString()}",
+                    Value.Table(mutableMapOf("path".metisValue() to it.absolutePathString().metisValue()))
+                )
+            }
+        }
+        lib["write_all"] = twoArgFunction { self, other ->
+            val path = currentDir.resolve(fileSystem.getPath(self.stringValue()))
+            try {
+                path.writeBytes(other.convertTo<Value.Bytes>().value)
+            } catch (e: FileAlreadyExistsException) {
+                throw MetisRuntimeException(
+                    "IoError",
+                    "File already exists: ${path.absolutePathString()}",
+                    Value.Table(mutableMapOf("path".metisValue() to path.absolutePathString().metisValue()))
+                )
+            }
+            Value.Null
+        }
     }
 }