mirror of
https://github.com/cc65/cc65.git
synced 2024-11-19 06:31:31 +00:00
86 lines
1.7 KiB
C
86 lines
1.7 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) */
|
|
{
|
|
unsigned char binmode;
|
|
|
|
switch (*mode++) {
|
|
case 'w':
|
|
binmode = O_WRONLY | O_CREAT | O_TRUNC;
|
|
break;
|
|
case 'r':
|
|
binmode = O_RDONLY;
|
|
break;
|
|
case 'a':
|
|
binmode = O_WRONLY | O_CREAT | O_APPEND;
|
|
break;
|
|
default:
|
|
return 0; /* invalid char */
|
|
}
|
|
|
|
while (1) {
|
|
switch (*mode++) {
|
|
case '+':
|
|
/* always to r/w in addition to anything already set */
|
|
binmode |= O_RDWR;
|
|
break;
|
|
case 'b':
|
|
/* currently ignored */
|
|
break;
|
|
case '\0':
|
|
/* end of mode string reached */
|
|
return binmode;
|
|
default:
|
|
/* invalid char in mode string */
|
|
return 0;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
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 = EINVAL;
|
|
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;
|
|
}
|
|
|
|
|
|
|