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