• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /***************************************************************************
2  *                                  _   _ ____  _
3  *  Project                     ___| | | |  _ \| |
4  *                             / __| | | | |_) | |
5  *                            | (__| |_| |  _ <| |___
6  *                             \___|\___/|_| \_\_____|
7  *
8  * Copyright (C) 1998 - 2016, Daniel Stenberg, <daniel@haxx.se>, et al.
9  *
10  * This software is licensed as described in the file COPYING, which
11  * you should have received as part of this distribution. The terms
12  * are also available at https://curl.haxx.se/docs/copyright.html.
13  *
14  * You may opt to use, copy, modify, merge, publish, distribute and/or sell
15  * copies of the Software, and permit persons to whom the Software is
16  * furnished to do so, under the terms of the COPYING file.
17  *
18  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
19  * KIND, either express or implied.
20  *
21  ***************************************************************************/
22 
23 #include "curl_setup.h"
24 
25 #if defined(__AMIGA__) && !defined(__ixemul__)
26 
27 #include <amitcp/socketbasetags.h>
28 
29 #include "amigaos.h"
30 
31 struct Library *SocketBase = NULL;
32 extern int errno, h_errno;
33 
34 #ifdef __libnix__
35 #include <stabs.h>
36 void __request(const char *msg);
37 #else
38 # define __request(msg)       Printf(msg "\n\a")
39 #endif
40 
Curl_amiga_cleanup()41 void Curl_amiga_cleanup()
42 {
43   if(SocketBase) {
44     CloseLibrary(SocketBase);
45     SocketBase = NULL;
46   }
47 }
48 
Curl_amiga_init()49 bool Curl_amiga_init()
50 {
51   if(!SocketBase)
52     SocketBase = OpenLibrary("bsdsocket.library", 4);
53 
54   if(!SocketBase) {
55     __request("No TCP/IP Stack running!");
56     return FALSE;
57   }
58 
59   if(SocketBaseTags(SBTM_SETVAL(SBTC_ERRNOPTR(sizeof(errno))), (ULONG) &errno,
60                     SBTM_SETVAL(SBTC_LOGTAGPTR), (ULONG) "cURL",
61                     TAG_DONE)) {
62     __request("SocketBaseTags ERROR");
63     return FALSE;
64   }
65 
66 #ifndef __libnix__
67   atexit(Curl_amiga_cleanup);
68 #endif
69 
70   return TRUE;
71 }
72 
73 #ifdef __libnix__
74 ADD2EXIT(Curl_amiga_cleanup, -50);
75 #endif
76 
77 #endif /* __AMIGA__ && ! __ixemul__ */
78