342 lines
8.5 KiB
C
342 lines
8.5 KiB
C
const char amiga_rcs[] = "$Id: amiga.c,v 1.12 2007/01/07 07:40:52 joergs Exp $";
|
||
/*********************************************************************
|
||
*
|
||
* File : $Source: /cvsroot/ijbswa/current/amiga.c,v $
|
||
*
|
||
* Purpose : Amiga-specific declarations.
|
||
*
|
||
* Copyright : Written by and Copyright (C) 2001 the SourceForge
|
||
* Privoxy team. http://www.privoxy.org/
|
||
*
|
||
* This program 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; either version 2 of the License, or (at
|
||
* your option) any later version.
|
||
*
|
||
* This program 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.
|
||
*
|
||
* The GNU General Public License should be included with
|
||
* this file. If not, you can view it at
|
||
* http://www.gnu.org/copyleft/gpl.html
|
||
* or write to the Free Software Foundation, Inc., 59
|
||
* Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||
*
|
||
* Revisions :
|
||
* $Log: amiga.c,v $
|
||
* Revision 1.12 2007/01/07 07:40:52 joergs
|
||
* Added AmigaOS4 support and made it work on AmigaOS 3.x with current sources.
|
||
*
|
||
* Revision 1.11 2006/07/18 14:48:45 david__schmidt
|
||
* Reorganizing the repository: swapping out what was HEAD (the old 3.1 branch)
|
||
* with what was really the latest development (the v_3_0_branch branch)
|
||
*
|
||
* Revision 1.9 2002/03/26 22:29:54 swa
|
||
* we have a new homepage!
|
||
*
|
||
* Revision 1.8 2002/03/25 19:32:15 joergs
|
||
* Name in version string changed from junkbuster to Privoxy.
|
||
*
|
||
* Revision 1.7 2002/03/24 13:25:43 swa
|
||
* name change related issues
|
||
*
|
||
* Revision 1.6 2002/03/09 20:03:52 jongfoster
|
||
* - Making various functions return int rather than size_t.
|
||
* (Undoing a recent change). Since size_t is unsigned on
|
||
* Windows, functions like read_socket that return -1 on
|
||
* error cannot return a size_t.
|
||
*
|
||
* THIS WAS A MAJOR BUG - it caused frequent, unpredictable
|
||
* crashes, and also frequently caused JB to jump to 100%
|
||
* CPU and stay there. (Because it thought it had just
|
||
* read ((unsigned)-1) == 4Gb of data...)
|
||
*
|
||
* - The signature of write_socket has changed, it now simply
|
||
* returns success=0/failure=nonzero.
|
||
*
|
||
* - Trying to get rid of a few warnings --with-debug on
|
||
* Windows, I've introduced a new type "jb_socket". This is
|
||
* used for the socket file descriptors. On Windows, this
|
||
* is SOCKET (a typedef for unsigned). Everywhere else, it's
|
||
* an int. The error value can't be -1 any more, so it's
|
||
* now JB_INVALID_SOCKET (which is -1 on UNIX, and in
|
||
* Windows it maps to the #define INVALID_SOCKET.)
|
||
*
|
||
* - The signature of bind_port has changed.
|
||
*
|
||
* Revision 1.5 2002/03/03 09:18:03 joergs
|
||
* Made jumbjuster work on AmigaOS again.
|
||
*
|
||
* Revision 1.4 2001/10/07 15:35:13 oes
|
||
* Replaced 6 boolean members of csp with one bitmap (csp->flags)
|
||
*
|
||
* Revision 1.3 2001/09/12 22:54:51 joergs
|
||
* Stacksize of main thread increased.
|
||
*
|
||
* Revision 1.2 2001/05/23 00:13:58 joergs
|
||
* AmigaOS support fixed.
|
||
*
|
||
* Revision 1.1.1.1 2001/05/15 13:58:46 oes
|
||
* Initial import of version 2.9.3 source tree
|
||
*
|
||
*
|
||
*********************************************************************/
|
||
|
||
|
||
#include "config.h"
|
||
|
||
#ifdef AMIGA
|
||
|
||
#include <stdio.h>
|
||
#include <signal.h>
|
||
|
||
#include "project.h"
|
||
|
||
const char amiga_h_rcs[] = AMIGA_H_VERSION;
|
||
|
||
static char *ver USED = "$VER: Privoxy " __AMIGAVERSION__ " (" __AMIGADATE__ ")";
|
||
#ifdef __amigaos4__
|
||
static char *stack USED = "$STACK: 524288";
|
||
#else
|
||
unsigned long __stack = 100*1024;
|
||
#endif
|
||
struct Task *main_task = NULL;
|
||
int childs = 0;
|
||
|
||
void serve(struct client_state *csp);
|
||
|
||
SAVEDS ULONG server_thread(void)
|
||
{
|
||
struct client_state *local_csp;
|
||
struct UserData UserData;
|
||
struct Task *me=FindTask(NULL);
|
||
#ifdef __amigaos4__
|
||
struct Library *SocketBase;
|
||
#endif
|
||
|
||
Wait(SIGF_SINGLE);
|
||
local_csp=(struct client_state *)(me->tc_UserData);
|
||
me->tc_UserData=&UserData;
|
||
SocketBase=(APTR)OpenLibrary("bsdsocket.library",3);
|
||
if (SocketBase)
|
||
#ifdef __amigaos4__
|
||
{
|
||
ISocket = (struct SocketIFace *)GetInterface(SocketBase, "main", 1, NULL);
|
||
}
|
||
if (ISocket)
|
||
#endif
|
||
{
|
||
SetErrnoPtr(&(UserData.eno),sizeof(int));
|
||
local_csp->cfd=ObtainSocket(local_csp->cfd, AF_INET, SOCK_STREAM, 0);
|
||
if(JB_INVALID_SOCKET!=local_csp->cfd)
|
||
{
|
||
Signal(main_task,SIGF_SINGLE);
|
||
serve((struct client_state *) local_csp);
|
||
} else {
|
||
local_csp->flags &= ~CSP_FLAG_ACTIVE;
|
||
Signal(main_task,SIGF_SINGLE);
|
||
}
|
||
#ifdef __amigaos4__
|
||
DropInterface((struct Interface *)ISocket);
|
||
#endif
|
||
CloseLibrary(SocketBase);
|
||
} else {
|
||
#ifdef __amigaos4__
|
||
CloseLibrary(SocketBase);
|
||
#endif
|
||
local_csp->flags &= ~CSP_FLAG_ACTIVE;
|
||
Signal(main_task,SIGF_SINGLE);
|
||
}
|
||
childs--;
|
||
return 0;
|
||
}
|
||
|
||
static BPTR olddir;
|
||
|
||
void amiga_exit(void)
|
||
{
|
||
#ifdef __amigaos4__
|
||
if (ISocket)
|
||
#else
|
||
if (SocketBase)
|
||
#endif
|
||
{
|
||
#ifdef __amigaos4__
|
||
struct Library *SocketBase = ISocket->Data.LibBase;
|
||
DropInterface((struct Interface *)ISocket);
|
||
#endif
|
||
CloseLibrary(SocketBase);
|
||
}
|
||
CurrentDir(olddir);
|
||
}
|
||
|
||
#ifndef __amigaos4__
|
||
static struct SignalSemaphore memsem;
|
||
static struct SignalSemaphore *memsemptr = NULL;
|
||
#endif
|
||
static struct UserData GlobalUserData;
|
||
|
||
void InitAmiga(void)
|
||
{
|
||
#ifdef __amigaos4__
|
||
struct Library *SocketBase;
|
||
#endif
|
||
|
||
main_task = FindTask(NULL);
|
||
main_task->tc_UserData = &GlobalUserData;
|
||
|
||
if (((struct Library *)SysBase)->lib_Version < 39)
|
||
{
|
||
exit(RETURN_FAIL);
|
||
}
|
||
|
||
signal(SIGINT,SIG_IGN);
|
||
SocketBase = (APTR)OpenLibrary("bsdsocket.library",3);
|
||
#ifdef __amigaos4__
|
||
if (SocketBase)
|
||
{
|
||
ISocket = (struct SocketIFace *)GetInterface(SocketBase, "main", 1, NULL);
|
||
}
|
||
if (!ISocket)
|
||
#else
|
||
if (!SocketBase)
|
||
#endif
|
||
{
|
||
#ifdef __amigaos4__
|
||
CloseLibrary(SocketBase);
|
||
#endif
|
||
fprintf(stderr, "Can't open bsdsocket.library V3+\n");
|
||
exit(RETURN_ERROR);
|
||
}
|
||
SetErrnoPtr(&(GlobalUserData.eno),sizeof(int));
|
||
#ifndef __amigaos4__
|
||
InitSemaphore(&memsem);
|
||
memsemptr = &memsem;
|
||
#endif
|
||
|
||
olddir=CurrentDir(GetProgramDir());
|
||
atexit(amiga_exit);
|
||
}
|
||
|
||
#ifndef __amigaos4__
|
||
#ifdef __GNUC__
|
||
#ifdef libnix
|
||
/* multithreadingsafe libnix replacements */
|
||
static void *memPool=NULL;
|
||
|
||
void *malloc (size_t s)
|
||
{
|
||
ULONG *mem;
|
||
LONG size = s;
|
||
|
||
if (size<=0)
|
||
{
|
||
return NULL;
|
||
}
|
||
if (!memPool)
|
||
{
|
||
if (!(memPool=CreatePool(MEMF_ANY,32*1024,8*1024)))
|
||
{
|
||
return NULL;
|
||
}
|
||
}
|
||
size += sizeof(ULONG) + MEM_BLOCKMASK;
|
||
size &= ~MEM_BLOCKMASK;
|
||
if (memsemptr)
|
||
{
|
||
ObtainSemaphore(memsemptr);
|
||
}
|
||
if ((mem=AllocPooled(memPool,size)))
|
||
{
|
||
*mem++=size;
|
||
}
|
||
if (memsemptr)
|
||
{
|
||
ReleaseSemaphore(memsemptr);
|
||
}
|
||
return mem;
|
||
}
|
||
|
||
void free (void *m)
|
||
{
|
||
ULONG *mem = m;
|
||
|
||
if(mem && memPool)
|
||
{
|
||
ULONG size=*--mem;
|
||
|
||
if (memsemptr)
|
||
{
|
||
ObtainSemaphore(memsemptr);
|
||
}
|
||
FreePooled(memPool,mem,size);
|
||
if (memsemptr)
|
||
{
|
||
ReleaseSemaphore(memsemptr);
|
||
}
|
||
}
|
||
}
|
||
|
||
void *realloc (void *old, size_t ns)
|
||
{
|
||
void *new;
|
||
LONG osize, *o = old;
|
||
LONG nsize = ns;
|
||
|
||
if (!old)
|
||
{
|
||
return malloc(nsize);
|
||
}
|
||
osize = (*(o-1)) - sizeof(ULONG);
|
||
if (nsize <= osize)
|
||
{
|
||
return old;
|
||
}
|
||
if ((new = malloc(nsize)))
|
||
{
|
||
ULONG *n = new;
|
||
|
||
osize >>= 2;
|
||
while(osize--)
|
||
{
|
||
*n++ = *o++;
|
||
}
|
||
free(old);
|
||
}
|
||
return new;
|
||
}
|
||
|
||
void __memCleanUp (void)
|
||
{
|
||
if (memsemptr)
|
||
{
|
||
ObtainSemaphore(memsemptr);
|
||
}
|
||
if (memPool)
|
||
{
|
||
DeletePool(memPool);
|
||
}
|
||
if (memsemptr)
|
||
{
|
||
ReleaseSemaphore(memsemptr);
|
||
}
|
||
}
|
||
|
||
#define ADD2LIST(a,b,c) asm(".stabs \"_" #b "\"," #c ",0,0,_" #a )
|
||
#define ADD2EXIT(a,pri) ADD2LIST(a,__EXIT_LIST__,22); \
|
||
asm(".stabs \"___EXIT_LIST__\",20,0,0," #pri "+128")
|
||
ADD2EXIT(__memCleanUp,-50);
|
||
#elif !defined(ixemul)
|
||
#error No libnix and no ixemul!?
|
||
#endif /* libnix */
|
||
#else
|
||
#error Only GCC is supported, multithreading safe malloc/free required.
|
||
#endif /* __GNUC__ */
|
||
#endif /* !__amigaos4__ */
|
||
|
||
#endif /* def AMIGA */
|