mirror of
https://github.com/netsurf-browser/netsurf
synced 2024-12-23 04:26:50 +03:00
a122b94efd
This removes the toskip parameter, which was only used by the RISC OS front end. The toskip param was used to skip 8 characters which did not need to be escaped from the start of the URL. The RISC OS front end now orders the steps of its URL construction to avoid the need for this.
299 lines
7.3 KiB
C
299 lines
7.3 KiB
C
/*
|
|
* 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;
|
|
size_t path_len;
|
|
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),
|
|
lwc_string_length(urlpath),
|
|
&path_len,
|
|
&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, path_len);
|
|
}
|
|
/* 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, 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;
|
|
|
|
|