X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=psi.d%2Fstat.psi;h=3d0e62330efdbd30e0c93c04703e333e7dcde847;hp=dc89119624d37cc474ee60b3549d440ee74f1472;hb=46a52f66821e6fb4d0fbce884a69e8e57244c008;hpb=756a2c4350162a9a7f930bdc0ec7718ff13ea48c diff --git a/psi.d/stat.psi b/psi.d/stat.psi index dc89119..3d0e623 100644 --- a/psi.d/stat.psi +++ b/psi.d/stat.psi @@ -1,8 +1,9 @@ +#include // extern int stat(char *path, struct stat *buf); function psi\stat(string $path, array &$buf = NULL) : int { let path = strval($path); let buf = calloc(1, psi\SIZEOF_STRUCT_STAT); - return to_int(stat); + return stat(path, buf) as to_int(stat); set $buf = to_array(*buf, to_int(st_dev), to_int(st_ino), @@ -20,7 +21,6 @@ function psi\stat(string $path, array &$buf = NULL) : int { to_int(tv_sec), to_int(tv_nsec) ), - to_int(st_atime), to_array(st_mtim, to_int(tv_sec), to_int(tv_nsec) @@ -29,7 +29,6 @@ function psi\stat(string $path, array &$buf = NULL) : int { to_int(tv_sec), to_int(tv_nsec) ), - to_int(st_mtime), to_array(st_ctim, to_int(tv_sec), to_int(tv_nsec) @@ -38,12 +37,14 @@ function psi\stat(string $path, array &$buf = NULL) : int { to_int(tv_sec), to_int(tv_nsec) ), - to_int(st_ctime), + to_array(st_birthtim, + to_int(tv_sec), + to_int(tv_nsec) + ), to_array(st_birthtimespec, to_int(tv_sec), to_int(tv_nsec) ), - to_int(st_birthtime), to_int(st_blksize), to_int(st_blocks), to_int(st_flags),