diff options
Diffstat (limited to 'atari/file.c')
| -rw-r--r-- | atari/file.c | 294 |
1 files changed, 0 insertions, 294 deletions
diff --git a/atari/file.c b/atari/file.c deleted file mode 100644 index 499edd627..000000000 --- a/atari/file.c +++ /dev/null @@ -1,294 +0,0 @@ -/* - * Copyright 2014 Ole Loots <ole@monochrom.net> - * - * This file is part of NetSurf, http://www.netsurf-browser.org/ - * - * NetSurf is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; version 2 of the License. - * - * NetSurf is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program. If not, see <http://www.gnu.org/licenses/>. - */ - - -#include <stdarg.h> -#include <string.h> -#include <stdio.h> -#include <sys/types.h> -#include <sys/stat.h> -#include <unistd.h> - -#include "utils/utils.h" -#include "utils/corestrings.h" -#include "utils/url.h" -#include "utils/nsurl.h" -#include "utils/file.h" -#include "utils/string.h" - -/** - * \file - * Atari file handling callbacks. - * - * Most of this code was taken from windows/gui.c - */ - -/** - * Generate a GEMDOS path from one or more component elemnts. - * - * If a string is allocated it must be freed by the caller. - * - * @param[in,out] str pointer to string pointer if this is NULL enough - * storage will be allocated for the complete path. - * @param[in,out] size The size of the space available if \a str not - * NULL on input and if not NULL set to the total - * output length on output. - * @param[in] nelm The number of elements. - * @param[in] ap The elements of the path as string pointers. - * @return NSERROR_OK and the complete path is written to str - * or error code on faliure. - */ -static nserror atari_mkpath(char **str, size_t *size, size_t nelm, va_list ap) -{ - return vsnstrjoin(str, size, '\\', nelm, ap); -} - -/** - * Get the basename of a file using GEMDOS path handling. - * - * This gets the last element of a path and returns it. - * - * @param[in] path The path to extract the name from. - * @param[in,out] str Pointer to string pointer if this is NULL enough - * storage will be allocated for the path element. - * @param[in,out] size The size of the space available if \a - * str not NULL on input and set to the total - * output length on output. - * @return NSERROR_OK and the complete path is written to str - * or error code on faliure. - */ -static nserror atari_basename(const char *path, char **str, size_t *size) -{ - const char *leafname; - char *fname; - - if (path == NULL) { - return NSERROR_BAD_PARAMETER; - } - - leafname = strrchr(path, '\\'); - if (!leafname) { - leafname = path; - } else { - leafname += 1; - } - - fname = strdup(leafname); - if (fname == NULL) { - return NSERROR_NOMEM; - } - - *str = fname; - if (size != NULL) { - *size = strlen(fname); - } - return NSERROR_OK; -} - -/** - * Create a path from a nsurl using GEMDOS file handling. - * - * @param[in] url The url to encode. - * @param[out] path_out A string containing the result path which should - * be freed by the caller. - * @return NSERROR_OK and the path is written to \a path or error code - * on faliure. - */ -static nserror atari_nsurl_to_path(struct nsurl *url, char **path_out) -{ - lwc_string *urlpath; - char *path; - bool match; - lwc_string *scheme; - nserror res; - - if ((url == NULL) || (path_out == NULL)) { - return NSERROR_BAD_PARAMETER; - } - - scheme = nsurl_get_component(url, NSURL_SCHEME); - - if (lwc_string_caseless_isequal(scheme, corestring_lwc_file, - &match) != lwc_error_ok) - { - return NSERROR_BAD_PARAMETER; - } - lwc_string_unref(scheme); - if (match == false) { - return NSERROR_BAD_PARAMETER; - } - - urlpath = nsurl_get_component(url, NSURL_PATH); - if (urlpath == NULL) { - return NSERROR_BAD_PARAMETER; - } - - res = url_unescape(lwc_string_data(urlpath), &path); - lwc_string_unref(urlpath); - if (res != NSERROR_OK) { - return res; - } - - /* if there is a drive: prefix treat path as DOS filename */ - if ((path[2] == ':') || (path[2] == '|')) { - - /* move the string down to remove leading / note the - * strlen is *not* copying too much data as we are - * moving the null too! - */ - memmove(path, path + 1, strlen(path)); - } - /* if the path does not have a drive letter we return the - * complete path. - */ - /** @todo Need to check returning the unaltered path in this - * case is correct - */ - - *path_out = path; - - return NSERROR_OK; -} - -/** - * Create a nsurl from a path using GEMDOS file handling. - * - * Perform the necessary operations on a path to generate a nsurl. - * - * @param[in] path The path to convert. - * @param[out] url_out pointer to recive the nsurl, The returned url - * should be unreferenced by the caller. - * @return NSERROR_OK and the url is placed in \a url or error code on - * faliure. - */ -static nserror atari_path_to_nsurl(const char *path, struct nsurl **url_out) -{ - nserror ret; - int urllen; - char *urlstr; - char *escpath; /* escaped version of the path */ - char *escpaths; - - if ((path == NULL) || (url_out == NULL) || (*path == 0)) { - return NSERROR_BAD_PARAMETER; - } - - /* escape the path so it can be placed in a url */ - ret = url_escape(path, 0, false, "/", &escpath); - if (ret != NSERROR_OK) { - return ret; - } - /* remove unecessary / as file: paths are already absolute */ - escpaths = escpath; - while (*escpaths == '/') { - escpaths++; - } - - /* build url as a string for nsurl constructor */ - urllen = strlen(escpaths) + FILE_SCHEME_PREFIX_LEN + 1; - urlstr = malloc(urllen); - if (urlstr == NULL) { - free(escpath); - return NSERROR_NOMEM; - } - - snprintf(urlstr, urllen, "%s%s", FILE_SCHEME_PREFIX, escpaths); - free(escpath); - - ret = nsurl_create(urlstr, url_out); - free(urlstr); - - return ret; -} - -/** - * Ensure that all directory elements needed to store a filename exist. - * - * @param fname The filename to ensure the path to exists. - * @return NSERROR_OK on success or error code on failure. - */ -static nserror atari_mkdir_all(const char *fname) -{ - char *dname; - char *sep; - struct stat sb; - - dname = strdup(fname); - - sep = strrchr(dname, '/'); - if (sep == NULL) { - /* no directory separator path is just filename so its ok */ - free(dname); - return NSERROR_OK; - } - - *sep = 0; /* null terminate directory path */ - - if (stat(dname, &sb) == 0) { - free(dname); - if (S_ISDIR(sb.st_mode)) { - /* path to file exists and is a directory */ - return NSERROR_OK; - } - return NSERROR_NOT_DIRECTORY; - } - *sep = '/'; /* restore separator */ - - sep = dname; - while (*sep == '/') { - sep++; - } - while ((sep = strchr(sep, '/')) != NULL) { - *sep = 0; - if (stat(dname, &sb) != 0) { - if (nsmkdir(dname, S_IRWXU) != 0) { - /* could not create path element */ - free(dname); - return NSERROR_NOT_FOUND; - } - } else { - if (! S_ISDIR(sb.st_mode)) { - /* path element not a directory */ - free(dname); - return NSERROR_NOT_DIRECTORY; - } - } - *sep = '/'; /* restore separator */ - /* skip directory separators */ - while (*sep == '/') { - sep++; - } - } - - free(dname); - return NSERROR_OK; -} - - -/* atari file handling table */ -static struct gui_file_table file_table = { - .mkpath = atari_mkpath, - .basename = atari_basename, - .nsurl_to_path = atari_nsurl_to_path, - .path_to_nsurl = atari_path_to_nsurl, - .mkdir_all = atari_mkdir_all, -}; - -struct gui_file_table *atari_file_table = &file_table; - - |