This commit was manufactured by cvs2svn to create tag 'LIB_V1_2'.

git-svn-id: file:///Users/olsen/Code/migration-svn-zu-git/logical-line-staging/clib2/tags/LIB_V1_2@15003 87f5fb63-7c3d-0410-a384-fd976d0f7a62

library/amiga.lib_rev.c

@@ -1,38 +0,0 @@
-/*
- * $Id: amiga.lib_rev.c,v 1.2 2005-01-02 09:07:06 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "amiga.lib_rev.h"
-
-/****************************************************************************/
-
-char __amiga_lib_version[] = VERSTAG;

library/amiga.lib_rev.h

@@ -1,6 +0,0 @@
-#define VERSION		1
-#define REVISION	189
-#define DATE		"5.3.2005"
-#define VERS		"amiga.lib 1.189"
-#define VSTRING		"amiga.lib 1.189 (5.3.2005)\r\n"
-#define VERSTAG		"\0$VER: amiga.lib 1.189 (5.3.2005)"

library/amiga.lib_rev.rev

@@ -1 +0,0 @@
-189

library/amiga_acrypt.c

@@ -1,102 +0,0 @@
-/*
- * $Id: amiga_acrypt.c,v 1.2 2005-01-02 09:07:06 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <exec/types.h>
-#include <string.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-#define OSIZE 12
-
-/****************************************************************************/
-
-UBYTE *
-ACrypt(UBYTE * buffer, const UBYTE * password, const UBYTE * user)
-{
-	UBYTE * result = NULL;
-	LONG buf[OSIZE];
-	LONG i,d,k;
-
-	ENTER();
-
-	assert( buffer != NULL && password != NULL && user != NULL );
-
-	SHOWPOINTER(buffer);
-	SHOWSTRING(password);
-	SHOWSTRING(user);
-
-	if(buffer == NULL || password == NULL || user == NULL)
-	{
-		SHOWMSG("invalid parameters");
-		goto out;
-	}
-
-	for(i = 0 ; i < OSIZE ; i++)
-	{
-		if((*password) != '\0')
-			d = (*password++);
-		else
-			d = i;
-
-		if((*user) != '\0')
-			d += (*user++);
-		else
-			d += i;
-
-		buf[i] = 'A' + d;
-	}
-
-	for(i = 0 ; i < OSIZE ; i++)
-	{
-		for(k = 0 ; k < OSIZE ; k++)
-			buf[i] = (buf[i] + buf[OSIZE - k - 1]) % 53;
-
-		buffer[i] = buf[i] + 'A';
-	}
-
-	buffer[OSIZE-1] = '\0';
-
-	SHOWSTRING(buffer);
-
-	result = buffer;
-
- out:
-
-	RETURN(result);
-	return(result);
-}

library/amiga_addtof.c

@@ -1,83 +0,0 @@
-/*
- * $Id: amiga_addtof.c,v 1.3 2005-02-25 10:14:20 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <exec/interrupts.h>
-#include <hardware/intbits.h>
-#include <graphics/graphint.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <proto/graphics.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "macros.h"
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-typedef LONG (* CFUNC)(APTR arg);
-
-/****************************************************************************/
-
-STATIC LONG INTERRUPT ASM
-call_routine(REG(a1,struct Isrvstr *i))
-{
-	CFUNC p = (CFUNC)i->ccode;
-
-	(*p)(i->Carg);
-
-	return(0);
-}
-
-/****************************************************************************/
-
-VOID
-AddTOF(struct Isrvstr *i,CFUNC p,APTR arg)
-{
-	assert( i != NULL && p != NULL );
-
-	i->code		= (long (*)())call_routine;
-	i->Iptr		= i;
-	i->ccode	= p;
-	i->Carg		= arg;
-
-	AddIntServer(INTB_VERTB,(struct Interrupt *)i);
-}

library/amiga_argarraydone.c

@@ -1,71 +0,0 @@
-/*
- * $Id: amiga_argarraydone.c,v 1.2 2005-01-02 09:07:06 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <workbench/workbench.h>
-#include <exec/memory.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <proto/icon.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-extern char **CXLIB_argarray;
-
-extern struct DiskObject * CXLIB_disko;
-
-/****************************************************************************/
-
-VOID
-ArgArrayDone(VOID)
-{
-	if(CXLIB_argarray != NULL)
-	{
-		FreeVec(CXLIB_argarray);
-		CXLIB_argarray = NULL;
-	}
-
-	if(CXLIB_disko != NULL)
-	{
-		FreeDiskObject(CXLIB_disko);
-		CXLIB_disko = NULL;
-	}
-}

library/amiga_argarrayinit.c

@@ -1,99 +0,0 @@
-/*
- * $Id: amiga_argarrayinit.c,v 1.2 2005-01-02 09:07:06 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <libraries/commodities.h>
-#include <workbench/workbench.h>
-#include <workbench/startup.h>
-#include <exec/memory.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <proto/dos.h>
-#include <proto/icon.h>
-#include <proto/commodities.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-const unsigned char ** CXLIB_argarray;
-
-struct DiskObject * CXLIB_disko;
-
-/****************************************************************************/
-
-STRPTR *
-ArgArrayInit(LONG argc, CONST_STRPTR * argv)
-{
-	unsigned char ** result = NULL;
-
-	if(argc != 0) /* run from CLI */
-	{
-		int i;
-
-		if(argc == 1)
-			goto out; /* skip command name */
-
-		CXLIB_argarray = (const unsigned char **)AllocVec(sizeof(char *) * argc,MEMF_ANY|MEMF_CLEAR);
-		if(CXLIB_argarray == NULL)
-			goto out;
-
-		for(i = 1 ; i < argc ; i++)
-			CXLIB_argarray[i-1] = argv[i];
-
-		result = (unsigned char **)CXLIB_argarray;
-	}
-	else if (IconBase != NULL)
-	{
-		struct WBStartup * msg;
-
-		/* run from WB */
-		msg = (struct WBStartup *)argv;
-
-		CXLIB_disko = GetDiskObject(msg->sm_ArgList[0].wa_Name);
-		if(CXLIB_disko == NULL)
-			goto out;
-
-		result = (unsigned char **)CXLIB_disko->do_ToolTypes;
-	}
-
- out:
-
-	return(result);
-}

library/amiga_argint.c

@@ -1,60 +0,0 @@
-/*
- * $Id: amiga_argint.c,v 1.2 2005-01-02 09:07:06 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <workbench/workbench.h>
-#include <exec/memory.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/dos.h>
-#include <proto/icon.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-LONG
-ArgInt(CONST_STRPTR *tt,CONST_STRPTR entry,LONG default_val)
-{
-	STRPTR str;
-
-	if(tt != NULL && IconBase != NULL && ((str = (STRPTR)FindToolType((STRPTR *)tt,(STRPTR)entry))) != NULL)
-		StrToLong(str,&default_val);
-
-	return(default_val);
-}

library/amiga_argstring.c

@@ -1,61 +0,0 @@
-/*
- * $Id: amiga_argstring.c,v 1.2 2005-01-02 09:07:06 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <libraries/commodities.h>
-#include <workbench/workbench.h>
-#include <workbench/startup.h>
-#include <exec/memory.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/icon.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-STRPTR
-ArgString(CONST_STRPTR *tt,CONST_STRPTR entry,CONST_STRPTR default_string)
-{
-	STRPTR result;
-
-	if(tt != NULL && IconBase != NULL && ((result = (STRPTR)FindToolType((STRPTR *)tt,(STRPTR)entry))) != NULL)
-		return(result);
-	else
-		return((STRPTR)default_string);
-}

library/amiga_beginio.c

@@ -1,120 +0,0 @@
-/*
- * $Id: amiga_beginio.c,v 1.3 2005-01-02 09:07:06 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <exec/devices.h>
-#include <exec/io.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-#ifndef __PPC__
-
-/****************************************************************************/
-
-#if defined(__SASC)
-
-VOID __begin_io(struct IORequest * ior);
-#pragma libcall DeviceBase __begin_io 01e 901
-
-#endif /* __SASC */
-
-/****************************************************************************/
-
-#if defined(__GNUC__)
-
-#define __begin_io(ior) ({ \
-  struct IORequest * _BeginIO_ior = (ior); \
-  { \
-  register struct Library * const __BeginIO__bn __asm("a6") = (struct Library *) (DeviceBase);\
-  register struct IORequest * __BeginIO_ior __asm("a1") = (_BeginIO_ior); \
-  __asm volatile ("jsr a6@(-30:W)" \
-  : \
-  : "r"(__BeginIO__bn), "r"(__BeginIO_ior)  \
-  : "d0", "d1", "a0", "a1", "fp0", "fp1", "cc", "memory"); \
-  } \
-})
-
-#endif /* __GNUC__ */
-
-/****************************************************************************/
-
-VOID
-BeginIO(struct IORequest *ior)
-{
-	struct Device * DeviceBase;
-
-	ENTER();
-
-	assert( ior != NULL && ior->io_Device != NULL );
-
-	DeviceBase = ior->io_Device;
-	__begin_io(ior);
-
-	LEAVE();
-}
-
-/****************************************************************************/
-
-#else
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-
-/****************************************************************************/
-
-#if defined(BeginIO)
-#undef BeginIO
-#endif /* BeginIO */
-
-/****************************************************************************/
-
-VOID
-BeginIO(struct IORequest *ior)
-{
-	ENTER();
-
-	assert( ior != NULL && ior->io_Device != NULL );
-
-	IExec->BeginIO(ior);
-
-	LEAVE();
-}
-
-/****************************************************************************/
-
-#endif /* __PPC__ */

library/amiga_callhook.c

@@ -1,67 +0,0 @@
-/*
- * $Id: amiga_callhook.c,v 1.2 2005-01-02 09:07:06 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef __PPC__
-
-/****************************************************************************/
-
-#include <clib/alib_protos.h>
-
-#include <stdarg.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-ULONG
-CallHook(struct Hook *hook_ptr,Object *obj,...)
-{
-	ULONG result;
-	va_list arg;
-
-	assert( hook_ptr != NULL );
-
-	va_start(arg,obj);
-
-	result = CallHookA(hook_ptr,obj,(APTR)arg);
-
-	va_end(arg);
-
-	return(result);
-}
-
-/****************************************************************************/
-
-#endif /* __PPC__ */

library/amiga_callhooka.asm

@@ -1,80 +0,0 @@
-*
-*	$Id: amiga_callhooka.asm,v 1.2 2005-01-02 09:07:06 obarthel Exp $
-*
-*	:ts=8
-*
-*	Portable ISO 'C' (1994) runtime library for the Amiga computer
-*	Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
-*	All rights reserved.
-*
-*	Redistribution and use in source and binary forms, with or without
-*	modification, are permitted provided that the following conditions
-*	are met:
-*
-*	  - Redistributions of source code must retain the above copyright
-*	    notice, this list of conditions and the following disclaimer.
-*
-*	  - Neither the name of Olaf Barthel nor the names of contributors
-*	    may be used to endorse or promote products derived from this
-*	    software without specific prior written permission.
-*
-*	THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
-*	AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-*	IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-*	ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
-*	LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
-*	CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
-*	SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
-*	INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
-*	CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
-*	ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
-*	POSSIBILITY OF SUCH DAMAGE.
-*
-
-	section	text,code
-
-h_Entry equ 8
-
-	xdef	_CallHookA
-
-****************************************************************************
-* new hook standard
-* use struct Hook (with minnode at the top)
-*
-* *** register calling convention: ***
-*       A0 - pointer to hook itself
-*       A1 - pointer to parameter packed ("message")
-*       A2 - Hook specific address data ("object," e.g, gadget )
-*
-* ***  C conventions: ***
-* Note that parameters are in unusual register order: a0, a2, a1.
-* This is to provide a performance boost for assembly language
-* programming (the object in a2 is most frequently untouched).
-* It is also no problem in "register direct" C function parameters.
-*
-* calling through a hook
-*       CallHook( hook, object, msgid, p1, p2, ... );
-*       CallHookA( hook, object, msgpkt );
-*
-* using a C function:   CFunction( hook, object, message );
-*       hook.h_Entry = HookEntry;
-*       hook.h_SubEntry = CFunction;
-*
-****************************************************************************
-
-* C calling hook interface for prepared message packet
-_CallHookA:
-	movem.l	a2/a6,-(sp)
-	move.l	12(sp),a0
-	move.l	16(sp),a2
-	move.l	20(sp),a1
-	pea.l	hook_return(pc)
-	move.l	h_Entry(a0),-(sp)
-	rts
-
-hook_return:
-
-	movem.l	(sp)+,a2/a6
-	rts
-
-	end

library/amiga_callhooka.c

@@ -1,93 +0,0 @@
-/*
- * $Id: amiga_callhooka.c,v 1.2 2005-01-02 09:07:06 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#if (defined(__GNUC__) && !defined(__PPC__))
-
-/****************************************************************************/
-
-asm("
-
-h_Entry = 8
-
-	.text
-	.even
-
-|---------------------------------------------------------------------------
-| new hook standard
-| use struct Hook (with minnode at the top)
-|
-| *** register calling convention: ***
-|	A0 - pointer to hook itself
-|	A1 - pointer to parameter packed ('message')
-|	A2 - Hook specific address data ('object,' e.g, gadget )
-|
-| ***  C conventions: ***
-| Note that parameters are in unusual register order: a0, a2, a1.
-| This is to provide a performance boost for assembly language
-| programming (the object in a2 is most frequently untouched).
-| It is also no problem in 'register direct' C function parameters.
-|
-| calling through a hook
-|	CallHook( hook, object, msgid, p1, p2, ... );
-|	CallHookA( hook, object, msgpkt );
-|
-| using a C function:	CFunction( hook, object, message );
-|	hook.h_Entry = HookEntry;
-|	hook.h_SubEntry = CFunction;
-|
-|---------------------------------------------------------------------------
-
-| C calling hook interface for prepared message packet
-
-	.globl	_CallHookA
-
-_CallHookA:
-
-	moveml	a2/a6,sp@-
-	moveal	sp@(12),a0
-	moveal	sp@(16),a2
-	moveal	sp@(20),a1
-	pea		callhooka_return
-	movel	a0@(h_Entry),sp@-
-	rts
-
-callhooka_return:
-
-	moveml	sp@+,a2/a6
-	rts
-
-");
-
-/****************************************************************************/
-
-#endif /* __GNUC__ && !__PPC__ */

library/amiga_coercemethod.c

@@ -1,93 +0,0 @@
-/*
- * $Id: amiga_coercemethod.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef __PPC__
-
-/****************************************************************************/
-
-#include <intuition/intuition.h>
-#include <intuition/classes.h>
-
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-ULONG
-CoerceMethodA(Class * cl,Object * obj,Msg msg)
-{
-	ULONG result = 0;
-
-	ENTER();
-
-	SHOWPOINTER(cl);
-	SHOWPOINTER(obj);
-	SHOWPOINTER(msg);
-
-	assert( cl != NULL && obj != NULL );
-
-	if(cl != NULL && obj != NULL)
-		result = CallHookA(&cl->cl_Dispatcher,obj,msg);
-
-	RETURN(result);
-	return(result);
-}
-
-/****************************************************************************/
-
-ULONG
-CoerceMethod(Class *cl, Object *obj, ULONG method_id, ...)
-{
-	ULONG result = 0;
-
-	ENTER();
-
-	SHOWPOINTER(cl);
-	SHOWPOINTER(obj);
-	SHOWVALUE(method_id);
-
-	assert( cl != NULL && obj != NULL );
-
-	if(cl != NULL && obj != NULL)
-		result = CoerceMethodA(cl,obj,(Msg)&method_id);
-
-	RETURN(result);
-	return(result);
-}
-
-/****************************************************************************/
-
-#endif /* __PPC__ */

library/amiga_createextio.c

@@ -1,68 +0,0 @@
-/*
- * $Id: amiga_createextio.c,v 1.3 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-#if defined(CreateExtIO)
-#undef CreateExtIO
-#endif /* CreateExtIO */
-
-/****************************************************************************/
-
-struct IORequest *
-CreateExtIO(CONST struct MsgPort * port, LONG io_size)
-{
-	struct IORequest * result = NULL;
-
-	assert( port != NULL && io_size > 0 );
-
-	if(port == NULL || io_size < (LONG)sizeof(*result))
-		goto out;
-
-	result = CreateIORequest(port,(ULONG)io_size);
-
- out:
-
-	return(result);
-}

library/amiga_createport.c

@@ -1,75 +0,0 @@
-/*
- * $Id: amiga_createport.c,v 1.3 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-#if defined(CreatePort)
-#undef CreatePort
-#endif /* CreatePort */
-
-/****************************************************************************/
-
-struct MsgPort *
-CreatePort(CONST_STRPTR name, LONG pri)
-{
-	struct MsgPort * result = NULL;
-
-	assert( -128 <= pri && pri <= 127 );
-
-	if(pri < -128 || pri > 127)
-		goto out;
-
-	result = CreateMsgPort();
-	if(result != NULL && name != NULL)
-	{
-		result->mp_Node.ln_Name = (char *)name;
-		result->mp_Node.ln_Pri = pri;
-
-		AddPort(result);
-	}
-
- out:
-
-	return(result);
-}

library/amiga_createstdio.c

@@ -1,68 +0,0 @@
-/*
- * $Id: amiga_createstdio.c,v 1.3 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-#if defined(CreateStdIO)
-#undef CreateStdIO
-#endif /* CreateStdIO */
-
-/****************************************************************************/
-
-struct IOStdReq *
-CreateStdIO(CONST struct MsgPort * port)
-{
-	struct IOStdReq * result = NULL;
-
-	assert( port != NULL );
-
-	if(port == NULL)
-		goto out;
-
-	result = (struct IOStdReq *)CreateIORequest((struct MsgPort *)port,sizeof(*result));
-
- out:
-
-	return(result);
-}

library/amiga_createtask.c

@@ -1,236 +0,0 @@
-/*
- * $Id: amiga_createtask.c,v 1.3 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-/****************************************************************************/
-
-#include <exec/libraries.h>
-#include <exec/memory.h>
-#include <exec/tasks.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "macros.h"
-#include "debug.h"
-
-/****************************************************************************/
-
-#ifndef __PPC__
-
-/****************************************************************************/
-
-/*
- *  Create a task with given name, priority, and stack size.
- *  It will use the default exception and trap handlers for now.
- */
-
-/****************************************************************************/
-
-/* the template for the mementries.  Unfortunately, this is hard to
- * do from C: mementries have unions, and they cannot be statically
- * initialized...
- *
- * In the interest of simplicity I recreate the mem entry structures
- * here with appropriate sizes.  We will copy this to a local
- * variable and set the stack size to what the user specified,
- * then attempt to actually allocate the memory.
- */
-
-#define ME_TASK 	0
-#define ME_STACK	1
-
-#define NUM_MEM_ENTRIES	2
-
-/****************************************************************************/
-
-struct FakeMemEntry
-{
-	ULONG fme_Reqs;
-	ULONG fme_Size;
-};
-
-/****************************************************************************/
-
-struct FakeMemList
-{
-	struct Node			fml_Node;
-	UWORD				fml_NumEntries;
-	struct FakeMemEntry	fml_ME[NUM_MEM_ENTRIES];
-};
-
-/****************************************************************************/
-
-struct Task *
-CreateTask(CONST_STRPTR name,LONG pri,CONST APTR init_pc,ULONG stack_size)
-{
-	struct Task * new_task;
-	struct FakeMemList fake_mem_list;
-	struct MemList * ml = NULL;
-	APTR result = NULL;
-
-	ENTER();
-
-	SHOWSTRING(name);
-	SHOWVALUE(pri);
-	SHOWPOINTER(init_pc);
-	SHOWVALUE(stack_size);
-
-	assert( name != NULL && (-128 <= pri && pri <= 127) && init_pc != NULL && stack_size > 0 );
-
-	if(name == NULL || pri < -128 || pri > 127 || init_pc == NULL || stack_size == 0)
-	{
-		SHOWMSG("invalid parameters");
-		goto out;
-	}
-
-	/* round the stack up to longwords... */
-	stack_size = (stack_size + 3UL) & ~3UL;
-
-	/*
-	 * This will allocate two chunks of memory: task of PUBLIC
-	 * and stack of PRIVATE
-	 */
-	memset(&fake_mem_list,0,sizeof(fake_mem_list));
-
-	fake_mem_list.fml_NumEntries			= NUM_MEM_ENTRIES;
-	fake_mem_list.fml_ME[ME_TASK].fme_Reqs	= MEMF_PUBLIC | MEMF_CLEAR;
-	fake_mem_list.fml_ME[ME_TASK].fme_Size	= sizeof(struct Task);
-	fake_mem_list.fml_ME[ME_STACK].fme_Reqs	= MEMF_ANY | MEMF_CLEAR;
-	fake_mem_list.fml_ME[ME_STACK].fme_Size	= stack_size;
-
-	ml = (struct MemList *)AllocEntry((struct MemList *)&fake_mem_list);
-
-	/* Did the allocation succeed? */
-	if(((LONG)ml) < 0)
-	{
-		SHOWMSG("memory allocation failed");
-
-		/* Note: if AllocEntry() fails, the entire allocation is
-		 *       released before the function returns with bit #31
-		 *       set and the number of the slot that failed being
-		 *       returned. Thus, the return value is not a valid
-		 *       address that would need to be freed.
-		 */
-		ml = NULL;
-		goto out;
-	}
-
-	/* set the stack accounting stuff */
-	new_task = (struct Task *)ml->ml_ME[ME_TASK].me_Addr;
-
-	new_task->tc_SPLower	= ml->ml_ME[ME_STACK].me_Addr;
-	new_task->tc_SPUpper	= (APTR)((ULONG)(new_task->tc_SPLower) + stack_size);
-	new_task->tc_SPReg		= new_task->tc_SPUpper;
-
-	/* misc task data structures */
-	new_task->tc_Node.ln_Type	= NT_TASK;
-	new_task->tc_Node.ln_Pri	= pri;
-	new_task->tc_Node.ln_Name	= (char *)name;
-
-	/* add it to the tasks memory list */
-	NewList(&new_task->tc_MemEntry);
-	AddHead(&new_task->tc_MemEntry,(struct Node *)ml);
-
-	/* add the task to the system -- use the default final PC */
-
-	PROFILE_OFF();
-	result = AddTask(new_task,init_pc,NULL);
-	PROFILE_ON();
-
-	if(result == NULL)
-	{
-		SHOWMSG("could not add task");
-		goto out;
-	}
-
-	/* Gobbled up by task. */
-	ml = NULL;
-
- out:
-
-	if(ml != NULL)
-		FreeEntry(ml);
-
-	RETURN(result);
-	return(result);
-}
-
-/****************************************************************************/
-
-#else
-
-/****************************************************************************/
-
-#if defined(CreateTask)
-#undef CreateTask
-#endif /* CreateTask */
-
-/****************************************************************************/
-
-struct Task *
-CreateTask(CONST_STRPTR name,LONG pri,CONST APTR init_pc,ULONG stack_size)
-{
-	struct Task * result = NULL;
-
-	ENTER();
-
-	SHOWSTRING(name);
-	SHOWVALUE(pri);
-	SHOWPOINTER(init_pc);
-	SHOWVALUE(stack_size);
-
-	assert( name != NULL && (-128 <= pri && pri <= 127) && init_pc != NULL && stack_size > 0 );
-
-	if(name == NULL || pri < -128 || pri > 127 || init_pc == NULL || stack_size == 0)
-	{
-		SHOWMSG("invalid parameters");
-		goto out;
-	}
-
-	result = IExec->CreateTask(name,pri,init_pc,stack_size,NULL);
-
- out:
-
-	RETURN(result);
-	return(result);
-}
-
-/****************************************************************************/
-
-#endif /* __PPC__ */

library/amiga_deleteextio.c

@@ -1,60 +0,0 @@
-/*
- * $Id: amiga_deleteextio.c,v 1.3 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-#if defined(DeleteExtIO)
-#undef DeleteExtIO
-#endif /* DeleteExtIO */
-
-/****************************************************************************/
-
-VOID
-DeleteExtIO(struct IORequest * io)
-{
-	assert(io != NULL);
-
-	if(io != NULL)
-		DeleteIORequest((struct IORequest *)io);
-}

library/amiga_deleteport.c

@@ -1,62 +0,0 @@
-/*
- * $Id: amiga_deleteport.c,v 1.3 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-#if defined(DeletePort)
-#undef DeletePort
-#endif /* DeletePort */
-
-/****************************************************************************/
-
-VOID
-DeletePort(struct MsgPort * port)
-{
-	assert( port != NULL );
-
-	if(port->mp_Node.ln_Name != NULL)
-		RemPort(port);
-
-	DeleteMsgPort(port);
-}

library/amiga_deletestdio.c

@@ -1,58 +0,0 @@
-/*
- * $Id: amiga_deletestdio.c,v 1.3 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-#if defined(DeleteStdIO)
-#undef DeleteStdIO
-#endif /* DeleteStdIO */
-
-/****************************************************************************/
-
-VOID
-DeleteStdIO(struct IOStdReq * io)
-{
-	if(io != NULL)
-		DeleteIORequest((struct IORequest *)io);
-}

library/amiga_domethod.c

@@ -1,100 +0,0 @@
-/*
- * $Id: amiga_domethod.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef __PPC__
-
-/****************************************************************************/
-
-#include <intuition/intuition.h>
-#include <intuition/classes.h>
-
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-ULONG
-DoMethodA(Object * obj,Msg msg)
-{
-	ULONG result = 0;
-
-	ENTER();
-
-	SHOWPOINTER(obj);
-	SHOWPOINTER(msg);
-
-	assert(obj != NULL);
-
-	if(obj != NULL)
-	{
-		Class * cl;
-
-		cl = OCLASS(obj);
-
-		assert( cl != NULL );
-
-		if(cl != NULL)
-			result = CallHookA(&cl->cl_Dispatcher,obj,msg);
-	}
-
-	RETURN(result);
-	return(result);
-}
-
-/****************************************************************************/
-
-ULONG
-DoMethod(Object *obj, ULONG method_id, ...)
-{
-	ULONG result = 0;
-
-	ENTER();
-
-	SHOWPOINTER(obj);
-	SHOWVALUE(method_id);
-
-	assert( obj != NULL );
-
-	if(obj != NULL)
-		result = DoMethodA(obj,(Msg)&method_id);
-
-	RETURN(result);
-	return(result);
-}
-
-/****************************************************************************/
-
-#endif /* __PPC__ */

library/amiga_dosupermethod.c

@@ -1,93 +0,0 @@
-/*
- * $Id: amiga_dosupermethod.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef __PPC__
-
-/****************************************************************************/
-
-#include <intuition/intuition.h>
-#include <intuition/classes.h>
-
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-ULONG
-DoSuperMethodA(Class * cl, Object * obj, Msg msg)
-{
-	ULONG result = 0;
-
-	ENTER();
-
-	SHOWPOINTER(cl);
-	SHOWPOINTER(obj);
-	SHOWPOINTER(msg);
-
-	assert( cl != NULL && obj != NULL );
-
-	if(cl != NULL && obj != NULL)
-		result = CallHookA(&cl->cl_Super->cl_Dispatcher,obj,msg);
-
-	RETURN(result);
-	return(result);
-}
-
-/****************************************************************************/
-
-ULONG
-DoSuperMethod(Class *cl, Object *obj, ULONG method_id, ...)
-{
-	ULONG result = 0;
-
-	ENTER();
-
-	SHOWPOINTER(cl);
-	SHOWPOINTER(obj);
-	SHOWVALUE(method_id);
-
-	assert( cl != NULL && obj != NULL );
-
-	if(cl != NULL && obj != NULL)
-		result = DoSuperMethodA(cl,obj,(Msg)&method_id);
-
-	RETURN(result);
-	return(result);
-}
-
-/****************************************************************************/
-
-#endif /* __PPC__ */

library/amiga_dotimer.c

@@ -1,141 +0,0 @@
-/*
- * $Id: amiga_dotimer.c,v 1.3 2005-03-06 09:00:16 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <exec/errors.h>
-
-#include <devices/timer.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "macros.h"
-#include "debug.h"
-
-/****************************************************************************/
-
-LONG
-DoTimer(struct timeval *tv,LONG unit,LONG command)
-{
-	struct timerequest * tr = NULL;
-	struct MsgPort * mp;
-	LONG error;
-
-	assert( tv != NULL );
-
-	#if defined(__amigaos4__)
-	{
-		mp = AllocSysObjectTags(ASOT_PORT,
-			ASOPORT_Action,	PA_SIGNAL,
-			ASOPORT_Signal,	SIGB_SINGLE,
-			ASOPORT_Target,	FindTask(NULL),
-		TAG_DONE);
-
-		if(mp == NULL)
-		{
-			error = IOERR_OPENFAIL;
-			goto out;
-		}
-	}
-	#else
-	{
-		mp = AllocVec(sizeof(*mp),MEMF_ANY|MEMF_PUBLIC|MEMF_CLEAR);
-		if(mp == NULL)
-		{
-			error = IOERR_OPENFAIL;
-			goto out;
-		}
-
-		mp->mp_Node.ln_Type	= NT_MSGPORT;
-		mp->mp_Flags		= PA_SIGNAL;
-		mp->mp_SigBit		= SIGB_SINGLE;
-		mp->mp_SigTask		= FindTask(NULL);
-
-		NewList(&mp->mp_MsgList);
-	}
-	#endif /* __amigaos4__ */
-
-	tr = (struct timerequest *)CreateIORequest(mp,sizeof(*tr));
-	if(tr == NULL)
-	{
-		error = IOERR_OPENFAIL;
-		goto out;
-	}
-
-	error = OpenDevice(TIMERNAME,(ULONG)unit,(struct IORequest *)tr,0);
-	if(error != 0)
-		goto out;
-
-	tr->tr_node.io_Command	= command;
-	tr->tr_time.tv_secs		= tv->tv_secs;
-	tr->tr_time.tv_micro	= tv->tv_micro;
-
-	PROFILE_OFF();
-
-	SetSignal(0,SIGF_SINGLE);
-
-	error = DoIO((struct IORequest *)tr);
-
-	PROFILE_ON();
-
-	tv->tv_secs		= tr->tr_time.tv_secs;
-	tv->tv_micro	= tr->tr_time.tv_micro;
-
- out:
-
-	if(tr != NULL)
-	{
-		if(tr->tr_node.io_Device != NULL)
-			CloseDevice((struct IORequest *)tr);
-
-		DeleteIORequest((struct IORequest *)tr);
-	}
-
-	#if defined(__amigaos4__)
-	{
-		if(mp != NULL)
-			FreeSysObject(ASOT_PORT,mp);
-	}
-	#else
-	{
-		FreeVec(mp);
-	}
-	#endif /* __amigaos4__ */
-
-	return(error);
-}

library/amiga_fastrand.c

@@ -1,52 +0,0 @@
-/*
- * $Id: amiga_fastrand.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <exec/types.h>
-
-/****************************************************************************/
-
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-ULONG
-FastRand(ULONG seed)
-{
-	ULONG value;
-
-	value = seed + seed;
-	if(value < seed)
-		value ^= 0x1D872B41;
-
-	return(value);
-}

library/amiga_freeievents.c

@@ -1,62 +0,0 @@
-/*
- * $Id: amiga_freeievents.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <devices/inputevent.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-VOID
-FreeIEvents(struct InputEvent * ie)
-{
-	struct InputEvent * next;
-
-	while(ie != NULL)
-    {
-		next = ie->ie_NextEvent;
-
-		FreeVec(ie);
-
-		ie = next;
-	}
-}

library/amiga_hookentry.asm

@@ -1,51 +0,0 @@
-*
-*	$Id: amiga_hookentry.asm,v 1.2 2005-01-02 09:07:07 obarthel Exp $
-*
-*	:ts=8
-*
-*	Portable ISO 'C' (1994) runtime library for the Amiga computer
-*	Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
-*	All rights reserved.
-*
-*	Redistribution and use in source and binary forms, with or without
-*	modification, are permitted provided that the following conditions
-*	are met:
-*
-*	  - Redistributions of source code must retain the above copyright
-*	    notice, this list of conditions and the following disclaimer.
-*
-*	  - Neither the name of Olaf Barthel nor the names of contributors
-*	    may be used to endorse or promote products derived from this
-*	    software without specific prior written permission.
-*
-*	THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
-*	AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-*	IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-*	ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
-*	LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
-*	CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
-*	SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
-*	INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
-*	CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
-*	ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
-*	POSSIBILITY OF SUCH DAMAGE.
-*
-
-	section	text,code
-
-h_SubEntry equ 12
-
-	xdef	_HookEntry
-
-_HookEntry:
-
-	move.l   a1,-(sp)
-	move.l   a2,-(sp)
-	move.l   a0,-(sp)
-	move.l   h_SubEntry(a0),a0
-	jsr      (a0)
-	lea      12(sp),sp
-
-	rts
-
-	end

library/amiga_hookentry.c

@@ -1,61 +0,0 @@
-/*
- * $Id: amiga_hookentry.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#if (defined(__GNUC__) && !defined(__PPC__))
-
-/****************************************************************************/
-
-asm("
-
-h_SubEntry = 12
-
-	.text
-	.even
-
-	.globl	_HookEntry
-
-_HookEntry:
-
-	movel	a1,sp@-
-	movel	a2,sp@-
-	movel	a0,sp@-
-	movel	a0@(h_SubEntry:W),a0
-	jsr		a0@
-	lea		sp@(12:W),sp
-	rts
-
-");
-
-/****************************************************************************/
-
-#endif /* __GNUC__ && !__PPC__ */

library/amiga_hotkey.c

@@ -1,78 +0,0 @@
-/*
- * $Id: amiga_hotkey.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <libraries/commodities.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/commodities.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-CxObj *
-HotKey(CONST_STRPTR descr,struct MsgPort * port,LONG ID)
-{
-	CxObj * result = NULL;
-	CxObj * filter = NULL;
-
-	assert( descr != NULL && port != NULL );
-
-	if(CxBase == NULL)
-		goto out;
-
-	filter = CxFilter(descr);
-	if(filter == NULL)
-		goto out;
-
-	AttachCxObj(filter,CxSender(port,ID));
-	AttachCxObj(filter,CxTranslate(NULL));
-
-	if(CxObjError(filter))
-		goto out;
-
-	result = filter;
-
- out:
-
-	if(result == NULL && filter != NULL)
-		DeleteCxObjAll(filter);
-
-	return(result);
-}

library/amiga_invertstring.c

@@ -1,208 +0,0 @@
-/*
- * $Id: amiga_invertstring.c,v 1.3 2005-02-25 10:14:20 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <libraries/commodities.h>
-#include <devices/keymap.h>
-#include <exec/memory.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <proto/commodities.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-STATIC int
-do_escape(int cc)
-{
-	int result;
-
-	switch(cc)
-	{
-		case 'n':
-        case 'r':
-
-			result = '\r';
-			break;
-
-        case 't':
-
-			result = '\t';
-			break;
-
-        case '0':
-
-			result = '\0';
-			break;
-
-        case '\\':
-        case '\"':
-        case '\'':
-        case '<':
-
-			result = cc;
-			break;
-
-        default:
-
-			result = -1;
-			break;
-    }
-
-    return(result);
-}
-
-/****************************************************************************/
-
-STATIC ULONG
-do_angle(STRPTR * strp, struct InputEvent *ie)
-{
-	ULONG result;
-	char * cp;
-	IX ix;
-
-	/* find closing angle '>', put a null there   */
-	for(cp = (*strp) ; (*cp) ; cp++)
-	{
-		if((*cp) == '>')
-		{
-			(*cp) = '\0';
-			break;
-		}
-	}
-
-	result = ParseIX((*strp),&ix);
-
-	if(cp != NULL)
-	{
-		(*cp)	= '>';	/* fix it */
-		(*strp)	= cp;	/* point to char following '>' */
-	}
-	else
-	{
-		(*strp) = cp - 1;   /* ++will point to terminating null */
-	}
-
-	if(result == 0)
-	{
-		/* use IX to describe a suitable InputEvent */
-		ie->ie_Class		= ix.ix_Class;
-		ie->ie_Code			= ix.ix_Code;
-		ie->ie_Qualifier	= ix.ix_Qualifier;
-	}
-
-	return(result);
-}
-
-/****************************************************************************/
-
-extern VOID FreeIEvents(struct InputEvent *ie);
-
-/****************************************************************************/
-
-struct InputEvent *
-InvertString(CONST_STRPTR str, CONST struct KeyMap *km)
-{
-	/* bugs:
-	   can't escape '>'
-	   puts '\0' on closing angles */
-
-	/* allocate input event for each character in string   */
-
-	struct InputEvent * result = NULL;
-	struct InputEvent * chain = NULL;
-	struct InputEvent * ie;
-	int cc;
-
-	if(CxBase == NULL || str == NULL || (*str) == '\0')
-		goto out;
-
-	do /* have checked that str is not null    */
-	{
-		/* allocate the next ie and link it in */
-		ie = AllocVec(sizeof(*ie),MEMF_ANY|MEMF_CLEAR|MEMF_PUBLIC);
-		if(ie == NULL)
-			goto out;
-
-		ie->ie_NextEvent = chain;
-		chain = ie;
-
-		/* now fill in the input event   */
-		cc = (*str);
-		switch(cc)
-		{
-			case '<':
-
-		        str++;
-
-				if(do_angle((STRPTR*)&str, ie) != 0)
-					goto out;
-
-				break;
-
-			case '\\':
-
-		        str++;
-
-				cc = do_escape(*str); /* get escaped character */
-				if(cc < 0)
-					goto out;
-
-				/* fall through  */
-
-			default:
-
-				InvertKeyMap((ULONG) cc, ie, (struct KeyMap *)km);
-				break;
-		}
-
-		str++;
-	}
-	while((*str) != '\0');
-
-	result = chain;
-
- out:
-
-	if(result == NULL && chain != NULL)
-		FreeIEvents(chain);
-
-	return(result);
-}

library/amiga_newlist.c

@@ -1,60 +0,0 @@
-/*
- * $Id: amiga_newlist.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <exec/lists.h>
-
-/****************************************************************************/
-
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-VOID
-NewList(struct List *lh)
-{
-	ENTER();
-
-	SHOWPOINTER(lh);
-
-	assert( lh != NULL );
-
-	lh->lh_Head		= (struct Node *)&lh->lh_Tail;
-	lh->lh_Tail		= NULL;
-	lh->lh_TailPred	= (struct Node *)&lh->lh_Head;
-
-	LEAVE();
-}

library/amiga_rangerand.c

@@ -1,80 +0,0 @@
-/*
- * $Id: amiga_rangerand.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <exec/types.h>
-
-/****************************************************************************/
-
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-ULONG RangeSeed;
-
-/****************************************************************************/
-
-UWORD
-RangeRand(ULONG max_value)
-{
-	ULONG next_value;
-	ULONG result;
-	ULONG value;
-	UWORD range;
-	UWORD bits;
-
-	range = (max_value & 0xFFFF);
-	bits = range - 1;
-
-	value = RangeSeed;
-
-	do
-	{
-		next_value = value + value;
-		if(next_value <= value)
-			next_value ^= 0x1D872B41;
-
-		value = next_value;
-
-		bits = bits >> 1;
-	}
-	while(bits != 0);
-
-	RangeSeed = value;
-
-	if(range == 0)
-		result = value & 0xFFFF;
-	else
-		result = (range * (value & 0xFFFF)) >> 16;
-
-	return((UWORD)result);
-}

library/amiga_remtof.c

@@ -1,57 +0,0 @@
-/*
- * $Id: amiga_remtof.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <exec/interrupts.h>
-#include <hardware/intbits.h>
-#include <graphics/graphint.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/exec.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-VOID
-RemTOF(struct Isrvstr *i)
-{
-	assert( i != NULL );
-
-	RemIntServer(INTB_VERTB,(struct Interrupt *)i);
-}

library/amiga_rexxvars.c

@@ -1,193 +0,0 @@
-/*
- * $Id: amiga_rexxvars.c,v 1.3 2005-01-09 10:10:40 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-/* We don't want to pull in <clib/alib_protos.h> */
-#define CLIB_ALIB_PROTOS_H
-
-#ifndef _STDLIB_HEADERS_H
-#include "stdlib_headers.h"
-#endif /* _STDLIB_HEADERS_H */
-
-/****************************************************************************/
-
-#include <rexx/rxslib.h>
-#include <rexx/errors.h>
-
-/****************************************************************************/
-
-#define __NOLIBBASE__
-#include <proto/rexxsyslib.h>
-
-/****************************************************************************/
-
-static struct Library * RexxSysBase;
-
-/****************************************************************************/
-
-#if defined(__amigaos4__)
-static struct RexxSysIFace * IRexxSys;
-#endif /* __amigaos4__ */
-
-/****************************************************************************/
-
-CLIB_CONSTRUCTOR(__rexxvars_init)
-{
-	ENTER();
-
-	RexxSysBase = OpenLibrary(RXSNAME,0);
-
-	#if defined(__amigaos4__)
-	{
-		if(RexxSysBase != NULL)
-		{
-			IRexxSys = (struct RexxSysIFace *)GetInterface(RexxSysBase, "main", 1, 0);
-			if(IRexxSys == NULL)
-			{
-				CloseLibrary(RexxSysBase);
-				RexxSysBase = NULL;
-			}
-		}
-	}
-	#endif /* __amigaos4__ */
-
-	CONSTRUCTOR_SUCCEED();
-}
-
-/****************************************************************************/
-
-CLIB_DESTRUCTOR(__rexxvars_exit)
-{
-	ENTER();
-
-	#if defined(__amigaos4__)
-	{
-		if(IRexxSys != NULL)
-			DropInterface((struct Interface *)IRexxSys);
-
-		IRexxSys = NULL;
-	}
-	#endif /* __amigaos4__ */
-
-	if(RexxSysBase != NULL)
-	{
-		CloseLibrary(RexxSysBase);
-		RexxSysBase = NULL;
-	}
-
-	LEAVE();
-}
-
-/****************************************************************************/
-
-/* This is modeled after the original assembly language code. Except for the
-   fact that we compare the library base against a local, static variable
-   rather then opening the library for each check. */
-BOOL
-CheckRexxMsg(struct RexxMsg *message)
-{
-	BOOL result = FALSE;
-
-	if(RexxSysBase == NULL)
-		goto out;
-
-	if(message->rm_LibBase != RexxSysBase)
-		goto out;
-
-	if(message->rm_TaskBlock == NULL)
-		goto out;
-
-	if(NOT IsRexxMsg(message))
-		goto out;
-
-	result = TRUE;
-
- out:
-
-	return(result);
-}
-
-/****************************************************************************/
-
-/* The following function works in about like the original, except that it's
-   not reentrant, does not fill in a pointer to the variable itself and
-   requires rexxsyslib.library V45. */
-LONG
-GetRexxVar(struct RexxMsg *message,STRPTR variable_name,STRPTR *buffer_pointer)
-{
-	static UBYTE buffer[256];
-	LONG result;
-
-	/* The following uses a function which was added to rexxsyslib.library V45.
-	   We therefore have a minimum library version requirement. */
-	if(RexxSysBase == NULL || RexxSysBase->lib_Version < 45 || NOT IsRexxMsg(message))
-	{
-		result = ERR10_010; /* invalid message packet */
-		goto out;
-	}
-
-	/* The 256 character limit isn't good. This should be done differently. */
-	result = GetRexxVarFromMsg(variable_name,buffer,message);
-	if(result != 0)
-		goto out;
-
-	(*buffer_pointer) = buffer;
-
- out:
-
-	return(result);
-}
-
-/****************************************************************************/
-
-/* The following function works in about like the original, except that it
-   ignores the length parameter (the value needs to be a NUL-terminated string)
-   and requires rexxsyslib.library V45. */
-LONG
-SetRexxVar(struct RexxMsg *message,STRPTR variable_name,STRPTR value,ULONG length)
-{
-	LONG result;
-
-	/* The following uses a function which was added to rexxsyslib.library V45.
-	   We therefore have a minimum library version requirement. */
-	if(RexxSysBase == NULL || RexxSysBase->lib_Version < 45 || NOT IsRexxMsg(message))
-	{
-		result = ERR10_010; /* invalid message packet */
-		goto out;
-	}
-
-	result = SetRexxVarFromMsg(variable_name,value,message);
-
- out:
-
-	return(result);
-}

library/amiga_setsuperattrs.c

@@ -1,101 +0,0 @@
-/*
- * $Id: amiga_setsuperattrs.c,v 1.4 2005-02-25 10:14:20 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef __PPC__
-
-/****************************************************************************/
-
-#include <intuition/intuition.h>
-#include <intuition/classes.h>
-
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-STATIC ULONG
-SetSuperAttrsA(Class * cl,Object * obj,struct TagItem * tags)
-{
-	ULONG result = 0;
-
-	ENTER();
-
-	SHOWPOINTER(cl);
-	SHOWPOINTER(obj);
-	SHOWPOINTER(tags);
-
-	assert( cl != NULL && obj != NULL );
-
-	if(cl != NULL && obj != NULL)
-	{
-		struct opSet ops;
-
-		ops.MethodID		= OM_SET;
-		ops.ops_AttrList	= tags;
-		ops.ops_GInfo		= NULL;
-
-		result = CallHookA(&cl->cl_Super->cl_Dispatcher,obj,&ops);
-	}
-
-	RETURN(result);
-	return(result);
-}
-
-/****************************************************************************/
-
-ULONG
-SetSuperAttrs(Class * cl,Object * obj,ULONG tag1,...)
-{
-	ULONG result = 0;
-
-	ENTER();
-
-	SHOWPOINTER(cl);
-	SHOWPOINTER(obj);
-	SHOWVALUE(tag1);
-
-	assert( cl != NULL && obj != NULL );
-
-	if(cl != NULL && obj != NULL)
-		result = SetSuperAttrsA(cl,obj,(struct TagItem *)&tag1);
-
-	RETURN(result);
-	return(result);
-}
-
-/****************************************************************************/
-
-#endif /* __PPC__ */

library/amiga_timedelay.c

@@ -1,54 +0,0 @@
-/*
- * $Id: amiga_timedelay.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <devices/timer.h>
-
-/****************************************************************************/
-
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-LONG
-TimeDelay(LONG unit,ULONG seconds,ULONG micros)
-{
-	struct timeval tv;
-	LONG error;
-
-	tv.tv_secs	= seconds;
-	tv.tv_micro	= micros;
-
-	error = DoTimer(&tv,unit,TR_ADDREQUEST);
-
-	return(error);
-}

library/amiga_waitbeam.c

@@ -1,60 +0,0 @@
-/*
- * $Id: amiga_waitbeam.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include <exec/interrupts.h>
-#include <hardware/intbits.h>
-#include <graphics/graphint.h>
-
-#include <string.h>
-
-/****************************************************************************/
-
-#include <proto/graphics.h>
-#include <clib/alib_protos.h>
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-#define DO_NOTHING ((void)0)
-
-/****************************************************************************/
-
-VOID
-waitbeam(LONG position)
-{
-	while(position > VBeamPos())
-		DO_NOTHING;
-}

library/c.lib_rev.c

@@ -1,38 +0,0 @@
-/*
- * $Id: c.lib_rev.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "c.lib_rev.h"
-
-/****************************************************************************/
-
-char __c_lib_version[] = VERSTAG;

library/c.lib_rev.h

@@ -1,6 +0,0 @@
-#define VERSION		1
-#define REVISION	189
-#define DATE		"5.3.2005"
-#define VERS		"c.lib 1.189"
-#define VSTRING		"c.lib 1.189 (5.3.2005)\r\n"
-#define VERSTAG		"\0$VER: c.lib 1.189 (5.3.2005)"

library/c.lib_rev.rev

@@ -1 +0,0 @@
-189

library/crt0.S

@@ -1,40 +0,0 @@
-//
-//	$Id: crt0.S,v 1.2 2004-11-28 12:31:27 tfrieden Exp $
-//
-//	:ts=4
-//
-
-	.text
-
-	.globl  _main
-	.globl  _start
-
-_start:
-
-#if defined(SMALL_DATA)
-	/* Don't do a function call here, since that
-	   means LR has to be saved */
-	lis r13, _SDA_BASE_@ha
-	addi r13, r13, _SDA_BASE_@l
-#endif
-
-#if defined(BASEREL_DATA)
-	/* We also need to set up the data segment pointer */
-	lis r2, _DATA_BASE_@ha
-	addi r2, r2, _DATA_BASE_@l
-#endif
-
-	b	_main
-
-#if defined(BASEREL_DATA)
-	.section .rodata
-
-	.globl __data_segment_descriptor
-__data_segment_descriptor:
-	.long __data_start
-	.long __data_end
-	.long _DATA_BASE_
-
-	.section .dend, "wa", @nobits
-	.space 	4
-#endif

library/crtbegin.c

@@ -1,70 +0,0 @@
-/* 
- * $Id: crtbegin.c,v 1.8 2005-03-10 13:30:11 obarthel Exp $
- *
- * :ts=4
- *
- * Handles global constructors and destructors for the OS4 GCC build.
- */
-
-#if defined(__amigaos4__)
-
-/****************************************************************************/
-
-#include <exec/types.h>
-
-/****************************************************************************/
-
-#include <stdlib.h>
-#include <setjmp.h>
-
-/****************************************************************************/
-
-/*
- * Dummy constructor and destructor array. The linker script will put these at the
- * very beginning of section ".ctors" and ".dtors". crtend.o contains a similar entry
- * with a NULL pointer entry and is put at the end of the sections. This way, the init
- * code can find the global constructor/destructor pointers
- */
-static void (*__CTOR_LIST__[1]) (void) __attribute__(( used, section(".ctors"), aligned(sizeof(void (*)(void))) ));
-static void (*__DTOR_LIST__[1]) (void) __attribute__(( used, section(".dtors"), aligned(sizeof(void (*)(void))) ));
-
-/****************************************************************************/
-
-void
-_init(void)
-{
-	int num_ctors,i;
-	int j;
-
-	for(i = 1, num_ctors = 0 ; __CTOR_LIST__[i] != NULL ; i++)
-		num_ctors++;
-
-	for(j = 0 ; j < num_ctors ; j++)
-		__CTOR_LIST__[num_ctors - j]();
-}
-
-/****************************************************************************/
-
-void
-_fini(void)
-{
-	extern jmp_buf __exit_jmp_buf;
-
-	int num_dtors,i;
-	static int j;
-
-	/* If one of the destructors drops into
-	   exit(), processing will continue with
-	   the next following destructor. */
-	(void)setjmp(__exit_jmp_buf);
-
-	for(i = 1, num_dtors = 0 ; __DTOR_LIST__[i] != NULL ; i++)
-		num_dtors++;
-
-	while(j++ < num_dtors)
-		__DTOR_LIST__[j]();
-}
-
-/****************************************************************************/
-
-#endif /*__amigaos4__ */

library/crtend.c

@@ -1,19 +0,0 @@
-/* 
- * $Id: crtend.c,v 1.2 2005-03-09 21:07:25 obarthel Exp $
- *
- * :ts=4
- *
- * End markers for the CTOR and DTOR list.
- */
-
-#if defined(__amigaos4__)
-
-/****************************************************************************/
-
-static void (*__CTOR_LIST__[1]) (void) __attribute__((used, section(".ctors"), aligned(sizeof(void (*)(void))) ));
-static void (*__DTOR_LIST__[1]) (void) __attribute__((used, section(".dtors"), aligned(sizeof(void (*)(void))) ));
-
-/****************************************************************************/
-
-#endif /*__amigaos4__ */
-

library/ctype_headers.h

@@ -1,61 +0,0 @@
-/*
- * $Id: ctype_headers.h,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#define _CTYPE_HEADERS_H
-
-/****************************************************************************/
-
-#ifndef _LOCALE_HEADERS_H
-#include "locale_headers.h"
-#endif /* _LOCALE_HEADERS_H */
-
-/****************************************************************************/
-
-#ifndef _STDLIB_LOCALE_UTILITY_H
-#include "stdlib_locale_utility.h"
-#endif /* _STDLIB_LOCALE_UTILITY_H */
-
-/****************************************************************************/
-
-#include "macros.h"
-
-/****************************************************************************/
-
-#include <locale.h>
-#include <assert.h>
-#include <ctype.h>
-
-/****************************************************************************/
-
-#endif /* _CTYPE_HEADERS_H */

library/ctype_isalnum.c

@@ -1,68 +0,0 @@
-/*
- * $Id: ctype_isalnum.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef isalnum
-#undef isalpha
-#undef isdigit
-
-/****************************************************************************/
-
-int
-isalnum(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = IsAlNum(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = isalpha(c) || isdigit(c);
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_isalpha.c

@@ -1,67 +0,0 @@
-/*
- * $Id: ctype_isalpha.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef isalpha
-
-/****************************************************************************/
-
-int
-isalpha(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = IsAlpha(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = (('a' <= c && c <= 'z') ||
-		          ('A' <= c && c <= 'Z'));
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_isascii.c

@@ -1,56 +0,0 @@
-/*
- * $Id: ctype_isascii.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef isascii
-
-/****************************************************************************/
-
-int isascii(int c);
-
-/****************************************************************************/
-
-int
-isascii(int c)
-{
-	int result;
-
-	result = (0 <= c && c <= 127);
-
-	return(result);
-}

library/ctype_iscntrl.c

@@ -1,66 +0,0 @@
-/*
- * $Id: ctype_iscntrl.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef iscntrl
-
-/****************************************************************************/
-
-int
-iscntrl(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = IsCntrl(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = (('\0' <= c && c < ' ') || (c == 127));
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_isdigit.c

@@ -1,66 +0,0 @@
-/*
- * $Id: ctype_isdigit.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef isdigit
-
-/****************************************************************************/
-
-int
-isdigit(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = IsDigit(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = ('0' <= c && c <= '9');
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_isgraph.c

@@ -1,66 +0,0 @@
-/*
- * $Id: ctype_isgraph.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef isgraph
-
-/****************************************************************************/
-
-int
-isgraph(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = IsGraph(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = (' ' < c && c < 127);
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_islower.c

@@ -1,66 +0,0 @@
-/*
- * $Id: ctype_islower.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef islower
-
-/****************************************************************************/
-
-int
-islower(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = IsLower(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = ('a' <= c && c <= 'z');
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_isprint.c

@@ -1,66 +0,0 @@
-/*
- * $Id: ctype_isprint.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef isprint
-
-/****************************************************************************/
-
-int
-isprint(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = IsPrint(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = (' ' <= c && c <= '~');
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_ispunct.c

@@ -1,69 +0,0 @@
-/*
- * $Id: ctype_ispunct.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef ispunct
-
-/****************************************************************************/
-
-int
-ispunct(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = IsPunct(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = (('!' <= c && c <= '/') ||
-		          (':' <= c && c <= '@') ||
-		          ('[' <= c && c <= '`') ||
-		          ('{' <= c && c <= '~'));
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_isspace.c

@@ -1,71 +0,0 @@
-/*
- * $Id: ctype_isspace.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef isspace
-
-/****************************************************************************/
-
-int
-isspace(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = IsSpace(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = (c == '\t' ||
-		          c == '\r' ||
-		          c == '\n' ||
-		          c == '\v' ||
-		          c == '\f' ||
-		          c == ' ');
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_isupper.c

@@ -1,66 +0,0 @@
-/*
- * $Id: ctype_isupper.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef isupper
-
-/****************************************************************************/
-
-int
-isupper(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = IsUpper(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = ('A' <= c && c <= 'Z');
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_isxdigit.c

@@ -1,68 +0,0 @@
-/*
- * $Id: ctype_isxdigit.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-#undef isxdigit
-
-/****************************************************************************/
-
-int
-isxdigit(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = IsXDigit(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = (('0' <= c && c <= '9') ||
-		          ('a' <= c && c <= 'f') ||
-		          ('A' <= c && c <= 'F'));
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_table.c

@@ -1,178 +0,0 @@
-/*
- * $Id: ctype_table.c,v 1.3 2005-01-09 15:20:31 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#define __C_MACROS__
-#include <ctype.h>
-
-/****************************************************************************/
-
-const unsigned char __ctype_table[2 * 128] =
-{
-	/*   0      */ __CTYPE_CONTROL,
-	/*   1      */ __CTYPE_CONTROL,
-	/*   2      */ __CTYPE_CONTROL,
-	/*   3      */ __CTYPE_CONTROL,
-	/*   4      */ __CTYPE_CONTROL,
-	/*   5      */ __CTYPE_CONTROL,
-	/*   6      */ __CTYPE_CONTROL,
-	/*   7      */ __CTYPE_CONTROL,
-	/*   8      */ __CTYPE_CONTROL,
-	/*   9      */ __CTYPE_CONTROL|__CTYPE_WHITE_SPACE,
-	/*  10      */ __CTYPE_CONTROL|__CTYPE_WHITE_SPACE,
-	/*  11      */ __CTYPE_CONTROL|__CTYPE_WHITE_SPACE,
-	/*  12      */ __CTYPE_CONTROL|__CTYPE_WHITE_SPACE,
-	/*  13      */ __CTYPE_CONTROL|__CTYPE_WHITE_SPACE,
-	/*  14      */ __CTYPE_CONTROL,
-	/*  15      */ __CTYPE_CONTROL,
-	/*  16      */ __CTYPE_CONTROL,
-	/*  17      */ __CTYPE_CONTROL,
-	/*  18      */ __CTYPE_CONTROL,
-	/*  19      */ __CTYPE_CONTROL,
-	/*  20      */ __CTYPE_CONTROL,
-	/*  21      */ __CTYPE_CONTROL,
-	/*  22      */ __CTYPE_CONTROL,
-	/*  23      */ __CTYPE_CONTROL,
-	/*  24      */ __CTYPE_CONTROL,
-	/*  25      */ __CTYPE_CONTROL,
-	/*  26      */ __CTYPE_CONTROL,
-	/*  27      */ __CTYPE_CONTROL,
-	/*  28      */ __CTYPE_CONTROL,
-	/*  29      */ __CTYPE_CONTROL,
-	/*  30      */ __CTYPE_CONTROL,
-	/*  31      */ __CTYPE_CONTROL,
-	/*  32, ' ' */ __CTYPE_PRINTABLE|__CTYPE_WHITE_SPACE,
-	/*  33, '!' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  34, '"' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  35, '#' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  36, '$' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  37, '%' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  38, '&' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  39, ''' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  40, '(' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  41, ')' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  42, '*' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  43, '+' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  44, ',' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  45, '-' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  46, '.' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  47, '/' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  48, '0' */ __CTYPE_DIGIT|__CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE,
-	/*  49, '1' */ __CTYPE_DIGIT|__CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE,
-	/*  50, '2' */ __CTYPE_DIGIT|__CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE,
-	/*  51, '3' */ __CTYPE_DIGIT|__CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE,
-	/*  52, '4' */ __CTYPE_DIGIT|__CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE,
-	/*  53, '5' */ __CTYPE_DIGIT|__CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE,
-	/*  54, '6' */ __CTYPE_DIGIT|__CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE,
-	/*  55, '7' */ __CTYPE_DIGIT|__CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE,
-	/*  56, '8' */ __CTYPE_DIGIT|__CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE,
-	/*  57, '9' */ __CTYPE_DIGIT|__CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE,
-	/*  58, ':' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  59, ';' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  60, '<' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  61, '=' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  62, '>' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  63, '?' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  64, '@' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  65, 'A' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  66, 'B' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  67, 'C' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  68, 'D' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  69, 'E' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  70, 'F' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  71, 'G' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  72, 'H' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  73, 'I' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  74, 'J' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  75, 'K' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  76, 'L' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  77, 'M' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  78, 'N' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  79, 'O' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  80, 'P' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  81, 'Q' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  82, 'R' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  83, 'S' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  84, 'T' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  85, 'U' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  86, 'V' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  87, 'W' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  88, 'X' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  89, 'Y' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  90, 'Z' */ __CTYPE_PRINTABLE|__CTYPE_UPPER_CASE,
-	/*  91, '[' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  92, '\' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  93, ']' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  94, '^' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  95, '_' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  96, '`' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/*  97, 'a' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/*  98, 'b' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/*  99, 'c' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 100, 'd' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 101, 'e' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 102, 'f' */ __CTYPE_HEX_DIGIT|__CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 103, 'g' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 104, 'h' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 105, 'i' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 106, 'j' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 107, 'k' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 108, 'l' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 109, 'm' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 110, 'n' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 111, 'o' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 112, 'p' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 113, 'q' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 114, 'r' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 115, 's' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 116, 't' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 117, 'u' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 118, 'v' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 119, 'w' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 120, 'x' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 121, 'y' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 122, 'z' */ __CTYPE_PRINTABLE|__CTYPE_LOWER_CASE,
-	/* 123, '{' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/* 124, '|' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/* 125, '}' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/* 126, '~' */ __CTYPE_PUNCTUATION|__CTYPE_PRINTABLE,
-	/* 127      */ __CTYPE_CONTROL,
-
-	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
-};

library/ctype_tolower.c

@@ -1,62 +0,0 @@
-/*
- * $Id: ctype_tolower.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-int
-tolower(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = ConvToLower(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = ('A' <= c && c <= 'Z') ? (c + ('a' - 'A')) : c;
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/ctype_toupper.c

@@ -1,62 +0,0 @@
-/*
- * $Id: ctype_toupper.c,v 1.3 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _CTYPE_HEADERS_H
-#include "ctype_headers.h"
-#endif /* _CTYPE_HEADERS_H */
-
-/****************************************************************************/
-
-int
-toupper(int c)
-{
-	DECLARE_LOCALEBASE();
-	int result;
-
-	__locale_lock();
-
-	if(__locale_table[LC_CTYPE] != NULL)
-	{
-		assert( LocaleBase != NULL );
-
-		result = ConvToUpper(__locale_table[LC_CTYPE],(ULONG)c);
-	}
-	else
-	{
-		result = ('a' <= c && c <= 'z') ? (c - ('a' - 'A')) : c;
-	}
-
-	__locale_unlock();
-
-	return(result);
-}

library/debug.c

@@ -1,342 +0,0 @@
-/*
- * $Id: debug.c,v 1.3 2005-02-25 10:14:21 obarthel Exp $
- *
- * :ts=8
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-/****************************************************************************/
-
-#define NULL ((void *)0L)
-
-#include <string.h>
-#include <stdarg.h>
-
-/****************************************************************************/
-
-#ifndef DEBUG
-#define DEBUG 1
-#endif
-
-#include "debug.h"
-
-/****************************************************************************/
-
-extern void KPrintF(const char * format,...);
-extern void KPutFmt(const char * format,va_list arg);
-
-/****************************************************************************/
-
-#define DEBUGLEVEL_OnlyAsserts	0
-#define DEBUGLEVEL_Reports	1
-#define DEBUGLEVEL_CallTracing	2
-
-/****************************************************************************/
-
-extern int __debug_level;
-
-/****************************************************************************/
-
-static int indent_level = 0;
-
-static char program_name[40];
-static int program_name_len = 0;
-
-/****************************************************************************/
-
-void
-_SETPROGRAMNAME(char *name)
-{
-	if(name != NULL && name[0] != '\0')
-	{
-		int i;
-
-		for(i = 0 ; name[i] != '\0' && i < (int)sizeof(program_name)-1 ; i++)
-			program_name[i] = name[i];
-
-		program_name[i] = '\0';
-
-		program_name_len = i;
-	}
-	else
-	{
-		program_name_len = 0;
-	}
-}
-
-/****************************************************************************/
-
-int
-_SETDEBUGLEVEL(int level)
-{
-	int old_level = __debug_level;
-
-	__debug_level = level;
-
-	return(old_level);
-}
-
-/****************************************************************************/
-
-int
-_GETDEBUGLEVEL(void)
-{
-	return(__debug_level);
-}
-
-/****************************************************************************/
-
-static int previous_debug_level = -1;
-
-void
-_PUSHDEBUGLEVEL(int level)
-{
-	previous_debug_level = _SETDEBUGLEVEL(level);
-}
-
-void
-_POPDEBUGLEVEL(void)
-{
-	if(previous_debug_level != -1)
-	{
-		_SETDEBUGLEVEL(previous_debug_level);
-
-		previous_debug_level = -1;
-	}
-}
-
-/****************************************************************************/
-
-STATIC VOID
-_INDENT(void)
-{
-	if(program_name_len > 0)
-		KPrintF("(%s) ",program_name);
-
-	if(__debug_level >= DEBUGLEVEL_CallTracing)
-	{
-		int i;
-
-		for(i = 0 ; i < indent_level ; i++)
-			KPrintF("   ");
-	}
-}
-
-/****************************************************************************/
-
-void
-_SHOWVALUE(
-	unsigned long value,
-	int size,
-	const char *name,
-	const char *file,
-	int line)
-{
-	if(__debug_level >= DEBUGLEVEL_Reports)
-	{
-		char *fmt;
-
-		switch(size)
-		{
-			case 1:
-
-				fmt = "%s:%ld:%s = %ld, 0x%02lx";
-				break;
-
-			case 2:
-
-				fmt = "%s:%ld:%s = %ld, 0x%04lx";
-				break;
-
-			default:
-
-				fmt = "%s:%ld:%s = %ld, 0x%08lx";
-				break;
-		}
-
-		_INDENT();
-
-		KPrintF(fmt,file,line,name,value,value);
-
-		if(size == 1 && value < 256)
-		{
-			if(value < ' ' || (value >= 127 && value < 160))
-				KPrintF(", '\\x%02lx'",value);
-			else
-				KPrintF(", '%lc'",value);
-		}
-
-		KPrintF("\n");
-	}
-}
-
-/****************************************************************************/
-
-void
-_SHOWPOINTER(
-	const void *pointer,
-	const char *name,
-	const char *file,
-	int line)
-{
-	if(__debug_level >= DEBUGLEVEL_Reports)
-	{
-		char *fmt;
-
-		_INDENT();
-
-		if(pointer != NULL)
-			fmt = "%s:%ld:%s = 0x%08lx\n";
-		else
-			fmt = "%s:%ld:%s = NULL\n";
-
-		KPrintF(fmt,file,line,name,pointer);
-	}
-}
-
-/****************************************************************************/
-
-void
-_SHOWSTRING(
-	const char *string,
-	const char *name,
-	const char *file,
-	int line)
-{
-	if(__debug_level >= DEBUGLEVEL_Reports)
-	{
-		_INDENT();
-		KPrintF("%s:%ld:%s = 0x%08lx \"%s\"\n",file,line,name,string,string);
-	}
-}
-
-/****************************************************************************/
-
-void
-_SHOWMSG(
-	const char *string,
-	const char *file,
-	int line)
-{
-	if(__debug_level >= DEBUGLEVEL_Reports)
-	{
-		_INDENT();
-		KPrintF("%s:%ld:%s\n",file,line,string);
-	}
-}
-
-/****************************************************************************/
-
-void
-_DPRINTF_HEADER(
-	const char *file,
-	int line)
-{
-	if(__debug_level >= DEBUGLEVEL_Reports)
-	{
-		_INDENT();
-		KPrintF("%s:%ld:",file,line);
-	}
-}
-
-void
-_DPRINTF(const char *fmt,...)
-{
-	if(__debug_level >= DEBUGLEVEL_Reports)
-	{
-		va_list args;
-
-		va_start(args,fmt);
-		KPutFmt((char *)fmt,args);
-		va_end(args);
-
-		KPrintF("\n");
-	}
-}
-
-void
-_DLOG(const char *fmt,...)
-{
-	if(__debug_level >= DEBUGLEVEL_Reports)
-	{
-		va_list args;
-
-		va_start(args,fmt);
-		KPutFmt((char *)fmt,args);
-		va_end(args);
-	}
-}
-
-/****************************************************************************/
-
-void
-_ENTER(
-	const char *file,
-	int line,
-	const char *function)
-{
-	if(__debug_level >= DEBUGLEVEL_CallTracing)
-	{
-		_INDENT();
-		KPrintF("%s:%ld:Entering %s\n",file,line,function);
-	}
-
-	indent_level++;
-}
-
-void
-_LEAVE(
-	const char *file,
-	int line,
-	const char *function)
-{
-	indent_level--;
-
-	if(__debug_level >= DEBUGLEVEL_CallTracing)
-	{
-		_INDENT();
-		KPrintF("%s:%ld: Leaving %s\n",file,line,function);
-	}
-}
-
-void
-_RETURN(
-	const char *file,
-	int line,
-	const char *function,
-	unsigned long result)
-{
-	indent_level--;
-
-	if(__debug_level >= DEBUGLEVEL_CallTracing)
-	{
-		_INDENT();
-		KPrintF("%s:%ld: Leaving %s (result 0x%08lx, %ld)\n",file,line,function,result,result);
-	}
-}

library/debug.h

@@ -1,199 +0,0 @@
-/*
- * $Id: debug.h,v 1.3 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=8
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _DEBUG_H
-#define _DEBUG_H
-
-/****************************************************************************/
-
-/* IMPORTANT: If DEBUG is redefined, it must happen only here. This
- *            will cause all modules to depend upon it to be rebuilt
- *            by the smakefile (that is, provided the smakefile has
- *            all the necessary dependency lines in place).
- */
-
-/*#define DEBUG*/
-
-/****************************************************************************/
-
-#define PUSH_REPORTS()	PUSHDEBUGLEVEL(1)
-#define PUSH_CALLS()	PUSHDEBUGLEVEL(2)
-#define PUSH_ALL()	PUSHDEBUGLEVEL(2)
-#define POP()		POPDEBUGLEVEL()
-
-/****************************************************************************/
-
-#if defined(DEBUG)
-
-/****************************************************************************/
-
-#ifndef _STDLIB_H
-#include <stdlib.h>
-#endif /* _STDLIB_H */
-
-#ifndef _DOS_H
-#include <dos.h>
-#endif /* _DOS_H */
-
-/****************************************************************************/
-
-extern void kprintf(const char *format,...);
-
-/****************************************************************************/
-
- void _SHOWVALUE(unsigned long value,int size,const char *name,const char *file,int line);
- void _SHOWPOINTER(const void *p,const char *name,const char *file,int line);
- void _SHOWSTRING(const char *string,const char *name,const char *file,int line);
- void _SHOWMSG(const char *msg,const char *file,int line);
- void _ENTER(const char *file,int line,const char *function);
- void _LEAVE(const char *file,int line,const char *function);
- void _RETURN(const char *file,int line,const char *function,unsigned long result);
- void _DPRINTF_HEADER(const char *file,int line);
- void _DPRINTF(const char *format,...);
- void _DLOG(const char *format,...);
- int  _SETDEBUGLEVEL(int level);
- void _PUSHDEBUGLEVEL(int level);
- void _POPDEBUGLEVEL(void);
- int  _GETDEBUGLEVEL(void);
- void _SETPROGRAMNAME(char *name);
-
- #if defined(__SASC)
-  #define ENTER()		_ENTER(__FILE__,__LINE__,__FUNC__)
-  #define LEAVE()		_LEAVE(__FILE__,__LINE__,__FUNC__)
-  #define RETURN(r)		_RETURN(__FILE__,__LINE__,__FUNC__,(unsigned long)r)
-  #define SHOWVALUE(v)		_SHOWVALUE((unsigned long)v,sizeof(v),#v,__FILE__,__LINE__)
-  #define SHOWPOINTER(p)	_SHOWPOINTER(p,#p,__FILE__,__LINE__)
-  #define SHOWSTRING(s)		_SHOWSTRING(s,#s,__FILE__,__LINE__)
-  #define SHOWMSG(s)		_SHOWMSG(s,__FILE__,__LINE__)
-  #define D(s)			do { _DPRINTF_HEADER(__FILE__,__LINE__); _DPRINTF s; } while(0)
-  #define PRINTHEADER()		_DPRINTF_HEADER(__FILE__,__LINE__)
-  #define PRINTF(s)		_DLOG s
-  #define LOG(s)		do { _DPRINTF_HEADER(__FILE__,__LINE__); _DLOG("<%s()>:",__FUNC__); _DLOG s; } while(0)
-  #define SETDEBUGLEVEL(l)	_SETDEBUGLEVEL(l)
-  #define PUSHDEBUGLEVEL(l)	_PUSHDEBUGLEVEL(l)
-  #define POPDEBUGLEVEL()	_POPDEBUGLEVEL()
-  #define SETPROGRAMNAME(n)	_SETPROGRAMNAME(n)
-  #define GETDEBUGLEVEL()	_GETDEBUGLEVEL()
- #elif defined(__GNUC__)
-  #define ENTER()		_ENTER(__FILE__,__LINE__,__FUNCTION__)
-  #define LEAVE()		_LEAVE(__FILE__,__LINE__,__FUNCTION__)
-  #define RETURN(r)		_RETURN(__FILE__,__LINE__,__FUNCTION__,(unsigned long)r)
-  #define SHOWVALUE(v)		_SHOWVALUE((unsigned long)v,sizeof(v),#v,__FILE__,__LINE__)
-  #define SHOWPOINTER(p)	_SHOWPOINTER(p,#p,__FILE__,__LINE__)
-  #define SHOWSTRING(s)		_SHOWSTRING(s,#s,__FILE__,__LINE__)
-  #define SHOWMSG(s)		_SHOWMSG(s,__FILE__,__LINE__)
-  #define D(s)			do { _DPRINTF_HEADER(__FILE__,__LINE__); _DPRINTF s; } while(0)
-  #define PRINTHEADER()		_DPRINTF_HEADER(__FILE__,__LINE__)
-  #define PRINTF(s)		_DLOG s
-  #define LOG(s)		do { _DPRINTF_HEADER(__FILE__,__LINE__); _DLOG("<%s()>:",__FUNCTION__); _DLOG s; } while(0)
-  #define SETDEBUGLEVEL(l)	_SETDEBUGLEVEL(l)
-  #define PUSHDEBUGLEVEL(l)	_PUSHDEBUGLEVEL(l)
-  #define POPDEBUGLEVEL()	_POPDEBUGLEVEL()
-  #define SETPROGRAMNAME(n)	_SETPROGRAMNAME(n)
-  #define GETDEBUGLEVEL()	_GETDEBUGLEVEL()
- #else
-  #define __FUNC__ ""
-  #define ENTER()		_ENTER(__FILE__,__LINE__,__FUNC__)
-  #define LEAVE()		_LEAVE(__FILE__,__LINE__,__FUNC__)
-  #define RETURN(r)		_RETURN(__FILE__,__LINE__,__FUNC__,(unsigned long)r)
-  #define SHOWVALUE(v)		_SHOWVALUE((unsigned long)v,sizeof(v),#v,__FILE__,__LINE__)
-  #define SHOWPOINTER(p)	_SHOWPOINTER(p,#p,__FILE__,__LINE__)
-  #define SHOWSTRING(s)		_SHOWSTRING(s,#s,__FILE__,__LINE__)
-  #define SHOWMSG(s)		_SHOWMSG(s,__FILE__,__LINE__)
-  #define D(s)			do { _DPRINTF_HEADER(__FILE__,__LINE__); _DPRINTF s; } while(0)
-  #define PRINTHEADER()		_DPRINTF_HEADER(__FILE__,__LINE__)
-  #define PRINTF(s)		_DLOG s
-  #define LOG(s)		do { _DPRINTF_HEADER(__FILE__,__LINE__); _DLOG("<%s()>:",__FUNC__); _DLOG s; } while(0)
-  #define SETDEBUGLEVEL(l)	_SETDEBUGLEVEL(l)
-  #define PUSHDEBUGLEVEL(l)	_PUSHDEBUGLEVEL(l)
-  #define POPDEBUGLEVEL()	_POPDEBUGLEVEL()
-  #define SETPROGRAMNAME(n)	_SETPROGRAMNAME(n)
-  #define GETDEBUGLEVEL()	_GETDEBUGLEVEL()
- #endif
-
- #undef DEBUG
- #define DEBUG 1
-
- #define assert(expression)                     \
-	((void)                                \
-	 ((expression) ? 0 :                   \
-	  (                                    \
-	   *(char *)0 = 0, /* Enforcer hit */  \
-	   _SETDEBUGLEVEL(2),                  \
-	   kprintf("[%s] "                     \
-	    "%s:%ld: failed assertion '%s'\n", \
-	    __program_name,                    \
-	    __FILE__,                          \
-	    __LINE__,                          \
-	    #expression),                      \
-	   abort(),                            \
-	   0                                   \
-	  )                                    \
-	 )                                     \
-	)
-
-#else
-
-/****************************************************************************/
-
-#ifdef NDEBUG
-#define assert(expression) ((void)0)
-#else
-#include <assert.h>
-#endif /* NDEBUG */
-
-/****************************************************************************/
-
- #define ENTER()		((void)0)
- #define LEAVE()		((void)0)
- #define RETURN(r)		((void)0)
- #define SHOWVALUE(v)		((void)0)
- #define SHOWPOINTER(p)		((void)0)
- #define SHOWSTRING(s)		((void)0)
- #define SHOWMSG(s)		((void)0)
- #define D(s)			((void)0)
- #define PRINTHEADER()		((void)0)
- #define PRINTF(s)		((void)0)
- #define LOG(s)			((void)0)
- #define SETDEBUGLEVEL(l)	((void)0)
- #define PUSHDEBUGLEVEL(l)	((void)0)
- #define POPDEBUGLEVEL()	((void)0)
- #define SETPROGRAMNAME(n)	((void)0)
- #define GETDEBUGLEVEL()	(0)
-
- #define DEBUG 0
-#endif /* DEBUG */
-
-/****************************************************************************/
-
-#endif /* _DEBUG_H */

library/debug.lib_rev.c

@@ -1,38 +0,0 @@
-/*
- * $Id: debug.lib_rev.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug.lib_rev.h"
-
-/****************************************************************************/
-
-char __debug_lib_version[] = VERSTAG;

library/debug.lib_rev.h

@@ -1,6 +0,0 @@
-#define VERSION		1
-#define REVISION	189
-#define DATE		"5.3.2005"
-#define VERS		"debug.lib 1.189"
-#define VSTRING		"debug.lib 1.189 (5.3.2005)\r\n"
-#define VERSTAG		"\0$VER: debug.lib 1.189 (5.3.2005)"

library/debug.lib_rev.rev

@@ -1 +0,0 @@
-189

library/debug_cmpstrexec.c

@@ -1,62 +0,0 @@
-/*
- * $Id: debug_cmpstrexec.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-LONG
-cmpstrexec(const char * source1,const char * source2)
-{
-	LONG result = 0;
-
-	assert( source1 != NULL && source2 != NULL );
-
-	if(source1 != NULL && source2 != NULL)
-	{
-		while((*source1) == (*source2))
-		{
-			if((*source1) == '\0')
-				goto out;
-
-			source1++;
-			source2++;
-		}
-
-		result = (*source1) - (*source2);
-	}
-
- out:
-
-	return(result);
-}

library/debug_headers.h

@@ -1,151 +0,0 @@
-/*
- * $Id: debug_headers.h,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _DEBUG_HEADERS_H
-#define _DEBUG_HEADERS_H
-
-/****************************************************************************/
-
-#include <exec/libraries.h>
-
-/****************************************************************************/
-
-#if defined(__SASC)
-
-#include <clib/exec_protos.h>
-/*#include <pragmas/exec_sysbase_pragmas.h>*/
-#include <pragmas/exec_pragmas.h>
-
-LONG RawMayGetChar(VOID);
-VOID RawPutChar(UBYTE c);
-
-#pragma libcall SysBase RawMayGetChar 1fe 00
-#pragma libcall SysBase RawPutChar 204 001
-
-#endif /* __SASC */
-
-/****************************************************************************/
-
-#if defined(__amigaos4__)
-#include <exec/emulation.h>
-#endif /* __amigaos4__ */
-
-/****************************************************************************/
-
-#if defined(__GNUC__)
-
-#define __NOLIBBASE__
-#include <proto/exec.h>
-
-#ifndef __PPC__
-
-#define RawMayGetChar() ({ \
-  UBYTE _RawMayGetChar__re = \
-  ({ \
-  register struct Library * const __RawMayGetChar__bn __asm("a6") = SysBase;\
-  register UBYTE __RawMayGetChar__re __asm("d0"); \
-  __asm volatile ("jsr a6@(-510:W)" \
-  : "=r"(__RawMayGetChar__re) \
-  : "r"(__RawMayGetChar__bn) \
-  : "d1", "a0", "a1", "fp0", "fp1", "cc", "memory"); \
-  __RawMayGetChar__re; \
-  }); \
-  _RawMayGetChar__re; \
-})
-
-#define RawPutChar(c) ({ \
-  ULONG _RawPutChar_c = (c); \
-  { \
-  register struct Library * const __RawPutChar__bn __asm("a6") = SysBase;\
-  register ULONG __RawPutChar_c __asm("d0") = (_RawPutChar_c); \
-  __asm volatile ("jsr a6@(-516:W)" \
-  : \
-  : "r"(__RawPutChar__bn), "r"(__RawPutChar_c) \
-  : "d0", "d1", "a0", "a1", "fp0", "fp1", "cc", "memory"); \
-  } \
-})
-
-#endif /* __PPC___ */
-
-#endif /* __GNUC__ */
-
-/****************************************************************************/
-
-#define SysBase (*(struct Library **)4)
-#define IExec ((struct ExecIFace *)((struct ExecBase *)SysBase)->MainInterface)
-
-/****************************************************************************/
-
-#include "debug.h"
-
-/****************************************************************************/
-
-#include "macros.h"
-
-/****************************************************************************/
-
-#include <string.h>
-#include <stdarg.h>
-
-/****************************************************************************/
-
-extern LONG cmpstrexec(const char *source1, const char *source2);
-extern LONG KCmpStr(const char *source1, const char *source2);
-extern LONG KMayGetCh(VOID);
-extern LONG KMayGetChar(VOID);
-extern LONG kgetc(VOID);
-extern LONG kgetchar(VOID);
-extern LONG kgetch(VOID);
-extern LONG KGetCh(VOID);
-extern LONG KGetChar(VOID);
-extern LONG kgetnum(VOID);
-extern LONG KGetNum(void);
-extern VOID KDoFmt(const char *format_string, APTR data_stream, APTR put_char_routine, APTR put_char_data);
-extern VOID KPutFmt(const char *format, va_list arg);
-extern VOID KVPrintF(const char * format, va_list arg);
-extern VOID kvprintf(const char *format, va_list arg);
-extern VOID kprintf(const char *format, ...);
-extern VOID KPrintF(const char *format, ...);
-extern VOID kputc(UBYTE c);
-extern VOID kputchar(UBYTE c);
-extern VOID kputch(UBYTE c);
-extern VOID KPutCh(UBYTE c);
-extern VOID KPutChar(UBYTE c);
-extern VOID kputstr(const UBYTE *s);
-extern VOID KPutS(const UBYTE *s);
-extern VOID kputs(const UBYTE *s);
-extern VOID KPutStr(const UBYTE *s);
-
-/****************************************************************************/
-
-#endif /* _DEBUG_HEADERS_H */

library/debug_kcmpstr.c

@@ -1,46 +0,0 @@
-/*
- * $Id: debug_kcmpstr.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-LONG
-KCmpStr(const char * source1,const char * source2)
-{
-	LONG result;
-
-	result = cmpstrexec(source1,source2);
-
-	return(result);
-}

library/debug_kdofmt.c

@@ -1,45 +0,0 @@
-/*
- * $Id: debug_kdofmt.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-VOID
-KDoFmt(const char * format_string,APTR data_stream,APTR put_char_routine,APTR put_char_data)
-{
-	assert( format_string != NULL );
-
-	if(format_string != NULL)
-		RawDoFmt((STRPTR)format_string,data_stream,(VOID (*)())put_char_routine,put_char_data);
-}

library/debug_kgetc.c

@@ -1,48 +0,0 @@
-/*
- * $Id: debug_kgetc.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-LONG
-kgetc(VOID)
-{
-	LONG result;
-
-	do
-		result = KMayGetChar();
-	while(result < 0);
-
-	return(result);
-}

library/debug_kgetch1.c

@@ -1,46 +0,0 @@
-/*
- * $Id: debug_kgetch1.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-LONG
-kgetch(VOID)
-{
-	LONG result;
-
-	result = kgetc();
-
-	return(result);
-}

library/debug_kgetch2.c

@@ -1,46 +0,0 @@
-/*
- * $Id: debug_kgetch2.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-LONG
-KGetCh(VOID)
-{
-	LONG result;
-
-	result = kgetc();
-
-	return(result);
-}

library/debug_kgetchar1.c

@@ -1,46 +0,0 @@
-/*
- * $Id: debug_kgetchar1.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-LONG
-kgetchar(VOID)
-{
-	LONG result;
-
-	result = kgetc();
-
-	return(result);
-}

library/debug_kgetchar2.c

@@ -1,46 +0,0 @@
-/*
- * $Id: debug_kgetchar2.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-LONG
-KGetChar(VOID)
-{
-	LONG result;
-
-	result = kgetc();
-
-	return(result);
-}

library/debug_kgetnum1.c

@@ -1,110 +0,0 @@
-/*
- * $Id: debug_kgetnum1.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-LONG
-kgetnum(VOID)
-{
-	LONG sum = 0;
-	LONG result;
-	BOOL is_negative = FALSE;
-	LONG position = 0;
-	LONG c;
-
-	while(TRUE)
-	{
-		c = kgetc();
-
-		if(c == '-')
-		{
-			if(position == 0)
-			{
-				is_negative = TRUE;
-
-				kputc(c);
-
-				position++;
-			}
-		}
-		else if (c == '\b')
-		{
-			if(position > 0)
-			{
-				position--;
-				if(position == 0)
-				{
-					is_negative = FALSE;
-
-					sum = 0;
-				}
-				else
-				{
-					sum = sum / 10;
-				}
-
-				kputc(c);
-				kputc(' ');
-				kputc(c);
-			}
-		}
-		else if (c == '\r')
-		{
-			kputc('\n');
-			break;
-		}
-		else if ('0' <= c && c <= '9')
-		{
-			LONG new_sum;
-
-			new_sum = sum * 10 + (c - '0');
-			if(new_sum >= sum)
-			{
-				sum = new_sum;
-
-				kputc(c);
-
-				position++;
-			}
-		}
-	}
-
-	if(is_negative)
-		result = (-sum);
-	else
-		result = sum;
-
-	return(result);
-}

library/debug_kgetnum2.c

@@ -1,46 +0,0 @@
-/*
- * $Id: debug_kgetnum2.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-LONG
-KGetNum(void)
-{
-	LONG result;
-
-	result = kgetnum();
-
-	return(result);
-}

library/debug_kmaygetch.c

@@ -1,46 +0,0 @@
-/*
- * $Id: debug_kmaygetch.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-LONG
-KMayGetCh(VOID)
-{
-	LONG result;
-
-	result = KMayGetChar();
-
-	return(result);
-}

library/debug_kmaygetchar.c

@@ -1,55 +0,0 @@
-/*
- * $Id: debug_kmaygetchar.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-LONG
-KMayGetChar(VOID)
-{
-	LONG result;
-
-	#if defined(__amigaos4__)
-	{
-		/* Call RawMayGetChar() through the 68k LVO. */
-		result = EmulateTags(SysBase, ET_Offset, -510, TAG_DONE);
-	}
-	#else
-	{
-		result = RawMayGetChar();
-	}
-	#endif /* __amigaos4__ */
-
-	return(result);
-}

library/debug_kprintf1.c

@@ -1,51 +0,0 @@
-/*
- * $Id: debug_kprintf1.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-VOID
-kprintf(const char * format,...)
-{
-	assert( format != NULL );
-
-	if(format != NULL)
-	{
-		va_list arg;
-
-		va_start(arg,format);
-		KPutFmt(format,arg);
-		va_end(arg);
-	}
-}

library/debug_kprintf2.c

@@ -1,51 +0,0 @@
-/*
- * $Id: debug_kprintf2.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-VOID
-KPrintF(const char * format,...)
-{
-	assert( format != NULL );
-
-	if(format != NULL)
-	{
-		va_list arg;
-
-		va_start(arg,format);
-		KPutFmt(format,arg);
-		va_end(arg);
-	}
-}

library/debug_kputc.c

@@ -1,51 +0,0 @@
-/*
- * $Id: debug_kputc.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-VOID
-kputc(UBYTE c)
-{
-	#if defined(__amigaos4__)
-	{
-		/* Call RawPutChar() through the 68k LVO. */
-		EmulateTags(SysBase, ET_Offset, -516, ET_RegisterD0, c, TAG_DONE);
-	}
-	#else
-	{
-		RawPutChar(c);
-	}
-	#endif /* __amigaos4__ */
-}

library/debug_kputch1.c

@@ -1,42 +0,0 @@
-/*
- * $Id: debug_kputch1.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-VOID
-kputch(UBYTE c)
-{
-	kputc(c);
-}

library/debug_kputch2.c

@@ -1,42 +0,0 @@
-/*
- * $Id: debug_kputch2.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-VOID
-KPutCh(UBYTE c)
-{
-	kputc(c);
-}

library/debug_kputchar1.c

@@ -1,42 +0,0 @@
-/*
- * $Id: debug_kputchar1.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-VOID
-kputchar(UBYTE c)
-{
-	kputc(c);
-}

library/debug_kputchar2.c

@@ -1,42 +0,0 @@
-/*
- * $Id: debug_kputchar2.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-VOID
-KPutChar(UBYTE c)
-{
-	kputc(c);
-}

library/debug_kputfmt.c

@@ -1,194 +0,0 @@
-/*
- * $Id: debug_kputfmt.c,v 1.3 2005-02-25 10:14:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-#if defined(__amigaos4__)
-
-/****************************************************************************/
-
-/* Count the number of parameters that need to be passed on the stack. If a
-   parameter table is provided, pick up the parameters and store them in
-   the table. The table layout follows the format string and can include
-   both 16 and 32 bit data. */
-STATIC size_t
-process_var_args(char *format_string,va_list argument_list,unsigned short * table)
-{
-	size_t num_args = 0;
-	char len;
-	char c;
-
-	while((c = (*format_string++)) != '\0')
-	{
-		if(c != '%')
-			continue;
-
-		/* Process the flags; only '-' is allowed here. */
-		if((*format_string) == '-')
-			format_string++;
-
-		/* Process the field width; this must be a string of digits. */
-		c = (*format_string);
-		while('0' <= c && c <= '9')
-		{
-			format_string++;
-
-			c = (*format_string);
-		}
-
-		/* Process the size limit field, if any. */
-		if((*format_string) == '.')
-		{
-			format_string++;
-
-			c = (*format_string);
-			while('0' <= c && c <= '9')
-			{
-				format_string++;
-
-				c = (*format_string);
-			}
-		}
-
-		/* Take care of the parameter length, if any. */
-		len = (*format_string);
-		if(len == 'l')
-			format_string++;
-
-		c = (*format_string++);
-		if(c == '\0')
-			break;
-
-		/* Check if any of the following parameters might come from the
-		   stack, and if so, convert them into the form expected by the
-		   operating system. */
-		switch(c)
-		{
-			/* 32 bit pointers (BSTR or STRPTR) */
-			case 'b':
-			case 's':
-
-				if(table != NULL)
-					(*(unsigned long *)&table[num_args]) = (unsigned long)va_arg(argument_list,char *);
-
-				num_args += 2;
-				break;
-
-			/* Single character */
-			case 'c':
-
-				/* NOTE: va_arg() is quietly assumed not to be able to expand 'char' type
-				         parameters. They appear to default to 'int' and should show up as such
-				         on the stack (or wherever they ended up). We therefore assume that they
-				         should be picked up as type 'int' rather than as type 'char'. */
-
-			/* Numeric constant, which is assumed to be of type int. */
-			case 'd':
-			case 'u':
-			case 'x':
-
-				if(table != NULL)
-				{
-					if(len == 'l')
-						(*(unsigned long *)&table[num_args]) = (unsigned long)va_arg(argument_list,int);
-					else
-						table[num_args] = (unsigned short)va_arg(argument_list,int);
-				}
-
-				if(len == 'l')
-					num_args += 2;
-				else
-					num_args++;
-
-				break;
-
-			/* Anything else is taken as is... */
-			default:
-
-				break;
-		}
-	}
-
-	return(num_args);
-}
-
-/****************************************************************************/
-
-#endif /* __amigaos4__ */
-
-/****************************************************************************/
-
-STATIC VOID ASM
-raw_put_char(REG(d0,UBYTE c))
-{
-	kputc(c); 
-}
-
-/****************************************************************************/
-
-VOID
-KPutFmt(const char * format_string,va_list argument_list)
-{
-	assert( format_string != NULL );
-
-	if(format_string != NULL)
-	{
-		#if defined(__amigaos4__)
-		{
-			size_t num_args;
-
-			/* The following assumes that GCC extensions are available. */
-
-			num_args = process_var_args((char *)format_string,argument_list,NULL);
-			if(num_args > 0)
-			{
-				unsigned short table[num_args];
-
-				(void)process_var_args((char *)format_string,argument_list,table);
-
-				KDoFmt(format_string,(APTR)table,(APTR)raw_put_char,NULL);
-			}
-			else
-			{
-				KDoFmt(format_string,NULL,(APTR)raw_put_char,NULL);
-			}
-		}
-		#else
-		{
-			KDoFmt(format_string,(APTR)argument_list,(APTR)raw_put_char,NULL);
-		}
-		#endif /* __amigaos4__ */
-	}
-}

library/debug_kputs1.c

@@ -1,44 +0,0 @@
-/*
- * $Id: debug_kputs1.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-void
-KPutS(const UBYTE * s)
-{
-	assert( s != NULL );
-
-	kputstr(s);
-}

library/debug_kputs2.c

@@ -1,44 +0,0 @@
-/*
- * $Id: debug_kputs2.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-void
-kputs(const UBYTE * s)
-{
-	assert( s != NULL );
-
-	kputstr(s);
-}

library/debug_kputstr1.c

@@ -1,50 +0,0 @@
-/*
- * $Id: debug_kputstr1.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-void
-kputstr(const UBYTE * s)
-{
-	assert( s != NULL );
-
-	if(s != NULL)
-	{
-		UBYTE c;
-
-		while((c = (*s++)) != '\0')
-			kputc(c);
-	}
-}

library/debug_kputstr2.c

@@ -1,44 +0,0 @@
-/*
- * $Id: debug_kputstr2.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-void
-KPutStr(const UBYTE * s)
-{
-	assert( s != NULL );
-
-	kputstr(s);
-}

library/debug_kvprintf1.c

@@ -1,45 +0,0 @@
-/*
- * $Id: debug_kvprintf1.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-VOID
-kvprintf(const char * format,va_list arg)
-{
-	assert( format != NULL );
-
-	if(format != NULL)
-		KPutFmt(format,arg);
-}

library/debug_kvprintf2.c

@@ -1,45 +0,0 @@
-/*
- * $Id: debug_kvprintf2.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#include "debug_headers.h"
-
-/****************************************************************************/
-
-VOID
-KVPrintF(const char * format,va_list arg)
-{
-	assert( format != NULL );
-
-	if(format != NULL)
-		KPutFmt(format,arg);
-}

library/debug_level.c

@@ -1,37 +0,0 @@
-/*
- * $Id: debug_level.c,v 1.2 2005-01-02 09:07:07 obarthel Exp $
- *
- * :ts=8
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-/****************************************************************************/
-
-/* By default, show and test only assertions. */
-int __debug_level = 0;

library/dirent_closedir.c

@@ -1,208 +0,0 @@
-/*
- * $Id: dirent_closedir.c,v 1.8 2005-03-09 10:48:59 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _STDLIB_MEM_DEBUG_H
-#include "stdlib_mem_debug.h"
-#endif /* _STDLIB_MEM_DEBUG_H */
-
-/****************************************************************************/
-
-#ifndef _DIRENT_HEADERS_H
-#include "dirent_headers.h"
-#endif /* _DIRENT_HEADERS_H */
-
-/****************************************************************************/
-
-/* The following is not part of the ISO 'C' (1994) standard. */
-
-/****************************************************************************/
-
-/* Directories being scanned whose locks need to be freed when shutting down. */
-struct MinList NOCOMMON __directory_list;
-
-/****************************************************************************/
-
-#if defined(__THREAD_SAFE)
-
-/****************************************************************************/
-
-static struct SignalSemaphore * dirent_lock;
-
-/****************************************************************************/
-
-void
-__dirent_lock(void)
-{
-	if(dirent_lock != NULL)
-		ObtainSemaphore(dirent_lock);
-}
-
-/****************************************************************************/
-
-void
-__dirent_unlock(void)
-{
-	if(dirent_lock != NULL)
-		ReleaseSemaphore(dirent_lock);
-}
-
-/****************************************************************************/
-
-#endif /* __THREAD_SAFE */
-
-/****************************************************************************/
-
-CLIB_CONSTRUCTOR(__dirent_init)
-{
-	BOOL success = FALSE;
-
-	ENTER();
-
-	NewList((struct List *)&__directory_list);
-
-	#if defined(__THREAD_SAFE)
-	{
-		dirent_lock = __create_semaphore();
-		if(dirent_lock == NULL)
-			goto out;
-	}
-	#endif /* __THREAD_SAFE */
-
-	success = TRUE;
-
- out:
-
-	RETURN(success);
-
-	if(success)
-		CONSTRUCTOR_SUCCEED();
-	else
-		CONSTRUCTOR_FAIL();
-}
-
-/****************************************************************************/
-
-CLIB_DESTRUCTOR(__dirent_exit)
-{
-	ENTER();
-
-	if(__directory_list.mlh_Head != NULL)
-	{
-		while(NOT IsListEmpty((struct List *)&__directory_list))
-			closedir((DIR *)__directory_list.mlh_Head);
-	}
-
-	#if defined(__THREAD_SAFE)
-	{
-		__delete_semaphore(dirent_lock);
-		dirent_lock = NULL;
-	}
-	#endif /* __THREAD_SAFE */
-
-	LEAVE();
-}
-
-/****************************************************************************/
-
-int
-closedir(DIR * directory_pointer)
-{
-	struct DirectoryHandle * dh;
-	int result = -1;
-
-	ENTER();
-
-	SHOWPOINTER(directory_pointer);
-
-	if(__check_abort_enabled)
-		__check_abort();
-
-	__dirent_lock();
-
-	if(directory_pointer == NULL)
-	{
-		__set_errno(EBADF);
-		goto out;
-	}
-
-	#ifndef NDEBUG
-	{
-		BOOL directory_pointer_is_valid = FALSE;
-
-		for(dh = (struct DirectoryHandle *)__directory_list.mlh_Head ;
-		    dh->dh_MinNode.mln_Succ != NULL ;
-		    dh = (struct DirectoryHandle *)dh->dh_MinNode.mln_Succ)
-		{
-			if(dh == (struct DirectoryHandle *)directory_pointer)
-			{
-				directory_pointer_is_valid = TRUE;
-				break;
-			}
-		}
-
-		if(NOT directory_pointer_is_valid)
-		{
-			__set_errno(EBADF);
-			goto out;
-		}
-	}
-	#endif /* NDEBUG */
-
-	dh = (struct DirectoryHandle *)directory_pointer;
-
-	Remove((struct Node *)dh);
-
-	#if defined(UNIX_PATH_SEMANTICS)
-	{
-		struct Node * node;
-
-		while((node = RemHead((struct List *)&dh->dh_VolumeList)) != NULL)
-			free(node);
-	}
-	#endif /* UNIX_PATH_SEMANTICS */
-
-	PROFILE_OFF();
-	UnLock(dh->dh_DirLock);
-	PROFILE_ON();
-
-	free(dh);
-
-	result = 0;
-
- out:
-
-	__dirent_unlock();
-
-	RETURN(result);
-	return(result);
-}

library/dirent_headers.h

@@ -1,98 +0,0 @@
-/*
- * $Id: dirent_headers.h,v 1.7 2005-02-28 10:07:30 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _DIRENT_HEADERS_H
-#define _DIRENT_HEADERS_H
-
-/****************************************************************************/
-
-#ifndef _STDIO_HEADERS_H
-#include "stdio_headers.h"
-#endif /* _STDIO_HEADERS_H */
-
-/****************************************************************************/
-
-#ifndef _STDLIB_HEADERS_H
-#include "stdlib_headers.h"
-#endif /* _STDLIB_HEADERS_H */
-
-/****************************************************************************/
-
-#ifndef _MACROS_H
-#include "macros.h"
-#endif /* _MACROS_H */
-
-/****************************************************************************/
-
-struct DirectoryHandle
-{
-	struct MinNode			dh_MinNode;
-	BPTR					dh_DirLock;
-	struct FileInfoBlock	dh_FileInfo;
-	struct dirent			dh_DirectoryEntry;
-
-	int						dh_Position;
-	struct Node *			dh_VolumeNode;
-	struct MinList			dh_VolumeList;
-	BOOL					dh_ScanVolumeList;
-};
-
-/****************************************************************************/
-
-extern struct MinList NOCOMMON __directory_list;
-
-/****************************************************************************/
-
-#if defined(__THREAD_SAFE)
-
-/****************************************************************************/
-
-extern void __dirent_lock(void);
-extern void __dirent_unlock(void);
-
-/****************************************************************************/
-
-#else
-
-/****************************************************************************/
-
-#define __dirent_lock()		((void)0)
-#define __dirent_unlock()	((void)0)
-
-/****************************************************************************/
-
-#endif /* __THREAD_SAFE */
-
-/****************************************************************************/
-
-#endif /* _DIRENT_HEADERS_H */

library/dirent_opendir.c

@@ -1,280 +0,0 @@
-/*
- * $Id: dirent_opendir.c,v 1.8 2005-02-27 21:58:21 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _STDLIB_NULL_POINTER_CHECK_H
-#include "stdlib_null_pointer_check.h"
-#endif /* _STDLIB_NULL_POINTER_CHECK_H */
-
-/****************************************************************************/
-
-#ifndef _STDLIB_MEM_DEBUG_H
-#include "stdlib_mem_debug.h"
-#endif /* _STDLIB_MEM_DEBUG_H */
-
-/****************************************************************************/
-
-#ifndef _DIRENT_HEADERS_H
-#include "dirent_headers.h"
-#endif /* _DIRENT_HEADERS_H */
-
-/****************************************************************************/
-
-/* The following is not part of the ISO 'C' (1994) standard. */
-
-/****************************************************************************/
-
-#if defined(UNIX_PATH_SEMANTICS)
-
-/****************************************************************************/
-
-STATIC struct Node *
-find_by_name(struct List * list,const char * name)
-{
-	struct Node * result = NULL;
-	struct Node * node;
-
-	for(node = list->lh_Head ; node->ln_Succ != NULL ; node = node->ln_Succ)
-	{
-		if(strcasecmp(node->ln_Name,name) == 0)
-		{
-			result = node;
-			break;
-		}
-	}
-
-	return(result);
-}
-
-/****************************************************************************/
-
-#endif /* UNIX_PATH_SEMANTICS */
-
-/****************************************************************************/
-
-DIR *
-opendir(const char * path_name)
-{
-	#if defined(UNIX_PATH_SEMANTICS)
-	struct name_translation_info path_name_nti;
-	#endif /* UNIX_PATH_SEMANTICS */
-	struct DirectoryHandle * dh = NULL;
-	DIR * result = NULL;
-
-	ENTER();
-
-	SHOWSTRING(path_name);
-
-	assert( path_name != NULL );
-
-	if(__check_abort_enabled)
-		__check_abort();
-
-	#if defined(CHECK_FOR_NULL_POINTERS)
-	{
-		if(path_name == NULL)
-		{
-			SHOWMSG("invalid parameter");
-
-			__set_errno(EFAULT);
-			goto out;
-		}
-	}
-	#endif /* CHECK_FOR_NULL_POINTERS */
-
-	dh = malloc(sizeof(*dh));
-	if(dh == NULL)
-	{
-		SHOWMSG("memory allocation failed");
-		goto out;
-	}
-
-	memset(dh,0,sizeof(*dh));
-
-	#if defined(UNIX_PATH_SEMANTICS)
-	{
-		struct Node * node;
-
-		NewList((struct List *)&dh->dh_VolumeList);
-
-		if(__unix_path_semantics)
-		{
-			if(__translate_unix_to_amiga_path_name(&path_name,&path_name_nti) != 0)
-				goto out;
-
-			SHOWSTRING(path_name);
-
-			if(path_name_nti.is_root)
-			{
-				struct DosList * dol;
-				UBYTE * name;
-
-				SHOWMSG("collecting volume names");
-
-				dh->dh_ScanVolumeList = TRUE;
-
-				PROFILE_OFF();
-				dol = LockDosList(LDF_VOLUMES|LDF_READ);
-				PROFILE_ON();
-
-				while((dol = NextDosEntry(dol,LDF_VOLUMES|LDF_READ)) != NULL)
-				{
-					name = BADDR(dol->dol_Name);
-					if(name != NULL && name[0] > 0)
-					{
-						size_t len;
-
-						len = name[0];
-
-						node = malloc(sizeof(*node) + len + 2);
-						if(node == NULL)
-						{
-							UnLockDosList(LDF_VOLUMES|LDF_READ);
-
-							__set_errno(ENOMEM);
-							goto out;
-						}
-
-						node->ln_Name = (char *)(node + 1);
-
-						memmove(node->ln_Name,&name[1],len);
-						node->ln_Name[len++]	= ':';
-						node->ln_Name[len]		= '\0';
-
-						/* Check if the name is already on the list. Mind you,
-						   this is not the most sophisticated algorithm but then
-						   the number of volumes should be small. */
-						if(find_by_name((struct List *)&dh->dh_VolumeList,node->ln_Name) != NULL)
-						{
-							free(node);
-							continue;
-						}
-
-						D(("adding '%s'",node->ln_Name));
-
-						AddTail((struct List *)&dh->dh_VolumeList,node);
-					}
-				}
-
-				UnLockDosList(LDF_VOLUMES|LDF_READ);
-
-				/* Bail out if we cannot present anything. */
-				if(IsListEmpty((struct List *)&dh->dh_VolumeList))
-				{
-					__set_errno(ENOMEM);
-					goto out;
-				}
-			}
-		}
-	}
-	#endif /* UNIX_PATH_SEMANTICS */
-
-	if(NOT dh->dh_ScanVolumeList)
-	{
-		LONG status;
-
-		SHOWMSG("we are supposed to scan a directory");
-		SHOWSTRING(path_name);
-
-		PROFILE_OFF();
-		dh->dh_DirLock = Lock((STRPTR)path_name,SHARED_LOCK);
-		PROFILE_ON();
-
-		if(dh->dh_DirLock == ZERO)
-		{
-			SHOWMSG("couldn't get a lock on it");
-
-			__set_errno(__translate_access_io_error_to_errno(IoErr()));
-			goto out;
-		}
-
-		assert( (((ULONG)&dh->dh_FileInfo) & 3) == 0 );
-
-		PROFILE_OFF();
-		status = Examine(dh->dh_DirLock,&dh->dh_FileInfo);
-		PROFILE_ON();
-
-		if(status == DOSFALSE)
-		{
-			SHOWMSG("couldn't examine it");
-
-			__set_errno(__translate_io_error_to_errno(IoErr()));
-			goto out;
-		}
-
-		if(dh->dh_FileInfo.fib_DirEntryType < 0)
-		{
-			SHOWMSG("this isn't a directory");
-
-			__set_errno(ENOTDIR);
-			goto out;
-		}
-	}
-
-	SHOWMSG("OK, done");
-
-	assert( __directory_list.mlh_Head != NULL );
-
-	__dirent_lock();
-
-	AddTail((struct List *)&__directory_list,(struct Node *)dh);
-
-	__dirent_unlock();
-
-	result = (DIR *)dh;
-	dh = NULL;
-
- out:
-
-	if(dh != NULL)
-	{
-		SHOWMSG("ouch. cleaning up");
-
-		#if defined(UNIX_PATH_SEMANTICS)
-		{
-			struct Node * node;
-
-			while((node = RemHead((struct List *)&dh->dh_VolumeList)) != NULL)
-				free(node);
-		}
-		#endif /* UNIX_PATH_SEMANTICS */
-
-		PROFILE_OFF();
-		UnLock(dh->dh_DirLock);
-		PROFILE_ON();
-
-		free(dh);
-	}
-
-	RETURN(result);
-	return(result);
-}

library/dirent_readdir.c

@@ -1,231 +0,0 @@
-/*
- * $Id: dirent_readdir.c,v 1.7 2005-02-03 16:56:15 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _DIRENT_HEADERS_H
-#include "dirent_headers.h"
-#endif /* _DIRENT_HEADERS_H */
-
-/****************************************************************************/
-
-/* The following is not part of the ISO 'C' (1994) standard. */
-
-/****************************************************************************/
-
-struct dirent *
-readdir(DIR * directory_pointer)
-{
-	struct dirent * result = NULL;
-	struct DirectoryHandle * dh;
-	BPTR parent_directory = ZERO;
-
-	ENTER();
-
-	SHOWPOINTER(directory_pointer);
-
-	if(__check_abort_enabled)
-		__check_abort();
-
-	PROFILE_OFF();
-
-	if(directory_pointer == NULL)
-	{
-		SHOWMSG("ouch. invalid parameter");
-
-		__set_errno(EBADF);
-		goto out;
-	}
-
-	dh = (struct DirectoryHandle *)directory_pointer;
-
-	#if defined(UNIX_PATH_SEMANTICS)
-	{
-		if(__unix_path_semantics && dh->dh_ScanVolumeList)
-		{
-			SHOWMSG("we are scanning the volume list");
-
-			if(dh->dh_Position == 0)
-			{
-				SHOWMSG("returning the .");
-
-				dh->dh_Position++;
-
-				dh->dh_DirectoryEntry.d_ino = 0;
-				strcpy(dh->dh_DirectoryEntry.d_name,".");
-
-				result = &dh->dh_DirectoryEntry;
-			}
-			else
-			{
-				D_S(struct FileInfoBlock,fib);
-				D_S(struct bcpl_name,bcpl_name);
-				UBYTE * name = bcpl_name->name;
-				BPTR dir_lock;
-
-				assert( (((ULONG)name) & 3) == 0 );
-
-				if(dh->dh_VolumeNode == NULL && NOT IsListEmpty((struct List *)&dh->dh_VolumeList))
-					dh->dh_VolumeNode = (struct Node *)dh->dh_VolumeList.mlh_Head;
-
-				strcpy(name,"\1:"); /* BSTR for ":" */
-
-				while(result == NULL && dh->dh_VolumeNode != NULL && dh->dh_VolumeNode->ln_Succ != NULL)
-				{
-					if(IsFileSystem(dh->dh_VolumeNode->ln_Name))
-					{
-						struct DevProc * dvp;
-
-						dvp = GetDeviceProc(dh->dh_VolumeNode->ln_Name,NULL);
-						if(dvp != NULL)
-						{
-							dir_lock = DoPkt(dvp->dvp_Port,ACTION_LOCATE_OBJECT,ZERO,MKBADDR(name),SHARED_LOCK,	0,0);
-							if(dir_lock != ZERO)
-							{
-								if(Examine(dir_lock,fib))
-								{
-									assert( sizeof(dh->dh_DirectoryEntry.d_name) >= sizeof(fib->fib_FileName) );
-
-									strcpy(dh->dh_DirectoryEntry.d_name,fib->fib_FileName);
-
-									dh->dh_DirectoryEntry.d_ino = fib->fib_DiskKey;
-
-									result = &dh->dh_DirectoryEntry;
-								}
-
-								UnLock(dir_lock);
-							}
-
-							FreeDeviceProc(dvp);
-						}
-					}
-
-					dh->dh_VolumeNode = dh->dh_VolumeNode->ln_Succ;
-				}
-			}
-		}
-	}
-	#endif /* UNIX_PATH_SEMANTICS */
-
-	if(NOT dh->dh_ScanVolumeList)
-	{
-		#if defined(UNIX_PATH_SEMANTICS)
-		{
-			if(__unix_path_semantics)
-			{
-				if(dh->dh_Position == 0)
-				{
-					SHOWMSG("returning .");
-
-					dh->dh_Position++;
-
-					dh->dh_DirectoryEntry.d_ino = dh->dh_FileInfo.fib_DiskKey;
-
-					strcpy(dh->dh_DirectoryEntry.d_name,".");
-
-					result = &dh->dh_DirectoryEntry;
-				}
-				else if (dh->dh_Position == 1)
-				{
-					D_S(struct FileInfoBlock,fib);
-
-					dh->dh_Position++;
-
-					parent_directory = ParentDir(dh->dh_DirLock);
-					if(parent_directory != ZERO)
-					{
-						if(CANNOT Examine(parent_directory,fib))
-						{
-							__set_errno(__translate_io_error_to_errno(IoErr()));
-							goto out;
-						}
-					}
-					else
-					{
-						/* This is the virtual root directory's key. */
-						fib->fib_DiskKey = 0;
-					}
-
-					SHOWMSG("returning ..");
-
-					dh->dh_DirectoryEntry.d_ino = fib->fib_DiskKey;
-
-					strcpy(dh->dh_DirectoryEntry.d_name,"..");
-
-					result = &dh->dh_DirectoryEntry;
-				}
-			}
-		}
-		#endif /* UNIX_PATH_SEMANTICS */
-
-		if(result == NULL)
-		{
-			assert( (((ULONG)&dh->dh_FileInfo) & 3) == 0 );
-
-			if(ExNext(dh->dh_DirLock,&dh->dh_FileInfo))
-			{
-				dh->dh_DirectoryEntry.d_ino = dh->dh_FileInfo.fib_DiskKey;
-
-				assert( sizeof(dh->dh_DirectoryEntry.d_name) >= sizeof(dh->dh_FileInfo.fib_FileName) );
-
-				strcpy(dh->dh_DirectoryEntry.d_name,dh->dh_FileInfo.fib_FileName);
-
-				result = &dh->dh_DirectoryEntry;
-			}
-			else
-			{
-				if(IoErr() != ERROR_NO_MORE_ENTRIES)
-				{
-					SHOWMSG("error scanning directory");
-
-					__set_errno(__translate_io_error_to_errno(IoErr()));
-					goto out;
-				}
-
-				SHOWMSG("that was the end of the line");
-			}
-		}
-	}
-
-	if(result != NULL)
-		D(("next entry to return is '%s'",result->d_name));
-	else
-		SHOWMSG("end of directory reached");
-
- out:
-
-	UnLock(parent_directory);
-
-	PROFILE_ON();
-
-	RETURN(result);
-	return(result);
-}

library/dirent_rewinddir.c

@@ -1,87 +0,0 @@
-/*
- * $Id: dirent_rewinddir.c,v 1.4 2005-02-03 16:56:15 obarthel Exp $
- *
- * :ts=4
- *
- * Portable ISO 'C' (1994) runtime library for the Amiga computer
- * Copyright (c) 2002-2005 by Olaf Barthel <olsen@sourcery.han.de>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- *   - Redistributions of source code must retain the above copyright
- *     notice, this list of conditions and the following disclaimer.
- *
- *   - Neither the name of Olaf Barthel nor the names of contributors
- *     may be used to endorse or promote products derived from this
- *     software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef _DIRENT_HEADERS_H
-#include "dirent_headers.h"
-#endif /* _DIRENT_HEADERS_H */
-
-/****************************************************************************/
-
-/* The following is not part of the ISO 'C' (1994) standard. */
-
-/****************************************************************************/
-
-void
-rewinddir(DIR * directory_pointer)
-{
-	ENTER();
-
-	SHOWPOINTER(directory_pointer);
-
-	if(__check_abort_enabled)
-		__check_abort();
-
-	PROFILE_OFF();
-
-	if(directory_pointer != NULL)
-	{
-		struct DirectoryHandle * dh;
-
-		dh = (struct DirectoryHandle *)directory_pointer;
-
-		dh->dh_Position = 0;
-
-		if(dh->dh_ScanVolumeList)
-		{
-			SHOWMSG("returning to first volume");
-
-			dh->dh_VolumeNode = NULL;
-		}
-		else
-		{
-			SHOWMSG("calling Examine() again");
-
-			assert( (((ULONG)&dh->dh_FileInfo) & 3) == 0 );
-
-			if(CANNOT Examine(dh->dh_DirLock,&dh->dh_FileInfo))
-			{
-				SHOWMSG("ouch. that didn't work");
-				__set_errno(__translate_io_error_to_errno(IoErr()));
-			}
-		}
-	}
-
-	PROFILE_ON();
-
-	LEAVE();
-}