aboutsummaryrefslogtreecommitdiffhomepage
path: root/examples/rubyvm-on-php-on-wasm/php-wasm.php
diff options
context:
space:
mode:
Diffstat (limited to 'examples/rubyvm-on-php-on-wasm/php-wasm.php')
-rw-r--r--examples/rubyvm-on-php-on-wasm/php-wasm.php1615
1 files changed, 1615 insertions, 0 deletions
diff --git a/examples/rubyvm-on-php-on-wasm/php-wasm.php b/examples/rubyvm-on-php-on-wasm/php-wasm.php
new file mode 100644
index 0000000..398d377
--- /dev/null
+++ b/examples/rubyvm-on-php-on-wasm/php-wasm.php
@@ -0,0 +1,1615 @@
+<?php
+
+declare(strict_types=1);
+
+require_once __DIR__ . '/vendor/autoload.php';
+
+use Nsfisis\Waddiwasi\BinaryFormat\Decoder;
+use Nsfisis\Waddiwasi\BinaryFormat\InvalidBinaryFormatException;
+use Nsfisis\Waddiwasi\Execution\ExternVal;
+use Nsfisis\Waddiwasi\Execution\FuncInst;
+use Nsfisis\Waddiwasi\Execution\MemInst;
+use Nsfisis\Waddiwasi\Execution\Refs;
+use Nsfisis\Waddiwasi\Execution\Runtime;
+use Nsfisis\Waddiwasi\Execution\Store;
+use Nsfisis\Waddiwasi\Structure\Types\FuncType;
+use Nsfisis\Waddiwasi\Structure\Types\NumType;
+use Nsfisis\Waddiwasi\Structure\Types\ResultType;
+use Nsfisis\Waddiwasi\Structure\Types\ValType;
+
+const PHP_EMPTY = '';
+
+const PHP_HELLO_WORLD = <<<'EOS'
+require_once __DIR__ . '/HelloWorld.php';
+EOS;
+
+$wasmBinary = file_get_contents(__DIR__ . '/php-wasm.wasm');
+\assert($wasmBinary !== false);
+
+try {
+ $module = (new Decoder($wasmBinary))->decode();
+} catch (InvalidBinaryFormatException $e) {
+ fprintf(STDERR, $e->getMessage() . "\n");
+ exit(1);
+}
+
+$hostFuncs = [
+ makeHostFunc('(i32, i32, i32) -> (i32)', hostFunc__env__invoke_iii(...), 'env::invoke_iii'),
+ makeHostFunc('(i32, i32, i32, i32, i32) -> (i32)', hostFunc__env__invoke_iiiii(...), 'env::invoke_iiiii'),
+ makeHostFunc('(i32) -> ()', hostFunc__env__invoke_v(...), 'env::invoke_v'),
+ makeHostFunc('(i32, i32, i32, i32) -> (i32)', hostFunc__env__invoke_iiii(...), 'env::invoke_iiii'),
+ makeHostFunc('(i32, i32) -> (i32)', hostFunc__env__invoke_ii(...), 'env::invoke_ii'),
+ makeHostFunc('() -> ()', hostFunc__env__abort(...), 'env::abort'),
+ makeHostFunc('(i32) -> ()', hostFunc__env__exit(...), 'env::exit'),
+ makeHostFunc('(i32, i32, i32, i32) -> ()', hostFunc__env__invoke_viii(...), 'env::invoke_viii'),
+ makeHostFunc('(i32, i32, i32) -> ()', hostFunc__env__invoke_vii(...), 'env::invoke_vii'),
+ makeHostFunc('(i32, i32) -> ()', hostFunc__env__invoke_vi(...), 'env::invoke_vi'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__env__invoke_i(...), 'env::invoke_i'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env__invoke_iiiiiii(...), 'env::invoke_iiiiiii'),
+ makeHostFunc('(i32, i32, i32, i32) -> ()', hostFunc__env____assert_fail(...), 'env::__assert_fail'),
+ makeHostFunc('(i32, i32, i32, i32, i32) -> ()', hostFunc__env__invoke_viiii(...), 'env::invoke_viiii'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> ()', hostFunc__env__invoke_viiiii(...), 'env::invoke_viiiii'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env__invoke_iiiiii(...), 'env::invoke_iiiiii'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env__invoke_iiiiiiiiii(...), 'env::invoke_iiiiiiiiii'),
+ makeHostFunc('(i32, i32, i32, i32) -> (i32)', hostFunc__env__strftime(...), 'env::strftime'),
+ makeHostFunc('(i32, i32, i32, i32) -> (i32)', hostFunc__env__getaddrinfo(...), 'env::getaddrinfo'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env__gethostbyname_r(...), 'env::gethostbyname_r'),
+ makeHostFunc('() -> (i32)', hostFunc__env__getdtablesize(...), 'env::getdtablesize'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__env__getprotobyname(...), 'env::getprotobyname'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__env__getprotobynumber(...), 'env::getprotobynumber'),
+ makeHostFunc('(i32, i32, i32) -> (i32)', hostFunc__env__strptime(...), 'env::strptime'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env__getnameinfo(...), 'env::getnameinfo'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32, i32) -> ()', hostFunc__env__invoke_viiiiii(...), 'env::invoke_viiiiii'),
+ makeHostFunc('(i32, i32, i32, f64, i32, i32) -> ()', hostFunc__env__invoke_viidii(...), 'env::invoke_viidii'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__env__getcontext(...), 'env::getcontext'),
+ makeHostFunc('(i32, i32, i32, i32) -> ()', hostFunc__env__makecontext(...), 'env::makecontext'),
+ makeHostFunc('(i32, i32) -> (i32)', hostFunc__env__swapcontext(...), 'env::swapcontext'),
+ makeHostFunc('(i32, i32) -> (i32)', hostFunc__wasi_snapshot_preview1__environ_sizes_get(...), 'wasi_snapshot_preview1::environ_sizes_get'),
+ makeHostFunc('(i32, i32) -> (i32)', hostFunc__wasi_snapshot_preview1__environ_get(...), 'wasi_snapshot_preview1::environ_get'),
+ makeHostFunc('(i32, i32, i32) -> (i32)', hostFunc__env____syscall_fcntl64(...), 'env::__syscall_fcntl64'),
+ makeHostFunc('(i32, i32, i32) -> (i32)', hostFunc__env____syscall_ioctl(...), 'env::__syscall_ioctl'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__wasi_snapshot_preview1__fd_close(...), 'wasi_snapshot_preview1::fd_close'),
+ makeHostFunc('(i32, i32, i32, i32) -> (i32)', hostFunc__wasi_snapshot_preview1__fd_read(...), 'wasi_snapshot_preview1::fd_read'),
+ makeHostFunc('(i32, i32, i32, i32) -> (i32)', hostFunc__wasi_snapshot_preview1__fd_write(...), 'wasi_snapshot_preview1::fd_write'),
+ makeHostFunc('(i32) -> ()', hostFunc__wasi_snapshot_preview1__proc_exit(...), 'wasi_snapshot_preview1::proc_exit'),
+ makeHostFunc('(i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_faccessat(...), 'env::__syscall_faccessat'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__env____syscall_chdir(...), 'env::__syscall_chdir'),
+ makeHostFunc('(i32, i32) -> (i32)', hostFunc__env____syscall_chmod(...), 'env::__syscall_chmod'),
+ makeHostFunc('(i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_fchownat(...), 'env::__syscall_fchownat'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__env____syscall_dup(...), 'env::__syscall_dup'),
+ makeHostFunc('(i32, i32, i32) -> (i32)', hostFunc__env____syscall_dup3(...), 'env::__syscall_dup3'),
+ makeHostFunc('(i32, i32, i32) -> ()', hostFunc__env__emscripten_memcpy_js(...), 'env::emscripten_memcpy_js'),
+ makeHostFunc('() -> (f64)', hostFunc__env__emscripten_date_now(...), 'env::emscripten_date_now'),
+ makeHostFunc('() -> (i32)', hostFunc__env___emscripten_get_now_is_monotonic(...), 'env::_emscripten_get_now_is_monotonic'),
+ makeHostFunc('() -> (f64)', hostFunc__env__emscripten_get_now(...), 'env::emscripten_get_now'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__env____syscall_fdatasync(...), 'env::__syscall_fdatasync'),
+ makeHostFunc('(i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_openat(...), 'env::__syscall_openat'),
+ makeHostFunc('(i32, i32) -> (i32)', hostFunc__env____syscall_fstat64(...), 'env::__syscall_fstat64'),
+ makeHostFunc('(i32, i32) -> (i32)', hostFunc__env____syscall_stat64(...), 'env::__syscall_stat64'),
+ makeHostFunc('(i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_newfstatat(...), 'env::__syscall_newfstatat'),
+ makeHostFunc('(i32, i32) -> (i32)', hostFunc__env____syscall_lstat64(...), 'env::__syscall_lstat64'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__wasi_snapshot_preview1__fd_sync(...), 'wasi_snapshot_preview1::fd_sync'),
+ makeHostFunc('(i32, i32) -> (i32)', hostFunc__env____syscall_getcwd(...), 'env::__syscall_getcwd'),
+ makeHostFunc('(i32) -> ()', hostFunc__env__emscripten_err(...), 'env::emscripten_err'),
+ makeHostFunc('(i32, i32) -> (i32)', hostFunc__wasi_snapshot_preview1__fd_fdstat_get(...), 'wasi_snapshot_preview1::fd_fdstat_get'),
+ makeHostFunc('(i32, i32, i32) -> (i32)', hostFunc__env____syscall_mkdirat(...), 'env::__syscall_mkdirat'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__env____syscall_pipe(...), 'env::__syscall_pipe'),
+ makeHostFunc('(i32, i32, i32) -> (i32)', hostFunc__env____syscall_poll(...), 'env::__syscall_poll'),
+ makeHostFunc('(i32, i32) -> ()', hostFunc__env____call_sighandler(...), 'env::__call_sighandler'),
+ makeHostFunc('(i32, i32, i32) -> (i32)', hostFunc__env____syscall_getdents64(...), 'env::__syscall_getdents64'),
+ makeHostFunc('(i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_readlinkat(...), 'env::__syscall_readlinkat'),
+ makeHostFunc('(i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_renameat(...), 'env::__syscall_renameat'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__env____syscall_rmdir(...), 'env::__syscall_rmdir'),
+ makeHostFunc('(i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall__newselect(...), 'env::__syscall__newselect'),
+ makeHostFunc('(i32, f64) -> (i32)', hostFunc__env___setitimer_js(...), 'env::_setitimer_js'),
+ makeHostFunc('(i32, i32, i32) -> (i32)', hostFunc__env____syscall_statfs64(...), 'env::__syscall_statfs64'),
+ makeHostFunc('(i32, i32) -> (i32)', hostFunc__env____syscall_symlink(...), 'env::__syscall_symlink'),
+ makeHostFunc('() -> (i32)', hostFunc__env__emscripten_get_heap_max(...), 'env::emscripten_get_heap_max'),
+ makeHostFunc('(i32, i32, i32) -> ()', hostFunc__env___tzset_js(...), 'env::_tzset_js'),
+ makeHostFunc('(i32, i32, i32) -> (i32)', hostFunc__env____syscall_unlinkat(...), 'env::__syscall_unlinkat'),
+ makeHostFunc('(i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_utimensat(...), 'env::__syscall_utimensat'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__env__emscripten_resize_heap(...), 'env::emscripten_resize_heap'),
+ makeHostFunc('() -> ()', hostFunc__env___emscripten_throw_longjmp(...), 'env::_emscripten_throw_longjmp'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_accept4(...), 'env::__syscall_accept4'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_bind(...), 'env::__syscall_bind'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_connect(...), 'env::__syscall_connect'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_getpeername(...), 'env::__syscall_getpeername'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_getsockname(...), 'env::__syscall_getsockname'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_getsockopt(...), 'env::__syscall_getsockopt'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_listen(...), 'env::__syscall_listen'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_recvfrom(...), 'env::__syscall_recvfrom'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_sendto(...), 'env::__syscall_sendto'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env____syscall_socket(...), 'env::__syscall_socket'),
+ makeHostFunc('(i32, i32, i32) -> (i32)', hostFunc__env____syscall_ftruncate64(...), 'env::__syscall_ftruncate64'),
+ makeHostFunc('(i32, i32, i32, i32, i32) -> (i32)', hostFunc__wasi_snapshot_preview1__fd_seek(...), 'wasi_snapshot_preview1::fd_seek'),
+ makeHostFunc('(i32) -> (i32)', hostFunc__env___mktime_js(...), 'env::_mktime_js'),
+ makeHostFunc('(i32, i32, i32) -> ()', hostFunc__env___localtime_js(...), 'env::_localtime_js'),
+ makeHostFunc('(i32, i32, i32) -> ()', hostFunc__env___gmtime_js(...), 'env::_gmtime_js'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env___munmap_js(...), 'env::_munmap_js'),
+ makeHostFunc('(i32, i32, i32, i32, i32, i32, i32, i32) -> (i32)', hostFunc__env___mmap_js(...), 'env::_mmap_js'),
+];
+$store = Store::empty();
+$externVals = [];
+foreach ($hostFuncs as $hostFunc) {
+ $store->funcs[] = $hostFunc;
+ $externVals[] = ExternVal::Func(\count($store->funcs) - 1);
+}
+$runtime = Runtime::instantiate($store, $module, $externVals);
+$codePtr = allocateStringOnWasmMemory($runtime, PHP_HELLO_WORLD);
+
+$results = $runtime->invoke("php_wasm_run", [$codePtr]);
+\assert(\count($results) === 1);
+$exitCode = $results[0];
+\assert(\is_int($exitCode));
+
+function dumpMemory(MemInst $mem): void
+{
+ $buf = '';
+ $s = $mem->size();
+ for ($j = 0; $j < $s; $j++) {
+ $c = $mem->loadByte($j);
+ \assert($c !== null);
+ $buf .= \chr($c);
+ if ($j % 1024 === 1023) {
+ fputs(STDOUT, $buf);
+ $buf = "";
+ }
+ }
+ fputs(STDOUT, $buf);
+}
+
+function allocateStringOnWasmMemory(Runtime $runtime, string $str): int
+{
+ // Plus 1 for the null terminator in C.
+ $size = \strlen($str) + 1;
+ $outPtr = wasm_stackAlloc($runtime, $size);
+ copyStringToWasmMemory($runtime, $outPtr, $str);
+ return $outPtr;
+}
+
+function wasm_stackAlloc(Runtime $runtime, int $size): int
+{
+ $results = $runtime->invoke("stackAlloc", [$size]);
+ \assert(\count($results) === 1);
+ $result = $results[0];
+ \assert(\is_int($result));
+ return $result;
+}
+
+function wasm_stackSave(Runtime $runtime): int
+{
+ $results = $runtime->invoke("stackSave", []);
+ \assert(\count($results) === 1);
+ $result = $results[0];
+ \assert(\is_int($result));
+ return $result;
+}
+
+function copyStringToWasmMemory(Runtime $runtime, int $dst, string $src): void
+{
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+ for ($i = 0; $i < \strlen($src); $i++) {
+ $ok = $mem->storeByte($dst + $i, \ord($src[$i]));
+ \assert($ok);
+ }
+ // Terminate the string with a null byte for interoperation with C.
+ $ok = $mem->storeByte($dst + \strlen($src), 0);
+ \assert($ok);
+}
+
+function makeHostFunc(string $typeDef, callable $fn, string $fnName): FuncInst
+{
+ $stringToType = fn (string $s) => match ($s) {
+ 'i32' => ValType::NumType(NumType::I32),
+ 'i64' => ValType::NumType(NumType::I64),
+ 'f32' => ValType::NumType(NumType::F32),
+ 'f64' => ValType::NumType(NumType::F64),
+ default => throw new \RuntimeException('Invalid type: ' . $s),
+ };
+ preg_match('/^\(([^)]*)\) -> \(([^)]*)\)$/', $typeDef, $matches);
+ $paramsDef = $matches[1];
+ $resultsDef = $matches[2];
+ $params = array_map($stringToType, $paramsDef === '' ? [] : explode(', ', $paramsDef));
+ $results = array_map($stringToType, $resultsDef === '' ? [] : explode(', ', $resultsDef));
+ $type = new FuncType(new ResultType($params), new ResultType($results));
+ return FuncInst::Host($type, function ($runtime) use ($fn, $fnName) {
+ // echo "TRACE: $fnName BEGIN\n";
+ $fn($runtime);
+ // echo "TRACE: $fnName END\n";
+ });
+}
+
+function getWasmTableEntry(Runtime $runtime, int $funcPtr): int
+{
+ static $wasmTable = null;
+
+ if ($wasmTable === null) {
+ $wasmTable = $runtime->getExportedTable('__indirect_function_table');
+ \assert($wasmTable !== null);
+ }
+
+ $func = $wasmTable->elem[$funcPtr] ?? null;
+ \assert($func instanceof Refs\RefFunc, "Expected RefFunc, but got " . \get_class($func));
+ return $func->addr;
+}
+
+function convertI32PairToI53Checked(int $lo, int $hi): ?int
+{
+ return $lo + hi * 4294967296;
+}
+
+function syscallGetStr(Runtime $runtime, int $ptr): string
+{
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+ $str = '';
+ for ($i = $ptr; $mem->loadByte($i) !== 0; $i++) {
+ $c = $mem->loadByte($i);
+ \assert($c !== null);
+ $str .= \chr($c);
+ }
+ return $str;
+}
+
+function stringToUTF8(Runtime $runtime, string $s, int $ptr, $len): void
+{
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+ for ($i = 0; $i < $len; $i++) {
+ if ($i < \strlen($s)) {
+ $mem->storeByte($ptr + $i, \ord($s[$i]));
+ } else {
+ $mem->storeByte($ptr + $i, 0);
+ }
+ }
+}
+
+function heap8Write(Runtime $runtime, int $ptr, int $value): void
+{
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+ $mem->storeI32_s8($ptr, $value);
+}
+
+function heap16Write(Runtime $runtime, int $ptr, int $value): void
+{
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+ $mem->storeI32_s16($ptr, $value);
+}
+
+function heap32Write(Runtime $runtime, int $ptr, int $value): void
+{
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+ $mem->storeI32_s32($ptr, $value);
+}
+
+function heapU32Write(Runtime $runtime, int $ptr, int $value): void
+{
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+ $mem->storeI32_s32($ptr, $value);
+}
+
+function heap64Write(Runtime $runtime, int $ptr, int $value): void
+{
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+ $mem->storeI64_s64($ptr, $value);
+}
+
+function syscallDoStat(Runtime $runtime, callable $func, string $path, int $buf): void
+{
+ $stat = $func($path);
+
+ heap32Write($runtime, $buf, $stat->dev);
+ heap32Write($runtime, $buf + 4, $stat->mode);
+ heapU32Write($runtime, $buf + 8, $stat->nlink);
+ heap32Write($runtime, $buf + 12, $stat->uid);
+ heap32Write($runtime, $buf + 16, $stat->gid);
+ heap32Write($runtime, $buf + 20, $stat->rdev);
+ heap64Write($runtime, $buf + 24, $stat->size);
+ heap32Write($runtime, $buf + 32, 4096);
+ heap32Write($runtime, $buf + 36, $stat->blocks);
+ $atime = $stat->atime;
+ heap64Write($runtime, $buf + 40, $atime);
+ heapU32Write($runtime, $buf + 48, ($atime % 1000) * 1000);
+ $mtime = $stat->mtime;
+ heap64Write($runtime, $buf + 56, $mtime);
+ heapU32Write($runtime, $buf + 64, ($mtime % 1000) * 1000);
+ $ctime = $stat->ctime;
+ heap64Write($runtime, $buf + 72, $ctime);
+ heapU32Write($runtime, $buf + 80, ($ctime % 1000) * 1000);
+ heap64Write($runtime, $buf + 88, $stat->ino);
+}
+
+function syscallCalculateAt(Runtime $runtime, int $dirfd, string $path): string
+{
+ if ($path[0] === '/') {
+ return $path;
+ }
+ if ($dirfd === -100) {
+ $dir = getcwd();
+ \assert($dir !== false);
+ } else {
+ throw new \RuntimeException("syscallCalculateAt: not implemented ($dirfd)");
+ }
+ if ($path === '.') {
+ return $dir;
+ } else {
+ return $dir . '/' . $path;
+ }
+}
+
+function fsStat(string $path, bool $dontFollow): object
+{
+ if ($path === 'php://stdin') {
+ return (object)[
+ 'dev' => 0,
+ 'mode' => 0,
+ 'nlink' => 0,
+ 'uid' => 0,
+ 'gid' => 0,
+ 'rdev' => 0,
+ 'size' => 0,
+ 'blocks' => 0,
+ 'ino' => 0,
+ 'atime' => 0,
+ 'mtime' => 0,
+ 'ctime' => 0,
+ ];
+ } else if ($path === 'php://stdout') {
+ return (object)[
+ 'dev' => 0,
+ 'mode' => 0,
+ 'nlink' => 0,
+ 'uid' => 0,
+ 'gid' => 0,
+ 'rdev' => 0,
+ 'size' => 0,
+ 'blocks' => 0,
+ 'ino' => 1,
+ 'atime' => 0,
+ 'mtime' => 0,
+ 'ctime' => 0,
+ ];
+ } else if ($path === 'php://stderr') {
+ return (object)[
+ 'dev' => 0,
+ 'mode' => 0,
+ 'nlink' => 0,
+ 'uid' => 0,
+ 'gid' => 0,
+ 'rdev' => 0,
+ 'size' => 0,
+ 'blocks' => 0,
+ 'ino' => 2,
+ 'atime' => 0,
+ 'mtime' => 0,
+ 'ctime' => 0,
+ ];
+ }
+
+ $phpStat = $dontFollow ? lstat($path) : stat($path);
+ assert($phpStat !== false);
+ return (object)[
+ 'dev' => $phpStat['dev'],
+ 'mode' => $phpStat['mode'],
+ 'nlink' => $phpStat['nlink'],
+ 'uid' => $phpStat['uid'],
+ 'gid' => $phpStat['gid'],
+ 'rdev' => $phpStat['rdev'],
+ 'size' => $phpStat['size'],
+ 'blocks' => $phpStat['blocks'],
+ 'ino' => $phpStat['ino'],
+ 'atime' => $phpStat['atime'] * 1000,
+ 'mtime' => $phpStat['mtime'] * 1000,
+ 'ctime' => $phpStat['ctime'] * 1000,
+ ];
+}
+
+function fsLstat(string $path): object
+{
+ return fsStat($path, true);
+}
+
+final class VFile {
+ public ?array $getdents = null;
+
+ public function __construct(
+ public readonly int $fd,
+ /**
+ * @param resource $fp
+ */
+ public readonly mixed $fp,
+ public readonly int $flags,
+ public readonly string $path,
+ ) {}
+
+ public function seek(int $offset, int $whence): int
+ {
+ if ($whence === 0) {
+ fseek($this->fp, $offset, SEEK_SET);
+ } elseif ($whence === 1) {
+ fseek($this->fp, $offset, SEEK_CUR);
+ } elseif ($whence === 2) {
+ fseek($this->fp, $offset, SEEK_END);
+ } else {
+ throw new \RuntimeException("VFile::seek: invalid whence");
+ }
+ $pos = ftell($this->fp);
+ return $pos === false ? 0 : $pos;
+ }
+
+ public function read(Runtime $runtime, int $len): string
+ {
+ return fread($this->fp, $len);
+ }
+
+ public function close(): void
+ {
+ fclose($this->fp);
+ }
+}
+
+function fsOpen(string $path, int $flags, int $mode): ?int
+{
+ global $fdTable;
+ if (!isset($fdTable)) {
+ $fdTable = [];
+ }
+ $fp = @fopen($path, 'r');
+ if ($fp === false) {
+ return null;
+ }
+ $nextFd = count($fdTable) + 10;
+ $fdTable[$nextFd] = new VFile(
+ $nextFd,
+ $fp,
+ $flags,
+ $path,
+ );
+ return $nextFd;
+}
+
+function fsDup(int $fd): ?int
+{
+ global $fdTable;
+ if (!isset($fdTable)) {
+ return null;
+ }
+ $nextFd = count($fdTable) + 10;
+ if ($fd === 0) {
+ $fp = fopen('php://stdin', 'r');
+ $fdTable[$nextFd] = new VFile(
+ $nextFd,
+ $fp,
+ 0,
+ 'php://stdin',
+ );
+ } else if ($fd === 1) {
+ $fp = fopen('php://stdout', 'w');
+ $fdTable[$nextFd] = new VFile(
+ $nextFd,
+ $fp,
+ 0,
+ 'php://stdout',
+ );
+ } else if ($fd === 2) {
+ $fp = fopen('php://stderr', 'w');
+ $fdTable[$nextFd] = new VFile(
+ $nextFd,
+ $fp,
+ 0,
+ 'php://stderr',
+ );
+ } else {
+ $file = $fdTable[$fd];
+ $fp = $file->fp;
+ $fdTable[$nextFd] = new VFile(
+ $nextFd,
+ $fp,
+ $file->flags,
+ $file->path,
+ );
+ }
+ return $nextFd;
+}
+
+function fsGetVFileFromFd(int $fd): ?VFile
+{
+ global $fdTable;
+ return $fdTable[$fd] ?? null;
+}
+
+function fsGetPathFromFd(int $fd): ?string
+{
+ return fsGetVFileFromFd($fd)?->path;
+}
+
+function fsGetFpFromFd(int $fd): mixed
+{
+ return fsGetVFileFromFd($fd)?->fp;
+}
+
+function fsGetFlagsFromFd(int $fd): ?int
+{
+ return fsGetVFileFromFd($fd)?->flags;
+}
+
+function fsReaddir(string $p): array
+{
+ $dir = opendir($p);
+ $entries = [];
+ while (($entry = readdir($dir)) !== false) {
+ $entries[] = $entry;
+ }
+ closedir($dir);
+ return $entries;
+}
+
+function fsLookupParentPath(string $p): string
+{
+ return realpath($p . '/..');
+}
+
+function fsLookupChild(string $p, string $c): string
+{
+ return realpath($p . '/' . $c);
+}
+
+function alignMemory(int $size, int $alignment): int
+{
+ return (int)ceil($size / $alignment) * $alignment;
+}
+
+function _emscripten_builtin_memalign(Runtime $runtime, int $alignment, int $size): int
+{
+ $results = $runtime->invoke("emscripten_builtin_memalign", [$alignment, $size]);
+ \assert(\count($results) === 1);
+ $result = $results[0];
+ \assert(\is_int($result));
+ return $result;
+}
+
+function zeroMemory(Runtime $runtime, int $ptr, int $len): int
+{
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+ for ($i = 0; $i < $len; $i++) {
+ $mem->storeByte($ptr + $i, 0);
+ }
+ return $ptr;
+}
+
+function mmapAlloc(Runtime $runtime, int $len): int
+{
+ $len = alignMemory($len, 65536);
+ $ptr = _emscripten_builtin_memalign($runtime, 65536, $len);
+ if ($ptr === 0) {
+ return 0;
+ }
+ return zeroMemory($runtime, $ptr, $len);
+}
+
+function fsMmap(Runtime $runtime, int $fd, int $len, int $offset, int $prot, int $flags): array
+{
+ global $fdTable;
+ if (!isset($fdTable[$fd])) {
+ throw new \RuntimeException("fsMmap: invalid fd");
+ }
+ $file = $fdTable[$fd];
+
+ $buf = stream_get_contents($file->fp);
+
+ $ptr = mmapAlloc($runtime, $len);
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+ for ($i = 0; $i < $len; $i++) {
+ $mem->storeByte($ptr + $i, ord($buf[$i]));
+ }
+
+ return [$ptr, 1];
+}
+
+// Type: (i32, i32, i32) -> (i32)
+function hostFunc__env__invoke_iii(Runtime $runtime): void
+{
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env__invoke_iiiii(Runtime $runtime): void
+{
+ $a4 = $runtime->stack->popInt();
+ $a3 = $runtime->stack->popInt();
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->stack->pushValue($a3);
+ $runtime->stack->pushValue($a4);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32) -> ()
+function hostFunc__env__invoke_v(Runtime $runtime): void
+{
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32, i32, i32) -> (i32)
+function hostFunc__env__invoke_iiii(Runtime $runtime): void
+{
+ $a3 = $runtime->stack->popInt();
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->stack->pushValue($a3);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32) -> (i32)
+function hostFunc__env__invoke_ii(Runtime $runtime): void
+{
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: () -> ()
+function hostFunc__env__abort(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::abort: not implemented');
+}
+
+// Type: (i32) -> ()
+function hostFunc__env__exit(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::exit: not implemented');
+}
+
+// Type: (i32, i32, i32, i32) -> ()
+function hostFunc__env__invoke_viii(Runtime $runtime): void
+{
+ $a3 = $runtime->stack->popInt();
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->stack->pushValue($a3);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32, i32) -> ()
+function hostFunc__env__invoke_vii(Runtime $runtime): void
+{
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32) -> ()
+function hostFunc__env__invoke_vi(Runtime $runtime): void
+{
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__env__invoke_i(Runtime $runtime): void
+{
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env__invoke_iiiiiii(Runtime $runtime): void
+{
+ $a6 = $runtime->stack->popInt();
+ $a5 = $runtime->stack->popInt();
+ $a4 = $runtime->stack->popInt();
+ $a3 = $runtime->stack->popInt();
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->stack->pushValue($a3);
+ $runtime->stack->pushValue($a4);
+ $runtime->stack->pushValue($a5);
+ $runtime->stack->pushValue($a6);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32, i32, i32) -> ()
+function hostFunc__env____assert_fail(Runtime $runtime): void
+{
+ $a3 = $runtime->stack->popInt();
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->stack->pushValue($a3);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32, i32, i32, i32) -> ()
+function hostFunc__env__invoke_viiii(Runtime $runtime): void
+{
+ $a4 = $runtime->stack->popInt();
+ $a3 = $runtime->stack->popInt();
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->stack->pushValue($a3);
+ $runtime->stack->pushValue($a4);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> ()
+function hostFunc__env__invoke_viiiii(Runtime $runtime): void
+{
+ $a5 = $runtime->stack->popInt();
+ $a4 = $runtime->stack->popInt();
+ $a3 = $runtime->stack->popInt();
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->stack->pushValue($a3);
+ $runtime->stack->pushValue($a4);
+ $runtime->stack->pushValue($a5);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env__invoke_iiiiii(Runtime $runtime): void
+{
+ $a5 = $runtime->stack->popInt();
+ $a4 = $runtime->stack->popInt();
+ $a3 = $runtime->stack->popInt();
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->stack->pushValue($a3);
+ $runtime->stack->pushValue($a4);
+ $runtime->stack->pushValue($a5);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32, i32, i32, i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env__invoke_iiiiiiiiii(Runtime $runtime): void
+{
+ $a9 = $runtime->stack->popInt();
+ $a8 = $runtime->stack->popInt();
+ $a7 = $runtime->stack->popInt();
+ $a6 = $runtime->stack->popInt();
+ $a5 = $runtime->stack->popInt();
+ $a4 = $runtime->stack->popInt();
+ $a3 = $runtime->stack->popInt();
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->stack->pushValue($a3);
+ $runtime->stack->pushValue($a4);
+ $runtime->stack->pushValue($a5);
+ $runtime->stack->pushValue($a6);
+ $runtime->stack->pushValue($a7);
+ $runtime->stack->pushValue($a8);
+ $runtime->stack->pushValue($a9);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32, i32, i32) -> (i32)
+function hostFunc__env__strftime(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::strftime: not implemented');
+}
+
+// Type: (i32, i32, i32, i32) -> (i32)
+function hostFunc__env__getaddrinfo(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::getaddrinfo: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env__gethostbyname_r(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::gethostbyname_r: not implemented');
+}
+
+// Type: () -> (i32)
+function hostFunc__env__getdtablesize(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::getdtablesize: not implemented');
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__env__getprotobyname(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::getprotobyname: not implemented');
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__env__getprotobynumber(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::getprotobynumber: not implemented');
+}
+
+// Type: (i32, i32, i32) -> (i32)
+function hostFunc__env__strptime(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::strptime: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env__getnameinfo(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::getnameinfo: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32, i32) -> ()
+function hostFunc__env__invoke_viiiiii(Runtime $runtime): void
+{
+ $a6 = $runtime->stack->popInt();
+ $a5 = $runtime->stack->popInt();
+ $a4 = $runtime->stack->popInt();
+ $a3 = $runtime->stack->popInt();
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->stack->pushValue($a3);
+ $runtime->stack->pushValue($a4);
+ $runtime->stack->pushValue($a5);
+ $runtime->stack->pushValue($a6);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32, i32, i32, f64, i32, i32) -> ()
+function hostFunc__env__invoke_viidii(Runtime $runtime): void
+{
+ $a5 = $runtime->stack->popInt();
+ $a4 = $runtime->stack->popInt();
+ $a3 = $runtime->stack->popFloat();
+ $a2 = $runtime->stack->popInt();
+ $a1 = $runtime->stack->popInt();
+ $index = $runtime->stack->popInt();
+ $sp = wasm_stackSave($runtime);
+ $func = getWasmTableEntry($runtime, $index);
+ $runtime->stack->pushValue($a1);
+ $runtime->stack->pushValue($a2);
+ $runtime->stack->pushValue($a3);
+ $runtime->stack->pushValue($a4);
+ $runtime->stack->pushValue($a5);
+ $runtime->invokeByFuncAddr($func);
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__env__getcontext(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::getcontext: not implemented');
+}
+
+// Type: (i32, i32, i32, i32) -> ()
+function hostFunc__env__makecontext(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::makecontext: not implemented');
+}
+
+// Type: (i32, i32) -> (i32)
+function hostFunc__env__swapcontext(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::swapcontext: not implemented');
+}
+
+// Type: (i32, i32) -> (i32)
+function hostFunc__wasi_snapshot_preview1__environ_sizes_get(Runtime $runtime): void
+{
+ throw new \RuntimeException('wasi_snapshot_preview1::environ_sizes_get: not implemented');
+}
+
+// Type: (i32, i32) -> (i32)
+function hostFunc__wasi_snapshot_preview1__environ_get(Runtime $runtime): void
+{
+ throw new \RuntimeException('wasi_snapshot_preview1::environ_get: not implemented');
+}
+
+// Type: (i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_fcntl64(Runtime $runtime): void
+{
+ $varargs = $runtime->stack->popInt();
+ $cmd = $runtime->stack->popInt();
+ $fd = $runtime->stack->popInt();
+
+ switch ($cmd) {
+ case 0:
+ throw new \RuntimeException("env::__syscall_fcntl64: command $cmd not implemented");
+ case 1:
+ case 2:
+ $runtime->stack->pushValue(0);
+ return;
+ case 3:
+ $runtime->stack->pushValue(fsGetFlagsFromFd($fd));
+ return;
+ case 4:
+ throw new \RuntimeException("env::__syscall_fcntl64: command $cmd not implemented");
+ case 5:
+ throw new \RuntimeException("env::__syscall_fcntl64: command $cmd not implemented");
+ case 6:
+ case 7:
+ $runtime->stack->pushValue(0);
+ return;
+ case 16:
+ case 8:
+ $runtime->stack->pushValue(-28);
+ return;
+ case 9:
+ // setErrno(28);
+ $runtime->stack->pushValue(-1);
+ return;
+ default:
+ $runtime->stack->pushValue(-28);
+ return;
+ }
+}
+
+// Type: (i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_ioctl(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_ioctl: not implemented');
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__wasi_snapshot_preview1__fd_close(Runtime $runtime): void
+{
+ $fd = $runtime->stack->popInt();
+ $file = fsGetVFileFromFd($fd);
+ assert($file !== null);
+ $file->close();
+ $runtime->stack->pushValue(0);
+}
+
+// Type: (i32, i32, i32, i32) -> (i32)
+function hostFunc__wasi_snapshot_preview1__fd_read(Runtime $runtime): void
+{
+ // Output pointer to the number of bytes written.
+ $pnum = $runtime->stack->popInt();
+ // Length of the array of iov structs.
+ $iovcnt = $runtime->stack->popInt();
+ // Pointer to the array of iov structs.
+ $iov = $runtime->stack->popInt();
+ // File descripter.
+ $fd = $runtime->stack->popInt();
+
+ $file = fsGetVFileFromFd($fd);
+ assert($file !== null);
+
+ // struct iov {
+ // ptr: u32, pointer to the data
+ // len: u32
+ // }
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+
+ $nRead = 0;
+ for ($i = 0; $i < $iovcnt; $i++) {
+ $ptr = $mem->loadI32_s32($iov + $i * 8);
+ \assert($ptr !== null);
+ $len = $mem->loadI32_s32($iov + $i * 8 + 4);
+ \assert($len !== null);
+ $buf = $file->read($runtime, $len);
+ if ($buf === false) {
+ $nRead = -1;
+ break;
+ }
+ $curr = strlen($buf);
+ if ($curr <= 0) {
+ $nRead = -1;
+ break;
+ }
+ // echo "fd_read(fd=$fd, iov=$iov, iovcnt=$iovcnt, pnum=$pnum) = { p=$ptr, l=$len }\n";
+ for ($k = 0; $k < $curr; $k++) {
+ $mem->storeByte($ptr + $k, ord($buf[$k]));
+ // echo " [$k] = ord($buf[$k])\n";
+ }
+ $nRead += $curr;
+ if ($curr < $len) {
+ break;
+ }
+ }
+
+ $mem->storeI32_s32($pnum, $nRead);
+
+ $runtime->stack->pushValue(0);
+}
+
+// Type: (i32, i32, i32, i32) -> (i32)
+function hostFunc__wasi_snapshot_preview1__fd_write(Runtime $runtime): void
+{
+ // Output pointer to the number of bytes written.
+ $pnum = $runtime->stack->popInt();
+ // Length of the array of iov structs.
+ $iovcnt = $runtime->stack->popInt();
+ // Pointer to the array of iov structs.
+ $iov = $runtime->stack->popInt();
+ // File descripter.
+ $fd = $runtime->stack->popInt();
+
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+
+ // struct iov {
+ // ptr: u32, pointer to the data
+ // len: u32
+ // }
+ $nWritten = 0;
+ for ($i = 0; $i < $iovcnt; $i++) {
+ $ptr = $mem->loadI32_s32($iov + $i * 8);
+ \assert($ptr !== null);
+ $len = $mem->loadI32_s32($iov + $i * 8 + 4);
+ // echo "fd_write($iovcnt, $iov) [$i] = { p=$ptr, l=$len };\n";
+ \assert($len !== null);
+ $buf = '';
+ for ($j = 0; $j < $len; $j++) {
+ $c = $mem->loadByte($ptr + $j);
+ \assert($c !== null);
+ $buf .= \chr($c);
+ }
+ if ($fd === 1) {
+ fputs(STDOUT, $buf);
+ } else {
+ fputs(STDERR, $buf);
+ }
+ $nWritten += $len;
+ }
+ $mem->storeI32_s32($pnum, $nWritten);
+
+ $runtime->stack->pushValue(0);
+}
+
+// Type: (i32) -> ()
+function hostFunc__wasi_snapshot_preview1__proc_exit(Runtime $runtime): void
+{
+ throw new \RuntimeException('wasi_snapshot_preview1::proc_exit: not implemented');
+}
+
+// Type: (i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_faccessat(Runtime $runtime): void
+{
+ $flags = $runtime->stack->popInt();
+ $amode = $runtime->stack->popInt();
+ $path = $runtime->stack->popInt();
+ $dirfd = $runtime->stack->popInt();
+
+ $path = syscallGetStr($runtime, $path);
+ $path = syscallCalculateAt($runtime, $dirfd, $path);
+
+ // Always allow accesses.
+ $runtime->stack->pushValue(0);
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__env____syscall_chdir(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_chdir: not implemented');
+}
+
+// Type: (i32, i32) -> (i32)
+function hostFunc__env____syscall_chmod(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_chmod: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_fchownat(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_fchownat: not implemented');
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__env____syscall_dup(Runtime $runtime): void
+{
+ $oldFd = $runtime->stack->popInt();
+ $newFd = fsDup($oldFd);
+ $runtime->stack->pushValue($newFd);
+}
+
+// Type: (i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_dup3(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_dup3: not implemented');
+}
+
+// Type: (i32, i32, i32) -> ()
+function hostFunc__env__emscripten_memcpy_js(Runtime $runtime): void
+{
+ $num = $runtime->stack->popInt();
+ $src = $runtime->stack->popInt();
+ $dest = $runtime->stack->popInt();
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+ for ($i = 0; $i < $num; $i++) {
+ $byte = $mem->loadByte($src + $i);
+ \assert($byte !== null);
+ $mem->storeByte($dest + $i, $byte);
+ }
+}
+
+// Type: () -> (f64)
+function hostFunc__env__emscripten_date_now(Runtime $runtime): void
+{
+ $t = round(microtime(true) * 1000);
+ $runtime->stack->pushValue($t);
+}
+
+// Type: () -> (i32)
+function hostFunc__env___emscripten_get_now_is_monotonic(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::_emscripten_get_now_is_monotonic: not implemented');
+}
+
+// Type: () -> (f64)
+function hostFunc__env__emscripten_get_now(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::emscripten_get_now: not implemented');
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__env____syscall_fdatasync(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_fdatasync: not implemented');
+}
+
+// Type: (i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_openat(Runtime $runtime): void
+{
+ $varargs = $runtime->stack->popInt();
+ $flags = $runtime->stack->popInt();
+ $path = $runtime->stack->popInt();
+ $dirfd = $runtime->stack->popInt();
+
+ $path = syscallGetStr($runtime, $path);
+ $path = syscallCalculateAt($runtime, $dirfd, $path);
+
+ $mem = $runtime->getExportedMemory('memory');
+ \assert($mem !== null);
+
+ if ($varargs !== 0) {
+ $mode = $mem->loadI32_s32($varargs);
+ $varargs += 4;
+ } else {
+ $mode = 0;
+ }
+
+ $fd = fsOpen($path, $flags, $mode);
+ if ($fd !== null) {
+ $runtime->stack->pushValue($fd);
+ } else {
+ // no such file
+ $runtime->stack->pushValue(-44);
+ }
+}
+
+// Type: (i32, i32) -> (i32)
+function hostFunc__env____syscall_fstat64(Runtime $runtime): void
+{
+ $buf = $runtime->stack->popInt();
+ $fd = $runtime->stack->popInt();
+ $path = fsGetPathFromFd($fd);
+ assert($path !== null);
+ syscallDoStat($runtime, fn ($path) => fsStat($path, false), $path, $buf);
+ $runtime->stack->pushValue(0);
+}
+
+// Type: (i32, i32) -> (i32)
+function hostFunc__env____syscall_stat64(Runtime $runtime): void
+{
+ $buf = $runtime->stack->popInt();
+ $path = $runtime->stack->popInt();
+ $path = syscallGetStr($runtime, $path);
+ syscallDoStat($runtime, fn ($path) => fsStat($path, false), $path, $buf);
+ $runtime->stack->pushValue(0);
+}
+
+// Type: (i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_newfstatat(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_newfstatat: not implemented');
+}
+
+// Type: (i32, i32) -> (i32)
+function hostFunc__env____syscall_lstat64(Runtime $runtime): void
+{
+ $buf = $runtime->stack->popInt();
+ $path = $runtime->stack->popInt();
+ $path = syscallGetStr($runtime, $path);
+ syscallDoStat($runtime, fsLstat(...), $path, $buf);
+ $runtime->stack->pushValue(0);
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__wasi_snapshot_preview1__fd_sync(Runtime $runtime): void
+{
+ throw new \RuntimeException('wasi_snapshot_preview1::fd_sync: not implemented');
+}
+
+// Type: (i32, i32) -> (i32)
+function hostFunc__env____syscall_getcwd(Runtime $runtime): void
+{
+ $size = $runtime->stack->popInt();
+ $bufPtr = $runtime->stack->popInt();
+ if ($size === 0) {
+ $runtime->stack->pushValue(-28);
+ return;
+ }
+ $cwd = getcwd();
+ \assert($cwd !== false);
+ $cwdLen = \strlen($cwd) + 1;
+ if ($size < $cwdLen) {
+ $runtime->stack->pushValue(-68);
+ return;
+ }
+ copyStringToWasmMemory($runtime, $bufPtr, $cwd);
+ $runtime->stack->pushValue($cwdLen);
+}
+
+// Type: (i32) -> ()
+function hostFunc__env__emscripten_err(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::emscripten_err: not implemented');
+}
+
+// Type: (i32, i32) -> (i32)
+function hostFunc__wasi_snapshot_preview1__fd_fdstat_get(Runtime $runtime): void
+{
+ throw new \RuntimeException('wasi_snapshot_preview1::fd_fdstat_get: not implemented');
+}
+
+// Type: (i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_mkdirat(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_mkdirat: not implemented');
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__env____syscall_pipe(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_pipe: not implemented');
+}
+
+// Type: (i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_poll(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_poll: not implemented');
+}
+
+// Type: (i32, i32) -> ()
+function hostFunc__env____call_sighandler(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__call_sighandler: not implemented');
+}
+
+// Type: (i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_getdents64(Runtime $runtime): void
+{
+ $count = $runtime->stack->popInt();
+ $dirp = $runtime->stack->popInt();
+ $fd = $runtime->stack->popInt();
+
+ $file = fsGetVFileFromFd($fd);
+
+ if ($file->getdents === null) {
+ $file->getdents = fsReaddir($file->path);
+ }
+
+ $struct_size = 280;
+ $pos = 0;
+ $off = $file->seek(0, 1);
+
+ $idx = (int)floor($off / $struct_size);
+
+ while ($idx < count($file->getdents) && $pos + $struct_size <= $count) {
+ $name = $file->getdents[$idx];
+ if ($name === '.') {
+ $id = fsStat($file->path, true)->ino;
+ $type = 4;
+ } else if ($name === '..') {
+ $lookup = fsLookupParentPath($file->path);
+ $id = fsStat($lookup, true)->ino;
+ $type = 4;
+ } else {
+ $child = fsLookupChild($file->path, $name);
+ $id = fsStat($child, true)->ino;
+ $type = is_dir($child) ? 4 : (is_file($child) ? 8 : 10);
+ }
+ heap64Write($runtime, $dirp + $pos, $id);
+ heap64Write($runtime, $dirp + $pos + 8, ($idx + 1) * $struct_size);
+ heap16Write($runtime, $dirp + $pos + 16, $struct_size);
+ heap8Write($runtime, $dirp + $pos + 18, $type);
+ stringToUTF8($runtime, $name, $dirp + $pos + 19, 256);
+ $pos += $struct_size;
+ $idx += 1;
+ }
+ $file->seek($idx * $struct_size, 0);
+
+ $runtime->stack->pushValue($pos);
+}
+
+// Type: (i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_readlinkat(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_readlinkat: not implemented');
+}
+
+// Type: (i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_renameat(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_renameat: not implemented');
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__env____syscall_rmdir(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_rmdir: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall__newselect(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall__newselect: not implemented');
+}
+
+// Type: (i32, f64) -> (i32)
+function hostFunc__env___setitimer_js(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::_setitimer_js: not implemented');
+}
+
+// Type: (i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_statfs64(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_statfs64: not implemented');
+}
+
+// Type: (i32, i32) -> (i32)
+function hostFunc__env____syscall_symlink(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_symlink: not implemented');
+}
+
+// Type: () -> (i32)
+function hostFunc__env__emscripten_get_heap_max(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::emscripten_get_heap_max: not implemented');
+}
+
+// Type: (i32, i32, i32) -> ()
+function hostFunc__env___tzset_js(Runtime $runtime): void
+{
+ $tzname = $runtime->stack->popInt();
+ $daylight = $runtime->stack->popInt();
+ $timezone = $runtime->stack->popInt();
+ // Do nothing ;)
+}
+
+// Type: (i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_unlinkat(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_unlinkat: not implemented');
+}
+
+// Type: (i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_utimensat(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_utimensat: not implemented');
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__env__emscripten_resize_heap(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::emscripten_resize_heap: not implemented');
+}
+
+// Type: () -> ()
+function hostFunc__env___emscripten_throw_longjmp(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::_emscripten_throw_longjmp: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_accept4(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_accept4: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_bind(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_bind: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_connect(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_connect: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_getpeername(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_getpeername: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_getsockname(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_getsockname: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_getsockopt(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_getsockopt: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_listen(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_listen: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_recvfrom(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_recvfrom: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_sendto(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_sendto: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_socket(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_socket: not implemented');
+}
+
+// Type: (i32, i32, i32) -> (i32)
+function hostFunc__env____syscall_ftruncate64(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::__syscall_ftruncate64: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__wasi_snapshot_preview1__fd_seek(Runtime $runtime): void
+{
+ $newOffset = $runtime->stack->popInt();
+ $whence = $runtime->stack->popInt();
+ $offset_high = $runtime->stack->popInt();
+ $offset_low = $runtime->stack->popInt();
+ $fd = $runtime->stack->popInt();
+
+ $offset = $offset_low + $offset_high * 4294967296;
+ $file = fsGetVFileFromFd($fd);
+ $pos = $file->seek($offset, $whence);
+ heap64Write($runtime, $newOffset, $pos);
+
+ $runtime->stack->pushValue(0);
+}
+
+// Type: (i32) -> (i32)
+function hostFunc__env___mktime_js(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::_mktime_js: not implemented');
+}
+
+// Type: (i32, i32, i32) -> ()
+function hostFunc__env___localtime_js(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::_localtime_js: not implemented');
+}
+
+// Type: (i32, i32, i32) -> ()
+function hostFunc__env___gmtime_js(Runtime $runtime): void
+{
+ throw new \RuntimeException('env::_gmtime_js: not implemented');
+}
+
+// Type: (i32, i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env___munmap_js(Runtime $runtime): void
+{
+ // Do nothing.
+ $_7 = $runtime->stack->popInt();
+ $_6 = $runtime->stack->popInt();
+ $_5 = $runtime->stack->popInt();
+ $_4 = $runtime->stack->popInt();
+ $_3 = $runtime->stack->popInt();
+ $_2 = $runtime->stack->popInt();
+ $_1 = $runtime->stack->popInt();
+
+ $runtime->stack->pushValue(0);
+}
+
+// Type: (i32, i32, i32, i32, i32, i32, i32, i32) -> (i32)
+function hostFunc__env___mmap_js(Runtime $runtime): void
+{
+ $addr = $runtime->stack->popInt();
+ $allocated = $runtime->stack->popInt();
+ $offset_high = $runtime->stack->popInt();
+ $offset_low = $runtime->stack->popInt();
+ $fd = $runtime->stack->popInt();
+ $flags = $runtime->stack->popInt();
+ $prot = $runtime->stack->popInt();
+ $len = $runtime->stack->popInt();
+
+ $offset = $offset_low + $offset_high * 4294967296;
+
+ [$resultPtr, $resultAllocated] = fsMmap($runtime, $fd, $len, $offset, $prot, $flags);
+ heap32Write($runtime, $allocated, $resultAllocated);
+ heapU32Write($runtime, $addr, $resultPtr);
+
+ $runtime->stack->pushValue(0);
+}
generated by cgit v1.2.3-70-g09d2 (git 2.46.0) at 2025-11-30 23:26:46 +0000