home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga MA Magazine 1998 #6
/
amigamamagazinepolishissue1998.iso
/
packery
/
fp_adpcm
/
adpcm_dt
/
source
/
classbase.c
< prev
next >
Wrap
C/C++ Source or Header
|
1977-12-31
|
4KB
|
163 lines
/******************************************************************************
*
* ADPCM Datatype, based on the sourcecode found in OS3.1 Native Developer Kit
*
* Written by Christian Buchner
*
******************************************************************************
* classbase.c
*
*/
#include "classbase.h"
/****** HSN.datatype/HSN.datatype ****************************************
*
* NAME
* HSN.datatype -- data type for HSN sounds.
*
* FUNCTION
* The HSN data type, a sub-class of the sound.datatype, is used
* to load HSN files.
*
* METHODS
* OM_NEW -- Create a new sound object from a HSN file. The
* source may be either a file or the clipboard.
*
* SEE ALSO
* sound.datatype.
*
*******************************************************************************
*
* Created: 27-Feb-92, David N. Junod
* Modified: 09-Jan-95, Christian Buchner
*
*/
/*****************************************************************************/
Class *__asm ObtainClassEngine (register __a6 struct ClassBase *cb)
{
return (cb->cb_Class);
}
/*****************************************************************************/
struct Library *__asm LibInit (register __d0 struct ClassBase *cb, register __a0 BPTR seglist, register __a6 struct Library * sysbase)
{
cb->cb_SegList = seglist;
SysBase = (struct ExecBase*)sysbase;
InitSemaphore (&cb->cb_Lock);
if (((struct Library *)SysBase)->lib_Version >= 39)
{
DOSBase = OpenLibrary ("dos.library", 39);
UtilityBase = OpenLibrary ("utility.library", 39);
IntuitionBase = OpenLibrary ("intuition.library",39);
return cb;
}
else
{
return NULL;
}
}
/*****************************************************************************/
LONG __asm LibOpen (register __a6 struct ClassBase *cb)
{
LONG retval = (LONG) cb;
BOOL success = TRUE;
ObtainSemaphore (&cb->cb_Lock);
/* Use an internal use counter */
cb->cb_Lib.lib_OpenCnt++;
cb->cb_Lib.lib_Flags &= ~LIBF_DELEXP;
if (cb->cb_Lib.lib_OpenCnt == 1)
{
if (cb->cb_Class == NULL)
{
success = FALSE;
if (DataTypesBase = OpenLibrary ("datatypes.library", 0))
if (cb->cb_SuperClassBase = OpenLibrary ("datatypes/sound.datatype", 39))
if (cb->cb_Class = initClass (cb))
success = TRUE;
}
}
if (!success)
{
CloseLibrary (cb->cb_SuperClassBase);
CloseLibrary (DataTypesBase);
cb->cb_Lib.lib_OpenCnt--;
retval = NULL;
}
ReleaseSemaphore (&cb->cb_Lock);
return (retval);
}
/*****************************************************************************/
LONG __asm LibClose (register __a6 struct ClassBase *cb)
{
LONG retval = NULL;
ObtainSemaphore (&cb->cb_Lock);
if (cb->cb_Lib.lib_OpenCnt)
cb->cb_Lib.lib_OpenCnt--;
if ((cb->cb_Lib.lib_OpenCnt == 0) && cb->cb_Class)
{
if (FreeClass (cb->cb_Class))
{
CloseLibrary (cb->cb_SuperClassBase);
CloseLibrary (DataTypesBase);
cb->cb_Class = NULL;
}
else
{
cb->cb_Lib.lib_Flags |= LIBF_DELEXP;
}
}
if (cb->cb_Lib.lib_Flags & LIBF_DELEXP)
retval = LibExpunge (cb);
ReleaseSemaphore (&cb->cb_Lock);
return (retval);
}
/*****************************************************************************/
LONG __asm LibExpunge (register __a6 struct ClassBase *cb)
{
BPTR seg = cb->cb_SegList;
if (cb->cb_Lib.lib_OpenCnt)
{
cb->cb_Lib.lib_Flags |= LIBF_DELEXP;
return (NULL);
}
Remove ((struct Node *) cb);
CloseLibrary (IntuitionBase);
CloseLibrary (UtilityBase);
CloseLibrary (DOSBase);
FreeMem ((APTR)((ULONG)(cb) - (ULONG)(cb->cb_Lib.lib_NegSize)), cb->cb_Lib.lib_NegSize + cb->cb_Lib.lib_PosSize);
return ((LONG) seg);
}
/*****************************************************************************/
void __asm LibReserved(register __a6 struct ClassBase *cb)
{
}