X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=psi.d%2Fstat.psi;h=68f67814df9d0f954874e148d8bec5c013fd7c7f;hp=e5d8eba135b6e22a4052ca4e90c550332db44f84;hb=c0873cbbe9e5a83305adbc2bbd94aede5437f33d;hpb=6bdeeb7b332a272617814a4358d51bb07c872407 diff --git a/psi.d/stat.psi b/psi.d/stat.psi index e5d8eba..68f6781 100644 --- a/psi.d/stat.psi +++ b/psi.d/stat.psi @@ -1,8 +1,9 @@ -extern int stat(char *path, struct stat *buf); +#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, struct stat); - return to_int(stat); + let buf = calloc(1, sizeof(struct stat)); + return stat(path, buf) as to_int(stat); set $buf = to_array(*buf, to_int(st_dev), to_int(st_ino), @@ -15,7 +16,7 @@ function psi\stat(string $path, array &$buf = NULL) : int { to_array(st_atim, to_int(tv_sec), to_int(tv_nsec) - ), + ), to_array(st_atimespec, to_int(tv_sec), to_int(tv_nsec) @@ -23,7 +24,7 @@ function psi\stat(string $path, array &$buf = NULL) : int { to_array(st_mtim, to_int(tv_sec), to_int(tv_nsec) - ), + ), to_array(st_mtimespec, to_int(tv_sec), to_int(tv_nsec) @@ -31,11 +32,15 @@ function psi\stat(string $path, array &$buf = NULL) : int { to_array(st_ctim, to_int(tv_sec), to_int(tv_nsec) - ), + ), to_array(st_ctimespec, to_int(tv_sec), to_int(tv_nsec) ), + to_array(st_birthtim, + to_int(tv_sec), + to_int(tv_nsec) + ), to_array(st_birthtimespec, to_int(tv_sec), to_int(tv_nsec)