Hojun-Cho/ww
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

lib/os: add symlink wrapper (ref/hare/os/os.ha:106)

Browse Source
This commit is contained in:
Hojun-Cho
2026-08-08 14:35:25 +09:00
parent 23db361612
commit 3e56ae9fe1
1 changed files with 18 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
lib/os/os.ww
View File

@@ -46,6 +46,7 @@ type nr = enum i64 {
MKDIR = 83, MKDIR = 83,
RMDIR = 84, RMDIR = 84,
UNLINK = 87, UNLINK = 87,
SYMLINK = 88,
SETPGID = 109, SETPGID = 109,
GETDENTS64 = 217, GETDENTS64 = 217,
NEWFSTATAT = 262, NEWFSTATAT = 262,
@@ -362,6 +363,23 @@ export fn rename(oldpath: str, newpath: str) i32 = {
return syscall2(nr.RENAME, p: i64, (&pathbuf2[0]): i64): i32; return syscall2(nr.RENAME, p: i64, (&pathbuf2[0]): i64): i32;
}; };
// symlink — symlink(2). Mirrors Hare's os::symlink
// (ref/hare/os/os.ha:106, `symlink(target, path)`), but returns the
// raw i32 errno like sibling remove/mkdir/rename rather than Hare's
// (void | fs::error): ww's os is the flat syscall floor. `target` is
// stored verbatim (it may be relative and is not resolved); `path`
// lands in the second [[pathbuf2]] slot since kpath's single
// [[pathbuf]] can't hold both paths at once.
export fn symlink(target: str, path: str) i32 = {
let p: *u8 = kpath(target);
if (p == nil: *u8) { return -36i32; };
if (path.len + 1 >= PATH_MAX) { return -36i32; };
let i: i32 = 0;
for (i < path.len) { pathbuf2[i] = path[i]; i += 1; };
pathbuf2[path.len] = 0u8;
return syscall2(nr.SYMLINK, p: i64, (&pathbuf2[0]): i64): i32;
};
// mkdirs — recursive mkdir. Creates `path` and any non-existent // mkdirs — recursive mkdir. Creates `path` and any non-existent
// parent directories with the given mode. EEXIST is silently // parent directories with the given mode. EEXIST is silently
// accepted (matches Hare's `errors::exists` skip in os::mkdirs); // accepted (matches Hare's `errors::exists` skip in os::mkdirs);