/*************************************************************************** * _ _ ____ _ * Project ___| | | | _ \| | * / __| | | | |_) | | * | (__| |_| | _ <| |___ * \___|\___/|_| \_\_____| * * Copyright (C) 1998 - 2007, Daniel Stenberg, <daniel@haxx.se>, et al. * * This software is licensed as described in the file COPYING, which * you should have received as part of this distribution. The terms * are also available at http://curl.haxx.se/docs/copyright.html. * * You may opt to use, copy, modify, merge, publish, distribute and/or sell * copies of the Software, and permit persons to whom the Software is * furnished to do so, under the terms of the COPYING file. * * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY * KIND, either express or implied. * * $Id: amigaos.c,v 1.7 2007-02-28 14:45:48 yangtse Exp $ ***************************************************************************/ #ifdef __AMIGA__ /* Any AmigaOS flavour */ #include "amigaos.h" #include <amitcp/socketbasetags.h> struct Library *SocketBase = NULL; extern int errno, h_errno; #ifdef __libnix__ #include <stabs.h> void __request(const char *msg); #else # define __request( msg ) Printf( msg "\n\a") #endif void amiga_cleanup() { if(SocketBase) { CloseLibrary(SocketBase); SocketBase = NULL; } } BOOL amiga_init() { if(!SocketBase) SocketBase = OpenLibrary("bsdsocket.library", 4); if(!SocketBase) { __request("No TCP/IP Stack running!"); return FALSE; } if(SocketBaseTags( SBTM_SETVAL(SBTC_ERRNOPTR(sizeof(errno))), (ULONG) &errno, // SBTM_SETVAL(SBTC_HERRNOLONGPTR), (ULONG) &h_errno, SBTM_SETVAL(SBTC_LOGTAGPTR), (ULONG) "cURL", TAG_DONE)) { __request("SocketBaseTags ERROR"); return FALSE; } #ifndef __libnix__ atexit(amiga_cleanup); #endif return TRUE; } #ifdef __libnix__ ADD2EXIT(amiga_cleanup,-50); #endif #endif /* __AMIGA__ */