| /* Licensed to the Apache Software Foundation (ASF) under one or more |
| * contributor license agreements. See the NOTICE file distributed with |
| * this work for additional information regarding copyright ownership. |
| * The ASF licenses this file to You under the Apache License, Version 2.0 |
| * (the "License"); you may not use this file except in compliance with |
| * the License. You may obtain a copy of the License at |
| * |
| * http://www.apache.org/licenses/LICENSE-2.0 |
| * |
| * Unless required by applicable law or agreed to in writing, software |
| * distributed under the License is distributed on an "AS IS" BASIS, |
| * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. |
| * See the License for the specific language governing permissions and |
| * limitations under the License. |
| */ |
| |
| #include "apr_arch_file_io.h" |
| #include "apr_strings.h" |
| #include "apr_portable.h" |
| #include "apr_thread_mutex.h" |
| #include "apr_arch_inherit.h" |
| |
| #ifdef NETWARE |
| #include "nks/dirio.h" |
| #include "apr_hash.h" |
| #include "fsio.h" |
| #endif |
| |
| static apr_status_t file_cleanup(apr_file_t *file) |
| { |
| apr_status_t rv = APR_SUCCESS; |
| |
| if (close(file->filedes) == 0) { |
| file->filedes = -1; |
| if (file->flags & APR_DELONCLOSE) { |
| unlink(file->fname); |
| } |
| #if APR_HAS_THREADS |
| if (file->thlock) { |
| rv = apr_thread_mutex_destroy(file->thlock); |
| } |
| #endif |
| } |
| else { |
| /* Are there any error conditions other than EINTR or EBADF? */ |
| rv = errno; |
| } |
| #ifndef WAITIO_USES_POLL |
| if (file->pollset != NULL) { |
| int pollset_rv = apr_pollset_destroy(file->pollset); |
| /* If the file close failed, return its error value, |
| * not apr_pollset_destroy()'s. |
| */ |
| if (rv == APR_SUCCESS) { |
| rv = pollset_rv; |
| } |
| } |
| #endif /* !WAITIO_USES_POLL */ |
| return rv; |
| } |
| |
| apr_status_t apr_unix_file_cleanup(void *thefile) |
| { |
| apr_file_t *file = thefile; |
| apr_status_t flush_rv = APR_SUCCESS, rv = APR_SUCCESS; |
| |
| if (file->buffered) { |
| flush_rv = apr_file_flush(file); |
| } |
| |
| rv = file_cleanup(file); |
| |
| return rv != APR_SUCCESS ? rv : flush_rv; |
| } |
| |
| apr_status_t apr_unix_child_file_cleanup(void *thefile) |
| { |
| return file_cleanup(thefile); |
| } |
| |
| APR_DECLARE(apr_status_t) apr_file_open(apr_file_t **new, |
| const char *fname, |
| apr_int32_t flag, |
| apr_fileperms_t perm, |
| apr_pool_t *pool) |
| { |
| apr_os_file_t fd; |
| int oflags = 0; |
| #if APR_HAS_THREADS |
| apr_thread_mutex_t *thlock; |
| apr_status_t rv; |
| #endif |
| |
| if ((flag & APR_READ) && (flag & APR_WRITE)) { |
| oflags = O_RDWR; |
| } |
| else if (flag & APR_READ) { |
| oflags = O_RDONLY; |
| } |
| else if (flag & APR_WRITE) { |
| oflags = O_WRONLY; |
| } |
| else { |
| return APR_EACCES; |
| } |
| |
| if (flag & APR_CREATE) { |
| oflags |= O_CREAT; |
| if (flag & APR_EXCL) { |
| oflags |= O_EXCL; |
| } |
| } |
| if ((flag & APR_EXCL) && !(flag & APR_CREATE)) { |
| return APR_EACCES; |
| } |
| |
| if (flag & APR_APPEND) { |
| oflags |= O_APPEND; |
| } |
| if (flag & APR_TRUNCATE) { |
| oflags |= O_TRUNC; |
| } |
| #ifdef O_BINARY |
| if (flag & APR_BINARY) { |
| oflags |= O_BINARY; |
| } |
| #endif |
| |
| #if APR_HAS_LARGE_FILES && defined(_LARGEFILE64_SOURCE) |
| oflags |= O_LARGEFILE; |
| #elif defined(O_LARGEFILE) |
| if (flag & APR_LARGEFILE) { |
| oflags |= O_LARGEFILE; |
| } |
| #endif |
| |
| #if APR_HAS_THREADS |
| if ((flag & APR_BUFFERED) && (flag & APR_XTHREAD)) { |
| rv = apr_thread_mutex_create(&thlock, |
| APR_THREAD_MUTEX_DEFAULT, pool); |
| if (rv) { |
| return rv; |
| } |
| } |
| #endif |
| |
| if (perm == APR_OS_DEFAULT) { |
| fd = open(fname, oflags, 0666); |
| } |
| else { |
| fd = open(fname, oflags, apr_unix_perms2mode(perm)); |
| } |
| if (fd < 0) { |
| return errno; |
| } |
| |
| (*new) = (apr_file_t *)apr_pcalloc(pool, sizeof(apr_file_t)); |
| (*new)->pool = pool; |
| (*new)->flags = flag; |
| (*new)->filedes = fd; |
| |
| (*new)->fname = apr_pstrdup(pool, fname); |
| |
| (*new)->blocking = BLK_ON; |
| (*new)->buffered = (flag & APR_BUFFERED) > 0; |
| |
| if ((*new)->buffered) { |
| (*new)->buffer = apr_palloc(pool, APR_FILE_BUFSIZE); |
| #if APR_HAS_THREADS |
| if ((*new)->flags & APR_XTHREAD) { |
| (*new)->thlock = thlock; |
| } |
| #endif |
| } |
| else { |
| (*new)->buffer = NULL; |
| } |
| |
| (*new)->is_pipe = 0; |
| (*new)->timeout = -1; |
| (*new)->ungetchar = -1; |
| (*new)->eof_hit = 0; |
| (*new)->filePtr = 0; |
| (*new)->bufpos = 0; |
| (*new)->dataRead = 0; |
| (*new)->direction = 0; |
| #ifndef WAITIO_USES_POLL |
| /* Start out with no pollset. apr_wait_for_io_or_timeout() will |
| * initialize the pollset if needed. |
| */ |
| (*new)->pollset = NULL; |
| #endif |
| if (!(flag & APR_FILE_NOCLEANUP)) { |
| apr_pool_cleanup_register((*new)->pool, (void *)(*new), |
| apr_unix_file_cleanup, |
| apr_unix_child_file_cleanup); |
| } |
| return APR_SUCCESS; |
| } |
| |
| APR_DECLARE(apr_status_t) apr_file_close(apr_file_t *file) |
| { |
| return apr_pool_cleanup_run(file->pool, file, apr_unix_file_cleanup); |
| } |
| |
| APR_DECLARE(apr_status_t) apr_file_remove(const char *path, apr_pool_t *pool) |
| { |
| if (unlink(path) == 0) { |
| return APR_SUCCESS; |
| } |
| else { |
| return errno; |
| } |
| } |
| |
| APR_DECLARE(apr_status_t) apr_file_rename(const char *from_path, |
| const char *to_path, |
| apr_pool_t *p) |
| { |
| if (rename(from_path, to_path) != 0) { |
| return errno; |
| } |
| return APR_SUCCESS; |
| } |
| |
| APR_DECLARE(apr_status_t) apr_os_file_get(apr_os_file_t *thefile, |
| apr_file_t *file) |
| { |
| *thefile = file->filedes; |
| return APR_SUCCESS; |
| } |
| |
| APR_DECLARE(apr_status_t) apr_os_file_put(apr_file_t **file, |
| apr_os_file_t *thefile, |
| apr_int32_t flags, apr_pool_t *pool) |
| { |
| int *dafile = thefile; |
| |
| (*file) = apr_pcalloc(pool, sizeof(apr_file_t)); |
| (*file)->pool = pool; |
| (*file)->eof_hit = 0; |
| (*file)->blocking = BLK_UNKNOWN; /* in case it is a pipe */ |
| (*file)->timeout = -1; |
| (*file)->ungetchar = -1; /* no char avail */ |
| (*file)->filedes = *dafile; |
| (*file)->flags = flags | APR_FILE_NOCLEANUP; |
| (*file)->buffered = (flags & APR_BUFFERED) > 0; |
| |
| #ifndef WAITIO_USES_POLL |
| /* Start out with no pollset. apr_wait_for_io_or_timeout() will |
| * initialize the pollset if needed. |
| */ |
| (*file)->pollset = NULL; |
| #endif |
| |
| if ((*file)->buffered) { |
| (*file)->buffer = apr_palloc(pool, APR_FILE_BUFSIZE); |
| #if APR_HAS_THREADS |
| if ((*file)->flags & APR_XTHREAD) { |
| apr_status_t rv; |
| rv = apr_thread_mutex_create(&((*file)->thlock), |
| APR_THREAD_MUTEX_DEFAULT, pool); |
| if (rv) { |
| return rv; |
| } |
| } |
| #endif |
| } |
| return APR_SUCCESS; |
| } |
| |
| APR_DECLARE(apr_status_t) apr_file_eof(apr_file_t *fptr) |
| { |
| if (fptr->eof_hit == 1) { |
| return APR_EOF; |
| } |
| return APR_SUCCESS; |
| } |
| |
| APR_DECLARE(apr_status_t) apr_file_open_stderr(apr_file_t **thefile, |
| apr_pool_t *pool) |
| { |
| int fd = STDERR_FILENO; |
| |
| return apr_os_file_put(thefile, &fd, 0, pool); |
| } |
| |
| APR_DECLARE(apr_status_t) apr_file_open_stdout(apr_file_t **thefile, |
| apr_pool_t *pool) |
| { |
| int fd = STDOUT_FILENO; |
| |
| return apr_os_file_put(thefile, &fd, 0, pool); |
| } |
| |
| APR_DECLARE(apr_status_t) apr_file_open_stdin(apr_file_t **thefile, |
| apr_pool_t *pool) |
| { |
| int fd = STDIN_FILENO; |
| |
| return apr_os_file_put(thefile, &fd, 0, pool); |
| } |
| |
| APR_IMPLEMENT_INHERIT_SET(file, flags, pool, apr_unix_file_cleanup) |
| |
| /* We need to do this by hand instead of using APR_IMPLEMENT_INHERIT_UNSET |
| * because the macro sets both cleanups to the same function, which is not |
| * suitable on Unix (see PR 41119). */ |
| APR_DECLARE(apr_status_t) apr_file_inherit_unset(apr_file_t *thefile) |
| { |
| if (thefile->flags & APR_FILE_NOCLEANUP) { |
| return APR_EINVAL; |
| } |
| if (thefile->flags & APR_INHERIT) { |
| thefile->flags &= ~APR_INHERIT; |
| apr_pool_child_cleanup_set(thefile->pool, |
| (void *)thefile, |
| apr_unix_file_cleanup, |
| apr_unix_child_file_cleanup); |
| } |
| return APR_SUCCESS; |
| } |
| |
| APR_POOL_IMPLEMENT_ACCESSOR(file) |