Mercurial > ecos
annotate packages/kernel/current/src/instrmnt/meminst.cxx @ 66:bf00f99aec69 ecos-sw-2000-02-02
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
| author | jlarmour |
|---|---|
| date | Wed, 02 Feb 2000 19:57:02 +0000 |
| parents | c38311975d4f |
| children | 4c750ce71ae3 |
| rev | line source |
|---|---|
| 0 | 1 //========================================================================== |
| 2 // | |
| 2 | 3 // instrmnt/meminst.cxx |
| 0 | 4 // |
| 2 | 5 // Memory buffer instrumentation functions |
| 0 | 6 // |
| 7 //========================================================================== | |
| 8 //####COPYRIGHTBEGIN#### | |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
9 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
10 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
11 // The contents of this file are subject to the Red Hat eCos Public License |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
12 // Version 1.1 (the "License"); you may not use this file except in |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
13 // compliance with the License. You may obtain a copy of the License at |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
14 // http://www.redhat.com/ |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
15 // |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
16 // Software distributed under the License is distributed on an "AS IS" |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
17 // basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
18 // License for the specific language governing rights and limitations under |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
19 // the License. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
20 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
21 // The Original Code is eCos - Embedded Configurable Operating System, |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
22 // released September 30, 1998. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
23 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
24 // The Initial Developer of the Original Code is Red Hat. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
25 // Portions created by Red Hat are |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
26 // Copyright (C) 1998, 1999, 2000 Red Hat, Inc. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
27 // All Rights Reserved. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
28 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
29 // |
| 0 | 30 //####COPYRIGHTEND#### |
| 31 //========================================================================== | |
| 32 //#####DESCRIPTIONBEGIN#### | |
| 33 // | |
| 2 | 34 // Author(s): nickg |
| 35 // Contributors: nickg | |
| 36 // Date: 1997-10-27 | |
| 37 // Purpose: Instrumentation functions | |
| 38 // Description: The functions in this file are implementations of the | |
| 0 | 39 // standard instrumentation functions that place records |
| 40 // into a memory buffer. | |
| 41 // | |
| 42 //####DESCRIPTIONEND#### | |
| 43 // | |
| 44 //========================================================================== | |
| 45 | |
| 46 #include <pkgconf/kernel.h> | |
| 47 | |
| 48 #include <cyg/kernel/ktypes.h> // base kernel types | |
| 49 #include <cyg/infra/cyg_trac.h> // tracing macros | |
| 50 #include <cyg/infra/cyg_ass.h> // assertion macros | |
| 51 #include <cyg/kernel/instrmnt.h> // instrumentation | |
| 52 | |
| 53 #include <cyg/kernel/intr.hxx> // interrupt control | |
| 54 #include <cyg/kernel/sched.hxx> // scheduler defines | |
| 55 | |
| 56 #include <cyg/kernel/sched.inl> // scheduler inlines | |
| 57 #include <cyg/kernel/clock.inl> // clock inlines | |
| 58 | |
| 59 #ifdef CYGPKG_KERNEL_INSTRUMENT | |
| 60 | |
| 61 // ------------------------------------------------------------------------- | |
| 62 // Instrumentation record. | |
| 63 | |
| 64 struct Instrument_Record | |
| 65 { | |
| 66 CYG_WORD16 type; // record type | |
| 67 CYG_WORD16 thread; // current thread id | |
| 68 CYG_WORD timestamp; // 32 bit timestamp | |
| 69 CYG_WORD arg1; // first arg | |
| 70 CYG_WORD arg2; // second arg | |
| 71 }; | |
| 72 | |
| 73 // ------------------------------------------------------------------------- | |
| 74 // Buffer base and end. This buffer must be a whole number of | |
| 75 | |
| 76 #ifdef CYGVAR_KERNEL_INSTRUMENT_EXTERNAL_BUFFER | |
| 77 | |
| 78 externC Instrument_Record instrument_buffer[]; | |
| 79 externC cyg_uint32 instrument_buffer_size; | |
| 80 | |
| 81 #else | |
| 82 | |
| 83 extern "C" | |
| 84 { | |
| 85 | |
| 86 Instrument_Record instrument_buffer[CYGNUM_KERNEL_INSTRUMENT_BUFFER_SIZE]; | |
| 87 | |
| 88 cyg_uint32 instrument_buffer_size = CYGNUM_KERNEL_INSTRUMENT_BUFFER_SIZE; | |
| 89 | |
| 90 }; | |
| 91 | |
| 92 #endif | |
| 93 | |
| 94 extern "C" | |
| 95 { | |
| 96 | |
| 97 #define instrument_buffer_start instrument_buffer[0] | |
| 98 #define instrument_buffer_end instrument_buffer[instrument_buffer_size] | |
| 99 | |
| 100 extern "C" | |
| 101 { | |
| 102 Instrument_Record *instrument_buffer_pointer = &instrument_buffer_start; | |
| 103 }; | |
| 104 | |
| 105 #ifdef CYGDBG_KERNEL_INSTRUMENT_FLAGS | |
| 106 | |
| 107 // This array contains a 32 bit word for each event class. The | |
| 108 // bits in the word correspond to events. By setting or clearing | |
| 109 // the appropriate bit, the selected instrumentation event may | |
| 110 // be enabled or disabled dynamically. | |
| 111 | |
| 112 cyg_uint32 instrument_flags[(CYG_INSTRUMENT_CLASS_MAX>>8)+1]; | |
| 113 | |
| 114 #endif | |
| 115 | |
| 116 }; | |
| 117 | |
| 118 // ------------------------------------------------------------------------- | |
| 119 | |
| 120 void cyg_instrument( cyg_uint32 type, CYG_ADDRWORD arg1, CYG_ADDRWORD arg2 ) | |
| 121 { | |
| 122 | |
| 123 cyg_uint32 old_ints; | |
| 124 | |
| 125 #ifdef CYGDBG_KERNEL_INSTRUMENT_FLAGS | |
| 126 | |
| 127 cyg_ucount8 cl = (type>>8)&0xff; | |
| 128 cyg_ucount8 event = type&0xff; | |
| 129 | |
| 130 if( instrument_flags[cl] & (1<<event) ) | |
| 131 #endif | |
| 132 { | |
| 133 HAL_DISABLE_INTERRUPTS(old_ints); | |
| 134 | |
| 135 Instrument_Record *p = instrument_buffer_pointer; | |
| 136 Cyg_Thread *t = Cyg_Scheduler::get_current_thread(); | |
| 137 p->type = type; | |
| 138 p->thread = (t==0)?0xFFFF:t->get_unique_id(); | |
| 139 #ifdef CYGVAR_KERNEL_COUNTERS_CLOCK | |
| 140 // p->timestamp = Cyg_Clock::real_time_clock->current_value_lo(); | |
| 141 HAL_CLOCK_READ( &p->timestamp ); | |
| 142 #else | |
| 143 p->timestamp = 0; | |
| 144 #endif | |
| 145 p->arg1 = arg1; | |
| 146 p->arg2 = arg2; | |
| 147 | |
| 148 p++; | |
|
6
d376b777e2ce
Merge from eCos master repository on 1999-05-14-19:27:43-BST
jlarmour
parents:
2
diff
changeset
|
149 #ifdef CYGDBG_KERNEL_INSTRUMENT_BUFFER_WRAP |
| 0 | 150 if( p == &instrument_buffer_end ) |
| 151 instrument_buffer_pointer = &instrument_buffer_start; | |
| 152 else instrument_buffer_pointer = p; | |
|
6
d376b777e2ce
Merge from eCos master repository on 1999-05-14-19:27:43-BST
jlarmour
parents:
2
diff
changeset
|
153 #else |
|
d376b777e2ce
Merge from eCos master repository on 1999-05-14-19:27:43-BST
jlarmour
parents:
2
diff
changeset
|
154 // when not wrapping, just continue to put further entries |
|
d376b777e2ce
Merge from eCos master repository on 1999-05-14-19:27:43-BST
jlarmour
parents:
2
diff
changeset
|
155 // in the last slot. |
|
d376b777e2ce
Merge from eCos master repository on 1999-05-14-19:27:43-BST
jlarmour
parents:
2
diff
changeset
|
156 if( p != &instrument_buffer_end ) |
|
d376b777e2ce
Merge from eCos master repository on 1999-05-14-19:27:43-BST
jlarmour
parents:
2
diff
changeset
|
157 instrument_buffer_pointer = p; |
|
d376b777e2ce
Merge from eCos master repository on 1999-05-14-19:27:43-BST
jlarmour
parents:
2
diff
changeset
|
158 #endif |
| 0 | 159 HAL_RESTORE_INTERRUPTS(old_ints); |
| 160 } | |
| 161 | |
| 162 return; | |
| 163 } | |
| 164 | |
| 165 // ------------------------------------------------------------------------- | |
| 166 // Functions to enable and disable selected instrumentation events | |
| 167 // when the flags are enabled. | |
| 168 | |
| 169 #ifdef CYGDBG_KERNEL_INSTRUMENT_FLAGS | |
| 170 | |
| 171 externC void cyg_instrument_enable( cyg_uint32 cl, cyg_uint32 event) | |
| 172 { | |
| 173 if( 0 != event ) | |
| 174 instrument_flags[cl>>8] |= 1<<event; | |
| 175 else | |
| 176 instrument_flags[cl>>8] = ~0; | |
| 177 } | |
| 178 | |
| 179 externC void cyg_instrument_disable( cyg_uint32 cl, cyg_uint32 event) | |
| 180 { | |
| 181 if( 0 != event ) | |
| 182 instrument_flags[cl>>8] &= ~(1<<event); | |
| 183 else | |
| 184 instrument_flags[cl>>8] = 0; | |
| 185 | |
| 186 } | |
| 187 | |
| 188 #endif | |
| 189 | |
| 190 // ------------------------------------------------------------------------- | |
| 191 | |
| 192 #endif // CYGPKG_KERNEL_INSTRUMENT | |
| 193 | |
| 194 // EOF instrmnt/null.cxx |
