RetroArch/file_ops.c

261 lines
6.4 KiB
C
Raw Normal View History

2012-04-21 21:13:50 +00:00
/* RetroArch - A frontend for libretro.
2014-01-01 00:50:59 +00:00
* Copyright (C) 2010-2014 - Hans-Kristian Arntzen
2015-01-07 16:46:50 +00:00
* Copyright (C) 2011-2015 - Daniel De Matteis
2012-04-13 19:29:11 +00:00
*
2012-04-21 21:13:50 +00:00
* RetroArch is free software: you can redistribute it and/or modify it under the terms
2012-04-13 19:29:11 +00:00
* of the GNU General Public License as published by the Free Software Found-
* ation, either version 3 of the License, or (at your option) any later version.
*
2012-04-21 21:13:50 +00:00
* RetroArch is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
2012-04-13 19:29:11 +00:00
* without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU General Public License for more details.
*
2012-04-21 21:31:57 +00:00
* You should have received a copy of the GNU General Public License along with RetroArch.
2012-04-13 19:29:11 +00:00
* If not, see <http://www.gnu.org/licenses/>.
*/
2014-10-21 21:53:09 +00:00
#include "file_ops.h"
2014-10-21 22:23:06 +00:00
#include <file/file_path.h>
2012-04-13 19:29:11 +00:00
#include <stdlib.h>
#include <boolean.h>
2012-04-13 19:29:11 +00:00
#include <string.h>
#include <time.h>
#include <errno.h>
2014-10-21 05:58:58 +00:00
#include <compat/strl.h>
#include <compat/posix_string.h>
#include <retro_miscellaneous.h>
2012-04-13 19:29:11 +00:00
#ifdef HAVE_COMPRESSION
#include <file/file_extract.h>
#endif
#ifdef HAVE_7ZIP
#include "decompress/7zip_support.h"
#endif
#ifdef HAVE_ZLIB
#include "decompress/zip_support.h"
#endif
#ifdef __HAIKU__
#include <kernel/image.h>
#endif
2013-04-11 20:35:15 +00:00
#if defined(_WIN32)
#ifdef _MSC_VER
#define setmode _setmode
#endif
#ifdef _XBOX
#include <xtl.h>
2013-04-11 20:35:15 +00:00
#define INVALID_FILE_ATTRIBUTES -1
#else
2012-04-13 19:29:11 +00:00
#include <io.h>
#include <fcntl.h>
#include <direct.h>
2012-04-13 19:29:11 +00:00
#include <windows.h>
#endif
#else
#include <sys/types.h>
#include <sys/stat.h>
#include <dirent.h>
#include <unistd.h>
2012-04-13 19:29:11 +00:00
#endif
2015-01-08 14:08:44 +00:00
/**
* write_file:
* @path : path to file.
* @data : contents to write to the file.
* @size : size of the contents.
*
* Writes data to a file.
*
* Returns: true (1) on success, false (0) otherwise.
*/
2015-02-16 02:46:27 +00:00
bool write_file(const char *path, const void *data, ssize_t size)
2013-10-14 19:08:41 +00:00
{
ssize_t ret = 0;
FILE *file = fopen(path, "wb");
2013-10-14 19:08:41 +00:00
if (!file)
return false;
2014-08-27 00:06:39 +00:00
ret = fwrite(data, 1, size, file);
2014-08-27 00:06:39 +00:00
fclose(file);
return (ret == size);
2013-10-14 19:08:41 +00:00
}
2015-01-08 14:08:44 +00:00
/**
* read_generic_file:
* @path : path to file.
* @buf : buffer to allocate and read the contents of the
* file into. Needs to be freed manually.
*
* Read the contents of a file into @buf.
*
* Returns: number of items read, -1 on error.
*/
2015-03-21 08:31:07 +00:00
static int read_generic_file(const char *path, void **buf, ssize_t *len)
2013-10-14 19:08:41 +00:00
{
2015-03-21 21:28:12 +00:00
long ret = 0;
ssize_t content_buf_size = 0;
void *content_buf = NULL;
FILE *file = fopen(path, "rb");
2013-10-14 19:08:41 +00:00
if (!file)
goto error;
if (fseek(file, 0, SEEK_END) != 0)
goto error;
2015-02-15 23:44:28 +00:00
2015-03-21 08:42:15 +00:00
content_buf_size = ftell(file);
2015-03-21 08:40:29 +00:00
if (content_buf_size < 0)
goto error;
2015-02-15 23:44:28 +00:00
2015-03-03 08:51:06 +00:00
rewind(file);
2015-02-15 23:44:28 +00:00
2015-03-21 08:40:29 +00:00
content_buf = malloc(content_buf_size + 1);
2015-02-15 23:44:28 +00:00
2015-03-21 08:40:29 +00:00
if (!content_buf)
2013-10-14 19:08:41 +00:00
goto error;
2015-03-21 08:40:29 +00:00
if ((ret = fread(content_buf, 1, content_buf_size, file)) < content_buf_size)
2013-10-14 19:08:41 +00:00
RARCH_WARN("Didn't read whole file.\n");
2015-03-21 08:40:29 +00:00
*buf = content_buf;
2014-09-02 03:57:53 +00:00
/* Allow for easy reading of strings to be safe.
* Will only work with sane character formatting (Unix). */
2015-03-21 08:40:29 +00:00
((char*)content_buf)[content_buf_size] = '\0';
if (fclose(file) != 0)
RARCH_WARN("Failed to close file stream.\n");
2015-02-15 23:44:28 +00:00
if (len)
*len = ret;
2015-03-21 08:31:07 +00:00
return 1;
2013-10-14 19:08:41 +00:00
error:
if (file)
fclose(file);
2015-03-21 08:40:29 +00:00
if (content_buf)
free(content_buf);
if (len)
*len = -1;
2013-10-14 19:08:41 +00:00
*buf = NULL;
2015-03-21 08:31:07 +00:00
return 0;
}
#ifdef HAVE_COMPRESSION
/* Generic compressed file loader.
* Extracts to buf, unless optional_filename != 0
* Then extracts to optional_filename and leaves buf alone.
*/
2015-03-21 08:34:50 +00:00
int read_compressed_file(const char * path, void **buf,
2015-02-16 02:46:27 +00:00
const char* optional_filename, ssize_t *length)
{
2015-06-12 15:00:37 +00:00
const char* file_ext = NULL;
char *archive_found = NULL;
char archive_path[PATH_MAX_LENGTH] = {0};
if (optional_filename)
2015-02-16 02:31:37 +00:00
{
2015-06-12 15:00:37 +00:00
/* Safety check. * If optional_filename and optional_filename
2015-02-16 02:31:37 +00:00
* exists, we simply return 0,
* hoping that optional_filename is the
* same as requested.
*/
if(path_file_exists(optional_filename))
2015-02-16 02:31:37 +00:00
{
*length = 0;
2015-03-21 08:34:50 +00:00
return 1;
2015-02-16 02:31:37 +00:00
}
}
2015-03-20 16:59:10 +00:00
/* We split carchive path and relative path: */
2015-03-18 05:47:22 +00:00
strlcpy(archive_path, path, sizeof(archive_path));
archive_found = (char*)strchr(archive_path,'#');
2015-03-18 05:47:22 +00:00
rarch_assert(archive_found != NULL);
2015-03-20 16:59:10 +00:00
/* We assure that there is something after the '#' symbol. */
if (strlen(archive_found) <= 1)
{
/*
* This error condition happens for example, when
* path = /path/to/file.7z, or
* path = /path/to/file.7z#
*/
RARCH_ERR("Could not extract image path and carchive path from "
"path: %s.\n", path);
2015-02-16 02:31:37 +00:00
*length = 0;
2015-03-21 08:34:50 +00:00
return 0;
}
/* We split the string in two, by putting a \0, where the hash was: */
2015-02-16 02:31:37 +00:00
*archive_found = '\0';
archive_found += 1;
file_ext = path_get_extension(archive_path);
#ifdef HAVE_7ZIP
if (strcasecmp(file_ext,"7z") == 0)
2015-02-16 02:31:37 +00:00
{
*length = read_7zip_file(archive_path,archive_found,buf,optional_filename);
if (*length != -1)
2015-03-21 08:34:50 +00:00
return 1;
2015-02-16 02:31:37 +00:00
}
#endif
#ifdef HAVE_ZLIB
if (strcasecmp(file_ext,"zip") == 0)
2015-02-16 02:31:37 +00:00
{
*length = read_zip_file(archive_path,archive_found,buf,optional_filename);
if (*length != -1)
2015-03-21 08:34:50 +00:00
return 1;
2015-02-16 02:31:37 +00:00
}
#endif
2015-03-21 08:34:50 +00:00
return 0;
}
#endif
2015-01-08 14:08:44 +00:00
/**
* read_file:
* @path : path to file.
* @buf : buffer to allocate and read the contents of the
* file into. Needs to be freed manually.
2015-02-16 02:31:37 +00:00
* @length : Number of items read, -1 on error.
2015-01-08 14:08:44 +00:00
*
* Read the contents of a file into @buf. Will call read_compressed_file
* if path contains a compressed file, otherwise will call read_generic_file.
*
2015-03-21 08:34:50 +00:00
* Returns: 1 if file read, 0 on error.
2015-01-08 14:08:44 +00:00
*/
2015-02-23 00:27:39 +00:00
int read_file(const char *path, void **buf, ssize_t *length)
{
2015-01-08 14:08:44 +00:00
#ifdef HAVE_COMPRESSION
if (path_contains_compressed_file(path))
2015-03-21 08:34:50 +00:00
{
2015-02-16 02:31:37 +00:00
if (read_compressed_file(path, buf, NULL, length))
2015-03-21 08:34:50 +00:00
return 1;
}
#endif
2015-03-21 08:31:07 +00:00
return read_generic_file(path, buf, length);
2013-10-14 19:08:41 +00:00
}
struct string_list *compressed_file_list_new(const char *path,
const char* ext)
{
#ifdef HAVE_COMPRESSION
const char* file_ext = path_get_extension(path);
#ifdef HAVE_7ZIP
if (strcasecmp(file_ext,"7z") == 0)
return compressed_7zip_file_list_new(path,ext);
#endif
#ifdef HAVE_ZLIB
if (strcasecmp(file_ext,"zip") == 0)
return zlib_get_file_list(path, ext);
#endif
#endif
return NULL;
}