| /* Minimal 'stat' emulation: tells directories from files and |
| gives length and mtime. |
| Public domain by Guido van Rossum, CWI, Amsterdam (July 1987). |
| Updated to give more info, August 1994. |
| */ |
| |
| #include "macstat.h" |
| #include "macdefs.h" |
| |
| /* Bits in ioFlAttrib: */ |
| #define LOCKBIT (1<<0) /* File locked */ |
| #define DIRBIT (1<<4) /* It's a directory */ |
| |
| int |
| macstat(path, buf) |
| char *path; |
| struct macstat *buf; |
| { |
| union { |
| DirInfo d; |
| FileParam f; |
| HFileInfo hf; |
| } pb; |
| short err; |
| |
| pb.d.ioNamePtr = (unsigned char *)Pstring(path); |
| pb.d.ioVRefNum = 0; |
| pb.d.ioFDirIndex = 0; |
| pb.d.ioDrDirID = 0; |
| pb.f.ioFVersNum = 0; /* Fix found by Timo! See Tech Note 102 */ |
| if (hfsrunning()) |
| err = PBGetCatInfoSync((CInfoPBPtr)&pb); |
| else |
| err = PBGetFInfoSync((ParmBlkPtr)&pb); |
| if (err != noErr) { |
| errno = ENOENT; |
| return -1; |
| } |
| if (pb.d.ioFlAttrib & LOCKBIT) |
| buf->st_mode = 0444; |
| else |
| buf->st_mode = 0666; |
| if (pb.d.ioFlAttrib & DIRBIT) { |
| buf->st_mode |= 0111 | S_IFDIR; |
| buf->st_size = pb.d.ioDrNmFls; |
| buf->st_rsize = 0; |
| } |
| else { |
| buf->st_mode |= S_IFREG; |
| if (pb.f.ioFlFndrInfo.fdType == 'APPL') |
| buf->st_mode |= 0111; |
| } |
| buf->st_ino = pb.hf.ioDirID; |
| buf->st_nlink = 1; |
| buf->st_uid = 1; |
| buf->st_gid = 1; |
| buf->st_size = (buf->st_mode & S_IFDIR) ? 0 : pb.f.ioFlLgLen; |
| buf->st_mtime = buf->st_atime = pb.f.ioFlMdDat; |
| buf->st_ctime = pb.f.ioFlCrDat; |
| buf->st_rsize = (buf->st_mode & S_IFDIR) ? 0 : pb.f.ioFlRLgLen; |
| *(unsigned long *)buf->st_type = |
| (buf->st_mode & S_IFDIR) ? 0 : pb.f.ioFlFndrInfo.fdType; |
| *(unsigned long *)buf->st_creator = |
| (buf->st_mode & S_IFDIR) ? 0 : pb.f.ioFlFndrInfo.fdCreator; |
| return 0; |
| } |