netsurf/amiga/fetch_mailto.c
John Mark Bell 68f8fa1059 Include OS3 support header
Squash warning about implicit declaration of free()

svn path=/trunk/netsurf/; revision=11238
2011-01-07 00:14:37 +00:00

151 lines
3.4 KiB
C
Executable File

/*
* Copyright 2008-10 Chris Young <chris@unsatisfactorysoftware.co.uk>
*
* 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/>.
*/
/** \file
* Fetching of data from a file (implementation).
*/
#include "amiga/os3support.h"
#include <string.h>
#include <stdbool.h>
#include <stdlib.h>
#include <proto/exec.h>
#include <proto/dos.h>
#include <proto/utility.h>
#include <proto/openurl.h>
#include <utils/url.h>
struct Library *OpenURLBase;
struct OpenURLIFace *IOpenURL;
struct MinList ami_unsupportedprotocols;
struct ami_protocol
{
struct MinNode node;
char *protocol;
};
struct ami_protocol *ami_openurl_add_protocol(const char *url)
{
struct ami_protocol *ami_p =
(struct ami_protocol *)AllocVec(sizeof(struct ami_protocol),
MEMF_PRIVATE | MEMF_CLEAR);
if(url_scheme(url, &ami_p->protocol) != URL_FUNC_OK)
{
FreeVec(ami_p);
return NULL;
}
AddTail((struct List *)&ami_unsupportedprotocols, (struct Node *)ami_p);
return ami_p;
}
void ami_openurl_free_list(struct MinList *list)
{
struct ami_protocol *node;
struct ami_protocol *nnode;
if(IsMinListEmpty(list)) return;
node = (struct ami_protocol *)GetHead((struct List *)list);
do
{
nnode=(struct ami_protocol *)GetSucc((struct Node *)node);
Remove((struct Node *)node);
if(node->protocol) free(node->protocol);
FreeVec(node);
node = NULL;
}while(node=nnode);
}
BOOL ami_openurl_check_list(struct MinList *list, const char *url)
{
struct ami_protocol *node;
struct ami_protocol *nnode;
if(IsMinListEmpty(list)) return FALSE;
node = (struct ami_protocol *)GetHead((struct List *)list);
do
{
nnode=(struct ami_protocol *)GetSucc((struct Node *)node);
if(!strncasecmp(url, node->protocol, strlen(node->protocol)))
return TRUE;
}while(node=nnode);
return FALSE;
}
/**
* Initialise the fetcher.
*
* Must be called once before any other function.
*/
void ami_openurl_open(void)
{
struct ami_protocol *ami_p;
if(OpenURLBase = OpenLibrary("openurl.library",0))
{
IOpenURL = (struct OpenURLIFace *)GetInterface(OpenURLBase,"main",1,NULL);
}
NewMinList(&ami_unsupportedprotocols);
ami_openurl_add_protocol("about:");
ami_openurl_add_protocol("javascript:");
}
void ami_openurl_close(const char *scheme)
{
if(IOpenURL) DropInterface((struct Interface *)IOpenURL);
if(OpenURLBase) CloseLibrary(OpenURLBase);
ami_openurl_free_list(&ami_unsupportedprotocols);
}
void gui_launch_url(const char *url)
{
APTR procwin = SetProcWindow((APTR)-1L);
char *launchurl = NULL;
BPTR fptr = 0;
if(ami_openurl_check_list(&ami_unsupportedprotocols, url) == FALSE)
{
launchurl = ASPrintf("URL:%s",url);
if(launchurl)
{
fptr = Open(launchurl,MODE_OLDFILE);
if(fptr) Close(fptr);
else ami_openurl_add_protocol(url);
}
else if(IOpenURL)
URL_OpenA(url,NULL);
FreeVec(launchurl);
}
SetProcWindow(procwin);
}