Mwerks version of fopenRF.

This commit is contained in:
Jack Jansen 1995-08-07 14:02:12 +00:00
parent 67b4e6d4e8
commit 426fa79a7d
1 changed files with 47 additions and 0 deletions

47
Mac/mwerks/mwfopenrf.c Normal file
View File

@ -0,0 +1,47 @@
/*
** mwfopenrf - Open resource fork as stdio file for CodeWarrior.
**
** Jack Jansen, CWI, August 1995.
*/
#ifdef __MWERKS__
#include <stdio.h>
#include <unix.h>
#include <errno.h>
#include "errno_unix.h"
FILE *
fopenRF(name, mode)
char *name;
char *mode;
{
int fd;
FILE *fp;
int modebits = -1;
int extramodebits;
char *modep;
for(modep=mode; *modep; modep++) {
switch(*modep) {
case 'r': modebits = O_RDONLY; break;
case 'w': modebits = O_WRONLY; extramodebits |= O_CREAT|O_TRUNC; break;
case 'a': modebits = O_RDONLY;
extramodebits |= O_CREAT|O_APPEND;
extramodebits &= ~O_TRUNC;
break;
case '+': modebits = O_RDWR;
extramodebits &= ~O_TRUNC;
break;
case 'b': extramodebits |= O_BINARY;
break;
default:
errno = EINVAL;
return NULL;
}
}
fd = open(name, modebits|extramodebits|O_RSRC);
if ( fd < 0 )
return NULL;
return fdopen(fd, mode);
}
#endif /* __MWERKS__ */