OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [ecos-3.0/] [packages/] [language/] [c/] [libc/] [startup/] [current/] [src/] [atexit.cxx] - Blame information for rev 856

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 786 skrzyp
//========================================================================
2
//
3
//      atexit.cxx
4
//
5
//      Implementation of the atexit() function
6
//
7
//========================================================================
8
// ####ECOSGPLCOPYRIGHTBEGIN####                                            
9
// -------------------------------------------                              
10
// This file is part of eCos, the Embedded Configurable Operating System.   
11
// Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
12
//
13
// eCos is free software; you can redistribute it and/or modify it under    
14
// the terms of the GNU General Public License as published by the Free     
15
// Software Foundation; either version 2 or (at your option) any later      
16
// version.                                                                 
17
//
18
// eCos is distributed in the hope that it will be useful, but WITHOUT      
19
// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or    
20
// FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License    
21
// for more details.                                                        
22
//
23
// You should have received a copy of the GNU General Public License        
24
// along with eCos; if not, write to the Free Software Foundation, Inc.,    
25
// 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.            
26
//
27
// As a special exception, if other files instantiate templates or use      
28
// macros or inline functions from this file, or you compile this file      
29
// and link it with other works to produce a work based on this file,       
30
// this file does not by itself cause the resulting work to be covered by   
31
// the GNU General Public License. However the source code for this file    
32
// must still be made available in accordance with section (3) of the GNU   
33
// General Public License v2.                                               
34
//
35
// This exception does not invalidate any other reasons why a work based    
36
// on this file might be covered by the GNU General Public License.         
37
// -------------------------------------------                              
38
// ####ECOSGPLCOPYRIGHTEND####                                              
39
//========================================================================
40
//#####DESCRIPTIONBEGIN####
41
//
42
// Author(s):    jlarmour
43
// Contributors: 
44
// Date:         2000-04-30
45
// Purpose:     
46
// Description: 
47
// Usage:       
48
//
49
//####DESCRIPTIONEND####
50
//
51
//========================================================================
52
 
53
// CONFIGURATION
54
 
55
#include <pkgconf/libc_startup.h>   // Configuration header
56
 
57
// Include atexit() ?
58
#ifdef CYGFUN_LIBC_ATEXIT
59
 
60
// INCLUDES
61
 
62
#include <cyg/infra/cyg_type.h>    // Common type definitions and support
63
#include <cyg/infra/cyg_trac.h>    // Common tracing support
64
#include <cyg/infra/cyg_ass.h>     // Common assertion support
65
#include <stdlib.h>                // Header for all stdlib functions
66
                                   // (like this one)
67
 
68
// STATICS
69
 
70
// cyg_libc_atexit_handlers contains the functions to call.
71
// cyg_libc_atexit_handlers_count contains the number of valid handlers
72
// or you can consider the next free handler slot in
73
// cyg_libc_atexit_handlers.
74
 
75
static __atexit_fn_t
76
cyg_libc_atexit_handlers[ CYGNUM_LIBC_ATEXIT_HANDLERS ];
77
 
78
static cyg_ucount32 cyg_libc_atexit_handlers_count;
79
 
80
 
81
// FUNCTIONS
82
 
83
externC void
84
cyg_libc_invoke_atexit_handlers( void )
85
{
86
    CYG_REPORT_FUNCNAME( "cyg_libc_invoke_atexit_handlers");
87
    CYG_REPORT_FUNCARGVOID();
88
 
89
    cyg_ucount32 i;
90
 
91
    for (i=cyg_libc_atexit_handlers_count; i>0; --i) {
92
 
93
        CYG_TRACE1( true,
94
                    "Calling function registered with atexit at addr %08x",
95
                    cyg_libc_atexit_handlers[i-1] );
96
        CYG_CHECK_FUNC_PTR( cyg_libc_atexit_handlers[i-1],
97
                            "Function to call in atexit handler list "
98
                            "isn't valid! Even though it was when "
99
                            "entered!" );
100
 
101
        (*cyg_libc_atexit_handlers[i-1])();
102
 
103
    } // for
104
 
105
    CYG_REPORT_RETURN();
106
} // cyg_libc_invoke_atexit_handlers()
107
 
108
 
109
externC int
110
atexit( __atexit_fn_t func_to_register )
111
{
112
    CYG_REPORT_FUNCNAMETYPE( "atexit", "returning %d" );
113
    CYG_REPORT_FUNCARG1XV( func_to_register );
114
 
115
    CYG_CHECK_FUNC_PTR( func_to_register,
116
                       "atexit() not passed a valid function argument!" );
117
 
118
    // have we any slots left?
119
    if (cyg_libc_atexit_handlers_count >=
120
        sizeof(cyg_libc_atexit_handlers)/sizeof(__atexit_fn_t) ) {
121
 
122
        CYG_REPORT_RETVAL( 1 );
123
        return 1; // failure
124
    } // if
125
 
126
    cyg_libc_atexit_handlers[cyg_libc_atexit_handlers_count++] =
127
        func_to_register;
128
 
129
    CYG_REPORT_RETVAL(0);
130
    return 0;
131
} // atexit()
132
 
133
 
134
#endif // ifdef CYGFUN_LIBC_ATEXIT
135
 
136
// EOF atexit.cxx

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.