|
|
@@ -13,24 +13,46 @@
|
|
|
**********************************************************************}
|
|
|
|
|
|
Stat = packed record // No unix typing because of differences
|
|
|
- st_dev : culonglong;
|
|
|
- __pad0 : array[0..3] of cuchar;
|
|
|
- __st_ino : culong;
|
|
|
- st_mode : cuint;
|
|
|
- st_nlink : cuint;
|
|
|
- st_uid : culong;
|
|
|
- st_gid : culong;
|
|
|
- st_rdev : culonglong;
|
|
|
- __pad3 : array[0..3] of cuchar;
|
|
|
- st_size : culonglong;
|
|
|
- st_blksize: culong;
|
|
|
- st_blocks : culonglong;
|
|
|
- st_atime : culong;
|
|
|
- st_atime_nsec : culong;
|
|
|
- st_mtime : culong;
|
|
|
- st_mtime_nsec : culong;
|
|
|
- st_ctime : culong;
|
|
|
- st_ctime_nsec : culong;
|
|
|
- st_ino : culonglong;
|
|
|
+ case byte of
|
|
|
+ 0:
|
|
|
+ (dev : culonglong;
|
|
|
+ __pad0 : array[0..3] of cuchar;
|
|
|
+ __st_ino : culong;
|
|
|
+ mode : cuint;
|
|
|
+ nlink : cuint;
|
|
|
+ uid : culong;
|
|
|
+ gid : culong;
|
|
|
+ rdev : culonglong;
|
|
|
+ __pad3 : array[0..3] of cuchar;
|
|
|
+ size : culonglong;
|
|
|
+ blksize: culong;
|
|
|
+ blocks : culonglong;
|
|
|
+ atime : culong;
|
|
|
+ atime_nsec : culong;
|
|
|
+ mtime : culong;
|
|
|
+ mtime_nsec : culong;
|
|
|
+ ctime : culong;
|
|
|
+ ctime_nsec : culong;
|
|
|
+ ino : culonglong;)
|
|
|
+ 1:
|
|
|
+ (st_dev : culonglong;
|
|
|
+ __pad0_ : array[0..3] of cuchar;
|
|
|
+ __st_ino_ : culong;
|
|
|
+ st_mode : cuint;
|
|
|
+ st_nlink : cuint;
|
|
|
+ st_uid : culong;
|
|
|
+ st_gid : culong;
|
|
|
+ st_rdev : culonglong;
|
|
|
+ __pad3_ : array[0..3] of cuchar;
|
|
|
+ st_size : culonglong;
|
|
|
+ st_blksize: culong;
|
|
|
+ st_blocks : culonglong;
|
|
|
+ st_atime : culong;
|
|
|
+ st_atime_nsec : culong;
|
|
|
+ st_mtime : culong;
|
|
|
+ st_mtime_nsec : culong;
|
|
|
+ st_ctime : culong;
|
|
|
+ st_ctime_nsec : culong;
|
|
|
+ st_ino : culonglong);
|
|
|
end;
|
|
|
|
daniel