const char amiga_rcs[] = "$Id: amiga.c,v 1.15 2012/03/09 16:23:50 fabiankeil 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. * *********************************************************************/ #include "config.h" #ifdef AMIGA #include #include #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 */