ecos: packages/infra/current/src/simple.cxx annotate

annotate packages/infra/current/src/simple.cxx @ 3292:7f8e529b4d82 default tip

Fix FREESCALE_EDMA_NBYTES_MLOFFYES_MLOFF() so it works with negative offsets.

author	vae
date	Wed, 29 Apr 2015 23:31:48 +0000
parents	74dbf4c3f2e1
children

rev	line source
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	1 //==========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	2 //
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	3 // simple.cxx
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	4 //
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	5 // Simple, non formatting trace and assert functions
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	6 //
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	7 //==========================================================================
2729 74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	8 // ####ECOSGPLCOPYRIGHTBEGIN####
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	9 // -------------------------------------------
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	10 // This file is part of eCos, the Embedded Configurable Operating System.
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 182 diff changeset	12 //
2729 74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	13 // eCos is free software; you can redistribute it and/or modify it under
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	14 // the terms of the GNU General Public License as published by the Free
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	15 // Software Foundation; either version 2 or (at your option) any later
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	16 // version.
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 182 diff changeset	17 //
2729 74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	18 // eCos is distributed in the hope that it will be useful, but WITHOUT
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	19 // ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	20 // FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	21 // for more details.
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 182 diff changeset	22 //
2729 74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	23 // You should have received a copy of the GNU General Public License
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	24 // along with eCos; if not, write to the Free Software Foundation, Inc.,
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	25 // 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 182 diff changeset	26 //
2729 74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	27 // As a special exception, if other files instantiate templates or use
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	28 // macros or inline functions from this file, or you compile this file
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	29 // and link it with other works to produce a work based on this file,
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	30 // this file does not by itself cause the resulting work to be covered by
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	31 // the GNU General Public License. However the source code for this file
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	32 // must still be made available in accordance with section (3) of the GNU
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	33 // General Public License v2.
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 182 diff changeset	34 //
2729 74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	35 // This exception does not invalidate any other reasons why a work based
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	36 // on this file might be covered by the GNU General Public License.
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	37 // -------------------------------------------
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text. jlarmour parents: 2080 diff changeset	38 // ####ECOSGPLCOPYRIGHTEND####
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	39 //==========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	40 //#####DESCRIPTIONBEGIN####
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	41 //
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	42 // Author(s): nickg
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	43 // Contributors: nickg
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	44 // Date: 1997-12-04
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	45 // Purpose: Simple Trace and assert functions
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	46 // Description: The functions in this file are simple implementations
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	47 // of the standard trace and assert functions. These do not
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	48 // do any printf style formatting, simply printing the string
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	49 // and arguments directly.
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	50 //
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	51 //####DESCRIPTIONEND####
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	52 //
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	53 //==========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	54
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	55 #include <pkgconf/system.h>
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	56 #include <pkgconf/infra.h>
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	57
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	58 #ifdef CYGDBG_INFRA_DEBUG_TRACE_ASSERT_SIMPLE
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	59
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	60 #include <cyg/infra/cyg_type.h> // base types
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	61 #include <cyg/infra/cyg_trac.h> // tracing macros
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	62 #include <cyg/infra/cyg_ass.h> // assertion macros
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	63
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	64 #include <pkgconf/hal.h> // HAL configury
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	65 #include <cyg/infra/diag.h> // HAL polled output
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	66 #include <cyg/hal/hal_arch.h> // architectural stuff for...
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	67 #include <cyg/hal/hal_intr.h> // interrupt control
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	68
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	69 #ifdef CYGPKG_KERNEL
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	70 #include <pkgconf/kernel.h> // kernel configury
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	71 #include <cyg/kernel/thread.hxx> // thread id to print
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	72 #include <cyg/kernel/sched.hxx> // ancillaries for above
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	73 #include <cyg/kernel/thread.inl> // ancillaries for above
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	74 #endif
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	75
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	76 // -------------------------------------------------------------------------
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	77 // Local Configuration: hack me!
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	78
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	79 #define CYG_NO_FILENAME 1
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	80 #define CYG_NO_THREADID 0
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	81 #define CYG_NO_LINENUM 0
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	82 #define CYG_NO_FUNCNAME 0
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	83 #define CYG_DIAG_PRINTF 1
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	84
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	85 #ifndef CYGPKG_KERNEL
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	86 # undef CYG_NO_THREADID
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	87 # define CYG_NO_THREADID 1
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	88 #endif
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	89 // -------------------------------------------------------------------------
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	90 // Functions to trim file names and function names down to printable lengths
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	91 // (these are shared between trace and assert functions)
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	92
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	93 static const char trim_file(const char file)
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	94 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	95 #if !CYG_NO_FILENAME
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	96 if ( NULL == file )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	97 file = "<nofile>";
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	98
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	99 const char *f = file;
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	100
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	101 while( *f ) f++;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	102
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	103 while( *f != '/' && f != file ) f--;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	104
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	105 return f==file?f:(f+1);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	106 #else
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	107 return "";
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	108 #endif
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	109 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	110
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	111 static const char trim_func(const char func)
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	112 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	113 #if !CYG_NO_FUNCNAME
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	114
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	115 static char fbuf[100];
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	116 int i;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	117
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	118 if ( NULL == func )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	119 func = "<nofunc>";
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	120
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	121 for( i = 0; func[i] && func[i] != '(' ; i++ )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	122 fbuf[i] = func[i];
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	123
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	124 fbuf[i++] = '(';
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	125 fbuf[i++] = ')';
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	126 fbuf[i ] = 0;
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	127
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	128 return &fbuf[0];
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	129 #else
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	130 return "";
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	131 #endif
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	132 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	133
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	134 void write_lnum( cyg_uint32 lnum)
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	135 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	136 #if !CYG_NO_LINENUM
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	137 diag_write_char('[');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	138 diag_write_dec(lnum);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	139 diag_write_char(']');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	140 #endif
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	141 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	142
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	143 void write_thread_id()
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	144 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	145 #if !CYG_NO_THREADID
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	146 Cyg_Thread *t = Cyg_Thread::self();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	147 cyg_uint16 tid = 0xFFFF;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	148
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	149 if( t != NULL ) tid = t->get_unique_id();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	150
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	151 diag_write_char('<');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	152 diag_write_hex(tid);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	153 diag_write_char('>');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	154 #endif
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	155 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	156
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	157
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	158 // -------------------------------------------------------------------------
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	159 // Trace functions:
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	160
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	161 #ifdef CYGDBG_USE_TRACING
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	162
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	163 externC void
78 59d97b6ba612 Merge from eCos master repository on 2000-03-28-19:50:47-BST jlarmour parents: 74 diff changeset	164 cyg_tracenomsg( const char psz_func, const char psz_file, cyg_uint32 linenum )
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	165 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	166 cyg_uint32 old_ints;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	167
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	168 HAL_DISABLE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	169 DIAG_DEVICE_START_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	170
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	171 diag_write_string("TRACE: ");
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	172 write_thread_id();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	173 diag_write_string(trim_file(psz_file));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	174 write_lnum(linenum);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	175 diag_write_string(trim_func(psz_func));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	176 diag_write_char('\n');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	177
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	178 DIAG_DEVICE_END_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	179 HAL_RESTORE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	180
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	181 };
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	182
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	183 // provide every other one of these as a space/caller bloat compromise.
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	184
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	185 externC void
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	186 cyg_tracemsg( cyg_uint32 what,
78 59d97b6ba612 Merge from eCos master repository on 2000-03-28-19:50:47-BST jlarmour parents: 74 diff changeset	187 const char psz_func, const char psz_file, cyg_uint32 linenum,
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 182 diff changeset	188 const char *psz_msg )
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	189 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	190 cyg_uint32 old_ints;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	191
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	192 HAL_DISABLE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	193 DIAG_DEVICE_START_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	194
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	195 if ( NULL == psz_msg )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	196 psz_msg = "<nomsg>";
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	197
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	198 diag_write_string("TRACE: ");
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	199 write_thread_id();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	200 diag_write_string(trim_file(psz_file));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	201 write_lnum(linenum);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	202 diag_write_string(trim_func(psz_func));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	203 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	204 diag_write_string(psz_msg);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	205 diag_write_char('\n');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	206
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	207 DIAG_DEVICE_END_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	208 HAL_RESTORE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	209
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	210 };
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	211
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	212 externC void
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	213 cyg_tracemsg2( cyg_uint32 what,
78 59d97b6ba612 Merge from eCos master repository on 2000-03-28-19:50:47-BST jlarmour parents: 74 diff changeset	214 const char psz_func, const char psz_file, cyg_uint32 linenum,
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 182 diff changeset	215 const char *psz_msg,
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	216 CYG_ADDRWORD arg0, CYG_ADDRWORD arg1 )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	217 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	218 cyg_uint32 old_ints;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	219
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	220 HAL_DISABLE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	221 DIAG_DEVICE_START_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	222
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	223 if ( NULL == psz_msg )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	224 psz_msg = "<nomsg>";
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	225
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	226 diag_write_string("TRACE: ");
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	227 write_thread_id();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	228 diag_write_string(trim_file(psz_file));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	229 write_lnum(linenum);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	230 diag_write_string(trim_func(psz_func));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	231 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	232 #if CYG_DIAG_PRINTF
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	233 diag_printf( psz_msg, arg0, arg1 );
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	234 #else
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	235 diag_write_string(psz_msg);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	236 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	237 diag_write_hex(arg0);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	238 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	239 diag_write_hex(arg1);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	240 #endif
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	241 diag_write_char('\n');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	242 DIAG_DEVICE_END_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	243 HAL_RESTORE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	244 };
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	245
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	246 externC void
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	247 cyg_tracemsg4( cyg_uint32 what,
78 59d97b6ba612 Merge from eCos master repository on 2000-03-28-19:50:47-BST jlarmour parents: 74 diff changeset	248 const char psz_func, const char psz_file, cyg_uint32 linenum,
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 182 diff changeset	249 const char *psz_msg,
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	250 CYG_ADDRWORD arg0, CYG_ADDRWORD arg1,
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	251 CYG_ADDRWORD arg2, CYG_ADDRWORD arg3 )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	252 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	253 cyg_uint32 old_ints;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	254
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	255 HAL_DISABLE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	256 DIAG_DEVICE_START_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	257
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	258 if ( NULL == psz_msg )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	259 psz_msg = "<nomsg>";
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	260
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	261 diag_write_string("TRACE: ");
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	262 write_thread_id();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	263 diag_write_string(trim_file(psz_file));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	264 write_lnum(linenum);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	265 diag_write_string(trim_func(psz_func));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	266 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	267 #if CYG_DIAG_PRINTF
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	268 diag_printf( psz_msg, arg0, arg1, arg2, arg3 );
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	269 #else
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	270 diag_write_string(psz_msg);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	271 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	272 diag_write_hex(arg0);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	273 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	274 diag_write_hex(arg1);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	275 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	276 diag_write_hex(arg2);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	277 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	278 diag_write_hex(arg3);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	279 #endif
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	280 diag_write_char('\n');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	281
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	282 DIAG_DEVICE_END_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	283 HAL_RESTORE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	284 };
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	285
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	286 externC void
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	287 cyg_tracemsg6( cyg_uint32 what,
78 59d97b6ba612 Merge from eCos master repository on 2000-03-28-19:50:47-BST jlarmour parents: 74 diff changeset	288 const char psz_func, const char psz_file, cyg_uint32 linenum,
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 182 diff changeset	289 const char *psz_msg,
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	290 CYG_ADDRWORD arg0, CYG_ADDRWORD arg1,
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	291 CYG_ADDRWORD arg2, CYG_ADDRWORD arg3,
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	292 CYG_ADDRWORD arg4, CYG_ADDRWORD arg5 )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	293 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	294 cyg_uint32 old_ints;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	295
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	296 HAL_DISABLE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	297 DIAG_DEVICE_START_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	298
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	299 if ( NULL == psz_msg )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	300 psz_msg = "<nomsg>";
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	301
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	302 diag_write_string("TRACE: ");
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	303 write_thread_id();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	304 diag_write_string(trim_file(psz_file));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	305 write_lnum(linenum);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	306 diag_write_string(trim_func(psz_func));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	307 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	308 #if CYG_DIAG_PRINTF
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	309 diag_printf( psz_msg, arg0, arg1, arg2, arg3, arg4, arg5 );
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	310 #else
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	311 diag_write_string(psz_msg);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	312 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	313 diag_write_hex(arg0);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	314 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	315 diag_write_hex(arg1);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	316 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	317 diag_write_hex(arg2);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	318 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	319 diag_write_hex(arg3);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	320 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	321 diag_write_hex(arg4);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	322 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	323 diag_write_hex(arg5);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	324 #endif
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	325 diag_write_char('\n');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	326
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	327 DIAG_DEVICE_END_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	328 HAL_RESTORE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	329 };
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	330
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	331 externC void
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	332 cyg_tracemsg8( cyg_uint32 what,
78 59d97b6ba612 Merge from eCos master repository on 2000-03-28-19:50:47-BST jlarmour parents: 74 diff changeset	333 const char psz_func, const char psz_file, cyg_uint32 linenum,
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 182 diff changeset	334 const char *psz_msg,
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	335 CYG_ADDRWORD arg0, CYG_ADDRWORD arg1,
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	336 CYG_ADDRWORD arg2, CYG_ADDRWORD arg3,
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	337 CYG_ADDRWORD arg4, CYG_ADDRWORD arg5,
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	338 CYG_ADDRWORD arg6, CYG_ADDRWORD arg7 )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	339 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	340 cyg_uint32 old_ints;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	341
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	342 HAL_DISABLE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	343 DIAG_DEVICE_START_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	344
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	345 if ( NULL == psz_msg )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	346 psz_msg = "<nomsg>";
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	347
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	348 diag_write_string("TRACE: ");
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	349 write_thread_id();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	350 diag_write_string(trim_file(psz_file));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	351 write_lnum(linenum);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	352 diag_write_string(trim_func(psz_func));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	353 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	354 #if CYG_DIAG_PRINTF
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	355 diag_printf( psz_msg, arg0, arg1, arg2, arg3, arg4, arg5, arg6, arg7 );
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	356 #else
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	357 diag_write_string(psz_msg);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	358 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	359 diag_write_hex(arg0);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	360 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	361 diag_write_hex(arg1);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	362 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	363 diag_write_hex(arg2);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	364 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	365 diag_write_hex(arg3);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	366 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	367 diag_write_hex(arg4);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	368 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	369 diag_write_hex(arg5);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	370 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	371 diag_write_hex(arg6);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	372 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	373 diag_write_hex(arg7);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	374 #endif
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	375 diag_write_char('\n');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	376
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	377 DIAG_DEVICE_END_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	378 HAL_RESTORE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	379 };
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	380
70 c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	381 // -------------------------------------------------------------------------
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	382
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	383 externC void
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	384 cyg_trace_dump(void)
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	385 {
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	386 #if defined(CYGPKG_KERNEL) && defined(CYG_DIAG_PRINTF)
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	387
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	388 {
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	389 diag_printf("\nScheduler:\n\n");
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	390
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	391 Cyg_Scheduler *sched = &Cyg_Scheduler::scheduler;
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	392
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	393 diag_printf("Lock: %d\n",sched->get_sched_lock() );
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	394
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	395 # ifdef CYGVAR_KERNEL_THREADS_NAME
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	396
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	397 diag_printf("Current Thread: %s\n",sched->get_current_thread()->get_name());
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	398
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	399 # else
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	400
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	401 diag_printf("Current Thread: %d\n",sched->get_current_thread()->get_unique_id());
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	402
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	403 # endif
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	404
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	405 }
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	406
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	407 # ifdef CYGVAR_KERNEL_THREADS_LIST
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	408
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	409 {
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	410 Cyg_Thread *t = Cyg_Thread::get_list_head();
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	411
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	412 diag_printf("\nThreads:\n\n");
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	413
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	414 while( NULL != t )
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	415 {
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	416 cyg_uint32 state = t->get_state();
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	417 char tstate[7];
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	418 char *tstate1 = "SCUKX";
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	419 static char *(reasons[8]) =
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	420 {
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	421 "NONE", // No recorded reason
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	422 "WAIT", // Wait with no timeout
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	423 "DELAY", // Simple time delay
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	424 "TIMEOUT", // Wait with timeout/timeout expired
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	425 "BREAK", // forced break out of sleep
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	426 "DESTRUCT", // wait object destroyed[note]
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	427 "EXIT", // forced termination
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	428 "DONE" // Wait/delay complete
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	429 };
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	430
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	431 if( 0 != state )
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	432 {
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	433 // Knock out chars that do not correspond to set bits.
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	434 for( int i = 0; i < 6 ; i++ )
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	435 if( 0 == (state & (1<<i)) )
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	436 tstate[i] = ' ';
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	437 else tstate[i] = tstate1[i];
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	438 tstate[6] = 0;
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	439 }
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	440 else tstate[0] = 'R', tstate[1] = 0;
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	441
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	442 # ifdef CYGVAR_KERNEL_THREADS_NAME
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	443
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	444 diag_printf( "%20s pri = %3d state = %6s id = %3d\n",
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	445 t->get_name(),
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	446 t->get_priority(),
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	447 tstate,
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	448 t->get_unique_id()
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	449 );
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	450 # else
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	451
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	452 diag_printf( "Thread %3d pri = %3d state = %6s\n",
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	453 t->get_unique_id(),
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	454 t->get_priority(),
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	455 tstate
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	456 );
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	457
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	458 # endif
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	459 diag_printf( "%20s stack base = %08x ptr = %08x size = %08x\n",
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	460 "",
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	461 t->get_stack_base(),
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	462 #ifdef CYGDBG_KERNEL_DEBUG_GDB_THREAD_SUPPORT
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	463 t->get_saved_context(),
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	464 #else
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	465 0,
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	466 #endif
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	467 t->get_stack_size()
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	468 );
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	469
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	470 diag_printf( "%20s sleep reason %8s wake reason %8s\n",
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	471 "",
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	472 reasons[t->get_sleep_reason()],
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	473 reasons[t->get_wake_reason()]
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	474 );
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	475
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	476 diag_printf( "%20s queue = %08x wait info = %08x\n",
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	477 "",
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	478 t->get_current_queue(),
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	479 t->get_wait_info()
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	480 );
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	481
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	482 diag_printf("\n");
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	483 t = t->get_list_next();
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	484 }
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	485
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	486 }
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	487 # endif // CYGVAR_KERNEL_THREADS_LIST
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	488
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	489 #endif // CYG_DIAG_PRINTF
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	490 }
c5536bad4c24 Merge from eCos master repository on 2000-02-11-15:46:40-GMT jlarmour parents: 66 diff changeset	491
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	492 #endif // CYGDBG_USE_TRACING
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	493
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	494 // -------------------------------------------------------------------------
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	495 // Assert functions:
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	496
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	497 #ifdef CYGDBG_USE_ASSERTS
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	498
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	499 externC void
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	500 cyg_assert_fail( const char psz_func, const char psz_file,
182 f62680ef1804 Merge from eCos master repository on 2001-09-07-06:43:02-BST jlarmour parents: 115 diff changeset	501 cyg_uint32 linenum, const char *psz_msg ) __THROW
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	502 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	503 cyg_uint32 old_ints;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	504
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	505 HAL_DISABLE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	506 DIAG_DEVICE_START_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	507
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	508 diag_write_string("ASSERT FAIL: ");
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	509 write_thread_id();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	510 diag_write_string(trim_file(psz_file));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	511 write_lnum(linenum);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	512 diag_write_string(trim_func(psz_func));
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	513 diag_write_char(' ');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	514 diag_write_string(psz_msg);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	515 diag_write_char('\n');
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	516
74 9c122302a886 Merge from eCos master repository on 2000-02-18-15:21:53-GMT jlarmour parents: 70 diff changeset	517 #ifdef CYGHWR_TEST_PROGRAM_EXIT
9c122302a886 Merge from eCos master repository on 2000-02-18-15:21:53-GMT jlarmour parents: 70 diff changeset	518 CYGHWR_TEST_PROGRAM_EXIT();
9c122302a886 Merge from eCos master repository on 2000-02-18-15:21:53-GMT jlarmour parents: 70 diff changeset	519 #endif
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	520 for(;;);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	521
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	522 // DIAG_DEVICE_END_SYNC();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	523 // HAL_RESTORE_INTERRUPTS(old_ints);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	524 };
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	525
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	526 extern "C"
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	527 {
115 6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 78 diff changeset	528 extern unsigned long _stext;
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 78 diff changeset	529 extern unsigned long _etext;
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	530
115 6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 78 diff changeset	531 unsigned long stext_addr = (unsigned long)&_stext;
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 78 diff changeset	532 unsigned long etext_addr = (unsigned long)&_etext;
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	533 };
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	534
502 b43ec5f18a97 * include/cyg_ass.h (CYG_CHECK_FUNC_PTRC): Define with const pointer jlarmour parents: 210 diff changeset	535 externC cyg_bool cyg_check_data_ptr(const void *ptr)
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	536 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	537 unsigned long p = (unsigned long)ptr;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	538
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	539 if( p == 0 ) return false;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	540
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	541 if( p > stext_addr && p < etext_addr ) return false;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	542
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	543 return true;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	544 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	545
2080 a5ff5a2c3e53 * src/delete.cxx: asl parents: 502 diff changeset	546 externC cyg_bool cyg_check_func_ptr(void (*ptr)(void))
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	547 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	548 unsigned long p = (unsigned long)ptr;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	549
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	550 if( p == 0 ) return false;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	551
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	552 if( p < stext_addr && p > etext_addr ) return false;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	553
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	554 return true;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	555 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	556
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	557 #endif // CYGDBG_USE_ASSERTS
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	558
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	559 #endif // CYGDBG_INFRA_DEBUG_TRACE_ASSERT_SIMPLE
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	560
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	561 // -------------------------------------------------------------------------
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	562 // EOF simple.cxx

Mercurial > ecos

annotate packages/infra/current/src/simple.cxx @ 3292:7f8e529b4d82 default tip