pSOSystem System Calls - Read

pHILE+ System Calls stat_f
Usage
Hex Mnemonic Description
0x207E ERPC All other RPC errors.
stat_f() can be used to determine both the current device and the current
directory of local volumes. Thus you can use stat_f() to return to a device and
directory after leaving them, or to construct absolute path names starting at the
current directory. Only the directory file number is available, not the full directory
path. To obtain the full directory path, see get_fn().
/* Obtaining both the current device and the current directory */
ULONG rc; /* System call return code */
struct stat current_stat; /* stat_f() of "." */
ULONG device; /* Current device */
ULONG directory; /* Current directory */
if((rc = stat_f(".", &current_stat)) != 0)
/* Error processing */
device = current_stat.st_dev;
directory = current_stat.st_dev;
/* Returning to the above device and directory at a later time. */
char directory[29]; /* To change back */
sprintf(directory, "0x%04x.0x%02x.0x%02x.0x%08x/.",
device >> 16, /* Major device number */
(device >> 8) & 0xffU, /* Minor device number */
device & 0xffU, /* Partition number */
directory); /* File number to start at */
if((rc = change_dir(directory)) != 0)
/* Error processing */
/* Constructing absolute path name starting at the saved directory */
#define REL_PATH_LEN 8 /* Length of path below saved
* directory */
char path[28 + PATH_LEN]; /* Absolute path of file.txt */
sprintf(path, "0x%04x.0x%02x.0x%02x.0x%08x/%s",
device >> 16, /* Major device number */
(device >> 8) & 0xffU, /* Minor device number */
device & 0xffU, /* Partition number */
pSOSystem System Calls 2-107
2