Deleted config.h and pcrs/chartables.h because they are auto
[privoxy.git] / amiga.c
1 const char amiga_rcs[] = "$Id: amiga.c,v 1.1.1.1 2001/05/15 13:58:46 oes Exp $";
2 /*********************************************************************
3  *
4  * File        :  $Source: /cvsroot/ijbswa/current/amiga.c,v $
5  *
6  * Purpose     :  Amiga-specific declarations.
7  *
8  * Copyright   :  Written by and Copyright (C) 2001 the SourceForge
9  *                IJBSWA team.  http://ijbswa.sourceforge.net
10  *
11  *                This program is free software; you can redistribute it 
12  *                and/or modify it under the terms of the GNU General
13  *                Public License as published by the Free Software
14  *                Foundation; either version 2 of the License, or (at
15  *                your option) any later version.
16  *
17  *                This program is distributed in the hope that it will
18  *                be useful, but WITHOUT ANY WARRANTY; without even the
19  *                implied warranty of MERCHANTABILITY or FITNESS FOR A
20  *                PARTICULAR PURPOSE.  See the GNU General Public
21  *                License for more details.
22  *
23  *                The GNU General Public License should be included with
24  *                this file.  If not, you can view it at
25  *                http://www.gnu.org/copyleft/gpl.html
26  *                or write to the Free Software Foundation, Inc., 59
27  *                Temple Place - Suite 330, Boston, MA  02111-1307, USA.
28  *
29  * Revisions   :
30  *    $Log: amiga.c,v $
31  *    Revision 1.1.1.1  2001/05/15 13:58:46  oes
32  *    Initial import of version 2.9.3 source tree
33  *
34  *
35  *********************************************************************/
36 \f
37
38 #include "config.h"
39
40 #ifdef AMIGA
41
42 #include <stdio.h>
43 #include <signal.h>
44
45 #include "project.h"
46
47 const char amiga_h_rcs[] = AMIGA_H_VERSION;
48
49 unsigned long __stack = 20*1024;
50 static char ver[] = "$VER: junkbuster " __AMIGAVERSION__ " (" __AMIGADATE__ ")";
51 struct Task *main_task = NULL;
52 int childs = 0;
53
54 void serve(struct client_state *csp);
55
56 __saveds ULONG server_thread(void)
57 {
58    struct client_state *local_csp;
59    struct UserData UserData;
60    struct Task *me=FindTask(NULL);
61
62    Wait(SIGF_SINGLE);
63    local_csp=(struct client_state *)(me->tc_UserData);
64    me->tc_UserData=&UserData;
65    SocketBase=(APTR)OpenLibrary("bsdsocket.library",3);
66    if(SocketBase)
67    {
68       SetErrnoPtr(&(UserData.eno),sizeof(int));
69       local_csp->cfd=ObtainSocket(local_csp->cfd, AF_INET, SOCK_STREAM, 0);
70       if(-1!=local_csp->cfd)
71       {
72          Signal(main_task,SIGF_SINGLE);
73          serve((struct client_state *) local_csp);
74       } else {
75          local_csp->active = 0;
76          Signal(main_task,SIGF_SINGLE);
77       }
78       CloseLibrary(SocketBase);
79    } else {
80       local_csp->active = 0;
81       Signal(main_task,SIGF_SINGLE);
82    }
83    childs--;
84    return 0;
85 }
86
87 void amiga_exit(void)
88 {
89    if(SocketBase)
90    {
91       CloseLibrary(SocketBase);
92    }
93 }
94
95 static struct SignalSemaphore memsem;
96 static struct SignalSemaphore *memsemptr = NULL;
97 static struct UserData GlobalUserData;
98
99 void InitAmiga(void)
100 {
101    main_task = FindTask(NULL);
102    main_task->tc_UserData = &GlobalUserData;
103
104    if (((struct Library *)SysBase)->lib_Version < 39)
105    {
106       exit(RETURN_FAIL);
107    }
108
109    signal(SIGINT,SIG_IGN);
110    SocketBase = (APTR)OpenLibrary("bsdsocket.library",3);
111    if (!SocketBase)
112    {
113       fprintf(stderr, "Can't open bsdsocket.library V3+\n");
114       exit(RETURN_ERROR);
115    }
116    SetErrnoPtr(&(GlobalUserData.eno),sizeof(int));
117    InitSemaphore(&memsem);
118    memsemptr = &memsem;
119
120    atexit(amiga_exit);
121 }
122
123 #ifdef __GNUC__
124 #ifdef libnix
125 /* multitaskingsafe libnix replacements */
126 static void *memPool=NULL;
127
128 void *malloc (size_t s)
129 {
130    ULONG *mem;
131    LONG size = s;
132
133    if (size<=0)
134    {
135       return NULL;
136    }
137    if (!memPool)
138    {
139       if (!(memPool=CreatePool(MEMF_ANY,32*1024,8*1024)))
140       {
141          return NULL;
142       }
143    }
144    size += sizeof(ULONG) + MEM_BLOCKMASK;
145    size &= ~MEM_BLOCKMASK;
146    if (memsemptr)
147    {
148       ObtainSemaphore(memsemptr);
149    }
150    if ((mem=AllocPooled(memPool,size)))
151    {
152       *mem++=size;
153    }
154    if (memsemptr)
155    {
156       ReleaseSemaphore(memsemptr);
157    }
158    return mem;
159 }
160
161 void free (void *m)
162 {
163    ULONG *mem = m;
164
165    if(mem && memPool)
166    {
167       ULONG size=*--mem;
168
169       if (memsemptr)
170       {
171          ObtainSemaphore(memsemptr);
172       }
173       FreePooled(memPool,mem,size);
174       if (memsemptr)
175       {
176          ReleaseSemaphore(memsemptr);
177       }
178    }
179 }
180
181 void *realloc (void *old, size_t ns)
182 {
183    void *new;
184    LONG osize, *o = old;
185    LONG nsize = ns;
186
187    if (!old)
188    {
189       return malloc(nsize);
190    }
191    osize = (*(o-1)) - sizeof(ULONG);
192    if (nsize <= osize)
193    {
194       return old;
195    }
196    if ((new = malloc(nsize)))
197    {
198       ULONG *n = new;
199
200       osize >>= 2;
201       while(osize--)
202       {
203          *n++ = *o++;
204       }
205       free(old);
206    }
207    return new;
208 }
209
210 void __memCleanUp (void)
211 {
212    if (memsemptr)
213    {
214       ObtainSemaphore(memsemptr);
215    }
216    if (memPool)
217    {
218       DeletePool(memPool);
219    }
220    if (memsemptr)
221    {
222       ReleaseSemaphore(memsemptr);
223    }
224 }
225
226 #define ADD2LIST(a,b,c) asm(".stabs \"_" #b "\"," #c ",0,0,_" #a )
227 #define ADD2EXIT(a,pri) ADD2LIST(a,__EXIT_LIST__,22); \
228                         asm(".stabs \"___EXIT_LIST__\",20,0,0," #pri "+128")
229 ADD2EXIT(__memCleanUp,-50);
230 #elif !defined(ixemul)
231 #error No libnix and no ixemul!?
232 #endif /* libnix */
233 #else
234 #error Only GCC is supported, multitasking safe malloc/free required.
235 #endif /* __GNUC__ */
236
237 #endif /* def AMIGA */