mirror of
https://github.com/cc65/cc65.git
synced 2024-08-16 12:29:03 +00:00
which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81
74 lines
1.3 KiB
C
74 lines
1.3 KiB
C
/*
|
|
* _fopen.c
|
|
*
|
|
* Ullrich von bassewitz, 17.06.1997
|
|
*/
|
|
|
|
|
|
|
|
#include <fcntl.h>
|
|
#include <errno.h>
|
|
#include "_file.h"
|
|
|
|
|
|
|
|
static unsigned char amode_to_bmode (const char* mode)
|
|
/* Convert ASCII mode (like for fopen) to binary mode (for open) */
|
|
{
|
|
char c;
|
|
char flag = 0;
|
|
unsigned char binmode = 0;
|
|
|
|
while (c = *mode++) {
|
|
switch(c) {
|
|
case 'w':
|
|
binmode = O_WRONLY;
|
|
break;
|
|
case 'r':
|
|
binmode = O_RDONLY;
|
|
break;
|
|
case '+':
|
|
binmode = O_RDWR;
|
|
break;
|
|
/* a,b missing */
|
|
}
|
|
}
|
|
if (binmode == 0) {
|
|
_errno = EINVAL;
|
|
}
|
|
return binmode;
|
|
}
|
|
|
|
|
|
|
|
FILE* _fopen (const char* name, const char* mode, FILE* f)
|
|
/* Open the specified file and fill the descriptor values into f */
|
|
{
|
|
int fd;
|
|
unsigned char binmode;
|
|
|
|
|
|
/* Convert ASCII mode to binary mode */
|
|
if ((binmode = amode_to_bmode (mode)) == 0) {
|
|
/* Invalid mode, _errno already set */
|
|
return 0;
|
|
}
|
|
|
|
/* Open the file */
|
|
fd = open (name, binmode);
|
|
if (fd == -1) {
|
|
/* Error - _oserror is set */
|
|
return 0;
|
|
}
|
|
|
|
/* Remember fd, mark the file as opened */
|
|
f->f_fd = fd;
|
|
f->f_flags = _FOPEN;
|
|
|
|
/* Return the file descriptor */
|
|
return f;
|
|
}
|
|
|
|
|
|
|