102 lines
2.4 KiB
C
102 lines
2.4 KiB
C
/* $Source$
|
|
* $State$
|
|
* $Revision$
|
|
*/
|
|
|
|
/*
|
|
* Derived from dos-open.c for newlib-ia16 which was written for the
|
|
* gcc-ia16 toolchain.
|
|
*
|
|
* Copyright (c) 2018 Bart Oldeman
|
|
* Copyright (c) 2019--2021 TK Chia
|
|
*
|
|
* The authors hereby grant permission to use, copy, modify, distribute,
|
|
* and license this software and its documentation for any purpose, provided
|
|
* that existing copyright notices are retained in all copies and that this
|
|
* notice is included verbatim in any distributions. No written agreement,
|
|
* license, or royalty fee is required for any of the authorized uses.
|
|
* Modifications to this software may be copyrighted by their authors
|
|
* and need not follow the licensing terms described here, provided that
|
|
* the new terms are clearly indicated on the first page of each file where
|
|
* they apply.
|
|
*/
|
|
|
|
#include <errno.h>
|
|
#include <stdarg.h>
|
|
#include <stdio.h>
|
|
#include <unistd.h>
|
|
#include "libsys.h"
|
|
|
|
int open(const char* pathname, int flags, ...)
|
|
{
|
|
int fd = -1, binmode;
|
|
off_t ret;
|
|
|
|
if ((flags & ~(O_ACCMODE | O_CREAT | O_TRUNC | O_APPEND
|
|
| O_TEXT | O_BINARY)))
|
|
{
|
|
/* bail out if there are unknown flags */
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
binmode = flags & (O_TEXT | O_BINARY);
|
|
if (binmode != O_TEXT && binmode != O_BINARY && binmode != 0)
|
|
{
|
|
/* bail out if both O_TEXT and O_BINARY are specified (!) */
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
if ((flags & O_CREAT))
|
|
{
|
|
/* special but common case O_WRONLY | O_CREAT | O_TRUNC
|
|
* should be handled by only calling _sys_rawcreat */
|
|
int fileexists = 0;
|
|
if (!(flags & O_TRUNC))
|
|
fileexists = _sys_exists(pathname);
|
|
if (!fileexists)
|
|
{
|
|
va_list ap;
|
|
mode_t mode;
|
|
|
|
va_start(ap, flags);
|
|
mode = va_arg(ap, mode_t);
|
|
va_end(ap);
|
|
|
|
fd = _sys_rawcreat(pathname, mode & 0200 ? 0 : 1);
|
|
if (fd != -1)
|
|
{
|
|
if ((flags & O_ACCMODE) == O_WRONLY)
|
|
return fd;
|
|
close(fd);
|
|
fd = -1;
|
|
}
|
|
}
|
|
}
|
|
|
|
/* try to open file with mode */
|
|
if (fd == -1)
|
|
fd = _sys_rawopen(pathname, flags & O_ACCMODE);
|
|
if (fd == -1)
|
|
return fd;
|
|
ret = 0;
|
|
|
|
/* handle O_TRUNC and O_APPEND */
|
|
if ((flags & O_TRUNC))
|
|
ret = _sys_rawwrite(fd, NULL, 0);
|
|
else if ((flags & O_APPEND))
|
|
ret = _sys_rawlseek(fd, 0L, SEEK_END);
|
|
if (ret == -1)
|
|
{
|
|
close(fd);
|
|
return -1;
|
|
}
|
|
|
|
/* handle O_TEXT and O_BINARY, and reset "end of file encountered" */
|
|
_sys_setmode(fd, binmode == O_BINARY ? O_BINARY : O_TEXT);
|
|
_sys_seteof(fd, 0);
|
|
|
|
return fd;
|
|
}
|