Automated deployment: Thu Aug 12 23:37:33 UTC 2021 b6187f47b9e969ce311de73de1c6b32d970fd69f

16 files changed, 649 insertions, 0 deletions

diff --git a/.editorconfig b/.editorconfig
new file mode 100644
index 0000000..9d25d1d
--- /dev/null
+++ b/.editorconfig
@@ -0,0 +1,19 @@
+root = true
+
+[*]
+charset = utf-8
+end_of_line = lf
+indent_size = tab
+indent_style = tab
+insert_final_newline = true
+max_line_length = 120
+trim_trailing_whitespace = true
+
+[*.{kt,kts}]
+tab_width = 4
+
+[*.html]
+tab_width = 4
+
+[*.{json,conf}]
+tab_width = 2
diff --git a/.gitattributes b/.gitattributes
new file mode 100644
index 0000000..00a51af
--- /dev/null
+++ b/.gitattributes
@@ -0,0 +1,6 @@
+#
+# https://help.github.com/articles/dealing-with-line-endings/
+#
+# These are explicitly windows files and should use crlf
+*.bat           text eol=crlf
+
diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..1b6985c
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,5 @@
+# Ignore Gradle project-specific cache directory
+.gradle
+
+# Ignore Gradle build output directory
+build
diff --git a/build.gradle.kts b/build.gradle.kts
new file mode 100644
index 0000000..b8e248f
--- /dev/null
+++ b/build.gradle.kts
@@ -0,0 +1,32 @@
+plugins {
+	kotlin("multiplatform") version "1.5.21"
+	id("io.kotest.multiplatform") version "5.0.0.3"
+}
+
+repositories {
+	mavenCentral()
+	maven("https://oss.sonatype.org/content/repositories/snapshots")
+}
+
+val kotestVersion: String by project
+
+kotlin {
+	targets {
+		js(IR) {
+			nodejs { }
+			browser { testTask { useMocha() } }
+		}
+	}
+	sourceSets {
+		val jsMain by getting {
+
+		}
+		val jsTest by getting {
+			dependencies {
+				implementation("io.kotest:kotest-assertions-core:5.0.0.376-SNAPSHOT")
+				implementation("io.kotest:kotest-framework-api:5.0.0.376-SNAPSHOT")
+				implementation("io.kotest:kotest-framework-engine:5.0.0.376-SNAPSHOT")
+			}
+		}
+	}
+}
diff --git a/gradle/wrapper/gradle-wrapper.jar b/gradle/wrapper/gradle-wrapper.jar
new file mode 100644
index 0000000..e708b1c
--- /dev/null
+++ b/gradle/wrapper/gradle-wrapper.jar
diff --git a/gradle/wrapper/gradle-wrapper.properties b/gradle/wrapper/gradle-wrapper.properties
new file mode 100644
index 0000000..f371643
--- /dev/null
+++ b/gradle/wrapper/gradle-wrapper.properties
@@ -0,0 +1,5 @@
+distributionBase=GRADLE_USER_HOME
+distributionPath=wrapper/dists
+distributionUrl=https\://services.gradle.org/distributions/gradle-7.0-bin.zip
+zipStoreBase=GRADLE_USER_HOME
+zipStorePath=wrapper/dists
diff --git a/gradlew b/gradlew
new file mode 100755
index 0000000..4f906e0
--- /dev/null
+++ b/gradlew
@@ -0,0 +1,185 @@
+#!/usr/bin/env sh
+
+#
+# Copyright 2015 the original author or authors.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#      https://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+##############################################################################
+##
+##  Gradle start up script for UN*X
+##
+##############################################################################
+
+# Attempt to set APP_HOME
+# Resolve links: $0 may be a link
+PRG="$0"
+# Need this for relative symlinks.
+while [ -h "$PRG" ] ; do
+    ls=`ls -ld "$PRG"`
+    link=`expr "$ls" : '.*-> \(.*\)$'`
+    if expr "$link" : '/.*' > /dev/null; then
+        PRG="$link"
+    else
+        PRG=`dirname "$PRG"`"/$link"
+    fi
+done
+SAVED="`pwd`"
+cd "`dirname \"$PRG\"`/" >/dev/null
+APP_HOME="`pwd -P`"
+cd "$SAVED" >/dev/null
+
+APP_NAME="Gradle"
+APP_BASE_NAME=`basename "$0"`
+
+# Add default JVM options here. You can also use JAVA_OPTS and GRADLE_OPTS to pass JVM options to this script.
+DEFAULT_JVM_OPTS='"-Xmx64m" "-Xms64m"'
+
+# Use the maximum available, or set MAX_FD != -1 to use that value.
+MAX_FD="maximum"
+
+warn () {
+    echo "$*"
+}
+
+die () {
+    echo
+    echo "$*"
+    echo
+    exit 1
+}
+
+# OS specific support (must be 'true' or 'false').
+cygwin=false
+msys=false
+darwin=false
+nonstop=false
+case "`uname`" in
+  CYGWIN* )
+    cygwin=true
+    ;;
+  Darwin* )
+    darwin=true
+    ;;
+  MINGW* )
+    msys=true
+    ;;
+  NONSTOP* )
+    nonstop=true
+    ;;
+esac
+
+CLASSPATH=$APP_HOME/gradle/wrapper/gradle-wrapper.jar
+
+
+# Determine the Java command to use to start the JVM.
+if [ -n "$JAVA_HOME" ] ; then
+    if [ -x "$JAVA_HOME/jre/sh/java" ] ; then
+        # IBM's JDK on AIX uses strange locations for the executables
+        JAVACMD="$JAVA_HOME/jre/sh/java"
+    else
+        JAVACMD="$JAVA_HOME/bin/java"
+    fi
+    if [ ! -x "$JAVACMD" ] ; then
+        die "ERROR: JAVA_HOME is set to an invalid directory: $JAVA_HOME
+
+Please set the JAVA_HOME variable in your environment to match the
+location of your Java installation."
+    fi
+else
+    JAVACMD="java"
+    which java >/dev/null 2>&1 || die "ERROR: JAVA_HOME is not set and no 'java' command could be found in your PATH.
+
+Please set the JAVA_HOME variable in your environment to match the
+location of your Java installation."
+fi
+
+# Increase the maximum file descriptors if we can.
+if [ "$cygwin" = "false" -a "$darwin" = "false" -a "$nonstop" = "false" ] ; then
+    MAX_FD_LIMIT=`ulimit -H -n`
+    if [ $? -eq 0 ] ; then
+        if [ "$MAX_FD" = "maximum" -o "$MAX_FD" = "max" ] ; then
+            MAX_FD="$MAX_FD_LIMIT"
+        fi
+        ulimit -n $MAX_FD
+        if [ $? -ne 0 ] ; then
+            warn "Could not set maximum file descriptor limit: $MAX_FD"
+        fi
+    else
+        warn "Could not query maximum file descriptor limit: $MAX_FD_LIMIT"
+    fi
+fi
+
+# For Darwin, add options to specify how the application appears in the dock
+if $darwin; then
+    GRADLE_OPTS="$GRADLE_OPTS \"-Xdock:name=$APP_NAME\" \"-Xdock:icon=$APP_HOME/media/gradle.icns\""
+fi
+
+# For Cygwin or MSYS, switch paths to Windows format before running java
+if [ "$cygwin" = "true" -o "$msys" = "true" ] ; then
+    APP_HOME=`cygpath --path --mixed "$APP_HOME"`
+    CLASSPATH=`cygpath --path --mixed "$CLASSPATH"`
+
+    JAVACMD=`cygpath --unix "$JAVACMD"`
+
+    # We build the pattern for arguments to be converted via cygpath
+    ROOTDIRSRAW=`find -L / -maxdepth 1 -mindepth 1 -type d 2>/dev/null`
+    SEP=""
+    for dir in $ROOTDIRSRAW ; do
+        ROOTDIRS="$ROOTDIRS$SEP$dir"
+        SEP="|"
+    done
+    OURCYGPATTERN="(^($ROOTDIRS))"
+    # Add a user-defined pattern to the cygpath arguments
+    if [ "$GRADLE_CYGPATTERN" != "" ] ; then
+        OURCYGPATTERN="$OURCYGPATTERN|($GRADLE_CYGPATTERN)"
+    fi
+    # Now convert the arguments - kludge to limit ourselves to /bin/sh
+    i=0
+    for arg in "$@" ; do
+        CHECK=`echo "$arg"|egrep -c "$OURCYGPATTERN" -`
+        CHECK2=`echo "$arg"|egrep -c "^-"`                                 ### Determine if an option
+
+        if [ $CHECK -ne 0 ] && [ $CHECK2 -eq 0 ] ; then                    ### Added a condition
+            eval `echo args$i`=`cygpath --path --ignore --mixed "$arg"`
+        else
+            eval `echo args$i`="\"$arg\""
+        fi
+        i=`expr $i + 1`
+    done
+    case $i in
+        0) set -- ;;
+        1) set -- "$args0" ;;
+        2) set -- "$args0" "$args1" ;;
+        3) set -- "$args0" "$args1" "$args2" ;;
+        4) set -- "$args0" "$args1" "$args2" "$args3" ;;
+        5) set -- "$args0" "$args1" "$args2" "$args3" "$args4" ;;
+        6) set -- "$args0" "$args1" "$args2" "$args3" "$args4" "$args5" ;;
+        7) set -- "$args0" "$args1" "$args2" "$args3" "$args4" "$args5" "$args6" ;;
+        8) set -- "$args0" "$args1" "$args2" "$args3" "$args4" "$args5" "$args6" "$args7" ;;
+        9) set -- "$args0" "$args1" "$args2" "$args3" "$args4" "$args5" "$args6" "$args7" "$args8" ;;
+    esac
+fi
+
+# Escape application args
+save () {
+    for i do printf %s\\n "$i" | sed "s/'/'\\\\''/g;1s/^/'/;\$s/\$/' \\\\/" ; done
+    echo " "
+}
+APP_ARGS=`save "$@"`
+
+# Collect all arguments for the java command, following the shell quoting and substitution rules
+eval set -- $DEFAULT_JVM_OPTS $JAVA_OPTS $GRADLE_OPTS "\"-Dorg.gradle.appname=$APP_BASE_NAME\"" -classpath "\"$CLASSPATH\"" org.gradle.wrapper.GradleWrapperMain "$APP_ARGS"
+
+exec "$JAVACMD" "$@"
diff --git a/gradlew.bat b/gradlew.bat
new file mode 100644
index 0000000..107acd3
--- /dev/null
+++ b/gradlew.bat
@@ -0,0 +1,89 @@
+@rem
+@rem Copyright 2015 the original author or authors.
+@rem
+@rem Licensed under the Apache License, Version 2.0 (the "License");
+@rem you may not use this file except in compliance with the License.
+@rem You may obtain a copy of the License at
+@rem
+@rem      https://www.apache.org/licenses/LICENSE-2.0
+@rem
+@rem Unless required by applicable law or agreed to in writing, software
+@rem distributed under the License is distributed on an "AS IS" BASIS,
+@rem WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+@rem See the License for the specific language governing permissions and
+@rem limitations under the License.
+@rem
+
+@if "%DEBUG%" == "" @echo off
+@rem ##########################################################################
+@rem
+@rem  Gradle startup script for Windows
+@rem
+@rem ##########################################################################
+
+@rem Set local scope for the variables with windows NT shell
+if "%OS%"=="Windows_NT" setlocal
+
+set DIRNAME=%~dp0
+if "%DIRNAME%" == "" set DIRNAME=.
+set APP_BASE_NAME=%~n0
+set APP_HOME=%DIRNAME%
+
+@rem Resolve any "." and ".." in APP_HOME to make it shorter.
+for %%i in ("%APP_HOME%") do set APP_HOME=%%~fi
+
+@rem Add default JVM options here. You can also use JAVA_OPTS and GRADLE_OPTS to pass JVM options to this script.
+set DEFAULT_JVM_OPTS="-Xmx64m" "-Xms64m"
+
+@rem Find java.exe
+if defined JAVA_HOME goto findJavaFromJavaHome
+
+set JAVA_EXE=java.exe
+%JAVA_EXE% -version >NUL 2>&1
+if "%ERRORLEVEL%" == "0" goto execute
+
+echo.
+echo ERROR: JAVA_HOME is not set and no 'java' command could be found in your PATH.
+echo.
+echo Please set the JAVA_HOME variable in your environment to match the
+echo location of your Java installation.
+
+goto fail
+
+:findJavaFromJavaHome
+set JAVA_HOME=%JAVA_HOME:"=%
+set JAVA_EXE=%JAVA_HOME%/bin/java.exe
+
+if exist "%JAVA_EXE%" goto execute
+
+echo.
+echo ERROR: JAVA_HOME is set to an invalid directory: %JAVA_HOME%
+echo.
+echo Please set the JAVA_HOME variable in your environment to match the
+echo location of your Java installation.
+
+goto fail
+
+:execute
+@rem Setup the command line
+
+set CLASSPATH=%APP_HOME%\gradle\wrapper\gradle-wrapper.jar
+
+
+@rem Execute Gradle
+"%JAVA_EXE%" %DEFAULT_JVM_OPTS% %JAVA_OPTS% %GRADLE_OPTS% "-Dorg.gradle.appname=%APP_BASE_NAME%" -classpath "%CLASSPATH%" org.gradle.wrapper.GradleWrapperMain %*
+
+:end
+@rem End local scope for the variables with windows NT shell
+if "%ERRORLEVEL%"=="0" goto mainEnd
+
+:fail
+rem Set variable GRADLE_EXIT_CONSOLE if you need the _script_ return code instead of
+rem the _cmd.exe /c_ return code!
+if  not "" == "%GRADLE_EXIT_CONSOLE%" exit 1
+exit /b 1
+
+:mainEnd
+if "%OS%"=="Windows_NT" endlocal
+
+:omega
diff --git a/settings.gradle.kts b/settings.gradle.kts
new file mode 100644
index 0000000..311e944
--- /dev/null
+++ b/settings.gradle.kts
@@ -0,0 +1 @@
+rootProject.name = "webos"
diff --git a/src/jsMain/kotlin/WebOS.kt b/src/jsMain/kotlin/WebOS.kt
new file mode 100644
index 0000000..b7c4cfb
--- /dev/null
+++ b/src/jsMain/kotlin/WebOS.kt
@@ -0,0 +1,82 @@
+import io.IOHandler
+import io.Path
+import kotlinx.browser.document
+import kotlinx.browser.window
+import org.w3c.dom.Element
+import org.w3c.dom.asList
+
+fun main() {
+	console.log("Hello from Kotlin")
+	val webos = WebOS()
+	document.body?.addEventListener("load", {
+		document.body?.querySelectorAll(".webosconsole")?.asList()?.forEach {
+			if (it !is Element) return@forEach
+			webos.registerConsole(it)
+		}
+	})
+}
+
+data class CharacterRun(val text: String, val color: String)
+
+abstract class Activity(val console: Console) {
+	abstract fun render(columns: Int, rows: Int): List<List<CharacterRun>>
+}
+
+class Console(val os: WebOS, val renderElement: Element?) {
+	val isVirtual get() = renderElement == null
+	val activityStack = ArrayDeque<Activity>()
+
+	var columns: Int = 80
+	var rows: Int = 46
+
+	var shouldRerender = true
+
+	var currentUser: User? = null
+
+	private var _workingDirectory: Path.Absolute? = null
+
+	var workingDirectory: Path.Absolute
+		get() = _workingDirectory ?: currentUser?.homeDirectory ?: Path.root
+		set(value) {
+			_workingDirectory = value
+		}
+
+	fun openActivity(activity: Activity) {
+		activityStack.addLast(activity)
+		invalidateRender()
+	}
+
+	fun render() {
+		if (renderElement == null) return
+		if (!shouldRerender) return
+		shouldRerender = false
+		activityStack.last()
+	}
+
+	fun invalidateRender() {
+		shouldRerender = true
+		window.requestAnimationFrame { render() }
+	}
+
+	fun resize(newColumns: Int, newRows: Int) {
+		invalidateRender()
+	}
+
+	// TODO: Handle resizes of the renderElement
+
+}
+
+class WebOS {
+	private val _consoles = mutableListOf<Console>()
+	val consoles get() = _consoles.toList()
+	val files = IOHandler()
+	fun registerConsole(element: Element) {
+		_consoles.add(Console(this, element))
+	}
+}
+
+data class User(
+	val name: String,
+	val homeDirectory: Path.Absolute
+)
+
diff --git a/src/jsMain/kotlin/io/Path.kt b/src/jsMain/kotlin/io/Path.kt
new file mode 100644
index 0000000..8f77203
--- /dev/null
+++ b/src/jsMain/kotlin/io/Path.kt
@@ -0,0 +1,75 @@
+package io
+
+sealed interface Path {
+	val parts: List<String>
+	fun toAbsolutePath(relativeTo: Absolute): Absolute {
+		return relativeTo.resolve(this)
+	}
+
+	fun resolve(path: Path): Path
+
+	companion object {
+		val root = Absolute(listOf())
+
+		fun ofShell(string: String, userHome: Absolute): Path =
+			ofShell(string.split("/"), userHome)
+
+		fun ofShell(vararg parts: String, userHome: Absolute): Path =
+			ofShell(parts.toList(), userHome)
+
+		fun of(vararg parts: String): Path =
+			of(parts.toList())
+
+		fun of(string: String): Path =
+			of(string.split("/"))
+
+		fun ofShell(parts: List<String>, userHome: Absolute): Path {
+			if (parts.firstOrNull() == "~")
+				return userHome.resolve(Relative(parts.subList(1, parts.size).filter { it.isNotEmpty() }))
+			return of(parts)
+		}
+
+		fun of(parts: List<String>): Path {
+			if (parts.isEmpty())
+				return root
+			if (parts[0] == "") // Starts with a /
+				return Absolute(parts.subList(1, parts.size).filter { it.isNotEmpty() })
+			return Relative(parts.filter { it.isNotEmpty() })
+		}
+	}
+
+	data class Relative internal constructor(override val parts: List<String>) : Path {
+		override fun resolve(path: Path): Path {
+			if (path is Absolute) return path
+			return Relative(this.parts + path.parts)
+		}
+	}
+
+	data class Absolute internal constructor(override val parts: List<String>) : Path {
+		override fun resolve(path: Path): Absolute {
+			if (path is Absolute) return path
+			return Absolute(this.parts + path.parts)
+		}
+
+		fun relativize(path: Path): Relative = when (path) {
+			is Relative -> path
+			is Absolute -> {
+				var commonPrefix = true
+				val partList = mutableListOf<String>()
+				var returns = 0
+				for ((idx, part) in path.parts.withIndex()) {
+					if (idx < this.parts.size) {
+						if (this.parts[idx] == part && commonPrefix) {
+							continue
+						} else {
+							commonPrefix = false
+							returns++
+						}
+					}
+					partList.add(part)
+				}
+				Relative(List(returns) { "" } + partList)
+			}
+		}
+	}
+}
diff --git a/src/jsMain/kotlin/io/files.kt b/src/jsMain/kotlin/io/files.kt
new file mode 100644
index 0000000..d37035d
--- /dev/null
+++ b/src/jsMain/kotlin/io/files.kt
@@ -0,0 +1,90 @@
+package io
+
+import User
+
+class IOHandler {
+	val mounts = mutableListOf<Mount>()
+	fun mount(absolutePath: Path.Absolute, fileSystem: FileSystem) {
+		if (mounts.any { it.mountPoint == absolutePath })
+			return // TODO sensible error message handling
+		mounts += Mount(absolutePath, fileSystem)
+	}
+
+	fun unmount(mountPoint: Path.Absolute) {
+		mounts.removeAll { it.mountPoint == mountPoint }
+	}
+
+	fun <T> findMountFor(
+		workingDirectory: Path.Absolute,
+		path: Path,
+		operation: FileSystem.(relativePath: Path) -> T
+	): T {
+		val absolutPath = path.toAbsolutePath(workingDirectory)
+		val mount = mounts.filter {
+			it.mountPoint.parts.zip(absolutPath.parts).all { (a, b) -> a == b }
+		}.maxByOrNull { it.mountPoint.parts.size } ?: throw IllegalStateException("No mount present")
+		return mount.fileSystem.operation(
+			Path.Absolute(
+				absolutPath.parts.subList(
+					mount.mountPoint.parts.size,
+					absolutPath.parts.size
+				)
+			) // TODO: unangenehm
+		)
+	}
+
+	fun findINode(absolutePath: Path.Absolute): INode {
+		val mount = mounts.filter {
+			it.mountPoint.parts.zip(absolutePath.parts).all { (a, b) -> a == b }
+		}.maxByOrNull { it.mountPoint.parts.size } ?: throw IllegalStateException("No mount present")
+		val iNode = mount.fileSystem.getINode(absolutePath.relativize(mount.mountPoint))
+		return when (iNode) {
+			is INodeResult.File -> iNode.op
+			is INodeResult.ResolveAgain -> findINode(absolutePath.resolve(iNode.relativeToOriginal))
+		}
+	}
+
+	fun read(workingDirectory: Path.Absolute, path: Path): ReadResult =
+		findMountFor(workingDirectory, path) { read(it) }
+
+	fun write(workingDirectory: Path.Absolute, path: Path, data: ByteArray): Unit =
+		findMountFor(workingDirectory, path) { write(it, data) }
+
+	fun stat(workingDirectory: Path.Absolute, path: Path): Unit =
+		findMountFor(workingDirectory, path) { stat(it) }
+}
+
+interface INode {
+	val fs: FileSystem
+}
+
+sealed interface INodeResult {
+	class File(val op: INode) : INodeResult
+	class ResolveAgain(val relativeToOriginal: Path): INodeResult
+}
+
+interface FileSystem {
+	fun getINode(relativePath: Path.Relative): INodeResult
+	fun read(relativePath: Path): ReadResult
+	fun write(path: Path, data: ByteArray): Unit // Write result
+	fun stat(path: Path): Unit // TODO io.Stat result
+}
+
+sealed class ReadResult {
+	class Success(val text: String) : ReadResult()
+	object NotFound : ReadResult()
+	object NoAccess : ReadResult()
+}
+
+data class Mount(
+	val mountPoint: Path.Absolute,
+	val fileSystem: FileSystem
+)
+
+data class Stat(
+	val exists: Boolean,
+	var owner: User,
+	val created: Long,
+	val edited: Long,
+	val size: Long
+)
diff --git a/src/jsMain/kotlin/util/sequence.kt b/src/jsMain/kotlin/util/sequence.kt
new file mode 100644
index 0000000..72b07dc
--- /dev/null
+++ b/src/jsMain/kotlin/util/sequence.kt
@@ -0,0 +1,5 @@
+package util
+
+fun <T> Iterable<T>.expandWith(t: T): Sequence<T> =
+	this.asSequence() + generateSequence { t }.asSequence()
+
diff --git a/src/jsMain/resources/index.html b/src/jsMain/resources/index.html
new file mode 100644
index 0000000..719506b
--- /dev/null
+++ b/src/jsMain/resources/index.html
@@ -0,0 +1,17 @@
+<!doctype html>
+<html lang="en">
+<head>
+    <meta charset="UTF-8">
+    <meta name="viewport"
+          content="width=device-width, user-scalable=no, initial-scale=1.0, maximum-scale=1.0, minimum-scale=1.0">
+    <meta http-equiv="X-UA-Compatible" content="ie=edge">
+    <title>WebOs</title>
+</head>
+<body>
+<noscript>tf you don't have js enabled? do you still live in the stone ages or what?</noscript>
+<div id="content">
+
+</div>
+<script src="/webos.js"></script>
+</body>
+</html>
diff --git a/src/jsTest/kotlin/ProjectConfig.kt b/src/jsTest/kotlin/ProjectConfig.kt
new file mode 100644
index 0000000..cf0f15d
--- /dev/null
+++ b/src/jsTest/kotlin/ProjectConfig.kt
@@ -0,0 +1,7 @@
+import io.kotest.core.config.AbstractProjectConfig
+
+class ProjectConfig : AbstractProjectConfig() {
+	override suspend fun beforeProject() {
+		println("HELLO")
+	}
+}
diff --git a/src/jsTest/kotlin/io/PathTest.kt b/src/jsTest/kotlin/io/PathTest.kt
new file mode 100644
index 0000000..73667a6
--- /dev/null
+++ b/src/jsTest/kotlin/io/PathTest.kt
@@ -0,0 +1,31 @@
+package io
+
+import io.kotest.core.spec.style.FunSpec
+import io.kotest.matchers.booleans.shouldBeFalse
+import io.kotest.matchers.types.shouldBeTypeOf
+
+class PathTest : FunSpec({
+	val homeDir = Path.of("/home") as Path.Absolute
+	test("recognize relative paths as such") {
+		listOf(
+			Path.of("a/b"),
+			Path.of("."),
+			Path.of("a", "b"),
+			Path.ofShell("a/b", userHome = homeDir),
+			Path.ofShell(".", userHome = homeDir),
+			Path.ofShell("a", "b", userHome = homeDir),
+			Path.ofShell(listOf("a", "b"), userHome = homeDir),
+		).forEach {
+			it.shouldBeTypeOf<Path.Relative>()
+		}
+	}
+	test("recognize absolute paths as such") {
+		listOf(
+			Path.of("/a/b"),
+			Path.of("/"),
+			Path.ofShell("/b/c", userHome = homeDir),
+		).forEach {
+			it.shouldBeTypeOf<Path.Absolute>()
+		}
+	}
+})