php_open_temporary_file.c [plain text]
#include "php.h"
#include <errno.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#ifdef PHP_WIN32
#define O_RDONLY _O_RDONLY
#include "win32/param.h"
#include "win32/winutil.h"
#elif defined(NETWARE)
#ifdef USE_WINSOCK
#include <novsock2.h>
#else
#include <sys/socket.h>
#endif
#include <sys/param.h>
#else
#include <sys/param.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <netdb.h>
#if HAVE_ARPA_INET_H
#include <arpa/inet.h>
#endif
#endif
#ifdef HAVE_SYS_TIME_H
#include <sys/time.h>
#endif
#ifdef HAVE_SYS_FILE_H
#include <sys/file.h>
#endif
#if !defined(P_tmpdir)
#define P_tmpdir ""
#endif
static int php_do_open_temporary_file(const char *path, const char *pfx, char **opened_path_p TSRMLS_DC)
{
char *trailing_slash;
char *opened_path;
char cwd[MAXPATHLEN];
cwd_state new_state;
int fd = -1;
#ifndef HAVE_MKSTEMP
int open_flags = O_CREAT | O_TRUNC | O_RDWR
#ifdef PHP_WIN32
| _O_BINARY
#endif
;
#endif
if (!path || !path[0]) {
return -1;
}
#ifdef PHP_WIN32
if (!php_win32_check_trailing_space(pfx, (const int)strlen(pfx))) {
SetLastError(ERROR_INVALID_NAME);
return -1;
}
#endif
if (!VCWD_GETCWD(cwd, MAXPATHLEN)) {
cwd[0] = '\0';
}
new_state.cwd = estrdup(cwd);
new_state.cwd_length = strlen(cwd);
if (virtual_file_ex(&new_state, path, NULL, CWD_REALPATH TSRMLS_CC)) {
efree(new_state.cwd);
return -1;
}
if (IS_SLASH(new_state.cwd[new_state.cwd_length - 1])) {
trailing_slash = "";
} else {
trailing_slash = "/";
}
if (spprintf(&opened_path, 0, "%s%s%sXXXXXX", new_state.cwd, trailing_slash, pfx) >= MAXPATHLEN) {
efree(opened_path);
efree(new_state.cwd);
return -1;
}
#ifdef PHP_WIN32
if (GetTempFileName(new_state.cwd, pfx, 0, opened_path)) {
if (VCWD_CHMOD(opened_path, 0600)) {
efree(opened_path);
efree(new_state.cwd);
return -1;
}
fd = VCWD_OPEN_MODE(opened_path, open_flags, 0600);
}
#elif defined(HAVE_MKSTEMP)
fd = mkstemp(opened_path);
#else
if (mktemp(opened_path)) {
fd = VCWD_OPEN(opened_path, open_flags);
}
#endif
if (fd == -1 || !opened_path_p) {
efree(opened_path);
} else {
*opened_path_p = opened_path;
}
efree(new_state.cwd);
return fd;
}
static
#ifdef ZTS
#ifdef PHP_WIN32
__declspec(thread)
#elif defined(__GNUC__)
__thread
#endif
#endif
char* temporary_directory;
PHPAPI void php_shutdown_temporary_directory(void)
{
if (temporary_directory) {
efree(temporary_directory);
temporary_directory = NULL;
}
}
PHPAPI const char* php_get_temporary_directory(TSRMLS_D)
{
if (temporary_directory) {
return temporary_directory;
}
{
char *sys_temp_dir = PG(sys_temp_dir);
if (sys_temp_dir) {
int len = strlen(sys_temp_dir);
if (len >= 2 && sys_temp_dir[len - 1] == DEFAULT_SLASH) {
temporary_directory = estrndup(sys_temp_dir, len - 1);
return temporary_directory;
} else if (len >= 1 && sys_temp_dir[len - 1] != DEFAULT_SLASH) {
temporary_directory = estrndup(sys_temp_dir, len);
return temporary_directory;
}
}
}
#ifdef PHP_WIN32
{
char sTemp[MAX_PATH];
DWORD len = GetTempPath(sizeof(sTemp),sTemp);
assert(0 < len);
if (sTemp[len - 1] == DEFAULT_SLASH) {
temporary_directory = estrndup(sTemp, len - 1);
} else {
temporary_directory = estrndup(sTemp, len);
}
return temporary_directory;
}
#else
{
char* s = getenv("TMPDIR");
if (s && *s) {
int len = strlen(s);
if (s[len - 1] == DEFAULT_SLASH) {
temporary_directory = estrndup(s, len - 1);
} else {
temporary_directory = estrndup(s, len);
}
return temporary_directory;
}
}
#ifdef P_tmpdir
if (P_tmpdir) {
temporary_directory = estrdup(P_tmpdir);
return temporary_directory;
}
#endif
temporary_directory = estrndup("/tmp", sizeof("/tmp"));
return temporary_directory;
#endif
}
PHPAPI int php_open_temporary_fd_ex(const char *dir, const char *pfx, char **opened_path_p, zend_bool open_basedir_check TSRMLS_DC)
{
int fd;
const char *temp_dir;
if (!pfx) {
pfx = "tmp.";
}
if (opened_path_p) {
*opened_path_p = NULL;
}
if (!dir || *dir == '\0') {
def_tmp:
temp_dir = php_get_temporary_directory(TSRMLS_C);
if (temp_dir && *temp_dir != '\0' && (!open_basedir_check || !php_check_open_basedir(temp_dir TSRMLS_CC))) {
return php_do_open_temporary_file(temp_dir, pfx, opened_path_p TSRMLS_CC);
} else {
return -1;
}
}
fd = php_do_open_temporary_file(dir, pfx, opened_path_p TSRMLS_CC);
if (fd == -1) {
goto def_tmp;
}
return fd;
}
PHPAPI int php_open_temporary_fd(const char *dir, const char *pfx, char **opened_path_p TSRMLS_DC)
{
return php_open_temporary_fd_ex(dir, pfx, opened_path_p, 0 TSRMLS_CC);
}
PHPAPI FILE *php_open_temporary_file(const char *dir, const char *pfx, char **opened_path_p TSRMLS_DC)
{
FILE *fp;
int fd = php_open_temporary_fd(dir, pfx, opened_path_p TSRMLS_CC);
if (fd == -1) {
return NULL;
}
fp = fdopen(fd, "r+b");
if (fp == NULL) {
close(fd);
}
return fp;
}