| 9 |
|
|
| 10 |
|
#include "radogl.h" |
| 11 |
|
#include "octree.h" |
| 12 |
+ |
#include "platform.h" |
| 13 |
|
|
| 14 |
|
#define MAXLEVEL 16 /* maximum instance hierarchy level */ |
| 15 |
|
|
| 124 |
|
getoct(name) /* get/assign octree list id */ |
| 125 |
|
char *name; |
| 126 |
|
{ |
| 126 |
– |
extern char *getpath(), *getlibpath(); |
| 127 |
|
char *path; |
| 128 |
|
register LUENT *lp; |
| 129 |
|
register OCTINST *op; |
| 137 |
|
strcpy(lp->key, name); |
| 138 |
|
} |
| 139 |
|
if ((op = (OCTINST *)lp->data) == NULL) { |
| 140 |
< |
path = getpath(name, getlibpath(), R_OK); |
| 140 |
> |
path = getpath(name, getrlibpath(), R_OK); |
| 141 |
|
if (path == NULL) { |
| 142 |
|
sprintf(errmsg, "cannot find octree \"%s\"", name); |
| 143 |
|
error(USER, errmsg); |
| 169 |
|
sprintf(errmsg, "cannot open octree file \"%s\"", fname); |
| 170 |
|
error(SYSTEM, errmsg); |
| 171 |
|
} |
| 172 |
< |
#ifdef MSDOS |
| 173 |
< |
setmode(fileno(infp), O_BINARY); |
| 174 |
< |
#endif |
| 172 |
> |
SET_FILE_BINARY(infp); |
| 173 |
|
/* get header */ |
| 174 |
|
if (checkheader(infp, OCTFMT, NULL) < 0) |
| 175 |
|
octerror(USER, "not an octree"); |
| 206 |
|
|
| 207 |
|
infn = fname; |
| 208 |
|
infp = fopen(fname, "r"); /* assume already checked */ |
| 209 |
< |
#ifdef MSDOS |
| 212 |
< |
setmode(fileno(infp), O_BINARY); |
| 213 |
< |
#endif |
| 209 |
> |
SET_FILE_BINARY(infp); |
| 210 |
|
/* skip header */ |
| 211 |
|
getheader(infp, NULL, NULL); |
| 212 |
|
/* get format */ |
