github/amiga-clib2
1
0
Fork 0
mirror of https://github.com/adtools/clib2.git synced 2026-05-09 06:35:02 +00:00
Code Releases Wiki Activity

- Reimplemented the constructor/destructor invocation code for GCC.

Browse Source 
Both the 68k and PowerPC platform now invoke them in the same order
  and the 68k code uses the designated invocation priorities. The
  PowerPC destructor function now sets up the exit() jmp_buf before
  the destructor functions are called.


git-svn-id: file:///Users/olsen/Code/migration-svn-zu-git/logical-line-staging/clib2/trunk@14874 87f5fb63-7c3d-0410-a384-fd976d0f7a62
This commit is contained in:
Olaf Barthel
2005-03-10 09:55:03 +00:00
parent 91f12dd8f0
commit db8710d2ae
8 changed files with 140 additions and 231 deletions
Download Patch File Download Diff File Expand all files Collapse all files

113
library/stdlib_constructor_begin.c
View File

@@ -1,5 +1,5 @@
/*
* $Id: stdlib_constructor_begin.c,v 1.4 2005-02-25 10:14:21 obarthel Exp $
* $Id: stdlib_constructor_begin.c,v 1.5 2005-03-10 09:55:03 obarthel Exp $
*
* :ts=4
*
@@ -62,8 +62,8 @@ __construct(void)
/****************************************************************************/
STATIC VOID
_do_ctors(void)
void
_init(void)
{
void * volatile p = &__ctors;
@@ -82,8 +82,8 @@ _do_ctors(void)
/****************************************************************************/
STATIC VOID
_do_dtors(void)
void
_fini(void)
{
void * volatile p = &__dtors;
@@ -113,7 +113,11 @@ _do_dtors(void)
/****************************************************************************/
#else
#endif /* __SASC */
/****************************************************************************/
#if defined(__GNUC__) && !defined(__amigaos4__)
/****************************************************************************/
@@ -121,23 +125,23 @@ typedef void (*func_ptr)(void);
/****************************************************************************/
STATIC VOID
_do_ctors(void)
void
_init(void)
{
extern func_ptr __CTOR_LIST__[];
ULONG nptrs = (ULONG)__CTOR_LIST__[0];
ULONG num_ctors = (ULONG)__CTOR_LIST__[0];
ULONG i;
ENTER();
D(("there are %ld constructors to be called",nptrs));
D(("there are %ld constructors to be called",num_ctors));
/* Call all constructors in forward order */
for(i = 0 ; i < nptrs ; i++)
/* Call all constructors in reverse order */
for(i = 0 ; i < num_ctors ; i++)
{
D(("calling constructor #%ld, 0x%08lx",i,__CTOR_LIST__[1+i]));
__CTOR_LIST__[1+i]();
__CTOR_LIST__[num_ctors - i]();
}
SHOWMSG("all done.");
@@ -147,60 +151,37 @@ _do_ctors(void)
/****************************************************************************/
STATIC VOID
_do_dtors(void)
{
extern func_ptr __DTOR_LIST__[];
extern jmp_buf __exit_jmp_buf;
ULONG nptrs = (ULONG)__DTOR_LIST__[0];
static ULONG i;
ENTER();
D(("there are %ld destructors to be called",nptrs));
/* If one of the destructors drops into
* exit(), processing will continue with
* the next following destructor.
*/
(void)setjmp(__exit_jmp_buf);
/* Call all destructors in reverse order */
while(i++ < nptrs)
{
D(("calling destructor #%ld, 0x%08lx",i,__DTOR_LIST__[1+nptrs - i]));
__DTOR_LIST__[1+nptrs - i]();
}
SHOWMSG("all done.");
LEAVE();
}
/****************************************************************************/
#endif /*__amigaos4__ */
/****************************************************************************/
/* FIXME: Do we need to put these in .init/.fini sections? */
//void _init(void) __attribute__((section(".init")));
//void _fini(void) __attribute__((section(".fini")));
/****************************************************************************/
void
_init(void)
{
_do_ctors();
}
/****************************************************************************/
void
_fini(void)
{
_do_dtors();
extern func_ptr __DTOR_LIST__[];
extern jmp_buf __exit_jmp_buf;
ULONG num_dtors = (ULONG)__DTOR_LIST__[0];
static ULONG i;
ENTER();
D(("there are %ld destructors to be called",num_dtors));
/* If one of the destructors drops into
* exit(), processing will continue with
* the next following destructor.
*/
(void)setjmp(__exit_jmp_buf);
/* Call all destructors in forward order */
while(i++ < num_dtors)
{
D(("calling destructor #%ld, 0x%08lx",i,__DTOR_LIST__[i]));
__DTOR_LIST__[i]();
}
SHOWMSG("all done.");
LEAVE();
}
/****************************************************************************/
#endif /* __GNUC__ && !__amigaos4__ */