Mercurial > ecos-v2_0-branch
annotate packages/kernel/current/src/common/kapi.cxx @ 84:489eb5632bc3 ecos-sw-2000-04-28
Merge from eCos master repository on 2000-04-28-18:44:39-BST
| author | jlarmour |
|---|---|
| date | Fri, 28 Apr 2000 18:18:36 +0000 |
| parents | bf00f99aec69 |
| children | 5a0cc6c243a9 |
| rev | line source |
|---|---|
| 0 | 1 //========================================================================== |
| 2 // | |
| 2 | 3 // common/kapi.cxx |
| 0 | 4 // |
| 2 | 5 // C API Implementation |
| 0 | 6 // |
| 7 //========================================================================== | |
| 8 //####COPYRIGHTBEGIN#### | |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
56
diff
changeset
|
9 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
56
diff
changeset
|
10 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
56
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:
56
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:
56
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:
56
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:
56
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:
56
diff
changeset
|
19 // the License. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
56
diff
changeset
|
20 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
56
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:
56
diff
changeset
|
22 // released September 30, 1998. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
56
diff
changeset
|
23 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
56
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:
56
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:
56
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:
56
diff
changeset
|
27 // All Rights Reserved. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
56
diff
changeset
|
28 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
56
diff
changeset
|
29 // |
| 0 | 30 //####COPYRIGHTEND#### |
| 31 //========================================================================== | |
| 32 //#####DESCRIPTIONBEGIN#### | |
| 33 // | |
| 2 | 34 // Author(s): nickg, dsm |
| 35 // Contributors: nickg | |
| 36 // Date: 1998-03-02 | |
| 37 // Purpose: C API Implementation | |
| 38 // Description: C++ implementation of the C API | |
| 0 | 39 // |
| 40 // | |
| 41 //####DESCRIPTIONEND#### | |
| 42 // | |
| 43 //========================================================================== | |
| 44 | |
| 45 #include <pkgconf/kernel.h> | |
| 46 | |
| 47 #ifdef CYGFUN_KERNEL_API_C | |
| 48 | |
| 49 #include <cyg/kernel/ktypes.h> // base kernel types | |
| 50 #include <cyg/infra/cyg_trac.h> // tracing macros | |
| 51 #include <cyg/infra/cyg_ass.h> // assertion macros | |
| 52 #include <cyg/kernel/instrmnt.h> // instrumentation | |
| 53 #include <cyg/kernel/diag.h> | |
| 54 | |
| 55 #include <cyg/kernel/thread.hxx> | |
| 56 #include <cyg/kernel/thread.inl> // thread inlines | |
| 57 #include <cyg/kernel/sched.hxx> | |
| 58 #include <cyg/kernel/intr.hxx> | |
| 59 #include <cyg/kernel/clock.hxx> | |
| 60 | |
| 61 #include <cyg/kernel/memfixed.hxx> | |
| 62 #include <cyg/kernel/memvar.hxx> | |
| 63 | |
| 64 #include <cyg/kernel/sema.hxx> | |
| 65 #include <cyg/kernel/flag.hxx> | |
| 66 #include <cyg/kernel/mutex.hxx> | |
| 67 #include <cyg/kernel/mbox.hxx> | |
| 68 | |
| 69 #include <cyg/kernel/sched.inl> // scheduler inlines | |
| 70 #include <cyg/kernel/clock.inl> // clock inlines | |
| 71 | |
| 72 #include <cyg/kernel/kapi.h> // C API | |
| 73 | |
| 74 // ------------------------------------------------------------------------- | |
| 75 // Magic new function | |
| 76 | |
| 77 inline void *operator new(size_t size, void *ptr) | |
| 78 { | |
| 79 CYG_CHECK_DATA_PTR( ptr, "Bad pointer" ); | |
| 80 return ptr; | |
| 81 } | |
| 82 | |
| 83 // ------------------------------------------------------------------------- | |
| 84 | |
| 85 #ifdef CYGDBG_USE_ASSERTS | |
| 86 | |
| 87 #define CYG_ASSERT_SIZES(cstruct, cxxstruct) \ | |
| 88 CYG_MACRO_START \ | |
| 89 char *msg = "Size of C struct " #cstruct \ | |
| 90 " != size of C++ struct " #cxxstruct ; \ | |
| 91 CYG_ASSERT( sizeof(cstruct) == sizeof(cxxstruct) , msg ); \ | |
| 92 CYG_MACRO_END | |
| 93 | |
| 94 #else | |
| 95 | |
| 96 #define CYG_ASSERT_SIZES(cstruct, cxxstruct) | |
| 97 | |
| 98 #endif | |
| 99 | |
| 100 /*---------------------------------------------------------------------------*/ | |
| 101 /* Scheduler operations */ | |
| 102 | |
| 103 /* Starts scheduler with created threads. Never returns. */ | |
| 104 externC void cyg_scheduler_start(void) | |
| 105 { | |
| 106 Cyg_Scheduler::start(); | |
| 107 } | |
| 108 | |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
109 /* Lock the scheduler. */ |
| 0 | 110 externC void cyg_scheduler_lock(void) |
| 111 { | |
| 112 Cyg_Scheduler::lock(); | |
|
56
755351606154
Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents:
38
diff
changeset
|
113 // get_sched_lock() is unsigned, see below "cyg_ucount32 lock" |
|
755351606154
Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents:
38
diff
changeset
|
114 CYG_ASSERT( (0xff000000 & (Cyg_Scheduler::get_sched_lock())) == 0, |
|
755351606154
Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents:
38
diff
changeset
|
115 "Scheduler overlocked" ); |
| 0 | 116 } |
| 117 | |
|
84
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
118 /* Lock the scheduler, but never more than level=1. */ |
|
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
119 externC void cyg_scheduler_safe_lock(void) |
|
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
120 { |
|
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
121 Cyg_Scheduler::lock(); |
|
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
122 cyg_ucount32 slock = Cyg_Scheduler::get_sched_lock(); |
|
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
123 if (slock > 1) |
|
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
124 Cyg_Scheduler::unlock(); |
|
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
125 // get_sched_lock() is unsigned, see below "cyg_ucount32 lock" |
|
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
126 CYG_ASSERT( (0xff000000 & (Cyg_Scheduler::get_sched_lock())) == 0, |
|
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
127 "Scheduler overlocked" ); |
|
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
128 } |
|
489eb5632bc3
Merge from eCos master repository on 2000-04-28-18:44:39-BST
jlarmour
parents:
66
diff
changeset
|
129 |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
130 /* Unlock the scheduler. */ |
| 0 | 131 externC void cyg_scheduler_unlock(void) |
| 132 { | |
|
56
755351606154
Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents:
38
diff
changeset
|
133 cyg_ucount32 slock = Cyg_Scheduler::get_sched_lock(); |
|
755351606154
Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents:
38
diff
changeset
|
134 CYG_ASSERT( 0 < slock, "Scheduler not locked" ); |
|
755351606154
Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents:
38
diff
changeset
|
135 // And program defensively too: |
|
755351606154
Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents:
38
diff
changeset
|
136 if ( 0 < slock ) |
|
755351606154
Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents:
38
diff
changeset
|
137 Cyg_Scheduler::unlock(); |
| 0 | 138 } |
| 139 | |
| 140 /*---------------------------------------------------------------------------*/ | |
| 141 /* Thread operations */ | |
| 142 | |
| 143 externC void cyg_thread_create( | |
| 2 | 144 cyg_addrword_t sched_info, /* scheduling info (eg pri) */ |
| 0 | 145 cyg_thread_entry_t *entry, /* entry point function */ |
| 2 | 146 cyg_addrword_t entry_data, /* entry data */ |
| 0 | 147 char *name, /* optional thread name */ |
| 148 void *stack_base, /* stack base, NULL = alloc */ | |
| 149 cyg_ucount32 stack_size, /* stack size, 0 = default */ | |
| 150 cyg_handle_t *handle, /* returned thread handle */ | |
| 151 cyg_thread *thread /* put thread here */ | |
| 152 ) | |
| 153 { | |
| 154 CYG_ASSERT_SIZES( cyg_thread, Cyg_Thread ); | |
| 155 | |
| 156 Cyg_Thread *t = new((void *)thread) Cyg_Thread ( | |
| 157 (CYG_ADDRWORD) sched_info, | |
| 158 (cyg_thread_entry *)entry, | |
| 159 (CYG_ADDRWORD) entry_data, | |
| 160 name, | |
| 2 | 161 (CYG_ADDRWORD) stack_base, |
| 162 stack_size | |
| 0 | 163 ); |
| 164 t=t; | |
| 165 | |
| 166 CYG_CHECK_DATA_PTR( handle, "Bad handle pointer" ); | |
| 167 *handle = (cyg_handle_t)thread; | |
| 168 } | |
| 169 | |
| 170 externC void cyg_thread_exit() | |
| 171 { | |
| 172 Cyg_Thread::exit(); | |
| 173 } | |
| 174 | |
|
8
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
175 externC cyg_bool_t cyg_thread_delete( cyg_handle_t thread ) |
| 2 | 176 { |
| 177 Cyg_Thread *th = (Cyg_Thread *)thread; | |
| 178 if( th->get_state() != Cyg_Thread::EXITED ) | |
|
8
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
179 th->kill(); // encourage it to terminate |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
180 if( th->get_state() != Cyg_Thread::EXITED ) |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
181 return false; // it didn't run yet, leave it up to the app to fix |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
182 th->~Cyg_Thread(); |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
183 return true; |
| 2 | 184 } |
| 185 | |
| 0 | 186 externC void cyg_thread_suspend(cyg_handle_t thread) |
| 187 { | |
| 188 ((Cyg_Thread *)thread)->suspend(); | |
| 189 } | |
| 190 | |
| 191 externC void cyg_thread_resume(cyg_handle_t thread) | |
| 192 { | |
| 193 Cyg_Thread *th = (Cyg_Thread *)thread; | |
| 194 | |
| 195 // If we are resuming an exited thread then | |
| 196 // reinitialize it. | |
| 197 | |
| 198 if( th->get_state() == Cyg_Thread::EXITED ) | |
| 199 th->reinitialize(); | |
| 200 | |
| 201 th->resume(); | |
| 202 } | |
| 203 | |
| 204 externC void cyg_thread_kill( cyg_handle_t thread) | |
| 205 { | |
|
8
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
206 ((Cyg_Thread *)thread)->kill(); |
| 0 | 207 } |
| 208 | |
| 2 | 209 externC void cyg_thread_release( cyg_handle_t thread) |
| 210 { | |
| 211 ((Cyg_Thread *)thread)->release(); | |
| 212 } | |
| 213 | |
| 0 | 214 externC void cyg_thread_yield() |
| 215 { | |
| 216 Cyg_Thread::yield(); | |
| 217 } | |
| 218 | |
| 219 externC cyg_handle_t cyg_thread_self() | |
| 220 { | |
| 221 return (cyg_handle_t)Cyg_Thread::self(); | |
| 222 } | |
| 223 | |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
224 // idle thread is not really a plain CygThread; danger. |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
225 externC cyg_handle_t cyg_thread_idle_thread() |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
226 { |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
227 extern Cyg_Thread idle_thread; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
228 return (cyg_handle_t)&idle_thread; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
229 } |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
230 |
| 0 | 231 /* Priority manipulation */ |
| 232 externC void cyg_thread_set_priority( | |
| 233 cyg_handle_t thread, cyg_priority_t priority ) | |
| 234 { | |
|
8
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
235 #ifdef CYGIMP_THREAD_PRIORITY |
| 0 | 236 ((Cyg_Thread *)thread)->set_priority(priority); |
|
8
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
237 #endif |
| 0 | 238 } |
| 239 | |
| 240 externC cyg_priority_t cyg_thread_get_priority(cyg_handle_t thread) | |
| 241 { | |
|
8
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
242 #ifdef CYGIMP_THREAD_PRIORITY |
| 0 | 243 return ((Cyg_Thread *)thread)->get_priority(); |
|
8
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
244 #else |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
245 return 0; |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
4
diff
changeset
|
246 #endif |
| 0 | 247 } |
| 248 | |
| 249 /* Deadline scheduling control (optional) */ | |
| 250 | |
| 251 externC void cyg_thread_deadline_wait( | |
| 252 cyg_tick_count_t start_time, /* abs earliest start time */ | |
| 253 cyg_tick_count_t run_time, /* worst case execution time */ | |
| 254 cyg_tick_count_t deadline /* absolute deadline */ | |
| 255 ) | |
| 256 { | |
| 257 CYG_ASSERT(0,"Not implemented"); | |
| 258 } | |
| 259 | |
| 260 externC void cyg_thread_delay(cyg_tick_count_t delay) | |
| 261 { | |
| 262 Cyg_Thread::self()->delay(delay); | |
| 263 } | |
| 264 | |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
265 /* Stack information */ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
266 externC cyg_addrword_t cyg_thread_get_stack_base(cyg_handle_t thread) |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
267 { |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
268 return ((Cyg_Thread *)thread)->get_stack_base(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
269 } |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
270 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
271 externC cyg_uint32 cyg_thread_get_stack_size(cyg_handle_t thread) |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
272 { |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
273 return ((Cyg_Thread *)thread)->get_stack_size(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
274 } |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
275 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
8
diff
changeset
|
276 |
| 2 | 277 /*---------------------------------------------------------------------------*/ |
| 278 /* Per-thread data */ | |
| 279 | |
| 280 #ifdef CYGVAR_KERNEL_THREADS_DATA | |
| 281 | |
| 282 externC cyg_ucount32 cyg_thread_new_data_index() | |
| 283 { | |
| 284 return Cyg_Thread::new_data_index(); | |
| 285 } | |
| 286 | |
| 287 externC void cyg_thread_free_data_index(cyg_ucount32 index) | |
| 288 { | |
| 289 Cyg_Thread::free_data_index(index); | |
| 290 } | |
| 291 | |
| 292 externC CYG_ADDRWORD cyg_thread_get_data(cyg_ucount32 index) | |
| 293 { | |
| 294 return Cyg_Thread::get_data(index); | |
| 295 } | |
| 296 | |
| 297 externC CYG_ADDRWORD *cyg_thread_get_data_ptr(cyg_ucount32 index) | |
| 298 { | |
| 299 return Cyg_Thread::get_data_ptr(index); | |
| 300 } | |
| 301 | |
| 302 externC void cyg_thread_set_data(cyg_ucount32 index, CYG_ADDRWORD | |
| 303 data) | |
| 304 { | |
| 305 Cyg_Thread::self()->set_data(index, data); | |
| 306 } | |
| 307 #endif | |
| 0 | 308 |
| 309 /*---------------------------------------------------------------------------*/ | |
| 310 /* Exception handling. */ | |
| 311 | |
| 312 #ifdef CYGPKG_KERNEL_EXCEPTIONS | |
| 313 externC void cyg_exception_set_handler( | |
| 314 cyg_code_t exception_number, | |
| 315 cyg_exception_handler_t *new_handler, | |
| 2 | 316 cyg_addrword_t new_data, |
| 0 | 317 cyg_exception_handler_t **old_handler, |
| 2 | 318 cyg_addrword_t *old_data |
| 0 | 319 ) |
| 320 { | |
| 321 Cyg_Thread::register_exception( | |
| 322 exception_number, | |
| 323 (cyg_exception_handler *)new_handler, | |
| 324 (CYG_ADDRWORD)new_data, | |
| 325 (cyg_exception_handler **)old_handler, | |
| 326 (CYG_ADDRWORD *)old_data | |
| 327 ); | |
| 328 } | |
| 329 | |
| 330 /* Clear exception handler to default */ | |
| 331 externC void cyg_exception_clear_handler( | |
| 332 cyg_code_t exception_number | |
| 333 ) | |
| 334 { | |
| 335 Cyg_Thread::deregister_exception( exception_number ); | |
| 336 } | |
| 337 | |
| 338 /* Invoke exception handler */ | |
| 339 externC void cyg_exception_call_handler( | |
| 340 cyg_handle_t thread, | |
| 341 cyg_code_t exception_number, | |
| 2 | 342 cyg_addrword_t error_code |
| 0 | 343 ) |
| 344 { | |
| 345 Cyg_Thread *t = (Cyg_Thread *)thread; | |
| 346 | |
| 347 t->deliver_exception( exception_number, error_code ); | |
| 348 } | |
| 349 #endif | |
| 350 | |
| 351 /*---------------------------------------------------------------------------*/ | |
| 352 /* Interrupt handling */ | |
| 353 | |
| 354 externC void cyg_interrupt_create( | |
| 355 cyg_vector_t vector, /* Vector to attach to */ | |
| 356 cyg_priority_t priority, /* Queue priority */ | |
| 2 | 357 cyg_addrword_t data, /* Data pointer */ |
| 0 | 358 cyg_ISR_t *isr, /* Interrupt Service Routine */ |
| 359 cyg_DSR_t *dsr, /* Deferred Service Routine */ | |
| 360 cyg_handle_t *handle, /* returned handle */ | |
| 361 cyg_interrupt *intr /* put interrupt here */ | |
| 362 ) | |
| 363 { | |
| 364 CYG_ASSERT_SIZES( cyg_interrupt, Cyg_Interrupt ); | |
| 365 | |
| 366 Cyg_Interrupt *t = new((void *)intr) Cyg_Interrupt ( | |
| 367 (cyg_vector)vector, | |
| 368 (cyg_priority)priority, | |
| 369 (CYG_ADDRWORD)data, | |
| 370 (cyg_ISR *)isr, | |
| 371 (cyg_DSR *)dsr ); | |
| 372 t=t; | |
| 373 | |
| 374 CYG_CHECK_DATA_PTR( handle, "Bad handle pointer" ); | |
| 375 *handle = (cyg_handle_t)intr; | |
| 376 } | |
| 377 | |
| 378 externC void cyg_interrupt_delete( cyg_handle_t interrupt) | |
| 379 { | |
| 380 ((Cyg_Interrupt *)interrupt)->~Cyg_Interrupt(); | |
| 381 } | |
| 382 | |
| 383 void cyg_interrupt_attach( cyg_handle_t interrupt ) | |
| 384 { | |
| 385 ((Cyg_Interrupt *)interrupt)->attach(); | |
| 386 } | |
| 387 | |
| 388 void cyg_interrupt_detach( cyg_handle_t interrupt ) | |
| 389 { | |
| 390 ((Cyg_Interrupt *)interrupt)->detach(); | |
| 391 } | |
| 392 | |
| 393 /* VSR manipulation */ | |
| 394 | |
| 395 externC void cyg_interrupt_get_vsr( | |
| 396 cyg_vector_t vector, /* vector to get */ | |
| 397 cyg_VSR_t **vsr /* vsr got */ | |
| 398 ) | |
| 399 { | |
| 400 Cyg_Interrupt::get_vsr( (cyg_vector)vector, (cyg_VSR **)vsr); | |
| 401 } | |
| 402 | |
| 403 externC void cyg_interrupt_set_vsr( | |
| 404 cyg_vector_t vector, /* vector to set */ | |
| 405 cyg_VSR_t *vsr /* vsr to set */ | |
| 406 ) | |
| 407 { | |
| 408 Cyg_Interrupt::set_vsr( (cyg_vector)vector, (cyg_VSR *)vsr); | |
| 409 } | |
| 410 | |
| 411 /* CPU level interrupt mask */ | |
| 412 externC void cyg_interrupt_disable() | |
| 413 { | |
| 414 Cyg_Interrupt::disable_interrupts(); | |
| 415 } | |
| 416 | |
| 417 externC void cyg_interrupt_enable() | |
| 418 { | |
| 419 Cyg_Interrupt::enable_interrupts(); | |
| 420 } | |
| 421 | |
| 422 /* Interrupt controller access */ | |
| 423 externC void cyg_interrupt_mask(cyg_vector_t vector) | |
| 424 { | |
| 425 Cyg_Interrupt::mask_interrupt( (cyg_vector)vector); | |
| 426 } | |
| 427 | |
| 428 externC void cyg_interrupt_unmask(cyg_vector_t vector) | |
| 429 { | |
| 430 Cyg_Interrupt::unmask_interrupt( (cyg_vector)vector); | |
| 431 } | |
| 432 | |
| 433 | |
| 434 externC void cyg_interrupt_acknowledge(cyg_vector_t vector) | |
| 435 { | |
| 436 Cyg_Interrupt::acknowledge_interrupt( (cyg_vector)vector); | |
| 437 } | |
| 438 | |
| 439 | |
| 440 externC void cyg_interrupt_configure( | |
| 441 cyg_vector_t vector, /* vector to configure */ | |
| 442 cyg_bool_t level, /* level or edge triggered */ | |
| 443 cyg_bool_t up /* rising/faling edge, high/low level*/ | |
| 444 ) | |
| 445 { | |
| 446 Cyg_Interrupt::configure_interrupt( (cyg_vector)vector, level, up ); | |
| 447 } | |
| 448 | |
| 449 | |
| 450 /*---------------------------------------------------------------------------*/ | |
| 451 /* Counters, Clocks and Alarms */ | |
| 452 | |
| 453 externC void cyg_counter_create( | |
| 454 cyg_handle_t *handle, /* returned counter handle */ | |
| 455 cyg_counter *counter /* put counter here */ | |
| 456 ) | |
| 457 { | |
| 458 CYG_ASSERT_SIZES( cyg_counter, Cyg_Counter ); | |
| 459 | |
| 460 Cyg_Counter *t = new((void *)counter) Cyg_Counter (); | |
| 461 t=t; | |
| 462 | |
| 463 CYG_CHECK_DATA_PTR( handle, "Bad handle pointer" ); | |
| 464 *handle = (cyg_handle_t)counter; | |
| 465 } | |
| 466 | |
| 467 externC void cyg_counter_delete(cyg_handle_t counter) | |
| 468 { | |
| 469 ((Cyg_Counter *)counter)->~Cyg_Counter(); | |
| 470 } | |
| 471 | |
| 472 /* Return current value of counter */ | |
| 473 externC cyg_tick_count_t cyg_counter_current_value(cyg_handle_t counter) | |
| 474 { | |
| 475 return ((Cyg_Counter *)counter)->current_value(); | |
| 476 } | |
| 477 | |
| 478 /* Set new current value */ | |
| 479 externC void cyg_counter_set_value( | |
| 480 cyg_handle_t counter, | |
| 481 cyg_tick_count_t new_value | |
| 482 ) | |
| 483 { | |
| 484 ((Cyg_Counter *)counter)->set_value( new_value ); | |
| 485 } | |
| 486 | |
| 487 /* Advance counter by one tick */ | |
| 488 externC void cyg_counter_tick(cyg_handle_t counter) | |
| 489 { | |
| 490 ((Cyg_Counter *)counter)->tick(); | |
| 491 } | |
| 492 | |
| 493 /* Create a clock object */ | |
| 494 externC void cyg_clock_create( | |
| 495 cyg_resolution_t resolution, /* Initial resolution */ | |
| 496 cyg_handle_t *handle, /* Returned clock handle */ | |
| 497 cyg_clock *clock /* put clock here */ | |
| 498 ) | |
| 499 { | |
| 500 CYG_ASSERT_SIZES( cyg_clock, Cyg_Clock ); | |
| 501 | |
| 502 Cyg_Clock::cyg_resolution res; | |
| 503 | |
| 504 res.dividend = resolution.dividend; | |
| 505 res.divisor = resolution.divisor; | |
| 506 | |
| 507 Cyg_Clock *t = new((void *)clock) Cyg_Clock ( res ); | |
| 508 t=t; | |
| 509 | |
| 510 CYG_CHECK_DATA_PTR( handle, "Bad handle pointer" ); | |
| 511 *handle = (cyg_handle_t)clock; | |
| 512 } | |
| 513 | |
| 514 externC void cyg_clock_delete(cyg_handle_t clock) | |
| 515 { | |
| 516 ((Cyg_Clock *)clock)->~Cyg_Clock(); | |
| 517 } | |
| 518 | |
| 519 /* convert a clock handle to a counter handle so we can use the */ | |
| 520 /* counter API on it. */ | |
| 521 externC void cyg_clock_to_counter( | |
| 522 cyg_handle_t clock, | |
| 523 cyg_handle_t *counter | |
| 524 ) | |
| 525 { | |
| 526 CYG_CHECK_DATA_PTR( counter, "Bad counter handle pointer" ); | |
| 527 *counter = (cyg_handle_t)(Cyg_Counter *)clock; | |
| 528 } | |
| 529 | |
| 530 externC void cyg_clock_set_resolution( | |
| 531 cyg_handle_t clock, | |
| 532 cyg_resolution_t resolution /* New resolution */ | |
| 533 ) | |
| 534 { | |
| 535 Cyg_Clock::cyg_resolution res; | |
| 536 | |
| 537 res.dividend = resolution.dividend; | |
| 538 res.divisor = resolution.divisor; | |
| 539 | |
| 540 ((Cyg_Clock *)clock)->set_resolution( res ); | |
| 541 } | |
| 542 | |
| 543 externC cyg_resolution_t cyg_clock_get_resolution(cyg_handle_t clock) | |
| 544 { | |
| 545 Cyg_Clock::cyg_resolution res = | |
| 546 ((Cyg_Clock *)clock)->get_resolution(); | |
| 547 | |
| 548 cyg_resolution_t resolution; | |
| 549 | |
| 550 resolution.dividend = res.dividend; | |
| 551 resolution.divisor = res.divisor; | |
| 552 | |
| 553 return resolution; | |
| 554 } | |
| 555 | |
| 556 #ifdef CYGVAR_KERNEL_COUNTERS_CLOCK | |
| 557 externC cyg_handle_t cyg_real_time_clock(void) | |
| 558 { | |
| 559 return (cyg_handle_t)Cyg_Clock::real_time_clock; | |
| 560 } | |
| 561 | |
| 562 externC cyg_tick_count_t cyg_current_time(void) | |
| 563 { | |
| 564 return Cyg_Clock::real_time_clock->current_value(); | |
| 565 } | |
| 566 #endif | |
| 567 | |
| 568 externC void cyg_alarm_create( | |
| 569 cyg_handle_t counter, /* Attached to this counter */ | |
| 570 cyg_alarm_t *alarmfn, /* Call-back function */ | |
| 2 | 571 cyg_addrword_t data, /* Call-back data */ |
| 0 | 572 cyg_handle_t *handle, /* Returned alarm object */ |
| 573 cyg_alarm *alarm /* put alarm here */ | |
| 574 ) | |
| 575 { | |
| 576 CYG_ASSERT_SIZES( cyg_alarm, Cyg_Alarm ); | |
| 577 | |
| 578 Cyg_Alarm *t = new((void *)alarm) Cyg_Alarm ( | |
| 579 (Cyg_Counter *)counter, | |
| 2 | 580 (cyg_alarm_fn *)alarmfn, |
| 581 (CYG_ADDRWORD)data | |
| 0 | 582 ); |
| 583 t=t; | |
| 584 | |
| 585 CYG_CHECK_DATA_PTR( handle, "Bad handle pointer" ); | |
| 586 *handle = (cyg_handle_t)alarm; | |
| 587 } | |
| 588 | |
| 589 /* Disable alarm, detach from counter and invalidate handles */ | |
| 590 externC void cyg_alarm_delete( cyg_handle_t alarm) | |
| 591 { | |
| 592 ((Cyg_Alarm *)alarm)->~Cyg_Alarm(); | |
| 593 } | |
| 594 | |
| 595 externC void cyg_alarm_initialize( | |
| 596 cyg_handle_t alarm, | |
| 597 cyg_tick_count_t trigger, /* Absolute trigger time */ | |
| 598 cyg_tick_count_t interval /* Relative retrigger interval */ | |
| 599 ) | |
| 600 { | |
| 601 ((Cyg_Alarm *)alarm)->initialize( | |
| 2 | 602 (cyg_tick_count)trigger, |
| 603 (cyg_tick_count)interval); | |
| 0 | 604 } |
| 605 | |
| 606 externC void cyg_alarm_enable( cyg_handle_t alarm ) | |
| 607 { | |
| 608 ((Cyg_Alarm *)alarm)->enable(); | |
| 609 } | |
| 610 | |
| 611 externC void cyg_alarm_disable( cyg_handle_t alarm ) | |
| 612 { | |
| 613 ((Cyg_Alarm *)alarm)->disable(); | |
| 614 } | |
| 615 | |
| 616 /*---------------------------------------------------------------------------*/ | |
| 617 /* Mail boxes */ | |
| 618 | |
| 619 externC void cyg_mbox_create( | |
| 620 cyg_handle_t *handle, | |
| 621 cyg_mbox *mbox | |
| 622 ) | |
| 623 { | |
| 624 CYG_ASSERT_SIZES( cyg_mbox, Cyg_Mbox ); | |
| 625 | |
| 626 Cyg_Mbox *t = new((void *)mbox) Cyg_Mbox(); | |
| 627 t=t; | |
| 628 | |
| 629 CYG_CHECK_DATA_PTR( handle, "Bad handle pointer" ); | |
| 630 *handle = (cyg_handle_t)mbox; | |
| 631 } | |
| 632 | |
| 633 externC void cyg_mbox_delete(cyg_handle_t mbox) | |
| 634 { | |
| 635 ((Cyg_Mbox *)mbox)->~Cyg_Mbox(); | |
| 636 } | |
| 637 | |
| 638 externC void *cyg_mbox_get(cyg_handle_t mbox) | |
| 639 { | |
| 640 return ((Cyg_Mbox *)mbox)->get(); | |
| 641 } | |
| 642 | |
| 643 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 644 void *cyg_mbox_timed_get( | |
| 645 cyg_handle_t mbox, | |
| 646 cyg_tick_count_t abstime | |
| 647 ) | |
| 648 { | |
| 649 return ((Cyg_Mbox *)mbox)->get(abstime); | |
| 650 } | |
| 651 #endif | |
| 652 | |
| 653 externC void *cyg_mbox_tryget(cyg_handle_t mbox) | |
| 654 { | |
| 655 return ((Cyg_Mbox *)mbox)->tryget(); | |
| 656 } | |
| 657 | |
| 658 externC void *cyg_mbox_peek_item(cyg_handle_t mbox) | |
| 659 { | |
| 660 return ((Cyg_Mbox *)mbox)->peek_item(); | |
| 661 } | |
| 662 | |
| 663 #ifdef CYGMFN_KERNEL_SYNCH_MBOXT_PUT_CAN_WAIT | |
| 664 externC cyg_bool_t cyg_mbox_put(cyg_handle_t mbox, void *item) | |
| 665 { | |
| 666 return ((Cyg_Mbox *)mbox)->put(item); | |
| 667 } | |
| 668 | |
| 669 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 670 externC cyg_bool_t cyg_mbox_timed_put( | |
| 671 cyg_handle_t mbox, | |
| 672 void *item, | |
| 673 cyg_tick_count_t abstime | |
| 674 ) | |
| 675 { | |
| 676 return ((Cyg_Mbox *)mbox)->put(item, abstime); | |
| 677 } | |
| 678 #endif | |
| 679 #endif | |
| 680 | |
| 681 externC cyg_bool_t cyg_mbox_tryput(cyg_handle_t mbox, void *item) | |
| 682 { | |
| 683 return ((Cyg_Mbox *)mbox)->tryput(item); | |
| 684 } | |
| 685 | |
| 686 externC cyg_count32 cyg_mbox_peek(cyg_handle_t mbox) | |
| 687 { | |
| 688 return ((Cyg_Mbox *)mbox)->peek(); | |
| 689 } | |
| 690 | |
| 691 externC cyg_bool_t cyg_mbox_waiting_to_get(cyg_handle_t mbox) | |
| 692 { | |
| 693 return ((Cyg_Mbox *)mbox)->waiting_to_get(); | |
| 694 } | |
| 695 | |
| 696 externC cyg_bool_t cyg_mbox_waiting_to_put(cyg_handle_t mbox) | |
| 697 { | |
| 698 return ((Cyg_Mbox *)mbox)->waiting_to_put(); | |
| 699 } | |
| 700 | |
| 701 | |
| 702 /*-----------------------------------------------------------------------*/ | |
| 703 /* Memory pools */ | |
| 704 | |
| 705 /* Create a variable size memory pool */ | |
| 706 externC void cyg_mempool_var_create( | |
| 707 void *base, /* base of memory to use for pool */ | |
| 708 cyg_int32 size, /* size of memory in bytes */ | |
| 709 cyg_handle_t *handle, /* returned handle of memory pool */ | |
| 710 cyg_mempool_var *var /* space to put pool structure in */ | |
| 711 ) | |
| 712 { | |
| 713 CYG_ASSERT_SIZES( cyg_mempool_var, Cyg_Mempool_Variable ); | |
| 714 | |
| 715 Cyg_Mempool_Variable *t = new((void *)var) Cyg_Mempool_Variable ( | |
| 716 (cyg_uint8 *)base, | |
| 2 | 717 size |
| 0 | 718 ); |
| 719 t=t; | |
| 720 | |
| 721 CYG_CHECK_DATA_PTR( handle, "Bad handle pointer" ); | |
| 722 *handle = (cyg_handle_t)var; | |
| 723 } | |
| 724 | |
| 725 /* Delete variable size memory pool */ | |
| 726 externC void cyg_mempool_var_delete(cyg_handle_t varpool) | |
| 727 { | |
| 728 ((Cyg_Mempool_Variable *)varpool)->~Cyg_Mempool_Variable(); | |
| 729 } | |
| 730 | |
| 731 /* Allocates a block of length size. This waits if the memory is not | |
| 732 currently available. */ | |
| 733 externC void *cyg_mempool_var_alloc(cyg_handle_t varpool, cyg_int32 size) | |
| 734 { | |
| 735 return ((Cyg_Mempool_Variable *)varpool)->alloc(size); | |
| 736 } | |
| 737 | |
| 738 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 739 | |
| 740 /* Allocates a block of length size. This waits for up to delay | |
| 741 ticks, if the memory is not already available. NULL is returned if | |
| 742 no memory is available. */ | |
| 743 externC void *cyg_mempool_var_timed_alloc( | |
| 744 cyg_handle_t varpool, | |
| 745 cyg_int32 size, | |
| 746 cyg_tick_count_t abstime) | |
| 747 { | |
| 748 return ((Cyg_Mempool_Variable *)varpool)->alloc(size, abstime); | |
| 749 } | |
| 750 | |
| 751 #endif | |
| 752 | |
| 753 /* Allocates a block of length size. NULL is returned if no memory is | |
| 754 available. */ | |
| 755 externC void *cyg_mempool_var_try_alloc( | |
| 756 cyg_handle_t varpool, | |
| 757 cyg_int32 size) | |
| 758 { | |
| 759 return ((Cyg_Mempool_Variable *)varpool)->try_alloc(size); | |
| 760 } | |
| 761 | |
| 762 /* Frees memory back into variable size pool. */ | |
| 763 externC void cyg_mempool_var_free(cyg_handle_t varpool, void *p) | |
| 764 { | |
| 765 cyg_bool b; | |
| 766 b = ((Cyg_Mempool_Variable *)varpool)->free((cyg_uint8 *)p, 0); | |
| 767 CYG_ASSERT( b, "Bad free"); | |
| 768 } | |
| 769 | |
| 770 | |
| 771 /* Returns true if there are any threads waiting for memory in the | |
| 772 given memory pool. */ | |
| 773 externC cyg_bool_t cyg_mempool_var_waiting(cyg_handle_t varpool) | |
| 774 { | |
| 775 return ((Cyg_Mempool_Variable *)varpool)->waiting(); | |
| 776 } | |
| 777 | |
| 778 /* Puts information about a variable memory pool into the structure | |
| 779 provided. */ | |
| 780 externC void cyg_mempool_var_get_info( | |
| 781 cyg_handle_t varpool, | |
| 782 cyg_mempool_info *info) | |
| 783 { | |
| 784 Cyg_Mempool_Variable *v = (Cyg_Mempool_Variable *)varpool; | |
| 785 cyg_uint8 *base; | |
| 786 CYG_ADDRWORD maxfree; | |
| 787 | |
| 788 info->totalmem = v->get_totalmem(); | |
| 789 info->freemem = v->get_freemem(); | |
| 790 v->get_arena(base, info->size, maxfree); | |
| 791 info->base = (void *)base; | |
| 792 info->blocksize = -1; | |
| 793 info->maxfree = maxfree; | |
| 794 } | |
| 795 | |
| 796 | |
| 797 /* Create a fixed size memory pool */ | |
| 798 externC void cyg_mempool_fix_create( | |
| 799 void *base, // base of memory to use for pool | |
| 800 cyg_int32 size, // size of memory in byte | |
| 801 cyg_int32 blocksize, // size of allocation in bytes | |
| 802 cyg_handle_t *handle, // handle of memory pool | |
| 803 cyg_mempool_fix *fix // space to put pool structure in | |
| 804 ) | |
| 805 { | |
| 806 CYG_ASSERT_SIZES( cyg_mempool_fix, Cyg_Mempool_Fixed ); | |
| 807 | |
| 808 Cyg_Mempool_Fixed *t = new((void *)fix) Cyg_Mempool_Fixed ( | |
| 809 (cyg_uint8 *)base, | |
| 2 | 810 size, |
| 0 | 811 blocksize |
| 812 ); | |
| 813 t=t; | |
| 814 | |
| 815 CYG_CHECK_DATA_PTR( handle, "Bad handle pointer" ); | |
| 816 *handle = (cyg_handle_t)fix; | |
| 817 } | |
| 818 | |
| 819 /* Delete fixed size memory pool */ | |
| 820 externC void cyg_mempool_fix_delete(cyg_handle_t fixpool) | |
| 821 { | |
| 822 ((Cyg_Mempool_Fixed *)fixpool)->~Cyg_Mempool_Fixed(); | |
| 823 } | |
| 824 | |
| 825 /* Allocates a block. This waits if the memory is not | |
| 826 currently available. */ | |
| 827 externC void *cyg_mempool_fix_alloc(cyg_handle_t fixpool) | |
| 828 { | |
| 829 return ((Cyg_Mempool_Fixed *)fixpool)->alloc(); | |
| 830 } | |
| 831 | |
| 832 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 833 | |
| 834 /* Allocates a block. This waits for up to delay ticks, if the memory | |
| 835 is not already available. NULL is returned if no memory is | |
| 836 available. */ | |
| 837 externC void *cyg_mempool_fix_timed_alloc( | |
| 838 cyg_handle_t fixpool, | |
| 839 cyg_tick_count_t abstime) | |
| 840 { | |
| 841 return ((Cyg_Mempool_Fixed *)fixpool)->alloc(abstime); | |
| 842 } | |
| 843 | |
| 844 #endif | |
| 845 | |
| 846 /* Allocates a block. NULL is returned if no memory is available. */ | |
| 847 externC void *cyg_mempool_fix_try_alloc(cyg_handle_t fixpool) | |
| 848 { | |
| 849 return ((Cyg_Mempool_Fixed *)fixpool)->try_alloc(); | |
| 850 } | |
| 851 | |
| 852 /* Frees memory back into fixed size pool. */ | |
| 853 externC void cyg_mempool_fix_free(cyg_handle_t fixpool, void *p) | |
| 854 { | |
| 855 cyg_bool b; | |
| 856 b = ((Cyg_Mempool_Fixed *)fixpool)->free((cyg_uint8 *)p); | |
| 857 CYG_ASSERT( b, "Bad free"); | |
| 858 } | |
| 859 | |
| 860 /* Returns true if there are any threads waiting for memory in the | |
| 861 given memory pool. */ | |
| 862 externC cyg_bool_t cyg_mempool_fix_waiting(cyg_handle_t fixpool) | |
| 863 { | |
| 864 return ((Cyg_Mempool_Fixed *)fixpool)->waiting(); | |
| 865 } | |
| 866 | |
| 867 /* Puts information about a variable memory pool into the structure | |
| 868 provided. */ | |
| 869 externC void cyg_mempool_fix_get_info( | |
| 870 cyg_handle_t fixpool, | |
| 871 cyg_mempool_info *info) | |
| 872 { | |
| 873 Cyg_Mempool_Fixed *f = (Cyg_Mempool_Fixed *)fixpool; | |
| 874 cyg_uint8 *base; | |
| 875 cyg_addrword_t blocksize; | |
| 876 | |
| 877 info->totalmem = f->get_totalmem(); | |
| 878 info->freemem = f->get_freemem(); | |
| 879 f->get_arena(base, info->size, blocksize); | |
| 880 info->base = (void *)base; | |
| 881 info->maxfree = info->blocksize = (cyg_int32)blocksize; | |
| 882 } | |
| 883 | |
| 884 /*---------------------------------------------------------------------------*/ | |
| 885 /* Semaphores */ | |
| 886 | |
| 887 externC void cyg_semaphore_init( | |
| 888 cyg_sem_t *sem, /* Semaphore to init */ | |
| 2 | 889 cyg_count32 val /* Initial semaphore value */ |
| 0 | 890 ) |
| 891 { | |
| 892 CYG_ASSERT_SIZES( cyg_sem_t, Cyg_Counting_Semaphore ); | |
| 893 | |
| 894 Cyg_Counting_Semaphore *t = new((void *)sem) Cyg_Counting_Semaphore(val); | |
| 895 t=t; | |
| 896 } | |
| 897 | |
| 898 externC void cyg_semaphore_destroy( cyg_sem_t *sem ) | |
| 899 { | |
| 900 ((Cyg_Counting_Semaphore *)sem)->~Cyg_Counting_Semaphore(); | |
| 901 } | |
| 902 | |
| 903 externC void cyg_semaphore_wait( cyg_sem_t *sem ) | |
| 904 { | |
| 905 ((Cyg_Counting_Semaphore *)sem)->wait(); | |
| 906 } | |
| 907 | |
| 908 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 909 externC cyg_bool_t cyg_semaphore_timed_wait( | |
| 910 cyg_sem_t *sem, | |
| 911 cyg_tick_count_t abstime | |
| 912 ) | |
| 913 { | |
| 914 return ((Cyg_Counting_Semaphore *)sem)->wait(abstime); | |
| 915 } | |
| 916 #endif | |
| 917 | |
| 918 | |
| 919 externC int cyg_semaphore_trywait( cyg_sem_t *sem ) | |
| 920 { | |
| 921 return ((Cyg_Counting_Semaphore *)sem)->trywait(); | |
| 922 } | |
| 923 | |
| 924 externC void cyg_semaphore_post( cyg_sem_t *sem ) | |
| 925 { | |
| 926 ((Cyg_Counting_Semaphore *)sem)->post(); | |
| 927 } | |
| 928 | |
| 2 | 929 externC void cyg_semaphore_peek( cyg_sem_t *sem, cyg_count32 *val ) |
| 0 | 930 { |
| 931 CYG_CHECK_DATA_PTR( val, "Bad val parameter" ); | |
| 932 | |
| 933 *val = ((Cyg_Counting_Semaphore *)sem)->peek(); | |
| 934 } | |
| 935 | |
| 936 | |
| 937 /*---------------------------------------------------------------------------*/ | |
| 938 /* Flags */ | |
| 939 | |
| 940 void cyg_flag_init( | |
| 941 cyg_flag_t *flag /* Flag to init */ | |
| 942 ) | |
| 943 { | |
| 944 CYG_ASSERT_SIZES( cyg_flag_t, Cyg_Flag ); | |
| 945 CYG_ASSERT( | |
| 946 ( Cyg_Flag::AND == CYG_FLAG_WAITMODE_AND ) && | |
| 947 ( Cyg_Flag::OR == CYG_FLAG_WAITMODE_OR ) && | |
| 948 ( Cyg_Flag::CLR == CYG_FLAG_WAITMODE_CLR ), | |
| 949 "CYG_FLAG_WAITMODE_xxx definition != C++ Cyg_Flag::xxx" ); | |
| 950 | |
| 951 Cyg_Flag *t = new((void *)flag) Cyg_Flag(); | |
| 952 t=t; | |
| 953 } | |
| 954 | |
| 955 void cyg_flag_destroy( cyg_flag_t *flag ) | |
| 956 { | |
| 957 ((Cyg_Flag *)flag)->~Cyg_Flag(); | |
| 958 } | |
| 959 | |
| 960 void cyg_flag_setbits( cyg_flag_t *flag, cyg_flag_value_t value) | |
| 961 { | |
| 962 ((Cyg_Flag *)flag)->setbits( value ); | |
| 963 } | |
| 964 | |
| 965 void cyg_flag_maskbits( cyg_flag_t *flag, cyg_flag_value_t value) | |
| 966 { | |
| 967 ((Cyg_Flag *)flag)->maskbits( value ); | |
| 968 } | |
| 969 | |
| 970 cyg_flag_value_t cyg_flag_wait( cyg_flag_t *flag, | |
| 971 cyg_flag_value_t pattern, | |
| 972 cyg_flag_mode_t mode ) | |
| 973 { | |
| 974 if ( 0 == pattern || 0 != (mode & ~3) ) | |
| 975 return 0; | |
| 976 return ((Cyg_Flag *)flag)->wait( pattern, mode ); | |
| 977 | |
| 978 } | |
| 979 | |
| 980 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 981 cyg_flag_value_t cyg_flag_timed_wait( cyg_flag_t *flag, | |
| 982 cyg_flag_value_t pattern, | |
| 983 cyg_flag_mode_t mode, | |
| 984 cyg_tick_count_t abstime ) | |
| 985 { | |
| 986 if ( 0 == pattern || 0 != (mode & ~3) ) | |
| 987 return 0; | |
| 988 return ((Cyg_Flag *)flag)->wait( pattern, mode, abstime ); | |
| 989 | |
| 990 } | |
| 991 #endif | |
| 992 | |
| 993 cyg_flag_value_t cyg_flag_poll( cyg_flag_t *flag, | |
| 994 cyg_flag_value_t pattern, | |
| 995 cyg_flag_mode_t mode ) | |
| 996 { | |
| 997 if ( 0 == pattern || 0 != (mode & ~3) ) | |
| 998 return 0; | |
| 999 return ((Cyg_Flag *)flag)->poll( pattern, mode ); | |
| 1000 | |
| 1001 } | |
| 1002 | |
| 1003 cyg_flag_value_t cyg_flag_peek( cyg_flag_t *flag ) | |
| 1004 { | |
| 1005 return ((Cyg_Flag *)flag)->peek(); | |
| 1006 } | |
| 1007 | |
| 1008 cyg_bool_t cyg_flag_waiting( cyg_flag_t *flag ) | |
| 1009 { | |
| 1010 return ((Cyg_Flag *)flag)->waiting(); | |
| 1011 } | |
| 1012 | |
| 1013 /*---------------------------------------------------------------------------*/ | |
| 1014 /* Mutex */ | |
| 1015 | |
| 1016 externC void cyg_mutex_init( | |
| 1017 cyg_mutex_t *mutex /* Mutex to init */ | |
| 1018 ) | |
| 1019 { | |
| 1020 CYG_ASSERT_SIZES( cyg_mutex_t, Cyg_Mutex ); | |
| 1021 | |
| 1022 Cyg_Mutex *m = new((void *)mutex) Cyg_Mutex; | |
| 1023 | |
| 1024 m=m; | |
| 1025 } | |
| 1026 | |
| 1027 externC void cyg_mutex_destroy( cyg_mutex_t *mutex ) | |
| 1028 { | |
|
38
e7ba79f6d3a8
Merge from eCos master repository on 1999-09-23-20:10:25-BST
jlarmour
parents:
10
diff
changeset
|
1029 ((Cyg_Mutex *)mutex)->~Cyg_Mutex(); |
| 0 | 1030 } |
| 1031 | |
| 2 | 1032 externC cyg_bool_t cyg_mutex_lock( cyg_mutex_t *mutex ) |
| 0 | 1033 { |
| 2 | 1034 return ((Cyg_Mutex *)mutex)->lock(); |
| 0 | 1035 } |
| 1036 | |
| 1037 externC cyg_bool_t cyg_mutex_trylock( cyg_mutex_t *mutex ) | |
| 1038 { | |
| 1039 return ((Cyg_Mutex *)mutex)->trylock(); | |
| 1040 } | |
| 1041 | |
| 1042 externC void cyg_mutex_unlock( cyg_mutex_t *mutex ) | |
| 1043 { | |
| 1044 ((Cyg_Mutex *)mutex)->unlock(); | |
| 1045 } | |
| 1046 | |
| 2 | 1047 externC void cyg_mutex_release( cyg_mutex_t *mutex ) |
| 1048 { | |
| 1049 ((Cyg_Mutex *)mutex)->release(); | |
| 1050 } | |
| 1051 | |
| 0 | 1052 /*---------------------------------------------------------------------------*/ |
| 1053 /* Condition Variables */ | |
| 1054 | |
| 1055 externC void cyg_cond_init( | |
| 1056 cyg_cond_t *cond, /* condition variable to init */ | |
| 1057 cyg_mutex_t *mutex /* associated mutex */ | |
| 1058 ) | |
| 1059 { | |
| 1060 CYG_ASSERT_SIZES( cyg_cond_t, Cyg_Condition_Variable ); | |
| 1061 | |
| 1062 Cyg_Condition_Variable *t = new((void *)cond) Cyg_Condition_Variable( | |
| 1063 *(Cyg_Mutex *)mutex); | |
| 1064 t=t; | |
| 1065 } | |
| 1066 | |
| 1067 externC void cyg_cond_destroy( cyg_cond_t *cond ) | |
| 1068 { | |
|
38
e7ba79f6d3a8
Merge from eCos master repository on 1999-09-23-20:10:25-BST
jlarmour
parents:
10
diff
changeset
|
1069 ((Cyg_Condition_Variable *)cond)->~Cyg_Condition_Variable(); |
| 0 | 1070 } |
| 1071 | |
| 1072 externC void cyg_cond_wait( cyg_cond_t *cond ) | |
| 1073 { | |
| 1074 ((Cyg_Condition_Variable *)cond)->wait(); | |
| 1075 } | |
| 1076 | |
| 1077 externC void cyg_cond_signal( cyg_cond_t *cond ) | |
| 1078 { | |
| 1079 ((Cyg_Condition_Variable *)cond)->signal(); | |
| 1080 } | |
| 1081 | |
| 1082 externC void cyg_cond_broadcast( cyg_cond_t *cond ) | |
| 1083 { | |
| 1084 ((Cyg_Condition_Variable *)cond)->broadcast(); | |
| 1085 } | |
| 1086 | |
| 1087 #ifdef CYGMFN_KERNEL_SYNCH_CONDVAR_TIMED_WAIT | |
| 1088 externC cyg_bool_t cyg_cond_timed_wait( | |
| 1089 cyg_cond_t *cond, | |
| 1090 cyg_tick_count_t abstime | |
| 1091 ) | |
| 1092 { | |
| 1093 return ((Cyg_Condition_Variable *)cond)->wait(abstime); | |
| 1094 } | |
| 1095 | |
| 1096 #endif | |
| 1097 | |
| 1098 // ------------------------------------------------------------------------- | |
| 1099 // Check structure sizes. | |
| 1100 // This class and constructor get run automatically in debug versions | |
| 1101 // of the kernel and check that the structures configured in the C | |
| 1102 // code are the same size as the C++ classes they should match. | |
| 1103 | |
| 1104 #ifdef CYGPKG_INFRA_DEBUG | |
| 1105 | |
| 1106 class Cyg_Check_Structure_Sizes | |
| 1107 { | |
| 1108 int dummy; | |
| 1109 public: | |
| 1110 Cyg_Check_Structure_Sizes( int x ); | |
| 1111 | |
| 1112 }; | |
| 1113 | |
| 1114 #define CYG_CHECK_SIZES(cstruct, cxxstruct) \ | |
| 1115 if( sizeof(cstruct) != sizeof(cxxstruct) ) \ | |
| 1116 { \ | |
| 1117 char *fmt = "Size of C struct " #cstruct \ | |
| 1118 " != size of C++ struct " #cxxstruct ; \ | |
| 1119 CYG_TRACE2(1, fmt, sizeof(cstruct) , sizeof(cxxstruct) ); \ | |
| 1120 fail = true; \ | |
| 1121 fmt = fmt; \ | |
| 1122 } | |
| 1123 | |
| 1124 Cyg_Check_Structure_Sizes::Cyg_Check_Structure_Sizes(int x) | |
| 1125 { | |
| 1126 cyg_bool fail = false; | |
| 1127 | |
| 1128 dummy = x+1; | |
| 1129 | |
| 1130 CYG_CHECK_SIZES( cyg_thread, Cyg_Thread ); | |
| 1131 CYG_CHECK_SIZES( cyg_interrupt, Cyg_Interrupt ); | |
| 1132 CYG_CHECK_SIZES( cyg_counter, Cyg_Counter ); | |
| 1133 CYG_CHECK_SIZES( cyg_clock, Cyg_Clock ); | |
| 1134 CYG_CHECK_SIZES( cyg_alarm, Cyg_Alarm ); | |
| 1135 CYG_CHECK_SIZES( cyg_mbox, Cyg_Mbox ); | |
| 1136 CYG_CHECK_SIZES( cyg_mempool_var, Cyg_Mempool_Variable ); | |
| 1137 CYG_CHECK_SIZES( cyg_mempool_fix, Cyg_Mempool_Fixed ); | |
| 1138 CYG_CHECK_SIZES( cyg_sem_t, Cyg_Counting_Semaphore ); | |
| 1139 CYG_CHECK_SIZES( cyg_flag_t, Cyg_Flag ); | |
| 1140 CYG_CHECK_SIZES( cyg_mutex_t, Cyg_Mutex ); | |
| 1141 CYG_CHECK_SIZES( cyg_cond_t, Cyg_Condition_Variable ); | |
| 1142 | |
| 1143 CYG_ASSERT( !fail, "Size checks failed"); | |
| 1144 } | |
| 1145 | |
| 1146 Cyg_Check_Structure_Sizes check_structure_sizes(1); | |
| 1147 | |
| 1148 #endif | |
| 1149 | |
| 1150 | |
| 1151 // ------------------------------------------------------------------------- | |
| 1152 | |
| 1153 #endif | |
| 1154 // EOF common/kapi.cxx |