os2: initial implementation for Darwin&BSDs, process API is only thing incomplete

2026-08-06 23:58:50 +00:00 · 2024-08-14 01:44:37 +02:00
parent ff0ca0bd53
commit a4d459f651
23 changed files with 1535 additions and 17 deletions
@@ -0,0 +1,113 @@
+//+private
+//+build darwin, netbsd, freebsd, openbsd
+package os2
+
+import "base:runtime"
+import "core:path/filepath"
+import "core:sys/posix"
+import "core:time"
+
+internal_stat :: proc(stat: posix.stat_t, fullpath: string) -> (fi: File_Info) {
+	fi.fullpath = fullpath
+	fi.name = filepath.base(fi.fullpath)
+
+	fi.inode = u64(stat.st_ino)
+	fi.size = i64(stat.st_size)
+
+	fi.mode = int(transmute(posix._mode_t)(stat.st_mode - posix._S_IFMT))
+
+	fi.type = .Undetermined
+	switch {
+	case posix.S_ISBLK(stat.st_mode):
+		fi.type = .Block_Device
+	case posix.S_ISCHR(stat.st_mode):
+		fi.type = .Character_Device
+	case posix.S_ISDIR(stat.st_mode):
+		fi.type = .Directory
+	case posix.S_ISFIFO(stat.st_mode):
+		fi.type = .Named_Pipe
+	case posix.S_ISLNK(stat.st_mode):
+		fi.type = .Symlink
+	case posix.S_ISREG(stat.st_mode):
+		fi.type = .Regular
+	case posix.S_ISSOCK(stat.st_mode):
+		fi.type = .Socket
+	}
+
+	fi.creation_time = timespec_time(stat.st_birthtimespec)
+	fi.modification_time = timespec_time(stat.st_mtim)
+	fi.access_time = timespec_time(stat.st_atim)
+
+	timespec_time :: proc(t: posix.timespec) -> time.Time {
+		return time.Time{_nsec = i64(t.tv_sec) * 1e9 + i64(t.tv_nsec)}
+	}
+
+	return
+}
+
+_fstat :: proc(f: ^File, allocator: runtime.Allocator) -> (fi: File_Info, err: Error) {
+	if f == nil || f.impl == nil {
+		err = .Invalid_File
+		return
+	}
+
+	impl := (^File_Impl)(f.impl)
+
+	stat: posix.stat_t
+	if posix.fstat(impl.fd, &stat) != .OK {
+		err = _get_platform_error()
+		return
+	}
+
+	fullpath := clone_string(impl.name, allocator) or_return
+	return internal_stat(stat, fullpath), nil
+}
+
+// NOTE: _stat and _lstat are using _fstat to avoid a race condition when populating fullpath
+_stat :: proc(name: string, allocator: runtime.Allocator) -> (fi: File_Info, err: Error) {
+	if name == "" {
+		err = .Invalid_Path
+		return
+	}
+
+	assert(!is_temp(allocator))
+	TEMP_ALLOCATOR_GUARD()
+	cname := temp_cstring(name) or_return
+
+	rcname := posix.realpath(cname)
+
+	stat: posix.stat_t
+	if posix.stat(rcname, &stat) != .OK {
+		err = _get_platform_error()
+		return
+	}
+
+	fullpath := clone_string(string(rcname), allocator) or_return
+	return internal_stat(stat, fullpath), nil
+}
+
+_lstat :: proc(name: string, allocator: runtime.Allocator) -> (fi: File_Info, err: Error) {
+	if name == "" {
+		err = .Invalid_Path
+		return
+	}
+
+	assert(!is_temp(allocator))
+	TEMP_ALLOCATOR_GUARD()
+	cname := temp_cstring(name) or_return
+
+	rcname := posix.realpath(cname)
+
+	stat: posix.stat_t
+	if posix.lstat(rcname, &stat) != .OK {
+		err = _get_platform_error()
+		return
+	}
+
+	fullpath := clone_string(string(rcname), allocator) or_return
+	return internal_stat(stat, fullpath), nil
+}
+
+_same_file :: proc(fi1, fi2: File_Info) -> bool {
+	return fi1.fullpath == fi2.fullpath
+}