| 10 |
|
|
| 11 |
|
#include "copyright.h" |
| 12 |
|
|
| 13 |
+ |
#include <stdlib.h> |
| 14 |
+ |
#include <string.h> |
| 15 |
|
#ifdef _WIN32 |
| 16 |
+ |
#include <io.h> |
| 17 |
+ |
#define access _access |
| 18 |
+ |
#define PATH_MAX _MAX_PATH |
| 19 |
+ |
#else /* _WIN32 */ |
| 20 |
+ |
#include <unistd.h> |
| 21 |
+ |
#include <sys/param.h> |
| 22 |
+ |
#endif /* _WIN32 */ |
| 23 |
|
|
| 24 |
+ |
#ifdef _WIN32 |
| 25 |
+ |
|
| 26 |
|
#define DIRSEP '/' |
| 27 |
|
#define ISDIRSEP(c) ((c)=='/' || (c)=='\\') |
| 28 |
+ |
#define ISABS(s) ((s)!=NULL \ |
| 29 |
+ |
&& (s[0])!='\0' \ |
| 30 |
+ |
&& ( ISDIRSEP(s[0]) \ |
| 31 |
+ |
|| ( (s[1])!='\0' \ |
| 32 |
+ |
&& (isupper(s[0])||islower(s[0])) \ |
| 33 |
+ |
&& (s[1])==':'))) |
| 34 |
|
#define CASEDIRSEP case '/': case '\\' |
| 35 |
|
#define PATHSEP ';' |
| 36 |
|
#define MAXPATH 128 |
| 37 |
+ |
#define DEFAULT_TEMPDIRS {"C:/TMP", "C:/TEMP", ".", NULL} |
| 38 |
|
#define TEMPLATE "rtXXXXXX" |
| 39 |
|
#define TEMPLEN 8 |
| 40 |
|
#define ULIBVAR "RAYPATH" |
| 41 |
|
#ifndef DEFPATH |
| 42 |
|
#define DEFPATH ";c:/ray/lib" |
| 43 |
|
#endif |
| 44 |
+ |
/* <io.h> only does half the work for access() */ |
| 45 |
+ |
#ifndef F_OK |
| 46 |
+ |
#define F_OK 00 |
| 47 |
+ |
#define W_OK 02 |
| 48 |
+ |
#define R_OK 04 |
| 49 |
+ |
#endif |
| 50 |
|
extern char *fixargv0(); |
| 51 |
|
|
| 52 |
|
#else |
| 53 |
|
#ifdef AMIGA |
| 54 |
|
|
| 55 |
|
#define DIRSEP '/' |
| 56 |
+ |
#define ISABS(s) ((s)!=NULL && (ISDIRSEP(s[0]))) |
| 57 |
|
#define PATHSEP ';' |
| 58 |
|
#define MAXPATH 128 |
| 59 |
+ |
#define DEFAULT_TEMPDIRS {"/var/tmp", "/usr/tmp", "/tmp", ".", NULL} |
| 60 |
|
#define TEMPLATE "/tmp/rtXXXXXX" |
| 61 |
|
#define TEMPLEN 13 |
| 62 |
|
#define ULIBVAR "RAYPATH" |
| 68 |
|
#else |
| 69 |
|
|
| 70 |
|
#define DIRSEP '/' |
| 71 |
+ |
#define ISABS(s) ((s)!=NULL && (ISDIRSEP(s[0]))) |
| 72 |
|
#define PATHSEP ':' |
| 73 |
|
#define MAXPATH 256 |
| 74 |
+ |
#define DEFAULT_TEMPDIRS {"/var/tmp", "/usr/tmp", "/tmp", ".", NULL} |
| 75 |
|
#define TEMPLATE "/usr/tmp/rtXXXXXX" |
| 76 |
|
#define TEMPLEN 17 |
| 77 |
|
#define ULIBVAR "RAYPATH" |
| 98 |
|
extern char *getcwd(); |
| 99 |
|
#define getwd(p) getcwd(p, sizeof(p)) |
| 100 |
|
#endif |
| 101 |
+ |
|
| 102 |
+ |
|
| 103 |
+ |
/* Find a writeable directory for temporary files */ |
| 104 |
+ |
/* If s is NULL, we return a static string */ |
| 105 |
+ |
extern char *temp_directory(char *s, size_t len); |
| 106 |
+ |
|
| 107 |
+ |
/* Compose a *currently* unique name within a temporary directory */ |
| 108 |
+ |
/* If s is NULL, we return a static string */ |
| 109 |
+ |
/* If templ is NULL, we take our default template */ |
| 110 |
+ |
/* WARNING: On Windows, there's a maximum of 27 unique names within |
| 111 |
+ |
one process for the same template. */ |
| 112 |
+ |
extern char *temp_filename(char *s, size_t len, char *templ); |
| 113 |
+ |
|
| 114 |
+ |
/* Same as above, but also open the file and return the descriptor */ |
| 115 |
+ |
/* This one is supposed to protect against race conditions on unix */ |
| 116 |
+ |
/* WARNING: On Windows, there's no protection against race conditions */ |
| 117 |
+ |
extern int temp_file(char *s, size_t len, char *templ); |
| 118 |
+ |
|
| 119 |
+ |
/* Concatenate two strings, leaving exactly one DIRSEP in between */ |
| 120 |
+ |
extern char *append_filepath(char *s1, char *s2, size_t len); |
| 121 |
|
|
| 122 |
|
|
| 123 |
|
#ifdef __cplusplus |
