🚀 go-pugleaf

A warning, though I suspect its been discovered many times.
The header file <sys/stat.h> that we got with Aegis SR9 CC is
wrong.  stat(3)  (BSD4.2 version) returns a few more words
of data than the header file leaves room for.  Nasty.  The
correct version seems to be (as in the CLIB manual, page 3-72 BSD4.2):

/*  stat.h, /usr/include, 06/19/85
    stat structure and related flags

    Changes:
        06/19/85 jrw  original coding.  */


/*  stat buffer -- returned from stat(2):  */

struct  stat {
        dev_t   st_dev;         /* device id */
        ino_t   st_ino;         /* inode number */
        ushort  st_mode;        /* mode (see below) */
        short   st_nlink;       /* # links */
        ushort  st_uid;         /* uid of owner */
        ushort  st_gid;         /* gid of owner */
        dev_t   st_rdev;        /* dev id for b/c spec files */
        off_t   st_size;        /* file size, in bytes */
        time_t  st_atime;       /* data access time */
        time_t  st_mtime;       /* data mod time */
        time_t  st_ctime;       /* attribute mod time */
};


/*  st_mode word definition:  */

#define S_IFMT  0170000         /* format mask: */
#define         S_IFDIR 0040000     /* directory */
#define         S_IFCHR 0020000     /* character special */
#define         S_IFBLK 0060000     /* block special */
#define         S_IFREG 0100000     /* regular */
#define         S_IFIFO 0010000     /* pipe (fifo) */

#define S_ISUID  04000          /* set user id on execution */
#define S_ISGID  02000          /* set group id on execution */
#define S_ISVTX  01000          /* save pure text (sticky bit; unimplemented) */
#define S_IREAD  00400          /* read  (owner) */
#define S_IWRITE 00200          /* write  (owner) */
#define S_IEXEC  00100          /* execute (file) | search (dir) (owner) */