000460e0 <_API_Mutex_Unlock>:
#include <rtems/score/apimutex.h>
void _API_Mutex_Unlock(
API_Mutex_Control *the_mutex
)
{
460e0: 4e56 0000 linkw %fp,#0
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
460e4: 2039 0005 d94c movel 5d94c <_Thread_Dispatch_disable_level>,%d0 460ea: 5280 addql #1,%d0 460ec: 206e 0008 moveal %fp@(8),%a0 460f0: 23c0 0005 d94c movel %d0,5d94c <_Thread_Dispatch_disable_level>
_Thread_Disable_dispatch();
_CORE_mutex_Surrender(
460f6: 42a7 clrl %sp@- 460f8: 2f28 0008 movel %a0@(8),%sp@- 460fc: 4868 0010 pea %a0@(16) 46100: 4eb9 0004 6364 jsr 46364 <_CORE_mutex_Surrender>
&the_mutex->Mutex,
the_mutex->Object.id,
NULL
);
_Thread_Enable_dispatch();
46106: 4fef 000c lea %sp@(12),%sp
}
4610a: 4e5e unlk %fp
_CORE_mutex_Surrender(
&the_mutex->Mutex,
the_mutex->Object.id,
NULL
);
_Thread_Enable_dispatch();
4610c: 4ef9 0004 7696 jmp 47696 <_Thread_Enable_dispatch>
...
000480fc <_CORE_RWLock_Obtain_for_reading>:
* If unlocked, then OK to read.
* If locked for reading and no waiters, then OK to read.
* If any thread is waiting, then we wait.
*/
_ISR_Disable( level );
480fc: 203c 0000 0700 movel #1792,%d0
Objects_Id id,
bool wait,
Watchdog_Interval timeout,
CORE_RWLock_API_mp_support_callout api_rwlock_mp_support
)
{
48102: 4e56 ffe8 linkw %fp,#-24 48106: 48d7 0c3c moveml %d2-%d5/%a2-%a3,%sp@ 4810a: 246e 0008 moveal %fp@(8),%a2 4810e: 282e 000c movel %fp@(12),%d4 48112: 262e 0014 movel %fp@(20),%d3 48116: 1a2e 0013 moveb %fp@(19),%d5
ISR_Level level; Thread_Control *executing = _Thread_Executing;
4811a: 2679 0006 07e0 moveal 607e0 <_Per_CPU_Information+0xc>,%a3
* If unlocked, then OK to read.
* If locked for reading and no waiters, then OK to read.
* If any thread is waiting, then we wait.
*/
_ISR_Disable( level );
48120: 40c2 movew %sr,%d2 48122: 8082 orl %d2,%d0 48124: 46c0 movew %d0,%sr
switch ( the_rwlock->current_state ) {
48126: 202a 0044 movel %a2@(68),%d0
4812a: 6708 beqs 48134 <_CORE_RWLock_Obtain_for_reading+0x38>
4812c: 7201 moveq #1,%d1 4812e: b280 cmpl %d0,%d1
48130: 662a bnes 4815c <_CORE_RWLock_Obtain_for_reading+0x60>
48132: 600e bras 48142 <_CORE_RWLock_Obtain_for_reading+0x46>
case CORE_RWLOCK_UNLOCKED:
the_rwlock->current_state = CORE_RWLOCK_LOCKED_FOR_READING;
48134: 7001 moveq #1,%d0
the_rwlock->number_of_readers += 1;
48136: 52aa 0048 addql #1,%a2@(72)
*/
_ISR_Disable( level );
switch ( the_rwlock->current_state ) {
case CORE_RWLOCK_UNLOCKED:
the_rwlock->current_state = CORE_RWLOCK_LOCKED_FOR_READING;
4813a: 2540 0044 movel %d0,%a2@(68)
the_rwlock->number_of_readers += 1; _ISR_Enable( level );
4813e: 46c2 movew %d2,%sr 48140: 6014 bras 48156 <_CORE_RWLock_Obtain_for_reading+0x5a>
executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL;
return;
case CORE_RWLOCK_LOCKED_FOR_READING: {
Thread_Control *waiter;
waiter = _Thread_queue_First( &the_rwlock->Wait_queue );
48142: 2f0a movel %a2,%sp@- 48144: 4eb9 0004 9cb8 jsr 49cb8 <_Thread_queue_First>
if ( !waiter ) {
4814a: 588f addql #4,%sp 4814c: 4a80 tstl %d0
4814e: 660c bnes 4815c <_CORE_RWLock_Obtain_for_reading+0x60><== NEVER TAKEN
the_rwlock->number_of_readers += 1;
48150: 52aa 0048 addql #1,%a2@(72)
_ISR_Enable( level );
48154: 46c2 movew %d2,%sr
executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL;
48156: 42ab 0034 clrl %a3@(52)
return;
4815a: 6046 bras 481a2 <_CORE_RWLock_Obtain_for_reading+0xa6>
/*
* If the thread is not willing to wait, then return immediately.
*/
if ( !wait ) {
4815c: 4a05 tstb %d5
4815e: 660a bnes 4816a <_CORE_RWLock_Obtain_for_reading+0x6e>
_ISR_Enable( level );
48160: 46c2 movew %d2,%sr
executing->Wait.return_code = CORE_RWLOCK_UNAVAILABLE;
48162: 7202 moveq #2,%d1 48164: 2741 0034 movel %d1,%a3@(52) 48168: 6038 bras 481a2 <_CORE_RWLock_Obtain_for_reading+0xa6> 4816a: 7001 moveq #1,%d0 4816c: 2540 0030 movel %d0,%a2@(48)
/*
* We need to wait to enter this critical section
*/
_Thread_queue_Enter_critical_section( &the_rwlock->Wait_queue );
executing->Wait.queue = &the_rwlock->Wait_queue;
48170: 274a 0044 movel %a2,%a3@(68)
executing->Wait.id = id;
48174: 2744 0020 movel %d4,%a3@(32)
executing->Wait.option = CORE_RWLOCK_THREAD_WAITING_FOR_READ;
48178: 42ab 0030 clrl %a3@(48)
executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL;
4817c: 42ab 0034 clrl %a3@(52)
_ISR_Enable( level );
48180: 46c2 movew %d2,%sr
_Thread_queue_Enqueue_with_handler(
48182: 2d43 000c movel %d3,%fp@(12) 48186: 223c 0004 82ec movel #295660,%d1 4818c: 2d4a 0008 movel %a2,%fp@(8)
timeout,
_CORE_RWLock_Timeout
);
/* return to API level so it can dispatch and we block */
}
48190: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3
executing->Wait.id = id;
executing->Wait.option = CORE_RWLOCK_THREAD_WAITING_FOR_READ;
executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL;
_ISR_Enable( level );
_Thread_queue_Enqueue_with_handler(
48196: 2d41 0010 movel %d1,%fp@(16)
timeout,
_CORE_RWLock_Timeout
);
/* return to API level so it can dispatch and we block */
}
4819a: 4e5e unlk %fp
executing->Wait.id = id;
executing->Wait.option = CORE_RWLOCK_THREAD_WAITING_FOR_READ;
executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL;
_ISR_Enable( level );
_Thread_queue_Enqueue_with_handler(
4819c: 4ef9 0004 99ac jmp 499ac <_Thread_queue_Enqueue_with_handler>
timeout,
_CORE_RWLock_Timeout
);
/* return to API level so it can dispatch and we block */
}
481a2: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3
481a8: 4e5e unlk %fp <== NOT EXECUTED
00048238 <_CORE_RWLock_Release>:
* Otherwise, we have to block.
* If locked for reading and no waiters, then OK to read.
* If any thread is waiting, then we wait.
*/
_ISR_Disable( level );
48238: 223c 0000 0700 movel #1792,%d1
*/
CORE_RWLock_Status _CORE_RWLock_Release(
CORE_RWLock_Control *the_rwlock
)
{
4823e: 4e56 fff0 linkw %fp,#-16
ISR_Level level; Thread_Control *executing = _Thread_Executing;
48242: 2079 0006 07e0 moveal 607e0 <_Per_CPU_Information+0xc>,%a0
*/
CORE_RWLock_Status _CORE_RWLock_Release(
CORE_RWLock_Control *the_rwlock
)
{
48248: 48d7 1c04 moveml %d2/%a2-%a4,%sp@ 4824c: 246e 0008 moveal %fp@(8),%a2
* Otherwise, we have to block.
* If locked for reading and no waiters, then OK to read.
* If any thread is waiting, then we wait.
*/
_ISR_Disable( level );
48250: 40c0 movew %sr,%d0 48252: 8280 orl %d0,%d1 48254: 46c1 movew %d1,%sr
if ( the_rwlock->current_state == CORE_RWLOCK_UNLOCKED){
48256: 222a 0044 movel %a2@(68),%d1
4825a: 660a bnes 48266 <_CORE_RWLock_Release+0x2e>
_ISR_Enable( level );
4825c: 46c0 movew %d0,%sr
executing->Wait.return_code = CORE_RWLOCK_UNAVAILABLE;
4825e: 7002 moveq #2,%d0 48260: 2140 0034 movel %d0,%a0@(52)
return CORE_RWLOCK_SUCCESSFUL;
48264: 6078 bras 482de <_CORE_RWLock_Release+0xa6>
}
if ( the_rwlock->current_state == CORE_RWLOCK_LOCKED_FOR_READING ) {
48266: 7401 moveq #1,%d2 48268: b481 cmpl %d1,%d2
4826a: 6610 bnes 4827c <_CORE_RWLock_Release+0x44> the_rwlock->number_of_readers -= 1;
4826c: 222a 0048 movel %a2@(72),%d1 48270: 5381 subql #1,%d1 48272: 2541 0048 movel %d1,%a2@(72)
if ( the_rwlock->number_of_readers != 0 ) {
48276: 6704 beqs 4827c <_CORE_RWLock_Release+0x44>
/* must be unlocked again */
_ISR_Enable( level );
48278: 46c0 movew %d0,%sr
return CORE_RWLOCK_SUCCESSFUL;
4827a: 6062 bras 482de <_CORE_RWLock_Release+0xa6>
}
}
/* CORE_RWLOCK_LOCKED_FOR_WRITING or READING with readers */
executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL;
4827c: 42a8 0034 clrl %a0@(52)
/*
* Implicitly transition to "unlocked" and find another thread interested
* in obtaining this rwlock.
*/
the_rwlock->current_state = CORE_RWLOCK_UNLOCKED;
48280: 42aa 0044 clrl %a2@(68)
_ISR_Enable( level );
48284: 46c0 movew %d0,%sr
next = _Thread_queue_Dequeue( &the_rwlock->Wait_queue );
48286: 2f0a movel %a2,%sp@- 48288: 4eb9 0004 9870 jsr 49870 <_Thread_queue_Dequeue>
if ( next ) {
4828e: 588f addql #4,%sp 48290: 4a80 tstl %d0
48292: 674a beqs 482de <_CORE_RWLock_Release+0xa6>
if ( next->Wait.option == CORE_RWLOCK_THREAD_WAITING_FOR_WRITE ) {
48294: 7201 moveq #1,%d1 48296: 2040 moveal %d0,%a0 48298: b2a8 0030 cmpl %a0@(48),%d1
4829c: 6608 bnes 482a6 <_CORE_RWLock_Release+0x6e>
the_rwlock->current_state = CORE_RWLOCK_LOCKED_FOR_WRITING;
4829e: 7002 moveq #2,%d0 482a0: 2540 0044 movel %d0,%a2@(68)
return CORE_RWLOCK_SUCCESSFUL;
482a4: 6038 bras 482de <_CORE_RWLock_Release+0xa6>
/*
* Must be CORE_RWLOCK_THREAD_WAITING_FOR_READING
*/
the_rwlock->number_of_readers += 1;
the_rwlock->current_state = CORE_RWLOCK_LOCKED_FOR_READING;
482a6: 7201 moveq #1,%d1
}
/*
* Must be CORE_RWLOCK_THREAD_WAITING_FOR_READING
*/
the_rwlock->number_of_readers += 1;
482a8: 52aa 0048 addql #1,%a2@(72)
/*
* Now see if more readers can be let go.
*/
while ( 1 ) {
next = _Thread_queue_First( &the_rwlock->Wait_queue );
482ac: 49f9 0004 9cb8 lea 49cb8 <_Thread_queue_First>,%a4
if ( !next ||
next->Wait.option == CORE_RWLOCK_THREAD_WAITING_FOR_WRITE )
return CORE_RWLOCK_SUCCESSFUL;
the_rwlock->number_of_readers += 1;
_Thread_queue_Extract( &the_rwlock->Wait_queue, next );
482b2: 47f9 0004 9b8c lea 49b8c <_Thread_queue_Extract>,%a3
/*
* Must be CORE_RWLOCK_THREAD_WAITING_FOR_READING
*/
the_rwlock->number_of_readers += 1;
the_rwlock->current_state = CORE_RWLOCK_LOCKED_FOR_READING;
482b8: 2541 0044 movel %d1,%a2@(68)
/*
* Now see if more readers can be let go.
*/
while ( 1 ) {
next = _Thread_queue_First( &the_rwlock->Wait_queue );
482bc: 2f0a movel %a2,%sp@- 482be: 4e94 jsr %a4@
if ( !next ||
482c0: 588f addql #4,%sp 482c2: 4a80 tstl %d0
482c4: 6718 beqs 482de <_CORE_RWLock_Release+0xa6>
482c6: 7401 moveq #1,%d2 482c8: 2040 moveal %d0,%a0 482ca: b4a8 0030 cmpl %a0@(48),%d2
482ce: 670e beqs 482de <_CORE_RWLock_Release+0xa6> <== NEVER TAKEN
next->Wait.option == CORE_RWLOCK_THREAD_WAITING_FOR_WRITE )
return CORE_RWLOCK_SUCCESSFUL;
the_rwlock->number_of_readers += 1;
482d0: 52aa 0048 addql #1,%a2@(72)
_Thread_queue_Extract( &the_rwlock->Wait_queue, next );
482d4: 2f00 movel %d0,%sp@- 482d6: 2f0a movel %a2,%sp@- 482d8: 4e93 jsr %a3@
}
482da: 508f addql #8,%sp 482dc: 60de bras 482bc <_CORE_RWLock_Release+0x84>
}
/* indentation is to match _ISR_Disable at top */
return CORE_RWLOCK_SUCCESSFUL;
}
482de: 4280 clrl %d0 482e0: 4cee 1c04 fff0 moveml %fp@(-16),%d2/%a2-%a4 482e6: 4e5e unlk %fp
...
000482ec <_CORE_RWLock_Timeout>:
void _CORE_RWLock_Timeout(
Objects_Id id,
void *ignored
)
{
482ec: 4e56 fffc linkw %fp,#-4
Thread_Control *the_thread;
Objects_Locations location;
the_thread = _Thread_Get( id, &location );
482f0: 486e fffc pea %fp@(-4) 482f4: 2f2e 0008 movel %fp@(8),%sp@- 482f8: 4eb9 0004 954c jsr 4954c <_Thread_Get>
switch ( location ) {
482fe: 508f addql #8,%sp 48300: 4aae fffc tstl %fp@(-4)
48304: 6618 bnes 4831e <_CORE_RWLock_Timeout+0x32> <== NEVER TAKEN
#if defined(RTEMS_MULTIPROCESSING)
case OBJECTS_REMOTE: /* impossible */
#endif
break;
case OBJECTS_LOCAL:
_Thread_queue_Process_timeout( the_thread );
48306: 2f00 movel %d0,%sp@- 48308: 4eb9 0004 9db8 jsr 49db8 <_Thread_queue_Process_timeout>
*/
RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void )
{
RTEMS_COMPILER_MEMORY_BARRIER();
_Thread_Dispatch_disable_level -= 1;
4830e: 588f addql #4,%sp 48310: 2039 0006 0350 movel 60350 <_Thread_Dispatch_disable_level>,%d0 48316: 5380 subql #1,%d0 48318: 23c0 0006 0350 movel %d0,60350 <_Thread_Dispatch_disable_level>
_Thread_Unnest_dispatch();
break;
}
}
4831e: 4e5e unlk %fp
...
00047178 <_CORE_barrier_Wait>:
Thread_Control *executing;
ISR_Level level;
executing = _Thread_Executing;
executing->Wait.return_code = CORE_BARRIER_STATUS_SUCCESSFUL;
_ISR_Disable( level );
47178: 203c 0000 0700 movel #1792,%d0
Objects_Id id,
bool wait,
Watchdog_Interval timeout,
CORE_barrier_API_mp_support_callout api_barrier_mp_support
)
{
4717e: 4e56 fff4 linkw %fp,#-12
Thread_Control *executing;
ISR_Level level;
executing = _Thread_Executing;
47182: 2279 0005 f3c0 moveal 5f3c0 <_Per_CPU_Information+0xc>,%a1
Objects_Id id,
bool wait,
Watchdog_Interval timeout,
CORE_barrier_API_mp_support_callout api_barrier_mp_support
)
{
47188: 48d7 001c moveml %d2-%d4,%sp@ 4718c: 206e 0008 moveal %fp@(8),%a0
Thread_Control *executing;
ISR_Level level;
executing = _Thread_Executing;
executing->Wait.return_code = CORE_BARRIER_STATUS_SUCCESSFUL;
47190: 42a9 0034 clrl %a1@(52)
Objects_Id id,
bool wait,
Watchdog_Interval timeout,
CORE_barrier_API_mp_support_callout api_barrier_mp_support
)
{
47194: 242e 000c movel %fp@(12),%d2 47198: 262e 0014 movel %fp@(20),%d3 4719c: 282e 0018 movel %fp@(24),%d4
Thread_Control *executing;
ISR_Level level;
executing = _Thread_Executing;
executing->Wait.return_code = CORE_BARRIER_STATUS_SUCCESSFUL;
_ISR_Disable( level );
471a0: 40c1 movew %sr,%d1 471a2: 8081 orl %d1,%d0 471a4: 46c0 movew %d0,%sr
the_barrier->number_of_waiting_threads++;
471a6: 2028 0048 movel %a0@(72),%d0 471aa: 5280 addql #1,%d0 471ac: 2140 0048 movel %d0,%a0@(72)
if ( _CORE_barrier_Is_automatic( &the_barrier->Attributes ) ) {
471b0: 4aa8 0040 tstl %a0@(64)
471b4: 6626 bnes 471dc <_CORE_barrier_Wait+0x64>
if ( the_barrier->number_of_waiting_threads ==
471b6: b0a8 0044 cmpl %a0@(68),%d0
471ba: 6620 bnes 471dc <_CORE_barrier_Wait+0x64>
the_barrier->Attributes.maximum_count) {
executing->Wait.return_code = CORE_BARRIER_STATUS_AUTOMATICALLY_RELEASED;
471bc: 7001 moveq #1,%d0 471be: 2340 0034 movel %d0,%a1@(52)
_ISR_Enable( level );
471c2: 46c1 movew %d1,%sr
_CORE_barrier_Release( the_barrier, id, api_barrier_mp_support );
471c4: 2d44 0010 movel %d4,%fp@(16) 471c8: 2d42 000c movel %d2,%fp@(12)
executing->Wait.queue = &the_barrier->Wait_queue;
executing->Wait.id = id;
_ISR_Enable( level );
_Thread_queue_Enqueue( &the_barrier->Wait_queue, timeout );
}
471cc: 4cd7 001c moveml %sp@,%d2-%d4
if ( _CORE_barrier_Is_automatic( &the_barrier->Attributes ) ) {
if ( the_barrier->number_of_waiting_threads ==
the_barrier->Attributes.maximum_count) {
executing->Wait.return_code = CORE_BARRIER_STATUS_AUTOMATICALLY_RELEASED;
_ISR_Enable( level );
_CORE_barrier_Release( the_barrier, id, api_barrier_mp_support );
471d0: 2d48 0008 movel %a0,%fp@(8)
executing->Wait.queue = &the_barrier->Wait_queue;
executing->Wait.id = id;
_ISR_Enable( level );
_Thread_queue_Enqueue( &the_barrier->Wait_queue, timeout );
}
471d4: 4e5e unlk %fp
if ( _CORE_barrier_Is_automatic( &the_barrier->Attributes ) ) {
if ( the_barrier->number_of_waiting_threads ==
the_barrier->Attributes.maximum_count) {
executing->Wait.return_code = CORE_BARRIER_STATUS_AUTOMATICALLY_RELEASED;
_ISR_Enable( level );
_CORE_barrier_Release( the_barrier, id, api_barrier_mp_support );
471d6: 4ef9 0004 ba94 jmp 4ba94 <_CORE_barrier_Release>
RTEMS_INLINE_ROUTINE void _Thread_queue_Enter_critical_section (
Thread_queue_Control *the_thread_queue
)
{
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
471dc: 7001 moveq #1,%d0 471de: 2140 0030 movel %d0,%a0@(48)
return;
}
}
_Thread_queue_Enter_critical_section( &the_barrier->Wait_queue );
executing->Wait.queue = &the_barrier->Wait_queue;
471e2: 2348 0044 movel %a0,%a1@(68)
executing->Wait.id = id;
471e6: 2342 0020 movel %d2,%a1@(32)
_ISR_Enable( level );
471ea: 46c1 movew %d1,%sr
_Thread_queue_Enqueue( &the_barrier->Wait_queue, timeout );
471ec: 2d43 000c movel %d3,%fp@(12) 471f0: 203c 0004 8e1c movel #298524,%d0 471f6: 2d48 0008 movel %a0,%fp@(8)
}
471fa: 4cd7 001c moveml %sp@,%d2-%d4
_Thread_queue_Enter_critical_section( &the_barrier->Wait_queue );
executing->Wait.queue = &the_barrier->Wait_queue;
executing->Wait.id = id;
_ISR_Enable( level );
_Thread_queue_Enqueue( &the_barrier->Wait_queue, timeout );
471fe: 2d40 0010 movel %d0,%fp@(16)
}
47202: 4e5e unlk %fp
_Thread_queue_Enter_critical_section( &the_barrier->Wait_queue );
executing->Wait.queue = &the_barrier->Wait_queue;
executing->Wait.id = id;
_ISR_Enable( level );
_Thread_queue_Enqueue( &the_barrier->Wait_queue, timeout );
47204: 4ef9 0004 8b0c jmp 48b0c <_Thread_queue_Enqueue_with_handler>
...
00052d38 <_CORE_message_queue_Broadcast>:
Objects_Id id __attribute__((unused)),
CORE_message_queue_API_mp_support_callout api_message_queue_mp_support __attribute__((unused)),
#endif
uint32_t *count
)
{
52d38: 4e56 ffe0 linkw %fp,#-32 52d3c: 48d7 3c3c moveml %d2-%d5/%a2-%a5,%sp@ 52d40: 246e 0008 moveal %fp@(8),%a2 52d44: 2a2e 000c movel %fp@(12),%d5 52d48: 262e 0010 movel %fp@(16),%d3 52d4c: 286e 001c moveal %fp@(28),%a4
Thread_Control *the_thread;
uint32_t number_broadcasted;
Thread_Wait_information *waitp;
if ( size > the_message_queue->maximum_message_size ) {
52d50: b6aa 004c cmpl %a2@(76),%d3
52d54: 6244 bhis 52d9a <_CORE_message_queue_Broadcast+0x62><== NEVER TAKEN
* NOTE: This check is critical because threads can block on
* send and receive and this ensures that we are broadcasting
* the message to threads waiting to receive -- not to send.
*/
if ( the_message_queue->number_of_pending_messages != 0 ) {
52d56: 4aaa 0048 tstl %a2@(72)
52d5a: 6610 bnes 52d6c <_CORE_message_queue_Broadcast+0x34>
52d5c: 4282 clrl %d2
/* * There must be no pending messages if there is a thread waiting to * receive a message. */ number_broadcasted = 0; while ((the_thread =
52d5e: 283c 0005 51b4 movel #348596,%d4
const void *source,
void *destination,
size_t size
)
{
memcpy(destination, source, size);
52d64: 4bf9 0005 a9e0 lea 5a9e0 <memcpy>,%a5 52d6a: 601a bras 52d86 <_CORE_message_queue_Broadcast+0x4e>
* send and receive and this ensures that we are broadcasting
* the message to threads waiting to receive -- not to send.
*/
if ( the_message_queue->number_of_pending_messages != 0 ) {
*count = 0;
52d6c: 4294 clrl %a4@ 52d6e: 6026 bras 52d96 <_CORE_message_queue_Broadcast+0x5e> 52d70: 2f03 movel %d3,%sp@-
*/
number_broadcasted = 0;
while ((the_thread =
_Thread_queue_Dequeue(&the_message_queue->Wait_queue))) {
waitp = &the_thread->Wait;
number_broadcasted += 1;
52d72: 5282 addql #1,%d2 52d74: 2f05 movel %d5,%sp@- 52d76: 2f2b 002c movel %a3@(44),%sp@- 52d7a: 4e95 jsr %a5@
buffer,
waitp->return_argument_second.mutable_object,
size
);
*(size_t *) the_thread->Wait.return_argument = size;
52d7c: 206b 0028 moveal %a3@(40),%a0 52d80: 4fef 000c lea %sp@(12),%sp 52d84: 2083 movel %d3,%a0@
/* * There must be no pending messages if there is a thread waiting to * receive a message. */ number_broadcasted = 0; while ((the_thread =
52d86: 2f0a movel %a2,%sp@- 52d88: 2044 moveal %d4,%a0 52d8a: 4e90 jsr %a0@ 52d8c: 588f addql #4,%sp 52d8e: 2640 moveal %d0,%a3 52d90: 4a80 tstl %d0
52d92: 66dc bnes 52d70 <_CORE_message_queue_Broadcast+0x38>
if ( !_Objects_Is_local_id( the_thread->Object.id ) )
(*api_message_queue_mp_support) ( the_thread, id );
#endif
}
*count = number_broadcasted;
52d94: 2882 movel %d2,%a4@
return CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL;
52d96: 4280 clrl %d0 52d98: 6002 bras 52d9c <_CORE_message_queue_Broadcast+0x64>
Thread_Control *the_thread;
uint32_t number_broadcasted;
Thread_Wait_information *waitp;
if ( size > the_message_queue->maximum_message_size ) {
return CORE_MESSAGE_QUEUE_STATUS_INVALID_SIZE;
52d9a: 7001 moveq #1,%d0 <== NOT EXECUTED
#endif
}
*count = number_broadcasted;
return CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL;
}
52d9c: 4cee 3c3c ffe0 moveml %fp@(-32),%d2-%d5/%a2-%a5 52da2: 4e5e unlk %fp
...
0004dfac <_CORE_message_queue_Initialize>:
/*
* Round size up to multiple of a pointer for chain init and
* check for overflow on adding overhead to each message.
*/
allocated_message_size = maximum_message_size;
if (allocated_message_size & (sizeof(uint32_t) - 1)) {
4dfac: 7003 moveq #3,%d0
CORE_message_queue_Control *the_message_queue,
CORE_message_queue_Attributes *the_message_queue_attributes,
uint32_t maximum_pending_messages,
size_t maximum_message_size
)
{
4dfae: 4e56 fff4 linkw %fp,#-12 4dfb2: 222e 0014 movel %fp@(20),%d1 4dfb6: 48d7 040c moveml %d2-%d3/%a2,%sp@ 4dfba: 246e 0008 moveal %fp@(8),%a2 4dfbe: 242e 0010 movel %fp@(16),%d2
/*
* Round size up to multiple of a pointer for chain init and
* check for overflow on adding overhead to each message.
*/
allocated_message_size = maximum_message_size;
if (allocated_message_size & (sizeof(uint32_t) - 1)) {
4dfc2: c081 andl %d1,%d0
)
{
size_t message_buffering_required;
size_t allocated_message_size;
the_message_queue->maximum_pending_messages = maximum_pending_messages;
4dfc4: 2542 0044 movel %d2,%a2@(68)
the_message_queue->number_of_pending_messages = 0;
4dfc8: 42aa 0048 clrl %a2@(72)
the_message_queue->maximum_message_size = maximum_message_size;
4dfcc: 2541 004c movel %d1,%a2@(76)
CORE_message_queue_Control *the_message_queue,
CORE_message_queue_Notify_Handler the_handler,
void *the_argument
)
{
the_message_queue->notify_handler = the_handler;
4dfd0: 42aa 0060 clrl %a2@(96)
the_message_queue->notify_argument = the_argument;
4dfd4: 42aa 0064 clrl %a2@(100)
/*
* Round size up to multiple of a pointer for chain init and
* check for overflow on adding overhead to each message.
*/
allocated_message_size = maximum_message_size;
if (allocated_message_size & (sizeof(uint32_t) - 1)) {
4dfd8: 4a80 tstl %d0
4dfda: 670e beqs 4dfea <_CORE_message_queue_Initialize+0x3e>
allocated_message_size += sizeof(uint32_t);
4dfdc: 2001 movel %d1,%d0 4dfde: 5880 addql #4,%d0
allocated_message_size &= ~(sizeof(uint32_t) - 1);
4dfe0: 76fc moveq #-4,%d3 4dfe2: c083 andl %d3,%d0
}
if (allocated_message_size < maximum_message_size)
4dfe4: b280 cmpl %d0,%d1
4dfe6: 6272 bhis 4e05a <_CORE_message_queue_Initialize+0xae><== NEVER TAKEN
4dfe8: 6002 bras 4dfec <_CORE_message_queue_Initialize+0x40>
/*
* Round size up to multiple of a pointer for chain init and
* check for overflow on adding overhead to each message.
*/
allocated_message_size = maximum_message_size;
if (allocated_message_size & (sizeof(uint32_t) - 1)) {
4dfea: 2001 movel %d1,%d0
/*
* Calculate how much total memory is required for message buffering and
* check for overflow on the multiplication.
*/
message_buffering_required = (size_t) maximum_pending_messages *
(allocated_message_size + sizeof(CORE_message_queue_Buffer_control));
4dfec: 2600 movel %d0,%d3 4dfee: 0683 0000 0014 addil #20,%d3
/*
* Calculate how much total memory is required for message buffering and
* check for overflow on the multiplication.
*/
message_buffering_required = (size_t) maximum_pending_messages *
4dff4: 2203 movel %d3,%d1 4dff6: 4c02 1800 mulsl %d2,%d1
(allocated_message_size + sizeof(CORE_message_queue_Buffer_control));
if (message_buffering_required < allocated_message_size)
4dffa: b081 cmpl %d1,%d0
4dffc: 625c bhis 4e05a <_CORE_message_queue_Initialize+0xae><== NEVER TAKEN
/*
* Attempt to allocate the message memory
*/
the_message_queue->message_buffers = (CORE_message_queue_Buffer *)
_Workspace_Allocate( message_buffering_required );
4dffe: 2f01 movel %d1,%sp@- 4e000: 4eb9 0005 0a10 jsr 50a10 <_Workspace_Allocate>
if (the_message_queue->message_buffers == 0)
4e006: 588f addql #4,%sp
return false;
/*
* Attempt to allocate the message memory
*/
the_message_queue->message_buffers = (CORE_message_queue_Buffer *)
4e008: 2540 005c movel %d0,%a2@(92)
_Workspace_Allocate( message_buffering_required );
if (the_message_queue->message_buffers == 0)
4e00c: 674c beqs 4e05a <_CORE_message_queue_Initialize+0xae>
/*
* Initialize the pool of inactive messages, pending messages,
* and set of waiting threads.
*/
_Chain_Initialize (
4e00e: 2f03 movel %d3,%sp@- 4e010: 2f02 movel %d2,%sp@- 4e012: 2f00 movel %d0,%sp@- 4e014: 486a 0068 pea %a2@(104) 4e018: 4eb9 0005 2be0 jsr 52be0 <_Chain_Initialize>
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
4e01e: 41ea 0054 lea %a2@(84),%a0
allocated_message_size + sizeof( CORE_message_queue_Buffer_control )
);
_Chain_Initialize_empty( &the_message_queue->Pending_messages );
_Thread_queue_Initialize(
4e022: 7001 moveq #1,%d0 4e024: 2548 0050 movel %a0,%a2@(80)
the_message_queue->message_buffers,
(size_t) maximum_pending_messages,
allocated_message_size + sizeof( CORE_message_queue_Buffer_control )
);
_Chain_Initialize_empty( &the_message_queue->Pending_messages );
4e028: 41ea 0050 lea %a2@(80),%a0
RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty(
Chain_Control *the_chain
)
{
the_chain->first = _Chain_Tail(the_chain);
the_chain->permanent_null = NULL;
4e02c: 42aa 0054 clrl %a2@(84) 4e030: 2548 0058 movel %a0,%a2@(88)
_Thread_queue_Initialize(
4e034: 4878 0006 pea 6 <EXTENDSFDF> 4e038: 206e 000c moveal %fp@(12),%a0 4e03c: 4878 0080 pea 80 <DBL_MANT_DIG+0x4b> 4e040: b090 cmpl %a0@,%d0 4e042: 57c0 seq %d0 4e044: 49c0 extbl %d0 4e046: 4480 negl %d0 4e048: 2f00 movel %d0,%sp@- 4e04a: 2f0a movel %a2,%sp@- 4e04c: 4eb9 0004 fee4 jsr 4fee4 <_Thread_queue_Initialize>
THREAD_QUEUE_DISCIPLINE_PRIORITY : THREAD_QUEUE_DISCIPLINE_FIFO,
STATES_WAITING_FOR_MESSAGE,
CORE_MESSAGE_QUEUE_STATUS_TIMEOUT
);
return true;
4e052: 4fef 0020 lea %sp@(32),%sp 4e056: 7001 moveq #1,%d0 4e058: 6002 bras 4e05c <_CORE_message_queue_Initialize+0xb0>
*/
the_message_queue->message_buffers = (CORE_message_queue_Buffer *)
_Workspace_Allocate( message_buffering_required );
if (the_message_queue->message_buffers == 0)
return false;
4e05a: 4200 clrb %d0
STATES_WAITING_FOR_MESSAGE,
CORE_MESSAGE_QUEUE_STATUS_TIMEOUT
);
return true;
}
4e05c: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 4e062: 4e5e unlk %fp
...
000462c0 <_CORE_mutex_Seize>:
Objects_Id _id,
bool _wait,
Watchdog_Interval _timeout,
ISR_Level _level
)
{
462c0: 4e56 0000 linkw %fp,#0
_CORE_mutex_Seize_body( _the_mutex, _id, _wait, _timeout, _level );
462c4: 2039 0005 d94c movel 5d94c <_Thread_Dispatch_disable_level>,%d0
Objects_Id _id,
bool _wait,
Watchdog_Interval _timeout,
ISR_Level _level
)
{
462ca: 2f0a movel %a2,%sp@- 462cc: 246e 0008 moveal %fp@(8),%a2 462d0: 2f02 movel %d2,%sp@- 462d2: 142e 0013 moveb %fp@(19),%d2
_CORE_mutex_Seize_body( _the_mutex, _id, _wait, _timeout, _level );
462d6: 4a80 tstl %d0
462d8: 671c beqs 462f6 <_CORE_mutex_Seize+0x36>
462da: 4a02 tstb %d2
462dc: 6718 beqs 462f6 <_CORE_mutex_Seize+0x36> <== NEVER TAKEN
462de: 7001 moveq #1,%d0 462e0: b0b9 0005 daba cmpl 5daba <_System_state_Current>,%d0
462e6: 640e bccs 462f6 <_CORE_mutex_Seize+0x36>
462e8: 4878 0012 pea 12 <INVALID_OPERATION+0x2> 462ec: 42a7 clrl %sp@- 462ee: 42a7 clrl %sp@- 462f0: 4eb9 0004 6928 jsr 46928 <_Internal_error_Occurred> 462f6: 486e 0018 pea %fp@(24) 462fa: 2f0a movel %a2,%sp@- 462fc: 4eb9 0004 aa84 jsr 4aa84 <_CORE_mutex_Seize_interrupt_trylock> 46302: 508f addql #8,%sp 46304: 4a80 tstl %d0
46306: 6750 beqs 46358 <_CORE_mutex_Seize+0x98>
46308: 4a02 tstb %d2
4630a: 6614 bnes 46320 <_CORE_mutex_Seize+0x60>
4630c: 202e 0018 movel %fp@(24),%d0 46310: 46c0 movew %d0,%sr 46312: 2079 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a0 46318: 7001 moveq #1,%d0 4631a: 2140 0034 movel %d0,%a0@(52) 4631e: 6038 bras 46358 <_CORE_mutex_Seize+0x98>
RTEMS_INLINE_ROUTINE void _Thread_queue_Enter_critical_section (
Thread_queue_Control *the_thread_queue
)
{
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
46320: 7001 moveq #1,%d0 46322: 2079 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a0 46328: 2540 0030 movel %d0,%a2@(48) 4632c: 2039 0005 d94c movel 5d94c <_Thread_Dispatch_disable_level>,%d0 46332: 5280 addql #1,%d0 46334: 216e 000c 0020 movel %fp@(12),%a0@(32) 4633a: 214a 0044 movel %a2,%a0@(68) 4633e: 23c0 0005 d94c movel %d0,5d94c <_Thread_Dispatch_disable_level> 46344: 202e 0018 movel %fp@(24),%d0 46348: 46c0 movew %d0,%sr 4634a: 2f2e 0014 movel %fp@(20),%sp@- 4634e: 2f0a movel %a2,%sp@- 46350: 4eb9 0004 625c jsr 4625c <_CORE_mutex_Seize_interrupt_blocking> 46356: 508f addql #8,%sp
}
46358: 242e fff8 movel %fp@(-8),%d2 4635c: 246e fffc moveal %fp@(-4),%a2
46360: 4e5e unlk %fp <== NOT EXECUTED
0004649c <_CORE_semaphore_Surrender>:
CORE_semaphore_Status _CORE_semaphore_Surrender(
CORE_semaphore_Control *the_semaphore,
Objects_Id id,
CORE_semaphore_API_mp_support_callout api_semaphore_mp_support
)
{
4649c: 4e56 0000 linkw %fp,#0 464a0: 2f0a movel %a2,%sp@- 464a2: 246e 0008 moveal %fp@(8),%a2
ISR_Level level;
CORE_semaphore_Status status;
status = CORE_SEMAPHORE_STATUS_SUCCESSFUL;
if ( (the_thread = _Thread_queue_Dequeue(&the_semaphore->Wait_queue)) ) {
464a6: 2f0a movel %a2,%sp@- 464a8: 4eb9 0004 79e0 jsr 479e0 <_Thread_queue_Dequeue> 464ae: 588f addql #4,%sp 464b0: 4a80 tstl %d0
464b2: 6624 bnes 464d8 <_CORE_semaphore_Surrender+0x3c>
if ( !_Objects_Is_local_id( the_thread->Object.id ) )
(*api_semaphore_mp_support) ( the_thread, id );
#endif
} else {
_ISR_Disable( level );
464b4: 303c 0700 movew #1792,%d0 464b8: 40c1 movew %sr,%d1 464ba: 8081 orl %d1,%d0 464bc: 46c0 movew %d0,%sr
if ( the_semaphore->count < the_semaphore->Attributes.maximum_count )
464be: 202a 0048 movel %a2@(72),%d0 464c2: b0aa 0040 cmpl %a2@(64),%d0
464c6: 640a bccs 464d2 <_CORE_semaphore_Surrender+0x36> <== NEVER TAKEN
the_semaphore->count += 1;
464c8: 5280 addql #1,%d0 464ca: 2540 0048 movel %d0,%a2@(72)
{
Thread_Control *the_thread;
ISR_Level level;
CORE_semaphore_Status status;
status = CORE_SEMAPHORE_STATUS_SUCCESSFUL;
464ce: 4280 clrl %d0 464d0: 6002 bras 464d4 <_CORE_semaphore_Surrender+0x38>
} else {
_ISR_Disable( level );
if ( the_semaphore->count < the_semaphore->Attributes.maximum_count )
the_semaphore->count += 1;
else
status = CORE_SEMAPHORE_MAXIMUM_COUNT_EXCEEDED;
464d2: 7004 moveq #4,%d0 <== NOT EXECUTED
_ISR_Enable( level );
464d4: 46c1 movew %d1,%sr 464d6: 6002 bras 464da <_CORE_semaphore_Surrender+0x3e>
{
Thread_Control *the_thread;
ISR_Level level;
CORE_semaphore_Status status;
status = CORE_SEMAPHORE_STATUS_SUCCESSFUL;
464d8: 4280 clrl %d0
status = CORE_SEMAPHORE_MAXIMUM_COUNT_EXCEEDED;
_ISR_Enable( level );
}
return status;
}
464da: 246e fffc moveal %fp@(-4),%a2 464de: 4e5e unlk %fp
...
0004521c <_Event_Seize>:
executing = _Thread_Executing;
executing->Wait.return_code = RTEMS_SUCCESSFUL;
api = executing->API_Extensions[ THREAD_API_RTEMS ];
_ISR_Disable( level );
4521c: 203c 0000 0700 movel #1792,%d0
rtems_event_set event_in,
rtems_option option_set,
rtems_interval ticks,
rtems_event_set *event_out
)
{
45222: 4e56 ffec linkw %fp,#-20 45226: 226e 0010 moveal %fp@(16),%a1 4522a: 48d7 0c1c moveml %d2-%d4/%a2-%a3,%sp@
rtems_event_set pending_events;
ISR_Level level;
RTEMS_API_Control *api;
Thread_blocking_operation_States sync_state;
executing = _Thread_Executing;
4522e: 2479 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a2
rtems_event_set event_in,
rtems_option option_set,
rtems_interval ticks,
rtems_event_set *event_out
)
{
45234: 242e 0008 movel %fp@(8),%d2 45238: 262e 000c movel %fp@(12),%d3 4523c: 206e 0014 moveal %fp@(20),%a0
ISR_Level level;
RTEMS_API_Control *api;
Thread_blocking_operation_States sync_state;
executing = _Thread_Executing;
executing->Wait.return_code = RTEMS_SUCCESSFUL;
45240: 42aa 0034 clrl %a2@(52)
api = executing->API_Extensions[ THREAD_API_RTEMS ];
45244: 266a 010a moveal %a2@(266),%a3
_ISR_Disable( level );
45248: 40c1 movew %sr,%d1 4524a: 8081 orl %d1,%d0 4524c: 46c0 movew %d0,%sr
pending_events = api->pending_events;
4524e: 2813 movel %a3@,%d4
RTEMS_INLINE_ROUTINE rtems_event_set _Event_sets_Get(
rtems_event_set the_event_set,
rtems_event_set the_event_condition
)
{
return ( the_event_set & the_event_condition );
45250: 2002 movel %d2,%d0 45252: c084 andl %d4,%d0
seized_events = _Event_sets_Get( pending_events, event_in );
if ( !_Event_sets_Is_empty( seized_events ) &&
45254: 6716 beqs 4526c <_Event_Seize+0x50>
45256: b480 cmpl %d0,%d2
45258: 6706 beqs 45260 <_Event_Seize+0x44>
(seized_events == event_in || _Options_Is_any( option_set )) ) {
4525a: 0803 0001 btst #1,%d3
4525e: 670c beqs 4526c <_Event_Seize+0x50> <== NEVER TAKEN
RTEMS_INLINE_ROUTINE rtems_event_set _Event_sets_Clear(
rtems_event_set the_event_set,
rtems_event_set the_mask
)
{
return ( the_event_set & ~(the_mask) );
45260: 2400 movel %d0,%d2 45262: 4682 notl %d2 45264: c484 andl %d4,%d2 45266: 2682 movel %d2,%a3@
api->pending_events =
_Event_sets_Clear( pending_events, seized_events );
_ISR_Enable( level );
45268: 46c1 movew %d1,%sr 4526a: 600e bras 4527a <_Event_Seize+0x5e>
*event_out = seized_events;
return;
}
if ( _Options_Is_no_wait( option_set ) ) {
4526c: 0803 0000 btst #0,%d3
45270: 670e beqs 45280 <_Event_Seize+0x64>
_ISR_Enable( level );
45272: 46c1 movew %d1,%sr
executing->Wait.return_code = RTEMS_UNSATISFIED;
45274: 720d moveq #13,%d1 45276: 2541 0034 movel %d1,%a2@(52)
*event_out = seized_events;
4527a: 2080 movel %d0,%a0@
return;
4527c: 6000 0096 braw 45314 <_Event_Seize+0xf8>
* * NOTE: Since interrupts are disabled, this isn't that much of an * issue but better safe than sorry. */ executing->Wait.option = (uint32_t) option_set; executing->Wait.count = (uint32_t) event_in;
45280: 2542 0024 movel %d2,%a2@(36)
executing->Wait.return_argument = event_out;
_Event_Sync_state = THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
45284: 7401 moveq #1,%d2
* set properly when we are marked as in the event critical section. * * NOTE: Since interrupts are disabled, this isn't that much of an * issue but better safe than sorry. */ executing->Wait.option = (uint32_t) option_set;
45286: 2543 0030 movel %d3,%a2@(48)
executing->Wait.count = (uint32_t) event_in; executing->Wait.return_argument = event_out;
4528a: 2548 0028 movel %a0,%a2@(40)
_Event_Sync_state = THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
4528e: 23c2 0005 e18a movel %d2,5e18a <_Event_Sync_state>
_ISR_Enable( level );
45294: 46c1 movew %d1,%sr
if ( ticks ) {
45296: 4a89 tstl %a1
45298: 6730 beqs 452ca <_Event_Seize+0xae>
_Watchdog_Initialize(
4529a: 202a 0008 movel %a2@(8),%d0
Objects_Id id,
void *user_data
)
{
the_watchdog->state = WATCHDOG_INACTIVE;
the_watchdog->routine = routine;
4529e: 223c 0004 5478 movel #283768,%d1
Watchdog_Service_routine_entry routine,
Objects_Id id,
void *user_data
)
{
the_watchdog->state = WATCHDOG_INACTIVE;
452a4: 42aa 0050 clrl %a2@(80)
the_watchdog->routine = routine;
452a8: 2541 0064 movel %d1,%a2@(100)
the_watchdog->id = id;
452ac: 2540 0068 movel %d0,%a2@(104)
the_watchdog->user_data = user_data;
452b0: 42aa 006c clrl %a2@(108)
Watchdog_Control *the_watchdog,
Watchdog_Interval units
)
{
the_watchdog->initial = units;
452b4: 2549 0054 movel %a1,%a2@(84)
_Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog );
452b8: 486a 0048 pea %a2@(72) 452bc: 4879 0005 da0e pea 5da0e <_Watchdog_Ticks_chain> 452c2: 4eb9 0004 8614 jsr 48614 <_Watchdog_Insert> 452c8: 508f addql #8,%sp
NULL
);
_Watchdog_Insert_ticks( &executing->Timer, ticks );
}
_Thread_Set_state( executing, STATES_WAITING_FOR_EVENT );
452ca: 4878 0100 pea 100 <DBL_MANT_DIG+0xcb> 452ce: 2f0a movel %a2,%sp@- 452d0: 4eb9 0004 7ed4 jsr 47ed4 <_Thread_Set_state>
_ISR_Disable( level );
452d6: 203c 0000 0700 movel #1792,%d0 452dc: 40c1 movew %sr,%d1 452de: 8081 orl %d1,%d0 452e0: 46c0 movew %d0,%sr
sync_state = _Event_Sync_state;
_Event_Sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED;
if ( sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) {
452e2: 7401 moveq #1,%d2 452e4: 508f addql #8,%sp
_Thread_Set_state( executing, STATES_WAITING_FOR_EVENT );
_ISR_Disable( level );
sync_state = _Event_Sync_state;
452e6: 2039 0005 e18a movel 5e18a <_Event_Sync_state>,%d0
_Event_Sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED;
452ec: 42b9 0005 e18a clrl 5e18a <_Event_Sync_state>
if ( sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) {
452f2: b480 cmpl %d0,%d2
452f4: 6604 bnes 452fa <_Event_Seize+0xde>
_ISR_Enable( level );
452f6: 46c1 movew %d1,%sr 452f8: 601a bras 45314 <_Event_Seize+0xf8>
* An interrupt completed the thread's blocking request. * The blocking thread was satisfied by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ _Thread_blocking_operation_Cancel( sync_state, executing, level );
452fa: 2d4a 000c movel %a2,%fp@(12) 452fe: 2d41 0010 movel %d1,%fp@(16)
}
45302: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3
* An interrupt completed the thread's blocking request. * The blocking thread was satisfied by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ _Thread_blocking_operation_Cancel( sync_state, executing, level );
45308: 2d40 0008 movel %d0,%fp@(8)
}
4530c: 4e5e unlk %fp
* An interrupt completed the thread's blocking request. * The blocking thread was satisfied by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ _Thread_blocking_operation_Cancel( sync_state, executing, level );
4530e: 4ef9 0004 7160 jmp 47160 <_Thread_blocking_operation_Cancel>
}
45314: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3 4531a: 4e5e unlk %fp
...
00045374 <_Event_Surrender>:
api = the_thread->API_Extensions[ THREAD_API_RTEMS ];
option_set = (rtems_option) the_thread->Wait.option;
_ISR_Disable( level );
45374: 203c 0000 0700 movel #1792,%d0
*/
void _Event_Surrender(
Thread_Control *the_thread
)
{
4537a: 4e56 ffe8 linkw %fp,#-24 4537e: 48d7 0c3c moveml %d2-%d5/%a2-%a3,%sp@ 45382: 246e 0008 moveal %fp@(8),%a2
rtems_event_set event_condition;
rtems_event_set seized_events;
rtems_option option_set;
RTEMS_API_Control *api;
api = the_thread->API_Extensions[ THREAD_API_RTEMS ];
45386: 206a 010a moveal %a2@(266),%a0
option_set = (rtems_option) the_thread->Wait.option;
4538a: 282a 0030 movel %a2@(48),%d4
_ISR_Disable( level );
4538e: 40c1 movew %sr,%d1 45390: 8081 orl %d1,%d0 45392: 46c0 movew %d0,%sr
pending_events = api->pending_events; event_condition = (rtems_event_set) the_thread->Wait.count;
45394: 262a 0024 movel %a2@(36),%d3
RTEMS_INLINE_ROUTINE rtems_event_set _Event_sets_Get(
rtems_event_set the_event_set,
rtems_event_set the_event_condition
)
{
return ( the_event_set & the_event_condition );
45398: 2003 movel %d3,%d0
api = the_thread->API_Extensions[ THREAD_API_RTEMS ];
option_set = (rtems_option) the_thread->Wait.option;
_ISR_Disable( level );
pending_events = api->pending_events;
4539a: 2410 movel %a0@,%d2 4539c: c082 andl %d2,%d0
seized_events = _Event_sets_Get( pending_events, event_condition );
/*
* No events were seized in this operation
*/
if ( _Event_sets_Is_empty( seized_events ) ) {
4539e: 6606 bnes 453a6 <_Event_Surrender+0x32>
_ISR_Enable( level );
453a0: 46c1 movew %d1,%sr
return;
453a2: 6000 00ca braw 4546e <_Event_Surrender+0xfa>
/*
* If we are in an ISR and sending to the current thread, then
* we have a critical section issue to deal with.
*/
if ( _ISR_Is_in_progress() &&
453a6: 4ab9 0005 ddd8 tstl 5ddd8 <_Per_CPU_Information+0x8>
453ac: 674a beqs 453f8 <_Event_Surrender+0x84>
453ae: b5f9 0005 dddc cmpal 5dddc <_Per_CPU_Information+0xc>,%a2
453b4: 6642 bnes 453f8 <_Event_Surrender+0x84>
_Thread_Is_executing( the_thread ) &&
((_Event_Sync_state == THREAD_BLOCKING_OPERATION_TIMEOUT) ||
453b6: 2279 0005 e18a moveal 5e18a <_Event_Sync_state>,%a1
/*
* If we are in an ISR and sending to the current thread, then
* we have a critical section issue to deal with.
*/
if ( _ISR_Is_in_progress() &&
_Thread_Is_executing( the_thread ) &&
453bc: 7a02 moveq #2,%d5 453be: ba89 cmpl %a1,%d5
453c0: 670e beqs 453d0 <_Event_Surrender+0x5c> <== NEVER TAKEN
((_Event_Sync_state == THREAD_BLOCKING_OPERATION_TIMEOUT) ||
(_Event_Sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED)) ) {
453c2: 2279 0005 e18a moveal 5e18a <_Event_Sync_state>,%a1
* If we are in an ISR and sending to the current thread, then
* we have a critical section issue to deal with.
*/
if ( _ISR_Is_in_progress() &&
_Thread_Is_executing( the_thread ) &&
((_Event_Sync_state == THREAD_BLOCKING_OPERATION_TIMEOUT) ||
453c8: 1a3c 0001 moveb #1,%d5 453cc: ba89 cmpl %a1,%d5
453ce: 6628 bnes 453f8 <_Event_Surrender+0x84>
(_Event_Sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED)) ) {
if ( seized_events == event_condition || _Options_Is_any(option_set) ) {
453d0: b680 cmpl %d0,%d3
453d2: 6706 beqs 453da <_Event_Surrender+0x66>
453d4: 0804 0001 btst #1,%d4
453d8: 671a beqs 453f4 <_Event_Surrender+0x80> <== NEVER TAKEN
RTEMS_INLINE_ROUTINE rtems_event_set _Event_sets_Clear(
rtems_event_set the_event_set,
rtems_event_set the_mask
)
{
return ( the_event_set & ~(the_mask) );
453da: 2600 movel %d0,%d3 453dc: 4683 notl %d3 453de: c682 andl %d2,%d3 453e0: 2083 movel %d3,%a0@
api->pending_events = _Event_sets_Clear( pending_events,seized_events );
the_thread->Wait.count = 0;
*(rtems_event_set *)the_thread->Wait.return_argument = seized_events;
453e2: 206a 0028 moveal %a2@(40),%a0
_Thread_Is_executing( the_thread ) &&
((_Event_Sync_state == THREAD_BLOCKING_OPERATION_TIMEOUT) ||
(_Event_Sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED)) ) {
if ( seized_events == event_condition || _Options_Is_any(option_set) ) {
api->pending_events = _Event_sets_Clear( pending_events,seized_events );
the_thread->Wait.count = 0;
453e6: 42aa 0024 clrl %a2@(36)
*(rtems_event_set *)the_thread->Wait.return_argument = seized_events;
453ea: 2080 movel %d0,%a0@
_Event_Sync_state = THREAD_BLOCKING_OPERATION_SATISFIED;
453ec: 7003 moveq #3,%d0 453ee: 23c0 0005 e18a movel %d0,5e18a <_Event_Sync_state>
}
_ISR_Enable( level );
453f4: 46c1 movew %d1,%sr
return;
453f6: 6076 bras 4546e <_Event_Surrender+0xfa>
*/
RTEMS_INLINE_ROUTINE bool _States_Is_waiting_for_event (
States_Control the_states
)
{
return (the_states & STATES_WAITING_FOR_EVENT);
453f8: 2a2a 0010 movel %a2@(16),%d5 453fc: 0285 0000 0100 andil #256,%d5
}
/*
* Otherwise, this is a normal send to another thread
*/
if ( _States_Is_waiting_for_event( the_thread->current_state ) ) {
45402: 6768 beqs 4546c <_Event_Surrender+0xf8>
if ( seized_events == event_condition || _Options_Is_any( option_set ) ) {
45404: b680 cmpl %d0,%d3
45406: 6706 beqs 4540e <_Event_Surrender+0x9a>
45408: 0804 0001 btst #1,%d4
4540c: 675e beqs 4546c <_Event_Surrender+0xf8> <== NEVER TAKEN
4540e: 2600 movel %d0,%d3 45410: 4683 notl %d3 45412: c682 andl %d2,%d3 45414: 2083 movel %d3,%a0@
api->pending_events = _Event_sets_Clear( pending_events, seized_events );
the_thread->Wait.count = 0;
*(rtems_event_set *)the_thread->Wait.return_argument = seized_events;
45416: 206a 0028 moveal %a2@(40),%a0
* Otherwise, this is a normal send to another thread
*/
if ( _States_Is_waiting_for_event( the_thread->current_state ) ) {
if ( seized_events == event_condition || _Options_Is_any( option_set ) ) {
api->pending_events = _Event_sets_Clear( pending_events, seized_events );
the_thread->Wait.count = 0;
4541a: 42aa 0024 clrl %a2@(36)
*(rtems_event_set *)the_thread->Wait.return_argument = seized_events;
4541e: 2080 movel %d0,%a0@
_ISR_Flash( level );
45420: 203c 0000 0700 movel #1792,%d0 45426: 46c1 movew %d1,%sr 45428: 8081 orl %d1,%d0 4542a: 46c0 movew %d0,%sr 4542c: 47f9 0004 72f0 lea 472f0 <_Thread_Clear_state>,%a3
if ( !_Watchdog_Is_active( &the_thread->Timer ) ) {
45432: 7a02 moveq #2,%d5 45434: baaa 0050 cmpl %a2@(80),%d5
45438: 6710 beqs 4544a <_Event_Surrender+0xd6>
_ISR_Enable( level );
4543a: 46c1 movew %d1,%sr
RTEMS_INLINE_ROUTINE void _Thread_Unblock (
Thread_Control *the_thread
)
{
_Thread_Clear_state( the_thread, STATES_BLOCKED );
4543c: 2f3c 1003 fff8 movel #268697592,%sp@- 45442: 2f0a movel %a2,%sp@- 45444: 4e93 jsr %a3@ 45446: 508f addql #8,%sp 45448: 6024 bras 4546e <_Event_Surrender+0xfa>
RTEMS_INLINE_ROUTINE void _Watchdog_Deactivate(
Watchdog_Control *the_watchdog
)
{
the_watchdog->state = WATCHDOG_REMOVE_IT;
4544a: 7003 moveq #3,%d0 4544c: 2540 0050 movel %d0,%a2@(80)
_Thread_Unblock( the_thread );
} else {
_Watchdog_Deactivate( &the_thread->Timer );
_ISR_Enable( level );
45450: 46c1 movew %d1,%sr
(void) _Watchdog_Remove( &the_thread->Timer );
45452: 486a 0048 pea %a2@(72) 45456: 4eb9 0004 8730 jsr 48730 <_Watchdog_Remove> 4545c: 2f3c 1003 fff8 movel #268697592,%sp@- 45462: 2f0a movel %a2,%sp@- 45464: 4e93 jsr %a3@ 45466: 4fef 000c lea %sp@(12),%sp 4546a: 6002 bras 4546e <_Event_Surrender+0xfa>
_Thread_Unblock( the_thread );
}
return;
}
}
_ISR_Enable( level );
4546c: 46c1 movew %d1,%sr
}
4546e: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3
45474: 4e5e unlk %fp <== NOT EXECUTED
00045478 <_Event_Timeout>:
void _Event_Timeout(
Objects_Id id,
void *ignored
)
{
45478: 4e56 fffc linkw %fp,#-4 4547c: 2f03 movel %d3,%sp@- 4547e: 2f02 movel %d2,%sp@-
Thread_Control *the_thread;
Objects_Locations location;
ISR_Level level;
the_thread = _Thread_Get( id, &location );
45480: 486e fffc pea %fp@(-4) 45484: 2f2e 0008 movel %fp@(8),%sp@- 45488: 4eb9 0004 76bc jsr 476bc <_Thread_Get>
switch ( location ) {
4548e: 508f addql #8,%sp 45490: 4aae fffc tstl %fp@(-4)
45494: 6656 bnes 454ec <_Event_Timeout+0x74> <== NEVER TAKEN
*
* If it is not satisfied, then it is "nothing happened" and
* this is the "timeout" transition. After a request is satisfied,
* a timeout is not allowed to occur.
*/
_ISR_Disable( level );
45496: 223c 0000 0700 movel #1792,%d1 4549c: 40c2 movew %sr,%d2 4549e: 8282 orl %d2,%d1 454a0: 46c1 movew %d1,%sr
_ISR_Enable( level );
return;
}
#endif
the_thread->Wait.count = 0;
454a2: 2040 moveal %d0,%a0 454a4: 42a8 0024 clrl %a0@(36)
if ( _Thread_Is_executing( the_thread ) ) {
454a8: b0b9 0005 dddc cmpl 5dddc <_Per_CPU_Information+0xc>,%d0
454ae: 6614 bnes 454c4 <_Event_Timeout+0x4c>
if ( _Event_Sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED )
454b0: 2239 0005 e18a movel 5e18a <_Event_Sync_state>,%d1 454b6: 7601 moveq #1,%d3 454b8: b681 cmpl %d1,%d3
454ba: 6608 bnes 454c4 <_Event_Timeout+0x4c>
_Event_Sync_state = THREAD_BLOCKING_OPERATION_TIMEOUT;
454bc: 7202 moveq #2,%d1 454be: 23c1 0005 e18a movel %d1,5e18a <_Event_Sync_state>
}
the_thread->Wait.return_code = RTEMS_TIMEOUT;
454c4: 7606 moveq #6,%d3 454c6: 2040 moveal %d0,%a0 454c8: 2143 0034 movel %d3,%a0@(52)
_ISR_Enable( level );
454cc: 46c2 movew %d2,%sr 454ce: 2f3c 1003 fff8 movel #268697592,%sp@- 454d4: 2f00 movel %d0,%sp@- 454d6: 4eb9 0004 72f0 jsr 472f0 <_Thread_Clear_state>
_Thread_Unblock( the_thread );
_Thread_Unnest_dispatch();
break;
454dc: 508f addql #8,%sp
*/
RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void )
{
RTEMS_COMPILER_MEMORY_BARRIER();
_Thread_Dispatch_disable_level -= 1;
454de: 2039 0005 d94c movel 5d94c <_Thread_Dispatch_disable_level>,%d0 454e4: 5380 subql #1,%d0 454e6: 23c0 0005 d94c movel %d0,5d94c <_Thread_Dispatch_disable_level>
case OBJECTS_REMOTE: /* impossible */
#endif
case OBJECTS_ERROR:
break;
}
}
454ec: 242e fff4 movel %fp@(-12),%d2 454f0: 262e fff8 movel %fp@(-8),%d3
454f4: 4e5e unlk %fp <== NOT EXECUTED
0004abe8 <_Heap_Allocate_aligned_with_boundary>:
Heap_Control *heap,
uintptr_t alloc_size,
uintptr_t alignment,
uintptr_t boundary
)
{
4abe8: 4e56 ffbc linkw %fp,#-68 4abec: 202e 000c movel %fp@(12),%d0 4abf0: 48d7 3cfc moveml %d2-%d7/%a2-%a5,%sp@ 4abf4: 246e 0008 moveal %fp@(8),%a2
Heap_Statistics *const stats = &heap->stats; Heap_Block *const free_list_tail = _Heap_Free_list_tail( heap ); Heap_Block *block = _Heap_Free_list_first( heap ); uintptr_t const block_size_floor = alloc_size + HEAP_BLOCK_HEADER_SIZE
4abf8: 2e00 movel %d0,%d7 4abfa: 5887 addql #4,%d7
Heap_Control *heap,
uintptr_t alloc_size,
uintptr_t alignment,
uintptr_t boundary
)
{
4abfc: 222e 0010 movel %fp@(16),%d1 4ac00: 2a2e 0014 movel %fp@(20),%d5
if ( stats->max_search < search_count ) {
stats->max_search = search_count;
}
return (void *) alloc_begin;
}
4ac04: 206a 0008 moveal %a2@(8),%a0
Heap_Statistics *const stats = &heap->stats;
Heap_Block *const free_list_tail = _Heap_Free_list_tail( heap );
Heap_Block *block = _Heap_Free_list_first( heap );
uintptr_t const block_size_floor = alloc_size + HEAP_BLOCK_HEADER_SIZE
- HEAP_BLOCK_SIZE_OFFSET;
uintptr_t const page_size = heap->page_size;
4ac08: 2c2a 0010 movel %a2@(16),%d6
uintptr_t alloc_begin = 0;
uint32_t search_count = 0;
if ( block_size_floor < alloc_size ) {
4ac0c: b087 cmpl %d7,%d0 4ac0e: 6200 013e bhiw 4ad4e <_Heap_Allocate_aligned_with_boundary+0x166>
/* Integer overflow occured */
return NULL;
}
if ( boundary != 0 ) {
4ac12: 4a85 tstl %d5
4ac14: 670c beqs 4ac22 <_Heap_Allocate_aligned_with_boundary+0x3a>
if ( boundary < alloc_size ) {
4ac16: b085 cmpl %d5,%d0 4ac18: 6200 0134 bhiw 4ad4e <_Heap_Allocate_aligned_with_boundary+0x166>
return NULL;
}
if ( alignment == 0 ) {
4ac1c: 4a81 tstl %d1
4ac1e: 6602 bnes 4ac22 <_Heap_Allocate_aligned_with_boundary+0x3a>
alignment = page_size;
4ac20: 2206 movel %d6,%d1
uintptr_t const block_begin = (uintptr_t) block;
uintptr_t const block_size = _Heap_Block_size( block );
uintptr_t const block_end = block_begin + block_size;
uintptr_t const alloc_begin_floor = _Heap_Alloc_area_of_block( block );
uintptr_t const alloc_begin_ceiling = block_end - min_block_size
4ac22: 2406 movel %d6,%d2
+ HEAP_BLOCK_HEADER_SIZE + page_size - 1;
uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET;
4ac24: 7804 moveq #4,%d4
uintptr_t const block_begin = (uintptr_t) block;
uintptr_t const block_size = _Heap_Block_size( block );
uintptr_t const block_end = block_begin + block_size;
uintptr_t const alloc_begin_floor = _Heap_Alloc_area_of_block( block );
uintptr_t const alloc_begin_ceiling = block_end - min_block_size
4ac26: 5e82 addql #7,%d2
+ HEAP_BLOCK_HEADER_SIZE + page_size - 1;
uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET;
4ac28: 9880 subl %d0,%d4
if ( boundary < alloc_size ) {
return NULL;
}
if ( alignment == 0 ) {
alignment = page_size;
4ac2a: 4283 clrl %d3
uintptr_t const block_begin = (uintptr_t) block;
uintptr_t const block_size = _Heap_Block_size( block );
uintptr_t const block_end = block_begin + block_size;
uintptr_t const alloc_begin_floor = _Heap_Alloc_area_of_block( block );
uintptr_t const alloc_begin_ceiling = block_end - min_block_size
4ac2c: 2d42 fff8 movel %d2,%fp@(-8)
+ HEAP_BLOCK_HEADER_SIZE + page_size - 1;
uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET;
4ac30: 2d44 fff4 movel %d4,%fp@(-12) 4ac34: 2d47 ffe4 movel %d7,%fp@(-28) 4ac38: 2d46 ffec movel %d6,%fp@(-20) 4ac3c: 6000 00fa braw 4ad38 <_Heap_Allocate_aligned_with_boundary+0x150>
/*
* The HEAP_PREV_BLOCK_USED flag is always set in the block size_and_flag
* field. Thus the value is about one unit larger than the real block
* size. The greater than operator takes this into account.
*/
if ( block->size_and_flag > block_size_floor ) {
4ac40: 2428 0004 movel %a0@(4),%d2
while ( block != free_list_tail ) {
_HAssert( _Heap_Is_prev_used( block ) );
/* Statistics */
++search_count;
4ac44: 5283 addql #1,%d3
/*
* The HEAP_PREV_BLOCK_USED flag is always set in the block size_and_flag
* field. Thus the value is about one unit larger than the real block
* size. The greater than operator takes this into account.
*/
if ( block->size_and_flag > block_size_floor ) {
4ac46: b4ae ffe4 cmpl %fp@(-28),%d2 4ac4a: 6300 00e8 blsw 4ad34 <_Heap_Allocate_aligned_with_boundary+0x14c> 4ac4e: 43e8 0008 lea %a0@(8),%a1
if ( alignment == 0 ) {
4ac52: 4a81 tstl %d1
4ac54: 6606 bnes 4ac5c <_Heap_Allocate_aligned_with_boundary+0x74>
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Alloc_area_of_block(
const Heap_Block *block
)
{
return (uintptr_t) block + HEAP_BLOCK_HEADER_SIZE;
4ac56: 2409 movel %a1,%d2 4ac58: 6000 00b6 braw 4ad10 <_Heap_Allocate_aligned_with_boundary+0x128>
- HEAP_BLOCK_HEADER_SIZE);
}
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Block_size( const Heap_Block *block )
{
return block->size_and_flag & ~HEAP_PREV_BLOCK_USED;
4ac5c: 7cfe moveq #-2,%d6
uintptr_t alignment,
uintptr_t boundary
)
{
uintptr_t const page_size = heap->page_size;
uintptr_t const min_block_size = heap->min_block_size;
4ac5e: 266a 0014 moveal %a2@(20),%a3 4ac62: c486 andl %d6,%d2
uintptr_t const block_size = _Heap_Block_size( block );
uintptr_t const block_end = block_begin + block_size;
uintptr_t const alloc_begin_floor = _Heap_Alloc_area_of_block( block );
uintptr_t const alloc_begin_ceiling = block_end - min_block_size
+ HEAP_BLOCK_HEADER_SIZE + page_size - 1;
4ac64: 282e fff8 movel %fp@(-8),%d4 4ac68: 988b subl %a3,%d4
uintptr_t const page_size = heap->page_size;
uintptr_t const min_block_size = heap->min_block_size;
uintptr_t const block_begin = (uintptr_t) block;
uintptr_t const block_size = _Heap_Block_size( block );
uintptr_t const block_end = block_begin + block_size;
4ac6a: d488 addl %a0,%d2
uintptr_t const alloc_begin_floor = _Heap_Alloc_area_of_block( block );
uintptr_t const alloc_begin_ceiling = block_end - min_block_size
4ac6c: 2c04 movel %d4,%d6 4ac6e: dc82 addl %d2,%d6
+ HEAP_BLOCK_HEADER_SIZE + page_size - 1;
uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET;
uintptr_t alloc_begin = alloc_end - alloc_size;
4ac70: d4ae fff4 addl %fp@(-12),%d2 4ac74: 2d42 fffc movel %d2,%fp@(-4)
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_down(
uintptr_t value,
uintptr_t alignment
)
{
return value - (value % alignment);
4ac78: 4c41 2007 remul %d1,%d7,%d2 4ac7c: 242e fffc movel %fp@(-4),%d2 4ac80: 9487 subl %d7,%d2
alloc_begin = _Heap_Align_down( alloc_begin, alignment );
/* Ensure that the we have a valid new block at the end */
if ( alloc_begin > alloc_begin_ceiling ) {
4ac82: bc82 cmpl %d2,%d6
4ac84: 640a bccs 4ac90 <_Heap_Allocate_aligned_with_boundary+0xa8>
4ac86: 2806 movel %d6,%d4 4ac88: 4c41 4002 remul %d1,%d2,%d4 4ac8c: 9c82 subl %d2,%d6 4ac8e: 2406 movel %d6,%d2
}
alloc_end = alloc_begin + alloc_size;
/* Ensure boundary constaint */
if ( boundary != 0 ) {
4ac90: 4a85 tstl %d5
4ac92: 675c beqs 4acf0 <_Heap_Allocate_aligned_with_boundary+0x108>
/* Ensure that the we have a valid new block at the end */
if ( alloc_begin > alloc_begin_ceiling ) {
alloc_begin = _Heap_Align_down( alloc_begin_ceiling, alignment );
}
alloc_end = alloc_begin + alloc_size;
4ac94: 2c02 movel %d2,%d6 4ac96: dc80 addl %d0,%d6
/* Ensure boundary constaint */
if ( boundary != 0 ) {
uintptr_t const boundary_floor = alloc_begin_floor + alloc_size;
4ac98: 49f1 0800 lea %a1@(00000000,%d0:l),%a4
/* Ensure that the we have a valid new block at the end */
if ( alloc_begin > alloc_begin_ceiling ) {
alloc_begin = _Heap_Align_down( alloc_begin_ceiling, alignment );
}
alloc_end = alloc_begin + alloc_size;
4ac9c: 2d46 fff0 movel %d6,%fp@(-16) 4aca0: 2a6e fff0 moveal %fp@(-16),%a5 4aca4: 4c45 6004 remul %d5,%d4,%d6
/* Ensure boundary constaint */
if ( boundary != 0 ) {
uintptr_t const boundary_floor = alloc_begin_floor + alloc_size;
4aca8: 2d4c fffc movel %a4,%fp@(-4) 4acac: 2e2e ffe4 movel %fp@(-28),%d7 4acb0: 9bc4 subal %d4,%a5 4acb2: 284d moveal %a5,%a4 4acb4: 2d43 ffe8 movel %d3,%fp@(-24) 4acb8: 282e fff0 movel %fp@(-16),%d4 4acbc: 6022 bras 4ace0 <_Heap_Allocate_aligned_with_boundary+0xf8>
uintptr_t boundary_line = _Heap_Align_down( alloc_end, boundary );
while ( alloc_begin < boundary_line && boundary_line < alloc_end ) {
if ( boundary_line < boundary_floor ) {
4acbe: b9ee fffc cmpal %fp@(-4),%a4
4acc2: 6568 bcss 4ad2c <_Heap_Allocate_aligned_with_boundary+0x144>
return 0;
}
alloc_begin = boundary_line - alloc_size;
4acc4: 240c movel %a4,%d2 4acc6: 9480 subl %d0,%d2 4acc8: 2802 movel %d2,%d4 4acca: 4c41 4003 remul %d1,%d3,%d4 4acce: 9483 subl %d3,%d2
alloc_begin = _Heap_Align_down( alloc_begin, alignment );
alloc_end = alloc_begin + alloc_size;
4acd0: 2802 movel %d2,%d4 4acd2: d880 addl %d0,%d4 4acd4: 2c04 movel %d4,%d6 4acd6: 2a44 moveal %d4,%a5 4acd8: 4c45 6003 remul %d5,%d3,%d6 4acdc: 9bc3 subal %d3,%a5 4acde: 284d moveal %a5,%a4
/* Ensure boundary constaint */
if ( boundary != 0 ) {
uintptr_t const boundary_floor = alloc_begin_floor + alloc_size;
uintptr_t boundary_line = _Heap_Align_down( alloc_end, boundary );
while ( alloc_begin < boundary_line && boundary_line < alloc_end ) {
4ace0: b9c2 cmpal %d2,%a4
4ace2: 6304 blss 4ace8 <_Heap_Allocate_aligned_with_boundary+0x100>
4ace4: b88c cmpl %a4,%d4
4ace6: 62d6 bhis 4acbe <_Heap_Allocate_aligned_with_boundary+0xd6>
4ace8: 262e ffe8 movel %fp@(-24),%d3 4acec: 2d47 ffe4 movel %d7,%fp@(-28)
boundary_line = _Heap_Align_down( alloc_end, boundary );
}
}
/* Ensure that the we have a valid new block at the beginning */
if ( alloc_begin >= alloc_begin_floor ) {
4acf0: b3c2 cmpal %d2,%a1
4acf2: 6240 bhis 4ad34 <_Heap_Allocate_aligned_with_boundary+0x14c>
4acf4: 2c2e ffec movel %fp@(-20),%d6 4acf8: 2802 movel %d2,%d4 4acfa: 327c fff8 moveaw #-8,%a1 4acfe: 93c8 subal %a0,%a1
uintptr_t alloc_begin,
uintptr_t page_size
)
{
return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size )
- HEAP_BLOCK_HEADER_SIZE);
4ad00: d3c2 addal %d2,%a1
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_down(
uintptr_t value,
uintptr_t alignment
)
{
return value - (value % alignment);
4ad02: 4c46 4007 remul %d6,%d7,%d4
uintptr_t const alloc_block_begin =
(uintptr_t) _Heap_Block_of_alloc_area( alloc_begin, page_size );
uintptr_t const free_size = alloc_block_begin - block_begin;
4ad06: 93c7 subal %d7,%a1
if ( free_size >= min_block_size || free_size == 0 ) {
4ad08: b7c9 cmpal %a1,%a3
4ad0a: 6304 blss 4ad10 <_Heap_Allocate_aligned_with_boundary+0x128>
4ad0c: 4a89 tstl %a1
4ad0e: 6624 bnes 4ad34 <_Heap_Allocate_aligned_with_boundary+0x14c>
boundary
);
}
}
if ( alloc_begin != 0 ) {
4ad10: 4a82 tstl %d2
4ad12: 6720 beqs 4ad34 <_Heap_Allocate_aligned_with_boundary+0x14c><== NEVER TAKEN
block = block->next;
}
if ( alloc_begin != 0 ) {
/* Statistics */
stats->searches += search_count;
4ad14: d7aa 004c addl %d3,%a2@(76)
block = _Heap_Block_allocate( heap, block, alloc_begin, alloc_size );
4ad18: 2f00 movel %d0,%sp@- 4ad1a: 2f02 movel %d2,%sp@- 4ad1c: 2f08 movel %a0,%sp@- 4ad1e: 2f0a movel %a2,%sp@- 4ad20: 4eb9 0004 6834 jsr 46834 <_Heap_Block_allocate> 4ad26: 4fef 0010 lea %sp@(16),%sp 4ad2a: 6014 bras 4ad40 <_Heap_Allocate_aligned_with_boundary+0x158> 4ad2c: 262e ffe8 movel %fp@(-24),%d3 4ad30: 2d47 ffe4 movel %d7,%fp@(-28)
if ( alloc_begin != 0 ) {
break;
}
block = block->next;
4ad34: 2068 0008 moveal %a0@(8),%a0
if ( alignment == 0 ) {
alignment = page_size;
}
}
while ( block != free_list_tail ) {
4ad38: b5c8 cmpal %a0,%a2 4ad3a: 6600 ff04 bnew 4ac40 <_Heap_Allocate_aligned_with_boundary+0x58> 4ad3e: 4282 clrl %d2
boundary
);
}
/* Statistics */
if ( stats->max_search < search_count ) {
4ad40: b6aa 0044 cmpl %a2@(68),%d3
4ad44: 6304 blss 4ad4a <_Heap_Allocate_aligned_with_boundary+0x162>
stats->max_search = search_count;
4ad46: 2543 0044 movel %d3,%a2@(68)
}
return (void *) alloc_begin;
4ad4a: 2002 movel %d2,%d0 4ad4c: 6002 bras 4ad50 <_Heap_Allocate_aligned_with_boundary+0x168>
return NULL;
}
if ( boundary != 0 ) {
if ( boundary < alloc_size ) {
return NULL;
4ad4e: 4280 clrl %d0
if ( stats->max_search < search_count ) {
stats->max_search = search_count;
}
return (void *) alloc_begin;
}
4ad50: 4cee 3cfc ffbc moveml %fp@(-68),%d2-%d7/%a2-%a5 4ad56: 4e5e unlk %fp
...
0004b040 <_Heap_Extend>:
Heap_Control *heap,
void *extend_area_begin_ptr,
uintptr_t extend_area_size,
uintptr_t *extended_size_ptr
)
{
4b040: 4e56 ffcc linkw %fp,#-52 4b044: 202e 0010 movel %fp@(16),%d0 4b048: 48d7 3cfc moveml %d2-%d7/%a2-%a5,%sp@ 4b04c: 246e 0008 moveal %fp@(8),%a2 4b050: 262e 000c movel %fp@(12),%d3
Heap_Block *extend_first_block = NULL; Heap_Block *extend_last_block = NULL; uintptr_t const page_size = heap->page_size; uintptr_t const min_block_size = heap->min_block_size; uintptr_t const extend_area_begin = (uintptr_t) extend_area_begin_ptr; uintptr_t const extend_area_end = extend_area_begin + extend_area_size;
4b054: 2403 movel %d3,%d2 4b056: d480 addl %d0,%d2
uintptr_t const free_size = stats->free_size;
4b058: 206a 0030 moveal %a2@(48),%a0
uintptr_t extend_area_size,
uintptr_t *extended_size_ptr
)
{
Heap_Statistics *const stats = &heap->stats;
Heap_Block *const first_block = heap->first_block;
4b05c: 282a 0020 movel %a2@(32),%d4
Heap_Block *merge_above_block = NULL; Heap_Block *link_below_block = NULL; Heap_Block *link_above_block = NULL; Heap_Block *extend_first_block = NULL; Heap_Block *extend_last_block = NULL; uintptr_t const page_size = heap->page_size;
4b060: 2a2a 0010 movel %a2@(16),%d5
uintptr_t const min_block_size = heap->min_block_size;
4b064: 222a 0014 movel %a2@(20),%d1
Heap_Block *start_block = first_block; Heap_Block *merge_below_block = NULL; Heap_Block *merge_above_block = NULL; Heap_Block *link_below_block = NULL; Heap_Block *link_above_block = NULL; Heap_Block *extend_first_block = NULL;
4b068: 42ae fffc clrl %fp@(-4)
Heap_Block *extend_last_block = NULL;
4b06c: 42ae fff8 clrl %fp@(-8)
uintptr_t const page_size = heap->page_size; uintptr_t const min_block_size = heap->min_block_size; uintptr_t const extend_area_begin = (uintptr_t) extend_area_begin_ptr; uintptr_t const extend_area_end = extend_area_begin + extend_area_size; uintptr_t const free_size = stats->free_size;
4b070: 2d48 fff4 movel %a0,%fp@(-12)
uintptr_t extend_first_block_size = 0;
uintptr_t extended_size = 0;
bool extend_area_ok = false;
if ( extend_area_end < extend_area_begin ) {
4b074: b682 cmpl %d2,%d3 4b076: 6200 01aa bhiw 4b222 <_Heap_Extend+0x1e2>
return false;
}
extend_area_ok = _Heap_Get_first_and_last_block(
4b07a: 486e fff8 pea %fp@(-8) 4b07e: 486e fffc pea %fp@(-4) 4b082: 2f01 movel %d1,%sp@- 4b084: 2f05 movel %d5,%sp@- 4b086: 2f00 movel %d0,%sp@- 4b088: 2f03 movel %d3,%sp@- 4b08a: 4eb9 0004 68f4 jsr 468f4 <_Heap_Get_first_and_last_block>
page_size,
min_block_size,
&extend_first_block,
&extend_last_block
);
if (!extend_area_ok ) {
4b090: 4fef 0018 lea %sp@(24),%sp 4b094: 4a00 tstb %d0 4b096: 6700 018a beqw 4b222 <_Heap_Extend+0x1e2> 4b09a: 2044 moveal %d4,%a0 4b09c: 9bcd subal %a5,%a5 4b09e: 4281 clrl %d1 4b0a0: 97cb subal %a3,%a3 4b0a2: 99cc subal %a4,%a4
return false;
}
do {
uintptr_t const sub_area_begin = (start_block != first_block) ?
(uintptr_t) start_block : heap->area_begin;
4b0a4: b888 cmpl %a0,%d4
4b0a6: 6704 beqs 4b0ac <_Heap_Extend+0x6c>
4b0a8: 2248 moveal %a0,%a1 4b0aa: 6004 bras 4b0b0 <_Heap_Extend+0x70> 4b0ac: 226a 0018 moveal %a2@(24),%a1
uintptr_t const sub_area_end = start_block->prev_size;
4b0b0: 2010 movel %a0@,%d0
Heap_Block *const end_block =
_Heap_Block_of_alloc_area( sub_area_end, page_size );
if (
4b0b2: b680 cmpl %d0,%d3
4b0b4: 6406 bccs 4b0bc <_Heap_Extend+0x7c>
sub_area_end > extend_area_begin && extend_area_end > sub_area_begin
4b0b6: b3c2 cmpal %d2,%a1 4b0b8: 6500 0168 bcsw 4b222 <_Heap_Extend+0x1e2>
) {
return false;
}
if ( extend_area_end == sub_area_begin ) {
4b0bc: b3c2 cmpal %d2,%a1
4b0be: 6706 beqs 4b0c6 <_Heap_Extend+0x86>
merge_below_block = start_block;
} else if ( extend_area_end < sub_area_end ) {
4b0c0: b082 cmpl %d2,%d0
4b0c2: 6206 bhis 4b0ca <_Heap_Extend+0x8a>
4b0c4: 6006 bras 4b0cc <_Heap_Extend+0x8c>
sub_area_end > extend_area_begin && extend_area_end > sub_area_begin
) {
return false;
}
if ( extend_area_end == sub_area_begin ) {
4b0c6: 2848 moveal %a0,%a4 4b0c8: 6002 bras 4b0cc <_Heap_Extend+0x8c>
merge_below_block = start_block;
} else if ( extend_area_end < sub_area_end ) {
4b0ca: 2208 movel %a0,%d1 4b0cc: 2e00 movel %d0,%d7 4b0ce: 2240 moveal %d0,%a1 4b0d0: 5189 subql #8,%a1 4b0d2: 4c45 7006 remul %d5,%d6,%d7
uintptr_t alloc_begin,
uintptr_t page_size
)
{
return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size )
- HEAP_BLOCK_HEADER_SIZE);
4b0d6: 93c6 subal %d6,%a1
link_below_block = start_block;
}
if ( sub_area_end == extend_area_begin ) {
4b0d8: b680 cmpl %d0,%d3
4b0da: 6606 bnes 4b0e2 <_Heap_Extend+0xa2>
start_block->prev_size = extend_area_end;
4b0dc: 2082 movel %d2,%a0@
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_of_alloc_area(
uintptr_t alloc_begin,
uintptr_t page_size
)
{
return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size )
4b0de: 2649 moveal %a1,%a3 4b0e0: 6006 bras 4b0e8 <_Heap_Extend+0xa8>
merge_above_block = end_block;
} else if ( sub_area_end < extend_area_begin ) {
4b0e2: b680 cmpl %d0,%d3
4b0e4: 6302 blss 4b0e8 <_Heap_Extend+0xa8>
4b0e6: 2a49 moveal %a1,%a5
- HEAP_BLOCK_HEADER_SIZE);
}
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Block_size( const Heap_Block *block )
{
return block->size_and_flag & ~HEAP_PREV_BLOCK_USED;
4b0e8: 70fe moveq #-2,%d0 4b0ea: c0a9 0004 andl %a1@(4),%d0
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
4b0ee: 41f1 0800 lea %a1@(00000000,%d0:l),%a0
link_above_block = end_block;
}
start_block = _Heap_Block_at( end_block, _Heap_Block_size( end_block ) );
} while ( start_block != first_block );
4b0f2: b888 cmpl %a0,%d4
4b0f4: 66ae bnes 4b0a4 <_Heap_Extend+0x64>
if ( extend_area_begin < heap->area_begin ) {
4b0f6: b6aa 0018 cmpl %a2@(24),%d3
4b0fa: 6406 bccs 4b102 <_Heap_Extend+0xc2>
heap->area_begin = extend_area_begin;
4b0fc: 2543 0018 movel %d3,%a2@(24) 4b100: 600a bras 4b10c <_Heap_Extend+0xcc>
} else if ( heap->area_end < extend_area_end ) {
4b102: b4aa 001c cmpl %a2@(28),%d2
4b106: 6304 blss 4b10c <_Heap_Extend+0xcc>
heap->area_end = extend_area_end;
4b108: 2542 001c movel %d2,%a2@(28)
}
extend_first_block_size =
(uintptr_t) extend_last_block - (uintptr_t) extend_first_block;
4b10c: 206e fff8 moveal %fp@(-8),%a0
heap->area_begin = extend_area_begin;
} else if ( heap->area_end < extend_area_end ) {
heap->area_end = extend_area_end;
}
extend_first_block_size =
4b110: 2008 movel %a0,%d0
(uintptr_t) extend_last_block - (uintptr_t) extend_first_block;
extend_first_block->prev_size = extend_area_end;
extend_first_block->size_and_flag =
extend_first_block_size | HEAP_PREV_BLOCK_USED;
4b112: 7801 moveq #1,%d4
} else if ( heap->area_end < extend_area_end ) {
heap->area_end = extend_area_end;
}
extend_first_block_size =
(uintptr_t) extend_last_block - (uintptr_t) extend_first_block;
4b114: 226e fffc moveal %fp@(-4),%a1
heap->area_begin = extend_area_begin;
} else if ( heap->area_end < extend_area_end ) {
heap->area_end = extend_area_end;
}
extend_first_block_size =
4b118: 9089 subl %a1,%d0
(uintptr_t) extend_last_block - (uintptr_t) extend_first_block;
extend_first_block->prev_size = extend_area_end;
extend_first_block->size_and_flag =
extend_first_block_size | HEAP_PREV_BLOCK_USED;
4b11a: 8880 orl %d0,%d4
}
extend_first_block_size =
(uintptr_t) extend_last_block - (uintptr_t) extend_first_block;
extend_first_block->prev_size = extend_area_end;
4b11c: 2282 movel %d2,%a1@
extend_first_block->size_and_flag =
extend_first_block_size | HEAP_PREV_BLOCK_USED;
4b11e: 2344 0004 movel %d4,%a1@(4)
extend_last_block->prev_size = extend_first_block_size;
4b122: 2080 movel %d0,%a0@
extend_last_block->size_and_flag = 0;
4b124: 42a8 0004 clrl %a0@(4)
if ( (uintptr_t) extend_first_block < (uintptr_t) heap->first_block ) {
4b128: b3ea 0020 cmpal %a2@(32),%a1
4b12c: 6406 bccs 4b134 <_Heap_Extend+0xf4>
heap->first_block = extend_first_block;
4b12e: 2549 0020 movel %a1,%a2@(32) 4b132: 600a bras 4b13e <_Heap_Extend+0xfe>
} else if ( (uintptr_t) extend_last_block > (uintptr_t) heap->last_block ) {
4b134: b1ea 0024 cmpal %a2@(36),%a0
4b138: 6304 blss 4b13e <_Heap_Extend+0xfe>
heap->last_block = extend_last_block;
4b13a: 2548 0024 movel %a0,%a2@(36)
}
if ( merge_below_block != NULL ) {
4b13e: 4a8c tstl %a4
4b140: 6732 beqs 4b174 <_Heap_Extend+0x134>
Heap_Control *heap,
uintptr_t extend_area_begin,
Heap_Block *first_block
)
{
uintptr_t const page_size = heap->page_size;
4b142: 202a 0010 movel %a2@(16),%d0
uintptr_t const new_first_block_alloc_begin =
_Heap_Align_up( extend_area_begin + HEAP_BLOCK_HEADER_SIZE, page_size );
4b146: 5083 addql #8,%d3
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_up(
uintptr_t value,
uintptr_t alignment
)
{
uintptr_t remainder = value % alignment;
4b148: 2803 movel %d3,%d4 4b14a: 4c40 4001 remul %d0,%d1,%d4
if ( remainder != 0 ) {
4b14e: 4a81 tstl %d1
4b150: 6704 beqs 4b156 <_Heap_Extend+0x116> <== ALWAYS TAKEN
return value - remainder + alignment;
4b152: d680 addl %d0,%d3 <== NOT EXECUTED 4b154: 9681 subl %d1,%d3 <== NOT EXECUTED
uintptr_t const new_first_block_begin =
4b156: 2043 moveal %d3,%a0 4b158: 5188 subql #8,%a0
new_first_block_alloc_begin - HEAP_BLOCK_HEADER_SIZE;
uintptr_t const first_block_begin = (uintptr_t) first_block;
uintptr_t const new_first_block_size =
4b15a: 200c movel %a4,%d0 4b15c: 9088 subl %a0,%d0
first_block_begin - new_first_block_begin;
Heap_Block *const new_first_block = (Heap_Block *) new_first_block_begin;
new_first_block->prev_size = first_block->prev_size;
new_first_block->size_and_flag = new_first_block_size | HEAP_PREV_BLOCK_USED;
4b15e: 7201 moveq #1,%d1 4b160: 8280 orl %d0,%d1
uintptr_t const first_block_begin = (uintptr_t) first_block;
uintptr_t const new_first_block_size =
first_block_begin - new_first_block_begin;
Heap_Block *const new_first_block = (Heap_Block *) new_first_block_begin;
new_first_block->prev_size = first_block->prev_size;
4b162: 2094 movel %a4@,%a0@
new_first_block->size_and_flag = new_first_block_size | HEAP_PREV_BLOCK_USED;
4b164: 2141 0004 movel %d1,%a0@(4)
_Heap_Free_block( heap, new_first_block );
4b168: 2f08 movel %a0,%sp@- 4b16a: 2f0a movel %a2,%sp@- 4b16c: 4eba feb6 jsr %pc@(4b024 <_Heap_Free_block>) 4b170: 508f addql #8,%sp 4b172: 6012 bras 4b186 <_Heap_Extend+0x146>
heap->last_block = extend_last_block;
}
if ( merge_below_block != NULL ) {
_Heap_Merge_below( heap, extend_area_begin, merge_below_block );
} else if ( link_below_block != NULL ) {
4b174: 4a81 tstl %d1
4b176: 670e beqs 4b186 <_Heap_Extend+0x146>
_Heap_Link_below(
4b178: 206e fff8 moveal %fp@(-8),%a0
{
uintptr_t const last_block_begin = (uintptr_t) last_block;
uintptr_t const link_begin = (uintptr_t) link;
last_block->size_and_flag =
(link_begin - last_block_begin) | HEAP_PREV_BLOCK_USED;
4b17c: 7801 moveq #1,%d4 4b17e: 9288 subl %a0,%d1 4b180: 8881 orl %d1,%d4 4b182: 2144 0004 movel %d4,%a0@(4)
link_below_block,
extend_last_block
);
}
if ( merge_above_block != NULL ) {
4b186: 4a8b tstl %a3
4b188: 6734 beqs 4b1be <_Heap_Extend+0x17e>
)
{
uintptr_t const page_size = heap->page_size;
uintptr_t const last_block_begin = (uintptr_t) last_block;
uintptr_t const last_block_new_size = _Heap_Align_down(
extend_area_end - last_block_begin - HEAP_BLOCK_HEADER_SIZE,
4b18a: 5182 subql #8,%d2
uintptr_t extend_area_end
)
{
uintptr_t const page_size = heap->page_size;
uintptr_t const last_block_begin = (uintptr_t) last_block;
uintptr_t const last_block_new_size = _Heap_Align_down(
4b18c: 948b subl %a3,%d2
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_down(
uintptr_t value,
uintptr_t alignment
)
{
return value - (value % alignment);
4b18e: 2202 movel %d2,%d1 4b190: 4c6a 1000 0010 remul %a2@(16),%d0,%d1
Heap_Block *const new_last_block =
_Heap_Block_at( last_block, last_block_new_size );
new_last_block->size_and_flag =
(last_block->size_and_flag - last_block_new_size)
| HEAP_PREV_BLOCK_USED;
4b196: 7201 moveq #1,%d1 4b198: 9480 subl %d0,%d2
);
Heap_Block *const new_last_block =
_Heap_Block_at( last_block, last_block_new_size );
new_last_block->size_and_flag =
(last_block->size_and_flag - last_block_new_size)
4b19a: 202b 0004 movel %a3@(4),%d0 4b19e: 9082 subl %d2,%d0
| HEAP_PREV_BLOCK_USED;
4b1a0: 8280 orl %d0,%d1
RTEMS_INLINE_ROUTINE void _Heap_Block_set_size(
Heap_Block *block,
uintptr_t size
)
{
uintptr_t flag = block->size_and_flag & HEAP_PREV_BLOCK_USED;
4b1a2: 7001 moveq #1,%d0 4b1a4: 2781 2804 movel %d1,%a3@(00000004,%d2:l) 4b1a8: c0ab 0004 andl %a3@(4),%d0
block->size_and_flag = size | flag;
4b1ac: 8480 orl %d0,%d2 4b1ae: 2742 0004 movel %d2,%a3@(4)
_Heap_Block_set_size( last_block, last_block_new_size );
_Heap_Free_block( heap, last_block );
4b1b2: 2f0b movel %a3,%sp@- 4b1b4: 2f0a movel %a2,%sp@- 4b1b6: 4eba fe6c jsr %pc@(4b024 <_Heap_Free_block>) 4b1ba: 508f addql #8,%sp 4b1bc: 6020 bras 4b1de <_Heap_Extend+0x19e>
);
}
if ( merge_above_block != NULL ) {
_Heap_Merge_above( heap, merge_above_block, extend_area_end );
} else if ( link_above_block != NULL ) {
4b1be: 4a8d tstl %a5
4b1c0: 671c beqs 4b1de <_Heap_Extend+0x19e>
RTEMS_INLINE_ROUTINE void _Heap_Block_set_size(
Heap_Block *block,
uintptr_t size
)
{
uintptr_t flag = block->size_and_flag & HEAP_PREV_BLOCK_USED;
4b1c2: 7001 moveq #1,%d0
uintptr_t const link_begin = (uintptr_t) link;
uintptr_t const first_block_begin = (uintptr_t) first_block;
_Heap_Block_set_size( link, first_block_begin - link_begin );
last_block->size_and_flag |= HEAP_PREV_BLOCK_USED;
4b1c4: 7801 moveq #1,%d4
)
{
uintptr_t const link_begin = (uintptr_t) link;
uintptr_t const first_block_begin = (uintptr_t) first_block;
_Heap_Block_set_size( link, first_block_begin - link_begin );
4b1c6: 222e fffc movel %fp@(-4),%d1 4b1ca: 928d subl %a5,%d1 4b1cc: c0ad 0004 andl %a5@(4),%d0
}
if ( merge_above_block != NULL ) {
_Heap_Merge_above( heap, merge_above_block, extend_area_end );
} else if ( link_above_block != NULL ) {
_Heap_Link_above(
4b1d0: 206e fff8 moveal %fp@(-8),%a0
block->size_and_flag = size | flag;
4b1d4: 8280 orl %d0,%d1 4b1d6: 2b41 0004 movel %d1,%a5@(4)
uintptr_t const link_begin = (uintptr_t) link;
uintptr_t const first_block_begin = (uintptr_t) first_block;
_Heap_Block_set_size( link, first_block_begin - link_begin );
last_block->size_and_flag |= HEAP_PREV_BLOCK_USED;
4b1da: 89a8 0004 orl %d4,%a0@(4)
extend_first_block,
extend_last_block
);
}
if ( merge_below_block == NULL && merge_above_block == NULL ) {
4b1de: 4a8c tstl %a4
4b1e0: 6610 bnes 4b1f2 <_Heap_Extend+0x1b2>
4b1e2: 4a8b tstl %a3
4b1e4: 660c bnes 4b1f2 <_Heap_Extend+0x1b2>
_Heap_Free_block( heap, extend_first_block );
4b1e6: 2f2e fffc movel %fp@(-4),%sp@- 4b1ea: 2f0a movel %a2,%sp@- 4b1ec: 4eba fe36 jsr %pc@(4b024 <_Heap_Free_block>) 4b1f0: 508f addql #8,%sp
*/
RTEMS_INLINE_ROUTINE void _Heap_Set_last_block_size( Heap_Control *heap )
{
_Heap_Block_set_size(
heap->last_block,
(uintptr_t) heap->first_block - (uintptr_t) heap->last_block
4b1f2: 206a 0024 moveal %a2@(36),%a0
RTEMS_INLINE_ROUTINE void _Heap_Block_set_size(
Heap_Block *block,
uintptr_t size
)
{
uintptr_t flag = block->size_and_flag & HEAP_PREV_BLOCK_USED;
4b1f6: 7001 moveq #1,%d0
* This feature will be used to terminate the scattered heap area list. See
* also _Heap_Extend().
*/
RTEMS_INLINE_ROUTINE void _Heap_Set_last_block_size( Heap_Control *heap )
{
_Heap_Block_set_size(
4b1f8: 222a 0020 movel %a2@(32),%d1 4b1fc: 9288 subl %a0,%d1
RTEMS_INLINE_ROUTINE void _Heap_Block_set_size(
Heap_Block *block,
uintptr_t size
)
{
uintptr_t flag = block->size_and_flag & HEAP_PREV_BLOCK_USED;
4b1fe: c0a8 0004 andl %a0@(4),%d0
block->size_and_flag = size | flag;
4b202: 8280 orl %d0,%d1
}
_Heap_Set_last_block_size( heap );
extended_size = stats->free_size - free_size;
4b204: 202a 0030 movel %a2@(48),%d0 4b208: 90ae fff4 subl %fp@(-12),%d0 4b20c: 2141 0004 movel %d1,%a0@(4)
/* Statistics */
stats->size += extended_size;
4b210: d1aa 002c addl %d0,%a2@(44)
if ( extended_size_ptr != NULL )
4b214: 4aae 0014 tstl %fp@(20)
4b218: 670c beqs 4b226 <_Heap_Extend+0x1e6> <== NEVER TAKEN
*extended_size_ptr = extended_size;
4b21a: 206e 0014 moveal %fp@(20),%a0 4b21e: 2080 movel %d0,%a0@ 4b220: 6004 bras 4b226 <_Heap_Extend+0x1e6>
_Heap_Block_of_alloc_area( sub_area_end, page_size );
if (
sub_area_end > extend_area_begin && extend_area_end > sub_area_begin
) {
return false;
4b222: 4200 clrb %d0 4b224: 6002 bras 4b228 <_Heap_Extend+0x1e8>
stats->size += extended_size;
if ( extended_size_ptr != NULL )
*extended_size_ptr = extended_size;
return true;
4b226: 7001 moveq #1,%d0
}
4b228: 4cee 3cfc ffcc moveml %fp@(-52),%d2-%d7/%a2-%a5 4b22e: 4e5e unlk %fp
...
0004ad5c <_Heap_Free>:
#include <rtems/system.h>
#include <rtems/score/sysstate.h>
#include <rtems/score/heap.h>
bool _Heap_Free( Heap_Control *heap, void *alloc_begin_ptr )
{
4ad5c: 4e56 ffe8 linkw %fp,#-24 4ad60: 202e 000c movel %fp@(12),%d0 4ad64: 2240 moveal %d0,%a1 4ad66: 5189 subql #8,%a1 4ad68: 206e 0008 moveal %fp@(8),%a0 4ad6c: 4c68 0001 0010 remul %a0@(16),%d1,%d0 4ad72: 48d7 0c3c moveml %d2-%d5/%a2-%a3,%sp@
RTEMS_INLINE_ROUTINE bool _Heap_Is_block_in_heap(
const Heap_Control *heap,
const Heap_Block *block
)
{
return (uintptr_t) block >= (uintptr_t) heap->first_block
4ad76: 2828 0020 movel %a0@(32),%d4
uintptr_t alloc_begin,
uintptr_t page_size
)
{
return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size )
- HEAP_BLOCK_HEADER_SIZE);
4ad7a: 93c1 subal %d1,%a1
const Heap_Control *heap,
const Heap_Block *block
)
{
return (uintptr_t) block >= (uintptr_t) heap->first_block
&& (uintptr_t) block <= (uintptr_t) heap->last_block;
4ad7c: b889 cmpl %a1,%d4
4ad7e: 620c bhis 4ad8c <_Heap_Free+0x30>
4ad80: b3e8 0024 cmpal %a0@(36),%a1 4ad84: 53c0 sls %d0 4ad86: 49c0 extbl %d0 4ad88: 4480 negl %d0 4ad8a: 6002 bras 4ad8e <_Heap_Free+0x32> 4ad8c: 4280 clrl %d0
Heap_Block *next_block = NULL;
uintptr_t block_size = 0;
uintptr_t next_block_size = 0;
bool next_is_free = false;
if ( !_Heap_Is_block_in_heap( heap, block ) ) {
4ad8e: 4a00 tstb %d0 4ad90: 6700 012c beqw 4aebe <_Heap_Free+0x162>
--stats->used_blocks;
++stats->frees;
stats->free_size += block_size;
return( true );
}
4ad94: 2629 0004 movel %a1@(4),%d3
- HEAP_BLOCK_HEADER_SIZE);
}
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Block_size( const Heap_Block *block )
{
return block->size_and_flag & ~HEAP_PREV_BLOCK_USED;
4ad98: 70fe moveq #-2,%d0 4ad9a: c083 andl %d3,%d0
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
4ad9c: 45f1 0800 lea %a1@(00000000,%d0:l),%a2
const Heap_Control *heap,
const Heap_Block *block
)
{
return (uintptr_t) block >= (uintptr_t) heap->first_block
&& (uintptr_t) block <= (uintptr_t) heap->last_block;
4ada0: b88a cmpl %a2,%d4
4ada2: 620c bhis 4adb0 <_Heap_Free+0x54> <== NEVER TAKEN
4ada4: b5e8 0024 cmpal %a0@(36),%a2 4ada8: 53c1 sls %d1 4adaa: 49c1 extbl %d1 4adac: 4481 negl %d1 4adae: 6002 bras 4adb2 <_Heap_Free+0x56>
4adb0: 4281 clrl %d1 <== NOT EXECUTED
}
block_size = _Heap_Block_size( block );
next_block = _Heap_Block_at( block, block_size );
if ( !_Heap_Is_block_in_heap( heap, next_block ) ) {
4adb2: 4a01 tstb %d1 4adb4: 6700 0108 beqw 4aebe <_Heap_Free+0x162>
--stats->used_blocks;
++stats->frees;
stats->free_size += block_size;
return( true );
}
4adb8: 242a 0004 movel %a2@(4),%d2
if ( !_Heap_Is_block_in_heap( heap, next_block ) ) {
_HAssert( false );
return false;
}
if ( !_Heap_Is_prev_used( next_block ) ) {
4adbc: 0802 0000 btst #0,%d2 4adc0: 6700 00fc beqw 4aebe <_Heap_Free+0x162>
- HEAP_BLOCK_HEADER_SIZE);
}
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Block_size( const Heap_Block *block )
{
return block->size_and_flag & ~HEAP_PREV_BLOCK_USED;
4adc4: 72fe moveq #-2,%d1
_HAssert( false );
return false;
}
next_block_size = _Heap_Block_size( next_block );
next_is_free = next_block != heap->last_block
4adc6: 2668 0024 moveal %a0@(36),%a3 4adca: c481 andl %d1,%d2
&& !_Heap_Is_prev_used( _Heap_Block_at( next_block, next_block_size ));
4adcc: b7ca cmpal %a2,%a3
4adce: 670c beqs 4addc <_Heap_Free+0x80>
block->size_and_flag = size | flag;
}
RTEMS_INLINE_ROUTINE bool _Heap_Is_prev_used( const Heap_Block *block )
{
return block->size_and_flag & HEAP_PREV_BLOCK_USED;
4add0: 7201 moveq #1,%d1 4add2: c2b2 2804 andl %a2@(00000004,%d2:l),%d1
#include <rtems/system.h>
#include <rtems/score/sysstate.h>
#include <rtems/score/heap.h>
bool _Heap_Free( Heap_Control *heap, void *alloc_begin_ptr )
4add6: 5381 subql #1,%d1 4add8: 4481 negl %d1 4adda: 6002 bras 4adde <_Heap_Free+0x82>
return false;
}
next_block_size = _Heap_Block_size( next_block );
next_is_free = next_block != heap->last_block
&& !_Heap_Is_prev_used( _Heap_Block_at( next_block, next_block_size ));
4addc: 4281 clrl %d1
_HAssert( false );
return false;
}
next_block_size = _Heap_Block_size( next_block );
next_is_free = next_block != heap->last_block
4adde: 1a01 moveb %d1,%d5
&& !_Heap_Is_prev_used( _Heap_Block_at( next_block, next_block_size ));
if ( !_Heap_Is_prev_used( block ) ) {
4ade0: 0803 0000 btst #0,%d3
4ade4: 6662 bnes 4ae48 <_Heap_Free+0xec>
uintptr_t const prev_size = block->prev_size;
4ade6: 2611 movel %a1@,%d3
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
4ade8: 93c3 subal %d3,%a1
const Heap_Control *heap,
const Heap_Block *block
)
{
return (uintptr_t) block >= (uintptr_t) heap->first_block
&& (uintptr_t) block <= (uintptr_t) heap->last_block;
4adea: b889 cmpl %a1,%d4
4adec: 620a bhis 4adf8 <_Heap_Free+0x9c> <== NEVER TAKEN
4adee: b3cb cmpal %a3,%a1 4adf0: 53c1 sls %d1 4adf2: 49c1 extbl %d1 4adf4: 4481 negl %d1 4adf6: 6002 bras 4adfa <_Heap_Free+0x9e>
4adf8: 4281 clrl %d1 <== NOT EXECUTED
Heap_Block * const prev_block = _Heap_Block_at( block, -prev_size );
if ( !_Heap_Is_block_in_heap( heap, prev_block ) ) {
4adfa: 4a01 tstb %d1 4adfc: 6700 00c0 beqw 4aebe <_Heap_Free+0x162>
block->size_and_flag = size | flag;
}
RTEMS_INLINE_ROUTINE bool _Heap_Is_prev_used( const Heap_Block *block )
{
return block->size_and_flag & HEAP_PREV_BLOCK_USED;
4ae00: 7201 moveq #1,%d1 4ae02: c2a9 0004 andl %a1@(4),%d1
return( false );
}
/* As we always coalesce free blocks, the block that preceedes prev_block
must have been used. */
if ( !_Heap_Is_prev_used ( prev_block) ) {
4ae06: 6700 00b6 beqw 4aebe <_Heap_Free+0x162>
_HAssert( false );
return( false );
}
if ( next_is_free ) { /* coalesce both */
4ae0a: 4a05 tstb %d5
4ae0c: 6726 beqs 4ae34 <_Heap_Free+0xd8>
return _Heap_Free_list_tail(heap)->prev;
}
RTEMS_INLINE_ROUTINE void _Heap_Free_list_remove( Heap_Block *block )
{
Heap_Block *next = block->next;
4ae0e: 266a 0008 moveal %a2@(8),%a3
uintptr_t const size = block_size + prev_size + next_block_size;
4ae12: d480 addl %d0,%d2 4ae14: d682 addl %d2,%d3
_Heap_Free_list_remove( next_block );
stats->free_blocks -= 1;
prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
4ae16: 7401 moveq #1,%d2
Heap_Block *prev = block->prev;
4ae18: 246a 000c moveal %a2@(12),%a2
prev->next = next;
4ae1c: 254b 0008 movel %a3,%a2@(8) 4ae20: 8483 orl %d3,%d2
next->prev = prev;
4ae22: 274a 000c movel %a2,%a3@(12)
}
if ( next_is_free ) { /* coalesce both */
uintptr_t const size = block_size + prev_size + next_block_size;
_Heap_Free_list_remove( next_block );
stats->free_blocks -= 1;
4ae26: 53a8 0038 subql #1,%a0@(56)
prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
next_block = _Heap_Block_at( prev_block, size );
_HAssert(!_Heap_Is_prev_used( next_block));
next_block->prev_size = size;
4ae2a: 2383 3800 movel %d3,%a1@(00000000,%d3:l)
if ( next_is_free ) { /* coalesce both */
uintptr_t const size = block_size + prev_size + next_block_size;
_Heap_Free_list_remove( next_block );
stats->free_blocks -= 1;
prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
4ae2e: 2342 0004 movel %d2,%a1@(4) 4ae32: 607a bras 4aeae <_Heap_Free+0x152>
next_block = _Heap_Block_at( prev_block, size );
_HAssert(!_Heap_Is_prev_used( next_block));
next_block->prev_size = size;
} else { /* coalesce prev */
uintptr_t const size = block_size + prev_size;
4ae34: d680 addl %d0,%d3
prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
4ae36: 7201 moveq #1,%d1
next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED;
4ae38: 74fe moveq #-2,%d2
next_block = _Heap_Block_at( prev_block, size );
_HAssert(!_Heap_Is_prev_used( next_block));
next_block->prev_size = size;
} else { /* coalesce prev */
uintptr_t const size = block_size + prev_size;
prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
4ae3a: 8283 orl %d3,%d1
next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED;
next_block->prev_size = size;
4ae3c: 2483 movel %d3,%a2@
next_block = _Heap_Block_at( prev_block, size );
_HAssert(!_Heap_Is_prev_used( next_block));
next_block->prev_size = size;
} else { /* coalesce prev */
uintptr_t const size = block_size + prev_size;
prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
4ae3e: 2341 0004 movel %d1,%a1@(4)
next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED;
4ae42: c5aa 0004 andl %d2,%a2@(4) 4ae46: 6066 bras 4aeae <_Heap_Free+0x152>
next_block->prev_size = size;
}
} else if ( next_is_free ) { /* coalesce next */
4ae48: 4a01 tstb %d1
4ae4a: 672a beqs 4ae76 <_Heap_Free+0x11a>
RTEMS_INLINE_ROUTINE void _Heap_Free_list_replace(
Heap_Block *old_block,
Heap_Block *new_block
)
{
Heap_Block *next = old_block->next;
4ae4c: 266a 0008 moveal %a2@(8),%a3
uintptr_t const size = block_size + next_block_size;
4ae50: 2202 movel %d2,%d1 4ae52: d280 addl %d0,%d1
_Heap_Free_list_replace( next_block, block );
block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
4ae54: 7401 moveq #1,%d2
Heap_Block *prev = old_block->prev;
4ae56: 246a 000c moveal %a2@(12),%a2
new_block->next = next;
4ae5a: 234b 0008 movel %a3,%a1@(8) 4ae5e: 8481 orl %d1,%d2
new_block->prev = prev;
4ae60: 234a 000c movel %a2,%a1@(12)
next_block = _Heap_Block_at( block, size );
next_block->prev_size = size;
4ae64: 2381 1800 movel %d1,%a1@(00000000,%d1:l)
next->prev = new_block;
4ae68: 2749 000c movel %a1,%a3@(12)
prev->next = new_block;
4ae6c: 2549 0008 movel %a1,%a2@(8)
next_block->prev_size = size;
}
} else if ( next_is_free ) { /* coalesce next */
uintptr_t const size = block_size + next_block_size;
_Heap_Free_list_replace( next_block, block );
block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
4ae70: 2342 0004 movel %d2,%a1@(4) 4ae74: 6038 bras 4aeae <_Heap_Free+0x152>
next_block->prev_size = size;
} else { /* no coalesce */
/* Add 'block' to the head of the free blocks list as it tends to
produce less fragmentation than adding to the tail. */
_Heap_Free_list_insert_after( _Heap_Free_list_head( heap), block );
block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED;
4ae76: 7201 moveq #1,%d1
next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED;
4ae78: 74fe moveq #-2,%d2
next_block->prev_size = size;
} else { /* no coalesce */
/* Add 'block' to the head of the free blocks list as it tends to
produce less fragmentation than adding to the tail. */
_Heap_Free_list_insert_after( _Heap_Free_list_head( heap), block );
block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED;
4ae7a: 8280 orl %d0,%d1
RTEMS_INLINE_ROUTINE void _Heap_Free_list_insert_after(
Heap_Block *block_before,
Heap_Block *new_block
)
{
Heap_Block *next = block_before->next;
4ae7c: 2668 0008 moveal %a0@(8),%a3
new_block->next = next;
new_block->prev = block_before;
4ae80: 2348 000c movel %a0,%a1@(12) 4ae84: 2341 0004 movel %d1,%a1@(4)
next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED;
next_block->prev_size = block_size;
/* Statistics */
++stats->free_blocks;
4ae88: 2228 0038 movel %a0@(56),%d1 4ae8c: 5281 addql #1,%d1
Heap_Block *new_block
)
{
Heap_Block *next = block_before->next;
new_block->next = next;
4ae8e: 234b 0008 movel %a3,%a1@(8)
} else { /* no coalesce */
/* Add 'block' to the head of the free blocks list as it tends to
produce less fragmentation than adding to the tail. */
_Heap_Free_list_insert_after( _Heap_Free_list_head( heap), block );
block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED;
next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED;
4ae92: c5aa 0004 andl %d2,%a2@(4)
new_block->prev = block_before; block_before->next = new_block; next->prev = new_block;
4ae96: 2749 000c movel %a1,%a3@(12)
next_block->prev_size = block_size;
4ae9a: 2480 movel %d0,%a2@
{
Heap_Block *next = block_before->next;
new_block->next = next;
new_block->prev = block_before;
block_before->next = new_block;
4ae9c: 2149 0008 movel %a1,%a0@(8)
/* Statistics */
++stats->free_blocks;
4aea0: 2141 0038 movel %d1,%a0@(56)
if ( stats->max_free_blocks < stats->free_blocks ) {
4aea4: b2a8 003c cmpl %a0@(60),%d1
4aea8: 6304 blss 4aeae <_Heap_Free+0x152>
stats->max_free_blocks = stats->free_blocks;
4aeaa: 2141 003c movel %d1,%a0@(60)
}
/* Statistics */
--stats->used_blocks;
++stats->frees;
stats->free_size += block_size;
4aeae: d1a8 0030 addl %d0,%a0@(48)
stats->max_free_blocks = stats->free_blocks;
}
}
/* Statistics */
--stats->used_blocks;
4aeb2: 53a8 0040 subql #1,%a0@(64)
++stats->frees;
4aeb6: 52a8 0050 addql #1,%a0@(80)
stats->free_size += block_size;
return( true );
4aeba: 7001 moveq #1,%d0 4aebc: 6002 bras 4aec0 <_Heap_Free+0x164>
/* As we always coalesce free blocks, the block that preceedes prev_block
must have been used. */
if ( !_Heap_Is_prev_used ( prev_block) ) {
_HAssert( false );
return( false );
4aebe: 4200 clrb %d0
--stats->used_blocks;
++stats->frees;
stats->free_size += block_size;
return( true );
}
4aec0: 4cd7 0c3c moveml %sp@,%d2-%d5/%a2-%a3
4aec4: 4e5e unlk %fp <== NOT EXECUTED
0005a5a4 <_Heap_Size_of_alloc_area>:
bool _Heap_Size_of_alloc_area(
Heap_Control *heap,
void *alloc_begin_ptr,
uintptr_t *alloc_size
)
{
5a5a4: 4e56 0000 linkw %fp,#0 5a5a8: 202e 000c movel %fp@(12),%d0
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_down(
uintptr_t value,
uintptr_t alignment
)
{
return value - (value % alignment);
5a5ac: 2040 moveal %d0,%a0 5a5ae: 5188 subql #8,%a0 5a5b0: 226e 0008 moveal %fp@(8),%a1 5a5b4: 2f02 movel %d2,%sp@- 5a5b6: 2400 movel %d0,%d2 5a5b8: 4c69 2001 0010 remul %a1@(16),%d1,%d2
RTEMS_INLINE_ROUTINE bool _Heap_Is_block_in_heap(
const Heap_Control *heap,
const Heap_Block *block
)
{
return (uintptr_t) block >= (uintptr_t) heap->first_block
5a5be: 2429 0020 movel %a1@(32),%d2
uintptr_t alloc_begin,
uintptr_t page_size
)
{
return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size )
- HEAP_BLOCK_HEADER_SIZE);
5a5c2: 91c1 subal %d1,%a0
const Heap_Control *heap,
const Heap_Block *block
)
{
return (uintptr_t) block >= (uintptr_t) heap->first_block
&& (uintptr_t) block <= (uintptr_t) heap->last_block;
5a5c4: b488 cmpl %a0,%d2
5a5c6: 620c bhis 5a5d4 <_Heap_Size_of_alloc_area+0x30>
5a5c8: b1e9 0024 cmpal %a1@(36),%a0 5a5cc: 53c1 sls %d1 5a5ce: 49c1 extbl %d1 5a5d0: 4481 negl %d1 5a5d2: 6002 bras 5a5d6 <_Heap_Size_of_alloc_area+0x32> 5a5d4: 4281 clrl %d1
uintptr_t const alloc_begin = (uintptr_t) alloc_begin_ptr;
Heap_Block *block = _Heap_Block_of_alloc_area( alloc_begin, page_size );
Heap_Block *next_block = NULL;
uintptr_t block_size = 0;
if ( !_Heap_Is_block_in_heap( heap, block ) ) {
5a5d6: 4a01 tstb %d1
5a5d8: 6738 beqs 5a612 <_Heap_Size_of_alloc_area+0x6e>
- HEAP_BLOCK_HEADER_SIZE);
}
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Block_size( const Heap_Block *block )
{
return block->size_and_flag & ~HEAP_PREV_BLOCK_USED;
5a5da: 72fe moveq #-2,%d1 5a5dc: c2a8 0004 andl %a0@(4),%d1
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
5a5e0: d1c1 addal %d1,%a0
const Heap_Control *heap,
const Heap_Block *block
)
{
return (uintptr_t) block >= (uintptr_t) heap->first_block
&& (uintptr_t) block <= (uintptr_t) heap->last_block;
5a5e2: b488 cmpl %a0,%d2
5a5e4: 620c bhis 5a5f2 <_Heap_Size_of_alloc_area+0x4e> <== NEVER TAKEN
5a5e6: b1e9 0024 cmpal %a1@(36),%a0 5a5ea: 53c1 sls %d1 5a5ec: 49c1 extbl %d1 5a5ee: 4481 negl %d1 5a5f0: 6002 bras 5a5f4 <_Heap_Size_of_alloc_area+0x50>
5a5f2: 4281 clrl %d1 <== NOT EXECUTED
}
block_size = _Heap_Block_size( block );
next_block = _Heap_Block_at( block, block_size );
if (
5a5f4: 4a01 tstb %d1
5a5f6: 671a beqs 5a612 <_Heap_Size_of_alloc_area+0x6e> <== NEVER TAKEN
block->size_and_flag = size | flag;
}
RTEMS_INLINE_ROUTINE bool _Heap_Is_prev_used( const Heap_Block *block )
{
return block->size_and_flag & HEAP_PREV_BLOCK_USED;
5a5f8: 7201 moveq #1,%d1 5a5fa: c2a8 0004 andl %a0@(4),%d1
!_Heap_Is_block_in_heap( heap, next_block )
|| !_Heap_Is_prev_used( next_block )
5a5fe: 6712 beqs 5a612 <_Heap_Size_of_alloc_area+0x6e> <== NEVER TAKEN
) {
return false;
}
*alloc_size = (uintptr_t) next_block + HEAP_BLOCK_SIZE_OFFSET - alloc_begin;
5a600: 7204 moveq #4,%d1 5a602: 9280 subl %d0,%d1 5a604: 2001 movel %d1,%d0 5a606: d088 addl %a0,%d0 5a608: 226e 0010 moveal %fp@(16),%a1 5a60c: 2280 movel %d0,%a1@
return true;
5a60e: 7001 moveq #1,%d0 5a610: 6002 bras 5a614 <_Heap_Size_of_alloc_area+0x70>
if (
!_Heap_Is_block_in_heap( heap, next_block )
|| !_Heap_Is_prev_used( next_block )
) {
return false;
5a612: 4200 clrb %d0
}
*alloc_size = (uintptr_t) next_block + HEAP_BLOCK_SIZE_OFFSET - alloc_begin;
return true;
}
5a614: 241f movel %sp@+,%d2 5a616: 4e5e unlk %fp
...
0004730a <_Heap_Walk>:
bool _Heap_Walk(
Heap_Control *heap,
int source,
bool dump
)
{
4730a: 4e56 ffd0 linkw %fp,#-48 4730e: 48d7 3cfc moveml %d2-%d7/%a2-%a5,%sp@ 47312: 266e 0008 moveal %fp@(8),%a3
uintptr_t const min_block_size = heap->min_block_size;
Heap_Block *const first_block = heap->first_block;
Heap_Block *const last_block = heap->last_block;
Heap_Block *block = first_block;
Heap_Walk_printer printer = dump ?
_Heap_Walk_print : _Heap_Walk_print_nothing;
47316: 45fa ffac lea %pc@(472c4 <_Heap_Walk_print_nothing>),%a2
bool _Heap_Walk(
Heap_Control *heap,
int source,
bool dump
)
{
4731a: 242e 000c movel %fp@(12),%d2
uintptr_t const page_size = heap->page_size;
4731e: 282b 0010 movel %a3@(16),%d4
uintptr_t const min_block_size = heap->min_block_size;
47322: 2a2b 0014 movel %a3@(20),%d5
Heap_Block *const first_block = heap->first_block;
47326: 2c2b 0020 movel %a3@(32),%d6
Heap_Block *const last_block = heap->last_block;
4732a: 2e2b 0024 movel %a3@(36),%d7
Heap_Block *block = first_block;
Heap_Walk_printer printer = dump ?
_Heap_Walk_print : _Heap_Walk_print_nothing;
4732e: 4a2e 0013 tstb %fp@(19)
47332: 6704 beqs 47338 <_Heap_Walk+0x2e>
47334: 45fa ff96 lea %pc@(472cc <_Heap_Walk_print>),%a2
if ( !_System_state_Is_up( _System_state_Get() ) ) {
47338: 7003 moveq #3,%d0 4733a: b0b9 0005 fe12 cmpl 5fe12 <_System_state_Current>,%d0 47340: 6600 02fc bnew 4763e <_Heap_Walk+0x334>
Heap_Block *const first_free_block = _Heap_Free_list_first( heap );
Heap_Block *const last_free_block = _Heap_Free_list_last( heap );
Heap_Block *const first_block = heap->first_block;
Heap_Block *const last_block = heap->last_block;
(*printer)(
47344: 2f2b 000c movel %a3@(12),%sp@- 47348: 2f2b 0008 movel %a3@(8),%sp@- 4734c: 2f07 movel %d7,%sp@- 4734e: 2f06 movel %d6,%sp@- 47350: 2f2b 001c movel %a3@(28),%sp@- 47354: 2f2b 0018 movel %a3@(24),%sp@- 47358: 2f05 movel %d5,%sp@- 4735a: 2f04 movel %d4,%sp@- 4735c: 4879 0005 c1ad pea 5c1ad <C.0.4004+0x57> 47362: 42a7 clrl %sp@- 47364: 2f02 movel %d2,%sp@- 47366: 4e92 jsr %a2@
heap->area_begin, heap->area_end,
first_block, last_block,
first_free_block, last_free_block
);
if ( page_size == 0 ) {
47368: 4fef 002c lea %sp@(44),%sp 4736c: 4a84 tstl %d4
4736e: 6608 bnes 47378 <_Heap_Walk+0x6e>
(*printer)( source, true, "page size is zero\n" );
47370: 4879 0005 c23e pea 5c23e <C.0.4004+0xe8> 47376: 6050 bras 473c8 <_Heap_Walk+0xbe>
)
{
#if (CPU_ALIGNMENT == 0)
return true;
#else
return (((uintptr_t)address % CPU_ALIGNMENT) == 0);
47378: 7003 moveq #3,%d0 4737a: c084 andl %d4,%d0
return false;
}
if ( !_Addresses_Is_aligned( (void *) page_size ) ) {
4737c: 670c beqs 4738a <_Heap_Walk+0x80>
(*printer)(
4737e: 2f04 movel %d4,%sp@- 47380: 4879 0005 c251 pea 5c251 <C.0.4004+0xfb> 47386: 6000 02ca braw 47652 <_Heap_Walk+0x348>
RTEMS_INLINE_ROUTINE bool _Heap_Is_aligned(
uintptr_t value,
uintptr_t alignment
)
{
return (value % alignment) == 0;
4738a: 2205 movel %d5,%d1 4738c: 4c44 1000 remul %d4,%d0,%d1
);
return false;
}
if ( !_Heap_Is_aligned( min_block_size, page_size ) ) {
47390: 4a80 tstl %d0
47392: 670c beqs 473a0 <_Heap_Walk+0x96>
(*printer)(
47394: 2f05 movel %d5,%sp@- 47396: 4879 0005 c26f pea 5c26f <C.0.4004+0x119> 4739c: 6000 02b4 braw 47652 <_Heap_Walk+0x348>
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Alloc_area_of_block(
const Heap_Block *block
)
{
return (uintptr_t) block + HEAP_BLOCK_HEADER_SIZE;
473a0: 2006 movel %d6,%d0 473a2: 5080 addql #8,%d0
RTEMS_INLINE_ROUTINE bool _Heap_Is_aligned(
uintptr_t value,
uintptr_t alignment
)
{
return (value % alignment) == 0;
473a4: 4c44 0001 remul %d4,%d1,%d0
);
return false;
}
if (
473a8: 4a81 tstl %d1
473aa: 670c beqs 473b8 <_Heap_Walk+0xae>
!_Heap_Is_aligned( _Heap_Alloc_area_of_block( first_block ), page_size )
) {
(*printer)(
473ac: 2f06 movel %d6,%sp@- 473ae: 4879 0005 c293 pea 5c293 <C.0.4004+0x13d> 473b4: 6000 029c braw 47652 <_Heap_Walk+0x348>
block->size_and_flag = size | flag;
}
RTEMS_INLINE_ROUTINE bool _Heap_Is_prev_used( const Heap_Block *block )
{
return block->size_and_flag & HEAP_PREV_BLOCK_USED;
473b8: 7001 moveq #1,%d0 473ba: 2046 moveal %d6,%a0 473bc: c0a8 0004 andl %a0@(4),%d0
);
return false;
}
if ( !_Heap_Is_prev_used( first_block ) ) {
473c0: 6616 bnes 473d8 <_Heap_Walk+0xce>
(*printer)(
473c2: 4879 0005 c2c4 pea 5c2c4 <C.0.4004+0x16e> 473c8: 4878 0001 pea 1 <ADD> 473cc: 2f02 movel %d2,%sp@- 473ce: 4e92 jsr %a2@ 473d0: 4fef 000c lea %sp@(12),%sp 473d4: 6000 00ba braw 47490 <_Heap_Walk+0x186>
- HEAP_BLOCK_HEADER_SIZE);
}
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Block_size( const Heap_Block *block )
{
return block->size_and_flag & ~HEAP_PREV_BLOCK_USED;
473d8: 70fe moveq #-2,%d0 473da: 2047 moveal %d7,%a0
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
473dc: 2847 moveal %d7,%a4
- HEAP_BLOCK_HEADER_SIZE);
}
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Block_size( const Heap_Block *block )
{
return block->size_and_flag & ~HEAP_PREV_BLOCK_USED;
473de: c0a8 0004 andl %a0@(4),%d0
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
473e2: d9c0 addal %d0,%a4
block->size_and_flag = size | flag;
}
RTEMS_INLINE_ROUTINE bool _Heap_Is_prev_used( const Heap_Block *block )
{
return block->size_and_flag & HEAP_PREV_BLOCK_USED;
473e4: 7001 moveq #1,%d0 473e6: c0ac 0004 andl %a4@(4),%d0
);
return false;
}
if ( _Heap_Is_free( last_block ) ) {
473ea: 6608 bnes 473f4 <_Heap_Walk+0xea>
(*printer)(
473ec: 4879 0005 c2f2 pea 5c2f2 <C.0.4004+0x19c> 473f2: 60d4 bras 473c8 <_Heap_Walk+0xbe>
);
return false;
}
if (
473f4: bc8c cmpl %a4,%d6
473f6: 6708 beqs 47400 <_Heap_Walk+0xf6> <== ALWAYS TAKEN
_Heap_Block_at( last_block, _Heap_Block_size( last_block ) ) != first_block
) {
(*printer)(
473f8: 4879 0005 c307 pea 5c307 <C.0.4004+0x1b1> <== NOT EXECUTED 473fe: 60c8 bras 473c8 <_Heap_Walk+0xbe> <== NOT EXECUTED
int source,
Heap_Walk_printer printer,
Heap_Control *heap
)
{
uintptr_t const page_size = heap->page_size;
47400: 262b 0010 movel %a3@(16),%d3
const Heap_Block *const free_list_tail = _Heap_Free_list_tail( heap );
47404: 220b movel %a3,%d1
block = next_block;
} while ( block != first_block );
return true;
}
47406: 206b 0008 moveal %a3@(8),%a0 4740a: 2d44 fff8 movel %d4,%fp@(-8) 4740e: 2d43 fffc movel %d3,%fp@(-4) 47412: 6000 0088 braw 4749c <_Heap_Walk+0x192>
const Heap_Control *heap,
const Heap_Block *block
)
{
return (uintptr_t) block >= (uintptr_t) heap->first_block
&& (uintptr_t) block <= (uintptr_t) heap->last_block;
47416: b1eb 0020 cmpal %a3@(32),%a0
4741a: 650c bcss 47428 <_Heap_Walk+0x11e>
4741c: b1eb 0024 cmpal %a3@(36),%a0 47420: 53c0 sls %d0 47422: 49c0 extbl %d0 47424: 4480 negl %d0 47426: 6002 bras 4742a <_Heap_Walk+0x120> 47428: 4280 clrl %d0
const Heap_Block *const first_free_block = _Heap_Free_list_first( heap );
const Heap_Block *prev_block = free_list_tail;
const Heap_Block *free_block = first_free_block;
while ( free_block != free_list_tail ) {
if ( !_Heap_Is_block_in_heap( heap, free_block ) ) {
4742a: 4a00 tstb %d0
4742c: 660c bnes 4743a <_Heap_Walk+0x130>
(*printer)(
4742e: 2f08 movel %a0,%sp@- 47430: 4879 0005 c336 pea 5c336 <C.0.4004+0x1e0> 47436: 6000 021a braw 47652 <_Heap_Walk+0x348>
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Alloc_area_of_block(
const Heap_Block *block
)
{
return (uintptr_t) block + HEAP_BLOCK_HEADER_SIZE;
4743a: 4be8 0008 lea %a0@(8),%a5
RTEMS_INLINE_ROUTINE bool _Heap_Is_aligned(
uintptr_t value,
uintptr_t alignment
)
{
return (value % alignment) == 0;
4743e: 200d movel %a5,%d0 47440: 262e fffc movel %fp@(-4),%d3 47444: 4c43 0004 remul %d3,%d4,%d0
);
return false;
}
if (
47448: 4a84 tstl %d4
4744a: 670c beqs 47458 <_Heap_Walk+0x14e>
!_Heap_Is_aligned( _Heap_Alloc_area_of_block( free_block ), page_size )
) {
(*printer)(
4744c: 2f08 movel %a0,%sp@- 4744e: 4879 0005 c356 pea 5c356 <C.0.4004+0x200> 47454: 6000 01fc braw 47652 <_Heap_Walk+0x348>
- HEAP_BLOCK_HEADER_SIZE);
}
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Block_size( const Heap_Block *block )
{
return block->size_and_flag & ~HEAP_PREV_BLOCK_USED;
47458: 70fe moveq #-2,%d0
block->size_and_flag = size | flag;
}
RTEMS_INLINE_ROUTINE bool _Heap_Is_prev_used( const Heap_Block *block )
{
return block->size_and_flag & HEAP_PREV_BLOCK_USED;
4745a: 7601 moveq #1,%d3
- HEAP_BLOCK_HEADER_SIZE);
}
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Block_size( const Heap_Block *block )
{
return block->size_and_flag & ~HEAP_PREV_BLOCK_USED;
4745c: c0a8 0004 andl %a0@(4),%d0
block->size_and_flag = size | flag;
}
RTEMS_INLINE_ROUTINE bool _Heap_Is_prev_used( const Heap_Block *block )
{
return block->size_and_flag & HEAP_PREV_BLOCK_USED;
47460: c6b0 0804 andl %a0@(00000004,%d0:l),%d3
);
return false;
}
if ( _Heap_Is_used( free_block ) ) {
47464: 670c beqs 47472 <_Heap_Walk+0x168>
(*printer)(
47466: 2f08 movel %a0,%sp@- 47468: 4879 0005 c386 pea 5c386 <C.0.4004+0x230> 4746e: 6000 01e2 braw 47652 <_Heap_Walk+0x348>
);
return false;
}
if ( free_block->prev != prev_block ) {
47472: 2028 000c movel %a0@(12),%d0 47476: b280 cmpl %d0,%d1
47478: 671c beqs 47496 <_Heap_Walk+0x18c>
(*printer)(
4747a: 2f00 movel %d0,%sp@- 4747c: 2f08 movel %a0,%sp@- 4747e: 4879 0005 c3a2 pea 5c3a2 <C.0.4004+0x24c> 47484: 4878 0001 pea 1 <ADD> 47488: 2f02 movel %d2,%sp@- 4748a: 4e92 jsr %a2@ 4748c: 4fef 0014 lea %sp@(20),%sp
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
47490: 4200 clrb %d0 47492: 6000 01ac braw 47640 <_Heap_Walk+0x336>
return false;
}
prev_block = free_block;
free_block = free_block->next;
47496: 2208 movel %a0,%d1 47498: 2068 0008 moveal %a0@(8),%a0
const Heap_Block *const free_list_tail = _Heap_Free_list_tail( heap );
const Heap_Block *const first_free_block = _Heap_Free_list_first( heap );
const Heap_Block *prev_block = free_list_tail;
const Heap_Block *free_block = first_free_block;
while ( free_block != free_list_tail ) {
4749c: b7c8 cmpal %a0,%a3 4749e: 6600 ff76 bnew 47416 <_Heap_Walk+0x10c> 474a2: 282e fff8 movel %fp@(-8),%d4 474a6: 6002 bras 474aa <_Heap_Walk+0x1a0>
block->prev_size
);
}
block = next_block;
} while ( block != first_block );
474a8: 284d moveal %a5,%a4
return true;
}
474aa: 202c 0004 movel %a4@(4),%d0
- HEAP_BLOCK_HEADER_SIZE);
}
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Block_size( const Heap_Block *block )
{
return block->size_and_flag & ~HEAP_PREV_BLOCK_USED;
474ae: 76fe moveq #-2,%d3 474b0: c680 andl %d0,%d3 474b2: 2d40 fffc movel %d0,%fp@(-4)
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
474b6: 4bf4 3800 lea %a4@(00000000,%d3:l),%a5
const Heap_Control *heap,
const Heap_Block *block
)
{
return (uintptr_t) block >= (uintptr_t) heap->first_block
&& (uintptr_t) block <= (uintptr_t) heap->last_block;
474ba: bbeb 0020 cmpal %a3@(32),%a5
474be: 650c bcss 474cc <_Heap_Walk+0x1c2> <== NEVER TAKEN
474c0: bbeb 0024 cmpal %a3@(36),%a5 474c4: 53c0 sls %d0 474c6: 49c0 extbl %d0 474c8: 4480 negl %d0 474ca: 6002 bras 474ce <_Heap_Walk+0x1c4>
474cc: 4280 clrl %d0 <== NOT EXECUTED
bool const prev_used = _Heap_Is_prev_used( block );
Heap_Block *const next_block = _Heap_Block_at( block, block_size );
uintptr_t const next_block_begin = (uintptr_t) next_block;
bool const is_not_last_block = block != last_block;
if ( !_Heap_Is_block_in_heap( heap, next_block ) ) {
474ce: 4a00 tstb %d0
474d0: 660c bnes 474de <_Heap_Walk+0x1d4>
(*printer)(
474d2: 2f0d movel %a5,%sp@- 474d4: 2f0c movel %a4,%sp@- 474d6: 4879 0005 c3d4 pea 5c3d4 <C.0.4004+0x27e> 474dc: 60a6 bras 47484 <_Heap_Walk+0x17a>
uintptr_t const block_begin = (uintptr_t) block;
uintptr_t const block_size = _Heap_Block_size( block );
bool const prev_used = _Heap_Is_prev_used( block );
Heap_Block *const next_block = _Heap_Block_at( block, block_size );
uintptr_t const next_block_begin = (uintptr_t) next_block;
bool const is_not_last_block = block != last_block;
474de: be8c cmpl %a4,%d7 474e0: 56c0 sne %d0 474e2: 2200 movel %d0,%d1 474e4: 4481 negl %d1
RTEMS_INLINE_ROUTINE bool _Heap_Is_aligned(
uintptr_t value,
uintptr_t alignment
)
{
return (value % alignment) == 0;
474e6: 2003 movel %d3,%d0 474e8: 1d41 fffb moveb %d1,%fp@(-5) 474ec: 4c44 0001 remul %d4,%d1,%d0
);
return false;
}
if ( !_Heap_Is_aligned( block_size, page_size ) && is_not_last_block ) {
474f0: 4a81 tstl %d1
474f2: 6714 beqs 47508 <_Heap_Walk+0x1fe>
474f4: 4a2e fffb tstb %fp@(-5)
474f8: 670e beqs 47508 <_Heap_Walk+0x1fe>
(*printer)(
474fa: 2f03 movel %d3,%sp@- 474fc: 2f0c movel %a4,%sp@- 474fe: 4879 0005 c401 pea 5c401 <C.0.4004+0x2ab> 47504: 6000 ff7e braw 47484 <_Heap_Walk+0x17a>
);
return false;
}
if ( block_size < min_block_size && is_not_last_block ) {
47508: ba83 cmpl %d3,%d5
4750a: 6322 blss 4752e <_Heap_Walk+0x224>
4750c: 4a2e fffb tstb %fp@(-5)
47510: 671c beqs 4752e <_Heap_Walk+0x224> <== NEVER TAKEN
(*printer)(
47512: 2f05 movel %d5,%sp@- 47514: 2f03 movel %d3,%sp@- 47516: 2f0c movel %a4,%sp@- 47518: 4879 0005 c42f pea 5c42f <C.0.4004+0x2d9> 4751e: 4878 0001 pea 1 <ADD> 47522: 2f02 movel %d2,%sp@- 47524: 4e92 jsr %a2@
block,
block_size,
min_block_size
);
return false;
47526: 4fef 0018 lea %sp@(24),%sp 4752a: 6000 ff64 braw 47490 <_Heap_Walk+0x186>
}
if ( next_block_begin <= block_begin && is_not_last_block ) {
4752e: b9cd cmpal %a5,%a4
47530: 6514 bcss 47546 <_Heap_Walk+0x23c>
47532: 4a2e fffb tstb %fp@(-5)
47536: 670e beqs 47546 <_Heap_Walk+0x23c>
(*printer)(
47538: 2f0d movel %a5,%sp@- 4753a: 2f0c movel %a4,%sp@- 4753c: 4879 0005 c45a pea 5c45a <C.0.4004+0x304> 47542: 6000 ff40 braw 47484 <_Heap_Walk+0x17a>
block->size_and_flag = size | flag;
}
RTEMS_INLINE_ROUTINE bool _Heap_Is_prev_used( const Heap_Block *block )
{
return block->size_and_flag & HEAP_PREV_BLOCK_USED;
47546: 7001 moveq #1,%d0 47548: c0ae fffc andl %fp@(-4),%d0 4754c: 2d40 fffc movel %d0,%fp@(-4) 47550: 7001 moveq #1,%d0 47552: c0ad 0004 andl %a5@(4),%d0
);
return false;
}
if ( !_Heap_Is_prev_used( next_block ) ) {
47556: 6600 00ae bnew 47606 <_Heap_Walk+0x2fc>
block = next_block;
} while ( block != first_block );
return true;
}
4755a: 222b 0008 movel %a3@(8),%d1
Heap_Block *const last_free_block = _Heap_Free_list_last( heap );
bool const prev_used = _Heap_Is_prev_used( block );
uintptr_t const block_size = _Heap_Block_size( block );
Heap_Block *const next_block = _Heap_Block_at( block, block_size );
(*printer)(
4755e: 43f9 0005 c17a lea 5c17a <C.0.4004+0x24>,%a1
block->prev,
block->prev == first_free_block ?
" (= first free)"
: (block->prev == free_list_head ? " (= head)" : ""),
block->next,
block->next == last_free_block ?
47564: 206c 0008 moveal %a4@(8),%a0
block = next_block;
} while ( block != first_block );
return true;
}
47568: 2d41 fff8 movel %d1,%fp@(-8)
Heap_Block *const last_free_block = _Heap_Free_list_last( heap );
bool const prev_used = _Heap_Is_prev_used( block );
uintptr_t const block_size = _Heap_Block_size( block );
Heap_Block *const next_block = _Heap_Block_at( block, block_size );
(*printer)(
4756c: b1eb 000c cmpal %a3@(12),%a0
47570: 6710 beqs 47582 <_Heap_Walk+0x278>
" (= first free)"
: (block->prev == free_list_head ? " (= head)" : ""),
block->next,
block->next == last_free_block ?
" (= last free)"
: (block->next == free_list_tail ? " (= tail)" : "")
47572: 43f9 0005 c0b4 lea 5c0b4 <rtems_filesystem_default_pathconf+0x40>,%a1 47578: b7c8 cmpal %a0,%a3
4757a: 6606 bnes 47582 <_Heap_Walk+0x278>
4757c: 43f9 0005 c189 lea 5c189 <C.0.4004+0x33>,%a1
false,
"block 0x%08x: size %u, prev 0x%08x%s, next 0x%08x%s\n",
block,
block_size,
block->prev,
block->prev == first_free_block ?
47582: 202c 000c movel %a4@(12),%d0
Heap_Block *const last_free_block = _Heap_Free_list_last( heap );
bool const prev_used = _Heap_Is_prev_used( block );
uintptr_t const block_size = _Heap_Block_size( block );
Heap_Block *const next_block = _Heap_Block_at( block, block_size );
(*printer)(
47586: 223c 0005 c193 movel #377235,%d1 4758c: b0ae fff8 cmpl %fp@(-8),%d0
47590: 6710 beqs 475a2 <_Heap_Walk+0x298>
block,
block_size,
block->prev,
block->prev == first_free_block ?
" (= first free)"
: (block->prev == free_list_head ? " (= head)" : ""),
47592: 223c 0005 c0b4 movel #377012,%d1 47598: b7c0 cmpal %d0,%a3
4759a: 6606 bnes 475a2 <_Heap_Walk+0x298>
4759c: 223c 0005 c1a3 movel #377251,%d1
Heap_Block *const last_free_block = _Heap_Free_list_last( heap );
bool const prev_used = _Heap_Is_prev_used( block );
uintptr_t const block_size = _Heap_Block_size( block );
Heap_Block *const next_block = _Heap_Block_at( block, block_size );
(*printer)(
475a2: 2f09 movel %a1,%sp@- 475a4: 2f08 movel %a0,%sp@- 475a6: 2f01 movel %d1,%sp@- 475a8: 2f00 movel %d0,%sp@- 475aa: 2f03 movel %d3,%sp@- 475ac: 2f0c movel %a4,%sp@- 475ae: 4879 0005 c48e pea 5c48e <C.0.4004+0x338> 475b4: 42a7 clrl %sp@- 475b6: 2f02 movel %d2,%sp@- 475b8: 4e92 jsr %a2@
block->next == last_free_block ?
" (= last free)"
: (block->next == free_list_tail ? " (= tail)" : "")
);
if ( block_size != next_block->prev_size ) {
475ba: 2015 movel %a5@,%d0 475bc: 4fef 0024 lea %sp@(36),%sp 475c0: b083 cmpl %d3,%d0
475c2: 671e beqs 475e2 <_Heap_Walk+0x2d8>
(*printer)(
475c4: 2f0d movel %a5,%sp@- 475c6: 2f00 movel %d0,%sp@- 475c8: 2f03 movel %d3,%sp@- 475ca: 2f0c movel %a4,%sp@- 475cc: 4879 0005 c4c3 pea 5c4c3 <C.0.4004+0x36d> 475d2: 4878 0001 pea 1 <ADD> 475d6: 2f02 movel %d2,%sp@- 475d8: 4e92 jsr %a2@ 475da: 4fef 001c lea %sp@(28),%sp 475de: 6000 feb0 braw 47490 <_Heap_Walk+0x186>
);
return false;
}
if ( !prev_used ) {
475e2: 4aae fffc tstl %fp@(-4)
475e6: 660a bnes 475f2 <_Heap_Walk+0x2e8>
(*printer)(
475e8: 2f0c movel %a4,%sp@- 475ea: 4879 0005 c4fc pea 5c4fc <C.0.4004+0x3a6> 475f0: 6060 bras 47652 <_Heap_Walk+0x348>
block = next_block;
} while ( block != first_block );
return true;
}
475f2: 206b 0008 moveal %a3@(8),%a0 475f6: 6008 bras 47600 <_Heap_Walk+0x2f6>
{
const Heap_Block *const free_list_tail = _Heap_Free_list_tail( heap );
const Heap_Block *free_block = _Heap_Free_list_first( heap );
while ( free_block != free_list_tail ) {
if ( free_block == block ) {
475f8: b9c8 cmpal %a0,%a4
475fa: 673c beqs 47638 <_Heap_Walk+0x32e>
return true;
}
free_block = free_block->next;
475fc: 2068 0008 moveal %a0@(8),%a0
)
{
const Heap_Block *const free_list_tail = _Heap_Free_list_tail( heap );
const Heap_Block *free_block = _Heap_Free_list_first( heap );
while ( free_block != free_list_tail ) {
47600: b7c8 cmpal %a0,%a3
47602: 66f4 bnes 475f8 <_Heap_Walk+0x2ee>
47604: 6044 bras 4764a <_Heap_Walk+0x340>
if ( !_Heap_Is_prev_used( next_block ) ) {
if ( !_Heap_Walk_check_free_block( source, printer, heap, block ) ) {
return false;
}
} else if (prev_used) {
47606: 4aae fffc tstl %fp@(-4)
4760a: 6716 beqs 47622 <_Heap_Walk+0x318>
(*printer)(
4760c: 2f03 movel %d3,%sp@- 4760e: 2f0c movel %a4,%sp@- 47610: 4879 0005 c52b pea 5c52b <C.0.4004+0x3d5> 47616: 42a7 clrl %sp@- 47618: 2f02 movel %d2,%sp@- 4761a: 4e92 jsr %a2@ 4761c: 4fef 0014 lea %sp@(20),%sp 47620: 6016 bras 47638 <_Heap_Walk+0x32e>
"block 0x%08x: size %u\n",
block,
block_size
);
} else {
(*printer)(
47622: 2f14 movel %a4@,%sp@- 47624: 2f03 movel %d3,%sp@- 47626: 2f0c movel %a4,%sp@- 47628: 4879 0005 c542 pea 5c542 <C.0.4004+0x3ec> 4762e: 42a7 clrl %sp@- 47630: 2f02 movel %d2,%sp@- 47632: 4e92 jsr %a2@ 47634: 4fef 0018 lea %sp@(24),%sp
block->prev_size
);
}
block = next_block;
} while ( block != first_block );
47638: bc8d cmpl %a5,%d6 4763a: 6600 fe6c bnew 474a8 <_Heap_Walk+0x19e>
Heap_Block *block = first_block;
Heap_Walk_printer printer = dump ?
_Heap_Walk_print : _Heap_Walk_print_nothing;
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
4763e: 7001 moveq #1,%d0
block = next_block;
} while ( block != first_block );
return true;
}
47640: 4cee 3cfc ffd0 moveml %fp@(-48),%d2-%d7/%a2-%a5 47646: 4e5e unlk %fp 47648: 4e75 rts
return false;
}
if ( !_Heap_Walk_is_in_free_list( heap, block ) ) {
(*printer)(
4764a: 2f0c movel %a4,%sp@- 4764c: 4879 0005 c567 pea 5c567 <C.0.4004+0x411> 47652: 4878 0001 pea 1 <ADD> 47656: 2f02 movel %d2,%sp@- 47658: 4e92 jsr %a2@ 4765a: 4fef 0010 lea %sp@(16),%sp 4765e: 6000 fe30 braw 47490 <_Heap_Walk+0x186>
...
00046928 <_Internal_error_Occurred>:
void _Internal_error_Occurred(
Internal_errors_Source the_source,
bool is_internal,
Internal_errors_t the_error
)
{
46928: 4e56 0000 linkw %fp,#0 4692c: 222e 000c movel %fp@(12),%d1 46930: 2f02 movel %d2,%sp@- 46932: 242e 0010 movel %fp@(16),%d2
_Internal_errors_What_happened.the_source = the_source;
_Internal_errors_What_happened.is_internal = is_internal;
46936: 13c1 0005 d9e6 moveb %d1,5d9e6 <_Internal_errors_What_happened+0x4>
_Internal_errors_What_happened.the_error = the_error;
_User_extensions_Fatal( the_source, is_internal, the_error );
4693c: 2f02 movel %d2,%sp@-
void _Internal_error_Occurred(
Internal_errors_Source the_source,
bool is_internal,
Internal_errors_t the_error
)
{
4693e: 202e 0008 movel %fp@(8),%d0
_Internal_errors_What_happened.the_source = the_source;
_Internal_errors_What_happened.is_internal = is_internal;
_Internal_errors_What_happened.the_error = the_error;
_User_extensions_Fatal( the_source, is_internal, the_error );
46942: 0281 0000 00ff andil #255,%d1
bool is_internal,
Internal_errors_t the_error
)
{
_Internal_errors_What_happened.the_source = the_source;
46948: 23c0 0005 d9e2 movel %d0,5d9e2 <_Internal_errors_What_happened>
_Internal_errors_What_happened.is_internal = is_internal;
_Internal_errors_What_happened.the_error = the_error;
_User_extensions_Fatal( the_source, is_internal, the_error );
4694e: 2f01 movel %d1,%sp@-
)
{
_Internal_errors_What_happened.the_source = the_source;
_Internal_errors_What_happened.is_internal = is_internal;
_Internal_errors_What_happened.the_error = the_error;
46950: 23c2 0005 d9e8 movel %d2,5d9e8 <_Internal_errors_What_happened+0x6>
_User_extensions_Fatal( the_source, is_internal, the_error );
46956: 2f00 movel %d0,%sp@- 46958: 4eb9 0004 84ca jsr 484ca <_User_extensions_Fatal>
RTEMS_INLINE_ROUTINE void _System_state_Set (
System_state_Codes state
)
{
_System_state_Current = state;
4695e: 7005 moveq #5,%d0 <== NOT EXECUTED
_System_state_Set( SYSTEM_STATE_FAILED );
_CPU_Fatal_halt( the_error );
46960: 2042 moveal %d2,%a0 <== NOT EXECUTED 46962: 243c 0000 0700 movel #1792,%d2 <== NOT EXECUTED 46968: 23c0 0005 daba movel %d0,5daba <_System_state_Current> <== NOT EXECUTED 4696e: 40c0 movew %sr,%d0 <== NOT EXECUTED 46970: 8082 orl %d2,%d0 <== NOT EXECUTED 46972: 46c0 movew %d0,%sr <== NOT EXECUTED 46974: 2008 movel %a0,%d0 <== NOT EXECUTED 46976: 223c dead beef movel #-559038737,%d1 <== NOT EXECUTED 4697c: 4ac8 halt <== NOT EXECUTED 4697e: 4fef 000c lea %sp@(12),%sp <== NOT EXECUTED 46982: 60fe bras 46982 <_Internal_error_Occurred+0x5a> <== NOT EXECUTED
000469e4 <_Objects_Allocate>:
*/
Objects_Control *_Objects_Allocate(
Objects_Information *information
)
{
469e4: 4e56 fff0 linkw %fp,#-16 469e8: 48d7 0c0c moveml %d2-%d3/%a2-%a3,%sp@ 469ec: 246e 0008 moveal %fp@(8),%a2
* If the application is using the optional manager stubs and * still attempts to create the object, the information block * should be all zeroed out because it is in the BSS. So let's * check that code for this manager is even present. */ if ( information->size == 0 )
469f0: 4aaa 0014 tstl %a2@(20)
469f4: 675e beqs 46a54 <_Objects_Allocate+0x70> <== NEVER TAKEN
/*
* OK. The manager should be initialized and configured to have objects.
* With any luck, it is safe to attempt to allocate an object.
*/
the_object = (Objects_Control *) _Chain_Get( &information->Inactive );
469f6: 240a movel %a2,%d2 469f8: 0682 0000 001c addil #28,%d2 469fe: 47f9 0004 6174 lea 46174 <_Chain_Get>,%a3 46a04: 2f02 movel %d2,%sp@- 46a06: 4e93 jsr %a3@
if ( information->auto_extend ) {
46a08: 588f addql #4,%sp 46a0a: 4a2a 0010 tstb %a2@(16)
46a0e: 6746 beqs 46a56 <_Objects_Allocate+0x72>
/*
* If the list is empty then we are out of objects and need to
* extend information base.
*/
if ( !the_object ) {
46a10: 4a80 tstl %d0
46a12: 6612 bnes 46a26 <_Objects_Allocate+0x42>
_Objects_Extend_information( information );
46a14: 2f0a movel %a2,%sp@- 46a16: 4eb9 0004 6a8c jsr 46a8c <_Objects_Extend_information>
the_object = (Objects_Control *) _Chain_Get( &information->Inactive );
46a1c: 2f02 movel %d2,%sp@- 46a1e: 4e93 jsr %a3@
}
if ( the_object ) {
46a20: 508f addql #8,%sp 46a22: 4a80 tstl %d0
46a24: 6730 beqs 46a56 <_Objects_Allocate+0x72>
uint32_t block;
block = (uint32_t) _Objects_Get_index( the_object->id ) -
46a26: 2040 moveal %d0,%a0 46a28: 4281 clrl %d1 46a2a: 4282 clrl %d2 46a2c: 3228 000a movew %a0@(10),%d1 46a30: 342a 0008 movew %a2@(8),%d2
_Objects_Get_index( information->minimum_id );
block /= information->allocation_size;
information->inactive_per_block[ block ]--;
46a34: 206a 002a moveal %a2@(42),%a0
}
if ( the_object ) {
uint32_t block;
block = (uint32_t) _Objects_Get_index( the_object->id ) -
46a38: 9282 subl %d2,%d1
_Objects_Get_index( information->minimum_id );
block /= information->allocation_size;
46a3a: 342a 0012 movew %a2@(18),%d2 46a3e: 4c42 1001 remul %d2,%d1,%d1
information->inactive_per_block[ block ]--;
46a42: e589 lsll #2,%d1 46a44: d1c1 addal %d1,%a0 46a46: 5390 subql #1,%a0@
information->inactive--;
46a48: 322a 0028 movew %a2@(40),%d1 46a4c: 5381 subql #1,%d1 46a4e: 3541 0028 movew %d1,%a2@(40) 46a52: 6002 bras 46a56 <_Objects_Allocate+0x72>
* still attempts to create the object, the information block
* should be all zeroed out because it is in the BSS. So let's
* check that code for this manager is even present.
*/
if ( information->size == 0 )
return NULL;
46a54: 4280 clrl %d0 <== NOT EXECUTED
);
}
#endif
return the_object;
}
46a56: 4cee 0c0c fff0 moveml %fp@(-16),%d2-%d3/%a2-%a3
46a5c: 4e5e unlk %fp <== NOT EXECUTED
00046a60 <_Objects_Close>:
RTEMS_INLINE_ROUTINE void _Objects_Invalidate_Id(
Objects_Information *information,
Objects_Control *the_object
)
{
_Objects_Set_local_object(
46a60: 4280 clrl %d0
void _Objects_Close(
Objects_Information *information,
Objects_Control *the_object
)
{
46a62: 4e56 0000 linkw %fp,#0 46a66: 226e 000c moveal %fp@(12),%a1 46a6a: 206e 0008 moveal %fp@(8),%a0 46a6e: 2f0a movel %a2,%sp@-
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
46a70: 2468 0018 moveal %a0@(24),%a2
RTEMS_INLINE_ROUTINE void _Objects_Invalidate_Id(
Objects_Information *information,
Objects_Control *the_object
)
{
_Objects_Set_local_object(
46a74: 3029 000a movew %a1@(10),%d0
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
46a78: 42b2 0c00 clrl %a2@(00000000,%d0:l:4)
_Objects_Invalidate_Id( information, the_object );
_Objects_Namespace_remove( information, the_object );
}
46a7c: 245f moveal %sp@+,%a2
Objects_Control *the_object
)
{
_Objects_Invalidate_Id( information, the_object );
_Objects_Namespace_remove( information, the_object );
46a7e: 2d49 000c movel %a1,%fp@(12)
}
46a82: 4e5e unlk %fp
Objects_Control *the_object
)
{
_Objects_Invalidate_Id( information, the_object );
_Objects_Namespace_remove( information, the_object );
46a84: 4ef9 0004 6f8c jmp 46f8c <_Objects_Namespace_remove>
...
00046d88 <_Objects_Get_information>:
Objects_Information *_Objects_Get_information(
Objects_APIs the_api,
uint32_t the_class
)
{
46d88: 4e56 0000 linkw %fp,#0 46d8c: 2f03 movel %d3,%sp@- 46d8e: 262e 0008 movel %fp@(8),%d3 46d92: 2f02 movel %d2,%sp@- 46d94: 242e 000c movel %fp@(12),%d2
Objects_Information *info;
int the_class_api_maximum;
if ( !the_class )
46d98: 6734 beqs 46dce <_Objects_Get_information+0x46> <== NEVER TAKEN
/*
* This call implicitly validates the_api so we do not call
* _Objects_Is_api_valid above here.
*/
the_class_api_maximum = _Objects_API_maximum_class( the_api );
46d9a: 2f03 movel %d3,%sp@- 46d9c: 4eb9 0004 aec8 jsr 4aec8 <_Objects_API_maximum_class>
if ( the_class_api_maximum == 0 )
46da2: 588f addql #4,%sp 46da4: 4a80 tstl %d0
46da6: 6726 beqs 46dce <_Objects_Get_information+0x46> <== NEVER TAKEN
return NULL;
if ( the_class > (uint32_t) the_class_api_maximum )
46da8: b082 cmpl %d2,%d0
46daa: 6522 bcss 46dce <_Objects_Get_information+0x46> <== NEVER TAKEN
return NULL;
if ( !_Objects_Information_table[ the_api ] )
46dac: 41f9 0005 d908 lea 5d908 <_Objects_Information_table>,%a0 46db2: 2070 3c00 moveal %a0@(00000000,%d3:l:4),%a0 46db6: 4a88 tstl %a0
46db8: 6714 beqs 46dce <_Objects_Get_information+0x46> <== NEVER TAKEN
return NULL;
info = _Objects_Information_table[ the_api ][ the_class ];
46dba: 2030 2c00 movel %a0@(00000000,%d2:l:4),%d0
if ( !info )
46dbe: 6710 beqs 46dd0 <_Objects_Get_information+0x48> <== NEVER TAKEN
* Thus we may have 0 local instances and still have a valid object
* pointer.
*/
#if !defined(RTEMS_MULTIPROCESSING)
if ( info->maximum == 0 )
return NULL;
46dc0: 2040 moveal %d0,%a0 46dc2: 4a68 000e tstw %a0@(14) 46dc6: 56c1 sne %d1 46dc8: 49c1 extbl %d1 46dca: c081 andl %d1,%d0 46dcc: 6002 bras 46dd0 <_Objects_Get_information+0x48>
if ( the_class > (uint32_t) the_class_api_maximum )
return NULL;
if ( !_Objects_Information_table[ the_api ] )
return NULL;
46dce: 4280 clrl %d0
if ( info->maximum == 0 )
return NULL;
#endif
return info;
}
46dd0: 242e fff8 movel %fp@(-8),%d2 46dd4: 262e fffc movel %fp@(-4),%d3
46dd8: 4e5e unlk %fp <== NOT EXECUTED
00046fc0 <_Objects_Get_next>:
Objects_Information *information,
Objects_Id id,
Objects_Locations *location_p,
Objects_Id *next_id_p
)
{
46fc0: 4e56 ffec linkw %fp,#-20 46fc4: 48d7 3c04 moveml %d2/%a2-%a5,%sp@ 46fc8: 266e 0008 moveal %fp@(8),%a3 46fcc: 242e 000c movel %fp@(12),%d2 46fd0: 246e 0010 moveal %fp@(16),%a2 46fd4: 286e 0014 moveal %fp@(20),%a4
Objects_Control *object;
Objects_Id next_id;
if ( !information )
46fd8: 4a8b tstl %a3
46fda: 6744 beqs 47020 <_Objects_Get_next+0x60> <== NEVER TAKEN
return NULL;
if ( !location_p )
46fdc: 4a8a tstl %a2
46fde: 6740 beqs 47020 <_Objects_Get_next+0x60> <== NEVER TAKEN
return NULL;
if ( !next_id_p )
46fe0: 4a8c tstl %a4
46fe2: 673c beqs 47020 <_Objects_Get_next+0x60> <== NEVER TAKEN
return NULL;
if (_Objects_Get_index(id) == OBJECTS_ID_INITIAL_INDEX)
46fe4: 4a42 tstw %d2
46fe6: 6604 bnes 46fec <_Objects_Get_next+0x2c>
next_id = information->minimum_id;
46fe8: 242b 0006 movel %a3@(6),%d2
*location_p = OBJECTS_ERROR;
goto final;
}
/* try to grab one */
object = _Objects_Get(information, next_id, location_p);
46fec: 4bf9 0004 702c lea 4702c <_Objects_Get>,%a5
else
next_id = id;
do {
/* walked off end of list? */
if (_Objects_Get_index(next_id) > information->maximum)
46ff2: 4281 clrl %d1 46ff4: 4280 clrl %d0 46ff6: 322b 000e movew %a3@(14),%d1 46ffa: 3002 movew %d2,%d0 46ffc: b081 cmpl %d1,%d0
46ffe: 630a blss 4700a <_Objects_Get_next+0x4a>
{
*location_p = OBJECTS_ERROR;
47000: 7201 moveq #1,%d1
*next_id_p = next_id;
return object;
final:
*next_id_p = OBJECTS_ID_FINAL;
47002: 70ff moveq #-1,%d0
do {
/* walked off end of list? */
if (_Objects_Get_index(next_id) > information->maximum)
{
*location_p = OBJECTS_ERROR;
47004: 2481 movel %d1,%a2@
*next_id_p = next_id;
return object;
final:
*next_id_p = OBJECTS_ID_FINAL;
47006: 2880 movel %d0,%a4@ 47008: 6016 bras 47020 <_Objects_Get_next+0x60>
*location_p = OBJECTS_ERROR;
goto final;
}
/* try to grab one */
object = _Objects_Get(information, next_id, location_p);
4700a: 2f0a movel %a2,%sp@- 4700c: 2f02 movel %d2,%sp@-
next_id++;
4700e: 5282 addql #1,%d2
*location_p = OBJECTS_ERROR;
goto final;
}
/* try to grab one */
object = _Objects_Get(information, next_id, location_p);
47010: 2f0b movel %a3,%sp@- 47012: 4e95 jsr %a5@
next_id++;
} while (*location_p != OBJECTS_LOCAL);
47014: 4fef 000c lea %sp@(12),%sp 47018: 4a92 tstl %a2@
4701a: 66d6 bnes 46ff2 <_Objects_Get_next+0x32> <== NEVER TAKEN
*next_id_p = next_id;
4701c: 2882 movel %d2,%a4@
return object;
4701e: 6002 bras 47022 <_Objects_Get_next+0x62>
if ( !location_p )
return NULL;
if ( !next_id_p )
return NULL;
47020: 4280 clrl %d0
return object;
final:
*next_id_p = OBJECTS_ID_FINAL;
return 0;
}
47022: 4cee 3c04 ffec moveml %fp@(-20),%d2/%a2-%a5
47028: 4e5e unlk %fp <== NOT EXECUTED
000545d0 <_Objects_Get_no_protection>:
/*
* You can't just extract the index portion or you can get tricked
* by a value between 1 and maximum.
*/
index = id - information->minimum_id + 1;
545d0: 7001 moveq #1,%d0
if ( information->maximum >= index ) {
545d2: 4281 clrl %d1
Objects_Control *_Objects_Get_no_protection(
Objects_Information *information,
Objects_Id id,
Objects_Locations *location
)
{
545d4: 4e56 0000 linkw %fp,#0 545d8: 206e 0008 moveal %fp@(8),%a0
/*
* You can't just extract the index portion or you can get tricked
* by a value between 1 and maximum.
*/
index = id - information->minimum_id + 1;
545dc: 90a8 0006 subl %a0@(6),%d0 545e0: d0ae 000c addl %fp@(12),%d0
if ( information->maximum >= index ) {
545e4: 3228 000e movew %a0@(14),%d1
Objects_Control *_Objects_Get_no_protection(
Objects_Information *information,
Objects_Id id,
Objects_Locations *location
)
{
545e8: 226e 0010 moveal %fp@(16),%a1
* You can't just extract the index portion or you can get tricked
* by a value between 1 and maximum.
*/
index = id - information->minimum_id + 1;
if ( information->maximum >= index ) {
545ec: b081 cmpl %d1,%d0
545ee: 620e bhis 545fe <_Objects_Get_no_protection+0x2e>
if ( (the_object = information->local_table[ index ]) != NULL ) {
545f0: 2068 0018 moveal %a0@(24),%a0 545f4: 2030 0c00 movel %a0@(00000000,%d0:l:4),%d0
545f8: 6704 beqs 545fe <_Objects_Get_no_protection+0x2e><== NEVER TAKEN
*location = OBJECTS_LOCAL;
545fa: 4291 clrl %a1@
return the_object;
545fc: 6006 bras 54604 <_Objects_Get_no_protection+0x34>
/*
* This isn't supported or required yet for Global objects so
* if it isn't local, we don't find it.
*/
*location = OBJECTS_ERROR;
545fe: 7001 moveq #1,%d0 54600: 2280 movel %d0,%a1@
return NULL;
54602: 4280 clrl %d0
}
54604: 4e5e unlk %fp <== NOT EXECUTED
00047d60 <_Objects_Id_to_name>:
*/
Objects_Name_or_id_lookup_errors _Objects_Id_to_name (
Objects_Id id,
Objects_Name *name
)
{
47d60: 4e56 fffc linkw %fp,#-4 47d64: 222e 0008 movel %fp@(8),%d1 47d68: 2f02 movel %d2,%sp@-
/*
* Caller is trusted for name != NULL.
*/
tmpId = (id == OBJECTS_ID_OF_SELF) ? _Thread_Executing->Object.id : id;
47d6a: 4a81 tstl %d1
47d6c: 660a bnes 47d78 <_Objects_Id_to_name+0x18>
47d6e: 2079 0005 f2a4 moveal 5f2a4 <_Per_CPU_Information+0xc>,%a0 47d74: 2228 0008 movel %a0@(8),%d1 47d78: 7418 moveq #24,%d2 47d7a: 2001 movel %d1,%d0 47d7c: e4a8 lsrl %d2,%d0 47d7e: 143c 0007 moveb #7,%d2 47d82: c082 andl %d2,%d0
*/
RTEMS_INLINE_ROUTINE bool _Objects_Is_api_valid(
uint32_t the_api
)
{
if ( !the_api || the_api > OBJECTS_APIS_LAST )
47d84: 143c 0002 moveb #2,%d2 47d88: 2040 moveal %d0,%a0 47d8a: 5388 subql #1,%a0 47d8c: b488 cmpl %a0,%d2
47d8e: 6540 bcss 47dd0 <_Objects_Id_to_name+0x70>
47d90: 6048 bras 47dda <_Objects_Id_to_name+0x7a>
*/
RTEMS_INLINE_ROUTINE uint32_t _Objects_Get_class(
Objects_Id id
)
{
return (uint32_t)
47d92: 2001 movel %d1,%d0 47d94: 741b moveq #27,%d2 47d96: e4a8 lsrl %d2,%d0
if ( !_Objects_Information_table[ the_api ] )
return OBJECTS_INVALID_ID;
the_class = _Objects_Get_class( tmpId );
information = _Objects_Information_table[ the_api ][ the_class ];
47d98: 2070 0c00 moveal %a0@(00000000,%d0:l:4),%a0
if ( !information )
47d9c: 4a88 tstl %a0
47d9e: 6730 beqs 47dd0 <_Objects_Id_to_name+0x70> <== NEVER TAKEN
return OBJECTS_INVALID_ID;
#if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES)
if ( information->is_string )
47da0: 4a28 0032 tstb %a0@(50)
47da4: 662a bnes 47dd0 <_Objects_Id_to_name+0x70> <== NEVER TAKEN
return OBJECTS_INVALID_ID;
#endif
the_object = _Objects_Get( information, tmpId, &ignored_location );
47da6: 486e fffc pea %fp@(-4) 47daa: 2f01 movel %d1,%sp@- 47dac: 2f08 movel %a0,%sp@- 47dae: 4eb9 0004 7d00 jsr 47d00 <_Objects_Get>
if ( !the_object )
47db4: 4fef 000c lea %sp@(12),%sp 47db8: 4a80 tstl %d0
47dba: 6714 beqs 47dd0 <_Objects_Id_to_name+0x70>
return OBJECTS_INVALID_ID;
*name = the_object->name;
47dbc: 206e 000c moveal %fp@(12),%a0 47dc0: 2240 moveal %d0,%a1 47dc2: 20a9 000c movel %a1@(12),%a0@
_Thread_Enable_dispatch();
47dc6: 4eb9 0004 85ee jsr 485ee <_Thread_Enable_dispatch>
return OBJECTS_NAME_OR_ID_LOOKUP_SUCCESSFUL;
47dcc: 4280 clrl %d0 47dce: 6002 bras 47dd2 <_Objects_Id_to_name+0x72>
the_api = _Objects_Get_API( tmpId );
if ( !_Objects_Is_api_valid( the_api ) )
return OBJECTS_INVALID_ID;
if ( !_Objects_Information_table[ the_api ] )
return OBJECTS_INVALID_ID;
47dd0: 7003 moveq #3,%d0
return OBJECTS_INVALID_ID;
*name = the_object->name;
_Thread_Enable_dispatch();
return OBJECTS_NAME_OR_ID_LOOKUP_SUCCESSFUL;
}
47dd2: 242e fff8 movel %fp@(-8),%d2 47dd6: 4e5e unlk %fp 47dd8: 4e75 rts
the_api = _Objects_Get_API( tmpId );
if ( !_Objects_Is_api_valid( the_api ) )
return OBJECTS_INVALID_ID;
if ( !_Objects_Information_table[ the_api ] )
47dda: 41f9 0005 edd0 lea 5edd0 <_Objects_Information_table>,%a0 47de0: 2070 0c00 moveal %a0@(00000000,%d0:l:4),%a0 47de4: 4a88 tstl %a0
47de6: 66aa bnes 47d92 <_Objects_Id_to_name+0x32> <== ALWAYS TAKEN
47de8: 60e6 bras 47dd0 <_Objects_Id_to_name+0x70> <== NOT EXECUTED
...
000473a8 <_Objects_Set_name>:
{
size_t length;
const char *s;
s = name;
length = strnlen( name, information->name_length );
473a8: 4280 clrl %d0
bool _Objects_Set_name(
Objects_Information *information,
Objects_Control *the_object,
const char *name
)
{
473aa: 4e56 ffec linkw %fp,#-20 473ae: 48d7 3c04 moveml %d2/%a2-%a5,%sp@ 473b2: 2a6e 0008 moveal %fp@(8),%a5
size_t length;
const char *s;
s = name;
length = strnlen( name, information->name_length );
473b6: 302d 0034 movew %a5@(52),%d0
bool _Objects_Set_name(
Objects_Information *information,
Objects_Control *the_object,
const char *name
)
{
473ba: 246e 0010 moveal %fp@(16),%a2
size_t length;
const char *s;
s = name;
length = strnlen( name, information->name_length );
473be: 2f00 movel %d0,%sp@-
bool _Objects_Set_name(
Objects_Information *information,
Objects_Control *the_object,
const char *name
)
{
473c0: 286e 000c moveal %fp@(12),%a4
size_t length;
const char *s;
s = name;
length = strnlen( name, information->name_length );
473c4: 2f0a movel %a2,%sp@- 473c6: 4eb9 0004 e628 jsr 4e628 <strnlen>
#if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES)
if ( information->is_string ) {
473cc: 508f addql #8,%sp
{
size_t length;
const char *s;
s = name;
length = strnlen( name, information->name_length );
473ce: 2640 moveal %d0,%a3
#if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES)
if ( information->is_string ) {
473d0: 4a2d 0032 tstb %a5@(50)
473d4: 6744 beqs 4741a <_Objects_Set_name+0x72>
char *d;
d = _Workspace_Allocate( length + 1 );
473d6: 486b 0001 pea %a3@(1) 473da: 4eb9 0004 8cd0 jsr 48cd0 <_Workspace_Allocate>
if ( !d )
473e0: 588f addql #4,%sp
#if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES)
if ( information->is_string ) {
char *d;
d = _Workspace_Allocate( length + 1 );
473e2: 2a40 moveal %d0,%a5
if ( !d )
473e4: 4a80 tstl %d0 473e6: 6700 0082 beqw 4746a <_Objects_Set_name+0xc2>
return false;
if ( the_object->name.name_p ) {
473ea: 202c 000c movel %a4@(12),%d0
473ee: 670e beqs 473fe <_Objects_Set_name+0x56>
_Workspace_Free( (void *)the_object->name.name_p );
473f0: 2f00 movel %d0,%sp@- 473f2: 4eb9 0004 8cec jsr 48cec <_Workspace_Free>
the_object->name.name_p = NULL;
473f8: 588f addql #4,%sp 473fa: 42ac 000c clrl %a4@(12)
}
strncpy( d, name, length );
473fe: 2f0b movel %a3,%sp@- 47400: 2f0a movel %a2,%sp@- 47402: 2f0d movel %a5,%sp@- 47404: 4eb9 0004 e5a4 jsr 4e5a4 <strncpy>
d[length] = '\0';
the_object->name.name_p = d;
4740a: 4fef 000c lea %sp@(12),%sp
_Workspace_Free( (void *)the_object->name.name_p );
the_object->name.name_p = NULL;
}
strncpy( d, name, length );
d[length] = '\0';
4740e: 4200 clrb %d0 47410: 1b80 b800 moveb %d0,%a5@(00000000,%a3:l)
the_object->name.name_p = d;
47414: 294d 000c movel %a5,%a4@(12) 47418: 604c bras 47466 <_Objects_Set_name+0xbe>
} else
#endif
{
the_object->name.name_u32 = _Objects_Build_name(
4741a: 7418 moveq #24,%d2 4741c: 1212 moveb %a2@,%d1 4741e: 7020 moveq #32,%d0 47420: 4840 swap %d0 47422: 49c1 extbl %d1 47424: e5a9 lsll %d2,%d1 47426: 143c 0001 moveb #1,%d2 4742a: b48b cmpl %a3,%d2
4742c: 640a bccs 47438 <_Objects_Set_name+0x90>
4742e: 102a 0001 moveb %a2@(1),%d0 47432: 49c0 extbl %d0 47434: 4840 swap %d0 47436: 4240 clrw %d0 47438: 7402 moveq #2,%d2 4743a: 8280 orl %d0,%d1 4743c: 203c 0000 2000 movel #8192,%d0 47442: b48b cmpl %a3,%d2
47444: 6408 bccs 4744e <_Objects_Set_name+0xa6>
47446: 102a 0002 moveb %a2@(2),%d0 4744a: 49c0 extbl %d0 4744c: e188 lsll #8,%d0 4744e: 8081 orl %d1,%d0 47450: 7203 moveq #3,%d1 47452: b28b cmpl %a3,%d1
47454: 6408 bccs 4745e <_Objects_Set_name+0xb6>
47456: 142a 0003 moveb %a2@(3),%d2 4745a: 49c2 extbl %d2 4745c: 6002 bras 47460 <_Objects_Set_name+0xb8> 4745e: 7420 moveq #32,%d2 47460: 8082 orl %d2,%d0 47462: 2940 000c movel %d0,%a4@(12)
((3 < length) ? s[ 3 ] : ' ')
);
}
return true;
47466: 7001 moveq #1,%d0 47468: 6002 bras 4746c <_Objects_Set_name+0xc4>
if ( information->is_string ) {
char *d;
d = _Workspace_Allocate( length + 1 );
if ( !d )
return false;
4746a: 4200 clrb %d0 <== NOT EXECUTED
);
}
return true;
}
4746c: 4cee 3c04 ffec moveml %fp@(-20),%d2/%a2-%a5 47472: 4e5e unlk %fp
...
000463e8 <_POSIX_Condition_variables_Wait_support>:
pthread_cond_t *cond,
pthread_mutex_t *mutex,
Watchdog_Interval timeout,
bool already_timedout
)
{
463e8: 4e56 ffe4 linkw %fp,#-28 463ec: 48d7 3c0c moveml %d2-%d3/%a2-%a5,%sp@
register POSIX_Condition_variables_Control *the_cond;
Objects_Locations location;
int status;
int mutex_status;
if ( !_POSIX_Mutex_Get( mutex, &location ) ) {
463f0: 240e movel %fp,%d2 463f2: 5982 subql #4,%d2
pthread_cond_t *cond,
pthread_mutex_t *mutex,
Watchdog_Interval timeout,
bool already_timedout
)
{
463f4: 246e 000c moveal %fp@(12),%a2
register POSIX_Condition_variables_Control *the_cond;
Objects_Locations location;
int status;
int mutex_status;
if ( !_POSIX_Mutex_Get( mutex, &location ) ) {
463f8: 2f02 movel %d2,%sp@-
pthread_cond_t *cond,
pthread_mutex_t *mutex,
Watchdog_Interval timeout,
bool already_timedout
)
{
463fa: 286e 0008 moveal %fp@(8),%a4
register POSIX_Condition_variables_Control *the_cond;
Objects_Locations location;
int status;
int mutex_status;
if ( !_POSIX_Mutex_Get( mutex, &location ) ) {
463fe: 2f0a movel %a2,%sp@-
pthread_cond_t *cond,
pthread_mutex_t *mutex,
Watchdog_Interval timeout,
bool already_timedout
)
{
46400: 162e 0017 moveb %fp@(23),%d3
register POSIX_Condition_variables_Control *the_cond;
Objects_Locations location;
int status;
int mutex_status;
if ( !_POSIX_Mutex_Get( mutex, &location ) ) {
46404: 4eb9 0004 6540 jsr 46540 <_POSIX_Mutex_Get> 4640a: 508f addql #8,%sp 4640c: 4a80 tstl %d0 4640e: 6700 00aa beqw 464ba <_POSIX_Condition_variables_Wait_support+0xd2>
*/
RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void )
{
RTEMS_COMPILER_MEMORY_BARRIER();
_Thread_Dispatch_disable_level -= 1;
46412: 2039 0005 fe4c movel 5fe4c <_Thread_Dispatch_disable_level>,%d0 46418: 5380 subql #1,%d0
return EINVAL;
}
_Thread_Unnest_dispatch();
the_cond = _POSIX_Condition_variables_Get( cond, &location );
4641a: 2f02 movel %d2,%sp@- 4641c: 23c0 0005 fe4c movel %d0,5fe4c <_Thread_Dispatch_disable_level> 46422: 2f0c movel %a4,%sp@- 46424: 4eb9 0004 621c jsr 4621c <_POSIX_Condition_variables_Get>
switch ( location ) {
4642a: 508f addql #8,%sp
return EINVAL;
}
_Thread_Unnest_dispatch();
the_cond = _POSIX_Condition_variables_Get( cond, &location );
4642c: 2640 moveal %d0,%a3
switch ( location ) {
4642e: 4aae fffc tstl %fp@(-4) 46432: 6600 0086 bnew 464ba <_POSIX_Condition_variables_Wait_support+0xd2>
case OBJECTS_LOCAL:
if ( the_cond->Mutex && ( the_cond->Mutex != *mutex ) ) {
46436: 202b 0014 movel %a3@(20),%d0
4643a: 670c beqs 46448 <_POSIX_Condition_variables_Wait_support+0x60>
4643c: b092 cmpl %a2@,%d0
4643e: 6708 beqs 46448 <_POSIX_Condition_variables_Wait_support+0x60>
_Thread_Enable_dispatch();
46440: 4eb9 0004 92ce jsr 492ce <_Thread_Enable_dispatch> 46446: 6072 bras 464ba <_POSIX_Condition_variables_Wait_support+0xd2>
return EINVAL;
}
(void) pthread_mutex_unlock( mutex );
46448: 2f0a movel %a2,%sp@- 4644a: 4bf9 0004 92ce lea 492ce <_Thread_Enable_dispatch>,%a5 46450: 4eb9 0004 6798 jsr 46798 <pthread_mutex_unlock>
_Thread_Enable_dispatch();
return EINVAL;
}
*/
if ( !already_timedout ) {
46456: 588f addql #4,%sp 46458: 4a03 tstb %d3
4645a: 664c bnes 464a8 <_POSIX_Condition_variables_Wait_support+0xc0>
the_cond->Mutex = *mutex;
4645c: 2752 0014 movel %a2@,%a3@(20)
RTEMS_INLINE_ROUTINE void _Thread_queue_Enter_critical_section (
Thread_queue_Control *the_thread_queue
)
{
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
46460: 7001 moveq #1,%d0
_Thread_queue_Enter_critical_section( &the_cond->Wait_queue );
_Thread_Executing->Wait.return_code = 0;
46462: 2079 0006 02dc moveal 602dc <_Per_CPU_Information+0xc>,%a0 46468: 2740 0048 movel %d0,%a3@(72)
_Thread_Executing->Wait.queue = &the_cond->Wait_queue;
4646c: 47eb 0018 lea %a3@(24),%a3
if ( !already_timedout ) {
the_cond->Mutex = *mutex;
_Thread_queue_Enter_critical_section( &the_cond->Wait_queue );
_Thread_Executing->Wait.return_code = 0;
46470: 42a8 0034 clrl %a0@(52)
_Thread_Executing->Wait.queue = &the_cond->Wait_queue;
_Thread_Executing->Wait.id = *cond;
46474: 2154 0020 movel %a4@,%a0@(32)
if ( !already_timedout ) {
the_cond->Mutex = *mutex;
_Thread_queue_Enter_critical_section( &the_cond->Wait_queue );
_Thread_Executing->Wait.return_code = 0;
_Thread_Executing->Wait.queue = &the_cond->Wait_queue;
46478: 214b 0044 movel %a3,%a0@(68)
_Thread_Executing->Wait.id = *cond;
_Thread_queue_Enqueue( &the_cond->Wait_queue, timeout );
4647c: 4879 0004 9ac4 pea 49ac4 <_Thread_queue_Timeout> 46482: 2f2e 0010 movel %fp@(16),%sp@- 46486: 2f0b movel %a3,%sp@- 46488: 4eb9 0004 9754 jsr 49754 <_Thread_queue_Enqueue_with_handler>
_Thread_Enable_dispatch();
4648e: 4e95 jsr %a5@
/*
* Switch ourself out because we blocked as a result of the
* _Thread_queue_Enqueue.
*/
status = _Thread_Executing->Wait.return_code;
46490: 2079 0006 02dc moveal 602dc <_Per_CPU_Information+0xc>,%a0
if ( status && status != ETIMEDOUT )
46496: 4fef 000c lea %sp@(12),%sp
/*
* Switch ourself out because we blocked as a result of the
* _Thread_queue_Enqueue.
*/
status = _Thread_Executing->Wait.return_code;
4649a: 2428 0034 movel %a0@(52),%d2
if ( status && status != ETIMEDOUT )
4649e: 670c beqs 464ac <_POSIX_Condition_variables_Wait_support+0xc4>
464a0: 7074 moveq #116,%d0 464a2: b082 cmpl %d2,%d0
464a4: 6616 bnes 464bc <_POSIX_Condition_variables_Wait_support+0xd4><== NEVER TAKEN
464a6: 6004 bras 464ac <_POSIX_Condition_variables_Wait_support+0xc4>
return status;
} else {
_Thread_Enable_dispatch();
464a8: 4e95 jsr %a5@
status = ETIMEDOUT;
464aa: 7474 moveq #116,%d2
/*
* When we get here the dispatch disable level is 0.
*/
mutex_status = pthread_mutex_lock( mutex );
464ac: 2f0a movel %a2,%sp@- 464ae: 4eb9 0004 6700 jsr 46700 <pthread_mutex_lock>
if ( mutex_status )
464b4: 588f addql #4,%sp 464b6: 4a80 tstl %d0
464b8: 6702 beqs 464bc <_POSIX_Condition_variables_Wait_support+0xd4>
#endif
case OBJECTS_ERROR:
break;
}
return EINVAL;
464ba: 7416 moveq #22,%d2
}
464bc: 2002 movel %d2,%d0 464be: 4cee 3c0c ffe4 moveml %fp@(-28),%d2-%d3/%a2-%a5
464c4: 4e5e unlk %fp <== NOT EXECUTED
00049e1c <_POSIX_Message_queue_Receive_support>:
size_t msg_len,
unsigned int *msg_prio,
bool wait,
Watchdog_Interval timeout
)
{
49e1c: 4e56 ffe4 linkw %fp,#-28 49e20: 48d7 043c moveml %d2-%d5/%a2,%sp@
RTEMS_INLINE_ROUTINE POSIX_Message_queue_Control_fd *_POSIX_Message_queue_Get_fd (
mqd_t id,
Objects_Locations *location
)
{
return (POSIX_Message_queue_Control_fd *) _Objects_Get(
49e24: 486e fffc pea %fp@(-4) 49e28: 242e 0008 movel %fp@(8),%d2 49e2c: 2f02 movel %d2,%sp@- 49e2e: 4879 0006 5f76 pea 65f76 <_POSIX_Message_queue_Information_fds> 49e34: 162e 001b moveb %fp@(27),%d3 49e38: 4eb9 0004 cb78 jsr 4cb78 <_Objects_Get>
Objects_Locations location;
size_t length_out;
bool do_wait;
the_mq_fd = _POSIX_Message_queue_Get_fd( mqdes, &location );
switch ( location ) {
49e3e: 4fef 000c lea %sp@(12),%sp 49e42: 4aae fffc tstl %fp@(-4) 49e46: 6600 00c0 bnew 49f08 <_POSIX_Message_queue_Receive_support+0xec>
case OBJECTS_LOCAL:
if ( (the_mq_fd->oflag & O_ACCMODE) == O_WRONLY ) {
49e4a: 2040 moveal %d0,%a0 49e4c: 7803 moveq #3,%d4 49e4e: 7a01 moveq #1,%d5 49e50: 2228 0014 movel %a0@(20),%d1 49e54: c881 andl %d1,%d4 49e56: ba84 cmpl %d4,%d5
49e58: 660a bnes 49e64 <_POSIX_Message_queue_Receive_support+0x48>
_Thread_Enable_dispatch();
49e5a: 4eb9 0004 d3e6 jsr 4d3e6 <_Thread_Enable_dispatch> 49e60: 6000 00a6 braw 49f08 <_POSIX_Message_queue_Receive_support+0xec>
rtems_set_errno_and_return_minus_one( EBADF );
}
the_mq = the_mq_fd->Queue;
49e64: 2240 moveal %d0,%a1 49e66: 2069 0010 moveal %a1@(16),%a0
if ( msg_len < the_mq->Message_queue.maximum_message_size ) {
49e6a: 2028 0066 movel %a0@(102),%d0 49e6e: b0ae 0010 cmpl %fp@(16),%d0
49e72: 6316 blss 49e8a <_POSIX_Message_queue_Receive_support+0x6e>
_Thread_Enable_dispatch();
49e74: 4eb9 0004 d3e6 jsr 4d3e6 <_Thread_Enable_dispatch>
rtems_set_errno_and_return_minus_one( EMSGSIZE );
49e7a: 4eb9 0005 2e80 jsr 52e80 <__errno> 49e80: 727a moveq #122,%d1 49e82: 2040 moveal %d0,%a0 49e84: 2081 movel %d1,%a0@ 49e86: 6000 008c braw 49f14 <_POSIX_Message_queue_Receive_support+0xf8>
/*
* Now if something goes wrong, we return a "length" of -1
* to indicate an error.
*/
length_out = -1;
49e8a: 70ff moveq #-1,%d0 49e8c: 2d40 fff8 movel %d0,%fp@(-8)
/*
* A timed receive with a bad time will do a poll regardless.
*/
if ( wait )
49e90: 4a03 tstb %d3
49e92: 670a beqs 49e9e <_POSIX_Message_queue_Receive_support+0x82><== NEVER TAKEN
do_wait = (the_mq_fd->oflag & O_NONBLOCK) ? false : true;
49e94: 0801 000e btst #14,%d1 49e98: 57c0 seq %d0 49e9a: 4480 negl %d0 49e9c: 6002 bras 49ea0 <_POSIX_Message_queue_Receive_support+0x84>
length_out = -1;
/*
* A timed receive with a bad time will do a poll regardless.
*/
if ( wait )
49e9e: 4200 clrb %d0 <== NOT EXECUTED
do_wait = wait;
/*
* Now perform the actual message receive
*/
_CORE_message_queue_Seize(
49ea0: 2f2e 001c movel %fp@(28),%sp@- 49ea4: 0280 0000 00ff andil #255,%d0 49eaa: 2f00 movel %d0,%sp@- 49eac: 486e fff8 pea %fp@(-8) 49eb0: 2f2e 000c movel %fp@(12),%sp@- 49eb4: 2f02 movel %d2,%sp@- 49eb6: 4868 001a pea %a0@(26) 49eba: 4eb9 0004 bc84 jsr 4bc84 <_CORE_message_queue_Seize>
&length_out,
do_wait,
timeout
);
_Thread_Enable_dispatch();
49ec0: 4eb9 0004 d3e6 jsr 4d3e6 <_Thread_Enable_dispatch>
*msg_prio =
_POSIX_Message_queue_Priority_from_core(_Thread_Executing->Wait.count);
49ec6: 2079 0006 5fe8 moveal 65fe8 <_Per_CPU_Information+0xc>,%a0
RTEMS_INLINE_ROUTINE unsigned int _POSIX_Message_queue_Priority_from_core(
CORE_message_queue_Submit_types priority
)
{
/* absolute value without a library dependency */
return ((priority >= 0) ? priority : -priority);
49ecc: 2028 0024 movel %a0@(36),%d0
49ed0: 6c02 bges 49ed4 <_POSIX_Message_queue_Receive_support+0xb8>
49ed2: 4480 negl %d0
do_wait,
timeout
);
_Thread_Enable_dispatch();
*msg_prio =
49ed4: 226e 0014 moveal %fp@(20),%a1
_POSIX_Message_queue_Priority_from_core(_Thread_Executing->Wait.count);
if ( !_Thread_Executing->Wait.return_code )
49ed8: 4fef 0018 lea %sp@(24),%sp
do_wait,
timeout
);
_Thread_Enable_dispatch();
*msg_prio =
49edc: 2280 movel %d0,%a1@
_POSIX_Message_queue_Priority_from_core(_Thread_Executing->Wait.count);
if ( !_Thread_Executing->Wait.return_code )
49ede: 4aa8 0034 tstl %a0@(52)
49ee2: 6606 bnes 49eea <_POSIX_Message_queue_Receive_support+0xce>
return length_out;
49ee4: 202e fff8 movel %fp@(-8),%d0 49ee8: 602c bras 49f16 <_POSIX_Message_queue_Receive_support+0xfa>
rtems_set_errno_and_return_minus_one(
49eea: 4eb9 0005 2e80 jsr 52e80 <__errno> 49ef0: 2079 0006 5fe8 moveal 65fe8 <_Per_CPU_Information+0xc>,%a0 49ef6: 2440 moveal %d0,%a2 49ef8: 2f28 0034 movel %a0@(52),%sp@- 49efc: 4eb9 0004 a130 jsr 4a130 <_POSIX_Message_queue_Translate_core_message_queue_return_code> 49f02: 588f addql #4,%sp 49f04: 2480 movel %d0,%a2@ 49f06: 600c bras 49f14 <_POSIX_Message_queue_Receive_support+0xf8>
#endif
case OBJECTS_ERROR:
break;
}
rtems_set_errno_and_return_minus_one( EBADF );
49f08: 4eb9 0005 2e80 jsr 52e80 <__errno> 49f0e: 2040 moveal %d0,%a0 49f10: 7009 moveq #9,%d0 49f12: 2080 movel %d0,%a0@ 49f14: 70ff moveq #-1,%d0
}
49f16: 4cee 043c ffe4 moveml %fp@(-28),%d2-%d5/%a2
49f1c: 4e5e unlk %fp <== NOT EXECUTED
0004dfec <_POSIX_Semaphore_Delete>:
*/
void _POSIX_Semaphore_Delete(
POSIX_Semaphore_Control *the_semaphore
)
{
4dfec: 4e56 0000 linkw %fp,#0 4dff0: 2f0a movel %a2,%sp@- 4dff2: 246e 0008 moveal %fp@(8),%a2
if ( !the_semaphore->linked && !the_semaphore->open_count ) {
4dff6: 4a2a 0015 tstb %a2@(21)
4dffa: 6636 bnes 4e032 <_POSIX_Semaphore_Delete+0x46> <== NEVER TAKEN
4dffc: 4aaa 0016 tstl %a2@(22)
4e000: 6630 bnes 4e032 <_POSIX_Semaphore_Delete+0x46>
_Objects_Close( &_POSIX_Semaphore_Information, &the_semaphore->Object );
4e002: 2f0a movel %a2,%sp@- 4e004: 4879 0006 2af4 pea 62af4 <_POSIX_Semaphore_Information> 4e00a: 4eb9 0004 a09c jsr 4a09c <_Objects_Close>
_CORE_semaphore_Flush(
4e010: 4878 ffff pea ffffffff <LESS> 4e014: 42a7 clrl %sp@- 4e016: 486a 001a pea %a2@(26) 4e01a: 4eb9 0004 9a84 jsr 49a84 <_CORE_semaphore_Flush>
RTEMS_INLINE_ROUTINE void _POSIX_Semaphore_Free (
POSIX_Semaphore_Control *the_semaphore
)
{
_Objects_Free( &_POSIX_Semaphore_Information, &the_semaphore->Object );
4e020: 2f0a movel %a2,%sp@- 4e022: 4879 0006 2af4 pea 62af4 <_POSIX_Semaphore_Information> 4e028: 4eb9 0004 a314 jsr 4a314 <_Objects_Free> 4e02e: 4fef 001c lea %sp@(28),%sp
-1
);
_POSIX_Semaphore_Free( the_semaphore );
}
}
4e032: 246e fffc moveal %fp@(-4),%a2 4e036: 4e5e unlk %fp
...
0004a0c4 <_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch>:
#include <rtems/posix/pthread.h>
void _POSIX_Thread_Evaluate_cancellation_and_enable_dispatch(
Thread_Control *the_thread
)
{
4a0c4: 4e56 0000 linkw %fp,#0 4a0c8: 226e 0008 moveal %fp@(8),%a1
POSIX_API_Control *thread_support;
thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ];
4a0cc: 2069 010e moveal %a1@(270),%a0
if ( thread_support->cancelability_state == PTHREAD_CANCEL_ENABLE &&
4a0d0: 4aa8 00d4 tstl %a0@(212)
4a0d4: 662e bnes 4a104 <_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch+0x40><== NEVER TAKEN
4a0d6: 7001 moveq #1,%d0 4a0d8: b0a8 00d8 cmpl %a0@(216),%d0
4a0dc: 6626 bnes 4a104 <_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch+0x40><== ALWAYS TAKEN
thread_support->cancelability_type == PTHREAD_CANCEL_ASYNCHRONOUS &&
4a0de: 4aa8 00dc tstl %a0@(220) <== NOT EXECUTED 4a0e2: 6720 beqs 4a104 <_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch+0x40><== NOT EXECUTED
thread_support->cancelation_requested ) {
_Thread_Unnest_dispatch();
_POSIX_Thread_Exit( the_thread, PTHREAD_CANCELED );
4a0e4: 4878 ffff pea ffffffff <LESS> <== NOT EXECUTED
*/
RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void )
{
RTEMS_COMPILER_MEMORY_BARRIER();
_Thread_Dispatch_disable_level -= 1;
4a0e8: 2039 0005 dfc0 movel 5dfc0 <_Thread_Dispatch_disable_level>,%d0<== NOT EXECUTED 4a0ee: 5380 subql #1,%d0 <== NOT EXECUTED 4a0f0: 2f09 movel %a1,%sp@- <== NOT EXECUTED 4a0f2: 23c0 0005 dfc0 movel %d0,5dfc0 <_Thread_Dispatch_disable_level><== NOT EXECUTED 4a0f8: 4eb9 0004 a898 jsr 4a898 <_POSIX_Thread_Exit> <== NOT EXECUTED 4a0fe: 508f addql #8,%sp <== NOT EXECUTED
} else
_Thread_Enable_dispatch();
}
4a100: 4e5e unlk %fp <== NOT EXECUTED 4a102: 4e75 rts <== NOT EXECUTED
4a104: 4e5e unlk %fp
thread_support->cancelability_type == PTHREAD_CANCEL_ASYNCHRONOUS &&
thread_support->cancelation_requested ) {
_Thread_Unnest_dispatch();
_POSIX_Thread_Exit( the_thread, PTHREAD_CANCELED );
} else
_Thread_Enable_dispatch();
4a106: 4ef9 0004 79ba jmp 479ba <_Thread_Enable_dispatch>
0004b304 <_POSIX_Thread_Translate_sched_param>:
int policy,
struct sched_param *param,
Thread_CPU_budget_algorithms *budget_algorithm,
Thread_CPU_budget_algorithm_callout *budget_callout
)
{
4b304: 4e56 ffec linkw %fp,#-20 4b308: 48d7 3c04 moveml %d2/%a2-%a5,%sp@ 4b30c: 246e 000c moveal %fp@(12),%a2
if ( !_POSIX_Priority_Is_valid( param->sched_priority ) )
4b310: 2f12 movel %a2@,%sp@-
int policy,
struct sched_param *param,
Thread_CPU_budget_algorithms *budget_algorithm,
Thread_CPU_budget_algorithm_callout *budget_callout
)
{
4b312: 242e 0008 movel %fp@(8),%d2 4b316: 266e 0010 moveal %fp@(16),%a3 4b31a: 286e 0014 moveal %fp@(20),%a4
if ( !_POSIX_Priority_Is_valid( param->sched_priority ) )
4b31e: 4eb9 0004 b2e0 jsr 4b2e0 <_POSIX_Priority_Is_valid> 4b324: 588f addql #4,%sp 4b326: 4a00 tstb %d0
4b328: 6778 beqs 4b3a2 <_POSIX_Thread_Translate_sched_param+0x9e><== NEVER TAKEN
return EINVAL;
*budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_NONE;
4b32a: 4293 clrl %a3@
*budget_callout = NULL;
4b32c: 4294 clrl %a4@
if ( policy == SCHED_OTHER ) {
4b32e: 4a82 tstl %d2
4b330: 6606 bnes 4b338 <_POSIX_Thread_Translate_sched_param+0x34>
*budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE;
4b332: 7201 moveq #1,%d1 4b334: 2681 movel %d1,%a3@ 4b336: 6066 bras 4b39e <_POSIX_Thread_Translate_sched_param+0x9a>
return 0;
}
if ( policy == SCHED_FIFO ) {
4b338: 7001 moveq #1,%d0 4b33a: b082 cmpl %d2,%d0
4b33c: 6760 beqs 4b39e <_POSIX_Thread_Translate_sched_param+0x9a>
*budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_NONE;
return 0;
}
if ( policy == SCHED_RR ) {
4b33e: 103c 0002 moveb #2,%d0 4b342: b082 cmpl %d2,%d0
4b344: 6606 bnes 4b34c <_POSIX_Thread_Translate_sched_param+0x48>
*budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_EXHAUST_TIMESLICE;
4b346: 2680 movel %d0,%a3@
return 0;
4b348: 4200 clrb %d0 4b34a: 6058 bras 4b3a4 <_POSIX_Thread_Translate_sched_param+0xa0>
}
if ( policy == SCHED_SPORADIC ) {
4b34c: 7004 moveq #4,%d0 4b34e: b082 cmpl %d2,%d0
4b350: 6650 bnes 4b3a2 <_POSIX_Thread_Translate_sched_param+0x9e>
if ( (param->sched_ss_repl_period.tv_sec == 0) &&
4b352: 4aaa 0008 tstl %a2@(8)
4b356: 6606 bnes 4b35e <_POSIX_Thread_Translate_sched_param+0x5a>
4b358: 4aaa 000c tstl %a2@(12)
4b35c: 6744 beqs 4b3a2 <_POSIX_Thread_Translate_sched_param+0x9e>
(param->sched_ss_repl_period.tv_nsec == 0) )
return EINVAL;
if ( (param->sched_ss_init_budget.tv_sec == 0) &&
4b35e: 4aaa 0010 tstl %a2@(16)
4b362: 6606 bnes 4b36a <_POSIX_Thread_Translate_sched_param+0x66>
4b364: 4aaa 0014 tstl %a2@(20)
4b368: 6738 beqs 4b3a2 <_POSIX_Thread_Translate_sched_param+0x9e>
(param->sched_ss_init_budget.tv_nsec == 0) )
return EINVAL;
if ( _Timespec_To_ticks( ¶m->sched_ss_repl_period ) <
4b36a: 486a 0008 pea %a2@(8) 4b36e: 4bf9 0004 9278 lea 49278 <_Timespec_To_ticks>,%a5 4b374: 4e95 jsr %a5@
_Timespec_To_ticks( ¶m->sched_ss_init_budget ) )
4b376: 486a 0010 pea %a2@(16)
if ( (param->sched_ss_init_budget.tv_sec == 0) &&
(param->sched_ss_init_budget.tv_nsec == 0) )
return EINVAL;
if ( _Timespec_To_ticks( ¶m->sched_ss_repl_period ) <
4b37a: 2400 movel %d0,%d2
_Timespec_To_ticks( ¶m->sched_ss_init_budget ) )
4b37c: 4e95 jsr %a5@
if ( (param->sched_ss_init_budget.tv_sec == 0) &&
(param->sched_ss_init_budget.tv_nsec == 0) )
return EINVAL;
if ( _Timespec_To_ticks( ¶m->sched_ss_repl_period ) <
4b37e: 508f addql #8,%sp 4b380: b082 cmpl %d2,%d0
4b382: 621e bhis 4b3a2 <_POSIX_Thread_Translate_sched_param+0x9e>
_Timespec_To_ticks( ¶m->sched_ss_init_budget ) )
return EINVAL;
if ( !_POSIX_Priority_Is_valid( param->sched_ss_low_priority ) )
4b384: 2f2a 0004 movel %a2@(4),%sp@- 4b388: 4eb9 0004 b2e0 jsr 4b2e0 <_POSIX_Priority_Is_valid> 4b38e: 588f addql #4,%sp 4b390: 4a00 tstb %d0
4b392: 670e beqs 4b3a2 <_POSIX_Thread_Translate_sched_param+0x9e>
return EINVAL;
*budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_CALLOUT;
4b394: 7003 moveq #3,%d0 4b396: 2680 movel %d0,%a3@
*budget_callout = _POSIX_Threads_Sporadic_budget_callout;
4b398: 28bc 0004 5de4 movel #286180,%a4@
return 0;
}
if ( policy == SCHED_FIFO ) {
*budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_NONE;
return 0;
4b39e: 4280 clrl %d0 4b3a0: 6002 bras 4b3a4 <_POSIX_Thread_Translate_sched_param+0xa0>
if ( _Timespec_To_ticks( ¶m->sched_ss_repl_period ) <
_Timespec_To_ticks( ¶m->sched_ss_init_budget ) )
return EINVAL;
if ( !_POSIX_Priority_Is_valid( param->sched_ss_low_priority ) )
return EINVAL;
4b3a2: 7016 moveq #22,%d0
*budget_callout = _POSIX_Threads_Sporadic_budget_callout;
return 0;
}
return EINVAL;
}
4b3a4: 4cee 3c04 ffec moveml %fp@(-20),%d2/%a2-%a5 4b3aa: 4e5e unlk %fp
...
00045b14 <_POSIX_Threads_Initialize_user_threads_body>:
*
* Output parameters: NONE
*/
void _POSIX_Threads_Initialize_user_threads_body(void)
{
45b14: 4e56 ff9c linkw %fp,#-100 45b18: 48d7 3c7c moveml %d2-%d6/%a2-%a5,%sp@
uint32_t maximum;
posix_initialization_threads_table *user_threads;
pthread_t thread_id;
pthread_attr_t attr;
user_threads = Configuration_POSIX_API.User_initialization_threads_table;
45b1c: 2479 0005 d25e moveal 5d25e <Configuration_POSIX_API+0x34>,%a2
maximum = Configuration_POSIX_API.number_of_initialization_threads;
45b22: 2839 0005 d25a movel 5d25a <Configuration_POSIX_API+0x30>,%d4
if ( !user_threads || maximum == 0 )
45b28: 4a8a tstl %a2
45b2a: 676a beqs 45b96 <_POSIX_Threads_Initialize_user_threads_body+0x82><== NEVER TAKEN
45b2c: 4a84 tstl %d4
45b2e: 6766 beqs 45b96 <_POSIX_Threads_Initialize_user_threads_body+0x82><== NEVER TAKEN
for ( index=0 ; index < maximum ; index++ ) {
/*
* There is no way for these calls to fail in this situation.
*/
(void) pthread_attr_init( &attr );
45b30: 240e movel %fp,%d2
(void) pthread_attr_setinheritsched( &attr, PTHREAD_EXPLICIT_SCHED );
(void) pthread_attr_setstacksize(&attr, user_threads[ index ].stack_size);
status = pthread_create(
45b32: 2a0e movel %fp,%d5
pthread_attr_t attr;
user_threads = Configuration_POSIX_API.User_initialization_threads_table;
maximum = Configuration_POSIX_API.number_of_initialization_threads;
if ( !user_threads || maximum == 0 )
45b34: 4283 clrl %d3
for ( index=0 ; index < maximum ; index++ ) {
/*
* There is no way for these calls to fail in this situation.
*/
(void) pthread_attr_init( &attr );
45b36: 0682 ffff ffc0 addil #-64,%d2 45b3c: 2c3c 0004 b3b0 movel #308144,%d6
(void) pthread_attr_setinheritsched( &attr, PTHREAD_EXPLICIT_SCHED );
45b42: 4bf9 0004 b3dc lea 4b3dc <pthread_attr_setinheritsched>,%a5
(void) pthread_attr_setstacksize(&attr, user_threads[ index ].stack_size);
45b48: 49f9 0004 b414 lea 4b414 <pthread_attr_setstacksize>,%a4
status = pthread_create(
45b4e: 5985 subql #4,%d5 45b50: 47f9 0004 5868 lea 45868 <pthread_create>,%a3
for ( index=0 ; index < maximum ; index++ ) {
/*
* There is no way for these calls to fail in this situation.
*/
(void) pthread_attr_init( &attr );
45b56: 2f02 movel %d2,%sp@- 45b58: 2046 moveal %d6,%a0 45b5a: 4e90 jsr %a0@
(void) pthread_attr_setinheritsched( &attr, PTHREAD_EXPLICIT_SCHED );
45b5c: 4878 0002 pea 2 <DOUBLE_FLOAT> 45b60: 2f02 movel %d2,%sp@- 45b62: 4e95 jsr %a5@
(void) pthread_attr_setstacksize(&attr, user_threads[ index ].stack_size);
45b64: 2f2a 0004 movel %a2@(4),%sp@- 45b68: 2f02 movel %d2,%sp@- 45b6a: 4e94 jsr %a4@
status = pthread_create(
45b6c: 42a7 clrl %sp@- 45b6e: 2f12 movel %a2@,%sp@- 45b70: 2f02 movel %d2,%sp@- 45b72: 2f05 movel %d5,%sp@- 45b74: 4e93 jsr %a3@
&thread_id,
&attr,
user_threads[ index ].thread_entry,
NULL
);
if ( status )
45b76: 4fef 0024 lea %sp@(36),%sp 45b7a: 4a80 tstl %d0
45b7c: 6710 beqs 45b8e <_POSIX_Threads_Initialize_user_threads_body+0x7a>
_Internal_error_Occurred( INTERNAL_ERROR_POSIX_API, true, status );
45b7e: 2f00 movel %d0,%sp@- 45b80: 4878 0001 pea 1 <ADD> 45b84: 4878 0002 pea 2 <DOUBLE_FLOAT> 45b88: 4eb9 0004 7834 jsr 47834 <_Internal_error_Occurred>
*
* Setting the attributes explicitly is critical, since we don't want
* to inherit the idle tasks attributes.
*/
for ( index=0 ; index < maximum ; index++ ) {
45b8e: 5283 addql #1,%d3 45b90: 508a addql #8,%a2 45b92: b883 cmpl %d3,%d4
45b94: 62c0 bhis 45b56 <_POSIX_Threads_Initialize_user_threads_body+0x42><== NEVER TAKEN
NULL
);
if ( status )
_Internal_error_Occurred( INTERNAL_ERROR_POSIX_API, true, status );
}
}
45b96: 4cee 3c7c ff9c moveml %fp@(-100),%d2-%d6/%a2-%a5
45b9c: 4e5e unlk %fp <== NOT EXECUTED
0004a450 <_POSIX_Threads_Sporadic_budget_TSR>:
*/
void _POSIX_Threads_Sporadic_budget_TSR(
Objects_Id id __attribute__((unused)),
void *argument
)
{
4a450: 4e56 0000 linkw %fp,#0 4a454: 2f0b movel %a3,%sp@- 4a456: 2f0a movel %a2,%sp@- 4a458: 246e 000c moveal %fp@(12),%a2
Thread_Control *the_thread;
POSIX_API_Control *api;
the_thread = argument;
api = the_thread->API_Extensions[ THREAD_API_POSIX ];
4a45c: 266a 010e moveal %a2@(270),%a3
/* ticks is guaranteed to be at least one */
ticks = _Timespec_To_ticks( &api->schedparam.sched_ss_init_budget );
4a460: 486b 0094 pea %a3@(148) 4a464: 4eb9 0004 b240 jsr 4b240 <_Timespec_To_ticks>
*/
#if 0
printk( "TSR %d %d %d\n", the_thread->resource_count,
the_thread->current_priority, new_priority );
#endif
if ( the_thread->resource_count == 0 ) {
4a46a: 588f addql #4,%sp
api = the_thread->API_Extensions[ THREAD_API_POSIX ];
/* ticks is guaranteed to be at least one */
ticks = _Timespec_To_ticks( &api->schedparam.sched_ss_init_budget );
the_thread->cpu_time_budget = ticks;
4a46c: 2540 0076 movel %d0,%a2@(118)
RTEMS_INLINE_ROUTINE Priority_Control _POSIX_Priority_To_core(
int priority
)
{
return (Priority_Control) (POSIX_SCHEDULER_MAXIMUM_PRIORITY - priority + 1);
4a470: 4280 clrl %d0 4a472: 1039 0005 c192 moveb 5c192 <rtems_maximum_priority>,%d0 4a478: 90ab 0084 subl %a3@(132),%d0
new_priority = _POSIX_Priority_To_core( api->schedparam.sched_priority );
the_thread->real_priority = new_priority;
4a47c: 2540 0018 movel %d0,%a2@(24)
*/
#if 0
printk( "TSR %d %d %d\n", the_thread->resource_count,
the_thread->current_priority, new_priority );
#endif
if ( the_thread->resource_count == 0 ) {
4a480: 4aaa 001c tstl %a2@(28)
4a484: 6618 bnes 4a49e <_POSIX_Threads_Sporadic_budget_TSR+0x4e><== NEVER TAKEN
/*
* If this would make them less important, then do not change it.
*/
if ( the_thread->current_priority > new_priority ) {
4a486: b0aa 0014 cmpl %a2@(20),%d0
4a48a: 6412 bccs 4a49e <_POSIX_Threads_Sporadic_budget_TSR+0x4e>
_Thread_Change_priority( the_thread, new_priority, true );
4a48c: 4878 0001 pea 1 <ADD> 4a490: 2f00 movel %d0,%sp@- 4a492: 2f0a movel %a2,%sp@- 4a494: 4eb9 0004 71b0 jsr 471b0 <_Thread_Change_priority> 4a49a: 4fef 000c lea %sp@(12),%sp
#endif
}
}
/* ticks is guaranteed to be at least one */
ticks = _Timespec_To_ticks( &api->schedparam.sched_ss_repl_period );
4a49e: 486b 008c pea %a3@(140) 4a4a2: 4eb9 0004 b240 jsr 4b240 <_Timespec_To_ticks>
_Watchdog_Insert_ticks( &api->Sporadic_timer, ticks );
}
4a4a8: 246e fff8 moveal %fp@(-8),%a2
)
{
the_watchdog->initial = units;
_Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog );
4a4ac: 588f addql #4,%sp
Watchdog_Control *the_watchdog,
Watchdog_Interval units
)
{
the_watchdog->initial = units;
4a4ae: 2740 00b0 movel %d0,%a3@(176)
}
/* ticks is guaranteed to be at least one */
ticks = _Timespec_To_ticks( &api->schedparam.sched_ss_repl_period );
_Watchdog_Insert_ticks( &api->Sporadic_timer, ticks );
4a4b2: 47eb 00a4 lea %a3@(164),%a3
_Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog );
4a4b6: 203c 0005 da0e movel #383502,%d0 4a4bc: 2d4b 000c movel %a3,%fp@(12)
}
4a4c0: 266e fffc moveal %fp@(-4),%a3 4a4c4: 2d40 0008 movel %d0,%fp@(8) 4a4c8: 4e5e unlk %fp 4a4ca: 4ef9 0004 8614 jmp 48614 <_Watchdog_Insert>
0004a4d0 <_POSIX_Threads_Sporadic_budget_callout>:
/*
* This will prevent the thread from consuming its entire "budget"
* while at low priority.
*/
the_thread->cpu_time_budget = 0xFFFFFFFF; /* XXX should be based on MAX_U32 */
4a4d0: 70ff moveq #-1,%d0
* _POSIX_Threads_Sporadic_budget_callout
*/
void _POSIX_Threads_Sporadic_budget_callout(
Thread_Control *the_thread
)
{
4a4d2: 4e56 0000 linkw %fp,#0 4a4d6: 206e 0008 moveal %fp@(8),%a0
/*
* This will prevent the thread from consuming its entire "budget"
* while at low priority.
*/
the_thread->cpu_time_budget = 0xFFFFFFFF; /* XXX should be based on MAX_U32 */
4a4da: 2140 0076 movel %d0,%a0@(118) 4a4de: 4280 clrl %d0 4a4e0: 1039 0005 c192 moveb 5c192 <rtems_maximum_priority>,%d0
)
{
POSIX_API_Control *api;
uint32_t new_priority;
api = the_thread->API_Extensions[ THREAD_API_POSIX ];
4a4e6: 2268 010e moveal %a0@(270),%a1 4a4ea: 90a9 0088 subl %a1@(136),%d0
* while at low priority.
*/
the_thread->cpu_time_budget = 0xFFFFFFFF; /* XXX should be based on MAX_U32 */
new_priority = _POSIX_Priority_To_core(api->schedparam.sched_ss_low_priority);
the_thread->real_priority = new_priority;
4a4ee: 2140 0018 movel %d0,%a0@(24)
*/
#if 0
printk( "callout %d %d %d\n", the_thread->resource_count,
the_thread->current_priority, new_priority );
#endif
if ( the_thread->resource_count == 0 ) {
4a4f2: 4aa8 001c tstl %a0@(28)
4a4f6: 6618 bnes 4a510 <_POSIX_Threads_Sporadic_budget_callout+0x40><== NEVER TAKEN
/*
* Make sure we are actually lowering it. If they have lowered it
* to logically lower than sched_ss_low_priority, then we do not want to
* change it.
*/
if ( the_thread->current_priority < new_priority ) {
4a4f8: b0a8 0014 cmpl %a0@(20),%d0
4a4fc: 6312 blss 4a510 <_POSIX_Threads_Sporadic_budget_callout+0x40><== NEVER TAKEN
_Thread_Change_priority( the_thread, new_priority, true );
4a4fe: 4878 0001 pea 1 <ADD> 4a502: 2f00 movel %d0,%sp@- 4a504: 2f08 movel %a0,%sp@- 4a506: 4eb9 0004 71b0 jsr 471b0 <_Thread_Change_priority> 4a50c: 4fef 000c lea %sp@(12),%sp
#if 0
printk( "lower priority\n" );
#endif
}
}
}
4a510: 4e5e unlk %fp <== NOT EXECUTED
0004c2c4 <_POSIX_Threads_cancel_run>:
thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ];
handler_stack = &thread_support->Cancellation_Handlers;
thread_support->cancelability_state = PTHREAD_CANCEL_DISABLE;
4c2c4: 7001 moveq #1,%d0
#include <rtems/posix/threadsup.h>
void _POSIX_Threads_cancel_run(
Thread_Control *the_thread
)
{
4c2c6: 4e56 ffec linkw %fp,#-20
POSIX_Cancel_Handler_control *handler;
Chain_Control *handler_stack;
POSIX_API_Control *thread_support;
ISR_Level level;
thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ];
4c2ca: 206e 0008 moveal %fp@(8),%a0
#include <rtems/posix/threadsup.h>
void _POSIX_Threads_cancel_run(
Thread_Control *the_thread
)
{
4c2ce: 48d7 3c04 moveml %d2/%a2-%a5,%sp@
POSIX_Cancel_Handler_control *handler;
Chain_Control *handler_stack;
POSIX_API_Control *thread_support;
ISR_Level level;
thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ];
4c2d2: 2468 010e moveal %a0@(270),%a2
handler_stack = &thread_support->Cancellation_Handlers;
thread_support->cancelability_state = PTHREAD_CANCEL_DISABLE;
while ( !_Chain_Is_empty( handler_stack ) ) {
_ISR_Disable( level );
4c2d6: 243c 0000 0700 movel #1792,%d2
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
4c2dc: 47ea 00e4 lea %a2@(228),%a3
_Chain_Extract_unprotected( &handler->Node );
_ISR_Enable( level );
(*handler->routine)( handler->arg );
_Workspace_Free( handler );
4c2e0: 49f9 0004 88a4 lea 488a4 <_Workspace_Free>,%a4
thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ];
handler_stack = &thread_support->Cancellation_Handlers;
thread_support->cancelability_state = PTHREAD_CANCEL_DISABLE;
4c2e6: 2540 00d4 movel %d0,%a2@(212)
while ( !_Chain_Is_empty( handler_stack ) ) {
4c2ea: 602a bras 4c316 <_POSIX_Threads_cancel_run+0x52>
_ISR_Disable( level );
4c2ec: 2002 movel %d2,%d0 <== NOT EXECUTED 4c2ee: 40c1 movew %sr,%d1 <== NOT EXECUTED 4c2f0: 8081 orl %d1,%d0 <== NOT EXECUTED 4c2f2: 46c0 movew %d0,%sr <== NOT EXECUTED
handler = (POSIX_Cancel_Handler_control *)
4c2f4: 2a6b 0004 moveal %a3@(4),%a5 <== NOT EXECUTED
)
{
Chain_Node *next;
Chain_Node *previous;
next = the_node->next;
4c2f8: 2255 moveal %a5@,%a1 <== NOT EXECUTED
previous = the_node->previous;
4c2fa: 206d 0004 moveal %a5@(4),%a0 <== NOT EXECUTED
next->previous = previous;
4c2fe: 2348 0004 movel %a0,%a1@(4) <== NOT EXECUTED
previous->next = next;
4c302: 2089 movel %a1,%a0@ <== NOT EXECUTED
_Chain_Tail( handler_stack )->previous;
_Chain_Extract_unprotected( &handler->Node );
_ISR_Enable( level );
4c304: 46c1 movew %d1,%sr <== NOT EXECUTED
(*handler->routine)( handler->arg );
4c306: 2f2d 000c movel %a5@(12),%sp@- <== NOT EXECUTED 4c30a: 206d 0008 moveal %a5@(8),%a0 <== NOT EXECUTED 4c30e: 4e90 jsr %a0@ <== NOT EXECUTED
_Workspace_Free( handler );
4c310: 2f0d movel %a5,%sp@- <== NOT EXECUTED 4c312: 4e94 jsr %a4@ <== NOT EXECUTED 4c314: 508f addql #8,%sp <== NOT EXECUTED
handler_stack = &thread_support->Cancellation_Handlers;
thread_support->cancelability_state = PTHREAD_CANCEL_DISABLE;
while ( !_Chain_Is_empty( handler_stack ) ) {
4c316: b7ea 00e0 cmpal %a2@(224),%a3
4c31a: 66d0 bnes 4c2ec <_POSIX_Threads_cancel_run+0x28> <== NEVER TAKEN
(*handler->routine)( handler->arg );
_Workspace_Free( handler );
}
}
4c31c: 4cee 3c04 ffec moveml %fp@(-20),%d2/%a2-%a5 4c322: 4e5e unlk %fp
...
000456b0 <_POSIX_Timer_TSR>:
* This is the operation that is run when a timer expires
*/
void _POSIX_Timer_TSR(
Objects_Id timer __attribute__((unused)),
void *data)
{
456b0: 4e56 0000 linkw %fp,#0 456b4: 2f0a movel %a2,%sp@- 456b6: 246e 000c moveal %fp@(12),%a2
bool activated;
ptimer = (POSIX_Timer_Control *)data;
/* Increment the number of expirations. */
ptimer->overrun = ptimer->overrun + 1;
456ba: 52aa 0066 addql #1,%a2@(102)
/* The timer must be reprogrammed */
if ( ( ptimer->timer_data.it_interval.tv_sec != 0 ) ||
456be: 4aaa 0052 tstl %a2@(82)
456c2: 6606 bnes 456ca <_POSIX_Timer_TSR+0x1a>
456c4: 4aaa 0056 tstl %a2@(86)
456c8: 6736 beqs 45700 <_POSIX_Timer_TSR+0x50> <== NEVER TAKEN
( ptimer->timer_data.it_interval.tv_nsec != 0 ) ) {
activated = _POSIX_Timer_Insert_helper(
456ca: 2f0a movel %a2,%sp@- 456cc: 4879 0004 56b0 pea 456b0 <_POSIX_Timer_TSR> 456d2: 2f2a 0008 movel %a2@(8),%sp@- 456d6: 2f2a 0062 movel %a2@(98),%sp@- 456da: 486a 0010 pea %a2@(16) 456de: 4eb9 0004 adc4 jsr 4adc4 <_POSIX_Timer_Insert_helper>
ptimer->ticks,
ptimer->Object.id,
_POSIX_Timer_TSR,
ptimer
);
if ( !activated )
456e4: 4fef 0014 lea %sp@(20),%sp 456e8: 4a00 tstb %d0
456ea: 672e beqs 4571a <_POSIX_Timer_TSR+0x6a> <== NEVER TAKEN
return;
/* Store the time when the timer was started again */
_TOD_Get( &ptimer->time );
456ec: 486a 006a pea %a2@(106) 456f0: 4eb9 0004 6bd0 jsr 46bd0 <_TOD_Get>
/* The state really did not change but just to be safe */
ptimer->state = POSIX_TIMER_STATE_CREATE_RUN;
456f6: 588f addql #4,%sp 456f8: 7003 moveq #3,%d0 456fa: 1540 003c moveb %d0,%a2@(60) 456fe: 6006 bras 45706 <_POSIX_Timer_TSR+0x56>
} else {
/* Indicates that the timer is stopped */
ptimer->state = POSIX_TIMER_STATE_CREATE_STOP;
45700: 7004 moveq #4,%d0 <== NOT EXECUTED 45702: 1540 003c moveb %d0,%a2@(60) <== NOT EXECUTED
/*
* The sending of the signal to the process running the handling function
* specified for that signal is simulated
*/
if ( pthread_kill ( ptimer->thread_id, ptimer->inf.sigev_signo ) ) {
45706: 2f2a 0042 movel %a2@(66),%sp@- 4570a: 2f2a 0038 movel %a2@(56),%sp@- 4570e: 4eb9 0004 a9ac jsr 4a9ac <pthread_kill>
}
/* After the signal handler returns, the count of expirations of the
* timer must be set to 0.
*/
ptimer->overrun = 0;
45714: 508f addql #8,%sp 45716: 42aa 0066 clrl %a2@(102)
}
4571a: 246e fffc moveal %fp@(-4),%a2 4571e: 4e5e unlk %fp
...
0004c3b0 <_POSIX_signals_Check_signal>:
)
{
siginfo_t siginfo_struct;
sigset_t saved_signals_blocked;
if ( ! _POSIX_signals_Clear_signals( api, signo, &siginfo_struct,
4c3b0: 4280 clrl %d0
bool _POSIX_signals_Check_signal(
POSIX_API_Control *api,
int signo,
bool is_global
)
{
4c3b2: 4e56 ffe4 linkw %fp,#-28
siginfo_t siginfo_struct;
sigset_t saved_signals_blocked;
if ( ! _POSIX_signals_Clear_signals( api, signo, &siginfo_struct,
4c3b6: 102e 0013 moveb %fp@(19),%d0
bool _POSIX_signals_Check_signal(
POSIX_API_Control *api,
int signo,
bool is_global
)
{
4c3ba: 48d7 041c moveml %d2-%d4/%a2,%sp@
siginfo_t siginfo_struct;
sigset_t saved_signals_blocked;
if ( ! _POSIX_signals_Clear_signals( api, signo, &siginfo_struct,
4c3be: 4878 0001 pea 1 <ADD> 4c3c2: 260e movel %fp,%d3 4c3c4: 0683 ffff fff4 addil #-12,%d3 4c3ca: 2f00 movel %d0,%sp@-
bool _POSIX_signals_Check_signal(
POSIX_API_Control *api,
int signo,
bool is_global
)
{
4c3cc: 242e 000c movel %fp@(12),%d2
siginfo_t siginfo_struct;
sigset_t saved_signals_blocked;
if ( ! _POSIX_signals_Clear_signals( api, signo, &siginfo_struct,
4c3d0: 2f03 movel %d3,%sp@-
bool _POSIX_signals_Check_signal(
POSIX_API_Control *api,
int signo,
bool is_global
)
{
4c3d2: 246e 0008 moveal %fp@(8),%a2
siginfo_t siginfo_struct;
sigset_t saved_signals_blocked;
if ( ! _POSIX_signals_Clear_signals( api, signo, &siginfo_struct,
4c3d6: 2f02 movel %d2,%sp@- 4c3d8: 2f0a movel %a2,%sp@- 4c3da: 4eb9 0004 c448 jsr 4c448 <_POSIX_signals_Clear_signals> 4c3e0: 4fef 0014 lea %sp@(20),%sp 4c3e4: 4a00 tstb %d0
4c3e6: 6754 beqs 4c43c <_POSIX_signals_Check_signal+0x8c>
#endif
/*
* Just to prevent sending a signal which is currently being ignored.
*/
if ( _POSIX_signals_Vectors[ signo ].sa_handler == SIG_IGN )
4c3e8: 2202 movel %d2,%d1 4c3ea: 2002 movel %d2,%d0 4c3ec: e589 lsll #2,%d1 4c3ee: e988 lsll #4,%d0 4c3f0: 9081 subl %d1,%d0 4c3f2: 2240 moveal %d0,%a1 4c3f4: d3fc 0005 ddea addal #384490,%a1 4c3fa: 7201 moveq #1,%d1 4c3fc: 2069 0008 moveal %a1@(8),%a0 4c400: b288 cmpl %a0,%d1
4c402: 6738 beqs 4c43c <_POSIX_signals_Check_signal+0x8c><== NEVER TAKEN
/*
* Block the signals requested in sa_mask
*/
saved_signals_blocked = api->signals_blocked;
api->signals_blocked |= _POSIX_signals_Vectors[ signo ].sa_mask;
4c404: 2229 0004 movel %a1@(4),%d1
/*
* Here, the signal handler function executes
*/
switch ( _POSIX_signals_Vectors[ signo ].sa_flags ) {
4c408: 43f9 0005 ddea lea 5ddea <_POSIX_signals_Vectors>,%a1
return false;
/*
* Block the signals requested in sa_mask
*/
saved_signals_blocked = api->signals_blocked;
4c40e: 282a 00cc movel %a2@(204),%d4
api->signals_blocked |= _POSIX_signals_Vectors[ signo ].sa_mask;
4c412: 8284 orl %d4,%d1 4c414: 2541 00cc movel %d1,%a2@(204)
/*
* Here, the signal handler function executes
*/
switch ( _POSIX_signals_Vectors[ signo ].sa_flags ) {
4c418: 7202 moveq #2,%d1 4c41a: b2b1 0800 cmpl %a1@(00000000,%d0:l),%d1
4c41e: 660e bnes 4c42e <_POSIX_signals_Check_signal+0x7e>
case SA_SIGINFO:
(*_POSIX_signals_Vectors[ signo ].sa_sigaction)(
4c420: 42a7 clrl %sp@- 4c422: 2f03 movel %d3,%sp@- 4c424: 2f02 movel %d2,%sp@- 4c426: 4e90 jsr %a0@
signo,
&siginfo_struct,
NULL /* context is undefined per 1003.1b-1993, p. 66 */
);
break;
4c428: 4fef 000c lea %sp@(12),%sp 4c42c: 6006 bras 4c434 <_POSIX_signals_Check_signal+0x84>
default:
(*_POSIX_signals_Vectors[ signo ].sa_handler)( signo );
4c42e: 2f02 movel %d2,%sp@- 4c430: 4e90 jsr %a0@
break;
4c432: 588f addql #4,%sp
}
/*
* Restore the previous set of blocked signals
*/
api->signals_blocked = saved_signals_blocked;
4c434: 2544 00cc movel %d4,%a2@(204)
return true;
4c438: 7001 moveq #1,%d0 4c43a: 6002 bras 4c43e <_POSIX_signals_Check_signal+0x8e>
/*
* Just to prevent sending a signal which is currently being ignored.
*/
if ( _POSIX_signals_Vectors[ signo ].sa_handler == SIG_IGN )
return false;
4c43c: 4200 clrb %d0
* Restore the previous set of blocked signals
*/
api->signals_blocked = saved_signals_blocked;
return true;
}
4c43e: 4cee 041c ffe4 moveml %fp@(-28),%d2-%d4/%a2
4c444: 4e5e unlk %fp <== NOT EXECUTED
0004c9c8 <_POSIX_signals_Clear_process_signals>:
clear_signal = true;
mask = signo_to_mask( signo );
ISR_Level level;
_ISR_Disable( level );
4c9c8: 203c 0000 0700 movel #1792,%d0
*/
void _POSIX_signals_Clear_process_signals(
int signo
)
{
4c9ce: 4e56 0000 linkw %fp,#0 4c9d2: 222e 0008 movel %fp@(8),%d1 4c9d6: 2f03 movel %d3,%sp@- 4c9d8: 2f02 movel %d2,%sp@-
clear_signal = true;
mask = signo_to_mask( signo );
ISR_Level level;
_ISR_Disable( level );
4c9da: 40c2 movew %sr,%d2 4c9dc: 8082 orl %d2,%d0 4c9de: 46c0 movew %d0,%sr
if ( _POSIX_signals_Vectors[ signo ].sa_flags == SA_SIGINFO ) {
4c9e0: 2601 movel %d1,%d3 4c9e2: 2001 movel %d1,%d0 4c9e4: 41f9 0005 ddea lea 5ddea <_POSIX_signals_Vectors>,%a0 4c9ea: e58b lsll #2,%d3 4c9ec: e988 lsll #4,%d0 4c9ee: 9083 subl %d3,%d0 4c9f0: 7602 moveq #2,%d3 4c9f2: b6b0 0800 cmpl %a0@(00000000,%d0:l),%d3
4c9f6: 6614 bnes 4ca0c <_POSIX_signals_Clear_process_signals+0x44>
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
4c9f8: 2040 moveal %d0,%a0 4c9fa: d1fc 0005 dfe6 addal #384998,%a0
if ( !_Chain_Is_empty( &_POSIX_signals_Siginfo[ signo ] ) )
4ca00: 43f9 0005 dfe2 lea 5dfe2 <_POSIX_signals_Siginfo>,%a1 4ca06: b1f1 0800 cmpal %a1@(00000000,%d0:l),%a0
4ca0a: 660e bnes 4ca1a <_POSIX_signals_Clear_process_signals+0x52><== NEVER TAKEN
4ca0c: 5381 subql #1,%d1 4ca0e: 7001 moveq #1,%d0 4ca10: e3a8 lsll %d1,%d0
clear_signal = false;
}
if ( clear_signal ) {
_POSIX_signals_Pending &= ~mask;
4ca12: 4680 notl %d0 4ca14: c1b9 0005 dfde andl %d0,5dfde <_POSIX_signals_Pending>
}
_ISR_Enable( level );
4ca1a: 46c2 movew %d2,%sr
}
4ca1c: 241f movel %sp@+,%d2 4ca1e: 261f movel %sp@+,%d3
4ca20: 4e5e unlk %fp <== NOT EXECUTED
000461ac <_POSIX_signals_Get_highest>:
sigset_t set
)
{
int signo;
for ( signo = SIGRTMIN ; signo <= SIGRTMAX ; signo++ ) {
461ac: 701b moveq #27,%d0
#include <rtems/score/isr.h>
int _POSIX_signals_Get_highest(
sigset_t set
)
{
461ae: 4e56 fff4 linkw %fp,#-12 461b2: 48d7 001c moveml %d2-%d4,%sp@ 461b6: 242e 0008 movel %fp@(8),%d2 461ba: 7601 moveq #1,%d3
#include <rtems/posix/psignal.h>
#include <rtems/seterr.h>
#include <rtems/posix/time.h>
#include <rtems/score/isr.h>
int _POSIX_signals_Get_highest(
461bc: 2200 movel %d0,%d1 461be: 5381 subql #1,%d1 461c0: 2803 movel %d3,%d4 461c2: e3ac lsll %d1,%d4 461c4: 2204 movel %d4,%d1
)
{
int signo;
for ( signo = SIGRTMIN ; signo <= SIGRTMAX ; signo++ ) {
if ( set & signo_to_mask( signo ) ) {
461c6: c282 andl %d2,%d1
461c8: 6626 bnes 461f0 <_POSIX_signals_Get_highest+0x44><== NEVER TAKEN
sigset_t set
)
{
int signo;
for ( signo = SIGRTMIN ; signo <= SIGRTMAX ; signo++ ) {
461ca: 5280 addql #1,%d0 461cc: 123c 0020 moveb #32,%d1 461d0: b280 cmpl %d0,%d1
461d2: 66e8 bnes 461bc <_POSIX_signals_Get_highest+0x10>
461d4: 7001 moveq #1,%d0 461d6: 7601 moveq #1,%d3
#include <rtems/posix/psignal.h>
#include <rtems/seterr.h>
#include <rtems/posix/time.h>
#include <rtems/score/isr.h>
int _POSIX_signals_Get_highest(
461d8: 2200 movel %d0,%d1 461da: 5381 subql #1,%d1 461dc: 2803 movel %d3,%d4 461de: e3ac lsll %d1,%d4 461e0: 2204 movel %d4,%d1
#if (SIGHUP != 1)
#error "Assumption that SIGHUP==1 violated!!"
#endif
for ( signo = SIGHUP ; signo <= __SIGLASTNOTRT ; signo++ ) {
if ( set & signo_to_mask( signo ) ) {
461e2: c282 andl %d2,%d1
461e4: 660a bnes 461f0 <_POSIX_signals_Get_highest+0x44>
*/
#if (SIGHUP != 1)
#error "Assumption that SIGHUP==1 violated!!"
#endif
for ( signo = SIGHUP ; signo <= __SIGLASTNOTRT ; signo++ ) {
461e6: 5280 addql #1,%d0 461e8: 123c 001b moveb #27,%d1 461ec: b280 cmpl %d0,%d1
461ee: 66e8 bnes 461d8 <_POSIX_signals_Get_highest+0x2c><== ALWAYS TAKEN
* a return 0. This routine will NOT be called unless a signal * is pending in the set passed in. */ found_it: return signo; }
461f0: 4cd7 001c moveml %sp@,%d2-%d4
461f4: 4e5e unlk %fp <== NOT EXECUTED
0005a288 <_POSIX_signals_Unblock_thread>:
5a288: 7001 moveq #1,%d0
bool _POSIX_signals_Unblock_thread(
Thread_Control *the_thread,
int signo,
siginfo_t *info
)
{
5a28a: 4e56 fff4 linkw %fp,#-12 5a28e: 226e 0010 moveal %fp@(16),%a1 5a292: 48d7 040c moveml %d2-%d3/%a2,%sp@ 5a296: 242e 000c movel %fp@(12),%d2 5a29a: 2202 movel %d2,%d1 5a29c: 5381 subql #1,%d1 5a29e: 246e 0008 moveal %fp@(8),%a2 5a2a2: e3a8 lsll %d1,%d0
/*
* Is the thread is specifically waiting for a signal?
*/
if ( _States_Is_interruptible_signal( the_thread->current_state ) ) {
5a2a4: 222a 0010 movel %a2@(16),%d1 5a2a8: 2601 movel %d1,%d3 5a2aa: 0283 1000 8000 andil #268468224,%d3
{
POSIX_API_Control *api;
sigset_t mask;
siginfo_t *the_info = NULL;
api = the_thread->API_Extensions[ THREAD_API_POSIX ];
5a2b0: 206a 010e moveal %a2@(270),%a0
/*
* Is the thread is specifically waiting for a signal?
*/
if ( _States_Is_interruptible_signal( the_thread->current_state ) ) {
5a2b4: 0c83 1000 8000 cmpil #268468224,%d3
5a2ba: 6652 bnes 5a30e <_POSIX_signals_Unblock_thread+0x86>
if ( (the_thread->Wait.option & mask) || (~api->signals_blocked & mask) ) {
5a2bc: 2200 movel %d0,%d1 5a2be: c2aa 0030 andl %a2@(48),%d1
5a2c2: 660c bnes 5a2d0 <_POSIX_signals_Unblock_thread+0x48>
5a2c4: 2228 00cc movel %a0@(204),%d1 5a2c8: 4681 notl %d1 5a2ca: c081 andl %d1,%d0 5a2cc: 6700 009e beqw 5a36c <_POSIX_signals_Unblock_thread+0xe4>
the_thread->Wait.return_code = EINTR;
5a2d0: 7004 moveq #4,%d0
the_info = (siginfo_t *) the_thread->Wait.return_argument;
5a2d2: 206a 0028 moveal %a2@(40),%a0
*/
if ( _States_Is_interruptible_signal( the_thread->current_state ) ) {
if ( (the_thread->Wait.option & mask) || (~api->signals_blocked & mask) ) {
the_thread->Wait.return_code = EINTR;
5a2d6: 2540 0034 movel %d0,%a2@(52)
the_info = (siginfo_t *) the_thread->Wait.return_argument;
if ( !info ) {
5a2da: 4a89 tstl %a1
5a2dc: 6610 bnes 5a2ee <_POSIX_signals_Unblock_thread+0x66>
the_info->si_signo = signo;
the_info->si_code = SI_USER;
5a2de: 103c 0001 moveb #1,%d0
the_thread->Wait.return_code = EINTR;
the_info = (siginfo_t *) the_thread->Wait.return_argument;
if ( !info ) {
the_info->si_signo = signo;
5a2e2: 2082 movel %d2,%a0@
the_info->si_code = SI_USER;
5a2e4: 2140 0004 movel %d0,%a0@(4)
the_info->si_value.sival_int = 0;
5a2e8: 42a8 0008 clrl %a0@(8) 5a2ec: 6012 bras 5a300 <_POSIX_signals_Unblock_thread+0x78>
} else {
*the_info = *info;
5a2ee: 4878 000c pea c <OPER1> 5a2f2: 2f09 movel %a1,%sp@- 5a2f4: 2f08 movel %a0,%sp@- 5a2f6: 4eb9 0004 d300 jsr 4d300 <memcpy> 5a2fc: 4fef 000c lea %sp@(12),%sp
}
_Thread_queue_Extract_with_proxy( the_thread );
5a300: 2f0a movel %a2,%sp@- 5a302: 4eb9 0004 7cfc jsr 47cfc <_Thread_queue_Extract_with_proxy>
return true;
5a308: 588f addql #4,%sp 5a30a: 7001 moveq #1,%d0 5a30c: 6060 bras 5a36e <_POSIX_signals_Unblock_thread+0xe6>
}
/*
* Thread is not waiting due to a sigwait.
*/
if ( ~api->signals_blocked & mask ) {
5a30e: 2428 00cc movel %a0@(204),%d2 5a312: 4682 notl %d2 5a314: c082 andl %d2,%d0
5a316: 6754 beqs 5a36c <_POSIX_signals_Unblock_thread+0xe4>
* it is not blocked, THEN
* we need to dispatch at the end of this ISR.
* + Any other combination, do nothing.
*/
if ( the_thread->current_state & STATES_INTERRUPTIBLE_BY_SIGNAL ) {
5a318: 0801 001c btst #28,%d1
5a31c: 6732 beqs 5a350 <_POSIX_signals_Unblock_thread+0xc8>
the_thread->Wait.return_code = EINTR;
5a31e: 7004 moveq #4,%d0 5a320: 2540 0034 movel %d0,%a2@(52)
#if 0
if ( _States_Is_waiting_on_thread_queue(the_thread->current_state) )
_Thread_queue_Extract_with_proxy( the_thread );
else
#endif
if ( _States_Is_delaying(the_thread->current_state) ){
5a324: 44c1 movew %d1,%ccr
5a326: 6a44 bpls 5a36c <_POSIX_signals_Unblock_thread+0xe4><== NEVER TAKEN
if ( _Watchdog_Is_active( &the_thread->Timer ) )
5a328: 103c 0002 moveb #2,%d0 5a32c: b0aa 0050 cmpl %a2@(80),%d0
5a330: 660c bnes 5a33e <_POSIX_signals_Unblock_thread+0xb6><== NEVER TAKEN
(void) _Watchdog_Remove( &the_thread->Timer );
5a332: 486a 0048 pea %a2@(72) 5a336: 4eb9 0004 8730 jsr 48730 <_Watchdog_Remove> 5a33c: 588f addql #4,%sp
RTEMS_INLINE_ROUTINE void _Thread_Unblock (
Thread_Control *the_thread
)
{
_Thread_Clear_state( the_thread, STATES_BLOCKED );
5a33e: 2f3c 1003 fff8 movel #268697592,%sp@- 5a344: 2f0a movel %a2,%sp@- 5a346: 4eb9 0004 72f0 jsr 472f0 <_Thread_Clear_state> 5a34c: 508f addql #8,%sp 5a34e: 601c bras 5a36c <_POSIX_signals_Unblock_thread+0xe4>
_Thread_Unblock( the_thread );
}
} else if ( the_thread->current_state == STATES_READY ) {
5a350: 4a81 tstl %d1
5a352: 6618 bnes 5a36c <_POSIX_signals_Unblock_thread+0xe4><== NEVER TAKEN
if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) )
5a354: 4ab9 0005 ddd8 tstl 5ddd8 <_Per_CPU_Information+0x8>
5a35a: 6710 beqs 5a36c <_POSIX_signals_Unblock_thread+0xe4>
5a35c: b5f9 0005 dddc cmpal 5dddc <_Per_CPU_Information+0xc>,%a2
5a362: 6608 bnes 5a36c <_POSIX_signals_Unblock_thread+0xe4><== NEVER TAKEN
_Context_Switch_necessary = true;
5a364: 7001 moveq #1,%d0 5a366: 13c0 0005 dde8 moveb %d0,5dde8 <_Per_CPU_Information+0x18>
}
}
return false;
5a36c: 4200 clrb %d0
}
5a36e: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2
5a374: 4e5e unlk %fp <== NOT EXECUTED
0004a7f4 <_RTEMS_tasks_Post_switch_extension>:
*/
void _RTEMS_tasks_Post_switch_extension(
Thread_Control *executing
)
{
4a7f4: 4e56 ffec linkw %fp,#-20
RTEMS_API_Control *api;
ASR_Information *asr;
rtems_signal_set signal_set;
Modes_Control prev_mode;
api = executing->API_Extensions[ THREAD_API_RTEMS ];
4a7f8: 206e 0008 moveal %fp@(8),%a0
*/
void _RTEMS_tasks_Post_switch_extension(
Thread_Control *executing
)
{
4a7fc: 48d7 0c0c moveml %d2-%d3/%a2-%a3,%sp@
RTEMS_API_Control *api;
ASR_Information *asr;
rtems_signal_set signal_set;
Modes_Control prev_mode;
api = executing->API_Extensions[ THREAD_API_RTEMS ];
4a800: 2468 010a moveal %a0@(266),%a2
if ( !api )
4a804: 4a8a tstl %a2
4a806: 6754 beqs 4a85c <_RTEMS_tasks_Post_switch_extension+0x68><== NEVER TAKEN
* Signal Processing
*/
asr = &api->Signal;
_ISR_Disable( level );
4a808: 203c 0000 0700 movel #1792,%d0 4a80e: 40c1 movew %sr,%d1 4a810: 8081 orl %d1,%d0 4a812: 46c0 movew %d0,%sr
signal_set = asr->signals_posted;
4a814: 262a 0012 movel %a2@(18),%d3
asr->signals_posted = 0;
4a818: 42aa 0012 clrl %a2@(18)
_ISR_Enable( level );
4a81c: 46c1 movew %d1,%sr
if ( !signal_set ) /* similar to _ASR_Are_signals_pending( asr ) */
4a81e: 4a83 tstl %d3
4a820: 673a beqs 4a85c <_RTEMS_tasks_Post_switch_extension+0x68>
return;
asr->nest_level += 1;
4a822: 52aa 001a addql #1,%a2@(26)
rtems_task_mode( asr->mode_set, RTEMS_ALL_MODE_MASKS, &prev_mode );
4a826: 240e movel %fp,%d2 4a828: 5982 subql #4,%d2 4a82a: 47f9 0004 c5cc lea 4c5cc <rtems_task_mode>,%a3 4a830: 2f02 movel %d2,%sp@- 4a832: 2f3c 0000 ffff movel #65535,%sp@- 4a838: 2f2a 000e movel %a2@(14),%sp@- 4a83c: 4e93 jsr %a3@
(*asr->handler)( signal_set );
4a83e: 2f03 movel %d3,%sp@- 4a840: 206a 000a moveal %a2@(10),%a0 4a844: 4e90 jsr %a0@
asr->nest_level -= 1;
4a846: 53aa 001a subql #1,%a2@(26)
rtems_task_mode( prev_mode, RTEMS_ALL_MODE_MASKS, &prev_mode );
4a84a: 2f02 movel %d2,%sp@- 4a84c: 2f3c 0000 ffff movel #65535,%sp@- 4a852: 2f2e fffc movel %fp@(-4),%sp@- 4a856: 4e93 jsr %a3@ 4a858: 4fef 001c lea %sp@(28),%sp
}
4a85c: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3
4a862: 4e5e unlk %fp <== NOT EXECUTED
000581e0 <_Region_Process_queue>:
*/
void _Region_Process_queue(
Region_Control *the_region
)
{
581e0: 4e56 ffe4 linkw %fp,#-28
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
581e4: 2039 0007 6510 movel 76510 <_Thread_Dispatch_disable_level>,%d0 581ea: 5280 addql #1,%d0 581ec: 48d7 3c1c moveml %d2-%d4/%a2-%a5,%sp@ 581f0: 266e 0008 moveal %fp@(8),%a3 581f4: 23c0 0007 6510 movel %d0,76510 <_Thread_Dispatch_disable_level>
* NOTE: Be sure to disable dispatching before unlocking the mutex * since we do not want to open a window where a context * switch could occur. */ _Thread_Disable_dispatch(); _RTEMS_Unlock_allocator();
581fa: 2f39 0007 65b2 movel 765b2 <_RTEMS_Allocator_Mutex>,%sp@-
/*
* NOTE: The following loop is O(n) where n is the number of
* threads whose memory request is satisfied.
*/
for ( ; ; ) {
the_thread = _Thread_queue_First( &the_region->Wait_queue );
58200: 240b movel %a3,%d2
RTEMS_INLINE_ROUTINE void *_Region_Allocate_segment (
Region_Control *the_region,
uintptr_t size
)
{
return _Heap_Allocate( &the_region->Memory, size );
58202: 260b movel %a3,%d3 58204: 0682 0000 0010 addil #16,%d2 5820a: 0683 0000 0068 addil #104,%d3 58210: 4bf9 0005 36a8 lea 536a8 <_Heap_Allocate_aligned_with_boundary>,%a5
if ( the_segment == NULL )
break;
*(void **)the_thread->Wait.return_argument = the_segment;
the_region->number_of_used_blocks += 1;
_Thread_queue_Extract( &the_region->Wait_queue, the_thread );
58216: 49f9 0005 8848 lea 58848 <_Thread_queue_Extract>,%a4
* NOTE: Be sure to disable dispatching before unlocking the mutex * since we do not want to open a window where a context * switch could occur. */ _Thread_Disable_dispatch(); _RTEMS_Unlock_allocator();
5821c: 4eb9 0005 2c30 jsr 52c30 <_API_Mutex_Unlock> 58222: 588f addql #4,%sp
/*
* NOTE: The following loop is O(n) where n is the number of
* threads whose memory request is satisfied.
*/
for ( ; ; ) {
the_thread = _Thread_queue_First( &the_region->Wait_queue );
58224: 283c 0005 8948 movel #362824,%d4 5822a: 2f02 movel %d2,%sp@- 5822c: 2044 moveal %d4,%a0 5822e: 4e90 jsr %a0@
if ( the_thread == NULL )
58230: 588f addql #4,%sp
/*
* NOTE: The following loop is O(n) where n is the number of
* threads whose memory request is satisfied.
*/
for ( ; ; ) {
the_thread = _Thread_queue_First( &the_region->Wait_queue );
58232: 2440 moveal %d0,%a2
if ( the_thread == NULL )
58234: 4a80 tstl %d0
58236: 672c beqs 58264 <_Region_Process_queue+0x84>
58238: 42a7 clrl %sp@- 5823a: 42a7 clrl %sp@- 5823c: 2f2a 0024 movel %a2@(36),%sp@- 58240: 2f03 movel %d3,%sp@- 58242: 4e95 jsr %a5@
the_segment = (void **) _Region_Allocate_segment(
the_region,
the_thread->Wait.count
);
if ( the_segment == NULL )
58244: 4fef 0010 lea %sp@(16),%sp 58248: 4a80 tstl %d0
5824a: 6718 beqs 58264 <_Region_Process_queue+0x84>
break;
*(void **)the_thread->Wait.return_argument = the_segment;
5824c: 206a 0028 moveal %a2@(40),%a0 58250: 2080 movel %d0,%a0@
the_region->number_of_used_blocks += 1;
58252: 52ab 0064 addql #1,%a3@(100)
_Thread_queue_Extract( &the_region->Wait_queue, the_thread );
58256: 2f0a movel %a2,%sp@- 58258: 2f02 movel %d2,%sp@- 5825a: 4e94 jsr %a4@
the_thread->Wait.return_code = RTEMS_SUCCESSFUL;
}
5825c: 508f addql #8,%sp
break;
*(void **)the_thread->Wait.return_argument = the_segment;
the_region->number_of_used_blocks += 1;
_Thread_queue_Extract( &the_region->Wait_queue, the_thread );
the_thread->Wait.return_code = RTEMS_SUCCESSFUL;
5825e: 42aa 0034 clrl %a2@(52)
}
58262: 60c6 bras 5822a <_Region_Process_queue+0x4a>
_Thread_Enable_dispatch(); }
58264: 4cee 3c1c ffe4 moveml %fp@(-28),%d2-%d4/%a2-%a5 5826a: 4e5e unlk %fp
*(void **)the_thread->Wait.return_argument = the_segment;
the_region->number_of_used_blocks += 1;
_Thread_queue_Extract( &the_region->Wait_queue, the_thread );
the_thread->Wait.return_code = RTEMS_SUCCESSFUL;
}
_Thread_Enable_dispatch();
5826c: 4ef9 0005 4e6a jmp 54e6a <_Thread_Enable_dispatch>
...
00046178 <_TOD_Validate>:
*/
bool _TOD_Validate(
const rtems_time_of_day *the_tod
)
{
46178: 4e56 0000 linkw %fp,#0 4617c: 206e 0008 moveal %fp@(8),%a0 46180: 2f03 movel %d3,%sp@-
uint32_t days_in_month;
uint32_t ticks_per_second;
ticks_per_second = TOD_MICROSECONDS_PER_SECOND /
rtems_configuration_get_microseconds_per_tick();
46182: 2039 0005 e350 movel 5e350 <Configuration+0xc>,%d0
*/
bool _TOD_Validate(
const rtems_time_of_day *the_tod
)
{
46188: 2f02 movel %d2,%sp@-
uint32_t days_in_month;
uint32_t ticks_per_second;
ticks_per_second = TOD_MICROSECONDS_PER_SECOND /
rtems_configuration_get_microseconds_per_tick();
if ((!the_tod) ||
4618a: 4a88 tstl %a0
4618c: 6762 beqs 461f0 <_TOD_Validate+0x78> <== NEVER TAKEN
)
{
uint32_t days_in_month;
uint32_t ticks_per_second;
ticks_per_second = TOD_MICROSECONDS_PER_SECOND /
4618e: 243c 000f 4240 movel #1000000,%d2 46194: 4c40 2002 remul %d0,%d2,%d2
rtems_configuration_get_microseconds_per_tick(); if ((!the_tod) ||
46198: b4a8 0018 cmpl %a0@(24),%d2
4619c: 6352 blss 461f0 <_TOD_Validate+0x78>
(the_tod->ticks >= ticks_per_second) ||
4619e: 763b moveq #59,%d3 461a0: b6a8 0014 cmpl %a0@(20),%d3
461a4: 654a bcss 461f0 <_TOD_Validate+0x78>
(the_tod->second >= TOD_SECONDS_PER_MINUTE) ||
461a6: b6a8 0010 cmpl %a0@(16),%d3
461aa: 6544 bcss 461f0 <_TOD_Validate+0x78>
(the_tod->minute >= TOD_MINUTES_PER_HOUR) ||
461ac: 7017 moveq #23,%d0 461ae: b0a8 000c cmpl %a0@(12),%d0
461b2: 653c bcss 461f0 <_TOD_Validate+0x78>
(the_tod->hour >= TOD_HOURS_PER_DAY) ||
(the_tod->month == 0) ||
461b4: 2028 0004 movel %a0@(4),%d0
rtems_configuration_get_microseconds_per_tick();
if ((!the_tod) ||
(the_tod->ticks >= ticks_per_second) ||
(the_tod->second >= TOD_SECONDS_PER_MINUTE) ||
(the_tod->minute >= TOD_MINUTES_PER_HOUR) ||
(the_tod->hour >= TOD_HOURS_PER_DAY) ||
461b8: 6736 beqs 461f0 <_TOD_Validate+0x78> <== NEVER TAKEN
(the_tod->month == 0) ||
461ba: 720c moveq #12,%d1 461bc: b280 cmpl %d0,%d1
461be: 6530 bcss 461f0 <_TOD_Validate+0x78>
(the_tod->month > TOD_MONTHS_PER_YEAR) ||
(the_tod->year < TOD_BASE_YEAR) ||
461c0: 2410 movel %a0@,%d2
(the_tod->ticks >= ticks_per_second) ||
(the_tod->second >= TOD_SECONDS_PER_MINUTE) ||
(the_tod->minute >= TOD_MINUTES_PER_HOUR) ||
(the_tod->hour >= TOD_HOURS_PER_DAY) ||
(the_tod->month == 0) ||
(the_tod->month > TOD_MONTHS_PER_YEAR) ||
461c2: 0c82 0000 07c3 cmpil #1987,%d2
461c8: 6326 blss 461f0 <_TOD_Validate+0x78>
(the_tod->year < TOD_BASE_YEAR) ||
(the_tod->day == 0) )
461ca: 2228 0008 movel %a0@(8),%d1
(the_tod->second >= TOD_SECONDS_PER_MINUTE) ||
(the_tod->minute >= TOD_MINUTES_PER_HOUR) ||
(the_tod->hour >= TOD_HOURS_PER_DAY) ||
(the_tod->month == 0) ||
(the_tod->month > TOD_MONTHS_PER_YEAR) ||
(the_tod->year < TOD_BASE_YEAR) ||
461ce: 6720 beqs 461f0 <_TOD_Validate+0x78> <== NEVER TAKEN
(the_tod->day == 0) )
return false;
if ( (the_tod->year % 4) == 0 )
461d0: 163c 0003 moveb #3,%d3 461d4: 41f9 0005 d2fa lea 5d2fa <_TOD_Days_per_month>,%a0 461da: c483 andl %d3,%d2
461dc: 6606 bnes 461e4 <_TOD_Validate+0x6c>
days_in_month = _TOD_Days_per_month[ 1 ][ the_tod->month ];
461de: 2030 0c34 movel %a0@(00000034,%d0:l:4),%d0 461e2: 6004 bras 461e8 <_TOD_Validate+0x70>
else
days_in_month = _TOD_Days_per_month[ 0 ][ the_tod->month ];
461e4: 2030 0c00 movel %a0@(00000000,%d0:l:4),%d0
* false - if the the_tod is invalid
*
* NOTE: This routine only works for leap-years through 2099.
*/
bool _TOD_Validate(
461e8: b081 cmpl %d1,%d0 461ea: 54c0 scc %d0 461ec: 4480 negl %d0 461ee: 6002 bras 461f2 <_TOD_Validate+0x7a>
(the_tod->hour >= TOD_HOURS_PER_DAY) ||
(the_tod->month == 0) ||
(the_tod->month > TOD_MONTHS_PER_YEAR) ||
(the_tod->year < TOD_BASE_YEAR) ||
(the_tod->day == 0) )
return false;
461f0: 4200 clrb %d0
if ( the_tod->day > days_in_month )
return false;
return true;
}
461f2: 241f movel %sp@+,%d2 461f4: 261f movel %sp@+,%d3 461f6: 4e5e unlk %fp
...
000471b0 <_Thread_Change_priority>:
void _Thread_Change_priority(
Thread_Control *the_thread,
Priority_Control new_priority,
bool prepend_it
)
{
471b0: 4e56 fff0 linkw %fp,#-16 471b4: 48d7 041c moveml %d2-%d4/%a2,%sp@ 471b8: 246e 0008 moveal %fp@(8),%a2
*/
/*
* Save original state
*/
original_state = the_thread->current_state;
471bc: 242a 0010 movel %a2@(16),%d2
void _Thread_Change_priority(
Thread_Control *the_thread,
Priority_Control new_priority,
bool prepend_it
)
{
471c0: 262e 000c movel %fp@(12),%d3
/* * Set a transient state for the thread so it is pulled off the Ready chains. * This will prevent it from being scheduled no matter what happens in an * ISR. */ _Thread_Set_transient( the_thread );
471c4: 2f0a movel %a2,%sp@-
void _Thread_Change_priority(
Thread_Control *the_thread,
Priority_Control new_priority,
bool prepend_it
)
{
471c6: 182e 0013 moveb %fp@(19),%d4
/* * Set a transient state for the thread so it is pulled off the Ready chains. * This will prevent it from being scheduled no matter what happens in an * ISR. */ _Thread_Set_transient( the_thread );
471ca: 4eb9 0004 7fbc jsr 47fbc <_Thread_Set_transient>
/*
* Do not bother recomputing all the priority related information if
* we are not REALLY changing priority.
*/
if ( the_thread->current_priority != new_priority )
471d0: 588f addql #4,%sp 471d2: b6aa 0014 cmpl %a2@(20),%d3
471d6: 670c beqs 471e4 <_Thread_Change_priority+0x34>
_Thread_Set_priority( the_thread, new_priority );
471d8: 2f03 movel %d3,%sp@- 471da: 2f0a movel %a2,%sp@- 471dc: 4eb9 0004 7e64 jsr 47e64 <_Thread_Set_priority> 471e2: 508f addql #8,%sp
_ISR_Disable( level );
471e4: 223c 0000 0700 movel #1792,%d1 471ea: 40c0 movew %sr,%d0 471ec: 8280 orl %d0,%d1 471ee: 46c1 movew %d1,%sr 471f0: 7604 moveq #4,%d3
/*
* If the thread has more than STATES_TRANSIENT set, then it is blocked,
* If it is blocked on a thread queue, then we need to requeue it.
*/
state = the_thread->current_state;
471f2: 222a 0010 movel %a2@(16),%d1 471f6: c483 andl %d3,%d2
if ( state != STATES_TRANSIENT ) {
471f8: b681 cmpl %d1,%d3
471fa: 6730 beqs 4722c <_Thread_Change_priority+0x7c>
/* Only clear the transient state if it wasn't set already */
if ( ! _States_Is_transient( original_state ) )
471fc: 4a82 tstl %d2
471fe: 6608 bnes 47208 <_Thread_Change_priority+0x58> <== NEVER TAKEN
RTEMS_INLINE_ROUTINE States_Control _States_Clear (
States_Control states_to_clear,
States_Control current_state
)
{
return (current_state & ~states_to_clear);
47200: 74fb moveq #-5,%d2 47202: c481 andl %d1,%d2 47204: 2542 0010 movel %d2,%a2@(16)
the_thread->current_state = _States_Clear( STATES_TRANSIENT, state );
_ISR_Enable( level );
47208: 46c0 movew %d0,%sr
*/
RTEMS_INLINE_ROUTINE bool _States_Is_waiting_on_thread_queue (
States_Control the_states
)
{
return (the_states & STATES_WAITING_ON_THREAD_QUEUE);
4720a: 0281 0003 bee0 andil #245472,%d1
if ( _States_Is_waiting_on_thread_queue( state ) ) {
47210: 6700 00d2 beqw 472e4 <_Thread_Change_priority+0x134>
_Thread_queue_Requeue( the_thread->Wait.queue, the_thread );
47214: 2d4a 000c movel %a2,%fp@(12) 47218: 2d6a 0044 0008 movel %a2@(68),%fp@(8)
if ( !_Thread_Is_executing_also_the_heir() &&
_Thread_Executing->is_preemptible )
_Context_Switch_necessary = true;
_ISR_Enable( level );
}
4721e: 4cee 041c fff0 moveml %fp@(-16),%d2-%d4/%a2 47224: 4e5e unlk %fp
/* Only clear the transient state if it wasn't set already */
if ( ! _States_Is_transient( original_state ) )
the_thread->current_state = _States_Clear( STATES_TRANSIENT, state );
_ISR_Enable( level );
if ( _States_Is_waiting_on_thread_queue( state ) ) {
_Thread_queue_Requeue( the_thread->Wait.queue, the_thread );
47226: 4ef9 0004 7dc8 jmp 47dc8 <_Thread_queue_Requeue>
}
return;
}
/* Only clear the transient state if it wasn't set already */
if ( ! _States_Is_transient( original_state ) ) {
4722c: 4a82 tstl %d2
4722e: 6650 bnes 47280 <_Thread_Change_priority+0xd0> <== NEVER TAKEN
RTEMS_INLINE_ROUTINE void _Priority_Add_to_bit_map (
Priority_Information *the_priority_map
)
{
*the_priority_map->minor |= the_priority_map->ready_minor;
47230: 206a 008e moveal %a2@(142),%a0 47234: 322a 0094 movew %a2@(148),%d1 47238: 3410 movew %a0@,%d2
* Interrupts are STILL disabled.
* We now know the thread will be in the READY state when we remove
* the TRANSIENT state. So we have to place it on the appropriate
* Ready Queue with interrupts off.
*/
the_thread->current_state = _States_Clear( STATES_TRANSIENT, state );
4723a: 42aa 0010 clrl %a2@(16) 4723e: 8282 orl %d2,%d1 47240: 3081 movew %d1,%a0@ 47242: 206a 008a moveal %a2@(138),%a0
_Priority_Major_bit_map |= the_priority_map->ready_major;
47246: 3239 0005 d9ec movew 5d9ec <_Priority_Major_bit_map>,%d1 4724c: 342a 0092 movew %a2@(146),%d2 47250: 8282 orl %d2,%d1 47252: 33c1 0005 d9ec movew %d1,5d9ec <_Priority_Major_bit_map>
_Priority_Add_to_bit_map( &the_thread->Priority_map );
if ( prepend_it )
47258: 4a04 tstb %d4
4725a: 6710 beqs 4726c <_Thread_Change_priority+0xbc>
)
{
Chain_Node *before_node;
the_node->previous = after_node;
before_node = after_node->next;
4725c: 2250 moveal %a0@,%a1
Chain_Node *the_node
)
{
Chain_Node *before_node;
the_node->previous = after_node;
4725e: 2548 0004 movel %a0,%a2@(4)
before_node = after_node->next; after_node->next = the_node;
47262: 208a movel %a2,%a0@
the_node->next = before_node; before_node->previous = the_node;
47264: 234a 0004 movel %a2,%a1@(4)
Chain_Node *before_node;
the_node->previous = after_node;
before_node = after_node->next;
after_node->next = the_node;
the_node->next = before_node;
47268: 2489 movel %a1,%a2@ 4726a: 6014 bras 47280 <_Thread_Change_priority+0xd0>
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
4726c: 2608 movel %a0,%d3 4726e: 5883 addql #4,%d3
)
{
Chain_Node *old_last_node;
the_node->next = _Chain_Tail(the_chain);
old_last_node = the_chain->last;
47270: 2268 0008 moveal %a0@(8),%a1
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
47274: 2483 movel %d3,%a2@
{
Chain_Node *old_last_node;
the_node->next = _Chain_Tail(the_chain);
old_last_node = the_chain->last;
the_chain->last = the_node;
47276: 214a 0008 movel %a2,%a0@(8)
old_last_node->next = the_node;
4727a: 228a movel %a2,%a1@
the_node->previous = old_last_node;
4727c: 2549 0004 movel %a1,%a2@(4)
_Chain_Prepend_unprotected( the_thread->ready, &the_thread->Object.Node );
else
_Chain_Append_unprotected( the_thread->ready, &the_thread->Object.Node );
}
_ISR_Flash( level );
47280: 223c 0000 0700 movel #1792,%d1 47286: 46c0 movew %d0,%sr 47288: 8280 orl %d0,%d1 4728a: 46c1 movew %d1,%sr
RTEMS_INLINE_ROUTINE Priority_Control _Priority_Get_highest( void )
{
Priority_Bit_map_control minor;
Priority_Bit_map_control major;
_Bitfield_Find_first_bit( _Priority_Major_bit_map, major );
4728c: 3239 0005 d9ec movew 5d9ec <_Priority_Major_bit_map>,%d1 47292: 4841 swap %d1 47294: 04c1 ff1 %d1
_Bitfield_Find_first_bit( _Priority_Bit_map[major], minor );
47296: 4282 clrl %d2 47298: 41f9 0005 da54 lea 5da54 <_Priority_Bit_map>,%a0 4729e: 3401 movew %d1,%d2 472a0: 3230 2a00 movew %a0@(00000000,%d2:l:2),%d1 472a4: 4841 swap %d1 472a6: 04c1 ff1 %d1
return (_Priority_Bits_index( major ) << 4) +
472a8: 4283 clrl %d3 472aa: e98a lsll #4,%d2 472ac: 3601 movew %d1,%d3
*/
RTEMS_INLINE_ROUTINE void _Thread_Calculate_heir( void )
{
_Thread_Heir = (Thread_Control *)
_Thread_Ready_chain[ _Priority_Get_highest() ].first;
472ae: 2079 0005 d900 moveal 5d900 <_Thread_Ready_chain>,%a0 472b4: 2202 movel %d2,%d1 472b6: d283 addl %d3,%d1 472b8: 2401 movel %d1,%d2 472ba: e58a lsll #2,%d2 472bc: e989 lsll #4,%d1 472be: 91c2 subal %d2,%a0
* ready thread.
*/
RTEMS_INLINE_ROUTINE void _Thread_Calculate_heir( void )
{
_Thread_Heir = (Thread_Control *)
472c0: 2230 1800 movel %a0@(00000000,%d1:l),%d1
* is also the heir thread, and false otherwise.
*/
RTEMS_INLINE_ROUTINE bool _Thread_Is_executing_also_the_heir( void )
{
return ( _Thread_Executing == _Thread_Heir );
472c4: 2079 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a0
* ready thread.
*/
RTEMS_INLINE_ROUTINE void _Thread_Calculate_heir( void )
{
_Thread_Heir = (Thread_Control *)
472ca: 23c1 0005 dde0 movel %d1,5dde0 <_Per_CPU_Information+0x10>
* We altered the set of thread priorities. So let's figure out
* who is the heir and if we need to switch to them.
*/
_Thread_Calculate_heir();
if ( !_Thread_Is_executing_also_the_heir() &&
472d0: b288 cmpl %a0,%d1
472d2: 670e beqs 472e2 <_Thread_Change_priority+0x132>
472d4: 4a28 0074 tstb %a0@(116)
472d8: 6708 beqs 472e2 <_Thread_Change_priority+0x132>
_Thread_Executing->is_preemptible )
_Context_Switch_necessary = true;
472da: 7201 moveq #1,%d1 472dc: 13c1 0005 dde8 moveb %d1,5dde8 <_Per_CPU_Information+0x18>
_ISR_Enable( level );
472e2: 46c0 movew %d0,%sr
}
472e4: 4cee 041c fff0 moveml %fp@(-16),%d2-%d4/%a2 472ea: 4e5e unlk %fp
...
000472f0 <_Thread_Clear_state>:
void _Thread_Clear_state(
Thread_Control *the_thread,
States_Control state
)
{
472f0: 4e56 fff0 linkw %fp,#-16 472f4: 206e 0008 moveal %fp@(8),%a0 472f8: 48d7 041c moveml %d2-%d4/%a2,%sp@
ISR_Level level;
States_Control current_state;
_ISR_Disable( level );
472fc: 263c 0000 0700 movel #1792,%d3 47302: 2203 movel %d3,%d1
void _Thread_Clear_state(
Thread_Control *the_thread,
States_Control state
)
{
47304: 202e 000c movel %fp@(12),%d0
ISR_Level level;
States_Control current_state;
_ISR_Disable( level );
47308: 40c2 movew %sr,%d2 4730a: 8282 orl %d2,%d1 4730c: 46c1 movew %d1,%sr
current_state = the_thread->current_state;
4730e: 2228 0010 movel %a0@(16),%d1
if ( current_state & state ) {
47312: 2800 movel %d0,%d4 47314: c881 andl %d1,%d4
47316: 6778 beqs 47390 <_Thread_Clear_state+0xa0>
RTEMS_INLINE_ROUTINE States_Control _States_Clear (
States_Control states_to_clear,
States_Control current_state
)
{
return (current_state & ~states_to_clear);
47318: 4680 notl %d0 4731a: c081 andl %d1,%d0
current_state =
the_thread->current_state = _States_Clear( state, current_state );
4731c: 2140 0010 movel %d0,%a0@(16)
if ( _States_Is_ready( current_state ) ) {
47320: 666e bnes 47390 <_Thread_Clear_state+0xa0>
RTEMS_INLINE_ROUTINE void _Priority_Add_to_bit_map (
Priority_Information *the_priority_map
)
{
*the_priority_map->minor |= the_priority_map->ready_minor;
47322: 2268 008e moveal %a0@(142),%a1 47326: 3028 0094 movew %a0@(148),%d0 4732a: 3211 movew %a1@,%d1 4732c: 8081 orl %d1,%d0 4732e: 3280 movew %d0,%a1@
_Priority_Add_to_bit_map( &the_thread->Priority_map );
_Chain_Append_unprotected(the_thread->ready, &the_thread->Object.Node);
47330: 2268 008a moveal %a0@(138),%a1
_Priority_Major_bit_map |= the_priority_map->ready_major;
47334: 3039 0005 d9ec movew 5d9ec <_Priority_Major_bit_map>,%d0 4733a: 3228 0092 movew %a0@(146),%d1
)
{
Chain_Node *old_last_node;
the_node->next = _Chain_Tail(the_chain);
old_last_node = the_chain->last;
4733e: 2469 0008 moveal %a1@(8),%a2 47342: 8081 orl %d1,%d0 47344: 33c0 0005 d9ec movew %d0,5d9ec <_Priority_Major_bit_map>
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
4734a: 2009 movel %a1,%d0 4734c: 5880 addql #4,%d0 4734e: 2080 movel %d0,%a0@
{
Chain_Node *old_last_node;
the_node->next = _Chain_Tail(the_chain);
old_last_node = the_chain->last;
the_chain->last = the_node;
47350: 2348 0008 movel %a0,%a1@(8)
old_last_node->next = the_node;
47354: 2488 movel %a0,%a2@
the_node->previous = old_last_node;
47356: 214a 0004 movel %a2,%a0@(4)
_ISR_Flash( level );
4735a: 2003 movel %d3,%d0 4735c: 46c2 movew %d2,%sr 4735e: 8082 orl %d2,%d0 47360: 46c0 movew %d0,%sr
* a context switch.
* Pseudo-ISR case:
* Even if the thread isn't preemptible, if the new heir is
* a pseudo-ISR system task, we need to do a context switch.
*/
if ( the_thread->current_priority < _Thread_Heir->current_priority ) {
47362: 2028 0014 movel %a0@(20),%d0 47366: 2279 0005 dde0 moveal 5dde0 <_Per_CPU_Information+0x10>,%a1 4736c: b0a9 0014 cmpl %a1@(20),%d0
47370: 641e bccs 47390 <_Thread_Clear_state+0xa0>
_Thread_Heir = the_thread;
47372: 23c8 0005 dde0 movel %a0,5dde0 <_Per_CPU_Information+0x10>
if ( _Thread_Executing->is_preemptible ||
47378: 2079 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a0 4737e: 4a28 0074 tstb %a0@(116)
47382: 6604 bnes 47388 <_Thread_Clear_state+0x98>
47384: 4a80 tstl %d0
47386: 6608 bnes 47390 <_Thread_Clear_state+0xa0> <== ALWAYS TAKEN
the_thread->current_priority == 0 )
_Context_Switch_necessary = true;
47388: 7001 moveq #1,%d0 4738a: 13c0 0005 dde8 moveb %d0,5dde8 <_Per_CPU_Information+0x18>
}
}
}
_ISR_Enable( level );
47390: 46c2 movew %d2,%sr
}
47392: 4cd7 041c moveml %sp@,%d2-%d4/%a2 47396: 4e5e unlk %fp
...
0004751c <_Thread_Delay_ended>:
void _Thread_Delay_ended(
Objects_Id id,
void *ignored __attribute__((unused))
)
{
4751c: 4e56 fffc linkw %fp,#-4
Thread_Control *the_thread;
Objects_Locations location;
the_thread = _Thread_Get( id, &location );
47520: 486e fffc pea %fp@(-4) 47524: 2f2e 0008 movel %fp@(8),%sp@- 47528: 4eb9 0004 76bc jsr 476bc <_Thread_Get>
switch ( location ) {
4752e: 508f addql #8,%sp 47530: 4aae fffc tstl %fp@(-4)
47534: 661e bnes 47554 <_Thread_Delay_ended+0x38> <== NEVER TAKEN
#if defined(RTEMS_MULTIPROCESSING)
case OBJECTS_REMOTE: /* impossible */
#endif
break;
case OBJECTS_LOCAL:
_Thread_Clear_state(
47536: 2f3c 1000 0018 movel #268435480,%sp@- 4753c: 2f00 movel %d0,%sp@- 4753e: 4eb9 0004 72f0 jsr 472f0 <_Thread_Clear_state> 47544: 508f addql #8,%sp 47546: 2039 0005 d94c movel 5d94c <_Thread_Dispatch_disable_level>,%d0 4754c: 5380 subql #1,%d0 4754e: 23c0 0005 d94c movel %d0,5d94c <_Thread_Dispatch_disable_level>
| STATES_INTERRUPTIBLE_BY_SIGNAL
);
_Thread_Unnest_dispatch();
break;
}
}
47554: 4e5e unlk %fp <== NOT EXECUTED
00047558 <_Thread_Dispatch>:
* dispatch thread
* no dispatch thread
*/
void _Thread_Dispatch( void )
{
47558: 4e56 ffc8 linkw %fp,#-56 4755c: 48d7 3cfc moveml %d2-%d7/%a2-%a5,%sp@
Thread_Control *executing;
Thread_Control *heir;
ISR_Level level;
executing = _Thread_Executing;
_ISR_Disable( level );
47560: 283c 0000 0700 movel #1792,%d4 47566: 2204 movel %d4,%d1
{
Thread_Control *executing;
Thread_Control *heir;
ISR_Level level;
executing = _Thread_Executing;
47568: 2479 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a2
_ISR_Disable( level );
4756e: 40c0 movew %sr,%d0 47570: 8280 orl %d0,%d1 47572: 46c1 movew %d1,%sr
_ISR_Enable( level );
#ifndef __RTEMS_USE_TICKS_FOR_STATISTICS__
{
Timestamp_Control uptime, ran;
_TOD_Get_uptime( &uptime );
47574: 260e movel %fp,%d3
_Timestamp_Subtract(
47576: 240e movel %fp,%d2
_ISR_Enable( level );
#ifndef __RTEMS_USE_TICKS_FOR_STATISTICS__
{
Timestamp_Control uptime, ran;
_TOD_Get_uptime( &uptime );
47578: 5183 subql #8,%d3
_Timestamp_Subtract(
4757a: 0682 ffff fff0 addil #-16,%d2
&_Thread_Time_of_last_context_switch,
&uptime,
&ran
);
_Timestamp_Add_to( &executing->cpu_time_used, &ran );
47580: 2e3c 0004 8328 movel #295720,%d7
if ( _Thread_libc_reent ) {
executing->libc_reent = *_Thread_libc_reent;
*_Thread_libc_reent = heir->libc_reent;
}
_User_extensions_Thread_switch( executing, heir );
47586: 2c3c 0004 85dc movel #296412,%d6
if ( executing->fp_context != NULL )
_Context_Save_fp( &executing->fp_context );
#endif
#endif
_Context_Switch( &executing->Registers, &heir->Registers );
4758c: 2a3c 0004 88f0 movel #297200,%d5
#if ( CPU_USE_DEFERRED_FP_SWITCH == TRUE )
if ( (executing->fp_context != NULL) &&
!_Thread_Is_allocated_fp( executing ) ) {
if ( _Thread_Allocated_fp != NULL )
_Context_Save_fp( &_Thread_Allocated_fp->fp_context );
_Context_Restore_fp( &executing->fp_context );
47592: 4bf9 0004 8a58 lea 48a58 <_CPU_Context_restore_fp>,%a5
#if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE )
#if ( CPU_USE_DEFERRED_FP_SWITCH == TRUE )
if ( (executing->fp_context != NULL) &&
!_Thread_Is_allocated_fp( executing ) ) {
if ( _Thread_Allocated_fp != NULL )
_Context_Save_fp( &_Thread_Allocated_fp->fp_context );
47598: 49f9 0004 8a36 lea 48a36 <_CPU_Context_save_fp>,%a4
Thread_Control *heir;
ISR_Level level;
executing = _Thread_Executing;
_ISR_Disable( level );
while ( _Context_Switch_necessary == true ) {
4759e: 6000 00d4 braw 47674 <_Thread_Dispatch+0x11c>
heir = _Thread_Heir;
_Thread_Dispatch_disable_level = 1;
475a2: 7201 moveq #1,%d1 475a4: 23c1 0005 d94c movel %d1,5d94c <_Thread_Dispatch_disable_level>
ISR_Level level;
executing = _Thread_Executing;
_ISR_Disable( level );
while ( _Context_Switch_necessary == true ) {
heir = _Thread_Heir;
475aa: 2679 0005 dde0 moveal 5dde0 <_Per_CPU_Information+0x10>,%a3
_Thread_Dispatch_disable_level = 1;
_Context_Switch_necessary = false;
475b0: 4201 clrb %d1
_Thread_Executing = heir;
475b2: 23cb 0005 dddc movel %a3,5dddc <_Per_CPU_Information+0xc>
executing = _Thread_Executing;
_ISR_Disable( level );
while ( _Context_Switch_necessary == true ) {
heir = _Thread_Heir;
_Thread_Dispatch_disable_level = 1;
_Context_Switch_necessary = false;
475b8: 13c1 0005 dde8 moveb %d1,5dde8 <_Per_CPU_Information+0x18>
/*
* When the heir and executing are the same, then we are being
* requested to do the post switch dispatching. This is normally
* done to dispatch signals.
*/
if ( heir == executing )
475be: b5cb cmpal %a3,%a2 475c0: 6700 00bc beqw 4767e <_Thread_Dispatch+0x126>
*/
#if __RTEMS_ADA__
executing->rtems_ada_self = rtems_ada_self;
rtems_ada_self = heir->rtems_ada_self;
#endif
if ( heir->budget_algorithm == THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE )
475c4: 7201 moveq #1,%d1 475c6: b2ab 007a cmpl %a3@(122),%d1
475ca: 660a bnes 475d6 <_Thread_Dispatch+0x7e>
heir->cpu_time_budget = _Thread_Ticks_per_timeslice;
475cc: 41f9 0005 d904 lea 5d904 <_Thread_Ticks_per_timeslice>,%a0 475d2: 2750 0076 movel %a0@,%a3@(118)
_ISR_Enable( level );
475d6: 46c0 movew %d0,%sr
#ifndef __RTEMS_USE_TICKS_FOR_STATISTICS__
{
Timestamp_Control uptime, ran;
_TOD_Get_uptime( &uptime );
475d8: 2f03 movel %d3,%sp@- 475da: 4eb9 0004 ab7c jsr 4ab7c <_TOD_Get_uptime>
_Timestamp_Subtract(
475e0: 2f02 movel %d2,%sp@- 475e2: 2f03 movel %d3,%sp@- 475e4: 4879 0005 d9fa pea 5d9fa <_Thread_Time_of_last_context_switch> 475ea: 4eb9 0004 8360 jsr 48360 <_Timespec_Subtract>
&_Thread_Time_of_last_context_switch,
&uptime,
&ran
);
_Timestamp_Add_to( &executing->cpu_time_used, &ran );
475f0: 2047 moveal %d7,%a0 475f2: 2f02 movel %d2,%sp@- 475f4: 486a 0082 pea %a2@(130) 475f8: 4e90 jsr %a0@
#endif
/*
* Switch libc's task specific data.
*/
if ( _Thread_libc_reent ) {
475fa: 2079 0005 d9d2 moveal 5d9d2 <_Thread_libc_reent>,%a0 47600: 4fef 0018 lea %sp@(24),%sp
&_Thread_Time_of_last_context_switch,
&uptime,
&ran
);
_Timestamp_Add_to( &executing->cpu_time_used, &ran );
_Thread_Time_of_last_context_switch = uptime;
47604: 202e fff8 movel %fp@(-8),%d0 47608: 222e fffc movel %fp@(-4),%d1 4760c: 23c0 0005 d9fa movel %d0,5d9fa <_Thread_Time_of_last_context_switch> 47612: 23c1 0005 d9fe movel %d1,5d9fe <_Thread_Time_of_last_context_switch+0x4>
#endif
/*
* Switch libc's task specific data.
*/
if ( _Thread_libc_reent ) {
47618: 4a88 tstl %a0
4761a: 6708 beqs 47624 <_Thread_Dispatch+0xcc> <== NEVER TAKEN
executing->libc_reent = *_Thread_libc_reent;
4761c: 2550 0106 movel %a0@,%a2@(262)
*_Thread_libc_reent = heir->libc_reent;
47620: 20ab 0106 movel %a3@(262),%a0@
}
_User_extensions_Thread_switch( executing, heir );
47624: 2f0b movel %a3,%sp@- 47626: 2046 moveal %d6,%a0 47628: 2f0a movel %a2,%sp@- 4762a: 4e90 jsr %a0@
if ( executing->fp_context != NULL )
_Context_Save_fp( &executing->fp_context );
#endif
#endif
_Context_Switch( &executing->Registers, &heir->Registers );
4762c: 486b 00ce pea %a3@(206) 47630: 2045 moveal %d5,%a0 47632: 486a 00ce pea %a2@(206) 47636: 4e90 jsr %a0@
#if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE )
#if ( CPU_USE_DEFERRED_FP_SWITCH == TRUE )
if ( (executing->fp_context != NULL) &&
47638: 4fef 0010 lea %sp@(16),%sp 4763c: 4aaa 0102 tstl %a2@(258)
47640: 6724 beqs 47666 <_Thread_Dispatch+0x10e>
#if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE )
RTEMS_INLINE_ROUTINE bool _Thread_Is_allocated_fp (
const Thread_Control *the_thread
)
{
return ( the_thread == _Thread_Allocated_fp );
47642: 2079 0005 d9ce moveal 5d9ce <_Thread_Allocated_fp>,%a0 47648: b1ca cmpal %a2,%a0
4764a: 671a beqs 47666 <_Thread_Dispatch+0x10e>
!_Thread_Is_allocated_fp( executing ) ) {
if ( _Thread_Allocated_fp != NULL )
4764c: 4a88 tstl %a0
4764e: 6708 beqs 47658 <_Thread_Dispatch+0x100>
_Context_Save_fp( &_Thread_Allocated_fp->fp_context );
47650: 4868 0102 pea %a0@(258) 47654: 4e94 jsr %a4@ 47656: 588f addql #4,%sp
_Context_Restore_fp( &executing->fp_context );
47658: 486a 0102 pea %a2@(258) 4765c: 4e95 jsr %a5@
_Thread_Allocated_fp = executing;
4765e: 588f addql #4,%sp 47660: 23ca 0005 d9ce movel %a2,5d9ce <_Thread_Allocated_fp>
if ( executing->fp_context != NULL )
_Context_Restore_fp( &executing->fp_context );
#endif
#endif
executing = _Thread_Executing;
47666: 2479 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a2
_ISR_Disable( level );
4766c: 2204 movel %d4,%d1 4766e: 40c0 movew %sr,%d0 47670: 8280 orl %d0,%d1 47672: 46c1 movew %d1,%sr
Thread_Control *heir;
ISR_Level level;
executing = _Thread_Executing;
_ISR_Disable( level );
while ( _Context_Switch_necessary == true ) {
47674: 1239 0005 dde8 moveb 5dde8 <_Per_CPU_Information+0x18>,%d1 4767a: 6600 ff26 bnew 475a2 <_Thread_Dispatch+0x4a>
_ISR_Disable( level );
}
post_switch:
_Thread_Dispatch_disable_level = 0;
4767e: 42b9 0005 d94c clrl 5d94c <_Thread_Dispatch_disable_level>
_ISR_Enable( level );
47684: 46c0 movew %d0,%sr
_API_extensions_Run_postswitch();
47686: 4eb9 0004 5fe4 jsr 45fe4 <_API_extensions_Run_postswitch>
}
4768c: 4cee 3cfc ffc8 moveml %fp@(-56),%d2-%d7/%a2-%a5
47692: 4e5e unlk %fp <== NOT EXECUTED
000476bc <_Thread_Get>:
Thread_Control *_Thread_Get (
Objects_Id id,
Objects_Locations *location
)
{
476bc: 4e56 0000 linkw %fp,#0 476c0: 202e 0008 movel %fp@(8),%d0 476c4: 2f03 movel %d3,%sp@- 476c6: 206e 000c moveal %fp@(12),%a0 476ca: 2f02 movel %d2,%sp@-
uint32_t the_class;
Objects_Information **api_information;
Objects_Information *information;
Thread_Control *tp = (Thread_Control *) 0;
if ( _Objects_Are_ids_equal( id, OBJECTS_ID_OF_SELF ) ) {
476cc: 4a80 tstl %d0
476ce: 6618 bnes 476e8 <_Thread_Get+0x2c>
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
476d0: 2039 0005 d94c movel 5d94c <_Thread_Dispatch_disable_level>,%d0 476d6: 5280 addql #1,%d0 476d8: 23c0 0005 d94c movel %d0,5d94c <_Thread_Dispatch_disable_level>
_Thread_Disable_dispatch();
*location = OBJECTS_LOCAL;
476de: 4290 clrl %a0@
tp = _Thread_Executing;
476e0: 2039 0005 dddc movel 5dddc <_Per_CPU_Information+0xc>,%d0
goto done;
476e6: 6044 bras 4772c <_Thread_Get+0x70>
*/
RTEMS_INLINE_ROUTINE Objects_APIs _Objects_Get_API(
Objects_Id id
)
{
return (Objects_APIs) ((id >> OBJECTS_API_START_BIT) & OBJECTS_API_VALID_BITS);
476e8: 7418 moveq #24,%d2 476ea: 2200 movel %d0,%d1 476ec: e4a9 lsrl %d2,%d1 476ee: 7607 moveq #7,%d3
*/
RTEMS_INLINE_ROUTINE bool _Objects_Is_api_valid(
uint32_t the_api
)
{
if ( !the_api || the_api > OBJECTS_APIS_LAST )
476f0: 143c 0002 moveb #2,%d2
*/
RTEMS_INLINE_ROUTINE Objects_APIs _Objects_Get_API(
Objects_Id id
)
{
return (Objects_APIs) ((id >> OBJECTS_API_START_BIT) & OBJECTS_API_VALID_BITS);
476f4: c283 andl %d3,%d1
*/
RTEMS_INLINE_ROUTINE bool _Objects_Is_api_valid(
uint32_t the_api
)
{
if ( !the_api || the_api > OBJECTS_APIS_LAST )
476f6: 2241 moveal %d1,%a1 476f8: 5389 subql #1,%a1 476fa: b489 cmpl %a1,%d2
476fc: 643a bccs 47738 <_Thread_Get+0x7c>
476fe: 6014 bras 47714 <_Thread_Get+0x58>
if ( the_class != 1 ) { /* threads are always first class :) */
*location = OBJECTS_ERROR;
goto done;
}
api_information = _Objects_Information_table[ the_api ];
47700: 43f9 0005 d908 lea 5d908 <_Objects_Information_table>,%a1 47706: 2271 1c00 moveal %a1@(00000000,%d1:l:4),%a1
if ( !api_information ) {
4770a: 4a89 tstl %a1
4770c: 6706 beqs 47714 <_Thread_Get+0x58> <== NEVER TAKEN
*location = OBJECTS_ERROR;
goto done;
}
information = api_information[ the_class ];
4770e: 2229 0004 movel %a1@(4),%d1
if ( !information ) {
47712: 6608 bnes 4771c <_Thread_Get+0x60>
*location = OBJECTS_ERROR;
47714: 7001 moveq #1,%d0 47716: 2080 movel %d0,%a0@
{
uint32_t the_api;
uint32_t the_class;
Objects_Information **api_information;
Objects_Information *information;
Thread_Control *tp = (Thread_Control *) 0;
47718: 4280 clrl %d0
}
information = api_information[ the_class ];
if ( !information ) {
*location = OBJECTS_ERROR;
goto done;
4771a: 6010 bras 4772c <_Thread_Get+0x70>
}
tp = (Thread_Control *) _Objects_Get( information, id, location );
4771c: 2f08 movel %a0,%sp@- 4771e: 2f00 movel %d0,%sp@- 47720: 2f01 movel %d1,%sp@- 47722: 4eb9 0004 6e34 jsr 46e34 <_Objects_Get> 47728: 4fef 000c lea %sp@(12),%sp
done:
return tp;
}
4772c: 242e fff8 movel %fp@(-8),%d2 47730: 262e fffc movel %fp@(-4),%d3 47734: 4e5e unlk %fp 47736: 4e75 rts
*/
RTEMS_INLINE_ROUTINE uint32_t _Objects_Get_class(
Objects_Id id
)
{
return (uint32_t)
47738: 761b moveq #27,%d3 4773a: 2400 movel %d0,%d2 4773c: e6aa lsrl %d3,%d2
*location = OBJECTS_ERROR;
goto done;
}
the_class = _Objects_Get_class( id );
if ( the_class != 1 ) { /* threads are always first class :) */
4773e: 163c 0001 moveb #1,%d3 47742: b682 cmpl %d2,%d3
47744: 67ba beqs 47700 <_Thread_Get+0x44>
47746: 60cc bras 47714 <_Thread_Get+0x58>
0004c86c <_Thread_Handler>:
*
* Output parameters: NONE
*/
void _Thread_Handler( void )
{
4c86c: 4e56 0000 linkw %fp,#0 4c870: 2f0a movel %a2,%sp@-
#if defined(EXECUTE_GLOBAL_CONSTRUCTORS)
static char doneConstructors;
char doneCons;
#endif
executing = _Thread_Executing;
4c872: 2479 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a2
*
* Output parameters: NONE
*/
void _Thread_Handler( void )
{
4c878: 2f02 movel %d2,%sp@-
/*
* have to put level into a register for those cpu's that use
* inline asm here
*/
level = executing->Start.isr_level;
4c87a: 222a 00b4 movel %a2@(180),%d1
_ISR_Set_level(level);
4c87e: 40c0 movew %sr,%d0 4c880: e189 lsll #8,%d1 4c882: 0280 0000 f8ff andil #63743,%d0 4c888: 8081 orl %d1,%d0 4c88a: 46c0 movew %d0,%sr
#if defined(EXECUTE_GLOBAL_CONSTRUCTORS)
doneCons = doneConstructors;
doneConstructors = 1;
4c88c: 7001 moveq #1,%d0
level = executing->Start.isr_level;
_ISR_Set_level(level);
#if defined(EXECUTE_GLOBAL_CONSTRUCTORS)
doneCons = doneConstructors;
4c88e: 1439 0005 d108 moveb 5d108 <doneConstructors.3256>,%d2
doneConstructors = 1;
4c894: 13c0 0005 d108 moveb %d0,5d108 <doneConstructors.3256>
#endif
#if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE )
#if ( CPU_USE_DEFERRED_FP_SWITCH == TRUE )
if ( (executing->fp_context != NULL) &&
4c89a: 4aaa 0102 tstl %a2@(258)
4c89e: 6720 beqs 4c8c0 <_Thread_Handler+0x54>
#if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE )
RTEMS_INLINE_ROUTINE bool _Thread_Is_allocated_fp (
const Thread_Control *the_thread
)
{
return ( the_thread == _Thread_Allocated_fp );
4c8a0: 2079 0005 d9ce moveal 5d9ce <_Thread_Allocated_fp>,%a0 4c8a6: b1ca cmpal %a2,%a0
4c8a8: 6716 beqs 4c8c0 <_Thread_Handler+0x54>
!_Thread_Is_allocated_fp( executing ) ) {
if ( _Thread_Allocated_fp != NULL )
4c8aa: 4a88 tstl %a0
4c8ac: 670c beqs 4c8ba <_Thread_Handler+0x4e>
_Context_Save_fp( &_Thread_Allocated_fp->fp_context );
4c8ae: 4868 0102 pea %a0@(258) 4c8b2: 4eb9 0004 8a36 jsr 48a36 <_CPU_Context_save_fp> 4c8b8: 588f addql #4,%sp
_Thread_Allocated_fp = executing;
4c8ba: 23ca 0005 d9ce movel %a2,5d9ce <_Thread_Allocated_fp>
/* * Take care that 'begin' extensions get to complete before * 'switch' extensions can run. This means must keep dispatch * disabled until all 'begin' extensions complete. */ _User_extensions_Thread_begin( executing );
4c8c0: 2f0a movel %a2,%sp@- 4c8c2: 4eb9 0004 8458 jsr 48458 <_User_extensions_Thread_begin>
/*
* At this point, the dispatch disable level BETTER be 1.
*/
_Thread_Enable_dispatch();
4c8c8: 4eb9 0004 7696 jsr 47696 <_Thread_Enable_dispatch>
/*
* _init could be a weak symbol and we SHOULD test it but it isn't
* in any configuration I know of and it generates a warning on every
* RTEMS target configuration. --joel (12 May 2007)
*/
if (!doneCons) /* && (volatile void *)_init) */ {
4c8ce: 588f addql #4,%sp 4c8d0: 4a02 tstb %d2
4c8d2: 6606 bnes 4c8da <_Thread_Handler+0x6e>
INIT_NAME ();
4c8d4: 4eb9 0005 a6b0 jsr 5a6b0 <_init>
}
#endif
if ( executing->Start.prototype == THREAD_START_NUMERIC ) {
4c8da: 202a 009e movel %a2@(158),%d0
4c8de: 6606 bnes 4c8e6 <_Thread_Handler+0x7a>
executing->Wait.return_argument =
(*(Thread_Entry_numeric) executing->Start.entry_point)(
4c8e0: 2f2a 00a6 movel %a2@(166),%sp@- 4c8e4: 600a bras 4c8f0 <_Thread_Handler+0x84>
executing->Start.numeric_argument
);
}
#if defined(RTEMS_POSIX_API)
else if ( executing->Start.prototype == THREAD_START_POINTER ) {
4c8e6: 7201 moveq #1,%d1 4c8e8: b280 cmpl %d0,%d1
4c8ea: 6610 bnes 4c8fc <_Thread_Handler+0x90> <== NEVER TAKEN
executing->Wait.return_argument =
(*(Thread_Entry_pointer) executing->Start.entry_point)(
4c8ec: 2f2a 00a2 movel %a2@(162),%sp@- 4c8f0: 206a 009a moveal %a2@(154),%a0 4c8f4: 4e90 jsr %a0@
executing->Start.numeric_argument
);
}
#if defined(RTEMS_POSIX_API)
else if ( executing->Start.prototype == THREAD_START_POINTER ) {
executing->Wait.return_argument =
4c8f6: 588f addql #4,%sp 4c8f8: 2540 0028 movel %d0,%a2@(40)
* was placed in return_argument. This assumed that if it returned
* anything (which is not supporting in all APIs), then it would be
* able to fit in a (void *).
*/
_User_extensions_Thread_exitted( executing );
4c8fc: 2f0a movel %a2,%sp@- 4c8fe: 4eb9 0004 8490 jsr 48490 <_User_extensions_Thread_exitted>
_Internal_error_Occurred(
4c904: 4878 0005 pea 5 <COMPARE> 4c908: 4878 0001 pea 1 <ADD> 4c90c: 42a7 clrl %sp@- 4c90e: 4eb9 0004 6928 jsr 46928 <_Internal_error_Occurred>
0004861c <_Thread_Restart>:
*/
RTEMS_INLINE_ROUTINE bool _States_Is_dormant (
States_Control the_states
)
{
return (the_states & STATES_DORMANT);
4861c: 7001 moveq #1,%d0
bool _Thread_Restart(
Thread_Control *the_thread,
void *pointer_argument,
Thread_Entry_numeric_type numeric_argument
)
{
4861e: 4e56 0000 linkw %fp,#0 48622: 2f0a movel %a2,%sp@- 48624: 246e 0008 moveal %fp@(8),%a2 48628: c0aa 0010 andl %a2@(16),%d0
if ( !_States_Is_dormant( the_thread->current_state ) ) {
4862c: 6664 bnes 48692 <_Thread_Restart+0x76>
_Thread_Set_transient( the_thread );
4862e: 2f0a movel %a2,%sp@- 48630: 4eb9 0004 87f8 jsr 487f8 <_Thread_Set_transient>
_Thread_Reset( the_thread, pointer_argument, numeric_argument );
48636: 2f2e 0010 movel %fp@(16),%sp@- 4863a: 2f2e 000c movel %fp@(12),%sp@- 4863e: 2f0a movel %a2,%sp@- 48640: 4eb9 0004 babc jsr 4babc <_Thread_Reset>
_Thread_Load_environment( the_thread );
48646: 2f0a movel %a2,%sp@- 48648: 4eb9 0004 b768 jsr 4b768 <_Thread_Load_environment>
_Thread_Ready( the_thread );
4864e: 2f0a movel %a2,%sp@- 48650: 4eb9 0004 b9fc jsr 4b9fc <_Thread_Ready>
_User_extensions_Thread_restart( the_thread );
48656: 2f0a movel %a2,%sp@- 48658: 4eb9 0004 8dd8 jsr 48dd8 <_User_extensions_Thread_restart>
if ( _Thread_Is_executing ( the_thread ) )
4865e: 4fef 001c lea %sp@(28),%sp 48662: b5f9 0005 e914 cmpal 5e914 <_Per_CPU_Information+0xc>,%a2
48668: 662c bnes 48696 <_Thread_Restart+0x7a>
*/
RTEMS_INLINE_ROUTINE void _Thread_Restart_self( void )
{
#if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE )
if ( _Thread_Executing->fp_context != NULL )
4866a: 4aaa 0102 tstl %a2@(258)
4866e: 670c beqs 4867c <_Thread_Restart+0x60>
_Context_Restore_fp( &_Thread_Executing->fp_context );
48670: 486a 0102 pea %a2@(258) 48674: 4eb9 0004 92d4 jsr 492d4 <_CPU_Context_restore_fp> 4867a: 588f addql #4,%sp
#endif
_CPU_Context_Restart_self( &_Thread_Executing->Registers );
4867c: 2079 0005 e914 moveal 5e914 <_Per_CPU_Information+0xc>,%a0 48682: 41e8 00ce lea %a0@(206),%a0 48686: 2f08 movel %a0,%sp@- 48688: 4eb9 0004 9182 jsr 49182 <_CPU_Context_Restart_self>
4868e: 588f addql #4,%sp <== NOT EXECUTED 48690: 6004 bras 48696 <_Thread_Restart+0x7a> <== NOT EXECUTED
_Thread_Restart_self();
return true;
}
return false;
48692: 4200 clrb %d0 48694: 6002 bras 48698 <_Thread_Restart+0x7c>
_User_extensions_Thread_restart( the_thread );
if ( _Thread_Is_executing ( the_thread ) )
_Thread_Restart_self();
return true;
48696: 7001 moveq #1,%d0
}
return false;
}
48698: 246e fffc moveal %fp@(-4),%a2
4869c: 4e5e unlk %fp <== NOT EXECUTED
0004ac94 <_Thread_Resume>:
void _Thread_Resume(
Thread_Control *the_thread,
bool force
)
{
4ac94: 4e56 fff4 linkw %fp,#-12 4ac98: 206e 0008 moveal %fp@(8),%a0 4ac9c: 48d7 040c moveml %d2-%d3/%a2,%sp@
ISR_Level level;
States_Control current_state;
_ISR_Disable( level );
4aca0: 243c 0000 0700 movel #1792,%d2 4aca6: 2002 movel %d2,%d0 4aca8: 40c1 movew %sr,%d1 4acaa: 8081 orl %d1,%d0 4acac: 46c0 movew %d0,%sr
current_state = the_thread->current_state;
4acae: 2028 0010 movel %a0@(16),%d0
if ( current_state & STATES_SUSPENDED ) {
4acb2: 0800 0001 btst #1,%d0
4acb6: 6778 beqs 4ad30 <_Thread_Resume+0x9c> <== NEVER TAKEN
RTEMS_INLINE_ROUTINE States_Control _States_Clear (
States_Control states_to_clear,
States_Control current_state
)
{
return (current_state & ~states_to_clear);
4acb8: 76fd moveq #-3,%d3 4acba: c083 andl %d3,%d0
current_state =
the_thread->current_state = _States_Clear(STATES_SUSPENDED, current_state);
4acbc: 2140 0010 movel %d0,%a0@(16)
if ( _States_Is_ready( current_state ) ) {
4acc0: 666e bnes 4ad30 <_Thread_Resume+0x9c>
RTEMS_INLINE_ROUTINE void _Priority_Add_to_bit_map (
Priority_Information *the_priority_map
)
{
*the_priority_map->minor |= the_priority_map->ready_minor;
4acc2: 2268 008e moveal %a0@(142),%a1 4acc6: 3028 0094 movew %a0@(148),%d0 4acca: 3611 movew %a1@,%d3 4accc: 8083 orl %d3,%d0 4acce: 3280 movew %d0,%a1@
_Priority_Add_to_bit_map( &the_thread->Priority_map );
_Chain_Append_unprotected(the_thread->ready, &the_thread->Object.Node);
4acd0: 2268 008a moveal %a0@(138),%a1
_Priority_Major_bit_map |= the_priority_map->ready_major;
4acd4: 3039 0006 0e34 movew 60e34 <_Priority_Major_bit_map>,%d0 4acda: 3628 0092 movew %a0@(146),%d3
)
{
Chain_Node *old_last_node;
the_node->next = _Chain_Tail(the_chain);
old_last_node = the_chain->last;
4acde: 2469 0008 moveal %a1@(8),%a2 4ace2: 8083 orl %d3,%d0 4ace4: 33c0 0006 0e34 movew %d0,60e34 <_Priority_Major_bit_map>
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
4acea: 2009 movel %a1,%d0 4acec: 5880 addql #4,%d0 4acee: 2080 movel %d0,%a0@
{
Chain_Node *old_last_node;
the_node->next = _Chain_Tail(the_chain);
old_last_node = the_chain->last;
the_chain->last = the_node;
4acf0: 2348 0008 movel %a0,%a1@(8)
old_last_node->next = the_node;
4acf4: 2488 movel %a0,%a2@
the_node->previous = old_last_node;
4acf6: 214a 0004 movel %a2,%a0@(4)
_ISR_Flash( level );
4acfa: 2002 movel %d2,%d0 4acfc: 46c1 movew %d1,%sr 4acfe: 8081 orl %d1,%d0 4ad00: 46c0 movew %d0,%sr
if ( the_thread->current_priority < _Thread_Heir->current_priority ) {
4ad02: 2028 0014 movel %a0@(20),%d0 4ad06: 2279 0006 1228 moveal 61228 <_Per_CPU_Information+0x10>,%a1 4ad0c: b0a9 0014 cmpl %a1@(20),%d0
4ad10: 641e bccs 4ad30 <_Thread_Resume+0x9c>
_Thread_Heir = the_thread;
4ad12: 23c8 0006 1228 movel %a0,61228 <_Per_CPU_Information+0x10>
if ( _Thread_Executing->is_preemptible ||
4ad18: 2079 0006 1224 moveal 61224 <_Per_CPU_Information+0xc>,%a0 4ad1e: 4a28 0074 tstb %a0@(116)
4ad22: 6604 bnes 4ad28 <_Thread_Resume+0x94>
4ad24: 4a80 tstl %d0
4ad26: 6608 bnes 4ad30 <_Thread_Resume+0x9c> <== ALWAYS TAKEN
the_thread->current_priority == 0 )
_Context_Switch_necessary = true;
4ad28: 7601 moveq #1,%d3 4ad2a: 13c3 0006 1230 moveb %d3,61230 <_Per_CPU_Information+0x18>
}
}
}
_ISR_Enable( level );
4ad30: 46c1 movew %d1,%sr
}
4ad32: 4cd7 040c moveml %sp@,%d2-%d3/%a2 4ad36: 4e5e unlk %fp
...
00048240 <_Thread_Tickle_timeslice>:
*
* Output parameters: NONE
*/
void _Thread_Tickle_timeslice( void )
{
48240: 4e56 0000 linkw %fp,#0 48244: 2f0a movel %a2,%sp@-
Thread_Control *executing;
executing = _Thread_Executing;
48246: 2479 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a2
/*
* If the thread is not preemptible or is not ready, then
* just return.
*/
if ( !executing->is_preemptible )
4824c: 4a2a 0074 tstb %a2@(116)
48250: 6756 beqs 482a8 <_Thread_Tickle_timeslice+0x68>
return;
if ( !_States_Is_ready( executing->current_state ) )
48252: 4aaa 0010 tstl %a2@(16)
48256: 6650 bnes 482a8 <_Thread_Tickle_timeslice+0x68>
/*
* The cpu budget algorithm determines what happens next.
*/
switch ( executing->budget_algorithm ) {
48258: 202a 007a movel %a2@(122),%d0 4825c: 7201 moveq #1,%d1 4825e: b280 cmpl %d0,%d1
48260: 6246 bhis 482a8 <_Thread_Tickle_timeslice+0x68>
48262: 123c 0002 moveb #2,%d1 48266: b280 cmpl %d0,%d1
48268: 640a bccs 48274 <_Thread_Tickle_timeslice+0x34>
4826a: 123c 0003 moveb #3,%d1 4826e: b280 cmpl %d0,%d1
48270: 6636 bnes 482a8 <_Thread_Tickle_timeslice+0x68> <== NEVER TAKEN
48272: 601e bras 48292 <_Thread_Tickle_timeslice+0x52>
case THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE:
#if defined(RTEMS_SCORE_THREAD_ENABLE_EXHAUST_TIMESLICE)
case THREAD_CPU_BUDGET_ALGORITHM_EXHAUST_TIMESLICE:
#endif
if ( (int)(--executing->cpu_time_budget) <= 0 ) {
48274: 202a 0076 movel %a2@(118),%d0 48278: 5380 subql #1,%d0 4827a: 2540 0076 movel %d0,%a2@(118)
4827e: 6e28 bgts 482a8 <_Thread_Tickle_timeslice+0x68>
* at the priority of the currently executing thread, then the
* executing thread's timeslice is reset. Otherwise, the
* currently executing thread is placed at the rear of the
* FIFO for this priority and a new heir is selected.
*/
_Thread_Yield_processor();
48280: 4eb9 0004 82b0 jsr 482b0 <_Thread_Yield_processor>
executing->cpu_time_budget = _Thread_Ticks_per_timeslice;
48286: 41f9 0005 d904 lea 5d904 <_Thread_Ticks_per_timeslice>,%a0 4828c: 2550 0076 movel %a0@,%a2@(118) 48290: 6016 bras 482a8 <_Thread_Tickle_timeslice+0x68>
}
break;
#if defined(RTEMS_SCORE_THREAD_ENABLE_SCHEDULER_CALLOUT)
case THREAD_CPU_BUDGET_ALGORITHM_CALLOUT:
if ( --executing->cpu_time_budget == 0 )
48292: 202a 0076 movel %a2@(118),%d0 48296: 5380 subql #1,%d0 48298: 2540 0076 movel %d0,%a2@(118)
4829c: 660a bnes 482a8 <_Thread_Tickle_timeslice+0x68> (*executing->budget_callout)( executing );
4829e: 2f0a movel %a2,%sp@- 482a0: 206a 007e moveal %a2@(126),%a0 482a4: 4e90 jsr %a0@ 482a6: 588f addql #4,%sp
break;
#endif
}
}
482a8: 246e fffc moveal %fp@(-4),%a2
482ac: 4e5e unlk %fp <== NOT EXECUTED
00047160 <_Thread_blocking_operation_Cancel>:
/*
* If the sync state is timed out, this is very likely not needed.
* But better safe than sorry when it comes to critical sections.
*/
if ( _Watchdog_Is_active( &the_thread->Timer ) ) {
47160: 7202 moveq #2,%d1
Thread_blocking_operation_States sync_state __attribute__((unused)),
#endif
Thread_Control *the_thread,
ISR_Level level
)
{
47162: 4e56 0000 linkw %fp,#0 47166: 202e 0010 movel %fp@(16),%d0 4716a: 2f0a movel %a2,%sp@- 4716c: 246e 000c moveal %fp@(12),%a2
#endif
/*
* The thread is not waiting on anything after this completes.
*/
the_thread->Wait.queue = NULL;
47170: 42aa 0044 clrl %a2@(68)
/*
* If the sync state is timed out, this is very likely not needed.
* But better safe than sorry when it comes to critical sections.
*/
if ( _Watchdog_Is_active( &the_thread->Timer ) ) {
47174: b2aa 0050 cmpl %a2@(80),%d1
47178: 6618 bnes 47192 <_Thread_blocking_operation_Cancel+0x32>
RTEMS_INLINE_ROUTINE void _Watchdog_Deactivate(
Watchdog_Control *the_watchdog
)
{
the_watchdog->state = WATCHDOG_REMOVE_IT;
4717a: 123c 0003 moveb #3,%d1 4717e: 2541 0050 movel %d1,%a2@(80)
_Watchdog_Deactivate( &the_thread->Timer );
_ISR_Enable( level );
47182: 46c0 movew %d0,%sr
(void) _Watchdog_Remove( &the_thread->Timer );
47184: 486a 0048 pea %a2@(72) 47188: 4eb9 0004 8730 jsr 48730 <_Watchdog_Remove> 4718e: 588f addql #4,%sp 47190: 6002 bras 47194 <_Thread_blocking_operation_Cancel+0x34>
} else
_ISR_Enable( level );
47192: 46c0 movew %d0,%sr
RTEMS_INLINE_ROUTINE void _Thread_Unblock (
Thread_Control *the_thread
)
{
_Thread_Clear_state( the_thread, STATES_BLOCKED );
47194: 2d4a 0008 movel %a2,%fp@(8)
#if defined(RTEMS_MULTIPROCESSING)
if ( !_Objects_Is_local_id( the_thread->Object.id ) )
_Thread_MP_Free_proxy( the_thread );
#endif
}
47198: 246e fffc moveal %fp@(-4),%a2 4719c: 203c 1003 fff8 movel #268697592,%d0 471a2: 2d40 000c movel %d0,%fp@(12) 471a6: 4e5e unlk %fp 471a8: 4ef9 0004 72f0 jmp 472f0 <_Thread_Clear_state>
...
00047bb4 <_Thread_queue_Enqueue_priority>:
Thread_blocking_operation_States _Thread_queue_Enqueue_priority (
Thread_queue_Control *the_thread_queue,
Thread_Control *the_thread,
ISR_Level *level_p
)
{
47bb4: 4e56 ffe0 linkw %fp,#-32 47bb8: 206e 000c moveal %fp@(12),%a0 47bbc: 43e8 003c lea %a0@(60),%a1
Priority_Control priority;
States_Control block_state;
_Chain_Initialize_empty( &the_thread->Wait.Block2n );
priority = the_thread->current_priority;
47bc0: 2028 0014 movel %a0@(20),%d0
RTEMS_INLINE_ROUTINE uint32_t _Thread_queue_Header_number (
Priority_Control the_priority
)
{
return (the_priority / TASK_QUEUE_DATA_PRIORITIES_PER_HEADER);
47bc4: 2200 movel %d0,%d1 47bc6: ec89 lsrl #6,%d1
Thread_blocking_operation_States _Thread_queue_Enqueue_priority (
Thread_queue_Control *the_thread_queue,
Thread_Control *the_thread,
ISR_Level *level_p
)
{
47bc8: 48d7 1c7c moveml %d2-%d6/%a2-%a4,%sp@
_Chain_Initialize_empty( &the_thread->Wait.Block2n );
priority = the_thread->current_priority;
header_index = _Thread_queue_Header_number( priority );
header = &the_thread_queue->Queues.Priority[ header_index ];
47bcc: 2401 movel %d1,%d2 47bce: e989 lsll #4,%d1 47bd0: e58a lsll #2,%d2
Thread_blocking_operation_States _Thread_queue_Enqueue_priority (
Thread_queue_Control *the_thread_queue,
Thread_Control *the_thread,
ISR_Level *level_p
)
{
47bd2: 246e 0008 moveal %fp@(8),%a2
_Chain_Initialize_empty( &the_thread->Wait.Block2n );
priority = the_thread->current_priority;
header_index = _Thread_queue_Header_number( priority );
header = &the_thread_queue->Queues.Priority[ header_index ];
47bd6: 9282 subl %d2,%d1 47bd8: 47f2 1800 lea %a2@(00000000,%d1:l),%a3 47bdc: 2149 0038 movel %a1,%a0@(56)
Chain_Node *previous_node;
Chain_Node *search_node;
Priority_Control priority;
States_Control block_state;
_Chain_Initialize_empty( &the_thread->Wait.Block2n );
47be0: 43e8 0038 lea %a0@(56),%a1
priority = the_thread->current_priority;
header_index = _Thread_queue_Header_number( priority );
header = &the_thread_queue->Queues.Priority[ header_index ];
block_state = the_thread_queue->state;
47be4: 282a 0038 movel %a2@(56),%d4
RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty(
Chain_Control *the_chain
)
{
the_chain->first = _Chain_Tail(the_chain);
the_chain->permanent_null = NULL;
47be8: 42a8 003c clrl %a0@(60)
Chain_Node *previous_node;
Chain_Node *search_node;
Priority_Control priority;
States_Control block_state;
_Chain_Initialize_empty( &the_thread->Wait.Block2n );
47bec: 2149 0040 movel %a1,%a0@(64)
priority = the_thread->current_priority;
header_index = _Thread_queue_Header_number( priority );
header = &the_thread_queue->Queues.Priority[ header_index ];
block_state = the_thread_queue->state;
if ( _Thread_queue_Is_reverse_search( priority ) )
47bf0: 0800 0005 btst #5,%d0
47bf4: 666a bnes 47c60 <_Thread_queue_Enqueue_priority+0xac>
goto restart_reverse_search;
restart_forward_search:
search_priority = PRIORITY_MINIMUM - 1;
_ISR_Disable( level );
47bf6: 367c 0700 moveaw #1792,%a3
search_thread = (Thread_Control *) header->first;
47bfa: 2a01 movel %d1,%d5
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
47bfc: 49f2 1804 lea %a2@(00000004,%d1:l),%a4
if ( _Thread_queue_Is_reverse_search( priority ) )
goto restart_reverse_search;
restart_forward_search:
search_priority = PRIORITY_MINIMUM - 1;
_ISR_Disable( level );
47c00: 240b movel %a3,%d2 47c02: 40c1 movew %sr,%d1 47c04: 8481 orl %d1,%d2 47c06: 46c2 movew %d2,%sr 47c08: 2401 movel %d1,%d2
search_thread = (Thread_Control *) header->first;
47c0a: 2272 5800 moveal %a2@(00000000,%d5:l),%a1
if ( _Thread_queue_Is_reverse_search( priority ) )
goto restart_reverse_search;
restart_forward_search:
search_priority = PRIORITY_MINIMUM - 1;
47c0e: 76ff moveq #-1,%d3
_ISR_Disable( level );
search_thread = (Thread_Control *) header->first;
while ( !_Chain_Is_tail( header, (Chain_Node *)search_thread ) ) {
47c10: 601e bras 47c30 <_Thread_queue_Enqueue_priority+0x7c>
search_priority = search_thread->current_priority;
47c12: 2629 0014 movel %a1@(20),%d3
if ( priority <= search_priority )
47c16: b680 cmpl %d0,%d3
47c18: 641a bccs 47c34 <_Thread_queue_Enqueue_priority+0x80>
break;
search_priority = search_thread->current_priority;
if ( priority <= search_priority )
break;
#endif
_ISR_Flash( level );
47c1a: 2c0b movel %a3,%d6 47c1c: 46c1 movew %d1,%sr 47c1e: 8c81 orl %d1,%d6 47c20: 46c6 movew %d6,%sr
RTEMS_INLINE_ROUTINE bool _States_Are_set (
States_Control the_states,
States_Control mask
)
{
return ( (the_states & mask) != STATES_READY);
47c22: 2c04 movel %d4,%d6 47c24: cca9 0010 andl %a1@(16),%d6
if ( !_States_Are_set( search_thread->current_state, block_state) ) {
47c28: 6604 bnes 47c2e <_Thread_queue_Enqueue_priority+0x7a><== ALWAYS TAKEN
_ISR_Enable( level );
47c2a: 46c1 movew %d1,%sr <== NOT EXECUTED
goto restart_forward_search;
47c2c: 60d2 bras 47c00 <_Thread_queue_Enqueue_priority+0x4c><== NOT EXECUTED
}
search_thread =
(Thread_Control *)search_thread->Object.Node.next;
47c2e: 2251 moveal %a1@,%a1
restart_forward_search:
search_priority = PRIORITY_MINIMUM - 1;
_ISR_Disable( level );
search_thread = (Thread_Control *) header->first;
while ( !_Chain_Is_tail( header, (Chain_Node *)search_thread ) ) {
47c30: b9c9 cmpal %a1,%a4
47c32: 66de bnes 47c12 <_Thread_queue_Enqueue_priority+0x5e>
}
search_thread =
(Thread_Control *)search_thread->Object.Node.next;
}
if ( the_thread_queue->sync_state !=
47c34: 7801 moveq #1,%d4 47c36: b8aa 0030 cmpl %a2@(48),%d4 47c3a: 6600 00ae bnew 47cea <_Thread_queue_Enqueue_priority+0x136>
THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED )
goto synchronize;
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED;
47c3e: 42aa 0030 clrl %a2@(48)
if ( priority == search_priority )
47c42: b680 cmpl %d0,%d3 47c44: 6700 0088 beqw 47cce <_Thread_queue_Enqueue_priority+0x11a>
goto equal_priority;
search_node = (Chain_Node *) search_thread;
previous_node = search_node->previous;
47c48: 2669 0004 moveal %a1@(4),%a3
the_node = (Chain_Node *) the_thread;
the_node->next = search_node;
47c4c: 2089 movel %a1,%a0@
the_node->previous = previous_node;
47c4e: 214b 0004 movel %a3,%a0@(4)
previous_node->next = the_node;
47c52: 2688 movel %a0,%a3@
search_node->previous = the_node;
47c54: 2348 0004 movel %a0,%a1@(4)
the_thread->Wait.queue = the_thread_queue;
47c58: 214a 0044 movel %a2,%a0@(68)
_ISR_Enable( level );
47c5c: 46c1 movew %d1,%sr 47c5e: 606a bras 47cca <_Thread_queue_Enqueue_priority+0x116>
return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
restart_reverse_search:
search_priority = PRIORITY_MAXIMUM + 1;
_ISR_Disable( level );
47c60: 2a3c 0000 0700 movel #1792,%d5
search_thread = (Thread_Control *) header->last;
47c66: 49eb 0008 lea %a3@(8),%a4
the_thread->Wait.queue = the_thread_queue;
_ISR_Enable( level );
return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
restart_reverse_search:
search_priority = PRIORITY_MAXIMUM + 1;
47c6a: 4283 clrl %d3 47c6c: 1639 0005 c192 moveb 5c192 <rtems_maximum_priority>,%d3
_ISR_Disable( level );
47c72: 2405 movel %d5,%d2
the_thread->Wait.queue = the_thread_queue;
_ISR_Enable( level );
return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
restart_reverse_search:
search_priority = PRIORITY_MAXIMUM + 1;
47c74: 5283 addql #1,%d3
_ISR_Disable( level );
47c76: 40c1 movew %sr,%d1 47c78: 8481 orl %d1,%d2 47c7a: 46c2 movew %d2,%sr 47c7c: 2401 movel %d1,%d2
search_thread = (Thread_Control *) header->last;
47c7e: 2254 moveal %a4@,%a1
while ( !_Chain_Is_head( header, (Chain_Node *)search_thread ) ) {
47c80: 6020 bras 47ca2 <_Thread_queue_Enqueue_priority+0xee>
search_priority = search_thread->current_priority;
47c82: 2629 0014 movel %a1@(20),%d3
if ( priority >= search_priority )
47c86: b680 cmpl %d0,%d3
47c88: 631c blss 47ca6 <_Thread_queue_Enqueue_priority+0xf2>
break;
search_priority = search_thread->current_priority;
if ( priority >= search_priority )
break;
#endif
_ISR_Flash( level );
47c8a: 2c05 movel %d5,%d6 47c8c: 46c1 movew %d1,%sr 47c8e: 8c81 orl %d1,%d6 47c90: 46c6 movew %d6,%sr 47c92: 2c04 movel %d4,%d6 47c94: cca9 0010 andl %a1@(16),%d6
if ( !_States_Are_set( search_thread->current_state, block_state) ) {
47c98: 6604 bnes 47c9e <_Thread_queue_Enqueue_priority+0xea>
_ISR_Enable( level );
47c9a: 46c1 movew %d1,%sr
goto restart_reverse_search;
47c9c: 60cc bras 47c6a <_Thread_queue_Enqueue_priority+0xb6>
}
search_thread = (Thread_Control *)
search_thread->Object.Node.previous;
47c9e: 2269 0004 moveal %a1@(4),%a1
restart_reverse_search:
search_priority = PRIORITY_MAXIMUM + 1;
_ISR_Disable( level );
search_thread = (Thread_Control *) header->last;
while ( !_Chain_Is_head( header, (Chain_Node *)search_thread ) ) {
47ca2: b7c9 cmpal %a1,%a3
47ca4: 66dc bnes 47c82 <_Thread_queue_Enqueue_priority+0xce>
}
search_thread = (Thread_Control *)
search_thread->Object.Node.previous;
}
if ( the_thread_queue->sync_state !=
47ca6: 7801 moveq #1,%d4 47ca8: b8aa 0030 cmpl %a2@(48),%d4
47cac: 663c bnes 47cea <_Thread_queue_Enqueue_priority+0x136>
THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED )
goto synchronize;
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED;
47cae: 42aa 0030 clrl %a2@(48)
if ( priority == search_priority )
47cb2: b680 cmpl %d0,%d3
47cb4: 6718 beqs 47cce <_Thread_queue_Enqueue_priority+0x11a>
goto equal_priority;
search_node = (Chain_Node *) search_thread;
next_node = search_node->next;
47cb6: 2651 moveal %a1@,%a3
the_node = (Chain_Node *) the_thread;
the_node->next = next_node;
the_node->previous = search_node;
47cb8: 2149 0004 movel %a1,%a0@(4)
search_node = (Chain_Node *) search_thread;
next_node = search_node->next;
the_node = (Chain_Node *) the_thread;
the_node->next = next_node;
47cbc: 208b movel %a3,%a0@
the_node->previous = search_node; search_node->next = the_node; next_node->previous = the_node;
47cbe: 2748 0004 movel %a0,%a3@(4)
next_node = search_node->next;
the_node = (Chain_Node *) the_thread;
the_node->next = next_node;
the_node->previous = search_node;
search_node->next = the_node;
47cc2: 2288 movel %a0,%a1@
next_node->previous = the_node; the_thread->Wait.queue = the_thread_queue;
47cc4: 214a 0044 movel %a2,%a0@(68)
_ISR_Enable( level );
47cc8: 46c1 movew %d1,%sr
return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
47cca: 7001 moveq #1,%d0 47ccc: 6026 bras 47cf4 <_Thread_queue_Enqueue_priority+0x140> 47cce: 43e9 003c lea %a1@(60),%a1
equal_priority: /* add at end of priority group */
search_node = _Chain_Tail( &search_thread->Wait.Block2n );
previous_node = search_node->previous;
47cd2: 2669 0004 moveal %a1@(4),%a3
the_node = (Chain_Node *) the_thread;
the_node->next = search_node;
47cd6: 2089 movel %a1,%a0@
the_node->previous = previous_node;
47cd8: 214b 0004 movel %a3,%a0@(4)
previous_node->next = the_node;
47cdc: 2688 movel %a0,%a3@
search_node->previous = the_node;
47cde: 2348 0004 movel %a0,%a1@(4)
the_thread->Wait.queue = the_thread_queue;
47ce2: 214a 0044 movel %a2,%a0@(68)
_ISR_Enable( level );
47ce6: 46c2 movew %d2,%sr 47ce8: 60e0 bras 47cca <_Thread_queue_Enqueue_priority+0x116>
* For example, the blocking thread could have been given * the mutex by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ *level_p = level;
47cea: 206e 0010 moveal %fp@(16),%a0
return the_thread_queue->sync_state;
47cee: 202a 0030 movel %a2@(48),%d0
* For example, the blocking thread could have been given * the mutex by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ *level_p = level;
47cf2: 2082 movel %d2,%a0@
return the_thread_queue->sync_state; }
47cf4: 4cd7 1c7c moveml %sp@,%d2-%d6/%a2-%a4
47cf8: 4e5e unlk %fp <== NOT EXECUTED
0004c914 <_Thread_queue_Extract_fifo>:
Thread_Control *the_thread
)
{
ISR_Level level;
_ISR_Disable( level );
4c914: 223c 0000 0700 movel #1792,%d1
void _Thread_queue_Extract_fifo(
Thread_queue_Control *the_thread_queue __attribute__((unused)),
Thread_Control *the_thread
)
{
4c91a: 4e56 0000 linkw %fp,#0 4c91e: 2f0a movel %a2,%sp@- 4c920: 246e 000c moveal %fp@(12),%a2
ISR_Level level;
_ISR_Disable( level );
4c924: 40c0 movew %sr,%d0 4c926: 8280 orl %d0,%d1 4c928: 46c1 movew %d1,%sr 4c92a: 222a 0010 movel %a2@(16),%d1 4c92e: 0281 0003 bee0 andil #245472,%d1
if ( !_States_Is_waiting_on_thread_queue( the_thread->current_state ) ) {
4c934: 660a bnes 4c940 <_Thread_queue_Extract_fifo+0x2c>
_ISR_Enable( level );
4c936: 46c0 movew %d0,%sr
#if defined(RTEMS_MULTIPROCESSING)
if ( !_Objects_Is_local_id( the_thread->Object.id ) )
_Thread_MP_Free_proxy( the_thread );
#endif
}
4c938: 246e fffc moveal %fp@(-4),%a2 4c93c: 4e5e unlk %fp 4c93e: 4e75 rts
)
{
Chain_Node *next;
Chain_Node *previous;
next = the_node->next;
4c940: 2252 moveal %a2@,%a1
_Chain_Extract_unprotected( &the_thread->Object.Node );
the_thread->Wait.queue = NULL;
if ( !_Watchdog_Is_active( &the_thread->Timer ) ) {
4c942: 7202 moveq #2,%d1
previous = the_node->previous;
4c944: 206a 0004 moveal %a2@(4),%a0
next->previous = previous;
4c948: 2348 0004 movel %a0,%a1@(4)
previous->next = next;
4c94c: 2089 movel %a1,%a0@
return;
}
_Chain_Extract_unprotected( &the_thread->Object.Node );
the_thread->Wait.queue = NULL;
4c94e: 42aa 0044 clrl %a2@(68)
if ( !_Watchdog_Is_active( &the_thread->Timer ) ) {
4c952: b2aa 0050 cmpl %a2@(80),%d1
4c956: 6704 beqs 4c95c <_Thread_queue_Extract_fifo+0x48>
_ISR_Enable( level );
4c958: 46c0 movew %d0,%sr 4c95a: 6014 bras 4c970 <_Thread_queue_Extract_fifo+0x5c> 4c95c: 7203 moveq #3,%d1 4c95e: 2541 0050 movel %d1,%a2@(80)
} else {
_Watchdog_Deactivate( &the_thread->Timer );
_ISR_Enable( level );
4c962: 46c0 movew %d0,%sr
(void) _Watchdog_Remove( &the_thread->Timer );
4c964: 486a 0048 pea %a2@(72) 4c968: 4eb9 0004 8730 jsr 48730 <_Watchdog_Remove> 4c96e: 588f addql #4,%sp
RTEMS_INLINE_ROUTINE void _Thread_Unblock (
Thread_Control *the_thread
)
{
_Thread_Clear_state( the_thread, STATES_BLOCKED );
4c970: 2d4a 0008 movel %a2,%fp@(8)
#if defined(RTEMS_MULTIPROCESSING)
if ( !_Objects_Is_local_id( the_thread->Object.id ) )
_Thread_MP_Free_proxy( the_thread );
#endif
}
4c974: 246e fffc moveal %fp@(-4),%a2 4c978: 203c 1003 fff8 movel #268697592,%d0 4c97e: 2d40 000c movel %d0,%fp@(12) 4c982: 4e5e unlk %fp 4c984: 4ef9 0004 72f0 jmp 472f0 <_Thread_Clear_state>
...
0004b074 <_Thread_queue_Extract_priority_helper>:
Chain_Node *new_first_node;
Chain_Node *new_second_node;
Chain_Node *last_node;
the_node = (Chain_Node *) the_thread;
_ISR_Disable( level );
4b074: 223c 0000 0700 movel #1792,%d1
void _Thread_queue_Extract_priority_helper(
Thread_queue_Control *the_thread_queue __attribute__((unused)),
Thread_Control *the_thread,
bool requeuing
)
{
4b07a: 4e56 ffec linkw %fp,#-20 4b07e: 48d7 3c04 moveml %d2/%a2-%a5,%sp@ 4b082: 246e 000c moveal %fp@(12),%a2 4b086: 142e 0013 moveb %fp@(19),%d2
Chain_Node *new_first_node;
Chain_Node *new_second_node;
Chain_Node *last_node;
the_node = (Chain_Node *) the_thread;
_ISR_Disable( level );
4b08a: 40c0 movew %sr,%d0 4b08c: 8280 orl %d0,%d1 4b08e: 46c1 movew %d1,%sr
*/
RTEMS_INLINE_ROUTINE bool _States_Is_waiting_on_thread_queue (
States_Control the_states
)
{
return (the_states & STATES_WAITING_ON_THREAD_QUEUE);
4b090: 222a 0010 movel %a2@(16),%d1 4b094: 0281 0003 bee0 andil #245472,%d1
if ( !_States_Is_waiting_on_thread_queue( the_thread->current_state ) ) {
4b09a: 6606 bnes 4b0a2 <_Thread_queue_Extract_priority_helper+0x2e>
_ISR_Enable( level );
4b09c: 46c0 movew %d0,%sr
return;
4b09e: 6000 0090 braw 4b130 <_Thread_queue_Extract_priority_helper+0xbc>
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
4b0a2: 220a movel %a2,%d1 4b0a4: 0681 0000 003c addil #60,%d1
/*
* The thread was actually waiting on a thread queue so let's remove it.
*/
next_node = the_node->next;
4b0aa: 2252 moveal %a2@,%a1
previous_node = the_node->previous;
4b0ac: 266a 0004 moveal %a2@(4),%a3
*/
RTEMS_INLINE_ROUTINE bool _Chain_Is_empty(
Chain_Control *the_chain
)
{
return (the_chain->first == _Chain_Tail(the_chain));
4b0b0: 206a 0038 moveal %a2@(56),%a0
if ( !_Chain_Is_empty( &the_thread->Wait.Block2n ) ) {
4b0b4: b288 cmpl %a0,%d1
4b0b6: 672e beqs 4b0e6 <_Thread_queue_Extract_priority_helper+0x72>
new_first_node = the_thread->Wait.Block2n.first;
new_first_thread = (Thread_Control *) new_first_node;
last_node = the_thread->Wait.Block2n.last;
4b0b8: 286a 0040 moveal %a2@(64),%a4
new_second_node = new_first_node->next;
4b0bc: 2a50 moveal %a0@,%a5
previous_node->next = new_first_node;
next_node->previous = new_first_node;
4b0be: 2348 0004 movel %a0,%a1@(4)
new_first_node = the_thread->Wait.Block2n.first;
new_first_thread = (Thread_Control *) new_first_node;
last_node = the_thread->Wait.Block2n.last;
new_second_node = new_first_node->next;
previous_node->next = new_first_node;
4b0c2: 2688 movel %a0,%a3@
next_node->previous = new_first_node;
new_first_node->next = next_node;
new_first_node->previous = previous_node;
4b0c4: 214b 0004 movel %a3,%a0@(4)
last_node = the_thread->Wait.Block2n.last;
new_second_node = new_first_node->next;
previous_node->next = new_first_node;
next_node->previous = new_first_node;
new_first_node->next = next_node;
4b0c8: 2089 movel %a1,%a0@
new_first_node->previous = previous_node;
if ( !_Chain_Has_only_one_node( &the_thread->Wait.Block2n ) ) {
4b0ca: b9c8 cmpal %a0,%a4
4b0cc: 671e beqs 4b0ec <_Thread_queue_Extract_priority_helper+0x78>
/* > two threads on 2-n */
new_second_node->previous =
_Chain_Head( &new_first_thread->Wait.Block2n );
4b0ce: 43e8 0038 lea %a0@(56),%a1 4b0d2: 2b49 0004 movel %a1,%a5@(4)
new_first_thread->Wait.Block2n.first = new_second_node;
4b0d6: 214d 0038 movel %a5,%a0@(56)
new_first_thread->Wait.Block2n.last = last_node;
4b0da: 214c 0040 movel %a4,%a0@(64)
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
4b0de: 41e8 003c lea %a0@(60),%a0 4b0e2: 2888 movel %a0,%a4@ 4b0e4: 6006 bras 4b0ec <_Thread_queue_Extract_priority_helper+0x78>
last_node->next = _Chain_Tail( &new_first_thread->Wait.Block2n );
}
} else {
previous_node->next = next_node;
4b0e6: 2689 movel %a1,%a3@
next_node->previous = previous_node;
4b0e8: 234b 0004 movel %a3,%a1@(4)
/*
* If we are not supposed to touch timers or the thread's state, return.
*/
if ( requeuing ) {
4b0ec: 4a02 tstb %d2
4b0ee: 6704 beqs 4b0f4 <_Thread_queue_Extract_priority_helper+0x80>
_ISR_Enable( level );
4b0f0: 46c0 movew %d0,%sr 4b0f2: 603c bras 4b130 <_Thread_queue_Extract_priority_helper+0xbc>
return;
}
if ( !_Watchdog_Is_active( &the_thread->Timer ) ) {
4b0f4: 7202 moveq #2,%d1 4b0f6: b2aa 0050 cmpl %a2@(80),%d1
4b0fa: 6704 beqs 4b100 <_Thread_queue_Extract_priority_helper+0x8c><== NEVER TAKEN
_ISR_Enable( level );
4b0fc: 46c0 movew %d0,%sr 4b0fe: 6014 bras 4b114 <_Thread_queue_Extract_priority_helper+0xa0>
4b100: 7203 moveq #3,%d1 <== NOT EXECUTED 4b102: 2541 0050 movel %d1,%a2@(80) <== NOT EXECUTED
} else {
_Watchdog_Deactivate( &the_thread->Timer );
_ISR_Enable( level );
4b106: 46c0 movew %d0,%sr <== NOT EXECUTED
(void) _Watchdog_Remove( &the_thread->Timer );
4b108: 486a 0048 pea %a2@(72) <== NOT EXECUTED 4b10c: 4eb9 0004 8730 jsr 48730 <_Watchdog_Remove> <== NOT EXECUTED 4b112: 588f addql #4,%sp <== NOT EXECUTED
4b114: 2d4a 0008 movel %a2,%fp@(8) 4b118: 227c 1003 fff8 moveal #268697592,%a1
#if defined(RTEMS_MULTIPROCESSING)
if ( !_Objects_Is_local_id( the_thread->Object.id ) )
_Thread_MP_Free_proxy( the_thread );
#endif
}
4b11e: 4cee 3c04 ffec moveml %fp@(-20),%d2/%a2-%a5 4b124: 2d49 000c movel %a1,%fp@(12) 4b128: 4e5e unlk %fp 4b12a: 4ef9 0004 72f0 jmp 472f0 <_Thread_Clear_state> 4b130: 4cee 3c04 ffec moveml %fp@(-20),%d2/%a2-%a5 4b136: 4e5e unlk %fp
...
0004b13c <_Thread_queue_Process_timeout>:
#include <rtems/score/tqdata.h>
void _Thread_queue_Process_timeout(
Thread_Control *the_thread
)
{
4b13c: 4e56 0000 linkw %fp,#0 4b140: 226e 0008 moveal %fp@(8),%a1
Thread_queue_Control *the_thread_queue = the_thread->Wait.queue;
4b144: 2069 0044 moveal %a1@(68),%a0
* If it is not satisfied, then it is "nothing happened" and
* this is the "timeout" transition. After a request is satisfied,
* a timeout is not allowed to occur.
*/
if ( the_thread_queue->sync_state != THREAD_BLOCKING_OPERATION_SYNCHRONIZED &&
4b148: 2028 0030 movel %a0@(48),%d0
4b14c: 671c beqs 4b16a <_Thread_queue_Process_timeout+0x2e>
4b14e: b3f9 0005 dddc cmpal 5dddc <_Per_CPU_Information+0xc>,%a1
4b154: 6614 bnes 4b16a <_Thread_queue_Process_timeout+0x2e><== NEVER TAKEN
_Thread_Is_executing( the_thread ) ) {
if ( the_thread_queue->sync_state != THREAD_BLOCKING_OPERATION_SATISFIED ) {
4b156: 7203 moveq #3,%d1 4b158: b280 cmpl %d0,%d1
4b15a: 6720 beqs 4b17c <_Thread_queue_Process_timeout+0x40>
the_thread->Wait.return_code = the_thread->Wait.queue->timeout_status;
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_TIMEOUT;
4b15c: 7002 moveq #2,%d0
*/
if ( the_thread_queue->sync_state != THREAD_BLOCKING_OPERATION_SYNCHRONIZED &&
_Thread_Is_executing( the_thread ) ) {
if ( the_thread_queue->sync_state != THREAD_BLOCKING_OPERATION_SATISFIED ) {
the_thread->Wait.return_code = the_thread->Wait.queue->timeout_status;
4b15e: 2368 003c 0034 movel %a0@(60),%a1@(52)
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_TIMEOUT;
4b164: 2140 0030 movel %d0,%a0@(48) 4b168: 6012 bras 4b17c <_Thread_queue_Process_timeout+0x40>
}
} else {
the_thread->Wait.return_code = the_thread->Wait.queue->timeout_status;
4b16a: 2368 003c 0034 movel %a0@(60),%a1@(52)
_Thread_queue_Extract( the_thread->Wait.queue, the_thread );
4b170: 2f09 movel %a1,%sp@- 4b172: 2f08 movel %a0,%sp@- 4b174: 4eb9 0004 b03c jsr 4b03c <_Thread_queue_Extract> 4b17a: 508f addql #8,%sp
} }
4b17c: 4e5e unlk %fp <== NOT EXECUTED
00047dc8 <_Thread_queue_Requeue>:
void _Thread_queue_Requeue(
Thread_queue_Control *the_thread_queue,
Thread_Control *the_thread
)
{
47dc8: 4e56 fff0 linkw %fp,#-16 47dcc: 48d7 0c04 moveml %d2/%a2-%a3,%sp@ 47dd0: 246e 0008 moveal %fp@(8),%a2 47dd4: 266e 000c moveal %fp@(12),%a3
/* * Just in case the thread really wasn't blocked on a thread queue * when we get here. */ if ( !the_thread_queue )
47dd8: 4a8a tstl %a2
47dda: 6746 beqs 47e22 <_Thread_queue_Requeue+0x5a> <== NEVER TAKEN
/*
* If queueing by FIFO, there is nothing to do. This only applies to
* priority blocking discipline.
*/
if ( the_thread_queue->discipline == THREAD_QUEUE_DISCIPLINE_PRIORITY ) {
47ddc: 7001 moveq #1,%d0 47dde: b0aa 0034 cmpl %a2@(52),%d0
47de2: 663e bnes 47e22 <_Thread_queue_Requeue+0x5a> <== NEVER TAKEN
Thread_queue_Control *tq = the_thread_queue;
ISR_Level level;
ISR_Level level_ignored;
_ISR_Disable( level );
47de4: 303c 0700 movew #1792,%d0 47de8: 40c2 movew %sr,%d2 47dea: 8082 orl %d2,%d0 47dec: 46c0 movew %d0,%sr 47dee: 202b 0010 movel %a3@(16),%d0 47df2: 0280 0003 bee0 andil #245472,%d0
if ( _States_Is_waiting_on_thread_queue( the_thread->current_state ) ) {
47df8: 6726 beqs 47e20 <_Thread_queue_Requeue+0x58> <== NEVER TAKEN
RTEMS_INLINE_ROUTINE void _Thread_queue_Enter_critical_section (
Thread_queue_Control *the_thread_queue
)
{
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
47dfa: 7001 moveq #1,%d0 47dfc: 2540 0030 movel %d0,%a2@(48)
_Thread_queue_Enter_critical_section( tq );
_Thread_queue_Extract_priority_helper( tq, the_thread, true );
47e00: 4878 0001 pea 1 <ADD> 47e04: 2f0b movel %a3,%sp@- 47e06: 2f0a movel %a2,%sp@- 47e08: 4eb9 0004 b074 jsr 4b074 <_Thread_queue_Extract_priority_helper>
(void) _Thread_queue_Enqueue_priority( tq, the_thread, &level_ignored );
47e0e: 486e fffc pea %fp@(-4) 47e12: 2f0b movel %a3,%sp@- 47e14: 2f0a movel %a2,%sp@- 47e16: 4eb9 0004 7bb4 jsr 47bb4 <_Thread_queue_Enqueue_priority> 47e1c: 4fef 0018 lea %sp@(24),%sp
}
_ISR_Enable( level );
47e20: 46c2 movew %d2,%sr
} }
47e22: 4cee 0c04 fff0 moveml %fp@(-16),%d2/%a2-%a3
47e28: 4e5e unlk %fp <== NOT EXECUTED
00047e2c <_Thread_queue_Timeout>:
void _Thread_queue_Timeout(
Objects_Id id,
void *ignored __attribute__((unused))
)
{
47e2c: 4e56 fffc linkw %fp,#-4
Thread_Control *the_thread;
Objects_Locations location;
the_thread = _Thread_Get( id, &location );
47e30: 486e fffc pea %fp@(-4) 47e34: 2f2e 0008 movel %fp@(8),%sp@- 47e38: 4eb9 0004 76bc jsr 476bc <_Thread_Get>
switch ( location ) {
47e3e: 508f addql #8,%sp 47e40: 4aae fffc tstl %fp@(-4)
47e44: 6618 bnes 47e5e <_Thread_queue_Timeout+0x32> <== NEVER TAKEN
#if defined(RTEMS_MULTIPROCESSING)
case OBJECTS_REMOTE: /* impossible */
#endif
break;
case OBJECTS_LOCAL:
_Thread_queue_Process_timeout( the_thread );
47e46: 2f00 movel %d0,%sp@- 47e48: 4eb9 0004 b13c jsr 4b13c <_Thread_queue_Process_timeout>
*/
RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void )
{
RTEMS_COMPILER_MEMORY_BARRIER();
_Thread_Dispatch_disable_level -= 1;
47e4e: 588f addql #4,%sp 47e50: 2039 0005 d94c movel 5d94c <_Thread_Dispatch_disable_level>,%d0 47e56: 5380 subql #1,%d0 47e58: 23c0 0005 d94c movel %d0,5d94c <_Thread_Dispatch_disable_level>
_Thread_Unnest_dispatch();
break;
}
}
47e5e: 4e5e unlk %fp
...
000521d2 <_Timer_server_Body>:
* @a arg points to the corresponding timer server control block.
*/
static rtems_task _Timer_server_Body(
rtems_task_argument arg
)
{
521d2: 4e56 ffb4 linkw %fp,#-76
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
521d6: 200e movel %fp,%d0 521d8: 0680 ffff fff4 addil #-12,%d0 521de: 48d7 3cfc moveml %d2-%d7/%a2-%a5,%sp@ 521e2: 246e 0008 moveal %fp@(8),%a2
static void _Timer_server_Stop_interval_system_watchdog(
Timer_server_Control *ts
)
{
_Watchdog_Remove( &ts->Interval_watchdogs.System_watchdog );
521e6: 41ea 0008 lea %a2@(8),%a0 521ea: 2e0e movel %fp,%d7 521ec: 260e movel %fp,%d3 521ee: 280e movel %fp,%d4 521f0: 5187 subql #8,%d7 521f2: 0683 ffff ffe8 addil #-24,%d3 521f8: 0684 ffff ffec addil #-20,%d4
*/
Watchdog_Interval delta = snapshot - watchdogs->last_snapshot;
watchdogs->last_snapshot = snapshot;
_Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain );
521fe: 2c0a movel %a2,%d6
/*
* The current TOD is before the last TOD which indicates that
* TOD has been set backwards.
*/
delta = last_snapshot - snapshot;
_Watchdog_Adjust( &watchdogs->Chain, WATCHDOG_BACKWARD, delta );
52200: 240a movel %a2,%d2
*/
Watchdog_Interval delta = snapshot - watchdogs->last_snapshot;
watchdogs->last_snapshot = snapshot;
_Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain );
52202: 0686 0000 0030 addil #48,%d6 52208: 49f9 0005 6034 lea 56034 <_Watchdog_Adjust_to_chain>,%a4
/*
* The current TOD is before the last TOD which indicates that
* TOD has been set backwards.
*/
delta = last_snapshot - snapshot;
_Watchdog_Adjust( &watchdogs->Chain, WATCHDOG_BACKWARD, delta );
5220e: 0682 0000 0068 addil #104,%d2
}
static void _Timer_server_Process_insertions( Timer_server_Control *ts )
{
while ( true ) {
Timer_Control *timer = (Timer_Control *) _Chain_Get( ts->insert_chain );
52214: 4bf9 0005 2cc4 lea 52cc4 <_Chain_Get>,%a5
)
{
if ( timer->the_class == TIMER_INTERVAL_ON_TASK ) {
_Watchdog_Insert( &ts->Interval_watchdogs.Chain, &timer->Ticker );
} else if ( timer->the_class == TIMER_TIME_OF_DAY_ON_TASK ) {
_Watchdog_Insert( &ts->TOD_watchdogs.Chain, &timer->Ticker );
5221a: 47f9 0005 60c4 lea 560c4 <_Watchdog_Insert>,%a3
static void _Timer_server_Stop_interval_system_watchdog(
Timer_server_Control *ts
)
{
_Watchdog_Remove( &ts->Interval_watchdogs.System_watchdog );
52220: 2d48 ffe4 movel %a0,%fp@(-28)
static void _Timer_server_Stop_tod_system_watchdog(
Timer_server_Control *ts
)
{
_Watchdog_Remove( &ts->TOD_watchdogs.System_watchdog );
52224: 41ea 0040 lea %a2@(64),%a0
*/
RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty(
Chain_Control *the_chain
)
{
the_chain->first = _Chain_Tail(the_chain);
52228: 2d47 fff4 movel %d7,%fp@(-12)
the_chain->permanent_null = NULL;
5222c: 42ae fff8 clrl %fp@(-8)
{
Timer_server_Control *ts = (Timer_server_Control *) arg;
Chain_Control insert_chain;
Chain_Control fire_chain;
_Chain_Initialize_empty( &insert_chain );
52230: 2d40 fffc movel %d0,%fp@(-4)
*/
RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty(
Chain_Control *the_chain
)
{
the_chain->first = _Chain_Tail(the_chain);
52234: 2d44 ffe8 movel %d4,%fp@(-24)
the_chain->permanent_null = NULL;
52238: 42ae ffec clrl %fp@(-20)
the_chain->last = _Chain_Head(the_chain);
5223c: 2d43 fff0 movel %d3,%fp@(-16)
static void _Timer_server_Stop_tod_system_watchdog(
Timer_server_Control *ts
)
{
_Watchdog_Remove( &ts->TOD_watchdogs.System_watchdog );
52240: 2d48 ffe0 movel %a0,%fp@(-32)
{
/*
* Afterwards all timer inserts are directed to this chain and the interval
* and TOD chains will be no more modified by other parties.
*/
ts->insert_chain = insert_chain;
52244: 41ee fff4 lea %fp@(-12),%a0 52248: 2548 0078 movel %a0,%a2@(120)
static void _Timer_server_Process_interval_watchdogs(
Timer_server_Watchdogs *watchdogs,
Chain_Control *fire_chain
)
{
Watchdog_Interval snapshot = _Watchdog_Ticks_since_boot;
5224c: 2039 0007 663c movel 7663c <_Watchdog_Ticks_since_boot>,%d0
/*
* We assume adequate unsigned arithmetic here.
*/
Watchdog_Interval delta = snapshot - watchdogs->last_snapshot;
52252: 222a 003c movel %a2@(60),%d1
watchdogs->last_snapshot = snapshot;
52256: 2540 003c movel %d0,%a2@(60)
_Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain );
5225a: 486e ffe8 pea %fp@(-24) 5225e: 9081 subl %d1,%d0 52260: 2f00 movel %d0,%sp@- 52262: 2f06 movel %d6,%sp@- 52264: 4e94 jsr %a4@
static void _Timer_server_Process_tod_watchdogs(
Timer_server_Watchdogs *watchdogs,
Chain_Control *fire_chain
)
{
Watchdog_Interval snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch();
52266: 2039 0007 659a movel 7659a <_TOD_Now>,%d0
/*
* Process the seconds chain. Start by checking that the Time
* of Day (TOD) has not been set backwards. If it has then
* we want to adjust the watchdogs->Chain to indicate this.
*/
if ( snapshot > last_snapshot ) {
5226c: 4fef 000c lea %sp@(12),%sp
Timer_server_Watchdogs *watchdogs,
Chain_Control *fire_chain
)
{
Watchdog_Interval snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch();
Watchdog_Interval last_snapshot = watchdogs->last_snapshot;
52270: 222a 0074 movel %a2@(116),%d1
/*
* Process the seconds chain. Start by checking that the Time
* of Day (TOD) has not been set backwards. If it has then
* we want to adjust the watchdogs->Chain to indicate this.
*/
if ( snapshot > last_snapshot ) {
52274: b280 cmpl %d0,%d1
52276: 6414 bccs 5228c <_Timer_server_Body+0xba>
/*
* This path is for normal forward movement and cases where the
* TOD has been set forward.
*/
delta = snapshot - last_snapshot;
_Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain );
52278: 486e ffe8 pea %fp@(-24) 5227c: 2a00 movel %d0,%d5 5227e: 9a81 subl %d1,%d5 52280: 2f05 movel %d5,%sp@- 52282: 2d40 ffdc movel %d0,%fp@(-36) 52286: 2f02 movel %d2,%sp@- 52288: 4e94 jsr %a4@ 5228a: 6018 bras 522a4 <_Timer_server_Body+0xd2>
} else if ( snapshot < last_snapshot ) {
5228c: b280 cmpl %d0,%d1
5228e: 631c blss 522ac <_Timer_server_Body+0xda>
/*
* The current TOD is before the last TOD which indicates that
* TOD has been set backwards.
*/
delta = last_snapshot - snapshot;
_Watchdog_Adjust( &watchdogs->Chain, WATCHDOG_BACKWARD, delta );
52290: 9280 subl %d0,%d1 52292: 2f01 movel %d1,%sp@- 52294: 4878 0001 pea 1 <ADD> 52298: 2d40 ffdc movel %d0,%fp@(-36) 5229c: 2f02 movel %d2,%sp@- 5229e: 4eb9 0005 5fb4 jsr 55fb4 <_Watchdog_Adjust> 522a4: 202e ffdc movel %fp@(-36),%d0 522a8: 4fef 000c lea %sp@(12),%sp
}
watchdogs->last_snapshot = snapshot;
522ac: 2540 0074 movel %d0,%a2@(116)
}
static void _Timer_server_Process_insertions( Timer_server_Control *ts )
{
while ( true ) {
Timer_Control *timer = (Timer_Control *) _Chain_Get( ts->insert_chain );
522b0: 202a 0078 movel %a2@(120),%d0 522b4: 2f00 movel %d0,%sp@- 522b6: 4e95 jsr %a5@
if ( timer == NULL ) {
522b8: 588f addql #4,%sp
}
static void _Timer_server_Process_insertions( Timer_server_Control *ts )
{
while ( true ) {
Timer_Control *timer = (Timer_Control *) _Chain_Get( ts->insert_chain );
522ba: 2040 moveal %d0,%a0
if ( timer == NULL ) {
522bc: 4a80 tstl %d0
522be: 6724 beqs 522e4 <_Timer_server_Body+0x112> <== ALWAYS TAKEN
static void _Timer_server_Insert_timer(
Timer_server_Control *ts,
Timer_Control *timer
)
{
if ( timer->the_class == TIMER_INTERVAL_ON_TASK ) {
522c0: 2028 0038 movel %a0@(56),%d0 <== NOT EXECUTED 522c4: 7201 moveq #1,%d1 <== NOT EXECUTED 522c6: b280 cmpl %d0,%d1 <== NOT EXECUTED 522c8: 6608 bnes 522d2 <_Timer_server_Body+0x100> <== NOT EXECUTED
_Watchdog_Insert( &ts->Interval_watchdogs.Chain, &timer->Ticker );
522ca: 4868 0010 pea %a0@(16) <== NOT EXECUTED 522ce: 2f06 movel %d6,%sp@- <== NOT EXECUTED 522d0: 600c bras 522de <_Timer_server_Body+0x10c> <== NOT EXECUTED
} else if ( timer->the_class == TIMER_TIME_OF_DAY_ON_TASK ) {
522d2: 7a03 moveq #3,%d5 <== NOT EXECUTED 522d4: ba80 cmpl %d0,%d5 <== NOT EXECUTED 522d6: 66d8 bnes 522b0 <_Timer_server_Body+0xde> <== NOT EXECUTED
_Watchdog_Insert( &ts->TOD_watchdogs.Chain, &timer->Ticker );
522d8: 4868 0010 pea %a0@(16) <== NOT EXECUTED 522dc: 2f02 movel %d2,%sp@- <== NOT EXECUTED 522de: 4e93 jsr %a3@ <== NOT EXECUTED 522e0: 508f addql #8,%sp <== NOT EXECUTED 522e2: 60cc bras 522b0 <_Timer_server_Body+0xde> <== NOT EXECUTED
* of zero it will be processed in the next iteration of the timer server
* body loop.
*/
_Timer_server_Process_insertions( ts );
_ISR_Disable( level );
522e4: 203c 0000 0700 movel #1792,%d0 522ea: 40c1 movew %sr,%d1 522ec: 8081 orl %d1,%d0 522ee: 46c0 movew %d0,%sr
if ( _Chain_Is_empty( insert_chain ) ) {
522f0: beae fff4 cmpl %fp@(-12),%d7
522f4: 6614 bnes 5230a <_Timer_server_Body+0x138> <== NEVER TAKEN
ts->insert_chain = NULL;
522f6: 42aa 0078 clrl %a2@(120)
_ISR_Enable( level );
522fa: 46c1 movew %d1,%sr
/*
* It is essential that interrupts are disable here since an interrupt
* service routine may remove a watchdog from the chain.
*/
_ISR_Disable( level );
522fc: 2a3c 0000 0700 movel #1792,%d5
_Chain_Initialize_empty( &fire_chain );
while ( true ) {
_Timer_server_Get_watchdogs_that_fire_now( ts, &insert_chain, &fire_chain );
if ( !_Chain_Is_empty( &fire_chain ) ) {
52302: b8ae ffe8 cmpl %fp@(-24),%d4
52306: 6608 bnes 52310 <_Timer_server_Body+0x13e>
52308: 6042 bras 5234c <_Timer_server_Body+0x17a>
ts->insert_chain = NULL;
_ISR_Enable( level );
break;
} else {
_ISR_Enable( level );
5230a: 46c1 movew %d1,%sr <== NOT EXECUTED 5230c: 6000 ff3e braw 5224c <_Timer_server_Body+0x7a> <== NOT EXECUTED
/*
* It is essential that interrupts are disable here since an interrupt
* service routine may remove a watchdog from the chain.
*/
_ISR_Disable( level );
52310: 2205 movel %d5,%d1 52312: 40c0 movew %sr,%d0 52314: 8280 orl %d0,%d1 52316: 46c1 movew %d1,%sr
*/
RTEMS_INLINE_ROUTINE bool _Chain_Is_empty(
Chain_Control *the_chain
)
{
return (the_chain->first == _Chain_Tail(the_chain));
52318: 206e ffe8 moveal %fp@(-24),%a0
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Get_unprotected(
Chain_Control *the_chain
)
{
if ( !_Chain_Is_empty(the_chain))
5231c: b888 cmpl %a0,%d4
5231e: 6726 beqs 52346 <_Timer_server_Body+0x174>
{
Chain_Node *return_node;
Chain_Node *new_first;
return_node = the_chain->first;
new_first = return_node->next;
52320: 2250 moveal %a0@,%a1
the_chain->first = new_first;
52322: 2d49 ffe8 movel %a1,%fp@(-24)
new_first->previous = _Chain_Head(the_chain);
52326: 2343 0004 movel %d3,%a1@(4)
watchdog = (Watchdog_Control *) _Chain_Get_unprotected( &fire_chain );
if ( watchdog != NULL ) {
5232a: 4a88 tstl %a0
5232c: 6718 beqs 52346 <_Timer_server_Body+0x174> <== NEVER TAKEN
watchdog->state = WATCHDOG_INACTIVE;
5232e: 42a8 0008 clrl %a0@(8)
_ISR_Enable( level );
52332: 46c0 movew %d0,%sr
/*
* The timer server may block here and wait for resources or time.
* The system watchdogs are inactive and will remain inactive since
* the active flag of the timer server is true.
*/
(*watchdog->routine)( watchdog->id, watchdog->user_data );
52334: 2f28 0024 movel %a0@(36),%sp@- 52338: 2f28 0020 movel %a0@(32),%sp@- 5233c: 2068 001c moveal %a0@(28),%a0 52340: 4e90 jsr %a0@
}
52342: 508f addql #8,%sp 52344: 60ca bras 52310 <_Timer_server_Body+0x13e>
watchdog = (Watchdog_Control *) _Chain_Get_unprotected( &fire_chain );
if ( watchdog != NULL ) {
watchdog->state = WATCHDOG_INACTIVE;
_ISR_Enable( level );
} else {
_ISR_Enable( level );
52346: 46c0 movew %d0,%sr 52348: 6000 fefa braw 52244 <_Timer_server_Body+0x72>
* the active flag of the timer server is true.
*/
(*watchdog->routine)( watchdog->id, watchdog->user_data );
}
} else {
ts->active = false;
5234c: 4200 clrb %d0 5234e: 1540 007c moveb %d0,%a2@(124)
/*
* Block until there is something to do.
*/
_Thread_Disable_dispatch();
52352: 4eba fda4 jsr %pc@(520f8 <_Thread_Disable_dispatch>)
_Thread_Set_state( ts->thread, STATES_DELAYING );
52356: 4878 0008 pea 8 <DIVIDE_BY_ZERO> 5235a: 2f12 movel %a2@,%sp@- 5235c: 4eb9 0005 57d4 jsr 557d4 <_Thread_Set_state>
_Timer_server_Reset_interval_system_watchdog( ts );
52362: 2f0a movel %a2,%sp@- 52364: 4eba fda8 jsr %pc@(5210e <_Timer_server_Reset_interval_system_watchdog>)
_Timer_server_Reset_tod_system_watchdog( ts );
52368: 2f0a movel %a2,%sp@- 5236a: 4eba fe02 jsr %pc@(5216e <_Timer_server_Reset_tod_system_watchdog>)
_Thread_Enable_dispatch();
5236e: 4eb9 0005 4e6a jsr 54e6a <_Thread_Enable_dispatch>
ts->active = true;
52374: 7201 moveq #1,%d1
static void _Timer_server_Stop_interval_system_watchdog(
Timer_server_Control *ts
)
{
_Watchdog_Remove( &ts->Interval_watchdogs.System_watchdog );
52376: 41f9 0005 61e0 lea 561e0 <_Watchdog_Remove>,%a0
_Thread_Set_state( ts->thread, STATES_DELAYING );
_Timer_server_Reset_interval_system_watchdog( ts );
_Timer_server_Reset_tod_system_watchdog( ts );
_Thread_Enable_dispatch();
ts->active = true;
5237c: 1541 007c moveb %d1,%a2@(124)
static void _Timer_server_Stop_interval_system_watchdog(
Timer_server_Control *ts
)
{
_Watchdog_Remove( &ts->Interval_watchdogs.System_watchdog );
52380: 2f2e ffe4 movel %fp@(-28),%sp@- 52384: 2d48 ffdc movel %a0,%fp@(-36) 52388: 4e90 jsr %a0@
static void _Timer_server_Stop_tod_system_watchdog(
Timer_server_Control *ts
)
{
_Watchdog_Remove( &ts->TOD_watchdogs.System_watchdog );
5238a: 2f2e ffe0 movel %fp@(-32),%sp@- 5238e: 206e ffdc moveal %fp@(-36),%a0 52392: 4e90 jsr %a0@ 52394: 4fef 0018 lea %sp@(24),%sp 52398: 6000 feaa braw 52244 <_Timer_server_Body+0x72>
0005239c <_Timer_server_Schedule_operation_method>:
static void _Timer_server_Schedule_operation_method(
Timer_server_Control *ts,
Timer_Control *timer
)
{
5239c: 4e56 fff0 linkw %fp,#-16 523a0: 48d7 1c04 moveml %d2/%a2-%a4,%sp@ 523a4: 246e 0008 moveal %fp@(8),%a2 523a8: 266e 000c moveal %fp@(12),%a3
if ( ts->insert_chain == NULL ) {
523ac: 202a 0078 movel %a2@(120),%d0 523b0: 6600 00ea bnew 5249c <_Timer_server_Schedule_operation_method+0x100>
* is the reference point for the delta chain. Thus if we do not update the
* reference point we have to add DT to the initial delta of the watchdog
* being inserted. This could result in an integer overflow.
*/
_Thread_Disable_dispatch();
523b4: 4eba fd42 jsr %pc@(520f8 <_Thread_Disable_dispatch>)
if ( timer->the_class == TIMER_INTERVAL_ON_TASK ) {
523b8: 202b 0038 movel %a3@(56),%d0 523bc: 7201 moveq #1,%d1 523be: b280 cmpl %d0,%d1
523c0: 665c bnes 5241e <_Timer_server_Schedule_operation_method+0x82>
/*
* We have to advance the last known ticks value of the server and update
* the watchdog chain accordingly.
*/
_ISR_Disable( level );
523c2: 203c 0000 0700 movel #1792,%d0 523c8: 40c2 movew %sr,%d2 523ca: 8082 orl %d2,%d0 523cc: 46c0 movew %d0,%sr
snapshot = _Watchdog_Ticks_since_boot;
523ce: 2039 0007 663c movel 7663c <_Watchdog_Ticks_since_boot>,%d0
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
523d4: 43ea 0034 lea %a2@(52),%a1
last_snapshot = ts->Interval_watchdogs.last_snapshot;
523d8: 222a 003c movel %a2@(60),%d1
*/
RTEMS_INLINE_ROUTINE bool _Chain_Is_empty(
Chain_Control *the_chain
)
{
return (the_chain->first == _Chain_Tail(the_chain));
523dc: 206a 0030 moveal %a2@(48),%a0
if ( !_Chain_Is_empty( &ts->Interval_watchdogs.Chain ) ) {
523e0: b3c8 cmpal %a0,%a1
523e2: 6716 beqs 523fa <_Timer_server_Schedule_operation_method+0x5e>
first_watchdog = _Watchdog_First( &ts->Interval_watchdogs.Chain );
/*
* We assume adequate unsigned arithmetic here.
*/
delta = snapshot - last_snapshot;
523e4: 2240 moveal %d0,%a1 523e6: 93c1 subal %d1,%a1
delta_interval = first_watchdog->delta_interval;
523e8: 2228 0010 movel %a0@(16),%d1
if (delta_interval > delta) {
523ec: b3c1 cmpal %d1,%a1
523ee: 6404 bccs 523f4 <_Timer_server_Schedule_operation_method+0x58>
delta_interval -= delta;
523f0: 9289 subl %a1,%d1 523f2: 6002 bras 523f6 <_Timer_server_Schedule_operation_method+0x5a>
} else {
delta_interval = 0;
523f4: 4281 clrl %d1
}
first_watchdog->delta_interval = delta_interval;
523f6: 2141 0010 movel %d1,%a0@(16)
}
ts->Interval_watchdogs.last_snapshot = snapshot;
523fa: 2540 003c movel %d0,%a2@(60)
_ISR_Enable( level );
523fe: 46c2 movew %d2,%sr
_Watchdog_Insert( &ts->Interval_watchdogs.Chain, &timer->Ticker );
52400: 486b 0010 pea %a3@(16) 52404: 486a 0030 pea %a2@(48) 52408: 4eb9 0005 60c4 jsr 560c4 <_Watchdog_Insert>
if ( !ts->active ) {
5240e: 508f addql #8,%sp 52410: 102a 007c moveb %a2@(124),%d0
52414: 6678 bnes 5248e <_Timer_server_Schedule_operation_method+0xf2>
_Timer_server_Reset_interval_system_watchdog( ts );
52416: 2f0a movel %a2,%sp@- 52418: 4eba fcf4 jsr %pc@(5210e <_Timer_server_Reset_interval_system_watchdog>) 5241c: 606e bras 5248c <_Timer_server_Schedule_operation_method+0xf0>
}
} else if ( timer->the_class == TIMER_TIME_OF_DAY_ON_TASK ) {
5241e: 7203 moveq #3,%d1 52420: b280 cmpl %d0,%d1
52422: 666a bnes 5248e <_Timer_server_Schedule_operation_method+0xf2>
/*
* We have to advance the last known seconds value of the server and update
* the watchdog chain accordingly.
*/
_ISR_Disable( level );
52424: 203c 0000 0700 movel #1792,%d0 5242a: 40c2 movew %sr,%d2 5242c: 8082 orl %d2,%d0 5242e: 46c0 movew %d0,%sr
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
52430: 200a movel %a2,%d0 52432: 0680 0000 006c addil #108,%d0
snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch();
52438: 2239 0007 659a movel 7659a <_TOD_Now>,%d1
last_snapshot = ts->TOD_watchdogs.last_snapshot;
5243e: 226a 0074 moveal %a2@(116),%a1
*/
RTEMS_INLINE_ROUTINE bool _Chain_Is_empty(
Chain_Control *the_chain
)
{
return (the_chain->first == _Chain_Tail(the_chain));
52442: 206a 0068 moveal %a2@(104),%a0
if ( !_Chain_Is_empty( &ts->TOD_watchdogs.Chain ) ) {
52446: b088 cmpl %a0,%d0
52448: 6720 beqs 5246a <_Timer_server_Schedule_operation_method+0xce>
first_watchdog = _Watchdog_First( &ts->TOD_watchdogs.Chain );
delta_interval = first_watchdog->delta_interval;
5244a: 2028 0010 movel %a0@(16),%d0
if ( snapshot > last_snapshot ) {
5244e: b3c1 cmpal %d1,%a1
52450: 640c bccs 5245e <_Timer_server_Schedule_operation_method+0xc2>
/*
* We advanced in time.
*/
delta = snapshot - last_snapshot;
52452: 2841 moveal %d1,%a4 52454: 99c9 subal %a1,%a4
if (delta_interval > delta) {
52456: b9c0 cmpal %d0,%a4
52458: 640a bccs 52464 <_Timer_server_Schedule_operation_method+0xc8><== NEVER TAKEN
delta_interval -= delta;
5245a: 908c subl %a4,%d0 5245c: 6008 bras 52466 <_Timer_server_Schedule_operation_method+0xca>
}
} else {
/*
* Someone put us in the past.
*/
delta = last_snapshot - snapshot;
5245e: d089 addl %a1,%d0
delta_interval += delta;
52460: 9081 subl %d1,%d0 52462: 6002 bras 52466 <_Timer_server_Schedule_operation_method+0xca>
*/
delta = snapshot - last_snapshot;
if (delta_interval > delta) {
delta_interval -= delta;
} else {
delta_interval = 0;
52464: 4280 clrl %d0 <== NOT EXECUTED
* Someone put us in the past.
*/
delta = last_snapshot - snapshot;
delta_interval += delta;
}
first_watchdog->delta_interval = delta_interval;
52466: 2140 0010 movel %d0,%a0@(16)
}
ts->TOD_watchdogs.last_snapshot = snapshot;
5246a: 2541 0074 movel %d1,%a2@(116)
_ISR_Enable( level );
5246e: 46c2 movew %d2,%sr
_Watchdog_Insert( &ts->TOD_watchdogs.Chain, &timer->Ticker );
52470: 486b 0010 pea %a3@(16) 52474: 486a 0068 pea %a2@(104) 52478: 4eb9 0005 60c4 jsr 560c4 <_Watchdog_Insert>
if ( !ts->active ) {
5247e: 508f addql #8,%sp 52480: 102a 007c moveb %a2@(124),%d0
52484: 6608 bnes 5248e <_Timer_server_Schedule_operation_method+0xf2>
_Timer_server_Reset_tod_system_watchdog( ts );
52486: 2f0a movel %a2,%sp@- 52488: 4eba fce4 jsr %pc@(5216e <_Timer_server_Reset_tod_system_watchdog>) 5248c: 588f addql #4,%sp
* critical section. We have to use the protected chain methods because
* we may be interrupted by a higher priority interrupt.
*/
_Chain_Append( ts->insert_chain, &timer->Object.Node );
}
}
5248e: 4cee 1c04 fff0 moveml %fp@(-16),%d2/%a2-%a4 52494: 4e5e unlk %fp
if ( !ts->active ) {
_Timer_server_Reset_tod_system_watchdog( ts );
}
}
_Thread_Enable_dispatch();
52496: 4ef9 0005 4e6a jmp 54e6a <_Thread_Enable_dispatch>
* server is not preemptible, so we must be in interrupt context here. No
* thread dispatch will happen until the timer server finishes its
* critical section. We have to use the protected chain methods because
* we may be interrupted by a higher priority interrupt.
*/
_Chain_Append( ts->insert_chain, &timer->Object.Node );
5249c: 202a 0078 movel %a2@(120),%d0 <== NOT EXECUTED 524a0: 2d4b 000c movel %a3,%fp@(12) <== NOT EXECUTED
} }
524a4: 4cee 1c04 fff0 moveml %fp@(-16),%d2/%a2-%a4 <== NOT EXECUTED
* server is not preemptible, so we must be in interrupt context here. No
* thread dispatch will happen until the timer server finishes its
* critical section. We have to use the protected chain methods because
* we may be interrupted by a higher priority interrupt.
*/
_Chain_Append( ts->insert_chain, &timer->Object.Node );
524aa: 2d40 0008 movel %d0,%fp@(8) <== NOT EXECUTED
} }
524ae: 4e5e unlk %fp <== NOT EXECUTED
* server is not preemptible, so we must be in interrupt context here. No
* thread dispatch will happen until the timer server finishes its
* critical section. We have to use the protected chain methods because
* we may be interrupted by a higher priority interrupt.
*/
_Chain_Append( ts->insert_chain, &timer->Object.Node );
524b0: 4ef9 0005 2c64 jmp 52c64 <_Chain_Append> <== NOT EXECUTED
000484ca <_User_extensions_Fatal>:
void _User_extensions_Fatal (
Internal_errors_Source the_source,
bool is_internal,
Internal_errors_t the_error
)
{
484ca: 4e56 fff0 linkw %fp,#-16 484ce: 48d7 041c moveml %d2-%d4/%a2,%sp@
the_node = the_node->previous ) {
the_extension = (User_extensions_Control *) the_node;
if ( the_extension->Callouts.fatal != NULL )
(*the_extension->Callouts.fatal)( the_source, is_internal, the_error );
484d2: 4282 clrl %d2 484d4: 142e 000f moveb %fp@(15),%d2
void _User_extensions_Fatal (
Internal_errors_Source the_source,
bool is_internal,
Internal_errors_t the_error
)
{
484d8: 282e 0008 movel %fp@(8),%d4 484dc: 262e 0010 movel %fp@(16),%d3
Chain_Node *the_node;
User_extensions_Control *the_extension;
for ( the_node = _User_extensions_List.last ;
484e0: 2479 0005 daca moveal 5daca <_User_extensions_List+0x8>,%a2 484e6: 6018 bras 48500 <_User_extensions_Fatal+0x36>
!_Chain_Is_head( &_User_extensions_List, the_node ) ;
the_node = the_node->previous ) {
the_extension = (User_extensions_Control *) the_node;
if ( the_extension->Callouts.fatal != NULL )
484e8: 206a 0030 moveal %a2@(48),%a0 484ec: 4a88 tstl %a0
484ee: 670c beqs 484fc <_User_extensions_Fatal+0x32>
(*the_extension->Callouts.fatal)( the_source, is_internal, the_error );
484f0: 2f03 movel %d3,%sp@- 484f2: 2f02 movel %d2,%sp@- 484f4: 2f04 movel %d4,%sp@- 484f6: 4e90 jsr %a0@
484f8: 4fef 000c lea %sp@(12),%sp <== NOT EXECUTED
Chain_Node *the_node;
User_extensions_Control *the_extension;
for ( the_node = _User_extensions_List.last ;
!_Chain_Is_head( &_User_extensions_List, the_node ) ;
the_node = the_node->previous ) {
484fc: 246a 0004 moveal %a2@(4),%a2
)
{
Chain_Node *the_node;
User_extensions_Control *the_extension;
for ( the_node = _User_extensions_List.last ;
48500: b5fc 0005 dac2 cmpal #383682,%a2
48506: 66e0 bnes 484e8 <_User_extensions_Fatal+0x1e> <== ALWAYS TAKEN
the_extension = (User_extensions_Control *) the_node;
if ( the_extension->Callouts.fatal != NULL )
(*the_extension->Callouts.fatal)( the_source, is_internal, the_error );
}
}
48508: 4cee 041c fff0 moveml %fp@(-16),%d2-%d4/%a2 <== NOT EXECUTED 4850e: 4e5e unlk %fp <== NOT EXECUTED
...
000483a4 <_User_extensions_Handler_initialization>:
#include <rtems/score/userext.h>
#include <rtems/score/wkspace.h>
#include <string.h>
void _User_extensions_Handler_initialization(void)
{
483a4: 4e56 ffe8 linkw %fp,#-24
*/
RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty(
Chain_Control *the_chain
)
{
the_chain->first = _Chain_Tail(the_chain);
483a8: 203c 0005 dac6 movel #383686,%d0 483ae: 23c0 0005 dac2 movel %d0,5dac2 <_User_extensions_List>
the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain);
483b4: 203c 0005 dac2 movel #383682,%d0 483ba: 23c0 0005 daca movel %d0,5daca <_User_extensions_List+0x8>
*/
RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty(
Chain_Control *the_chain
)
{
the_chain->first = _Chain_Tail(the_chain);
483c0: 203c 0005 d954 movel #383316,%d0 483c6: 23c0 0005 d950 movel %d0,5d950 <_User_extensions_Switches_list>
the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain);
483cc: 203c 0005 d950 movel #383312,%d0
RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty(
Chain_Control *the_chain
)
{
the_chain->first = _Chain_Tail(the_chain);
the_chain->permanent_null = NULL;
483d2: 42b9 0005 dac6 clrl 5dac6 <_User_extensions_List+0x4> 483d8: 48d7 1c1c moveml %d2-%d4/%a2-%a4,%sp@
User_extensions_Control *extension;
uint32_t i;
uint32_t number_of_extensions;
User_extensions_Table *initial_extensions;
number_of_extensions = Configuration.number_of_initial_extensions;
483dc: 2839 0005 c1ca movel 5c1ca <Configuration+0x36>,%d4
initial_extensions = Configuration.User_extension_table;
483e2: 2639 0005 c1ce movel 5c1ce <Configuration+0x3a>,%d3 483e8: 42b9 0005 d954 clrl 5d954 <_User_extensions_Switches_list+0x4>
the_chain->last = _Chain_Head(the_chain);
483ee: 23c0 0005 d958 movel %d0,5d958 <_User_extensions_Switches_list+0x8>
_Chain_Initialize_empty( &_User_extensions_List );
_Chain_Initialize_empty( &_User_extensions_Switches_list );
if ( initial_extensions ) {
483f4: 4a83 tstl %d3
483f6: 6754 beqs 4844c <_User_extensions_Handler_initialization+0xa8><== NEVER TAKEN
extension = (User_extensions_Control *)
_Workspace_Allocate_or_fatal_error(
483f8: 7434 moveq #52,%d2 483fa: 4c04 2800 mulsl %d4,%d2
RTEMS_INLINE_ROUTINE void _User_extensions_Add_set_with_table(
User_extensions_Control *extension,
const User_extensions_Table *extension_table
)
{
extension->Callouts = *extension_table;
483fe: 49f9 0004 d300 lea 4d300 <memcpy>,%a4
_User_extensions_Add_set( extension );
48404: 47f9 0004 b290 lea 4b290 <_User_extensions_Add_set>,%a3 4840a: 2f02 movel %d2,%sp@- 4840c: 4eb9 0004 88bc jsr 488bc <_Workspace_Allocate_or_fatal_error> 48412: 2440 moveal %d0,%a2
number_of_extensions * sizeof( User_extensions_Control )
);
memset (
48414: 2f02 movel %d2,%sp@-
extension,
0,
number_of_extensions * sizeof( User_extensions_Control )
);
for ( i = 0 ; i < number_of_extensions ; i++ ) {
48416: 4282 clrl %d2
extension = (User_extensions_Control *)
_Workspace_Allocate_or_fatal_error(
number_of_extensions * sizeof( User_extensions_Control )
);
memset (
48418: 42a7 clrl %sp@- 4841a: 2f00 movel %d0,%sp@- 4841c: 4eb9 0004 d370 jsr 4d370 <memset>
extension,
0,
number_of_extensions * sizeof( User_extensions_Control )
);
for ( i = 0 ; i < number_of_extensions ; i++ ) {
48422: 4fef 0010 lea %sp@(16),%sp 48426: 6020 bras 48448 <_User_extensions_Handler_initialization+0xa4>
RTEMS_INLINE_ROUTINE void _User_extensions_Add_set_with_table(
User_extensions_Control *extension,
const User_extensions_Table *extension_table
)
{
extension->Callouts = *extension_table;
48428: 4878 0020 pea 20 <OPER2+0xc> 4842c: 5282 addql #1,%d2 4842e: 2f03 movel %d3,%sp@- 48430: 486a 0014 pea %a2@(20) 48434: 0683 0000 0020 addil #32,%d3 4843a: 4e94 jsr %a4@
_User_extensions_Add_set( extension );
4843c: 2f0a movel %a2,%sp@-
_User_extensions_Add_set_with_table (extension, &initial_extensions[i]);
extension++;
4843e: 45ea 0034 lea %a2@(52),%a2 48442: 4e93 jsr %a3@
extension,
0,
number_of_extensions * sizeof( User_extensions_Control )
);
for ( i = 0 ; i < number_of_extensions ; i++ ) {
48444: 4fef 0010 lea %sp@(16),%sp 48448: b882 cmpl %d2,%d4
4844a: 62dc bhis 48428 <_User_extensions_Handler_initialization+0x84>
_User_extensions_Add_set_with_table (extension, &initial_extensions[i]);
extension++;
}
}
}
4844c: 4cee 1c1c ffe8 moveml %fp@(-24),%d2-%d4/%a2-%a4 48452: 4e5e unlk %fp
...
00049b90 <_Watchdog_Adjust>:
Watchdog_Interval units
)
{
ISR_Level level;
_ISR_Disable( level );
49b90: 327c 0700 moveaw #1792,%a1 49b94: 2209 movel %a1,%d1
void _Watchdog_Adjust(
Chain_Control *header,
Watchdog_Adjust_directions direction,
Watchdog_Interval units
)
{
49b96: 4e56 ffe8 linkw %fp,#-24 49b9a: 48d7 1c1c moveml %d2-%d4/%a2-%a4,%sp@ 49b9e: 266e 0008 moveal %fp@(8),%a3 49ba2: 262e 000c movel %fp@(12),%d3 49ba6: 242e 0010 movel %fp@(16),%d2
ISR_Level level;
_ISR_Disable( level );
49baa: 40c0 movew %sr,%d0 49bac: 8280 orl %d0,%d1 49bae: 46c1 movew %d1,%sr
*/
RTEMS_INLINE_ROUTINE bool _Chain_Is_empty(
Chain_Control *the_chain
)
{
return (the_chain->first == _Chain_Tail(the_chain));
49bb0: 244b moveal %a3,%a2 49bb2: 205a moveal %a2@+,%a0
* hence the compiler must not assume *header to remain
* unmodified across that call.
*
* Till Straumann, 7/2003
*/
if ( !_Chain_Is_empty( header ) ) {
49bb4: b5c8 cmpal %a0,%a2
49bb6: 674c beqs 49c04 <_Watchdog_Adjust+0x74>
switch ( direction ) {
49bb8: 4a83 tstl %d3
49bba: 673c beqs 49bf8 <_Watchdog_Adjust+0x68>
49bbc: 7201 moveq #1,%d1 49bbe: b283 cmpl %d3,%d1
49bc0: 6642 bnes 49c04 <_Watchdog_Adjust+0x74> <== NEVER TAKEN
case WATCHDOG_BACKWARD:
_Watchdog_First( header )->delta_interval += units;
49bc2: d5a8 0010 addl %d2,%a0@(16)
break;
49bc6: 603c bras 49c04 <_Watchdog_Adjust+0x74>
RTEMS_INLINE_ROUTINE Watchdog_Control *_Watchdog_First(
Chain_Control *header
)
{
return ( (Watchdog_Control *) header->first );
49bc8: 2053 moveal %a3@,%a0
case WATCHDOG_FORWARD:
while ( units ) {
if ( units < _Watchdog_First( header )->delta_interval ) {
49bca: 2628 0010 movel %a0@(16),%d3 49bce: b682 cmpl %d2,%d3
49bd0: 6308 blss 49bda <_Watchdog_Adjust+0x4a>
_Watchdog_First( header )->delta_interval -= units;
49bd2: 9682 subl %d2,%d3 49bd4: 2143 0010 movel %d3,%a0@(16)
break;
49bd8: 602a bras 49c04 <_Watchdog_Adjust+0x74>
} else {
units -= _Watchdog_First( header )->delta_interval;
_Watchdog_First( header )->delta_interval = 1;
49bda: 7201 moveq #1,%d1 49bdc: 2141 0010 movel %d1,%a0@(16)
_ISR_Enable( level );
49be0: 46c0 movew %d0,%sr
_Watchdog_Tickle( header );
49be2: 2f0b movel %a3,%sp@- 49be4: 4e94 jsr %a4@
_ISR_Disable( level );
49be6: 2204 movel %d4,%d1 49be8: 40c0 movew %sr,%d0 49bea: 8280 orl %d0,%d1 49bec: 46c1 movew %d1,%sr
if ( _Chain_Is_empty( header ) )
49bee: 588f addql #4,%sp 49bf0: b5d3 cmpal %a3@,%a2
49bf2: 6710 beqs 49c04 <_Watchdog_Adjust+0x74>
while ( units ) {
if ( units < _Watchdog_First( header )->delta_interval ) {
_Watchdog_First( header )->delta_interval -= units;
break;
} else {
units -= _Watchdog_First( header )->delta_interval;
49bf4: 9483 subl %d3,%d2 49bf6: 6008 bras 49c00 <_Watchdog_Adjust+0x70>
_Watchdog_First( header )->delta_interval = 1;
_ISR_Enable( level );
_Watchdog_Tickle( header );
49bf8: 49f9 0004 9da8 lea 49da8 <_Watchdog_Tickle>,%a4
_ISR_Disable( level );
49bfe: 2809 movel %a1,%d4
switch ( direction ) {
case WATCHDOG_BACKWARD:
_Watchdog_First( header )->delta_interval += units;
break;
case WATCHDOG_FORWARD:
while ( units ) {
49c00: 4a82 tstl %d2
49c02: 66c4 bnes 49bc8 <_Watchdog_Adjust+0x38> <== ALWAYS TAKEN
}
break;
}
}
_ISR_Enable( level );
49c04: 46c0 movew %d0,%sr
}
49c06: 4cee 1c1c ffe8 moveml %fp@(-24),%d2-%d4/%a2-%a4
49c0c: 4e5e unlk %fp <== NOT EXECUTED
00048730 <_Watchdog_Remove>:
{
ISR_Level level;
Watchdog_States previous_state;
Watchdog_Control *next_watchdog;
_ISR_Disable( level );
48730: 203c 0000 0700 movel #1792,%d0
*/
Watchdog_States _Watchdog_Remove(
Watchdog_Control *the_watchdog
)
{
48736: 4e56 0000 linkw %fp,#0 4873a: 206e 0008 moveal %fp@(8),%a0 4873e: 2f0a movel %a2,%sp@- 48740: 2f02 movel %d2,%sp@-
ISR_Level level;
Watchdog_States previous_state;
Watchdog_Control *next_watchdog;
_ISR_Disable( level );
48742: 40c1 movew %sr,%d1 48744: 8081 orl %d1,%d0 48746: 46c0 movew %d0,%sr
previous_state = the_watchdog->state;
48748: 2028 0008 movel %a0@(8),%d0
switch ( previous_state ) {
4874c: 7401 moveq #1,%d2 4874e: b480 cmpl %d0,%d2
48750: 670c beqs 4875e <_Watchdog_Remove+0x2e> 48752: 6242 bhis 48796 <_Watchdog_Remove+0x66>
48754: 143c 0003 moveb #3,%d2 48758: b480 cmpl %d0,%d2
4875a: 653a bcss 48796 <_Watchdog_Remove+0x66> <== NEVER TAKEN
4875c: 6006 bras 48764 <_Watchdog_Remove+0x34>
/*
* It is not actually on the chain so just change the state and
* the Insert operation we interrupted will be aborted.
*/
the_watchdog->state = WATCHDOG_INACTIVE;
4875e: 42a8 0008 clrl %a0@(8)
break;
48762: 6032 bras 48796 <_Watchdog_Remove+0x66>
}
the_watchdog->stop_time = _Watchdog_Ticks_since_boot;
_ISR_Enable( level );
return( previous_state );
}
48764: 2250 moveal %a0@,%a1
break;
case WATCHDOG_ACTIVE:
case WATCHDOG_REMOVE_IT:
the_watchdog->state = WATCHDOG_INACTIVE;
48766: 42a8 0008 clrl %a0@(8)
next_watchdog = _Watchdog_Next( the_watchdog );
if ( _Watchdog_Next(next_watchdog) )
4876a: 4a91 tstl %a1@
4876c: 6708 beqs 48776 <_Watchdog_Remove+0x46>
next_watchdog->delta_interval += the_watchdog->delta_interval;
4876e: 2428 0010 movel %a0@(16),%d2 48772: d5a9 0010 addl %d2,%a1@(16)
if ( _Watchdog_Sync_count )
48776: 2479 0005 da74 moveal 5da74 <_Watchdog_Sync_count>,%a2 4877c: 4a8a tstl %a2
4877e: 670c beqs 4878c <_Watchdog_Remove+0x5c>
_Watchdog_Sync_level = _ISR_Nest_level;
48780: 45f9 0005 ddd8 lea 5ddd8 <_Per_CPU_Information+0x8>,%a2 48786: 23d2 0005 d9f2 movel %a2@,5d9f2 <_Watchdog_Sync_level>
{
Chain_Node *next;
Chain_Node *previous;
next = the_node->next;
previous = the_node->previous;
4878c: 2468 0004 moveal %a0@(4),%a2
next->previous = previous;
48790: 234a 0004 movel %a2,%a1@(4)
previous->next = next;
48794: 2489 movel %a1,%a2@
_Chain_Extract_unprotected( &the_watchdog->Node );
break;
}
the_watchdog->stop_time = _Watchdog_Ticks_since_boot;
48796: 2279 0005 da78 moveal 5da78 <_Watchdog_Ticks_since_boot>,%a1 4879c: 2149 0018 movel %a1,%a0@(24)
_ISR_Enable( level );
487a0: 46c1 movew %d1,%sr
return( previous_state ); }
487a2: 241f movel %sp@+,%d2 487a4: 245f moveal %sp@+,%a2 487a6: 4e5e unlk %fp
...
00049788 <_Watchdog_Report_chain>:
)
{
ISR_Level level;
Chain_Node *node;
_ISR_Disable( level );
49788: 203c 0000 0700 movel #1792,%d0
void _Watchdog_Report_chain(
const char *name,
Chain_Control *header
)
{
4978e: 4e56 ffec linkw %fp,#-20 49792: 48d7 1c0c moveml %d2-%d3/%a2-%a4,%sp@ 49796: 242e 0008 movel %fp@(8),%d2 4979a: 266e 000c moveal %fp@(12),%a3
ISR_Level level;
Chain_Node *node;
_ISR_Disable( level );
4979e: 40c3 movew %sr,%d3 497a0: 8083 orl %d3,%d0 497a2: 46c0 movew %d0,%sr
printk( "Watchdog Chain: %s %p\n", name, header );
497a4: 2f0b movel %a3,%sp@- 497a6: 49f9 0004 3e7c lea 43e7c <printk>,%a4 497ac: 2f02 movel %d2,%sp@- 497ae: 4879 0005 ce9a pea 5ce9a <C.0.4004+0xe> 497b4: 4e94 jsr %a4@
*/
RTEMS_INLINE_ROUTINE bool _Chain_Is_empty(
Chain_Control *the_chain
)
{
return (the_chain->first == _Chain_Tail(the_chain));
497b6: 245b moveal %a3@+,%a2
if ( !_Chain_Is_empty( header ) ) {
497b8: 4fef 000c lea %sp@(12),%sp 497bc: b7ca cmpal %a2,%a3
497be: 6726 beqs 497e6 <_Watchdog_Report_chain+0x5e>
node != _Chain_Tail(header) ;
node = node->next )
{
Watchdog_Control *watch = (Watchdog_Control *) node;
_Watchdog_Report( NULL, watch );
497c0: 49f9 0004 97fc lea 497fc <_Watchdog_Report>,%a4 497c6: 2f0a movel %a2,%sp@- 497c8: 42a7 clrl %sp@- 497ca: 4e94 jsr %a4@
_ISR_Disable( level );
printk( "Watchdog Chain: %s %p\n", name, header );
if ( !_Chain_Is_empty( header ) ) {
for ( node = header->first ;
node != _Chain_Tail(header) ;
node = node->next )
497cc: 2452 moveal %a2@,%a2
Chain_Node *node;
_ISR_Disable( level );
printk( "Watchdog Chain: %s %p\n", name, header );
if ( !_Chain_Is_empty( header ) ) {
for ( node = header->first ;
497ce: 508f addql #8,%sp 497d0: b7ca cmpal %a2,%a3
497d2: 66f2 bnes 497c6 <_Watchdog_Report_chain+0x3e> <== NEVER TAKEN
{
Watchdog_Control *watch = (Watchdog_Control *) node;
_Watchdog_Report( NULL, watch );
}
printk( "== end of %s \n", name );
497d4: 2f02 movel %d2,%sp@- 497d6: 4879 0005 ceb1 pea 5ceb1 <C.0.4004+0x25> 497dc: 4eb9 0004 3e7c jsr 43e7c <printk> 497e2: 508f addql #8,%sp 497e4: 600a bras 497f0 <_Watchdog_Report_chain+0x68>
} else {
printk( "Chain is empty\n" );
497e6: 4879 0005 cec0 pea 5cec0 <C.0.4004+0x34> 497ec: 4e94 jsr %a4@ 497ee: 588f addql #4,%sp
}
_ISR_Enable( level );
497f0: 46c3 movew %d3,%sr
}
497f2: 4cee 1c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a4
497f8: 4e5e unlk %fp <== NOT EXECUTED
000487ac <_Watchdog_Tickle>:
* See the comment in watchdoginsert.c and watchdogadjust.c
* about why it's safe not to declare header a pointer to
* volatile data - till, 2003/7
*/
_ISR_Disable( level );
487ac: 203c 0000 0700 movel #1792,%d0
*/
void _Watchdog_Tickle(
Chain_Control *header
)
{
487b2: 4e56 ffe8 linkw %fp,#-24 487b6: 48d7 3c0c moveml %d2-%d3/%a2-%a5,%sp@ 487ba: 286e 0008 moveal %fp@(8),%a4
* See the comment in watchdoginsert.c and watchdogadjust.c
* about why it's safe not to declare header a pointer to
* volatile data - till, 2003/7
*/
_ISR_Disable( level );
487be: 40c2 movew %sr,%d2 487c0: 8082 orl %d2,%d0 487c2: 46c0 movew %d0,%sr
*/
RTEMS_INLINE_ROUTINE bool _Chain_Is_empty(
Chain_Control *the_chain
)
{
return (the_chain->first == _Chain_Tail(the_chain));
487c4: 264c moveal %a4,%a3 487c6: 245b moveal %a3@+,%a2
if ( _Chain_Is_empty( header ) )
487c8: b7ca cmpal %a2,%a3
487ca: 674c beqs 48818 <_Watchdog_Tickle+0x6c>
* to be inserted has already had its delta_interval adjusted to 0, and
* so is added to the head of the chain with a delta_interval of 0.
*
* Steven Johnson - 12/2005 (gcc-3.2.3 -O3 on powerpc)
*/
if (the_watchdog->delta_interval != 0) {
487cc: 202a 0010 movel %a2@(16),%d0
487d0: 6708 beqs 487da <_Watchdog_Tickle+0x2e>
the_watchdog->delta_interval--;
487d2: 5380 subql #1,%d0 487d4: 2540 0010 movel %d0,%a2@(16)
if ( the_watchdog->delta_interval != 0 )
487d8: 663e bnes 48818 <_Watchdog_Tickle+0x6c>
goto leave;
}
do {
watchdog_state = _Watchdog_Remove( the_watchdog );
487da: 4bf9 0004 8730 lea 48730 <_Watchdog_Remove>,%a5
case WATCHDOG_REMOVE_IT:
break;
}
_ISR_Disable( level );
487e0: 263c 0000 0700 movel #1792,%d3
if ( the_watchdog->delta_interval != 0 )
goto leave;
}
do {
watchdog_state = _Watchdog_Remove( the_watchdog );
487e6: 2f0a movel %a2,%sp@- 487e8: 4e95 jsr %a5@
_ISR_Enable( level );
487ea: 46c2 movew %d2,%sr
switch( watchdog_state ) {
487ec: 7202 moveq #2,%d1 487ee: 588f addql #4,%sp 487f0: b280 cmpl %d0,%d1
487f2: 6610 bnes 48804 <_Watchdog_Tickle+0x58> <== NEVER TAKEN
case WATCHDOG_ACTIVE:
(*the_watchdog->routine)(
487f4: 2f2a 0024 movel %a2@(36),%sp@- 487f8: 2f2a 0020 movel %a2@(32),%sp@- 487fc: 206a 001c moveal %a2@(28),%a0 48800: 4e90 jsr %a0@
the_watchdog->id,
the_watchdog->user_data
);
break;
48802: 508f addql #8,%sp
case WATCHDOG_REMOVE_IT:
break;
}
_ISR_Disable( level );
48804: 2003 movel %d3,%d0 48806: 40c2 movew %sr,%d2 48808: 8082 orl %d2,%d0 4880a: 46c0 movew %d0,%sr
} while ( !_Chain_Is_empty( header ) &&
(the_watchdog->delta_interval == 0) );
leave:
_ISR_Enable(level);
}
4880c: 2454 moveal %a4@,%a2
_ISR_Disable( level );
the_watchdog = _Watchdog_First( header );
} while ( !_Chain_Is_empty( header ) &&
(the_watchdog->delta_interval == 0) );
4880e: b7ca cmpal %a2,%a3
48810: 6706 beqs 48818 <_Watchdog_Tickle+0x6c>
}
_ISR_Disable( level );
the_watchdog = _Watchdog_First( header );
} while ( !_Chain_Is_empty( header ) &&
48812: 4aaa 0010 tstl %a2@(16)
48816: 67ce beqs 487e6 <_Watchdog_Tickle+0x3a>
(the_watchdog->delta_interval == 0) );
leave:
_ISR_Enable(level);
48818: 46c2 movew %d2,%sr
}
4881a: 4cee 3c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a5
48820: 4e5e unlk %fp <== NOT EXECUTED
000455e8 <clock_gettime>:
int clock_gettime(
clockid_t clock_id,
struct timespec *tp
)
{
455e8: 4e56 0000 linkw %fp,#0 455ec: 222e 0008 movel %fp@(8),%d1 455f0: 202e 000c movel %fp@(12),%d0 455f4: 2f02 movel %d2,%sp@-
if ( !tp )
455f6: 4a80 tstl %d0
455f8: 6608 bnes 45602 <clock_gettime+0x1a>
rtems_set_errno_and_return_minus_one( EINVAL );
455fa: 4eb9 0004 d8cc jsr 4d8cc <__errno> 45600: 6042 bras 45644 <clock_gettime+0x5c>
if ( clock_id == CLOCK_REALTIME ) {
45602: 7401 moveq #1,%d2 45604: b481 cmpl %d1,%d2
45606: 660a bnes 45612 <clock_gettime+0x2a>
_TOD_Get(tp);
45608: 2f00 movel %d0,%sp@- 4560a: 4eb9 0004 7248 jsr 47248 <_TOD_Get> 45610: 6014 bras 45626 <clock_gettime+0x3e>
return 0;
}
#ifdef CLOCK_MONOTONIC
if ( clock_id == CLOCK_MONOTONIC ) {
45612: 7404 moveq #4,%d2 45614: b481 cmpl %d1,%d2
45616: 6706 beqs 4561e <clock_gettime+0x36> <== NEVER TAKEN
return 0;
}
#endif
#ifdef _POSIX_CPUTIME
if ( clock_id == CLOCK_PROCESS_CPUTIME ) {
45618: 7402 moveq #2,%d2 4561a: b481 cmpl %d1,%d2
4561c: 660e bnes 4562c <clock_gettime+0x44>
_TOD_Get_uptime_as_timespec( tp );
4561e: 2f00 movel %d0,%sp@- 45620: 4eb9 0004 72b4 jsr 472b4 <_TOD_Get_uptime_as_timespec>
return 0;
45626: 588f addql #4,%sp 45628: 4280 clrl %d0 4562a: 6020 bras 4564c <clock_gettime+0x64> 4562c: 41f9 0004 d8cc lea 4d8cc <__errno>,%a0
}
#endif
#ifdef _POSIX_THREAD_CPUTIME
if ( clock_id == CLOCK_THREAD_CPUTIME )
45632: 7003 moveq #3,%d0 45634: b081 cmpl %d1,%d0
45636: 660a bnes 45642 <clock_gettime+0x5a>
rtems_set_errno_and_return_minus_one( ENOSYS );
45638: 4e90 jsr %a0@ 4563a: 7258 moveq #88,%d1 4563c: 2040 moveal %d0,%a0 4563e: 2081 movel %d1,%a0@ 45640: 6008 bras 4564a <clock_gettime+0x62>
#endif
rtems_set_errno_and_return_minus_one( EINVAL );
45642: 4e90 jsr %a0@ 45644: 2040 moveal %d0,%a0 45646: 7016 moveq #22,%d0 45648: 2080 movel %d0,%a0@ 4564a: 70ff moveq #-1,%d0
return 0;
}
4564c: 242e fffc movel %fp@(-4),%d2
45650: 4e5e unlk %fp <== NOT EXECUTED
00045654 <clock_settime>:
int clock_settime(
clockid_t clock_id,
const struct timespec *tp
)
{
45654: 4e56 0000 linkw %fp,#0 45658: 222e 0008 movel %fp@(8),%d1 4565c: 206e 000c moveal %fp@(12),%a0
if ( !tp )
45660: 4a88 tstl %a0
45662: 6710 beqs 45674 <clock_settime+0x20> <== NEVER TAKEN
rtems_set_errno_and_return_minus_one( EINVAL );
if ( clock_id == CLOCK_REALTIME ) {
45664: 7001 moveq #1,%d0 45666: b081 cmpl %d1,%d0
45668: 6634 bnes 4569e <clock_settime+0x4a>
if ( tp->tv_sec < TOD_SECONDS_1970_THROUGH_1988 )
4566a: 203c 21da e4ff movel #567993599,%d0 45670: b090 cmpl %a0@,%d0
45672: 6508 bcss 4567c <clock_settime+0x28>
rtems_set_errno_and_return_minus_one( EINVAL );
45674: 4eb9 0004 d8cc jsr 4d8cc <__errno> 4567a: 6048 bras 456c4 <clock_settime+0x70>
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
4567c: 2039 0005 f60c movel 5f60c <_Thread_Dispatch_disable_level>,%d0 45682: 5280 addql #1,%d0 45684: 23c0 0005 f60c movel %d0,5f60c <_Thread_Dispatch_disable_level>
_Thread_Disable_dispatch();
_TOD_Set( tp );
4568a: 2f08 movel %a0,%sp@- 4568c: 4eb9 0004 730c jsr 4730c <_TOD_Set>
_Thread_Enable_dispatch();
45692: 4eb9 0004 8416 jsr 48416 <_Thread_Enable_dispatch>
rtems_set_errno_and_return_minus_one( ENOSYS );
#endif
else
rtems_set_errno_and_return_minus_one( EINVAL );
return 0;
45698: 588f addql #4,%sp 4569a: 4280 clrl %d0 4569c: 602e bras 456cc <clock_settime+0x78>
_Thread_Disable_dispatch();
_TOD_Set( tp );
_Thread_Enable_dispatch();
}
#ifdef _POSIX_CPUTIME
else if ( clock_id == CLOCK_PROCESS_CPUTIME )
4569e: 7002 moveq #2,%d0 456a0: b081 cmpl %d1,%d0
456a2: 6608 bnes 456ac <clock_settime+0x58>
rtems_set_errno_and_return_minus_one( ENOSYS );
456a4: 4eb9 0004 d8cc jsr 4d8cc <__errno> 456aa: 600e bras 456ba <clock_settime+0x66> 456ac: 41f9 0004 d8cc lea 4d8cc <__errno>,%a0
#endif #ifdef _POSIX_THREAD_CPUTIME else if ( clock_id == CLOCK_THREAD_CPUTIME )
456b2: 7003 moveq #3,%d0 456b4: b081 cmpl %d1,%d0
456b6: 660a bnes 456c2 <clock_settime+0x6e>
rtems_set_errno_and_return_minus_one( ENOSYS );
456b8: 4e90 jsr %a0@ 456ba: 2040 moveal %d0,%a0 456bc: 7258 moveq #88,%d1 456be: 2081 movel %d1,%a0@ 456c0: 6008 bras 456ca <clock_settime+0x76>
#endif
else
rtems_set_errno_and_return_minus_one( EINVAL );
456c2: 4e90 jsr %a0@ 456c4: 2040 moveal %d0,%a0 456c6: 7016 moveq #22,%d0 456c8: 2080 movel %d0,%a0@ 456ca: 70ff moveq #-1,%d0
return 0;
}
456cc: 4e5e unlk %fp <== NOT EXECUTED
0005a058 <killinfo>:
int killinfo(
pid_t pid,
int sig,
const union sigval *value
)
{
5a058: 4e56 ffd0 linkw %fp,#-48 5a05c: 48d7 1cfc moveml %d2-%d7/%a2-%a4,%sp@ 5a060: 242e 000c movel %fp@(12),%d2 5a064: 246e 0010 moveal %fp@(16),%a2
POSIX_signals_Siginfo_node *psiginfo;
/*
* Only supported for the "calling process" (i.e. this node).
*/
if ( pid != getpid() )
5a068: 4eb9 0005 9c7c jsr 59c7c <getpid> 5a06e: b0ae 0008 cmpl %fp@(8),%d0
5a072: 6710 beqs 5a084 <killinfo+0x2c>
rtems_set_errno_and_return_minus_one( ESRCH );
5a074: 4eb9 0004 ca54 jsr 4ca54 <__errno> 5a07a: 7403 moveq #3,%d2 5a07c: 2040 moveal %d0,%a0 5a07e: 2082 movel %d2,%a0@ 5a080: 6000 01aa braw 5a22c <killinfo+0x1d4>
/*
* Validate the signal passed.
*/
if ( !sig )
5a084: 4a82 tstl %d2
5a086: 670a beqs 5a092 <killinfo+0x3a>
static inline bool is_valid_signo(
int signo
)
{
return ((signo) >= 1 && (signo) <= 32 );
5a088: 2202 movel %d2,%d1 5a08a: 5381 subql #1,%d1
rtems_set_errno_and_return_minus_one( EINVAL );
if ( !is_valid_signo(sig) )
5a08c: 701f moveq #31,%d0 5a08e: b081 cmpl %d1,%d0
5a090: 6410 bccs 5a0a2 <killinfo+0x4a>
rtems_set_errno_and_return_minus_one( EINVAL );
5a092: 4eb9 0004 ca54 jsr 4ca54 <__errno> 5a098: 7216 moveq #22,%d1 5a09a: 2040 moveal %d0,%a0 5a09c: 2081 movel %d1,%a0@ 5a09e: 6000 018c braw 5a22c <killinfo+0x1d4>
/*
* If the signal is being ignored, then we are out of here.
*/
if ( _POSIX_signals_Vectors[ sig ].sa_handler == SIG_IGN )
5a0a2: 2602 movel %d2,%d3 5a0a4: 2002 movel %d2,%d0 5a0a6: e58b lsll #2,%d3 5a0a8: e988 lsll #4,%d0 5a0aa: 9083 subl %d3,%d0 5a0ac: 0680 0005 ddf2 addil #384498,%d0 5a0b2: 7601 moveq #1,%d3 5a0b4: 2040 moveal %d0,%a0 5a0b6: b690 cmpl %a0@,%d3 5a0b8: 6700 01a2 beqw 5a25c <killinfo+0x204>
/* * P1003.1c/Draft 10, p. 33 says that certain signals should always * be directed to the executing thread such as those caused by hardware * faults. */ if ( (sig == SIGFPE) || (sig == SIGILL) || (sig == SIGSEGV ) )
5a0bc: 7008 moveq #8,%d0 5a0be: b082 cmpl %d2,%d0
5a0c0: 6710 beqs 5a0d2 <killinfo+0x7a>
5a0c2: 163c 0004 moveb #4,%d3 5a0c6: b682 cmpl %d2,%d3
5a0c8: 6708 beqs 5a0d2 <killinfo+0x7a>
5a0ca: 103c 000b moveb #11,%d0 5a0ce: b082 cmpl %d2,%d0
5a0d0: 6616 bnes 5a0e8 <killinfo+0x90>
return pthread_kill( pthread_self(), sig );
5a0d2: 4eb9 0005 a430 jsr 5a430 <pthread_self> 5a0d8: 2f02 movel %d2,%sp@- 5a0da: 2f00 movel %d0,%sp@- 5a0dc: 4eb9 0005 a378 jsr 5a378 <pthread_kill> 5a0e2: 508f addql #8,%sp 5a0e4: 6000 0178 braw 5a25e <killinfo+0x206>
static inline sigset_t signo_to_mask(
uint32_t sig
)
{
return 1u << (sig - 1);
5a0e8: 7601 moveq #1,%d3
/* * Build up a siginfo structure */ siginfo = &siginfo_struct; siginfo->si_signo = sig; siginfo->si_code = SI_USER;
5a0ea: 7001 moveq #1,%d0 5a0ec: e3ab lsll %d1,%d3
/*
* Build up a siginfo structure
*/
siginfo = &siginfo_struct;
siginfo->si_signo = sig;
5a0ee: 2d42 fff4 movel %d2,%fp@(-12)
siginfo->si_code = SI_USER;
5a0f2: 2d40 fff8 movel %d0,%fp@(-8)
if ( !value ) {
5a0f6: 4a8a tstl %a2
5a0f8: 6606 bnes 5a100 <killinfo+0xa8>
siginfo->si_value.sival_int = 0;
5a0fa: 42ae fffc clrl %fp@(-4) 5a0fe: 6004 bras 5a104 <killinfo+0xac>
} else {
siginfo->si_value = *value;
5a100: 2d52 fffc movel %a2@,%fp@(-4) 5a104: 2039 0005 d94c movel 5d94c <_Thread_Dispatch_disable_level>,%d0 5a10a: 5280 addql #1,%d0 5a10c: 23c0 0005 d94c movel %d0,5d94c <_Thread_Dispatch_disable_level>
/*
* Is the currently executing thread interested? If so then it will
* get it an execute it as soon as the dispatcher executes.
*/
the_thread = _Thread_Executing;
5a112: 2279 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a1
api = the_thread->API_Extensions[ THREAD_API_POSIX ];
if ( _POSIX_signals_Is_interested( api, mask ) ) {
5a118: 2069 010e moveal %a1@(270),%a0 5a11c: 2028 00cc movel %a0@(204),%d0 5a120: 4680 notl %d0 5a122: c083 andl %d3,%d0 5a124: 6600 00aa bnew 5a1d0 <killinfo+0x178>
/* XXX violation of visibility -- need to define thread queue support */
the_chain = &_POSIX_signals_Wait_queue.Queues.Fifo;
for ( the_node = the_chain->first ;
5a128: 2079 0005 df76 moveal 5df76 <_POSIX_signals_Wait_queue>,%a0 5a12e: 601e bras 5a14e <killinfo+0xf6>
#endif
/*
* Is this thread is actually blocked waiting for the signal?
*/
if (the_thread->Wait.option & mask)
5a130: 2003 movel %d3,%d0
for ( the_node = the_chain->first ;
!_Chain_Is_tail( the_chain, the_node ) ;
the_node = the_node->next ) {
the_thread = (Thread_Control *)the_node;
5a132: 2248 moveal %a0,%a1
#endif
/*
* Is this thread is actually blocked waiting for the signal?
*/
if (the_thread->Wait.option & mask)
5a134: c0a8 0030 andl %a0@(48),%d0
for ( the_node = the_chain->first ;
!_Chain_Is_tail( the_chain, the_node ) ;
the_node = the_node->next ) {
the_thread = (Thread_Control *)the_node;
api = the_thread->API_Extensions[ THREAD_API_POSIX ];
5a138: 2468 010e moveal %a0@(270),%a2
#endif
/*
* Is this thread is actually blocked waiting for the signal?
*/
if (the_thread->Wait.option & mask)
5a13c: 6600 0092 bnew 5a1d0 <killinfo+0x178>
/*
* Is this thread is blocked waiting for another signal but has
* not blocked this one?
*/
if (~api->signals_blocked & mask)
5a140: 202a 00cc movel %a2@(204),%d0 5a144: 4680 notl %d0 5a146: c083 andl %d3,%d0 5a148: 6600 0086 bnew 5a1d0 <killinfo+0x178>
the_chain = &_POSIX_signals_Wait_queue.Queues.Fifo;
for ( the_node = the_chain->first ;
!_Chain_Is_tail( the_chain, the_node ) ;
the_node = the_node->next ) {
5a14c: 2050 moveal %a0@,%a0
/* XXX violation of visibility -- need to define thread queue support */
the_chain = &_POSIX_signals_Wait_queue.Queues.Fifo;
for ( the_node = the_chain->first ;
5a14e: b1fc 0005 df7a cmpal #384890,%a0
5a154: 66da bnes 5a130 <killinfo+0xd8> * NOTES: * * + rtems internal threads do not receive signals. */ interested = NULL; interested_priority = PRIORITY_MAXIMUM + 1;
5a156: 4280 clrl %d0 5a158: 1039 0005 c192 moveb 5c192 <rtems_maximum_priority>,%d0 5a15e: 45f9 0005 d910 lea 5d910 <_Objects_Information_table+0x8>,%a2 5a164: 5280 addql #1,%d0
* * NOTES: * * + rtems internal threads do not receive signals. */ interested = NULL;
5a166: 93c9 subal %a1,%a1
for (the_api = OBJECTS_CLASSIC_API; the_api <= OBJECTS_APIS_LAST; the_api++) {
/*
* This can occur when no one is interested and an API is not configured.
*/
if ( !_Objects_Information_table[ the_api ] )
5a168: 205a moveal %a2@+,%a0 5a16a: 4a88 tstl %a0
5a16c: 6756 beqs 5a1c4 <killinfo+0x16c> <== NEVER TAKEN
continue;
the_info = _Objects_Information_table[ the_api ][ 1 ];
5a16e: 2068 0004 moveal %a0@(4),%a0
*/
if ( !the_info )
continue;
#endif
maximum = the_info->maximum;
5a172: 4287 clrl %d7
object_table = the_info->local_table;
for ( index = 1 ; index <= maximum ; index++ ) {
5a174: 7801 moveq #1,%d4
*/
#define _POSIX_signals_Is_interested( _api, _mask ) \
( ~(_api)->signals_blocked & (_mask) )
int killinfo(
5a176: 2668 0018 moveal %a0@(24),%a3 5a17a: 588b addql #4,%a3
*/
if ( !the_info )
continue;
#endif
maximum = the_info->maximum;
5a17c: 3e28 000e movew %a0@(14),%d7
object_table = the_info->local_table;
for ( index = 1 ; index <= maximum ; index++ ) {
5a180: 603e bras 5a1c0 <killinfo+0x168>
the_thread = (Thread_Control *) object_table[ index ];
5a182: 205b moveal %a3@+,%a0
if ( !the_thread )
5a184: 4a88 tstl %a0
5a186: 6736 beqs 5a1be <killinfo+0x166>
/*
* If this thread is of lower priority than the interested thread,
* go on to the next thread.
*/
if ( the_thread->current_priority > interested_priority )
5a188: 2228 0014 movel %a0@(20),%d1 5a18c: b081 cmpl %d1,%d0
5a18e: 652e bcss 5a1be <killinfo+0x166>
#if defined(RTEMS_DEBUG)
if ( !api )
continue;
#endif
if ( !_POSIX_signals_Is_interested( api, mask ) )
5a190: 2868 010e moveal %a0@(270),%a4 5a194: 2a2c 00cc movel %a4@(204),%d5 5a198: 4685 notl %d5 5a19a: ca83 andl %d3,%d5
5a19c: 6720 beqs 5a1be <killinfo+0x166>
*
* NOTE: We initialized interested_priority to PRIORITY_MAXIMUM + 1
* so we never have to worry about deferencing a NULL
* interested thread.
*/
if ( the_thread->current_priority < interested_priority ) {
5a19e: b081 cmpl %d1,%d0
5a1a0: 6218 bhis 5a1ba <killinfo+0x162>
* and blocking interruptibutable by signal.
*
* If the interested thread is ready, don't think about changing.
*/
if ( !_States_Is_ready( interested->current_state ) ) {
5a1a2: 2c29 0010 movel %a1@(16),%d6
5a1a6: 6716 beqs 5a1be <killinfo+0x166> <== NEVER TAKEN
/* preferred ready over blocked */
DEBUG_STEP("5");
if ( _States_Is_ready( the_thread->current_state ) ) {
5a1a8: 2a28 0010 movel %a0@(16),%d5
5a1ac: 670c beqs 5a1ba <killinfo+0x162>
continue;
}
DEBUG_STEP("6");
/* prefer blocked/interruptible over blocked/not interruptible */
if ( !_States_Is_interruptible_by_signal(interested->current_state) ) {
5a1ae: 0806 001c btst #28,%d6
5a1b2: 660a bnes 5a1be <killinfo+0x166>
DEBUG_STEP("7");
if ( _States_Is_interruptible_by_signal(the_thread->current_state) ) {
5a1b4: 0805 001c btst #28,%d5
5a1b8: 6704 beqs 5a1be <killinfo+0x166>
*/
if ( !_States_Is_ready( interested->current_state ) ) {
/* preferred ready over blocked */
DEBUG_STEP("5");
if ( _States_Is_ready( the_thread->current_state ) ) {
5a1ba: 2001 movel %d1,%d0 5a1bc: 2248 moveal %a0,%a1
#endif
maximum = the_info->maximum;
object_table = the_info->local_table;
for ( index = 1 ; index <= maximum ; index++ ) {
5a1be: 5284 addql #1,%d4 5a1c0: be84 cmpl %d4,%d7
5a1c2: 64be bccs 5a182 <killinfo+0x12a>
* + rtems internal threads do not receive signals.
*/
interested = NULL;
interested_priority = PRIORITY_MAXIMUM + 1;
for (the_api = OBJECTS_CLASSIC_API; the_api <= OBJECTS_APIS_LAST; the_api++) {
5a1c4: b5fc 0005 d918 cmpal #383256,%a2
5a1ca: 669c bnes 5a168 <killinfo+0x110>
}
}
}
}
if ( interested ) {
5a1cc: 4a89 tstl %a1
5a1ce: 6716 beqs 5a1e6 <killinfo+0x18e>
/*
* Returns true if the signal was synchronously given to a thread
* blocked waiting for the signal.
*/
if ( _POSIX_signals_Unblock_thread( the_thread, sig, siginfo ) ) {
5a1d0: 486e fff4 pea %fp@(-12) 5a1d4: 2f02 movel %d2,%sp@- 5a1d6: 2f09 movel %a1,%sp@- 5a1d8: 4eb9 0005 a288 jsr 5a288 <_POSIX_signals_Unblock_thread> 5a1de: 4fef 000c lea %sp@(12),%sp 5a1e2: 4a00 tstb %d0
5a1e4: 6670 bnes 5a256 <killinfo+0x1fe>
/*
* We may have woken up a thread but we definitely need to post the
* signal to the process wide information set.
*/
_POSIX_signals_Set_process_signals( mask );
5a1e6: 2f03 movel %d3,%sp@-
if ( _POSIX_signals_Vectors[ sig ].sa_flags == SA_SIGINFO ) {
5a1e8: 7602 moveq #2,%d3
/*
* We may have woken up a thread but we definitely need to post the
* signal to the process wide information set.
*/
_POSIX_signals_Set_process_signals( mask );
5a1ea: 4eb9 0005 a268 jsr 5a268 <_POSIX_signals_Set_process_signals>
if ( _POSIX_signals_Vectors[ sig ].sa_flags == SA_SIGINFO ) {
5a1f0: 588f addql #4,%sp 5a1f2: 2002 movel %d2,%d0 5a1f4: 41f9 0005 ddea lea 5ddea <_POSIX_signals_Vectors>,%a0 5a1fa: e588 lsll #2,%d0 5a1fc: e98a lsll #4,%d2 5a1fe: 9480 subl %d0,%d2 5a200: b6b0 2800 cmpl %a0@(00000000,%d2:l),%d3
5a204: 6650 bnes 5a256 <killinfo+0x1fe>
psiginfo = (POSIX_signals_Siginfo_node *)
_Chain_Get( &_POSIX_signals_Inactive_siginfo );
5a206: 4879 0005 df6a pea 5df6a <_POSIX_signals_Inactive_siginfo> 5a20c: 4eb9 0004 6174 jsr 46174 <_Chain_Get>
if ( !psiginfo ) {
5a212: 588f addql #4,%sp
_POSIX_signals_Set_process_signals( mask );
if ( _POSIX_signals_Vectors[ sig ].sa_flags == SA_SIGINFO ) {
psiginfo = (POSIX_signals_Siginfo_node *)
_Chain_Get( &_POSIX_signals_Inactive_siginfo );
5a214: 2440 moveal %d0,%a2
if ( !psiginfo ) {
5a216: 4a80 tstl %d0
5a218: 6616 bnes 5a230 <killinfo+0x1d8>
_Thread_Enable_dispatch();
5a21a: 4eb9 0004 7696 jsr 47696 <_Thread_Enable_dispatch>
rtems_set_errno_and_return_minus_one( EAGAIN );
5a220: 4eb9 0004 ca54 jsr 4ca54 <__errno> 5a226: 2040 moveal %d0,%a0 5a228: 700b moveq #11,%d0 5a22a: 2080 movel %d0,%a0@ 5a22c: 70ff moveq #-1,%d0 5a22e: 602e bras 5a25e <killinfo+0x206>
}
psiginfo->Info = *siginfo;
5a230: 4878 000c pea c <OPER1>
_Chain_Append( &_POSIX_signals_Siginfo[ sig ], &psiginfo->Node );
5a234: 0682 0005 dfe2 addil #384994,%d2
if ( !psiginfo ) {
_Thread_Enable_dispatch();
rtems_set_errno_and_return_minus_one( EAGAIN );
}
psiginfo->Info = *siginfo;
5a23a: 486e fff4 pea %fp@(-12) 5a23e: 486a 0008 pea %a2@(8) 5a242: 4eb9 0004 d300 jsr 4d300 <memcpy>
_Chain_Append( &_POSIX_signals_Siginfo[ sig ], &psiginfo->Node );
5a248: 2f0a movel %a2,%sp@- 5a24a: 2f02 movel %d2,%sp@- 5a24c: 4eb9 0004 6114 jsr 46114 <_Chain_Append> 5a252: 4fef 0014 lea %sp@(20),%sp
}
DEBUG_STEP("\n");
_Thread_Enable_dispatch();
5a256: 4eb9 0004 7696 jsr 47696 <_Thread_Enable_dispatch>
/*
* If the signal is being ignored, then we are out of here.
*/
if ( _POSIX_signals_Vectors[ sig ].sa_handler == SIG_IGN )
return 0;
5a25c: 4280 clrl %d0
}
DEBUG_STEP("\n");
_Thread_Enable_dispatch();
return 0;
}
5a25e: 4cee 1cfc ffd0 moveml %fp@(-48),%d2-%d7/%a2-%a4
5a264: 4e5e unlk %fp <== NOT EXECUTED
00049990 <pthread_attr_setschedpolicy>:
int pthread_attr_setschedpolicy(
pthread_attr_t *attr,
int policy
)
{
49990: 4e56 0000 linkw %fp,#0 49994: 206e 0008 moveal %fp@(8),%a0 49998: 222e 000c movel %fp@(12),%d1 4999c: 2f02 movel %d2,%sp@-
if ( !attr || !attr->is_initialized )
4999e: 4a88 tstl %a0
499a0: 671e beqs 499c0 <pthread_attr_setschedpolicy+0x30>
499a2: 4a90 tstl %a0@
499a4: 671a beqs 499c0 <pthread_attr_setschedpolicy+0x30>
return EINVAL;
switch ( policy ) {
499a6: 7004 moveq #4,%d0 499a8: b081 cmpl %d1,%d0
499aa: 6518 bcss 499c4 <pthread_attr_setschedpolicy+0x34>
499ac: 103c 0001 moveb #1,%d0 499b0: 7417 moveq #23,%d2 499b2: e3a8 lsll %d1,%d0 499b4: c082 andl %d2,%d0
499b6: 670c beqs 499c4 <pthread_attr_setschedpolicy+0x34><== NEVER TAKEN
case SCHED_OTHER:
case SCHED_FIFO:
case SCHED_RR:
case SCHED_SPORADIC:
attr->schedpolicy = policy;
499b8: 2141 0014 movel %d1,%a0@(20)
return 0;
499bc: 4280 clrl %d0 499be: 600a bras 499ca <pthread_attr_setschedpolicy+0x3a>
pthread_attr_t *attr,
int policy
)
{
if ( !attr || !attr->is_initialized )
return EINVAL;
499c0: 7016 moveq #22,%d0 499c2: 6006 bras 499ca <pthread_attr_setschedpolicy+0x3a>
case SCHED_SPORADIC:
attr->schedpolicy = policy;
return 0;
default:
return ENOTSUP;
499c4: 203c 0000 0086 movel #134,%d0
} }
499ca: 241f movel %sp@+,%d2
499cc: 4e5e unlk %fp <== NOT EXECUTED
00045b28 <pthread_barrier_init>:
int pthread_barrier_init(
pthread_barrier_t *barrier,
const pthread_barrierattr_t *attr,
unsigned int count
)
{
45b28: 4e56 ffdc linkw %fp,#-36 45b2c: 206e 000c moveal %fp@(12),%a0 45b30: 48d7 1c0c moveml %d2-%d3/%a2-%a4,%sp@ 45b34: 246e 0008 moveal %fp@(8),%a2 45b38: 242e 0010 movel %fp@(16),%d2
const pthread_barrierattr_t *the_attr;
/*
* Error check parameters
*/
if ( !barrier )
45b3c: 4a8a tstl %a2 45b3e: 6700 008e beqw 45bce <pthread_barrier_init+0xa6>
return EINVAL;
if ( count == 0 )
45b42: 4a82 tstl %d2 45b44: 6700 0088 beqw 45bce <pthread_barrier_init+0xa6>
return EINVAL;
/*
* If the user passed in NULL, use the default attributes
*/
if ( attr ) {
45b48: 4a88 tstl %a0
45b4a: 6614 bnes 45b60 <pthread_barrier_init+0x38>
the_attr = attr;
} else {
(void) pthread_barrierattr_init( &my_attr );
45b4c: 260e movel %fp,%d3 45b4e: 0683 ffff fff0 addil #-16,%d3 45b54: 2f03 movel %d3,%sp@- 45b56: 4eb9 0004 5a6c jsr 45a6c <pthread_barrierattr_init> 45b5c: 588f addql #4,%sp
the_attr = &my_attr;
45b5e: 2043 moveal %d3,%a0
}
/*
* Now start error checking the attributes that we are going to use
*/
if ( !the_attr->is_initialized )
45b60: 4a90 tstl %a0@
45b62: 676a beqs 45bce <pthread_barrier_init+0xa6>
return EINVAL;
switch ( the_attr->process_shared ) {
45b64: 4aa8 0004 tstl %a0@(4)
45b68: 6664 bnes 45bce <pthread_barrier_init+0xa6> <== NEVER TAKEN
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
45b6a: 2039 0005 ef30 movel 5ef30 <_Thread_Dispatch_disable_level>,%d0 45b70: 5280 addql #1,%d0
}
/*
* Convert from POSIX attributes to Core Barrier attributes
*/
the_attributes.discipline = CORE_BARRIER_AUTOMATIC_RELEASE;
45b72: 42ae fff8 clrl %fp@(-8)
the_attributes.maximum_count = count;
45b76: 2d42 fffc movel %d2,%fp@(-4) 45b7a: 23c0 0005 ef30 movel %d0,5ef30 <_Thread_Dispatch_disable_level>
* the inactive chain of free barrier control blocks.
*/
RTEMS_INLINE_ROUTINE POSIX_Barrier_Control *_POSIX_Barrier_Allocate( void )
{
return (POSIX_Barrier_Control *)
_Objects_Allocate( &_POSIX_Barrier_Information );
45b80: 4879 0005 f254 pea 5f254 <_POSIX_Barrier_Information> 45b86: 49f9 0004 8686 lea 48686 <_Thread_Enable_dispatch>,%a4 45b8c: 4eb9 0004 7a48 jsr 47a48 <_Objects_Allocate>
*/
_Thread_Disable_dispatch(); /* prevents deletion */
the_barrier = _POSIX_Barrier_Allocate();
if ( !the_barrier ) {
45b92: 588f addql #4,%sp 45b94: 2640 moveal %d0,%a3 45b96: 4a80 tstl %d0
45b98: 6606 bnes 45ba0 <pthread_barrier_init+0x78>
_Thread_Enable_dispatch();
45b9a: 4e94 jsr %a4@
return EAGAIN;
45b9c: 700b moveq #11,%d0 45b9e: 6030 bras 45bd0 <pthread_barrier_init+0xa8>
}
_CORE_barrier_Initialize( &the_barrier->Barrier, &the_attributes );
45ba0: 486e fff8 pea %fp@(-8) 45ba4: 486b 0010 pea %a3@(16) 45ba8: 4eb9 0004 713c jsr 4713c <_CORE_barrier_Initialize>
uint32_t name
)
{
_Objects_Set_local_object(
information,
_Objects_Get_index( the_object->id ),
45bae: 202b 0008 movel %a3@(8),%d0
Objects_Information *information,
Objects_Control *the_object,
uint32_t name
)
{
_Objects_Set_local_object(
45bb2: 4281 clrl %d1
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
45bb4: 2079 0005 f26c moveal 5f26c <_POSIX_Barrier_Information+0x18>,%a0
Objects_Information *information,
Objects_Control *the_object,
uint32_t name
)
{
_Objects_Set_local_object(
45bba: 3200 movew %d0,%d1
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
45bbc: 218b 1c00 movel %a3,%a0@(00000000,%d1:l:4)
_Objects_Get_index( the_object->id ),
the_object
);
/* ASSERT: information->is_string == false */
the_object->name.name_u32 = name;
45bc0: 42ab 000c clrl %a3@(12)
);
/*
* Exit the critical section and return the user an operational barrier
*/
*barrier = the_barrier->Object.id;
45bc4: 2480 movel %d0,%a2@
_Thread_Enable_dispatch();
45bc6: 4e94 jsr %a4@
return 0;
45bc8: 508f addql #8,%sp 45bca: 4280 clrl %d0 45bcc: 6002 bras 45bd0 <pthread_barrier_init+0xa8>
switch ( the_attr->process_shared ) {
case PTHREAD_PROCESS_PRIVATE: /* only supported values */
break;
case PTHREAD_PROCESS_SHARED:
default:
return EINVAL;
45bce: 7016 moveq #22,%d0
* Exit the critical section and return the user an operational barrier */ *barrier = the_barrier->Object.id; _Thread_Enable_dispatch(); return 0; }
45bd0: 4cee 1c0c ffdc moveml %fp@(-36),%d2-%d3/%a2-%a4 45bd6: 4e5e unlk %fp
...
00045bdc <pthread_barrier_wait>:
*/
int pthread_barrier_wait(
pthread_barrier_t *barrier
)
{
45bdc: 4e56 fffc linkw %fp,#-4 45be0: 206e 0008 moveal %fp@(8),%a0
POSIX_Barrier_Control *the_barrier = NULL;
Objects_Locations location;
if ( !barrier )
45be4: 4a88 tstl %a0
45be6: 6750 beqs 45c38 <pthread_barrier_wait+0x5c> <== NEVER TAKEN
RTEMS_INLINE_ROUTINE POSIX_Barrier_Control *_POSIX_Barrier_Get (
pthread_barrier_t *barrier,
Objects_Locations *location
)
{
return (POSIX_Barrier_Control *) _Objects_Get(
45be8: 486e fffc pea %fp@(-4) 45bec: 2f10 movel %a0@,%sp@- 45bee: 4879 0005 f254 pea 5f254 <_POSIX_Barrier_Information> 45bf4: 4eb9 0004 7e98 jsr 47e98 <_Objects_Get>
return EINVAL;
the_barrier = _POSIX_Barrier_Get( barrier, &location );
switch ( location ) {
45bfa: 4fef 000c lea %sp@(12),%sp 45bfe: 4aae fffc tstl %fp@(-4)
45c02: 6634 bnes 45c38 <pthread_barrier_wait+0x5c>
case OBJECTS_LOCAL:
_CORE_barrier_Wait(
45c04: 42a7 clrl %sp@- 45c06: 2040 moveal %d0,%a0 45c08: 42a7 clrl %sp@- 45c0a: 4878 0001 pea 1 <ADD> 45c0e: 2f28 0008 movel %a0@(8),%sp@- 45c12: 4868 0010 pea %a0@(16) 45c16: 4eb9 0004 7178 jsr 47178 <_CORE_barrier_Wait>
the_barrier->Object.id,
true,
0,
NULL
);
_Thread_Enable_dispatch();
45c1c: 4eb9 0004 8686 jsr 48686 <_Thread_Enable_dispatch>
return _POSIX_Barrier_Translate_core_barrier_return_code(
_Thread_Executing->Wait.return_code );
45c22: 2079 0005 f3c0 moveal 5f3c0 <_Per_CPU_Information+0xc>,%a0
true,
0,
NULL
);
_Thread_Enable_dispatch();
return _POSIX_Barrier_Translate_core_barrier_return_code(
45c28: 2f28 0034 movel %a0@(52),%sp@- 45c2c: 4eb9 0004 b06c jsr 4b06c <_POSIX_Barrier_Translate_core_barrier_return_code> 45c32: 4fef 0018 lea %sp@(24),%sp 45c36: 6002 bras 45c3a <pthread_barrier_wait+0x5e>
#endif
case OBJECTS_ERROR:
break;
}
return EINVAL;
45c38: 7016 moveq #22,%d0
}
45c3a: 4e5e unlk %fp
...
000452c0 <pthread_cancel>:
*/
int pthread_cancel(
pthread_t thread
)
{
452c0: 4e56 fffc linkw %fp,#-4
/*
* Don't even think about deleting a resource from an ISR.
*/
if ( _ISR_Is_in_progress() )
452c4: 4ab9 0005 e44c tstl 5e44c <_Per_CPU_Information+0x8>
452ca: 6638 bnes 45304 <pthread_cancel+0x44>
pthread_t id,
Objects_Locations *location
)
{
return (Thread_Control *)
_Objects_Get( &_POSIX_Threads_Information, (Objects_Id)id, location );
452cc: 486e fffc pea %fp@(-4) 452d0: 2f2e 0008 movel %fp@(8),%sp@- 452d4: 4879 0005 e188 pea 5e188 <_POSIX_Threads_Information> 452da: 4eb9 0004 71cc jsr 471cc <_Objects_Get>
return EPROTO;
the_thread = _POSIX_Threads_Get( thread, &location );
switch ( location ) {
452e0: 4fef 000c lea %sp@(12),%sp 452e4: 4aae fffc tstl %fp@(-4)
452e8: 661e bnes 45308 <pthread_cancel+0x48> <== ALWAYS TAKEN
case OBJECTS_LOCAL:
thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ];
thread_support->cancelation_requested = 1;
452ea: 2240 moveal %d0,%a1 <== NOT EXECUTED 452ec: 7201 moveq #1,%d1 <== NOT EXECUTED 452ee: 2069 010e moveal %a1@(270),%a0 <== NOT EXECUTED 452f2: 2141 00dc movel %d1,%a0@(220) <== NOT EXECUTED
/* This enables dispatch implicitly */
_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch( the_thread );
452f6: 2f00 movel %d0,%sp@- <== NOT EXECUTED 452f8: 4eb9 0004 a0c4 jsr 4a0c4 <_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch><== NOT EXECUTED
return 0;
452fe: 588f addql #4,%sp <== NOT EXECUTED 45300: 4280 clrl %d0 <== NOT EXECUTED 45302: 6006 bras 4530a <pthread_cancel+0x4a> <== NOT EXECUTED
/*
* Don't even think about deleting a resource from an ISR.
*/
if ( _ISR_Is_in_progress() )
return EPROTO;
45304: 7047 moveq #71,%d0 45306: 6002 bras 4530a <pthread_cancel+0x4a>
#endif
case OBJECTS_ERROR:
break;
}
return EINVAL;
45308: 7016 moveq #22,%d0
}
4530a: 4e5e unlk %fp
...
00045554 <pthread_cleanup_push>:
void pthread_cleanup_push(
void (*routine)( void * ),
void *arg
)
{
45554: 4e56 0000 linkw %fp,#0 45558: 2f03 movel %d3,%sp@- 4555a: 262e 000c movel %fp@(12),%d3 4555e: 2f02 movel %d2,%sp@- 45560: 242e 0008 movel %fp@(8),%d2
/*
* The POSIX standard does not address what to do when the routine
* is NULL. It also does not address what happens when we cannot
* allocate memory or anything else bad happens.
*/
if ( !routine )
45564: 6754 beqs 455ba <pthread_cleanup_push+0x66>
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
45566: 2039 0005 e878 movel 5e878 <_Thread_Dispatch_disable_level>,%d0 4556c: 5280 addql #1,%d0 4556e: 23c0 0005 e878 movel %d0,5e878 <_Thread_Dispatch_disable_level>
return;
_Thread_Disable_dispatch();
handler = _Workspace_Allocate( sizeof( POSIX_Cancel_Handler_control ) );
45574: 4878 0010 pea 10 <INVALID_OPERATION> 45578: 4eb9 0004 9378 jsr 49378 <_Workspace_Allocate>
if ( handler ) {
4557e: 588f addql #4,%sp 45580: 4a80 tstl %d0
45582: 6726 beqs 455aa <pthread_cleanup_push+0x56> <== NEVER TAKEN
thread_support = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ];
45584: 2079 0005 ed08 moveal 5ed08 <_Per_CPU_Information+0xc>,%a0
handler_stack = &thread_support->Cancellation_Handlers;
4558a: 2228 010e movel %a0@(270),%d1
handler->routine = routine;
4558e: 2040 moveal %d0,%a0
handler = _Workspace_Allocate( sizeof( POSIX_Cancel_Handler_control ) );
if ( handler ) {
thread_support = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ];
handler_stack = &thread_support->Cancellation_Handlers;
45590: 0681 0000 00e0 addil #224,%d1
handler->routine = routine;
45596: 2142 0008 movel %d2,%a0@(8)
handler->arg = arg;
4559a: 2143 000c movel %d3,%a0@(12)
_Chain_Append( handler_stack, &handler->Node );
4559e: 2f00 movel %d0,%sp@- 455a0: 2f01 movel %d1,%sp@- 455a2: 4eb9 0004 6be4 jsr 46be4 <_Chain_Append> 455a8: 508f addql #8,%sp
} _Thread_Enable_dispatch(); }
455aa: 242e fff8 movel %fp@(-8),%d2 455ae: 262e fffc movel %fp@(-4),%d3 455b2: 4e5e unlk %fp
handler->routine = routine;
handler->arg = arg;
_Chain_Append( handler_stack, &handler->Node );
}
_Thread_Enable_dispatch();
455b4: 4ef9 0004 80f2 jmp 480f2 <_Thread_Enable_dispatch>
}
455ba: 242e fff8 movel %fp@(-8),%d2 455be: 262e fffc movel %fp@(-4),%d3 455c2: 4e5e unlk %fp
...
00046270 <pthread_cond_init>:
int pthread_cond_init(
pthread_cond_t *cond,
const pthread_condattr_t *attr
)
{
46270: 4e56 fff4 linkw %fp,#-12 46274: 48d7 1c00 moveml %a2-%a4,%sp@ 46278: 246e 000c moveal %fp@(12),%a2
POSIX_Condition_variables_Control *the_cond;
const pthread_condattr_t *the_attr;
if ( attr ) the_attr = attr;
4627c: 4a8a tstl %a2
4627e: 6606 bnes 46286 <pthread_cond_init+0x16> else the_attr = &_POSIX_Condition_variables_Default_attributes;
46280: 45f9 0005 d702 lea 5d702 <_POSIX_Condition_variables_Default_attributes>,%a2
/*
* Be careful about attributes when global!!!
*/
if ( the_attr->process_shared == PTHREAD_PROCESS_SHARED )
46286: 7001 moveq #1,%d0 46288: b0aa 0004 cmpl %a2@(4),%d0
4628c: 6776 beqs 46304 <pthread_cond_init+0x94> <== NEVER TAKEN
return EINVAL;
if ( !the_attr->is_initialized )
4628e: 4a92 tstl %a2@
46290: 6772 beqs 46304 <pthread_cond_init+0x94>
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
46292: 2039 0005 fe4c movel 5fe4c <_Thread_Dispatch_disable_level>,%d0 46298: 5280 addql #1,%d0 4629a: 23c0 0005 fe4c movel %d0,5fe4c <_Thread_Dispatch_disable_level>
RTEMS_INLINE_ROUTINE POSIX_Condition_variables_Control
*_POSIX_Condition_variables_Allocate( void )
{
return (POSIX_Condition_variables_Control *)
_Objects_Allocate( &_POSIX_Condition_variables_Information );
462a0: 4879 0006 01fc pea 601fc <_POSIX_Condition_variables_Information> 462a6: 49f9 0004 92ce lea 492ce <_Thread_Enable_dispatch>,%a4 462ac: 4eb9 0004 8690 jsr 48690 <_Objects_Allocate>
_Thread_Disable_dispatch();
the_cond = _POSIX_Condition_variables_Allocate();
if ( !the_cond ) {
462b2: 588f addql #4,%sp 462b4: 2640 moveal %d0,%a3 462b6: 4a80 tstl %d0
462b8: 6606 bnes 462c0 <pthread_cond_init+0x50>
_Thread_Enable_dispatch();
462ba: 4e94 jsr %a4@
return ENOMEM;
462bc: 700c moveq #12,%d0 462be: 6046 bras 46306 <pthread_cond_init+0x96>
}
the_cond->process_shared = the_attr->process_shared;
462c0: 276a 0004 0010 movel %a2@(4),%a3@(16)
the_cond->Mutex = POSIX_CONDITION_VARIABLES_NO_MUTEX;
462c6: 42ab 0014 clrl %a3@(20)
/* XXX some more initialization might need to go here */
_Thread_queue_Initialize(
462ca: 4878 0074 pea 74 <DBL_MANT_DIG+0x3f> 462ce: 4878 0800 pea 800 <D_MAX_EXP+0x1> 462d2: 42a7 clrl %sp@- 462d4: 486b 0018 pea %a3@(24) 462d8: 4eb9 0004 99f4 jsr 499f4 <_Thread_queue_Initialize>
uint32_t name
)
{
_Objects_Set_local_object(
information,
_Objects_Get_index( the_object->id ),
462de: 202b 0008 movel %a3@(8),%d0
Objects_Information *information,
Objects_Control *the_object,
uint32_t name
)
{
_Objects_Set_local_object(
462e2: 4281 clrl %d1
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
462e4: 2079 0006 0214 moveal 60214 <_POSIX_Condition_variables_Information+0x18>,%a0
Objects_Information *information,
Objects_Control *the_object,
uint32_t name
)
{
_Objects_Set_local_object(
462ea: 3200 movew %d0,%d1
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
462ec: 218b 1c00 movel %a3,%a0@(00000000,%d1:l:4)
&_POSIX_Condition_variables_Information,
&the_cond->Object,
0
);
*cond = the_cond->Object.id;
462f0: 206e 0008 moveal %fp@(8),%a0
_Objects_Get_index( the_object->id ),
the_object
);
/* ASSERT: information->is_string == false */
the_object->name.name_u32 = name;
462f4: 42ab 000c clrl %a3@(12) 462f8: 2080 movel %d0,%a0@
_Thread_Enable_dispatch();
462fa: 4e94 jsr %a4@
return 0;
462fc: 4fef 0010 lea %sp@(16),%sp 46300: 4280 clrl %d0 46302: 6002 bras 46306 <pthread_cond_init+0x96>
if ( the_attr->process_shared == PTHREAD_PROCESS_SHARED )
return EINVAL;
if ( !the_attr->is_initialized )
return EINVAL;
46304: 7016 moveq #22,%d0
*cond = the_cond->Object.id;
_Thread_Enable_dispatch();
return 0;
}
46306: 4cee 1c00 fff4 moveml %fp@(-12),%a2-%a4
4630c: 4e5e unlk %fp <== NOT EXECUTED
0004610c <pthread_condattr_destroy>:
*/
int pthread_condattr_destroy(
pthread_condattr_t *attr
)
{
4610c: 4e56 0000 linkw %fp,#0 46110: 206e 0008 moveal %fp@(8),%a0
if ( !attr || attr->is_initialized == false )
46114: 4a88 tstl %a0
46116: 670a beqs 46122 <pthread_condattr_destroy+0x16>
46118: 4a90 tstl %a0@
4611a: 6706 beqs 46122 <pthread_condattr_destroy+0x16> <== NEVER TAKEN
return EINVAL;
attr->is_initialized = false;
4611c: 4290 clrl %a0@
return 0;
4611e: 4280 clrl %d0 46120: 6002 bras 46124 <pthread_condattr_destroy+0x18>
int pthread_condattr_destroy(
pthread_condattr_t *attr
)
{
if ( !attr || attr->is_initialized == false )
return EINVAL;
46122: 7016 moveq #22,%d0
attr->is_initialized = false;
return 0;
}
46124: 4e5e unlk %fp <== NOT EXECUTED
0004c5b0 <pthread_exit>:
}
void pthread_exit(
void *value_ptr
)
{
4c5b0: 4e56 0000 linkw %fp,#0
_POSIX_Thread_Exit( _Thread_Executing, value_ptr );
4c5b4: 2f2e 0008 movel %fp@(8),%sp@- 4c5b8: 2f39 0005 dddc movel 5dddc <_Per_CPU_Information+0xc>,%sp@- 4c5be: 4eb9 0004 c540 jsr 4c540 <_POSIX_Thread_Exit>
4c5c4: 508f addql #8,%sp <== NOT EXECUTED
}
4c5c6: 4e5e unlk %fp <== NOT EXECUTED
...
00045704 <pthread_key_create>:
int pthread_key_create(
pthread_key_t *key,
void (*destructor)( void * )
)
{
45704: 4e56 ffe4 linkw %fp,#-28 45708: 2039 0005 f68c movel 5f68c <_Thread_Dispatch_disable_level>,%d0 4570e: 5280 addql #1,%d0 45710: 48d7 3c1c moveml %d2-%d4/%a2-%a5,%sp@ 45714: 23c0 0005 f68c movel %d0,5f68c <_Thread_Dispatch_disable_level>
* the inactive chain of free keys control blocks.
*/
RTEMS_INLINE_ROUTINE POSIX_Keys_Control *_POSIX_Keys_Allocate( void )
{
return (POSIX_Keys_Control *) _Objects_Allocate( &_POSIX_Keys_Information );
4571a: 4879 0005 fa02 pea 5fa02 <_POSIX_Keys_Information> 45720: 4eb9 0004 7788 jsr 47788 <_Objects_Allocate>
_Thread_Disable_dispatch();
the_key = _POSIX_Keys_Allocate();
if ( !the_key ) {
45726: 588f addql #4,%sp 45728: 2440 moveal %d0,%a2 4572a: 4a80 tstl %d0
4572c: 660c bnes 4573a <pthread_key_create+0x36>
_Thread_Enable_dispatch();
4572e: 4eb9 0004 83c6 jsr 483c6 <_Thread_Enable_dispatch>
return EAGAIN;
45734: 700b moveq #11,%d0 45736: 6000 00b6 braw 457ee <pthread_key_create+0xea>
}
the_key->destructor = destructor;
4573a: 49f9 0005 f64c lea 5f64c <_Objects_Information_table+0x4>,%a4
int _EXFUN(pthread_once,
(pthread_once_t *__once_control, void (*__init_routine)(void)));
/* Thread-Specific Data Key Create, P1003.1c/Draft 10, p. 163 */
int _EXFUN(pthread_key_create,
45740: 47ea 0018 lea %a2@(24),%a3
* APIs are optional.
*
* NOTE: Currently RTEMS Classic API tasks are always enabled.
*/
for ( the_api = 1;
45744: 7401 moveq #1,%d2
INTERNAL_ERROR_IMPLEMENTATION_KEY_CREATE_INCONSISTENCY
);
#endif
bytes_to_allocate = sizeof( void * ) *
(_Objects_Information_table[ the_api ][ 1 ]->maximum + 1);
table = _Workspace_Allocate( bytes_to_allocate );
45746: 283c 0004 96cc movel #300748,%d4
_Thread_Enable_dispatch();
return ENOMEM;
}
the_key->Values[ the_api ] = table;
memset( table, '\0', bytes_to_allocate );
4574c: 4bf9 0004 df28 lea 4df28 <memset>,%a5
if ( !the_key ) {
_Thread_Enable_dispatch();
return EAGAIN;
}
the_key->destructor = destructor;
45752: 256e 000c 0010 movel %fp@(12),%a2@(16)
for ( the_api = 1;
the_api <= OBJECTS_APIS_LAST;
the_api++ ) {
if ( _Objects_Information_table[ the_api ] ) {
45758: 205c moveal %a4@+,%a0 4575a: 4a88 tstl %a0
4575c: 6760 beqs 457be <pthread_key_create+0xba> <== NEVER TAKEN
true,
INTERNAL_ERROR_IMPLEMENTATION_KEY_CREATE_INCONSISTENCY
);
#endif
bytes_to_allocate = sizeof( void * ) *
(_Objects_Information_table[ the_api ][ 1 ]->maximum + 1);
4575e: 2068 0004 moveal %a0@(4),%a0 45762: 4283 clrl %d3 45764: 3628 000e movew %a0@(14),%d3
table = _Workspace_Allocate( bytes_to_allocate );
45768: 2044 moveal %d4,%a0
true,
INTERNAL_ERROR_IMPLEMENTATION_KEY_CREATE_INCONSISTENCY
);
#endif
bytes_to_allocate = sizeof( void * ) *
(_Objects_Information_table[ the_api ][ 1 ]->maximum + 1);
4576a: 5283 addql #1,%d3
INTERNAL_ERROR_CORE,
true,
INTERNAL_ERROR_IMPLEMENTATION_KEY_CREATE_INCONSISTENCY
);
#endif
bytes_to_allocate = sizeof( void * ) *
4576c: e58b lsll #2,%d3
(_Objects_Information_table[ the_api ][ 1 ]->maximum + 1);
table = _Workspace_Allocate( bytes_to_allocate );
4576e: 2f03 movel %d3,%sp@- 45770: 4e90 jsr %a0@
if ( !table ) {
45772: 588f addql #4,%sp 45774: 4a80 tstl %d0
45776: 6636 bnes 457ae <pthread_key_create+0xaa>
for ( --the_api;
45778: 2602 movel %d2,%d3 4577a: 5383 subql #1,%d3
the_api >= 1;
the_api-- )
_Workspace_Free( the_key->Values[ the_api ] );
4577c: 49f9 0004 96e8 lea 496e8 <_Workspace_Free>,%a4 45782: 47f2 2c14 lea %a2@(00000014,%d2:l:4),%a3
#endif
bytes_to_allocate = sizeof( void * ) *
(_Objects_Information_table[ the_api ][ 1 ]->maximum + 1);
table = _Workspace_Allocate( bytes_to_allocate );
if ( !table ) {
for ( --the_api;
45786: 6008 bras 45790 <pthread_key_create+0x8c>
the_api >= 1;
the_api-- )
_Workspace_Free( the_key->Values[ the_api ] );
45788: 2f23 movel %a3@-,%sp@-
(_Objects_Information_table[ the_api ][ 1 ]->maximum + 1);
table = _Workspace_Allocate( bytes_to_allocate );
if ( !table ) {
for ( --the_api;
the_api >= 1;
the_api-- )
4578a: 5383 subql #1,%d3
_Workspace_Free( the_key->Values[ the_api ] );
4578c: 4e94 jsr %a4@
(_Objects_Information_table[ the_api ][ 1 ]->maximum + 1);
table = _Workspace_Allocate( bytes_to_allocate );
if ( !table ) {
for ( --the_api;
the_api >= 1;
the_api-- )
4578e: 588f addql #4,%sp
#endif
bytes_to_allocate = sizeof( void * ) *
(_Objects_Information_table[ the_api ][ 1 ]->maximum + 1);
table = _Workspace_Allocate( bytes_to_allocate );
if ( !table ) {
for ( --the_api;
45790: 4a83 tstl %d3
45792: 66f4 bnes 45788 <pthread_key_create+0x84>
*/
RTEMS_INLINE_ROUTINE void _POSIX_Keys_Free (
POSIX_Keys_Control *the_key
)
{
_Objects_Free( &_POSIX_Keys_Information, &the_key->Object );
45794: 2f0a movel %a2,%sp@- 45796: 4879 0005 fa02 pea 5fa02 <_POSIX_Keys_Information> 4579c: 4eb9 0004 7a7c jsr 47a7c <_Objects_Free>
the_api >= 1;
the_api-- )
_Workspace_Free( the_key->Values[ the_api ] );
_POSIX_Keys_Free( the_key );
_Thread_Enable_dispatch();
457a2: 4eb9 0004 83c6 jsr 483c6 <_Thread_Enable_dispatch>
return ENOMEM;
457a8: 508f addql #8,%sp 457aa: 700c moveq #12,%d0 457ac: 6040 bras 457ee <pthread_key_create+0xea>
}
the_key->Values[ the_api ] = table;
457ae: 2680 movel %d0,%a3@
memset( table, '\0', bytes_to_allocate );
457b0: 2f03 movel %d3,%sp@- 457b2: 42a7 clrl %sp@- 457b4: 2f00 movel %d0,%sp@- 457b6: 4e95 jsr %a5@ 457b8: 4fef 000c lea %sp@(12),%sp 457bc: 6002 bras 457c0 <pthread_key_create+0xbc>
} else {
the_key->Values[ the_api ] = NULL;
457be: 4293 clrl %a3@ <== NOT EXECUTED
* NOTE: Currently RTEMS Classic API tasks are always enabled.
*/
for ( the_api = 1;
the_api <= OBJECTS_APIS_LAST;
the_api++ ) {
457c0: 5282 addql #1,%d2 457c2: 588b addql #4,%a3
* APIs are optional.
*
* NOTE: Currently RTEMS Classic API tasks are always enabled.
*/
for ( the_api = 1;
457c4: 7004 moveq #4,%d0 457c6: b082 cmpl %d2,%d0
457c8: 668e bnes 45758 <pthread_key_create+0x54>
uint32_t name
)
{
_Objects_Set_local_object(
information,
_Objects_Get_index( the_object->id ),
457ca: 202a 0008 movel %a2@(8),%d0
Objects_Information *information,
Objects_Control *the_object,
uint32_t name
)
{
_Objects_Set_local_object(
457ce: 4281 clrl %d1
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
457d0: 2079 0005 fa1a moveal 5fa1a <_POSIX_Keys_Information+0x18>,%a0
Objects_Information *information,
Objects_Control *the_object,
uint32_t name
)
{
_Objects_Set_local_object(
457d6: 3200 movew %d0,%d1
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
457d8: 218a 1c00 movel %a2,%a0@(00000000,%d1:l:4)
}
_Objects_Open_u32( &_POSIX_Keys_Information, &the_key->Object, 0 );
*key = the_key->Object.id;
457dc: 206e 0008 moveal %fp@(8),%a0
_Objects_Get_index( the_object->id ),
the_object
);
/* ASSERT: information->is_string == false */
the_object->name.name_u32 = name;
457e0: 42aa 000c clrl %a2@(12) 457e4: 2080 movel %d0,%a0@
_Thread_Enable_dispatch();
457e6: 4eb9 0004 83c6 jsr 483c6 <_Thread_Enable_dispatch>
return 0;
457ec: 4280 clrl %d0
}
457ee: 4cee 3c1c ffe4 moveml %fp@(-28),%d2-%d4/%a2-%a5
457f4: 4e5e unlk %fp <== NOT EXECUTED
000457f8 <pthread_key_delete>:
*/
int pthread_key_delete(
pthread_key_t key
)
{
457f8: 4e56 ffec linkw %fp,#-20 457fc: 48d7 0c0c moveml %d2-%d3/%a2-%a3,%sp@
pthread_key_t id,
Objects_Locations *location
)
{
return (POSIX_Keys_Control *)
_Objects_Get( &_POSIX_Keys_Information, (Objects_Id) id, location );
45800: 486e fffc pea %fp@(-4) 45804: 2f2e 0008 movel %fp@(8),%sp@- 45808: 4879 0005 fa02 pea 5fa02 <_POSIX_Keys_Information> 4580e: 4eb9 0004 7bd8 jsr 47bd8 <_Objects_Get>
register POSIX_Keys_Control *the_key;
Objects_Locations location;
uint32_t the_api;
the_key = _POSIX_Keys_Get( key, &location );
switch ( location ) {
45814: 4fef 000c lea %sp@(12),%sp 45818: 2400 movel %d0,%d2 4581a: 4aae fffc tstl %fp@(-4)
4581e: 6646 bnes 45866 <pthread_key_delete+0x6e>
case OBJECTS_LOCAL:
_Objects_Close( &_POSIX_Keys_Information, &the_key->Object );
45820: 2f00 movel %d0,%sp@- 45822: 4879 0005 fa02 pea 5fa02 <_POSIX_Keys_Information>
(pthread_key_t __key, _CONST void *__value));
void * _EXFUN(pthread_getspecific, (pthread_key_t __key));
/* Thread-Specific Data Key Deletion, P1003.1c/Draft 10, p. 167 */
int _EXFUN(pthread_key_delete, (pthread_key_t __key));
45828: 2442 moveal %d2,%a2 4582a: 45ea 0018 lea %a2@(24),%a2 4582e: 7603 moveq #3,%d3
for ( the_api = 1; the_api <= OBJECTS_APIS_LAST; the_api++ )
if ( the_key->Values[ the_api ] )
_Workspace_Free( the_key->Values[ the_api ] );
45830: 47f9 0004 96e8 lea 496e8 <_Workspace_Free>,%a3
the_key = _POSIX_Keys_Get( key, &location );
switch ( location ) {
case OBJECTS_LOCAL:
_Objects_Close( &_POSIX_Keys_Information, &the_key->Object );
45836: 4eb9 0004 7804 jsr 47804 <_Objects_Close> 4583c: 508f addql #8,%sp
for ( the_api = 1; the_api <= OBJECTS_APIS_LAST; the_api++ )
if ( the_key->Values[ the_api ] )
4583e: 201a movel %a2@+,%d0
45840: 6706 beqs 45848 <pthread_key_delete+0x50> <== NEVER TAKEN
_Workspace_Free( the_key->Values[ the_api ] );
45842: 2f00 movel %d0,%sp@- 45844: 4e93 jsr %a3@ 45846: 588f addql #4,%sp 45848: 5383 subql #1,%d3
switch ( location ) {
case OBJECTS_LOCAL:
_Objects_Close( &_POSIX_Keys_Information, &the_key->Object );
for ( the_api = 1; the_api <= OBJECTS_APIS_LAST; the_api++ )
4584a: 66f2 bnes 4583e <pthread_key_delete+0x46>
*/
RTEMS_INLINE_ROUTINE void _POSIX_Keys_Free (
POSIX_Keys_Control *the_key
)
{
_Objects_Free( &_POSIX_Keys_Information, &the_key->Object );
4584c: 2f02 movel %d2,%sp@- 4584e: 4879 0005 fa02 pea 5fa02 <_POSIX_Keys_Information> 45854: 4eb9 0004 7a7c jsr 47a7c <_Objects_Free>
* NOTE: The destructor is not called and it is the responsibility
* of the application to free the memory.
*/
_POSIX_Keys_Free( the_key );
_Thread_Enable_dispatch();
4585a: 4eb9 0004 83c6 jsr 483c6 <_Thread_Enable_dispatch>
return 0;
45860: 508f addql #8,%sp 45862: 4280 clrl %d0 45864: 6002 bras 45868 <pthread_key_delete+0x70>
#endif
case OBJECTS_ERROR:
break;
}
return EINVAL;
45866: 7016 moveq #22,%d0
}
45868: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 4586e: 4e5e unlk %fp
...
00045398 <pthread_mutexattr_gettype>:
#if defined(_UNIX98_THREAD_MUTEX_ATTRIBUTES)
int pthread_mutexattr_gettype(
const pthread_mutexattr_t *attr,
int *type
)
{
45398: 4e56 0000 linkw %fp,#0 4539c: 206e 0008 moveal %fp@(8),%a0 453a0: 226e 000c moveal %fp@(12),%a1
if ( !attr )
453a4: 4a88 tstl %a0
453a6: 6710 beqs 453b8 <pthread_mutexattr_gettype+0x20>
return EINVAL;
if ( !attr->is_initialized )
453a8: 4a90 tstl %a0@
453aa: 670c beqs 453b8 <pthread_mutexattr_gettype+0x20>
return EINVAL;
if ( !type )
453ac: 4a89 tstl %a1
453ae: 6708 beqs 453b8 <pthread_mutexattr_gettype+0x20> <== NEVER TAKEN
return EINVAL;
*type = attr->type;
453b0: 22a8 0010 movel %a0@(16),%a1@
return 0;
453b4: 4280 clrl %d0 453b6: 6002 bras 453ba <pthread_mutexattr_gettype+0x22>
if ( !attr->is_initialized )
return EINVAL;
if ( !type )
return EINVAL;
453b8: 7016 moveq #22,%d0
*type = attr->type;
return 0;
}
453ba: 4e5e unlk %fp
...
00047128 <pthread_mutexattr_setpshared>:
int pthread_mutexattr_setpshared(
pthread_mutexattr_t *attr,
int pshared
)
{
47128: 4e56 0000 linkw %fp,#0 4712c: 206e 0008 moveal %fp@(8),%a0 47130: 202e 000c movel %fp@(12),%d0
if ( !attr || !attr->is_initialized )
47134: 4a88 tstl %a0
47136: 6712 beqs 4714a <pthread_mutexattr_setpshared+0x22>
47138: 4a90 tstl %a0@
4713a: 670e beqs 4714a <pthread_mutexattr_setpshared+0x22>
return EINVAL;
switch ( pshared ) {
4713c: 7201 moveq #1,%d1 4713e: b280 cmpl %d0,%d1
47140: 6508 bcss 4714a <pthread_mutexattr_setpshared+0x22><== NEVER TAKEN
case PTHREAD_PROCESS_SHARED:
case PTHREAD_PROCESS_PRIVATE:
attr->process_shared = pshared;
47142: 2140 0004 movel %d0,%a0@(4)
return 0;
47146: 4280 clrl %d0 47148: 6002 bras 4714c <pthread_mutexattr_setpshared+0x24>
default:
return EINVAL;
4714a: 7016 moveq #22,%d0
} }
4714c: 4e5e unlk %fp <== NOT EXECUTED
000453ec <pthread_mutexattr_settype>:
#if defined(_UNIX98_THREAD_MUTEX_ATTRIBUTES)
int pthread_mutexattr_settype(
pthread_mutexattr_t *attr,
int type
)
{
453ec: 4e56 0000 linkw %fp,#0 453f0: 206e 0008 moveal %fp@(8),%a0 453f4: 202e 000c movel %fp@(12),%d0
if ( !attr || !attr->is_initialized )
453f8: 4a88 tstl %a0
453fa: 6712 beqs 4540e <pthread_mutexattr_settype+0x22> <== NEVER TAKEN
453fc: 4a90 tstl %a0@
453fe: 670e beqs 4540e <pthread_mutexattr_settype+0x22> <== NEVER TAKEN
return EINVAL;
switch ( type ) {
45400: 7203 moveq #3,%d1 45402: b280 cmpl %d0,%d1
45404: 6508 bcss 4540e <pthread_mutexattr_settype+0x22>
case PTHREAD_MUTEX_NORMAL:
case PTHREAD_MUTEX_RECURSIVE:
case PTHREAD_MUTEX_ERRORCHECK:
case PTHREAD_MUTEX_DEFAULT:
attr->type = type;
45406: 2140 0010 movel %d0,%a0@(16)
return 0;
4540a: 4280 clrl %d0 4540c: 6002 bras 45410 <pthread_mutexattr_settype+0x24>
default:
return EINVAL;
4540e: 7016 moveq #22,%d0
} }
45410: 4e5e unlk %fp <== NOT EXECUTED
00045e74 <pthread_once>:
int pthread_once(
pthread_once_t *once_control,
void (*init_routine)(void)
)
{
45e74: 4e56 fffc linkw %fp,#-4 45e78: 2f0b movel %a3,%sp@- 45e7a: 266e 000c moveal %fp@(12),%a3 45e7e: 2f0a movel %a2,%sp@- 45e80: 246e 0008 moveal %fp@(8),%a2
if ( !once_control || !init_routine )
45e84: 4a8a tstl %a2
45e86: 674a beqs 45ed2 <pthread_once+0x5e>
45e88: 4a8b tstl %a3
45e8a: 6746 beqs 45ed2 <pthread_once+0x5e>
return EINVAL;
if ( !once_control->init_executed ) {
45e8c: 4aaa 0004 tstl %a2@(4)
45e90: 6644 bnes 45ed6 <pthread_once+0x62>
rtems_mode saveMode;
rtems_task_mode(RTEMS_NO_PREEMPT, RTEMS_PREEMPT_MASK, &saveMode);
45e92: 486e fffc pea %fp@(-4) 45e96: 4878 0100 pea 100 <DBL_MANT_DIG+0xcb> 45e9a: 4878 0100 pea 100 <DBL_MANT_DIG+0xcb> 45e9e: 4eb9 0004 697c jsr 4697c <rtems_task_mode>
if ( !once_control->init_executed ) {
45ea4: 4fef 000c lea %sp@(12),%sp 45ea8: 4aaa 0004 tstl %a2@(4)
45eac: 660c bnes 45eba <pthread_once+0x46> <== NEVER TAKEN
once_control->is_initialized = true;
45eae: 7001 moveq #1,%d0 45eb0: 2480 movel %d0,%a2@
once_control->init_executed = true;
45eb2: 7001 moveq #1,%d0 45eb4: 2540 0004 movel %d0,%a2@(4)
(*init_routine)();
45eb8: 4e93 jsr %a3@
}
rtems_task_mode(saveMode, RTEMS_PREEMPT_MASK, &saveMode);
45eba: 486e fffc pea %fp@(-4) 45ebe: 4878 0100 pea 100 <DBL_MANT_DIG+0xcb> 45ec2: 2f2e fffc movel %fp@(-4),%sp@- 45ec6: 4eb9 0004 697c jsr 4697c <rtems_task_mode> 45ecc: 4fef 000c lea %sp@(12),%sp 45ed0: 6004 bras 45ed6 <pthread_once+0x62>
pthread_once_t *once_control,
void (*init_routine)(void)
)
{
if ( !once_control || !init_routine )
return EINVAL;
45ed2: 7016 moveq #22,%d0 45ed4: 6002 bras 45ed8 <pthread_once+0x64>
once_control->init_executed = true;
(*init_routine)();
}
rtems_task_mode(saveMode, RTEMS_PREEMPT_MASK, &saveMode);
}
return 0;
45ed6: 4280 clrl %d0
}
45ed8: 246e fff4 moveal %fp@(-12),%a2 45edc: 266e fff8 moveal %fp@(-8),%a3
45ee0: 4e5e unlk %fp <== NOT EXECUTED
000464b0 <pthread_rwlock_init>:
int pthread_rwlock_init(
pthread_rwlock_t *rwlock,
const pthread_rwlockattr_t *attr
)
{
464b0: 4e56 ffe4 linkw %fp,#-28 464b4: 206e 000c moveal %fp@(12),%a0 464b8: 48d7 1c04 moveml %d2/%a2-%a4,%sp@ 464bc: 246e 0008 moveal %fp@(8),%a2
const pthread_rwlockattr_t *the_attr;
/*
* Error check parameters
*/
if ( !rwlock )
464c0: 4a8a tstl %a2
464c2: 677e beqs 46542 <pthread_rwlock_init+0x92>
return EINVAL;
/*
* If the user passed in NULL, use the default attributes
*/
if ( attr ) {
464c4: 4a88 tstl %a0
464c6: 6614 bnes 464dc <pthread_rwlock_init+0x2c>
the_attr = attr;
} else {
(void) pthread_rwlockattr_init( &default_attr );
464c8: 240e movel %fp,%d2 464ca: 0682 ffff fff4 addil #-12,%d2 464d0: 2f02 movel %d2,%sp@- 464d2: 4eb9 0004 6dc0 jsr 46dc0 <pthread_rwlockattr_init> 464d8: 588f addql #4,%sp
the_attr = &default_attr;
464da: 2042 moveal %d2,%a0
}
/*
* Now start error checking the attributes that we are going to use
*/
if ( !the_attr->is_initialized )
464dc: 4a90 tstl %a0@
464de: 6762 beqs 46542 <pthread_rwlock_init+0x92> <== NEVER TAKEN
return EINVAL;
switch ( the_attr->process_shared ) {
464e0: 4aa8 0004 tstl %a0@(4)
464e4: 665c bnes 46542 <pthread_rwlock_init+0x92> <== NEVER TAKEN
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
464e6: 2039 0006 0350 movel 60350 <_Thread_Dispatch_disable_level>,%d0 464ec: 5280 addql #1,%d0 464ee: 23c0 0006 0350 movel %d0,60350 <_Thread_Dispatch_disable_level>
* the inactive chain of free RWLock control blocks.
*/
RTEMS_INLINE_ROUTINE POSIX_RWLock_Control *_POSIX_RWLock_Allocate( void )
{
return (POSIX_RWLock_Control *)
_Objects_Allocate( &_POSIX_RWLock_Information );
464f4: 4879 0006 04de pea 604de <_POSIX_RWLock_Information> 464fa: 49f9 0004 9526 lea 49526 <_Thread_Enable_dispatch>,%a4 46500: 4eb9 0004 88e8 jsr 488e8 <_Objects_Allocate>
*/
_Thread_Disable_dispatch(); /* prevents deletion */
the_rwlock = _POSIX_RWLock_Allocate();
if ( !the_rwlock ) {
46506: 588f addql #4,%sp 46508: 2640 moveal %d0,%a3 4650a: 4a80 tstl %d0
4650c: 6606 bnes 46514 <pthread_rwlock_init+0x64>
_Thread_Enable_dispatch();
4650e: 4e94 jsr %a4@
return EAGAIN;
46510: 700b moveq #11,%d0 46512: 6030 bras 46544 <pthread_rwlock_init+0x94>
}
_CORE_RWLock_Initialize( &the_rwlock->RWLock, &the_attributes );
46514: 486e fffc pea %fp@(-4) 46518: 486b 0010 pea %a3@(16) 4651c: 4eb9 0004 80c8 jsr 480c8 <_CORE_RWLock_Initialize>
uint32_t name
)
{
_Objects_Set_local_object(
information,
_Objects_Get_index( the_object->id ),
46522: 202b 0008 movel %a3@(8),%d0
Objects_Information *information,
Objects_Control *the_object,
uint32_t name
)
{
_Objects_Set_local_object(
46526: 4281 clrl %d1
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
46528: 2079 0006 04f6 moveal 604f6 <_POSIX_RWLock_Information+0x18>,%a0
Objects_Information *information,
Objects_Control *the_object,
uint32_t name
)
{
_Objects_Set_local_object(
4652e: 3200 movew %d0,%d1
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
46530: 218b 1c00 movel %a3,%a0@(00000000,%d1:l:4)
_Objects_Get_index( the_object->id ),
the_object
);
/* ASSERT: information->is_string == false */
the_object->name.name_u32 = name;
46534: 42ab 000c clrl %a3@(12)
&_POSIX_RWLock_Information,
&the_rwlock->Object,
0
);
*rwlock = the_rwlock->Object.id;
46538: 2480 movel %d0,%a2@
_Thread_Enable_dispatch();
4653a: 4e94 jsr %a4@
return 0;
4653c: 508f addql #8,%sp 4653e: 4280 clrl %d0 46540: 6002 bras 46544 <pthread_rwlock_init+0x94>
switch ( the_attr->process_shared ) {
case PTHREAD_PROCESS_PRIVATE: /* only supported values */
break;
case PTHREAD_PROCESS_SHARED:
default:
return EINVAL;
46542: 7016 moveq #22,%d0
*rwlock = the_rwlock->Object.id;
_Thread_Enable_dispatch();
return 0;
}
46544: 4cee 1c04 ffe4 moveml %fp@(-28),%d2/%a2-%a4 4654a: 4e5e unlk %fp
...
000465b8 <pthread_rwlock_timedrdlock>:
int pthread_rwlock_timedrdlock(
pthread_rwlock_t *rwlock,
const struct timespec *abstime
)
{
465b8: 4e56 ffec linkw %fp,#-20 465bc: 48d7 040c moveml %d2-%d3/%a2,%sp@ 465c0: 246e 0008 moveal %fp@(8),%a2
Objects_Locations location;
Watchdog_Interval ticks;
bool do_wait = true;
POSIX_Absolute_timeout_conversion_results_t status;
if ( !rwlock )
465c4: 4a8a tstl %a2 465c6: 6700 0088 beqw 46650 <pthread_rwlock_timedrdlock+0x98>
* * If the status is POSIX_ABSOLUTE_TIMEOUT_INVALID, * POSIX_ABSOLUTE_TIMEOUT_IS_IN_PAST, or POSIX_ABSOLUTE_TIMEOUT_IS_NOW, * then we should not wait. */ status = _POSIX_Absolute_timeout_to_ticks( abstime, &ticks );
465ca: 486e fff8 pea %fp@(-8) 465ce: 2f2e 000c movel %fp@(12),%sp@- 465d2: 4eb9 0004 c0b0 jsr 4c0b0 <_POSIX_Absolute_timeout_to_ticks> 465d8: 486e fffc pea %fp@(-4) 465dc: 2400 movel %d0,%d2 465de: 2f12 movel %a2@,%sp@- 465e0: 4879 0006 04de pea 604de <_POSIX_RWLock_Information> 465e6: 4eb9 0004 8d38 jsr 48d38 <_Objects_Get>
if ( status != POSIX_ABSOLUTE_TIMEOUT_IS_IN_FUTURE )
do_wait = false;
the_rwlock = _POSIX_RWLock_Get( rwlock, &location );
switch ( location ) {
465ec: 4fef 0014 lea %sp@(20),%sp 465f0: 4aae fffc tstl %fp@(-4)
465f4: 665a bnes 46650 <pthread_rwlock_timedrdlock+0x98> int _EXFUN(pthread_rwlock_init, (pthread_rwlock_t *__rwlock, _CONST pthread_rwlockattr_t *__attr)); int _EXFUN(pthread_rwlock_destroy, (pthread_rwlock_t *__rwlock)); int _EXFUN(pthread_rwlock_rdlock,(pthread_rwlock_t *__rwlock)); int _EXFUN(pthread_rwlock_tryrdlock,(pthread_rwlock_t *__rwlock)); int _EXFUN(pthread_rwlock_timedrdlock,
465f6: 7203 moveq #3,%d1 465f8: b282 cmpl %d2,%d1 465fa: 57c3 seq %d3
case OBJECTS_LOCAL:
_CORE_RWLock_Obtain_for_reading(
465fc: 42a7 clrl %sp@- 465fe: 2f2e fff8 movel %fp@(-8),%sp@- 46602: 4483 negl %d3 46604: 4281 clrl %d1 46606: 1203 moveb %d3,%d1 46608: 2040 moveal %d0,%a0 4660a: 2f01 movel %d1,%sp@- 4660c: 2f12 movel %a2@,%sp@- 4660e: 4868 0010 pea %a0@(16) 46612: 4eb9 0004 80fc jsr 480fc <_CORE_RWLock_Obtain_for_reading>
do_wait,
ticks,
NULL
);
_Thread_Enable_dispatch();
46618: 4eb9 0004 9526 jsr 49526 <_Thread_Enable_dispatch>
if ( !do_wait ) {
4661e: 4fef 0014 lea %sp@(20),%sp 46622: 4a03 tstb %d3
46624: 6616 bnes 4663c <pthread_rwlock_timedrdlock+0x84>
if ( _Thread_Executing->Wait.return_code == CORE_RWLOCK_UNAVAILABLE ) {
46626: 2079 0006 07e0 moveal 607e0 <_Per_CPU_Information+0xc>,%a0 4662c: 7002 moveq #2,%d0 4662e: b0a8 0034 cmpl %a0@(52),%d0
46632: 6608 bnes 4663c <pthread_rwlock_timedrdlock+0x84>
switch (status) {
46634: 4a82 tstl %d2
46636: 6718 beqs 46650 <pthread_rwlock_timedrdlock+0x98><== NEVER TAKEN
46638: b082 cmpl %d2,%d0
4663a: 6418 bccs 46654 <pthread_rwlock_timedrdlock+0x9c><== ALWAYS TAKEN
}
}
}
return _POSIX_RWLock_Translate_core_RWLock_return_code(
(CORE_RWLock_Status) _Thread_Executing->Wait.return_code
4663c: 2079 0006 07e0 moveal 607e0 <_Per_CPU_Information+0xc>,%a0
break;
}
}
}
return _POSIX_RWLock_Translate_core_RWLock_return_code(
46642: 2f28 0034 movel %a0@(52),%sp@- 46646: 4eb9 0004 6708 jsr 46708 <_POSIX_RWLock_Translate_core_RWLock_return_code> 4664c: 588f addql #4,%sp 4664e: 6006 bras 46656 <pthread_rwlock_timedrdlock+0x9e>
#endif
case OBJECTS_ERROR:
break;
}
return EINVAL;
46650: 7016 moveq #22,%d0 46652: 6002 bras 46656 <pthread_rwlock_timedrdlock+0x9e>
switch (status) {
case POSIX_ABSOLUTE_TIMEOUT_INVALID:
return EINVAL;
case POSIX_ABSOLUTE_TIMEOUT_IS_IN_PAST:
case POSIX_ABSOLUTE_TIMEOUT_IS_NOW:
return ETIMEDOUT;
46654: 7074 moveq #116,%d0
case OBJECTS_ERROR:
break;
}
return EINVAL;
}
46656: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2
4665c: 4e5e unlk %fp <== NOT EXECUTED
00046660 <pthread_rwlock_timedwrlock>:
int pthread_rwlock_timedwrlock(
pthread_rwlock_t *rwlock,
const struct timespec *abstime
)
{
46660: 4e56 ffec linkw %fp,#-20 46664: 48d7 040c moveml %d2-%d3/%a2,%sp@ 46668: 246e 0008 moveal %fp@(8),%a2
Objects_Locations location;
Watchdog_Interval ticks;
bool do_wait = true;
POSIX_Absolute_timeout_conversion_results_t status;
if ( !rwlock )
4666c: 4a8a tstl %a2 4666e: 6700 0088 beqw 466f8 <pthread_rwlock_timedwrlock+0x98>
* * If the status is POSIX_ABSOLUTE_TIMEOUT_INVALID, * POSIX_ABSOLUTE_TIMEOUT_IS_IN_PAST, or POSIX_ABSOLUTE_TIMEOUT_IS_NOW, * then we should not wait. */ status = _POSIX_Absolute_timeout_to_ticks( abstime, &ticks );
46672: 486e fff8 pea %fp@(-8) 46676: 2f2e 000c movel %fp@(12),%sp@- 4667a: 4eb9 0004 c0b0 jsr 4c0b0 <_POSIX_Absolute_timeout_to_ticks> 46680: 486e fffc pea %fp@(-4) 46684: 2400 movel %d0,%d2 46686: 2f12 movel %a2@,%sp@- 46688: 4879 0006 04de pea 604de <_POSIX_RWLock_Information> 4668e: 4eb9 0004 8d38 jsr 48d38 <_Objects_Get>
if ( status != POSIX_ABSOLUTE_TIMEOUT_IS_IN_FUTURE )
do_wait = false;
the_rwlock = _POSIX_RWLock_Get( rwlock, &location );
switch ( location ) {
46694: 4fef 0014 lea %sp@(20),%sp 46698: 4aae fffc tstl %fp@(-4)
4669c: 665a bnes 466f8 <pthread_rwlock_timedwrlock+0x98>
(pthread_rwlock_t *__rwlock, _CONST struct timespec *__abstime));
int _EXFUN(pthread_rwlock_unlock,(pthread_rwlock_t *__rwlock));
int _EXFUN(pthread_rwlock_wrlock,(pthread_rwlock_t *__rwlock));
int _EXFUN(pthread_rwlock_trywrlock,(pthread_rwlock_t *__rwlock));
int _EXFUN(pthread_rwlock_timedwrlock,
4669e: 7203 moveq #3,%d1 466a0: b282 cmpl %d2,%d1 466a2: 57c3 seq %d3
case OBJECTS_LOCAL:
_CORE_RWLock_Obtain_for_writing(
466a4: 42a7 clrl %sp@- 466a6: 2f2e fff8 movel %fp@(-8),%sp@- 466aa: 4483 negl %d3 466ac: 4281 clrl %d1 466ae: 1203 moveb %d3,%d1 466b0: 2040 moveal %d0,%a0 466b2: 2f01 movel %d1,%sp@- 466b4: 2f12 movel %a2@,%sp@- 466b6: 4868 0010 pea %a0@(16) 466ba: 4eb9 0004 81ac jsr 481ac <_CORE_RWLock_Obtain_for_writing>
do_wait,
ticks,
NULL
);
_Thread_Enable_dispatch();
466c0: 4eb9 0004 9526 jsr 49526 <_Thread_Enable_dispatch>
if ( !do_wait &&
466c6: 4fef 0014 lea %sp@(20),%sp 466ca: 4a03 tstb %d3
466cc: 6616 bnes 466e4 <pthread_rwlock_timedwrlock+0x84>
(_Thread_Executing->Wait.return_code == CORE_RWLOCK_UNAVAILABLE) ) {
466ce: 2079 0006 07e0 moveal 607e0 <_Per_CPU_Information+0xc>,%a0
ticks,
NULL
);
_Thread_Enable_dispatch();
if ( !do_wait &&
466d4: 7002 moveq #2,%d0 466d6: b0a8 0034 cmpl %a0@(52),%d0
466da: 6608 bnes 466e4 <pthread_rwlock_timedwrlock+0x84>
(_Thread_Executing->Wait.return_code == CORE_RWLOCK_UNAVAILABLE) ) {
switch (status) {
466dc: 4a82 tstl %d2
466de: 6718 beqs 466f8 <pthread_rwlock_timedwrlock+0x98><== NEVER TAKEN
466e0: b082 cmpl %d2,%d0
466e2: 6418 bccs 466fc <pthread_rwlock_timedwrlock+0x9c><== ALWAYS TAKEN
break;
}
}
return _POSIX_RWLock_Translate_core_RWLock_return_code(
(CORE_RWLock_Status) _Thread_Executing->Wait.return_code
466e4: 2079 0006 07e0 moveal 607e0 <_Per_CPU_Information+0xc>,%a0
case POSIX_ABSOLUTE_TIMEOUT_IS_IN_FUTURE:
break;
}
}
return _POSIX_RWLock_Translate_core_RWLock_return_code(
466ea: 2f28 0034 movel %a0@(52),%sp@- 466ee: 4eb9 0004 6708 jsr 46708 <_POSIX_RWLock_Translate_core_RWLock_return_code> 466f4: 588f addql #4,%sp 466f6: 6006 bras 466fe <pthread_rwlock_timedwrlock+0x9e>
#endif
case OBJECTS_ERROR:
break;
}
return EINVAL;
466f8: 7016 moveq #22,%d0 466fa: 6002 bras 466fe <pthread_rwlock_timedwrlock+0x9e>
switch (status) {
case POSIX_ABSOLUTE_TIMEOUT_INVALID:
return EINVAL;
case POSIX_ABSOLUTE_TIMEOUT_IS_IN_PAST:
case POSIX_ABSOLUTE_TIMEOUT_IS_NOW:
return ETIMEDOUT;
466fc: 7074 moveq #116,%d0
case OBJECTS_ERROR:
break;
}
return EINVAL;
}
466fe: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2
46704: 4e5e unlk %fp <== NOT EXECUTED
000467e8 <pthread_rwlock_unlock>:
*/
int pthread_rwlock_unlock(
pthread_rwlock_t *rwlock
)
{
467e8: 4e56 fffc linkw %fp,#-4 467ec: 206e 0008 moveal %fp@(8),%a0 467f0: 2f02 movel %d2,%sp@-
POSIX_RWLock_Control *the_rwlock;
Objects_Locations location;
CORE_RWLock_Status status;
if ( !rwlock )
467f2: 4a88 tstl %a0
467f4: 673c beqs 46832 <pthread_rwlock_unlock+0x4a> <== NEVER TAKEN
467f6: 486e fffc pea %fp@(-4) 467fa: 2f10 movel %a0@,%sp@- 467fc: 4879 0006 04de pea 604de <_POSIX_RWLock_Information> 46802: 4eb9 0004 8d38 jsr 48d38 <_Objects_Get>
return EINVAL;
the_rwlock = _POSIX_RWLock_Get( rwlock, &location );
switch ( location ) {
46808: 4fef 000c lea %sp@(12),%sp 4680c: 4aae fffc tstl %fp@(-4)
46810: 6620 bnes 46832 <pthread_rwlock_unlock+0x4a>
case OBJECTS_LOCAL:
status = _CORE_RWLock_Release( &the_rwlock->RWLock );
46812: 2040 moveal %d0,%a0 46814: 4868 0010 pea %a0@(16) 46818: 4eb9 0004 8238 jsr 48238 <_CORE_RWLock_Release> 4681e: 2400 movel %d0,%d2
_Thread_Enable_dispatch();
46820: 4eb9 0004 9526 jsr 49526 <_Thread_Enable_dispatch>
return _POSIX_RWLock_Translate_core_RWLock_return_code( status );
46826: 2f02 movel %d2,%sp@- 46828: 4eb9 0004 6708 jsr 46708 <_POSIX_RWLock_Translate_core_RWLock_return_code> 4682e: 508f addql #8,%sp 46830: 6002 bras 46834 <pthread_rwlock_unlock+0x4c>
#endif
case OBJECTS_ERROR:
break;
}
return EINVAL;
46832: 7016 moveq #22,%d0
}
46834: 242e fff8 movel %fp@(-8),%d2
46838: 4e5e unlk %fp <== NOT EXECUTED
00046de0 <pthread_rwlockattr_setpshared>:
int pthread_rwlockattr_setpshared(
pthread_rwlockattr_t *attr,
int pshared
)
{
46de0: 4e56 0000 linkw %fp,#0 46de4: 206e 0008 moveal %fp@(8),%a0 46de8: 202e 000c movel %fp@(12),%d0
if ( !attr )
46dec: 4a88 tstl %a0
46dee: 6712 beqs 46e02 <pthread_rwlockattr_setpshared+0x22>
return EINVAL;
if ( !attr->is_initialized )
46df0: 4a90 tstl %a0@
46df2: 670e beqs 46e02 <pthread_rwlockattr_setpshared+0x22>
return EINVAL;
switch ( pshared ) {
46df4: 7201 moveq #1,%d1 46df6: b280 cmpl %d0,%d1
46df8: 6508 bcss 46e02 <pthread_rwlockattr_setpshared+0x22><== NEVER TAKEN
case PTHREAD_PROCESS_SHARED:
case PTHREAD_PROCESS_PRIVATE:
attr->process_shared = pshared;
46dfa: 2140 0004 movel %d0,%a0@(4)
return 0;
46dfe: 4280 clrl %d0 46e00: 6002 bras 46e04 <pthread_rwlockattr_setpshared+0x24>
default:
return EINVAL;
46e02: 7016 moveq #22,%d0
} }
46e04: 4e5e unlk %fp <== NOT EXECUTED
000453b0 <pthread_setcancelstate>:
int pthread_setcancelstate(
int state,
int *oldstate
)
{
453b0: 4e56 0000 linkw %fp,#0 453b4: 202e 0008 movel %fp@(8),%d0 453b8: 226e 000c moveal %fp@(12),%a1
* Don't even think about deleting a resource from an ISR.
* Besides this request is supposed to be for _Thread_Executing
* and the ISR context is not a thread.
*/
if ( _ISR_Is_in_progress() )
453bc: 4ab9 0005 e44c tstl 5e44c <_Per_CPU_Information+0x8>
453c2: 663c bnes 45400 <pthread_setcancelstate+0x50> <== NEVER TAKEN
return EPROTO;
if ( !oldstate )
453c4: 4a89 tstl %a1
453c6: 673c beqs 45404 <pthread_setcancelstate+0x54> <== NEVER TAKEN
return EINVAL;
if ( state != PTHREAD_CANCEL_ENABLE && state != PTHREAD_CANCEL_DISABLE )
453c8: 7201 moveq #1,%d1 453ca: b280 cmpl %d0,%d1
453cc: 6536 bcss 45404 <pthread_setcancelstate+0x54> <== NEVER TAKEN
return EINVAL;
thread_support = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ];
453ce: 2079 0005 e450 moveal 5e450 <_Per_CPU_Information+0xc>,%a0
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
453d4: 2239 0005 dfc0 movel 5dfc0 <_Thread_Dispatch_disable_level>,%d1 453da: 5281 addql #1,%d1 453dc: 2068 010e moveal %a0@(270),%a0 453e0: 23c1 0005 dfc0 movel %d1,5dfc0 <_Thread_Dispatch_disable_level>
_Thread_Disable_dispatch();
*oldstate = thread_support->cancelability_state;
453e6: 22a8 00d4 movel %a0@(212),%a1@
thread_support->cancelability_state = state;
453ea: 2140 00d4 movel %d0,%a0@(212)
_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch(_Thread_Executing);
453ee: 2f39 0005 e450 movel 5e450 <_Per_CPU_Information+0xc>,%sp@- 453f4: 4eb9 0004 a0c4 jsr 4a0c4 <_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch>
/*
* _Thread_Enable_dispatch is invoked by above call.
*/
return 0;
453fa: 588f addql #4,%sp 453fc: 4280 clrl %d0 453fe: 6006 bras 45406 <pthread_setcancelstate+0x56>
* Besides this request is supposed to be for _Thread_Executing
* and the ISR context is not a thread.
*/
if ( _ISR_Is_in_progress() )
return EPROTO;
45400: 7047 moveq #71,%d0 45402: 6002 bras 45406 <pthread_setcancelstate+0x56>
if ( !oldstate )
return EINVAL;
if ( state != PTHREAD_CANCEL_ENABLE && state != PTHREAD_CANCEL_DISABLE )
return EINVAL;
45404: 7016 moveq #22,%d0
/*
* _Thread_Enable_dispatch is invoked by above call.
*/
return 0;
}
45406: 4e5e unlk %fp
...
00047cb4 <pthread_setschedparam>:
int pthread_setschedparam(
pthread_t thread,
int policy,
struct sched_param *param
)
{
47cb4: 4e56 ffe0 linkw %fp,#-32 47cb8: 48d7 0c1c moveml %d2-%d4/%a2-%a3,%sp@ 47cbc: 242e 000c movel %fp@(12),%d2 47cc0: 282e 0010 movel %fp@(16),%d4
int rc;
/*
* Check all the parameters
*/
if ( !param )
47cc4: 6700 00e0 beqw 47da6 <pthread_setschedparam+0xf2>
return EINVAL;
rc = _POSIX_Thread_Translate_sched_param(
47cc8: 486e fff8 pea %fp@(-8) 47ccc: 486e fffc pea %fp@(-4) 47cd0: 2f04 movel %d4,%sp@- 47cd2: 2f02 movel %d2,%sp@- 47cd4: 4eb9 0004 d0bc jsr 4d0bc <_POSIX_Thread_Translate_sched_param>
policy,
param,
&budget_algorithm,
&budget_callout
);
if ( rc )
47cda: 4fef 0010 lea %sp@(16),%sp
* Check all the parameters
*/
if ( !param )
return EINVAL;
rc = _POSIX_Thread_Translate_sched_param(
47cde: 2600 movel %d0,%d3
policy,
param,
&budget_algorithm,
&budget_callout
);
if ( rc )
47ce0: 6600 00ca bnew 47dac <pthread_setschedparam+0xf8> 47ce4: 486e fff4 pea %fp@(-12) 47ce8: 2f2e 0008 movel %fp@(8),%sp@- 47cec: 4879 0006 2654 pea 62654 <_POSIX_Threads_Information> 47cf2: 4eb9 0004 9a80 jsr 49a80 <_Objects_Get>
/*
* Actually change the scheduling policy and parameters
*/
the_thread = _POSIX_Threads_Get( thread, &location );
switch ( location ) {
47cf8: 4fef 000c lea %sp@(12),%sp 47cfc: 2640 moveal %d0,%a3 47cfe: 4aae fff4 tstl %fp@(-12) 47d02: 6600 00a6 bnew 47daa <pthread_setschedparam+0xf6>
case OBJECTS_LOCAL:
api = the_thread->API_Extensions[ THREAD_API_POSIX ];
47d06: 246b 010e moveal %a3@(270),%a2
if ( api->schedpolicy == SCHED_SPORADIC )
47d0a: 7004 moveq #4,%d0 47d0c: b0aa 0080 cmpl %a2@(128),%d0
47d10: 660c bnes 47d1e <pthread_setschedparam+0x6a>
(void) _Watchdog_Remove( &api->Sporadic_timer );
47d12: 486a 00a4 pea %a2@(164) 47d16: 4eb9 0004 b474 jsr 4b474 <_Watchdog_Remove> 47d1c: 588f addql #4,%sp
api->schedpolicy = policy;
47d1e: 2542 0080 movel %d2,%a2@(128)
api->schedparam = *param;
47d22: 4878 001c pea 1c <OPER2+0x8> 47d26: 2f04 movel %d4,%sp@- 47d28: 486a 0084 pea %a2@(132) 47d2c: 4eb9 0004 fd94 jsr 4fd94 <memcpy>
the_thread->budget_algorithm = budget_algorithm;
47d32: 276e fffc 007a movel %fp@(-4),%a3@(122)
the_thread->budget_callout = budget_callout;
switch ( api->schedpolicy ) {
47d38: 4fef 000c lea %sp@(12),%sp
(void) _Watchdog_Remove( &api->Sporadic_timer );
api->schedpolicy = policy;
api->schedparam = *param;
the_thread->budget_algorithm = budget_algorithm;
the_thread->budget_callout = budget_callout;
47d3c: 276e fff8 007e movel %fp@(-8),%a3@(126)
switch ( api->schedpolicy ) {
47d42: 4a82 tstl %d2
47d44: 6d58 blts 47d9e <pthread_setschedparam+0xea> <== NEVER TAKEN
47d46: 7002 moveq #2,%d0 47d48: b082 cmpl %d2,%d0
47d4a: 6c0a bges 47d56 <pthread_setschedparam+0xa2>
47d4c: 103c 0004 moveb #4,%d0 47d50: b082 cmpl %d2,%d0
47d52: 664a bnes 47d9e <pthread_setschedparam+0xea> <== NEVER TAKEN
47d54: 602a bras 47d80 <pthread_setschedparam+0xcc> 47d56: 4280 clrl %d0 47d58: 1039 0006 0ca6 moveb 60ca6 <rtems_maximum_priority>,%d0
case SCHED_OTHER:
case SCHED_FIFO:
case SCHED_RR:
the_thread->cpu_time_budget = _Thread_Ticks_per_timeslice;
47d5e: 41f9 0006 2444 lea 62444 <_Thread_Ticks_per_timeslice>,%a0 47d64: 90aa 0084 subl %a2@(132),%d0 47d68: 2750 0076 movel %a0@,%a3@(118)
the_thread->real_priority =
47d6c: 2740 0018 movel %d0,%a3@(24)
_POSIX_Priority_To_core( api->schedparam.sched_priority );
_Thread_Change_priority(
47d70: 4878 0001 pea 1 <ADD> 47d74: 2f00 movel %d0,%sp@- 47d76: 2f0b movel %a3,%sp@- 47d78: 4eb9 0004 9d88 jsr 49d88 <_Thread_Change_priority> 47d7e: 601a bras 47d9a <pthread_setschedparam+0xe6>
true
);
break;
case SCHED_SPORADIC:
api->ss_high_priority = api->schedparam.sched_priority;
47d80: 256a 0084 00a0 movel %a2@(132),%a2@(160)
_Watchdog_Remove( &api->Sporadic_timer );
47d86: 486a 00a4 pea %a2@(164) 47d8a: 4eb9 0004 b474 jsr 4b474 <_Watchdog_Remove>
_POSIX_Threads_Sporadic_budget_TSR( 0, the_thread );
47d90: 2f0b movel %a3,%sp@- 47d92: 42a7 clrl %sp@- 47d94: 4eb9 0004 7b90 jsr 47b90 <_POSIX_Threads_Sporadic_budget_TSR>
break;
47d9a: 4fef 000c lea %sp@(12),%sp
}
_Thread_Enable_dispatch();
47d9e: 4eb9 0004 a26e jsr 4a26e <_Thread_Enable_dispatch>
return 0;
47da4: 6006 bras 47dac <pthread_setschedparam+0xf8>
/*
* Check all the parameters
*/
if ( !param )
return EINVAL;
47da6: 7616 moveq #22,%d3 47da8: 6002 bras 47dac <pthread_setschedparam+0xf8>
#endif
case OBJECTS_ERROR:
break;
}
return ESRCH;
47daa: 7603 moveq #3,%d3
}
47dac: 2003 movel %d3,%d0 47dae: 4cee 0c1c ffe0 moveml %fp@(-32),%d2-%d4/%a2-%a3
47db4: 4e5e unlk %fp <== NOT EXECUTED
00045c80 <pthread_testcancel>:
*
* 18.2.2 Setting Cancelability State, P1003.1c/Draft 10, p. 183
*/
void pthread_testcancel( void )
{
45c80: 4e56 0000 linkw %fp,#0 45c84: 2f02 movel %d2,%sp@-
* Don't even think about deleting a resource from an ISR.
* Besides this request is supposed to be for _Thread_Executing
* and the ISR context is not a thread.
*/
if ( _ISR_Is_in_progress() )
45c86: 4ab9 0005 ed04 tstl 5ed04 <_Per_CPU_Information+0x8>
45c8c: 6646 bnes 45cd4 <pthread_testcancel+0x54> <== NEVER TAKEN
return;
thread_support = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ];
45c8e: 2079 0005 ed08 moveal 5ed08 <_Per_CPU_Information+0xc>,%a0 45c94: 2039 0005 e878 movel 5e878 <_Thread_Dispatch_disable_level>,%d0 45c9a: 5280 addql #1,%d0 45c9c: 2068 010e moveal %a0@(270),%a0 45ca0: 23c0 0005 e878 movel %d0,5e878 <_Thread_Dispatch_disable_level>
_Thread_Disable_dispatch();
if ( thread_support->cancelability_state == PTHREAD_CANCEL_ENABLE &&
45ca6: 4aa8 00d4 tstl %a0@(212)
45caa: 660a bnes 45cb6 <pthread_testcancel+0x36> <== NEVER TAKEN
/* Setting Cancelability State, P1003.1c/Draft 10, p. 183 */
int _EXFUN(pthread_setcancelstate, (int __state, int *__oldstate));
int _EXFUN(pthread_setcanceltype, (int __type, int *__oldtype));
void _EXFUN(pthread_testcancel, (void));
45cac: 4aa8 00dc tstl %a0@(220) 45cb0: 56c2 sne %d2 45cb2: 4482 negl %d2 45cb4: 6002 bras 45cb8 <pthread_testcancel+0x38>
*/
void pthread_testcancel( void )
{
POSIX_API_Control *thread_support;
bool cancel = false;
45cb6: 4202 clrb %d2 <== NOT EXECUTED
_Thread_Disable_dispatch();
if ( thread_support->cancelability_state == PTHREAD_CANCEL_ENABLE &&
thread_support->cancelation_requested )
cancel = true;
_Thread_Enable_dispatch();
45cb8: 4eb9 0004 80f2 jsr 480f2 <_Thread_Enable_dispatch>
if ( cancel )
45cbe: 4a02 tstb %d2
45cc0: 6712 beqs 45cd4 <pthread_testcancel+0x54> <== ALWAYS TAKEN
_POSIX_Thread_Exit( _Thread_Executing, PTHREAD_CANCELED );
45cc2: 4878 ffff pea ffffffff <LESS> <== NOT EXECUTED 45cc6: 2f39 0005 ed08 movel 5ed08 <_Per_CPU_Information+0xc>,%sp@-<== NOT EXECUTED 45ccc: 4eb9 0004 b018 jsr 4b018 <_POSIX_Thread_Exit> <== NOT EXECUTED 45cd2: 508f addql #8,%sp <== NOT EXECUTED
}
45cd4: 242e fffc movel %fp@(-4),%d2
45cd8: 4e5e unlk %fp <== NOT EXECUTED
0004c920 <rtems_barrier_wait>:
rtems_status_code rtems_barrier_wait(
rtems_id id,
rtems_interval timeout
)
{
4c920: 4e56 fffc linkw %fp,#-4 4c924: 2f02 movel %d2,%sp@- 4c926: 486e fffc pea %fp@(-4) 4c92a: 242e 0008 movel %fp@(8),%d2 4c92e: 2f02 movel %d2,%sp@- 4c930: 4879 0005 f782 pea 5f782 <_Barrier_Information> 4c936: 4eb9 0004 81e8 jsr 481e8 <_Objects_Get>
Barrier_Control *the_barrier;
Objects_Locations location;
the_barrier = _Barrier_Get( id, &location );
switch ( location ) {
4c93c: 4fef 000c lea %sp@(12),%sp 4c940: 4aae fffc tstl %fp@(-4)
4c944: 6634 bnes 4c97a <rtems_barrier_wait+0x5a> <== NEVER TAKEN
case OBJECTS_LOCAL:
_CORE_barrier_Wait(
4c946: 42a7 clrl %sp@- 4c948: 2f2e 000c movel %fp@(12),%sp@- 4c94c: 2040 moveal %d0,%a0 4c94e: 4878 0001 pea 1 <ADD> 4c952: 2f02 movel %d2,%sp@- 4c954: 4868 0014 pea %a0@(20) 4c958: 4eb9 0004 cfb0 jsr 4cfb0 <_CORE_barrier_Wait>
id,
true,
timeout,
NULL
);
_Thread_Enable_dispatch();
4c95e: 4eb9 0004 89d6 jsr 489d6 <_Thread_Enable_dispatch>
return _Barrier_Translate_core_barrier_return_code(
_Thread_Executing->Wait.return_code );
4c964: 2079 0005 f3d4 moveal 5f3d4 <_Per_CPU_Information+0xc>,%a0
true,
timeout,
NULL
);
_Thread_Enable_dispatch();
return _Barrier_Translate_core_barrier_return_code(
4c96a: 2f28 0034 movel %a0@(52),%sp@- 4c96e: 4eb9 0004 dfec jsr 4dfec <_Barrier_Translate_core_barrier_return_code> 4c974: 4fef 0018 lea %sp@(24),%sp 4c978: 6002 bras 4c97c <rtems_barrier_wait+0x5c>
#endif
case OBJECTS_ERROR:
break;
}
return RTEMS_INVALID_ID;
4c97a: 7004 moveq #4,%d0
}
4c97c: 242e fff8 movel %fp@(-8),%d2
4c980: 4e5e unlk %fp <== NOT EXECUTED
00045d8e <rtems_initialize_start_multitasking>:
45d8e: 7002 moveq #2,%d0
}
void rtems_initialize_start_multitasking(void)
{
45d90: 4e56 0000 linkw %fp,#0
****** APPLICATION RUNS HERE ****** ****** RETURNS WHEN SYSTEM IS SHUT DOWN ****** ******************************************************************* ******************************************************************* *******************************************************************/ }
45d94: 4e5e unlk %fp 45d96: 23c0 0005 daba movel %d0,5daba <_System_state_Current>
void rtems_initialize_start_multitasking(void)
{
_System_state_Set( SYSTEM_STATE_BEGIN_MULTITASKING );
_Thread_Start_multitasking();
45d9c: 4ef9 0004 80b4 jmp 480b4 <_Thread_Start_multitasking>
...
0004c700 <rtems_io_close>:
rtems_status_code rtems_io_close(
rtems_device_major_number major,
rtems_device_minor_number minor,
void *argument
)
{
4c700: 4e56 0000 linkw %fp,#0 4c704: 202e 0008 movel %fp@(8),%d0 4c708: 2f03 movel %d3,%sp@- 4c70a: 2f02 movel %d2,%sp@-
rtems_device_driver_entry callout;
if ( major >= _IO_Number_of_drivers )
4c70c: b0b9 0005 e1c8 cmpl 5e1c8 <_IO_Number_of_drivers>,%d0
4c712: 6420 bccs 4c734 <rtems_io_close+0x34> <== NEVER TAKEN
return RTEMS_INVALID_NUMBER;
callout = _IO_Driver_address_table[major].close_entry;
4c714: 2600 movel %d0,%d3 4c716: 2200 movel %d0,%d1 4c718: e78b lsll #3,%d3 4c71a: eb89 lsll #5,%d1 4c71c: 2279 0005 e1cc moveal 5e1cc <_IO_Driver_address_table>,%a1 4c722: 9283 subl %d3,%d1 4c724: 2271 1808 moveal %a1@(00000008,%d1:l),%a1
return callout ? callout(major, minor, argument) : RTEMS_SUCCESSFUL;
4c728: 4a89 tstl %a1
4c72a: 670c beqs 4c738 <rtems_io_close+0x38> }
4c72c: 241f movel %sp@+,%d2 4c72e: 261f movel %sp@+,%d3 4c730: 4e5e unlk %fp
if ( major >= _IO_Number_of_drivers )
return RTEMS_INVALID_NUMBER;
callout = _IO_Driver_address_table[major].close_entry;
return callout ? callout(major, minor, argument) : RTEMS_SUCCESSFUL;
4c732: 4ed1 jmp %a1@
)
{
rtems_device_driver_entry callout;
if ( major >= _IO_Number_of_drivers )
return RTEMS_INVALID_NUMBER;
4c734: 700a moveq #10,%d0 4c736: 6002 bras 4c73a <rtems_io_close+0x3a>
callout = _IO_Driver_address_table[major].close_entry;
return callout ? callout(major, minor, argument) : RTEMS_SUCCESSFUL;
4c738: 4280 clrl %d0
}
4c73a: 241f movel %sp@+,%d2 4c73c: 261f movel %sp@+,%d3 4c73e: 4e5e unlk %fp
...
00047cd0 <rtems_iterate_over_all_threads>:
#include <rtems/system.h>
#include <rtems/score/thread.h>
void rtems_iterate_over_all_threads(rtems_per_thread_routine routine)
{
47cd0: 4e56 fff0 linkw %fp,#-16 47cd4: 48d7 1c04 moveml %d2/%a2-%a4,%sp@ 47cd8: 286e 0008 moveal %fp@(8),%a4
uint32_t i;
uint32_t api_index;
Thread_Control *the_thread;
Objects_Information *information;
if ( !routine )
47cdc: 4a8c tstl %a4
47cde: 673c beqs 47d1c <rtems_iterate_over_all_threads+0x4c><== NEVER TAKEN
47ce0: 45f9 0006 787c lea 6787c <_Objects_Information_table+0x4>,%a2
return;
for ( api_index = 1 ; api_index <= OBJECTS_APIS_LAST ; api_index++ ) {
if ( !_Objects_Information_table[ api_index ] )
47ce6: 205a moveal %a2@+,%a0 47ce8: 4a88 tstl %a0
47cea: 6728 beqs 47d14 <rtems_iterate_over_all_threads+0x44><== NEVER TAKEN
continue;
information = _Objects_Information_table[ api_index ][ 1 ];
47cec: 2668 0004 moveal %a0@(4),%a3
if ( !information )
47cf0: 4a8b tstl %a3
47cf2: 6720 beqs 47d14 <rtems_iterate_over_all_threads+0x44>
47cf4: 7401 moveq #1,%d2 47cf6: 6012 bras 47d0a <rtems_iterate_over_all_threads+0x3a>
continue;
for ( i=1 ; i <= information->maximum ; i++ ) {
the_thread = (Thread_Control *)information->local_table[ i ];
47cf8: 206b 0018 moveal %a3@(24),%a0 47cfc: 2030 2c00 movel %a0@(00000000,%d2:l:4),%d0
if ( !the_thread )
47d00: 6706 beqs 47d08 <rtems_iterate_over_all_threads+0x38><== NEVER TAKEN
continue;
(*routine)(the_thread);
47d02: 2f00 movel %d0,%sp@- 47d04: 4e94 jsr %a4@ 47d06: 588f addql #4,%sp
information = _Objects_Information_table[ api_index ][ 1 ];
if ( !information )
continue;
for ( i=1 ; i <= information->maximum ; i++ ) {
47d08: 5282 addql #1,%d2 47d0a: 4280 clrl %d0 47d0c: 302b 000e movew %a3@(14),%d0 47d10: b082 cmpl %d2,%d0
47d12: 64e4 bccs 47cf8 <rtems_iterate_over_all_threads+0x28>
Objects_Information *information;
if ( !routine )
return;
for ( api_index = 1 ; api_index <= OBJECTS_APIS_LAST ; api_index++ ) {
47d14: b5fc 0006 7888 cmpal #424072,%a2
47d1a: 66ca bnes 47ce6 <rtems_iterate_over_all_threads+0x16>
(*routine)(the_thread);
}
}
}
47d1c: 4cee 1c04 fff0 moveml %fp@(-16),%d2/%a2-%a4 47d22: 4e5e unlk %fp
...
0004ffb4 <rtems_partition_delete>:
*/
rtems_status_code rtems_partition_delete(
rtems_id id
)
{
4ffb4: 4e56 fffc linkw %fp,#-4 4ffb8: 2f0b movel %a3,%sp@- 4ffba: 2f0a movel %a2,%sp@-
Objects_Id id,
Objects_Locations *location
)
{
return (Partition_Control *)
_Objects_Get( &_Partition_Information, id, location );
4ffbc: 486e fffc pea %fp@(-4) 4ffc0: 2f2e 0008 movel %fp@(8),%sp@- 4ffc4: 4879 0007 63a2 pea 763a2 <_Partition_Information> 4ffca: 4eb9 0005 4608 jsr 54608 <_Objects_Get>
register Partition_Control *the_partition;
Objects_Locations location;
the_partition = _Partition_Get( id, &location );
switch ( location ) {
4ffd0: 4fef 000c lea %sp@(12),%sp 4ffd4: 2440 moveal %d0,%a2 4ffd6: 4aae fffc tstl %fp@(-4)
4ffda: 6638 bnes 50014 <rtems_partition_delete+0x60> <== NEVER TAKEN
4ffdc: 47f9 0005 4e6a lea 54e6a <_Thread_Enable_dispatch>,%a3
case OBJECTS_LOCAL:
if ( the_partition->number_of_used_blocks == 0 ) {
4ffe2: 4aaa 0020 tstl %a2@(32)
4ffe6: 6626 bnes 5000e <rtems_partition_delete+0x5a> <== NEVER TAKEN
_Objects_Close( &_Partition_Information, &the_partition->Object );
4ffe8: 2f00 movel %d0,%sp@- 4ffea: 4879 0007 63a2 pea 763a2 <_Partition_Information> 4fff0: 4eb9 0005 41fc jsr 541fc <_Objects_Close>
*/
RTEMS_INLINE_ROUTINE void _Partition_Free (
Partition_Control *the_partition
)
{
_Objects_Free( &_Partition_Information, &the_partition->Object );
4fff6: 2f0a movel %a2,%sp@- 4fff8: 4879 0007 63a2 pea 763a2 <_Partition_Information> 4fffe: 4eb9 0005 4474 jsr 54474 <_Objects_Free>
0 /* Not used */
);
}
#endif
_Thread_Enable_dispatch();
50004: 4e93 jsr %a3@
return RTEMS_SUCCESSFUL;
50006: 4fef 0010 lea %sp@(16),%sp 5000a: 4280 clrl %d0 5000c: 6008 bras 50016 <rtems_partition_delete+0x62>
}
_Thread_Enable_dispatch();
5000e: 4e93 jsr %a3@
return RTEMS_RESOURCE_IN_USE;
50010: 700c moveq #12,%d0 50012: 6002 bras 50016 <rtems_partition_delete+0x62>
case OBJECTS_ERROR:
break;
}
return RTEMS_INVALID_ID;
50014: 7004 moveq #4,%d0
}
50016: 246e fff4 moveal %fp@(-12),%a2 5001a: 266e fff8 moveal %fp@(-8),%a3 5001e: 4e5e unlk %fp
...
000500b8 <rtems_partition_return_buffer>:
rtems_status_code rtems_partition_return_buffer(
rtems_id id,
void *buffer
)
{
500b8: 4e56 fffc linkw %fp,#-4 500bc: 2f0a movel %a2,%sp@- 500be: 2f02 movel %d2,%sp@-
Objects_Id id,
Objects_Locations *location
)
{
return (Partition_Control *)
_Objects_Get( &_Partition_Information, id, location );
500c0: 486e fffc pea %fp@(-4) 500c4: 2f2e 0008 movel %fp@(8),%sp@- 500c8: 4879 0007 63a2 pea 763a2 <_Partition_Information> 500ce: 242e 000c movel %fp@(12),%d2 500d2: 4eb9 0005 4608 jsr 54608 <_Objects_Get>
register Partition_Control *the_partition;
Objects_Locations location;
the_partition = _Partition_Get( id, &location );
switch ( location ) {
500d8: 4fef 000c lea %sp@(12),%sp 500dc: 2440 moveal %d0,%a2 500de: 4aae fffc tstl %fp@(-4)
500e2: 663e bnes 50122 <rtems_partition_return_buffer+0x6a>
)
{
void *starting;
void *ending;
starting = the_partition->starting_address;
500e4: 202a 0010 movel %a2@(16),%d0
ending = _Addresses_Add_offset( starting, the_partition->length );
500e8: 222a 0014 movel %a2@(20),%d1
const void *address,
const void *base,
const void *limit
)
{
return (address >= base && address <= limit);
500ec: b082 cmpl %d2,%d0
500ee: 6240 bhis 50130 <rtems_partition_return_buffer+0x78>
RTEMS_INLINE_ROUTINE void *_Addresses_Add_offset (
const void *base,
uintptr_t offset
)
{
return (void *)((uintptr_t)base + offset);
500f0: d280 addl %d0,%d1
const void *address,
const void *base,
const void *limit
)
{
return (address >= base && address <= limit);
500f2: b282 cmpl %d2,%d1
500f4: 653a bcss 50130 <rtems_partition_return_buffer+0x78><== NEVER TAKEN
RTEMS_INLINE_ROUTINE int32_t _Addresses_Subtract (
const void *left,
const void *right
)
{
return (int32_t) ((const char *) left - (const char *) right);
500f6: 2202 movel %d2,%d1 500f8: 9280 subl %d0,%d1 500fa: 2001 movel %d1,%d0
offset = (uint32_t) _Addresses_Subtract(
the_buffer,
the_partition->starting_address
);
return ((offset % the_partition->buffer_size) == 0);
500fc: 4c6a 0001 0018 remul %a2@(24),%d1,%d0
starting = the_partition->starting_address;
ending = _Addresses_Add_offset( starting, the_partition->length );
return (
_Addresses_Is_in_range( the_buffer, starting, ending ) &&
50102: 4a81 tstl %d1
50104: 662a bnes 50130 <rtems_partition_return_buffer+0x78>
RTEMS_INLINE_ROUTINE void _Partition_Free_buffer (
Partition_Control *the_partition,
Chain_Node *the_buffer
)
{
_Chain_Append( &the_partition->Memory, the_buffer );
50106: 2f02 movel %d2,%sp@- 50108: 486a 0024 pea %a2@(36) 5010c: 4eb9 0005 2c64 jsr 52c64 <_Chain_Append>
case OBJECTS_LOCAL:
if ( _Partition_Is_buffer_valid( buffer, the_partition ) ) {
_Partition_Free_buffer( the_partition, buffer );
the_partition->number_of_used_blocks -= 1;
50112: 53aa 0020 subql #1,%a2@(32)
_Thread_Enable_dispatch();
50116: 4eb9 0005 4e6a jsr 54e6a <_Thread_Enable_dispatch>
return RTEMS_SUCCESSFUL;
5011c: 508f addql #8,%sp 5011e: 4280 clrl %d0 50120: 6002 bras 50124 <rtems_partition_return_buffer+0x6c>
case OBJECTS_ERROR:
break;
}
return RTEMS_INVALID_ID;
50122: 7004 moveq #4,%d0
}
50124: 242e fff4 movel %fp@(-12),%d2 50128: 246e fff8 moveal %fp@(-8),%a2 5012c: 4e5e unlk %fp 5012e: 4e75 rts
_Partition_Free_buffer( the_partition, buffer );
the_partition->number_of_used_blocks -= 1;
_Thread_Enable_dispatch();
return RTEMS_SUCCESSFUL;
}
_Thread_Enable_dispatch();
50130: 4eb9 0005 4e6a jsr 54e6a <_Thread_Enable_dispatch>
return RTEMS_INVALID_ADDRESS;
50136: 7009 moveq #9,%d0 50138: 60ea bras 50124 <rtems_partition_return_buffer+0x6c>
...
0004beb8 <rtems_rate_monotonic_get_status>:
rtems_status_code rtems_rate_monotonic_get_status(
rtems_id id,
rtems_rate_monotonic_period_status *status
)
{
4beb8: 4e56 ffec linkw %fp,#-20 4bebc: 2f0a movel %a2,%sp@- 4bebe: 246e 000c moveal %fp@(12),%a2
Objects_Locations location;
Rate_monotonic_Period_time_t since_last_period;
Rate_monotonic_Control *the_period;
bool valid_status;
if ( !status )
4bec2: 4a8a tstl %a2 4bec4: 6700 0092 beqw 4bf58 <rtems_rate_monotonic_get_status+0xa0> 4bec8: 486e fffc pea %fp@(-4) 4becc: 2f2e 0008 movel %fp@(8),%sp@- 4bed0: 4879 0005 f4dc pea 5f4dc <_Rate_monotonic_Information> 4bed6: 4eb9 0004 8474 jsr 48474 <_Objects_Get>
return RTEMS_INVALID_ADDRESS;
the_period = _Rate_monotonic_Get( id, &location );
switch ( location ) {
4bedc: 4fef 000c lea %sp@(12),%sp 4bee0: 2040 moveal %d0,%a0 4bee2: 4aae fffc tstl %fp@(-4)
4bee6: 6674 bnes 4bf5c <rtems_rate_monotonic_get_status+0xa4><== NEVER TAKEN
case OBJECTS_LOCAL:
status->owner = the_period->owner->Object.id;
4bee8: 2268 0040 moveal %a0@(64),%a1 4beec: 24a9 0008 movel %a1@(8),%a2@
status->state = the_period->state;
4bef0: 2028 0038 movel %a0@(56),%d0 4bef4: 2540 0004 movel %d0,%a2@(4)
/*
* If the period is inactive, there is no information.
*/
if ( status->state == RATE_MONOTONIC_INACTIVE ) {
4bef8: 6612 bnes 4bf0c <rtems_rate_monotonic_get_status+0x54>
#ifndef __RTEMS_USE_TICKS_FOR_STATISTICS__
_Timespec_Set_to_zero( &status->since_last_period );
4befa: 42aa 0008 clrl %a2@(8) 4befe: 42aa 000c clrl %a2@(12)
_Timespec_Set_to_zero( &status->executed_since_last_period );
4bf02: 42aa 0010 clrl %a2@(16) 4bf06: 42aa 0014 clrl %a2@(20) 4bf0a: 6042 bras 4bf4e <rtems_rate_monotonic_get_status+0x96>
} else {
/*
* Grab the current status.
*/
valid_status =
4bf0c: 486e fff4 pea %fp@(-12) 4bf10: 486e ffec pea %fp@(-20) 4bf14: 2f08 movel %a0,%sp@- 4bf16: 4eb9 0004 6298 jsr 46298 <_Rate_monotonic_Get_status>
_Rate_monotonic_Get_status(
the_period, &since_last_period, &executed
);
if (!valid_status) {
4bf1c: 4fef 000c lea %sp@(12),%sp 4bf20: 4a00 tstb %d0
4bf22: 660a bnes 4bf2e <rtems_rate_monotonic_get_status+0x76>
_Thread_Enable_dispatch();
4bf24: 4eb9 0004 8cd6 jsr 48cd6 <_Thread_Enable_dispatch>
return RTEMS_NOT_DEFINED;
4bf2a: 700b moveq #11,%d0 4bf2c: 6030 bras 4bf5e <rtems_rate_monotonic_get_status+0xa6>
}
#ifndef __RTEMS_USE_TICKS_FOR_STATISTICS__
_Timestamp_To_timespec(
4bf2e: 202e ffec movel %fp@(-20),%d0 4bf32: 222e fff0 movel %fp@(-16),%d1 4bf36: 2540 0008 movel %d0,%a2@(8) 4bf3a: 2541 000c movel %d1,%a2@(12)
&since_last_period, &status->since_last_period
);
_Timestamp_To_timespec(
4bf3e: 202e fff4 movel %fp@(-12),%d0 4bf42: 222e fff8 movel %fp@(-8),%d1 4bf46: 2540 0010 movel %d0,%a2@(16) 4bf4a: 2541 0014 movel %d1,%a2@(20)
status->since_last_period = since_last_period;
status->executed_since_last_period = executed;
#endif
}
_Thread_Enable_dispatch();
4bf4e: 4eb9 0004 8cd6 jsr 48cd6 <_Thread_Enable_dispatch>
return RTEMS_SUCCESSFUL;
4bf54: 4280 clrl %d0 4bf56: 6006 bras 4bf5e <rtems_rate_monotonic_get_status+0xa6>
Rate_monotonic_Period_time_t since_last_period;
Rate_monotonic_Control *the_period;
bool valid_status;
if ( !status )
return RTEMS_INVALID_ADDRESS;
4bf58: 7009 moveq #9,%d0 4bf5a: 6002 bras 4bf5e <rtems_rate_monotonic_get_status+0xa6>
#endif
case OBJECTS_ERROR:
break;
}
return RTEMS_INVALID_ID;
4bf5c: 7004 moveq #4,%d0
}
4bf5e: 246e ffe8 moveal %fp@(-24),%a2 4bf62: 4e5e unlk %fp
...
000464a2 <rtems_rate_monotonic_period>:
rtems_status_code rtems_rate_monotonic_period(
rtems_id id,
rtems_interval length
)
{
464a2: 4e56 ffec linkw %fp,#-20 464a6: 48d7 041c moveml %d2-%d4/%a2,%sp@
Objects_Id id,
Objects_Locations *location
)
{
return (Rate_monotonic_Control *)
_Objects_Get( &_Rate_monotonic_Information, id, location );
464aa: 486e fffc pea %fp@(-4) 464ae: 262e 0008 movel %fp@(8),%d3 464b2: 2f03 movel %d3,%sp@- 464b4: 4879 0005 f4dc pea 5f4dc <_Rate_monotonic_Information> 464ba: 242e 000c movel %fp@(12),%d2 464be: 4eb9 0004 8474 jsr 48474 <_Objects_Get>
rtems_rate_monotonic_period_states local_state;
ISR_Level level;
the_period = _Rate_monotonic_Get( id, &location );
switch ( location ) {
464c4: 4fef 000c lea %sp@(12),%sp 464c8: 2440 moveal %d0,%a2 464ca: 4aae fffc tstl %fp@(-4) 464ce: 6600 0150 bnew 46620 <rtems_rate_monotonic_period+0x17e>
case OBJECTS_LOCAL:
if ( !_Thread_Is_executing( the_period->owner ) ) {
464d2: 2039 0005 fa68 movel 5fa68 <_Per_CPU_Information+0xc>,%d0 464d8: b0aa 0040 cmpl %a2@(64),%d0
464dc: 670c beqs 464ea <rtems_rate_monotonic_period+0x48>
_Thread_Enable_dispatch();
464de: 4eb9 0004 8cd6 jsr 48cd6 <_Thread_Enable_dispatch>
return RTEMS_NOT_OWNER_OF_RESOURCE;
464e4: 7417 moveq #23,%d2 464e6: 6000 013a braw 46622 <rtems_rate_monotonic_period+0x180>
}
if ( length == RTEMS_PERIOD_STATUS ) {
464ea: 4a82 tstl %d2
464ec: 6622 bnes 46510 <rtems_rate_monotonic_period+0x6e>
switch ( the_period->state ) {
464ee: 202a 0038 movel %a2@(56),%d0 464f2: 7204 moveq #4,%d1 464f4: b280 cmpl %d0,%d1
464f6: 650c bcss 46504 <rtems_rate_monotonic_period+0x62><== NEVER TAKEN
464f8: 41f9 0005 cc6a lea 5cc6a <CSWTCH.2>,%a0 464fe: 2430 0c00 movel %a0@(00000000,%d0:l:4),%d2 46502: 6002 bras 46506 <rtems_rate_monotonic_period+0x64>
46504: 4282 clrl %d2 <== NOT EXECUTED
case RATE_MONOTONIC_ACTIVE:
default: /* unreached -- only to remove warnings */
return_value = RTEMS_SUCCESSFUL;
break;
}
_Thread_Enable_dispatch();
46506: 4eb9 0004 8cd6 jsr 48cd6 <_Thread_Enable_dispatch>
return( return_value );
4650c: 6000 0114 braw 46622 <rtems_rate_monotonic_period+0x180>
}
_ISR_Disable( level );
46510: 203c 0000 0700 movel #1792,%d0 46516: 40c4 movew %sr,%d4 46518: 8084 orl %d4,%d0 4651a: 46c0 movew %d0,%sr
switch ( the_period->state ) {
4651c: 202a 0038 movel %a2@(56),%d0 46520: 7202 moveq #2,%d1 46522: b280 cmpl %d0,%d1
46524: 675a beqs 46580 <rtems_rate_monotonic_period+0xde>
46526: 123c 0004 moveb #4,%d1 4652a: b280 cmpl %d0,%d1 4652c: 6700 00bc beqw 465ea <rtems_rate_monotonic_period+0x148> 46530: 4a80 tstl %d0 46532: 6600 00ec bnew 46620 <rtems_rate_monotonic_period+0x17e>
case RATE_MONOTONIC_INACTIVE: {
_ISR_Enable( level );
46536: 46c4 movew %d4,%sr
/*
* Baseline statistics information for the beginning of a period.
*/
_Rate_monotonic_Initiate_statistics( the_period );
46538: 2f0a movel %a2,%sp@- 4653a: 4eb9 0004 6336 jsr 46336 <_Rate_monotonic_Initiate_statistics>
the_period->state = RATE_MONOTONIC_ACTIVE;
46540: 7002 moveq #2,%d0
Objects_Id id,
void *user_data
)
{
the_watchdog->state = WATCHDOG_INACTIVE;
the_watchdog->routine = routine;
46542: 223c 0004 686c movel #288876,%d1 46548: 2540 0038 movel %d0,%a2@(56) 4654c: 2541 002c movel %d1,%a2@(44)
Watchdog_Service_routine_entry routine,
Objects_Id id,
void *user_data
)
{
the_watchdog->state = WATCHDOG_INACTIVE;
46550: 42aa 0018 clrl %a2@(24)
the_watchdog->routine = routine; the_watchdog->id = id;
46554: 2543 0030 movel %d3,%a2@(48)
the_watchdog->user_data = user_data;
46558: 42aa 0034 clrl %a2@(52)
_Rate_monotonic_Timeout,
id,
NULL
);
the_period->next_length = length;
4655c: 2542 003c movel %d2,%a2@(60)
Watchdog_Control *the_watchdog,
Watchdog_Interval units
)
{
the_watchdog->initial = units;
46560: 2542 001c movel %d2,%a2@(28)
_Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog );
46564: 486a 0010 pea %a2@(16) 46568: 4879 0005 f69a pea 5f69a <_Watchdog_Ticks_chain> 4656e: 4eb9 0004 9d44 jsr 49d44 <_Watchdog_Insert>
_Watchdog_Insert_ticks( &the_period->Timer, length );
_Thread_Enable_dispatch();
46574: 4eb9 0004 8cd6 jsr 48cd6 <_Thread_Enable_dispatch>
return RTEMS_SUCCESSFUL;
4657a: 4fef 000c lea %sp@(12),%sp 4657e: 6066 bras 465e6 <rtems_rate_monotonic_period+0x144>
case RATE_MONOTONIC_ACTIVE:
/*
* Update statistics from the concluding period.
*/
_Rate_monotonic_Update_statistics( the_period );
46580: 2f0a movel %a2,%sp@- 46582: 4eb9 0004 63ae jsr 463ae <_Rate_monotonic_Update_statistics>
/*
* This tells the _Rate_monotonic_Timeout that this task is
* in the process of blocking on the period and that we
* may be changing the length of the next period.
*/
the_period->state = RATE_MONOTONIC_OWNER_IS_BLOCKING;
46588: 7001 moveq #1,%d0
the_period->next_length = length;
4658a: 2542 003c movel %d2,%a2@(60)
/*
* This tells the _Rate_monotonic_Timeout that this task is
* in the process of blocking on the period and that we
* may be changing the length of the next period.
*/
the_period->state = RATE_MONOTONIC_OWNER_IS_BLOCKING;
4658e: 2540 0038 movel %d0,%a2@(56)
the_period->next_length = length;
_ISR_Enable( level );
46592: 46c4 movew %d4,%sr
_Thread_Executing->Wait.id = the_period->Object.id;
46594: 2079 0005 fa68 moveal 5fa68 <_Per_CPU_Information+0xc>,%a0 4659a: 216a 0008 0020 movel %a2@(8),%a0@(32)
_Thread_Set_state( _Thread_Executing, STATES_WAITING_FOR_PERIOD );
465a0: 4878 4000 pea 4000 <D_MAX_EXP+0x3801> 465a4: 2f08 movel %a0,%sp@- 465a6: 4eb9 0004 9514 jsr 49514 <_Thread_Set_state>
/*
* Did the watchdog timer expire while we were actually blocking
* on it?
*/
_ISR_Disable( level );
465ac: 203c 0000 0700 movel #1792,%d0 465b2: 40c1 movew %sr,%d1 465b4: 8081 orl %d1,%d0 465b6: 46c0 movew %d0,%sr
local_state = the_period->state;
the_period->state = RATE_MONOTONIC_ACTIVE;
465b8: 7402 moveq #2,%d2
/*
* Did the watchdog timer expire while we were actually blocking
* on it?
*/
_ISR_Disable( level );
local_state = the_period->state;
465ba: 202a 0038 movel %a2@(56),%d0
the_period->state = RATE_MONOTONIC_ACTIVE;
465be: 2542 0038 movel %d2,%a2@(56)
_ISR_Enable( level );
465c2: 46c1 movew %d1,%sr
/*
* If it did, then we want to unblock ourself and continue as
* if nothing happen. The period was reset in the timeout routine.
*/
if ( local_state == RATE_MONOTONIC_EXPIRED_WHILE_BLOCKING )
465c4: 7203 moveq #3,%d1 465c6: 4fef 000c lea %sp@(12),%sp 465ca: b280 cmpl %d0,%d1
465cc: 6612 bnes 465e0 <rtems_rate_monotonic_period+0x13e>
_Thread_Clear_state( _Thread_Executing, STATES_WAITING_FOR_PERIOD );
465ce: 4878 4000 pea 4000 <D_MAX_EXP+0x3801> 465d2: 2f39 0005 fa68 movel 5fa68 <_Per_CPU_Information+0xc>,%sp@- 465d8: 4eb9 0004 8930 jsr 48930 <_Thread_Clear_state> 465de: 508f addql #8,%sp
_Thread_Enable_dispatch();
465e0: 4eb9 0004 8cd6 jsr 48cd6 <_Thread_Enable_dispatch>
return RTEMS_SUCCESSFUL;
465e6: 4282 clrl %d2 465e8: 6038 bras 46622 <rtems_rate_monotonic_period+0x180>
case RATE_MONOTONIC_EXPIRED:
/*
* Update statistics from the concluding period
*/
_Rate_monotonic_Update_statistics( the_period );
465ea: 2f0a movel %a2,%sp@- 465ec: 4eb9 0004 63ae jsr 463ae <_Rate_monotonic_Update_statistics>
_ISR_Enable( level );
465f2: 46c4 movew %d4,%sr
the_period->state = RATE_MONOTONIC_ACTIVE;
465f4: 7002 moveq #2,%d0
the_period->next_length = length;
465f6: 2542 003c movel %d2,%a2@(60)
*/
_Rate_monotonic_Update_statistics( the_period );
_ISR_Enable( level );
the_period->state = RATE_MONOTONIC_ACTIVE;
465fa: 2540 0038 movel %d0,%a2@(56)
Watchdog_Control *the_watchdog,
Watchdog_Interval units
)
{
the_watchdog->initial = units;
465fe: 2542 001c movel %d2,%a2@(28)
_Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog );
46602: 486a 0010 pea %a2@(16)
the_period->next_length = length;
_Watchdog_Insert_ticks( &the_period->Timer, length );
_Thread_Enable_dispatch();
return RTEMS_TIMEOUT;
46606: 7406 moveq #6,%d2 46608: 4879 0005 f69a pea 5f69a <_Watchdog_Ticks_chain> 4660e: 4eb9 0004 9d44 jsr 49d44 <_Watchdog_Insert>
the_period->state = RATE_MONOTONIC_ACTIVE;
the_period->next_length = length;
_Watchdog_Insert_ticks( &the_period->Timer, length );
_Thread_Enable_dispatch();
46614: 4eb9 0004 8cd6 jsr 48cd6 <_Thread_Enable_dispatch>
return RTEMS_TIMEOUT;
4661a: 4fef 000c lea %sp@(12),%sp 4661e: 6002 bras 46622 <rtems_rate_monotonic_period+0x180>
#endif
case OBJECTS_ERROR:
break;
}
return RTEMS_INVALID_ID;
46620: 7404 moveq #4,%d2
}
46622: 2002 movel %d2,%d0 46624: 4cee 041c ffec moveml %fp@(-20),%d2-%d4/%a2 4662a: 4e5e unlk %fp
...
00050cb0 <rtems_region_get_segment_size>:
rtems_status_code rtems_region_get_segment_size(
rtems_id id,
void *segment,
uintptr_t *size
)
{
50cb0: 4e56 fffc linkw %fp,#-4 50cb4: 2f03 movel %d3,%sp@- 50cb6: 262e 0010 movel %fp@(16),%d3 50cba: 2f02 movel %d2,%sp@- 50cbc: 242e 000c movel %fp@(12),%d2
Objects_Locations location;
rtems_status_code return_status = RTEMS_SUCCESSFUL;
register Region_Control *the_region;
if ( !segment )
50cc0: 6768 beqs 50d2a <rtems_region_get_segment_size+0x7a>
return RTEMS_INVALID_ADDRESS;
if ( !size )
50cc2: 4a83 tstl %d3
50cc4: 6764 beqs 50d2a <rtems_region_get_segment_size+0x7a>
return RTEMS_INVALID_ADDRESS;
_RTEMS_Lock_allocator();
50cc6: 2f39 0007 65b2 movel 765b2 <_RTEMS_Allocator_Mutex>,%sp@- 50ccc: 4eb9 0005 2bd0 jsr 52bd0 <_API_Mutex_Lock> 50cd2: 486e fffc pea %fp@(-4) 50cd6: 2f2e 0008 movel %fp@(8),%sp@- 50cda: 4879 0007 6416 pea 76416 <_Region_Information> 50ce0: 4eb9 0005 45d0 jsr 545d0 <_Objects_Get_no_protection>
the_region = _Region_Get( id, &location );
switch ( location ) {
50ce6: 222e fffc movel %fp@(-4),%d1 50cea: 4fef 0010 lea %sp@(16),%sp
50cee: 6708 beqs 50cf8 <rtems_region_get_segment_size+0x48><== NEVER TAKEN
50cf0: 7001 moveq #1,%d0 50cf2: b081 cmpl %d1,%d0
50cf4: 661a bnes 50d10 <rtems_region_get_segment_size+0x60><== NEVER TAKEN
50cf6: 601c bras 50d14 <rtems_region_get_segment_size+0x64>
case OBJECTS_LOCAL:
if ( !_Heap_Size_of_alloc_area( &the_region->Memory, segment, size ) )
50cf8: 2f03 movel %d3,%sp@- 50cfa: 2040 moveal %d0,%a0 50cfc: 2f02 movel %d2,%sp@- 50cfe: 4868 0068 pea %a0@(104) 50d02: 4eb9 0005 404c jsr 5404c <_Heap_Size_of_alloc_area> 50d08: 4fef 000c lea %sp@(12),%sp 50d0c: 4a00 tstb %d0
50d0e: 6708 beqs 50d18 <rtems_region_get_segment_size+0x68><== NEVER TAKEN
void *segment,
uintptr_t *size
)
{
Objects_Locations location;
rtems_status_code return_status = RTEMS_SUCCESSFUL;
50d10: 4282 clrl %d2 50d12: 6006 bras 50d1a <rtems_region_get_segment_size+0x6a>
case OBJECTS_REMOTE: /* this error cannot be returned */
break;
#endif
case OBJECTS_ERROR:
return_status = RTEMS_INVALID_ID;
50d14: 7404 moveq #4,%d2 50d16: 6002 bras 50d1a <rtems_region_get_segment_size+0x6a>
the_region = _Region_Get( id, &location );
switch ( location ) {
case OBJECTS_LOCAL:
if ( !_Heap_Size_of_alloc_area( &the_region->Memory, segment, size ) )
return_status = RTEMS_INVALID_ADDRESS;
50d18: 7409 moveq #9,%d2 <== NOT EXECUTED
case OBJECTS_ERROR:
return_status = RTEMS_INVALID_ID;
break;
}
_RTEMS_Unlock_allocator();
50d1a: 2f39 0007 65b2 movel 765b2 <_RTEMS_Allocator_Mutex>,%sp@- 50d20: 4eb9 0005 2c30 jsr 52c30 <_API_Mutex_Unlock>
return return_status;
50d26: 588f addql #4,%sp 50d28: 6002 bras 50d2c <rtems_region_get_segment_size+0x7c>
if ( !segment )
return RTEMS_INVALID_ADDRESS;
if ( !size )
return RTEMS_INVALID_ADDRESS;
50d2a: 7409 moveq #9,%d2
break;
}
_RTEMS_Unlock_allocator();
return return_status;
}
50d2c: 2002 movel %d2,%d0 50d2e: 242e fff4 movel %fp@(-12),%d2 50d32: 262e fff8 movel %fp@(-8),%d3 50d36: 4e5e unlk %fp
...
00051310 <rtems_signal_send>:
rtems_status_code rtems_signal_send(
rtems_id id,
rtems_signal_set signal_set
)
{
51310: 4e56 fffc linkw %fp,#-4 51314: 2f03 movel %d3,%sp@- 51316: 2f02 movel %d2,%sp@- 51318: 242e 000c movel %fp@(12),%d2
register Thread_Control *the_thread;
Objects_Locations location;
RTEMS_API_Control *api;
ASR_Information *asr;
if ( !signal_set )
5131c: 677a beqs 51398 <rtems_signal_send+0x88>
return RTEMS_INVALID_NUMBER;
the_thread = _Thread_Get( id, &location );
5131e: 486e fffc pea %fp@(-4) 51322: 2f2e 0008 movel %fp@(8),%sp@- 51326: 4eb9 0005 4e90 jsr 54e90 <_Thread_Get>
switch ( location ) {
5132c: 508f addql #8,%sp 5132e: 4aae fffc tstl %fp@(-4)
51332: 6668 bnes 5139c <rtems_signal_send+0x8c>
case OBJECTS_LOCAL:
api = the_thread->API_Extensions[ THREAD_API_RTEMS ];
51334: 2240 moveal %d0,%a1 51336: 2069 010a moveal %a1@(266),%a0
asr = &api->Signal;
if ( ! _ASR_Is_null_handler( asr->handler ) ) {
5133a: 4aa8 000a tstl %a0@(10)
5133e: 674e beqs 5138e <rtems_signal_send+0x7e>
if ( asr->is_enabled ) {
51340: 4a28 0008 tstb %a0@(8)
51344: 672c beqs 51372 <rtems_signal_send+0x62>
rtems_signal_set *signal_set
)
{
ISR_Level _level;
_ISR_Disable( _level );
51346: 223c 0000 0700 movel #1792,%d1 5134c: 40c3 movew %sr,%d3 5134e: 8283 orl %d3,%d1 51350: 46c1 movew %d1,%sr
*signal_set |= signals;
51352: 85a8 0012 orl %d2,%a0@(18)
_ISR_Enable( _level );
51356: 46c3 movew %d3,%sr
_ASR_Post_signals( signal_set, &asr->signals_posted );
if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) )
51358: 4ab9 0007 69a4 tstl 769a4 <_Per_CPU_Information+0x8>
5135e: 6724 beqs 51384 <rtems_signal_send+0x74>
51360: b0b9 0007 69a8 cmpl 769a8 <_Per_CPU_Information+0xc>,%d0
51366: 661c bnes 51384 <rtems_signal_send+0x74> <== NEVER TAKEN
_Context_Switch_necessary = true;
51368: 7001 moveq #1,%d0 5136a: 13c0 0007 69b4 moveb %d0,769b4 <_Per_CPU_Information+0x18> 51370: 6012 bras 51384 <rtems_signal_send+0x74>
rtems_signal_set *signal_set
)
{
ISR_Level _level;
_ISR_Disable( _level );
51372: 203c 0000 0700 movel #1792,%d0 51378: 40c1 movew %sr,%d1 5137a: 8081 orl %d1,%d0 5137c: 46c0 movew %d0,%sr
*signal_set |= signals;
5137e: 85a8 0016 orl %d2,%a0@(22)
_ISR_Enable( _level );
51382: 46c1 movew %d1,%sr
} else {
_ASR_Post_signals( signal_set, &asr->signals_pending );
}
_Thread_Enable_dispatch();
51384: 4eb9 0005 4e6a jsr 54e6a <_Thread_Enable_dispatch>
return RTEMS_SUCCESSFUL;
5138a: 4280 clrl %d0 5138c: 6010 bras 5139e <rtems_signal_send+0x8e>
}
_Thread_Enable_dispatch();
5138e: 4eb9 0005 4e6a jsr 54e6a <_Thread_Enable_dispatch>
return RTEMS_NOT_DEFINED;
51394: 700b moveq #11,%d0 51396: 6006 bras 5139e <rtems_signal_send+0x8e>
Objects_Locations location;
RTEMS_API_Control *api;
ASR_Information *asr;
if ( !signal_set )
return RTEMS_INVALID_NUMBER;
51398: 700a moveq #10,%d0 5139a: 6002 bras 5139e <rtems_signal_send+0x8e>
case OBJECTS_ERROR:
break;
}
return RTEMS_INVALID_ID;
5139c: 7004 moveq #4,%d0
}
5139e: 242e fff4 movel %fp@(-12),%d2 513a2: 262e fff8 movel %fp@(-8),%d3 513a6: 4e5e unlk %fp
...
00047244 <rtems_task_get_note>:
rtems_status_code rtems_task_get_note(
rtems_id id,
uint32_t notepad,
uint32_t *note
)
{
47244: 4e56 fffc linkw %fp,#-4 47248: 202e 0008 movel %fp@(8),%d0 4724c: 2f0a movel %a2,%sp@- 4724e: 246e 0010 moveal %fp@(16),%a2 47252: 2f02 movel %d2,%sp@- 47254: 242e 000c movel %fp@(12),%d2
register Thread_Control *the_thread;
Objects_Locations location;
RTEMS_API_Control *api;
if ( !rtems_configuration_get_notepads_enabled() )
47258: 4a39 0005 e904 tstb 5e904 <Configuration_RTEMS_API+0x4>
4725e: 6752 beqs 472b2 <rtems_task_get_note+0x6e> <== NEVER TAKEN
return RTEMS_NOT_CONFIGURED;
if ( !note )
47260: 4a8a tstl %a2
47262: 6752 beqs 472b6 <rtems_task_get_note+0x72>
/*
* NOTE: There is no check for < RTEMS_NOTEPAD_FIRST because that would
* be checking an unsigned number for being negative.
*/
if ( notepad > RTEMS_NOTEPAD_LAST )
47264: 720f moveq #15,%d1 47266: b282 cmpl %d2,%d1
47268: 6550 bcss 472ba <rtems_task_get_note+0x76>
/*
* Optimize the most likely case to avoid the Thread_Dispatch.
*/
if ( _Objects_Are_ids_equal( id, OBJECTS_ID_OF_SELF ) ||
4726a: 4a80 tstl %d0
4726c: 670c beqs 4727a <rtems_task_get_note+0x36>
_Objects_Are_ids_equal( id, _Thread_Executing->Object.id ) ) {
4726e: 2079 0006 0826 moveal 60826 <_Per_CPU_Information+0xc>,%a0
/*
* Optimize the most likely case to avoid the Thread_Dispatch.
*/
if ( _Objects_Are_ids_equal( id, OBJECTS_ID_OF_SELF ) ||
47274: b0a8 0008 cmpl %a0@(8),%d0
47278: 6610 bnes 4728a <rtems_task_get_note+0x46>
_Objects_Are_ids_equal( id, _Thread_Executing->Object.id ) ) {
api = _Thread_Executing->API_Extensions[ THREAD_API_RTEMS ];
4727a: 2079 0006 0826 moveal 60826 <_Per_CPU_Information+0xc>,%a0
*note = api->Notepads[ notepad ];
47280: 2068 010a moveal %a0@(266),%a0 47284: 24b0 2c1e movel %a0@(0000001e,%d2:l:4),%a2@ 47288: 6024 bras 472ae <rtems_task_get_note+0x6a>
return RTEMS_SUCCESSFUL;
}
the_thread = _Thread_Get( id, &location );
4728a: 486e fffc pea %fp@(-4) 4728e: 2f00 movel %d0,%sp@- 47290: 4eb9 0004 90ec jsr 490ec <_Thread_Get>
switch ( location ) {
47296: 508f addql #8,%sp 47298: 4aae fffc tstl %fp@(-4)
4729c: 6620 bnes 472be <rtems_task_get_note+0x7a>
case OBJECTS_LOCAL:
api = the_thread->API_Extensions[ THREAD_API_RTEMS ];
*note = api->Notepads[ notepad ];
4729e: 2240 moveal %d0,%a1 472a0: 2069 010a moveal %a1@(266),%a0 472a4: 24b0 2c1e movel %a0@(0000001e,%d2:l:4),%a2@
_Thread_Enable_dispatch();
472a8: 4eb9 0004 90c6 jsr 490c6 <_Thread_Enable_dispatch>
return RTEMS_SUCCESSFUL;
472ae: 4280 clrl %d0 472b0: 600e bras 472c0 <rtems_task_get_note+0x7c>
register Thread_Control *the_thread;
Objects_Locations location;
RTEMS_API_Control *api;
if ( !rtems_configuration_get_notepads_enabled() )
return RTEMS_NOT_CONFIGURED;
472b2: 7016 moveq #22,%d0 472b4: 600a bras 472c0 <rtems_task_get_note+0x7c>
if ( !note )
return RTEMS_INVALID_ADDRESS;
472b6: 7009 moveq #9,%d0 472b8: 6006 bras 472c0 <rtems_task_get_note+0x7c>
* NOTE: There is no check for < RTEMS_NOTEPAD_FIRST because that would
* be checking an unsigned number for being negative.
*/
if ( notepad > RTEMS_NOTEPAD_LAST )
return RTEMS_INVALID_NUMBER;
472ba: 700a moveq #10,%d0 472bc: 6002 bras 472c0 <rtems_task_get_note+0x7c>
case OBJECTS_ERROR:
break;
}
return RTEMS_INVALID_ID;
472be: 7004 moveq #4,%d0
}
472c0: 242e fff4 movel %fp@(-12),%d2 472c4: 246e fff8 moveal %fp@(-8),%a2
472c8: 4e5e unlk %fp <== NOT EXECUTED
0004c5cc <rtems_task_mode>:
rtems_status_code rtems_task_mode(
rtems_mode mode_set,
rtems_mode mask,
rtems_mode *previous_mode_set
)
{
4c5cc: 4e56 ffe4 linkw %fp,#-28 4c5d0: 48d7 1c3c moveml %d2-%d5/%a2-%a4,%sp@ 4c5d4: 262e 0008 movel %fp@(8),%d3 4c5d8: 282e 000c movel %fp@(12),%d4 4c5dc: 286e 0010 moveal %fp@(16),%a4
ASR_Information *asr;
bool is_asr_enabled = false;
bool needs_asr_dispatching = false;
rtems_mode old_mode;
if ( !previous_mode_set )
4c5e0: 4a8c tstl %a4 4c5e2: 6700 010c beqw 4c6f0 <rtems_task_mode+0x124>
return RTEMS_INVALID_ADDRESS;
executing = _Thread_Executing;
4c5e6: 2679 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a3
api = executing->API_Extensions[ THREAD_API_RTEMS ];
asr = &api->Signal;
old_mode = (executing->is_preemptible) ? RTEMS_PREEMPT : RTEMS_NO_PREEMPT;
4c5ec: 4a2b 0074 tstb %a3@(116) 4c5f0: 57c2 seq %d2
if ( !previous_mode_set )
return RTEMS_INVALID_ADDRESS;
executing = _Thread_Executing;
api = executing->API_Extensions[ THREAD_API_RTEMS ];
4c5f2: 246b 010a moveal %a3@(266),%a2
asr = &api->Signal;
old_mode = (executing->is_preemptible) ? RTEMS_PREEMPT : RTEMS_NO_PREEMPT;
4c5f6: 49c2 extbl %d2 4c5f8: 0282 0000 0100 andil #256,%d2
if ( executing->budget_algorithm == THREAD_CPU_BUDGET_ALGORITHM_NONE )
4c5fe: 4aab 007a tstl %a3@(122)
4c602: 6704 beqs 4c608 <rtems_task_mode+0x3c>
old_mode |= RTEMS_NO_TIMESLICE;
else
old_mode |= RTEMS_TIMESLICE;
4c604: 08c2 0009 bset #9,%d2
old_mode |= (asr->is_enabled) ? RTEMS_ASR : RTEMS_NO_ASR;
4c608: 4a2a 0008 tstb %a2@(8) 4c60c: 57c5 seq %d5
old_mode |= _ISR_Get_level();
4c60e: 4eb9 0004 89ac jsr 489ac <_CPU_ISR_Get_level>
if ( executing->budget_algorithm == THREAD_CPU_BUDGET_ALGORITHM_NONE )
old_mode |= RTEMS_NO_TIMESLICE;
else
old_mode |= RTEMS_TIMESLICE;
old_mode |= (asr->is_enabled) ? RTEMS_ASR : RTEMS_NO_ASR;
4c614: 49c5 extbl %d5 4c616: 0285 0000 0400 andil #1024,%d5 4c61c: 8085 orl %d5,%d0
old_mode |= _ISR_Get_level();
4c61e: 8082 orl %d2,%d0 4c620: 2880 movel %d0,%a4@
/*
* These are generic thread scheduling characteristics.
*/
if ( mask & RTEMS_PREEMPT_MASK )
4c622: 0804 0008 btst #8,%d4
4c626: 670c beqs 4c634 <rtems_task_mode+0x68>
executing->is_preemptible = _Modes_Is_preempt(mode_set) ? true : false;
4c628: 0803 0008 btst #8,%d3 4c62c: 57c0 seq %d0 4c62e: 4480 negl %d0 4c630: 1740 0074 moveb %d0,%a3@(116)
if ( mask & RTEMS_TIMESLICE_MASK ) {
4c634: 0804 0009 btst #9,%d4
4c638: 671c beqs 4c656 <rtems_task_mode+0x8a>
if ( _Modes_Is_timeslice(mode_set) ) {
4c63a: 0803 0009 btst #9,%d3
4c63e: 6712 beqs 4c652 <rtems_task_mode+0x86>
executing->budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE;
executing->cpu_time_budget = _Thread_Ticks_per_timeslice;
4c640: 41f9 0005 d904 lea 5d904 <_Thread_Ticks_per_timeslice>,%a0
if ( mask & RTEMS_PREEMPT_MASK )
executing->is_preemptible = _Modes_Is_preempt(mode_set) ? true : false;
if ( mask & RTEMS_TIMESLICE_MASK ) {
if ( _Modes_Is_timeslice(mode_set) ) {
executing->budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE;
4c646: 7001 moveq #1,%d0
executing->cpu_time_budget = _Thread_Ticks_per_timeslice;
4c648: 2750 0076 movel %a0@,%a3@(118)
if ( mask & RTEMS_PREEMPT_MASK )
executing->is_preemptible = _Modes_Is_preempt(mode_set) ? true : false;
if ( mask & RTEMS_TIMESLICE_MASK ) {
if ( _Modes_Is_timeslice(mode_set) ) {
executing->budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE;
4c64c: 2740 007a movel %d0,%a3@(122) 4c650: 6004 bras 4c656 <rtems_task_mode+0x8a>
executing->cpu_time_budget = _Thread_Ticks_per_timeslice;
} else
executing->budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_NONE;
4c652: 42ab 007a clrl %a3@(122)
/*
* Set the new interrupt level
*/
if ( mask & RTEMS_INTERRUPT_MASK )
4c656: 7007 moveq #7,%d0 4c658: c084 andl %d4,%d0
4c65a: 6712 beqs 4c66e <rtems_task_mode+0xa2>
*/
RTEMS_INLINE_ROUTINE void _Modes_Set_interrupt_level (
Modes_Control mode_set
)
{
_ISR_Set_level( _Modes_Get_interrupt_level( mode_set ) );
4c65c: 40c0 movew %sr,%d0
*/
RTEMS_INLINE_ROUTINE ISR_Level _Modes_Get_interrupt_level (
Modes_Control mode_set
)
{
return ( mode_set & RTEMS_INTERRUPT_MASK );
4c65e: 7207 moveq #7,%d1 4c660: c283 andl %d3,%d1
*/
RTEMS_INLINE_ROUTINE void _Modes_Set_interrupt_level (
Modes_Control mode_set
)
{
_ISR_Set_level( _Modes_Get_interrupt_level( mode_set ) );
4c662: 0280 0000 f8ff andil #63743,%d0 4c668: e189 lsll #8,%d1 4c66a: 8081 orl %d1,%d0 4c66c: 46c0 movew %d0,%sr
*/
is_asr_enabled = false;
needs_asr_dispatching = false;
if ( mask & RTEMS_ASR_MASK ) {
4c66e: 0804 000a btst #10,%d4
4c672: 6740 beqs 4c6b4 <rtems_task_mode+0xe8>
is_asr_enabled = _Modes_Is_asr_disabled( mode_set ) ? false : true;
if ( is_asr_enabled != asr->is_enabled ) {
4c674: 4281 clrl %d1 4c676: 122a 0008 moveb %a2@(8),%d1 4c67a: 4282 clrl %d2
* Output:
* *previous_mode_set - previous mode set
* always return RTEMS_SUCCESSFUL;
*/
rtems_status_code rtems_task_mode(
4c67c: 0803 000a btst #10,%d3 4c680: 57c0 seq %d0 4c682: 4480 negl %d0
is_asr_enabled = false;
needs_asr_dispatching = false;
if ( mask & RTEMS_ASR_MASK ) {
is_asr_enabled = _Modes_Is_asr_disabled( mode_set ) ? false : true;
if ( is_asr_enabled != asr->is_enabled ) {
4c684: 1400 moveb %d0,%d2 4c686: b282 cmpl %d2,%d1
4c688: 672a beqs 4c6b4 <rtems_task_mode+0xe8>
asr->is_enabled = is_asr_enabled;
4c68a: 1540 0008 moveb %d0,%a2@(8)
)
{
rtems_signal_set _signals;
ISR_Level _level;
_ISR_Disable( _level );
4c68e: 203c 0000 0700 movel #1792,%d0 4c694: 40c1 movew %sr,%d1 4c696: 8081 orl %d1,%d0 4c698: 46c0 movew %d0,%sr
_signals = information->signals_pending;
4c69a: 202a 0016 movel %a2@(22),%d0
information->signals_pending = information->signals_posted;
4c69e: 256a 0012 0016 movel %a2@(18),%a2@(22)
information->signals_posted = _signals;
4c6a4: 2540 0012 movel %d0,%a2@(18)
_ISR_Enable( _level );
4c6a8: 46c1 movew %d1,%sr
/*
* This is specific to the RTEMS API
*/
is_asr_enabled = false;
needs_asr_dispatching = false;
4c6aa: 4aaa 0012 tstl %a2@(18) 4c6ae: 56c0 sne %d0 4c6b0: 4480 negl %d0 4c6b2: 6002 bras 4c6b6 <rtems_task_mode+0xea> 4c6b4: 4200 clrb %d0
needs_asr_dispatching = true;
}
}
}
if ( _System_state_Is_up( _System_state_Get() ) )
4c6b6: 7203 moveq #3,%d1 4c6b8: b2b9 0005 daba cmpl 5daba <_System_state_Current>,%d1
4c6be: 6634 bnes 4c6f4 <rtems_task_mode+0x128> <== NEVER TAKEN
*/
RTEMS_INLINE_ROUTINE bool _Thread_Evaluate_mode( void )
{
Thread_Control *executing;
executing = _Thread_Executing;
4c6c0: 2079 0005 dddc moveal 5dddc <_Per_CPU_Information+0xc>,%a0
if ( !_States_Is_ready( executing->current_state ) ||
4c6c6: 4aa8 0010 tstl %a0@(16)
4c6ca: 660e bnes 4c6da <rtems_task_mode+0x10e> <== NEVER TAKEN
4c6cc: b1f9 0005 dde0 cmpal 5dde0 <_Per_CPU_Information+0x10>,%a0
4c6d2: 6710 beqs 4c6e4 <rtems_task_mode+0x118>
( !_Thread_Is_heir( executing ) && executing->is_preemptible ) ) {
4c6d4: 4a28 0074 tstb %a0@(116)
4c6d8: 670a beqs 4c6e4 <rtems_task_mode+0x118> <== NEVER TAKEN
_Context_Switch_necessary = true;
4c6da: 7001 moveq #1,%d0 4c6dc: 13c0 0005 dde8 moveb %d0,5dde8 <_Per_CPU_Information+0x18> 4c6e2: 6004 bras 4c6e8 <rtems_task_mode+0x11c>
if ( _Thread_Evaluate_mode() || needs_asr_dispatching )
4c6e4: 4a00 tstb %d0
4c6e6: 670c beqs 4c6f4 <rtems_task_mode+0x128>
_Thread_Dispatch();
4c6e8: 4eb9 0004 7558 jsr 47558 <_Thread_Dispatch> 4c6ee: 6004 bras 4c6f4 <rtems_task_mode+0x128>
bool is_asr_enabled = false;
bool needs_asr_dispatching = false;
rtems_mode old_mode;
if ( !previous_mode_set )
return RTEMS_INVALID_ADDRESS;
4c6f0: 7009 moveq #9,%d0 4c6f2: 6002 bras 4c6f6 <rtems_task_mode+0x12a>
if ( _System_state_Is_up( _System_state_Get() ) )
if ( _Thread_Evaluate_mode() || needs_asr_dispatching )
_Thread_Dispatch();
return RTEMS_SUCCESSFUL;
4c6f4: 4280 clrl %d0
}
4c6f6: 4cee 1c3c ffe4 moveml %fp@(-28),%d2-%d5/%a2-%a4
4c6fc: 4e5e unlk %fp <== NOT EXECUTED
00049468 <rtems_task_set_priority>:
rtems_status_code rtems_task_set_priority(
rtems_id id,
rtems_task_priority new_priority,
rtems_task_priority *old_priority
)
{
49468: 4e56 fffc linkw %fp,#-4 4946c: 2f0a movel %a2,%sp@- 4946e: 246e 0010 moveal %fp@(16),%a2 49472: 2f02 movel %d2,%sp@- 49474: 242e 000c movel %fp@(12),%d2
register Thread_Control *the_thread;
Objects_Locations location;
if ( new_priority != RTEMS_CURRENT_PRIORITY &&
49478: 670c beqs 49486 <rtems_task_set_priority+0x1e>
RTEMS_INLINE_ROUTINE bool _RTEMS_tasks_Priority_is_valid (
rtems_task_priority the_priority
)
{
return ( ( the_priority >= RTEMS_MINIMUM_PRIORITY ) &&
( the_priority <= RTEMS_MAXIMUM_PRIORITY ) );
4947a: 4280 clrl %d0 4947c: 1039 0005 fb32 moveb 5fb32 <rtems_maximum_priority>,%d0 49482: b082 cmpl %d2,%d0
49484: 654e bcss 494d4 <rtems_task_set_priority+0x6c>
!_RTEMS_tasks_Priority_is_valid( new_priority ) )
return RTEMS_INVALID_PRIORITY;
if ( !old_priority )
49486: 4a8a tstl %a2
49488: 674e beqs 494d8 <rtems_task_set_priority+0x70>
return RTEMS_INVALID_ADDRESS;
the_thread = _Thread_Get( id, &location );
4948a: 486e fffc pea %fp@(-4) 4948e: 2f2e 0008 movel %fp@(8),%sp@- 49492: 4eb9 0004 b174 jsr 4b174 <_Thread_Get>
switch ( location ) {
49498: 508f addql #8,%sp
return RTEMS_INVALID_PRIORITY;
if ( !old_priority )
return RTEMS_INVALID_ADDRESS;
the_thread = _Thread_Get( id, &location );
4949a: 2040 moveal %d0,%a0
switch ( location ) {
4949c: 4aae fffc tstl %fp@(-4)
494a0: 663a bnes 494dc <rtems_task_set_priority+0x74>
case OBJECTS_LOCAL:
/* XXX need helper to "convert" from core priority */
*old_priority = the_thread->current_priority;
494a2: 24a8 0014 movel %a0@(20),%a2@
if ( new_priority != RTEMS_CURRENT_PRIORITY ) {
494a6: 4a82 tstl %d2
494a8: 6720 beqs 494ca <rtems_task_set_priority+0x62>
the_thread->real_priority = new_priority;
494aa: 2142 0018 movel %d2,%a0@(24)
if ( the_thread->resource_count == 0 ||
494ae: 4aa8 001c tstl %a0@(28)
494b2: 6706 beqs 494ba <rtems_task_set_priority+0x52>
494b4: b4a8 0014 cmpl %a0@(20),%d2
494b8: 6410 bccs 494ca <rtems_task_set_priority+0x62> <== ALWAYS TAKEN
the_thread->current_priority > new_priority )
_Thread_Change_priority( the_thread, new_priority, false );
494ba: 42a7 clrl %sp@- 494bc: 2f02 movel %d2,%sp@- 494be: 2f08 movel %a0,%sp@- 494c0: 4eb9 0004 ac68 jsr 4ac68 <_Thread_Change_priority> 494c6: 4fef 000c lea %sp@(12),%sp
}
_Thread_Enable_dispatch();
494ca: 4eb9 0004 b14e jsr 4b14e <_Thread_Enable_dispatch>
return RTEMS_SUCCESSFUL;
494d0: 4280 clrl %d0 494d2: 600a bras 494de <rtems_task_set_priority+0x76>
register Thread_Control *the_thread;
Objects_Locations location;
if ( new_priority != RTEMS_CURRENT_PRIORITY &&
!_RTEMS_tasks_Priority_is_valid( new_priority ) )
return RTEMS_INVALID_PRIORITY;
494d4: 7013 moveq #19,%d0 494d6: 6006 bras 494de <rtems_task_set_priority+0x76>
if ( !old_priority )
return RTEMS_INVALID_ADDRESS;
494d8: 7009 moveq #9,%d0 494da: 6002 bras 494de <rtems_task_set_priority+0x76>
case OBJECTS_ERROR:
break;
}
return RTEMS_INVALID_ID;
494dc: 7004 moveq #4,%d0
}
494de: 242e fff4 movel %fp@(-12),%d2 494e2: 246e fff8 moveal %fp@(-8),%a2 494e6: 4e5e unlk %fp
...
00051b9c <rtems_timer_cancel>:
*/
rtems_status_code rtems_timer_cancel(
rtems_id id
)
{
51b9c: 4e56 fffc linkw %fp,#-4
Objects_Id id,
Objects_Locations *location
)
{
return (Timer_Control *)
_Objects_Get( &_Timer_Information, id, location );
51ba0: 486e fffc pea %fp@(-4) 51ba4: 2f2e 0008 movel %fp@(8),%sp@- 51ba8: 4879 0007 6d94 pea 76d94 <_Timer_Information> 51bae: 4eb9 0005 4608 jsr 54608 <_Objects_Get>
Timer_Control *the_timer;
Objects_Locations location;
the_timer = _Timer_Get( id, &location );
switch ( location ) {
51bb4: 4fef 000c lea %sp@(12),%sp 51bb8: 4aae fffc tstl %fp@(-4)
51bbc: 6620 bnes 51bde <rtems_timer_cancel+0x42>
case OBJECTS_LOCAL:
if ( !_Timer_Is_dormant_class( the_timer->the_class ) )
51bbe: 7204 moveq #4,%d1 51bc0: 2040 moveal %d0,%a0 51bc2: b2a8 0038 cmpl %a0@(56),%d1
51bc6: 670c beqs 51bd4 <rtems_timer_cancel+0x38> <== NEVER TAKEN
(void) _Watchdog_Remove( &the_timer->Ticker );
51bc8: 4868 0010 pea %a0@(16) 51bcc: 4eb9 0005 61e0 jsr 561e0 <_Watchdog_Remove> 51bd2: 588f addql #4,%sp
_Thread_Enable_dispatch();
51bd4: 4eb9 0005 4e6a jsr 54e6a <_Thread_Enable_dispatch>
return RTEMS_SUCCESSFUL;
51bda: 4280 clrl %d0 51bdc: 6002 bras 51be0 <rtems_timer_cancel+0x44>
#endif
case OBJECTS_ERROR:
break;
}
return RTEMS_INVALID_ID;
51bde: 7004 moveq #4,%d0
}
51be0: 4e5e unlk %fp <== NOT EXECUTED
00045e1c <rtems_timer_create>:
rtems_status_code rtems_timer_create(
rtems_name name,
rtems_id *id
)
{
45e1c: 4e56 fff4 linkw %fp,#-12 45e20: 48d7 0c04 moveml %d2/%a2-%a3,%sp@ 45e24: 242e 0008 movel %fp@(8),%d2 45e28: 246e 000c moveal %fp@(12),%a2
Timer_Control *the_timer;
if ( !rtems_is_name_valid( name ) )
45e2c: 6766 beqs 45e94 <rtems_timer_create+0x78> <== NEVER TAKEN
return RTEMS_INVALID_NAME;
if ( !id )
45e2e: 4a8a tstl %a2
45e30: 6766 beqs 45e98 <rtems_timer_create+0x7c> <== NEVER TAKEN
45e32: 2039 0005 dbb0 movel 5dbb0 <_Thread_Dispatch_disable_level>,%d0 45e38: 5280 addql #1,%d0 45e3a: 23c0 0005 dbb0 movel %d0,5dbb0 <_Thread_Dispatch_disable_level>
* This function allocates a timer control block from
* the inactive chain of free timer control blocks.
*/
RTEMS_INLINE_ROUTINE Timer_Control *_Timer_Allocate( void )
{
return (Timer_Control *) _Objects_Allocate( &_Timer_Information );
45e40: 4879 0005 e3f2 pea 5e3f2 <_Timer_Information> 45e46: 4eb9 0004 6c74 jsr 46c74 <_Objects_Allocate>
_Thread_Disable_dispatch(); /* to prevent deletion */
the_timer = _Timer_Allocate();
if ( !the_timer ) {
45e4c: 588f addql #4,%sp 45e4e: 43f9 0004 78b2 lea 478b2 <_Thread_Enable_dispatch>,%a1 45e54: 2040 moveal %d0,%a0 45e56: 4a80 tstl %d0
45e58: 6606 bnes 45e60 <rtems_timer_create+0x44>
_Thread_Enable_dispatch();
45e5a: 4e91 jsr %a1@
return RTEMS_TOO_MANY;
45e5c: 7005 moveq #5,%d0 45e5e: 603a bras 45e9a <rtems_timer_create+0x7e>
}
the_timer->the_class = TIMER_DORMANT;
45e60: 7004 moveq #4,%d0
Objects_Information *information,
Objects_Control *the_object,
Objects_Name name
)
{
_Objects_Set_local_object(
45e62: 4281 clrl %d1 45e64: 2140 0038 movel %d0,%a0@(56)
information,
_Objects_Get_index( the_object->id ),
45e68: 2028 0008 movel %a0@(8),%d0
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
45e6c: 2679 0005 e40a moveal 5e40a <_Timer_Information+0x18>,%a3
Objects_Information *information,
Objects_Control *the_object,
Objects_Name name
)
{
_Objects_Set_local_object(
45e72: 3200 movew %d0,%d1
Watchdog_Service_routine_entry routine,
Objects_Id id,
void *user_data
)
{
the_watchdog->state = WATCHDOG_INACTIVE;
45e74: 42a8 0018 clrl %a0@(24)
the_watchdog->routine = routine;
45e78: 42a8 002c clrl %a0@(44)
the_watchdog->id = id;
45e7c: 42a8 0030 clrl %a0@(48)
the_watchdog->user_data = user_data;
45e80: 42a8 0034 clrl %a0@(52)
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
45e84: 2788 1c00 movel %a0,%a3@(00000000,%d1:l:4)
information,
_Objects_Get_index( the_object->id ),
the_object
);
the_object->name = name;
45e88: 2142 000c movel %d2,%a0@(12)
&_Timer_Information,
&the_timer->Object,
(Objects_Name) name
);
*id = the_timer->Object.id;
45e8c: 2480 movel %d0,%a2@
_Thread_Enable_dispatch();
45e8e: 4e91 jsr %a1@
return RTEMS_SUCCESSFUL;
45e90: 4280 clrl %d0 45e92: 6006 bras 45e9a <rtems_timer_create+0x7e>
)
{
Timer_Control *the_timer;
if ( !rtems_is_name_valid( name ) )
return RTEMS_INVALID_NAME;
45e94: 7003 moveq #3,%d0 45e96: 6002 bras 45e9a <rtems_timer_create+0x7e>
if ( !id )
return RTEMS_INVALID_ADDRESS;
45e98: 7009 moveq #9,%d0
);
*id = the_timer->Object.id;
_Thread_Enable_dispatch();
return RTEMS_SUCCESSFUL;
}
45e9a: 4cee 0c04 fff4 moveml %fp@(-12),%d2/%a2-%a3
45ea0: 4e5e unlk %fp <== NOT EXECUTED
00051f68 <rtems_timer_server_fire_after>:
rtems_id id,
rtems_interval ticks,
rtems_timer_service_routine_entry routine,
void *user_data
)
{
51f68: 4e56 ffe4 linkw %fp,#-28 51f6c: 48d7 1c1c moveml %d2-%d4/%a2-%a4,%sp@ 51f70: 262e 0008 movel %fp@(8),%d3 51f74: 242e 000c movel %fp@(12),%d2 51f78: 282e 0010 movel %fp@(16),%d4
Timer_Control *the_timer; Objects_Locations location; ISR_Level level; Timer_server_Control *timer_server = _Timer_server;
51f7c: 2679 0007 6dce moveal 76dce <_Timer_server>,%a3
if ( !timer_server )
51f82: 4a8b tstl %a3 51f84: 6700 0086 beqw 5200c <rtems_timer_server_fire_after+0xa4>
return RTEMS_INCORRECT_STATE;
if ( !routine )
51f88: 4a84 tstl %d4 51f8a: 6700 0084 beqw 52010 <rtems_timer_server_fire_after+0xa8>
return RTEMS_INVALID_ADDRESS;
if ( ticks == 0 )
51f8e: 4a82 tstl %d2 51f90: 6700 0082 beqw 52014 <rtems_timer_server_fire_after+0xac> 51f94: 486e fffc pea %fp@(-4) 51f98: 2f03 movel %d3,%sp@- 51f9a: 4879 0007 6d94 pea 76d94 <_Timer_Information> 51fa0: 4eb9 0005 4608 jsr 54608 <_Objects_Get>
return RTEMS_INVALID_NUMBER;
the_timer = _Timer_Get( id, &location );
switch ( location ) {
51fa6: 4fef 000c lea %sp@(12),%sp 51faa: 2440 moveal %d0,%a2 51fac: 4aae fffc tstl %fp@(-4)
51fb0: 6666 bnes 52018 <rtems_timer_server_fire_after+0xb0><== NEVER TAKEN
case OBJECTS_LOCAL:
(void) _Watchdog_Remove( &the_timer->Ticker );
51fb2: 486a 0010 pea %a2@(16) 51fb6: 4eb9 0005 61e0 jsr 561e0 <_Watchdog_Remove>
_ISR_Disable( level );
51fbc: 203c 0000 0700 movel #1792,%d0 51fc2: 40c1 movew %sr,%d1 51fc4: 8081 orl %d1,%d0 51fc6: 46c0 movew %d0,%sr 51fc8: 49f9 0005 4e6a lea 54e6a <_Thread_Enable_dispatch>,%a4
/*
* Check to see if the watchdog has just been inserted by a
* higher priority interrupt. If so, abandon this insert.
*/
if ( the_timer->Ticker.state != WATCHDOG_INACTIVE ) {
51fce: 588f addql #4,%sp 51fd0: 4aaa 0018 tstl %a2@(24)
51fd4: 6706 beqs 51fdc <rtems_timer_server_fire_after+0x74>
_ISR_Enable( level );
51fd6: 46c1 movew %d1,%sr
_Thread_Enable_dispatch();
51fd8: 4e94 jsr %a4@ 51fda: 602c bras 52008 <rtems_timer_server_fire_after+0xa0>
/*
* OK. Now we now the timer was not rescheduled by an interrupt
* so we can atomically initialize it as in use.
*/
the_timer->the_class = TIMER_INTERVAL_ON_TASK;
51fdc: 7001 moveq #1,%d0
)
{
the_watchdog->state = WATCHDOG_INACTIVE;
the_watchdog->routine = routine;
the_watchdog->id = id;
the_watchdog->user_data = user_data;
51fde: 256e 0014 0034 movel %fp@(20),%a2@(52) 51fe4: 2540 0038 movel %d0,%a2@(56)
Watchdog_Service_routine_entry routine,
Objects_Id id,
void *user_data
)
{
the_watchdog->state = WATCHDOG_INACTIVE;
51fe8: 42aa 0018 clrl %a2@(24)
the_watchdog->routine = routine;
51fec: 2544 002c movel %d4,%a2@(44)
the_watchdog->id = id;
51ff0: 2543 0030 movel %d3,%a2@(48)
_Watchdog_Initialize( &the_timer->Ticker, routine, id, user_data );
the_timer->Ticker.initial = ticks;
51ff4: 2542 001c movel %d2,%a2@(28)
_ISR_Enable( level );
51ff8: 46c1 movew %d1,%sr
(*timer_server->schedule_operation)( timer_server, the_timer );
51ffa: 2f0a movel %a2,%sp@- 51ffc: 2f0b movel %a3,%sp@- 51ffe: 206b 0004 moveal %a3@(4),%a0 52002: 4e90 jsr %a0@
_Thread_Enable_dispatch();
52004: 4e94 jsr %a4@
return RTEMS_SUCCESSFUL;
52006: 508f addql #8,%sp 52008: 4280 clrl %d0 5200a: 600e bras 5201a <rtems_timer_server_fire_after+0xb2>
Objects_Locations location;
ISR_Level level;
Timer_server_Control *timer_server = _Timer_server;
if ( !timer_server )
return RTEMS_INCORRECT_STATE;
5200c: 700e moveq #14,%d0 5200e: 600a bras 5201a <rtems_timer_server_fire_after+0xb2>
if ( !routine )
return RTEMS_INVALID_ADDRESS;
52010: 7009 moveq #9,%d0 52012: 6006 bras 5201a <rtems_timer_server_fire_after+0xb2>
if ( ticks == 0 )
return RTEMS_INVALID_NUMBER;
52014: 700a moveq #10,%d0 52016: 6002 bras 5201a <rtems_timer_server_fire_after+0xb2>
#endif
case OBJECTS_ERROR:
break;
}
return RTEMS_INVALID_ID;
52018: 7004 moveq #4,%d0
}
5201a: 4cee 1c1c ffe4 moveml %fp@(-28),%d2-%d4/%a2-%a4
52020: 4e5e unlk %fp <== NOT EXECUTED
00052024 <rtems_timer_server_fire_when>:
rtems_id id,
rtems_time_of_day *wall_time,
rtems_timer_service_routine_entry routine,
void *user_data
)
{
52024: 4e56 ffe8 linkw %fp,#-24 52028: 48d7 0c1c moveml %d2-%d4/%a2-%a3,%sp@ 5202c: 262e 0008 movel %fp@(8),%d3 52030: 242e 000c movel %fp@(12),%d2 52034: 282e 0010 movel %fp@(16),%d4
Timer_Control *the_timer; Objects_Locations location; rtems_interval seconds; Timer_server_Control *timer_server = _Timer_server;
52038: 2679 0007 6dce moveal 76dce <_Timer_server>,%a3
if ( !timer_server )
5203e: 4a8b tstl %a3 52040: 6700 0098 beqw 520da <rtems_timer_server_fire_when+0xb6>
return RTEMS_INCORRECT_STATE;
if ( !_TOD_Is_set )
52044: 4a39 0007 6520 tstb 76520 <_TOD_Is_set> 5204a: 6700 0092 beqw 520de <rtems_timer_server_fire_when+0xba>
return RTEMS_NOT_DEFINED;
if ( !routine )
5204e: 4a84 tstl %d4 52050: 6700 0090 beqw 520e2 <rtems_timer_server_fire_when+0xbe>
return RTEMS_INVALID_ADDRESS;
if ( !_TOD_Validate( wall_time ) )
52054: 2f02 movel %d2,%sp@- 52056: 4eb9 0004 f4d4 jsr 4f4d4 <_TOD_Validate> 5205c: 588f addql #4,%sp 5205e: 4a00 tstb %d0 52060: 6700 0084 beqw 520e6 <rtems_timer_server_fire_when+0xc2>
return RTEMS_INVALID_CLOCK;
seconds = _TOD_To_seconds( wall_time );
52064: 2f02 movel %d2,%sp@- 52066: 4eb9 0004 f438 jsr 4f438 <_TOD_To_seconds>
if ( seconds <= _TOD_Seconds_since_epoch() )
5206c: 588f addql #4,%sp
return RTEMS_INVALID_ADDRESS;
if ( !_TOD_Validate( wall_time ) )
return RTEMS_INVALID_CLOCK;
seconds = _TOD_To_seconds( wall_time );
5206e: 2400 movel %d0,%d2
if ( seconds <= _TOD_Seconds_since_epoch() )
52070: b0b9 0007 659a cmpl 7659a <_TOD_Now>,%d0
52076: 636e blss 520e6 <rtems_timer_server_fire_when+0xc2>
52078: 486e fffc pea %fp@(-4) 5207c: 2f03 movel %d3,%sp@- 5207e: 4879 0007 6d94 pea 76d94 <_Timer_Information> 52084: 4eb9 0005 4608 jsr 54608 <_Objects_Get>
return RTEMS_INVALID_CLOCK;
the_timer = _Timer_Get( id, &location );
switch ( location ) {
5208a: 4fef 000c lea %sp@(12),%sp 5208e: 2440 moveal %d0,%a2 52090: 4aae fffc tstl %fp@(-4)
52094: 6654 bnes 520ea <rtems_timer_server_fire_when+0xc6>
case OBJECTS_LOCAL:
(void) _Watchdog_Remove( &the_timer->Ticker );
52096: 486a 0010 pea %a2@(16) 5209a: 4eb9 0005 61e0 jsr 561e0 <_Watchdog_Remove>
the_watchdog->user_data = user_data;
520a0: 256e 0014 0034 movel %fp@(20),%a2@(52)
the_timer->the_class = TIMER_TIME_OF_DAY_ON_TASK;
_Watchdog_Initialize( &the_timer->Ticker, routine, id, user_data );
the_timer->Ticker.initial = seconds - _TOD_Seconds_since_epoch();
520a6: 94b9 0007 659a subl 7659a <_TOD_Now>,%d2
the_timer = _Timer_Get( id, &location );
switch ( location ) {
case OBJECTS_LOCAL:
(void) _Watchdog_Remove( &the_timer->Ticker );
the_timer->the_class = TIMER_TIME_OF_DAY_ON_TASK;
520ac: 7003 moveq #3,%d0
Watchdog_Service_routine_entry routine,
Objects_Id id,
void *user_data
)
{
the_watchdog->state = WATCHDOG_INACTIVE;
520ae: 42aa 0018 clrl %a2@(24) 520b2: 2540 0038 movel %d0,%a2@(56)
the_watchdog->routine = routine;
520b6: 2544 002c movel %d4,%a2@(44)
the_watchdog->id = id;
520ba: 2543 0030 movel %d3,%a2@(48)
_Watchdog_Initialize( &the_timer->Ticker, routine, id, user_data );
the_timer->Ticker.initial = seconds - _TOD_Seconds_since_epoch();
520be: 2542 001c movel %d2,%a2@(28)
(*timer_server->schedule_operation)( timer_server, the_timer );
520c2: 2f0a movel %a2,%sp@- 520c4: 2f0b movel %a3,%sp@- 520c6: 206b 0004 moveal %a3@(4),%a0 520ca: 4e90 jsr %a0@
_Thread_Enable_dispatch();
520cc: 4eb9 0005 4e6a jsr 54e6a <_Thread_Enable_dispatch>
return RTEMS_SUCCESSFUL;
520d2: 4fef 000c lea %sp@(12),%sp 520d6: 4280 clrl %d0 520d8: 6012 bras 520ec <rtems_timer_server_fire_when+0xc8>
Objects_Locations location;
rtems_interval seconds;
Timer_server_Control *timer_server = _Timer_server;
if ( !timer_server )
return RTEMS_INCORRECT_STATE;
520da: 700e moveq #14,%d0 520dc: 600e bras 520ec <rtems_timer_server_fire_when+0xc8>
if ( !_TOD_Is_set )
return RTEMS_NOT_DEFINED;
520de: 700b moveq #11,%d0 <== NOT EXECUTED 520e0: 600a bras 520ec <rtems_timer_server_fire_when+0xc8><== NOT EXECUTED
if ( !routine )
return RTEMS_INVALID_ADDRESS;
520e2: 7009 moveq #9,%d0 520e4: 6006 bras 520ec <rtems_timer_server_fire_when+0xc8>
if ( !_TOD_Validate( wall_time ) )
return RTEMS_INVALID_CLOCK;
seconds = _TOD_To_seconds( wall_time );
if ( seconds <= _TOD_Seconds_since_epoch() )
return RTEMS_INVALID_CLOCK;
520e6: 7014 moveq #20,%d0 520e8: 6002 bras 520ec <rtems_timer_server_fire_when+0xc8>
#endif
case OBJECTS_ERROR:
break;
}
return RTEMS_INVALID_ID;
520ea: 7004 moveq #4,%d0
}
520ec: 4cee 0c1c ffe8 moveml %fp@(-24),%d2-%d4/%a2-%a3 520f2: 4e5e unlk %fp
...
00045ef8 <sched_get_priority_max>:
int sched_get_priority_max(
int policy
)
{
switch ( policy ) {
45ef8: 7004 moveq #4,%d0
#include <rtems/posix/priority.h>
int sched_get_priority_max(
int policy
)
{
45efa: 4e56 0000 linkw %fp,#0 45efe: 222e 0008 movel %fp@(8),%d1
switch ( policy ) {
45f02: b081 cmpl %d1,%d0
45f04: 650c bcss 45f12 <sched_get_priority_max+0x1a>
45f06: 103c 0001 moveb #1,%d0 45f0a: e3a8 lsll %d1,%d0 45f0c: 7217 moveq #23,%d1 45f0e: c081 andl %d1,%d0
45f10: 6610 bnes 45f22 <sched_get_priority_max+0x2a> <== ALWAYS TAKEN
case SCHED_RR:
case SCHED_SPORADIC:
break;
default:
rtems_set_errno_and_return_minus_one( EINVAL );
45f12: 4eb9 0004 d5fc jsr 4d5fc <__errno> 45f18: 2040 moveal %d0,%a0 45f1a: 7016 moveq #22,%d0 45f1c: 2080 movel %d0,%a0@ 45f1e: 70ff moveq #-1,%d0 45f20: 600a bras 45f2c <sched_get_priority_max+0x34>
}
return POSIX_SCHEDULER_MAXIMUM_PRIORITY;
45f22: 4280 clrl %d0 45f24: 1039 0005 d266 moveb 5d266 <rtems_maximum_priority>,%d0 45f2a: 5380 subql #1,%d0
}
45f2c: 4e5e unlk %fp <== NOT EXECUTED
00045f30 <sched_get_priority_min>:
int sched_get_priority_min(
int policy
)
{
switch ( policy ) {
45f30: 7004 moveq #4,%d0
#include <rtems/posix/priority.h>
int sched_get_priority_min(
int policy
)
{
45f32: 4e56 0000 linkw %fp,#0 45f36: 222e 0008 movel %fp@(8),%d1
switch ( policy ) {
45f3a: b081 cmpl %d1,%d0
45f3c: 650c bcss 45f4a <sched_get_priority_min+0x1a>
45f3e: 103c 0001 moveb #1,%d0 45f42: e3a8 lsll %d1,%d0 45f44: 7217 moveq #23,%d1 45f46: c081 andl %d1,%d0
45f48: 6610 bnes 45f5a <sched_get_priority_min+0x2a> <== ALWAYS TAKEN
case SCHED_RR:
case SCHED_SPORADIC:
break;
default:
rtems_set_errno_and_return_minus_one( EINVAL );
45f4a: 4eb9 0004 d5fc jsr 4d5fc <__errno> 45f50: 2040 moveal %d0,%a0 45f52: 7016 moveq #22,%d0 45f54: 2080 movel %d0,%a0@ 45f56: 70ff moveq #-1,%d0 45f58: 6002 bras 45f5c <sched_get_priority_min+0x2c>
}
return POSIX_SCHEDULER_MINIMUM_PRIORITY;
45f5a: 7001 moveq #1,%d0
}
45f5c: 4e5e unlk %fp <== NOT EXECUTED
00045f60 <sched_rr_get_interval>:
int sched_rr_get_interval(
pid_t pid,
struct timespec *interval
)
{
45f60: 4e56 0000 linkw %fp,#0 45f64: 2f03 movel %d3,%sp@- 45f66: 262e 0008 movel %fp@(8),%d3 45f6a: 2f02 movel %d2,%sp@- 45f6c: 242e 000c movel %fp@(12),%d2
/*
* Only supported for the "calling process" (i.e. this node).
*/
if ( pid && pid != getpid() )
45f70: 4a83 tstl %d3
45f72: 6718 beqs 45f8c <sched_rr_get_interval+0x2c> <== NEVER TAKEN
45f74: 4eb9 0004 2f44 jsr 42f44 <getpid> 45f7a: b083 cmpl %d3,%d0
45f7c: 670e beqs 45f8c <sched_rr_get_interval+0x2c>
rtems_set_errno_and_return_minus_one( ESRCH );
45f7e: 4eb9 0004 d5fc jsr 4d5fc <__errno> 45f84: 7203 moveq #3,%d1 45f86: 2040 moveal %d0,%a0 45f88: 2081 movel %d1,%a0@ 45f8a: 6010 bras 45f9c <sched_rr_get_interval+0x3c>
if ( !interval )
45f8c: 4a82 tstl %d2
45f8e: 6610 bnes 45fa0 <sched_rr_get_interval+0x40>
rtems_set_errno_and_return_minus_one( EINVAL );
45f90: 4eb9 0004 d5fc jsr 4d5fc <__errno> 45f96: 2040 moveal %d0,%a0 45f98: 7016 moveq #22,%d0 45f9a: 2080 movel %d0,%a0@ 45f9c: 70ff moveq #-1,%d0 45f9e: 6012 bras 45fb2 <sched_rr_get_interval+0x52>
_Timespec_From_ticks( _Thread_Ticks_per_timeslice, interval );
45fa0: 2f02 movel %d2,%sp@- 45fa2: 2f39 0005 e9a4 movel 5e9a4 <_Thread_Ticks_per_timeslice>,%sp@- 45fa8: 4eb9 0004 91f8 jsr 491f8 <_Timespec_From_ticks>
return 0;
45fae: 508f addql #8,%sp 45fb0: 4280 clrl %d0
}
45fb2: 242e fff8 movel %fp@(-8),%d2 45fb6: 262e fffc movel %fp@(-4),%d3 45fba: 4e5e unlk %fp
...
000485b0 <sem_open>:
int oflag,
...
/* mode_t mode, */
/* unsigned int value */
)
{
485b0: 4e56 ffe0 linkw %fp,#-32
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
485b4: 2039 0006 28b8 movel 628b8 <_Thread_Dispatch_disable_level>,%d0 485ba: 5280 addql #1,%d0 485bc: 48d7 043c moveml %d2-%d5/%a2,%sp@ 485c0: 242e 0008 movel %fp@(8),%d2 485c4: 282e 000c movel %fp@(12),%d4 485c8: 23c0 0006 28b8 movel %d0,628b8 <_Thread_Dispatch_disable_level>
POSIX_Semaphore_Control *the_semaphore;
Objects_Locations location;
_Thread_Disable_dispatch();
if ( oflag & O_CREAT ) {
485ce: 2a04 movel %d4,%d5 485d0: 0285 0000 0200 andil #512,%d5
485d6: 6706 beqs 485de <sem_open+0x2e>
va_start(arg, oflag);
mode = (mode_t) va_arg( arg, unsigned int );
value = va_arg( arg, unsigned int );
485d8: 262e 0014 movel %fp@(20),%d3 485dc: 6002 bras 485e0 <sem_open+0x30>
/* unsigned int value */
)
{
va_list arg;
mode_t mode;
unsigned int value = 0;
485de: 4283 clrl %d3
mode = (mode_t) va_arg( arg, unsigned int );
value = va_arg( arg, unsigned int );
va_end(arg);
}
status = _POSIX_Semaphore_Name_to_id( name, &the_semaphore_id );
485e0: 486e fffc pea %fp@(-4) 485e4: 2f02 movel %d2,%sp@- 485e6: 4eb9 0004 e03c jsr 4e03c <_POSIX_Semaphore_Name_to_id>
* and we can just return a pointer to the id. Otherwise we may
* need to check to see if this is a "semaphore does not exist"
* or some other miscellaneous error on the name.
*/
if ( status ) {
485ec: 508f addql #8,%sp
mode = (mode_t) va_arg( arg, unsigned int );
value = va_arg( arg, unsigned int );
va_end(arg);
}
status = _POSIX_Semaphore_Name_to_id( name, &the_semaphore_id );
485ee: 2440 moveal %d0,%a2
* and we can just return a pointer to the id. Otherwise we may
* need to check to see if this is a "semaphore does not exist"
* or some other miscellaneous error on the name.
*/
if ( status ) {
485f0: 4a80 tstl %d0
485f2: 671c beqs 48610 <sem_open+0x60>
/*
* Unless provided a valid name that did not already exist
* and we are willing to create then it is an error.
*/
if ( !( status == ENOENT && (oflag & O_CREAT) ) ) {
485f4: 7002 moveq #2,%d0 485f6: b08a cmpl %a2,%d0
485f8: 6604 bnes 485fe <sem_open+0x4e> <== NEVER TAKEN
485fa: 4a85 tstl %d5
485fc: 665e bnes 4865c <sem_open+0xac>
_Thread_Enable_dispatch();
485fe: 4eb9 0004 acde jsr 4acde <_Thread_Enable_dispatch>
rtems_set_errno_and_return_minus_one_cast( status, sem_t * );
48604: 4eb9 0005 08c0 jsr 508c0 <__errno> 4860a: 2040 moveal %d0,%a0 4860c: 208a movel %a2,%a0@ 4860e: 6076 bras 48686 <sem_open+0xd6> 48610: 45f9 0004 acde lea 4acde <_Thread_Enable_dispatch>,%a2
/*
* Check for existence with creation.
*/
if ( (oflag & (O_CREAT | O_EXCL)) == (O_CREAT | O_EXCL) ) {
48616: 0284 0000 0a00 andil #2560,%d4 4861c: 0c84 0000 0a00 cmpil #2560,%d4
48622: 6610 bnes 48634 <sem_open+0x84>
_Thread_Enable_dispatch();
48624: 4e92 jsr %a2@
rtems_set_errno_and_return_minus_one_cast( EEXIST, sem_t * );
48626: 4eb9 0005 08c0 jsr 508c0 <__errno> 4862c: 2040 moveal %d0,%a0 4862e: 7011 moveq #17,%d0 48630: 2080 movel %d0,%a0@ 48632: 6052 bras 48686 <sem_open+0xd6> 48634: 486e fff4 pea %fp@(-12) 48638: 2f2e fffc movel %fp@(-4),%sp@- 4863c: 4879 0006 2af4 pea 62af4 <_POSIX_Semaphore_Information> 48642: 4eb9 0004 a470 jsr 4a470 <_Objects_Get>
}
the_semaphore = _POSIX_Semaphore_Get( &the_semaphore_id, &location );
the_semaphore->open_count += 1;
48648: 2040 moveal %d0,%a0 4864a: 52a8 0016 addql #1,%a0@(22)
if ( (oflag & (O_CREAT | O_EXCL)) == (O_CREAT | O_EXCL) ) {
_Thread_Enable_dispatch();
rtems_set_errno_and_return_minus_one_cast( EEXIST, sem_t * );
}
the_semaphore = _POSIX_Semaphore_Get( &the_semaphore_id, &location );
4864e: 2d40 fff8 movel %d0,%fp@(-8)
the_semaphore->open_count += 1;
_Thread_Enable_dispatch();
48652: 4e92 jsr %a2@
_Thread_Enable_dispatch();
48654: 4e92 jsr %a2@
goto return_id;
48656: 4fef 000c lea %sp@(12),%sp 4865a: 6022 bras 4867e <sem_open+0xce>
/*
* At this point, the semaphore does not exist and everything has been
* checked. We should go ahead and create a semaphore.
*/
status =_POSIX_Semaphore_Create_support(
4865c: 486e fff8 pea %fp@(-8) 48660: 2f03 movel %d3,%sp@- 48662: 42a7 clrl %sp@- 48664: 2f02 movel %d2,%sp@- 48666: 4eb9 0004 def8 jsr 4def8 <_POSIX_Semaphore_Create_support> 4866c: 2400 movel %d0,%d2
/*
* errno was set by Create_support, so don't set it again.
*/
_Thread_Enable_dispatch();
4866e: 4eb9 0004 acde jsr 4acde <_Thread_Enable_dispatch>
if ( status == -1 )
48674: 4fef 0010 lea %sp@(16),%sp 48678: 70ff moveq #-1,%d0 4867a: b082 cmpl %d2,%d0
4867c: 6708 beqs 48686 <sem_open+0xd6>
return_id:
#if defined(RTEMS_USE_16_BIT_OBJECT)
the_semaphore->Semaphore_id = the_semaphore->Object.id;
id = &the_semaphore->Semaphore_id;
#else
id = (sem_t *)&the_semaphore->Object.id;
4867e: 202e fff8 movel %fp@(-8),%d0 48682: 5080 addql #8,%d0
#endif return id;
48684: 6002 bras 48688 <sem_open+0xd8>
*/
_Thread_Enable_dispatch();
if ( status == -1 )
return SEM_FAILED;
48686: 70ff moveq #-1,%d0
id = &the_semaphore->Semaphore_id;
#else
id = (sem_t *)&the_semaphore->Object.id;
#endif
return id;
}
48688: 4cee 043c ffe0 moveml %fp@(-32),%d2-%d5/%a2 4868e: 4e5e unlk %fp
...
00045e08 <sigaction>:
int sigaction(
int sig,
const struct sigaction *act,
struct sigaction *oact
)
{
45e08: 4e56 ffec linkw %fp,#-20 45e0c: 222e 0010 movel %fp@(16),%d1 45e10: 48d7 0c1c moveml %d2-%d4/%a2-%a3,%sp@ 45e14: 242e 0008 movel %fp@(8),%d2 45e18: 246e 000c moveal %fp@(12),%a2
ISR_Level level;
if ( oact )
45e1c: 4a81 tstl %d1
45e1e: 6722 beqs 45e42 <sigaction+0x3a>
*oact = _POSIX_signals_Vectors[ sig ];
45e20: 2602 movel %d2,%d3 45e22: 2002 movel %d2,%d0 45e24: 4878 000c pea c <OPER1> 45e28: e58b lsll #2,%d3 45e2a: e988 lsll #4,%d0 45e2c: 9083 subl %d3,%d0 45e2e: 0680 0005 faaa addil #391850,%d0 45e34: 2f00 movel %d0,%sp@- 45e36: 2f01 movel %d1,%sp@- 45e38: 4eb9 0004 e190 jsr 4e190 <memcpy> 45e3e: 4fef 000c lea %sp@(12),%sp
if ( !sig )
45e42: 4a82 tstl %d2
45e44: 6710 beqs 45e56 <sigaction+0x4e>
static inline bool is_valid_signo(
int signo
)
{
return ((signo) >= 1 && (signo) <= 32 );
45e46: 2002 movel %d2,%d0 45e48: 5380 subql #1,%d0
rtems_set_errno_and_return_minus_one( EINVAL );
if ( !is_valid_signo(sig) )
45e4a: 721f moveq #31,%d1 45e4c: b280 cmpl %d0,%d1
45e4e: 6506 bcss 45e56 <sigaction+0x4e>
*
* NOTE: Solaris documentation claims to "silently enforce" this which
* contradicts the POSIX specification.
*/
if ( sig == SIGKILL )
45e50: 7009 moveq #9,%d0 45e52: b082 cmpl %d2,%d0
45e54: 6610 bnes 45e66 <sigaction+0x5e>
rtems_set_errno_and_return_minus_one( EINVAL );
45e56: 4eb9 0004 d8cc jsr 4d8cc <__errno> 45e5c: 2040 moveal %d0,%a0 45e5e: 7016 moveq #22,%d0 45e60: 2080 movel %d0,%a0@ 45e62: 70ff moveq #-1,%d0 45e64: 6060 bras 45ec6 <sigaction+0xbe>
/*
* Evaluate the new action structure and set the global signal vector
* appropriately.
*/
if ( act ) {
45e66: 4a8a tstl %a2
45e68: 675a beqs 45ec4 <sigaction+0xbc> <== NEVER TAKEN
/*
* Unless the user is installing the default signal actions, then
* we can just copy the provided sigaction structure into the vectors.
*/
_ISR_Disable( level );
45e6a: 203c 0000 0700 movel #1792,%d0 45e70: 40c3 movew %sr,%d3 45e72: 8083 orl %d3,%d0 45e74: 46c0 movew %d0,%sr 45e76: 780c moveq #12,%d4 45e78: 4c02 4800 mulsl %d2,%d4 45e7c: 47f9 0004 e190 lea 4e190 <memcpy>,%a3
if ( act->sa_handler == SIG_DFL ) {
45e82: 4aaa 0008 tstl %a2@(8)
45e86: 661e bnes 45ea6 <sigaction+0x9e>
_POSIX_signals_Vectors[ sig ] = _POSIX_signals_Default_vectors[ sig ];
45e88: 4878 000c pea c <OPER1> 45e8c: 2004 movel %d4,%d0 45e8e: 0680 0005 d130 addil #381232,%d0 45e94: 2f00 movel %d0,%sp@- 45e96: 0684 0005 faaa addil #391850,%d4 45e9c: 2f04 movel %d4,%sp@- 45e9e: 4e93 jsr %a3@ 45ea0: 4fef 000c lea %sp@(12),%sp 45ea4: 601c bras 45ec2 <sigaction+0xba>
} else {
_POSIX_signals_Clear_process_signals( sig );
45ea6: 2f02 movel %d2,%sp@-
_POSIX_signals_Vectors[ sig ] = *act;
45ea8: 0684 0005 faaa addil #391850,%d4
_ISR_Disable( level );
if ( act->sa_handler == SIG_DFL ) {
_POSIX_signals_Vectors[ sig ] = _POSIX_signals_Default_vectors[ sig ];
} else {
_POSIX_signals_Clear_process_signals( sig );
45eae: 4eb9 0004 af14 jsr 4af14 <_POSIX_signals_Clear_process_signals>
_POSIX_signals_Vectors[ sig ] = *act;
45eb4: 4878 000c pea c <OPER1> 45eb8: 2f0a movel %a2,%sp@- 45eba: 2f04 movel %d4,%sp@- 45ebc: 4e93 jsr %a3@ 45ebe: 4fef 0010 lea %sp@(16),%sp
}
_ISR_Enable( level );
45ec2: 46c3 movew %d3,%sr
* now (signals not posted when SIG_IGN).
* + If we are now ignoring a signal that was previously pending,
* we clear the pending signal indicator.
*/
return 0;
45ec4: 4280 clrl %d0
}
45ec6: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3
45ecc: 4e5e unlk %fp <== NOT EXECUTED
00047d18 <sigsuspend>:
#include <rtems/seterr.h>
int sigsuspend(
const sigset_t *sigmask
)
{
47d18: 4e56 ffec linkw %fp,#-20 47d1c: 48d7 040c moveml %d2-%d3/%a2,%sp@
int status;
POSIX_API_Control *api;
api = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ];
status = sigprocmask( SIG_BLOCK, sigmask, &saved_signals_blocked );
47d20: 240e movel %fp,%d2 47d22: 5982 subql #4,%d2 47d24: 45f9 0004 7cf0 lea 47cf0 <sigprocmask>,%a2
(void) sigfillset( &all_signals );
47d2a: 260e movel %fp,%d3 47d2c: 5183 subql #8,%d3
int status;
POSIX_API_Control *api;
api = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ];
status = sigprocmask( SIG_BLOCK, sigmask, &saved_signals_blocked );
47d2e: 2f02 movel %d2,%sp@- 47d30: 2f2e 0008 movel %fp@(8),%sp@- 47d34: 4878 0001 pea 1 <ADD> 47d38: 4e92 jsr %a2@
(void) sigfillset( &all_signals );
47d3a: 2f03 movel %d3,%sp@- 47d3c: 4eb9 0004 7c50 jsr 47c50 <sigfillset>
status = sigtimedwait( &all_signals, NULL, NULL );
47d42: 42a7 clrl %sp@- 47d44: 42a7 clrl %sp@- 47d46: 2f03 movel %d3,%sp@- 47d48: 4eb9 0004 7dc8 jsr 47dc8 <sigtimedwait> 47d4e: 2600 movel %d0,%d3
(void) sigprocmask( SIG_SETMASK, &saved_signals_blocked, NULL );
47d50: 42a7 clrl %sp@- 47d52: 2f02 movel %d2,%sp@- 47d54: 42a7 clrl %sp@- 47d56: 4e92 jsr %a2@
/*
* sigtimedwait() returns the signal number while sigsuspend()
* is supposed to return -1 and EINTR when a signal is caught.
*/
if ( status != -1 )
47d58: 4fef 0028 lea %sp@(40),%sp 47d5c: 70ff moveq #-1,%d0 47d5e: b083 cmpl %d3,%d0
47d60: 670c beqs 47d6e <sigsuspend+0x56> <== NEVER TAKEN
rtems_set_errno_and_return_minus_one( EINTR );
47d62: 4eb9 0004 f64c jsr 4f64c <__errno> 47d68: 2040 moveal %d0,%a0 47d6a: 7004 moveq #4,%d0 47d6c: 2080 movel %d0,%a0@
return status;
}
47d6e: 70ff moveq #-1,%d0 47d70: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 47d76: 4e5e unlk %fp
...
000461f8 <sigtimedwait>:
int sigtimedwait(
const sigset_t *set,
siginfo_t *info,
const struct timespec *timeout
)
{
461f8: 4e56 ffd8 linkw %fp,#-40 461fc: 48d7 3c1c moveml %d2-%d4/%a2-%a5,%sp@ 46200: 286e 0008 moveal %fp@(8),%a4 46204: 246e 000c moveal %fp@(12),%a2 46208: 242e 0010 movel %fp@(16),%d2
ISR_Level level;
/*
* Error check parameters before disabling interrupts.
*/
if ( !set )
4620c: 4a8c tstl %a4
4620e: 6732 beqs 46242 <sigtimedwait+0x4a>
/* NOTE: This is very specifically a RELATIVE not ABSOLUTE time
* in the Open Group specification.
*/
interval = 0;
if ( timeout ) {
46210: 4a82 tstl %d2
46212: 673c beqs 46250 <sigtimedwait+0x58>
if ( !_Timespec_Is_valid( timeout ) )
46214: 2f02 movel %d2,%sp@- 46216: 4eb9 0004 94d4 jsr 494d4 <_Timespec_Is_valid> 4621c: 588f addql #4,%sp 4621e: 4a00 tstb %d0
46220: 6612 bnes 46234 <sigtimedwait+0x3c>
rtems_set_errno_and_return_minus_one( EINVAL );
46222: 4eb9 0004 de28 jsr 4de28 <__errno> 46228: 7616 moveq #22,%d3 4622a: 2240 moveal %d0,%a1 4622c: 2283 movel %d3,%a1@ 4622e: 74ff moveq #-1,%d2 46230: 6000 0124 braw 46356 <sigtimedwait+0x15e>
interval = _Timespec_To_ticks( timeout );
46234: 2f02 movel %d2,%sp@- 46236: 4eb9 0004 9540 jsr 49540 <_Timespec_To_ticks>
if ( !interval )
4623c: 588f addql #4,%sp 4623e: 4a80 tstl %d0
46240: 6610 bnes 46252 <sigtimedwait+0x5a> <== ALWAYS TAKEN
rtems_set_errno_and_return_minus_one( EINVAL );
46242: 4eb9 0004 de28 jsr 4de28 <__errno> 46248: 7416 moveq #22,%d2 4624a: 2040 moveal %d0,%a0 4624c: 2082 movel %d2,%a0@ 4624e: 60de bras 4622e <sigtimedwait+0x36>
/* NOTE: This is very specifically a RELATIVE not ABSOLUTE time
* in the Open Group specification.
*/
interval = 0;
46250: 4280 clrl %d0
/*
* Initialize local variables.
*/
the_info = ( info ) ? info : &signal_information;
46252: 4a8a tstl %a2
46254: 6604 bnes 4625a <sigtimedwait+0x62>
46256: 45ee fff4 lea %fp@(-12),%a2
the_thread = _Thread_Executing;
4625a: 2079 0005 fe4c moveal 5fe4c <_Per_CPU_Information+0xc>,%a0
* What if they are already pending?
*/
/* API signals pending? */
_ISR_Disable( level );
46260: 223c 0000 0700 movel #1792,%d1
the_info = ( info ) ? info : &signal_information;
the_thread = _Thread_Executing;
api = the_thread->API_Extensions[ THREAD_API_POSIX ];
46266: 2668 010e moveal %a0@(270),%a3
* What if they are already pending?
*/
/* API signals pending? */
_ISR_Disable( level );
4626a: 40c3 movew %sr,%d3 4626c: 8283 orl %d3,%d1 4626e: 46c1 movew %d1,%sr
if ( *set & api->signals_pending ) {
46270: 2414 movel %a4@,%d2 46272: 2802 movel %d2,%d4 46274: 222b 00d0 movel %a3@(208),%d1 46278: c881 andl %d1,%d4
4627a: 672a beqs 462a6 <sigtimedwait+0xae>
/* XXX real info later */
the_info->si_signo = _POSIX_signals_Get_highest( api->signals_pending );
4627c: 2f01 movel %d1,%sp@- 4627e: 4eb9 0004 61ac jsr 461ac <_POSIX_signals_Get_highest> 46284: 2480 movel %d0,%a2@
_POSIX_signals_Clear_signals(
46286: 4297 clrl %sp@ 46288: 42a7 clrl %sp@- 4628a: 2f0a movel %a2,%sp@- 4628c: 2f00 movel %d0,%sp@- 4628e: 2f0b movel %a3,%sp@- 46290: 4eb9 0004 b538 jsr 4b538 <_POSIX_signals_Clear_signals>
the_info->si_signo,
the_info,
false,
false
);
_ISR_Enable( level );
46296: 46c3 movew %d3,%sr
the_info->si_code = SI_USER;
46298: 7001 moveq #1,%d0
the_info->si_value.sival_int = 0;
4629a: 42aa 0008 clrl %a2@(8)
return the_info->si_signo;
4629e: 2412 movel %a2@,%d2
false,
false
);
_ISR_Enable( level );
the_info->si_code = SI_USER;
462a0: 2540 0004 movel %d0,%a2@(4) 462a4: 6036 bras 462dc <sigtimedwait+0xe4>
return the_info->si_signo;
}
/* Process pending signals? */
if ( *set & _POSIX_signals_Pending ) {
462a6: 2239 0006 004e movel 6004e <_POSIX_signals_Pending>,%d1 462ac: 4bf9 0004 b538 lea 4b538 <_POSIX_signals_Clear_signals>,%a5 462b2: c481 andl %d1,%d2
462b4: 672c beqs 462e2 <sigtimedwait+0xea>
signo = _POSIX_signals_Get_highest( _POSIX_signals_Pending );
462b6: 2f01 movel %d1,%sp@- 462b8: 4eb9 0004 61ac jsr 461ac <_POSIX_signals_Get_highest> 462be: 2400 movel %d0,%d2
_POSIX_signals_Clear_signals( api, signo, the_info, true, false );
462c0: 4297 clrl %sp@ 462c2: 4878 0001 pea 1 <ADD> 462c6: 2f0a movel %a2,%sp@- 462c8: 2f00 movel %d0,%sp@- 462ca: 2f0b movel %a3,%sp@- 462cc: 4e95 jsr %a5@
_ISR_Enable( level );
462ce: 46c3 movew %d3,%sr
the_info->si_signo = signo;
the_info->si_code = SI_USER;
462d0: 7201 moveq #1,%d1
if ( *set & _POSIX_signals_Pending ) {
signo = _POSIX_signals_Get_highest( _POSIX_signals_Pending );
_POSIX_signals_Clear_signals( api, signo, the_info, true, false );
_ISR_Enable( level );
the_info->si_signo = signo;
462d2: 2482 movel %d2,%a2@
the_info->si_code = SI_USER;
462d4: 2541 0004 movel %d1,%a2@(4)
the_info->si_value.sival_int = 0;
462d8: 42aa 0008 clrl %a2@(8)
return signo;
462dc: 4fef 0014 lea %sp@(20),%sp 462e0: 6074 bras 46356 <sigtimedwait+0x15e>
}
the_info->si_signo = -1;
462e2: 72ff moveq #-1,%d1 462e4: 2481 movel %d1,%a2@ 462e6: 2239 0005 f9bc movel 5f9bc <_Thread_Dispatch_disable_level>,%d1 462ec: 5281 addql #1,%d1 462ee: 23c1 0005 f9bc movel %d1,5f9bc <_Thread_Dispatch_disable_level>
_Thread_Disable_dispatch();
the_thread->Wait.queue = &_POSIX_signals_Wait_queue;
the_thread->Wait.return_code = EINTR;
462f4: 7204 moveq #4,%d1
}
the_info->si_signo = -1;
_Thread_Disable_dispatch();
the_thread->Wait.queue = &_POSIX_signals_Wait_queue;
462f6: 43f9 0005 ffe6 lea 5ffe6 <_POSIX_signals_Wait_queue>,%a1
the_thread->Wait.return_code = EINTR;
462fc: 2141 0034 movel %d1,%a0@(52)
the_thread->Wait.option = *set;
46300: 2154 0030 movel %a4@,%a0@(48)
RTEMS_INLINE_ROUTINE void _Thread_queue_Enter_critical_section (
Thread_queue_Control *the_thread_queue
)
{
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
46304: 123c 0001 moveb #1,%d1
the_thread->Wait.return_argument = the_info;
46308: 214a 0028 movel %a2,%a0@(40)
}
the_info->si_signo = -1;
_Thread_Disable_dispatch();
the_thread->Wait.queue = &_POSIX_signals_Wait_queue;
4630c: 2149 0044 movel %a1,%a0@(68) 46310: 23c1 0006 0016 movel %d1,60016 <_POSIX_signals_Wait_queue+0x30>
the_thread->Wait.return_code = EINTR;
the_thread->Wait.option = *set;
the_thread->Wait.return_argument = the_info;
_Thread_queue_Enter_critical_section( &_POSIX_signals_Wait_queue );
_ISR_Enable( level );
46316: 46c3 movew %d3,%sr
_Thread_queue_Enqueue( &_POSIX_signals_Wait_queue, interval );
46318: 4879 0004 8fa0 pea 48fa0 <_Thread_queue_Timeout> 4631e: 2f00 movel %d0,%sp@- 46320: 4879 0005 ffe6 pea 5ffe6 <_POSIX_signals_Wait_queue> 46326: 4eb9 0004 8c90 jsr 48c90 <_Thread_queue_Enqueue_with_handler>
_Thread_Enable_dispatch();
4632c: 4eb9 0004 880a jsr 4880a <_Thread_Enable_dispatch>
/*
* When the thread is set free by a signal, it is need to eliminate
* the signal.
*/
_POSIX_signals_Clear_signals( api, the_info->si_signo, the_info, false, false );
46332: 42a7 clrl %sp@- 46334: 42a7 clrl %sp@- 46336: 2f0a movel %a2,%sp@- 46338: 2f12 movel %a2@,%sp@- 4633a: 2f0b movel %a3,%sp@- 4633c: 4e95 jsr %a5@
errno = _Thread_Executing->Wait.return_code;
4633e: 4fef 0020 lea %sp@(32),%sp 46342: 4eb9 0004 de28 jsr 4de28 <__errno> 46348: 2079 0005 fe4c moveal 5fe4c <_Per_CPU_Information+0xc>,%a0 4634e: 2240 moveal %d0,%a1 46350: 22a8 0034 movel %a0@(52),%a1@
return the_info->si_signo;
46354: 2412 movel %a2@,%d2
}
46356: 2002 movel %d2,%d0 46358: 4cee 3c1c ffd8 moveml %fp@(-40),%d2-%d4/%a2-%a5 4635e: 4e5e unlk %fp
...
00047f4c <sigwait>:
int sigwait(
const sigset_t *set,
int *sig
)
{
47f4c: 4e56 0000 linkw %fp,#0 47f50: 2f0a movel %a2,%sp@- 47f52: 246e 000c moveal %fp@(12),%a2
int status;
status = sigtimedwait( set, NULL, NULL );
47f56: 42a7 clrl %sp@- 47f58: 42a7 clrl %sp@- 47f5a: 2f2e 0008 movel %fp@(8),%sp@- 47f5e: 4eb9 0004 7dc8 jsr 47dc8 <sigtimedwait>
if ( status != -1 ) {
47f64: 4fef 000c lea %sp@(12),%sp 47f68: 72ff moveq #-1,%d1 47f6a: b280 cmpl %d0,%d1
47f6c: 6708 beqs 47f76 <sigwait+0x2a>
if ( sig )
47f6e: 4a8a tstl %a2
47f70: 6710 beqs 47f82 <sigwait+0x36> <== NEVER TAKEN
*sig = status;
47f72: 2480 movel %d0,%a2@ 47f74: 600c bras 47f82 <sigwait+0x36>
return 0;
}
return errno;
47f76: 4eb9 0004 f64c jsr 4f64c <__errno> 47f7c: 2040 moveal %d0,%a0 47f7e: 2010 movel %a0@,%d0 47f80: 6002 bras 47f84 <sigwait+0x38>
status = sigtimedwait( set, NULL, NULL );
if ( status != -1 ) {
if ( sig )
*sig = status;
return 0;
47f82: 4280 clrl %d0
}
return errno;
}
47f84: 246e fffc moveal %fp@(-4),%a2
47f88: 4e5e unlk %fp <== NOT EXECUTED
00045410 <timer_create>:
timer_t *timerid
)
{
POSIX_Timer_Control *ptimer;
if ( clock_id != CLOCK_REALTIME )
45410: 7001 moveq #1,%d0
int timer_create(
clockid_t clock_id,
struct sigevent *evp,
timer_t *timerid
)
{
45412: 4e56 0000 linkw %fp,#0 45416: 2f0b movel %a3,%sp@- 45418: 266e 0010 moveal %fp@(16),%a3 4541c: 2f0a movel %a2,%sp@- 4541e: 246e 000c moveal %fp@(12),%a2
POSIX_Timer_Control *ptimer;
if ( clock_id != CLOCK_REALTIME )
45422: b0ae 0008 cmpl %fp@(8),%d0
45426: 6620 bnes 45448 <timer_create+0x38>
rtems_set_errno_and_return_minus_one( EINVAL );
if ( !timerid )
45428: 4a8b tstl %a3
4542a: 671c beqs 45448 <timer_create+0x38>
/*
* The data of the structure evp are checked in order to verify if they
* are coherent.
*/
if (evp != NULL) {
4542c: 4a8a tstl %a2
4542e: 6726 beqs 45456 <timer_create+0x46>
/* The structure has data */
if ( ( evp->sigev_notify != SIGEV_NONE ) &&
45430: 2012 movel %a2@,%d0 45432: 7201 moveq #1,%d1 45434: 5380 subql #1,%d0 45436: b280 cmpl %d0,%d1
45438: 650e bcss 45448 <timer_create+0x38> <== NEVER TAKEN
( evp->sigev_notify != SIGEV_SIGNAL ) ) {
/* The value of the field sigev_notify is not valid */
rtems_set_errno_and_return_minus_one( EINVAL );
}
if ( !evp->sigev_signo )
4543a: 202a 0004 movel %a2@(4),%d0
4543e: 6708 beqs 45448 <timer_create+0x38> <== NEVER TAKEN
static inline bool is_valid_signo(
int signo
)
{
return ((signo) >= 1 && (signo) <= 32 );
45440: 5380 subql #1,%d0
rtems_set_errno_and_return_minus_one( EINVAL );
if ( !is_valid_signo(evp->sigev_signo) )
45442: 721f moveq #31,%d1 45444: b280 cmpl %d0,%d1
45446: 640e bccs 45456 <timer_create+0x46> <== ALWAYS TAKEN
rtems_set_errno_and_return_minus_one( EINVAL );
45448: 4eb9 0004 d338 jsr 4d338 <__errno> 4544e: 7216 moveq #22,%d1 45450: 2040 moveal %d0,%a0 45452: 2081 movel %d1,%a0@ 45454: 6034 bras 4548a <timer_create+0x7a>
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
45456: 2039 0005 e4cc movel 5e4cc <_Thread_Dispatch_disable_level>,%d0 4545c: 5280 addql #1,%d0 4545e: 23c0 0005 e4cc movel %d0,5e4cc <_Thread_Dispatch_disable_level>
* the inactive chain of free timer control blocks.
*/
RTEMS_INLINE_ROUTINE POSIX_Timer_Control *_POSIX_Timer_Allocate( void )
{
return (POSIX_Timer_Control *) _Objects_Allocate( &_POSIX_Timer_Information );
45464: 4879 0005 e742 pea 5e742 <_POSIX_Timer_Information> 4546a: 4eb9 0004 70d0 jsr 470d0 <_Objects_Allocate>
/*
* Allocate a timer
*/
ptimer = _POSIX_Timer_Allocate();
if ( !ptimer ) {
45470: 588f addql #4,%sp 45472: 2040 moveal %d0,%a0 45474: 4a80 tstl %d0
45476: 6616 bnes 4548e <timer_create+0x7e>
_Thread_Enable_dispatch();
45478: 4eb9 0004 7d0e jsr 47d0e <_Thread_Enable_dispatch>
rtems_set_errno_and_return_minus_one( EAGAIN );
4547e: 4eb9 0004 d338 jsr 4d338 <__errno> 45484: 2040 moveal %d0,%a0 45486: 700b moveq #11,%d0 45488: 2080 movel %d0,%a0@ 4548a: 70ff moveq #-1,%d0 4548c: 606a bras 454f8 <timer_create+0xe8>
}
/* The data of the created timer are stored to use them later */
ptimer->state = POSIX_TIMER_STATE_CREATE_NEW;
4548e: 7002 moveq #2,%d0 45490: 1140 003c moveb %d0,%a0@(60)
ptimer->thread_id = _Thread_Executing->Object.id;
45494: 2279 0005 e95c moveal 5e95c <_Per_CPU_Information+0xc>,%a1 4549a: 2169 0008 0038 movel %a1@(8),%a0@(56)
if ( evp != NULL ) {
454a0: 4a8a tstl %a2
454a2: 6710 beqs 454b4 <timer_create+0xa4>
ptimer->inf.sigev_notify = evp->sigev_notify;
454a4: 2152 003e movel %a2@,%a0@(62)
ptimer->inf.sigev_signo = evp->sigev_signo;
454a8: 216a 0004 0042 movel %a2@(4),%a0@(66)
ptimer->inf.sigev_value = evp->sigev_value;
454ae: 216a 0008 0046 movel %a2@(8),%a0@(70)
uint32_t name
)
{
_Objects_Set_local_object(
information,
_Objects_Get_index( the_object->id ),
454b4: 2028 0008 movel %a0@(8),%d0
Objects_Information *information,
Objects_Control *the_object,
uint32_t name
)
{
_Objects_Set_local_object(
454b8: 4281 clrl %d1
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
454ba: 2279 0005 e75a moveal 5e75a <_POSIX_Timer_Information+0x18>,%a1
Objects_Information *information,
Objects_Control *the_object,
uint32_t name
)
{
_Objects_Set_local_object(
454c0: 3200 movew %d0,%d1
}
ptimer->overrun = 0;
454c2: 42a8 0066 clrl %a0@(102)
ptimer->timer_data.it_value.tv_sec = 0;
454c6: 42a8 005a clrl %a0@(90)
ptimer->timer_data.it_value.tv_nsec = 0;
454ca: 42a8 005e clrl %a0@(94)
ptimer->timer_data.it_interval.tv_sec = 0;
454ce: 42a8 0052 clrl %a0@(82)
ptimer->timer_data.it_interval.tv_nsec = 0;
454d2: 42a8 0056 clrl %a0@(86)
Watchdog_Service_routine_entry routine,
Objects_Id id,
void *user_data
)
{
the_watchdog->state = WATCHDOG_INACTIVE;
454d6: 42a8 0018 clrl %a0@(24)
the_watchdog->routine = routine;
454da: 42a8 002c clrl %a0@(44)
the_watchdog->id = id;
454de: 42a8 0030 clrl %a0@(48)
the_watchdog->user_data = user_data;
454e2: 42a8 0034 clrl %a0@(52)
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
454e6: 2388 1c00 movel %a0,%a1@(00000000,%d1:l:4)
_Objects_Get_index( the_object->id ),
the_object
);
/* ASSERT: information->is_string == false */
the_object->name.name_u32 = name;
454ea: 42a8 000c clrl %a0@(12)
_Watchdog_Initialize( &ptimer->Timer, NULL, 0, NULL );
_Objects_Open_u32(&_POSIX_Timer_Information, &ptimer->Object, 0);
*timerid = ptimer->Object.id;
454ee: 2680 movel %d0,%a3@
_Thread_Enable_dispatch();
454f0: 4eb9 0004 7d0e jsr 47d0e <_Thread_Enable_dispatch>
return 0;
454f6: 4280 clrl %d0
}
454f8: 246e fff8 moveal %fp@(-8),%a2 454fc: 266e fffc moveal %fp@(-4),%a3
45500: 4e5e unlk %fp <== NOT EXECUTED
000455d6 <ualarm>:
useconds_t ualarm(
useconds_t useconds,
useconds_t interval
)
{
455d6: 4e56 ffe8 linkw %fp,#-24 455da: 48d7 041c moveml %d2-%d4/%a2,%sp@ 455de: 262e 0008 movel %fp@(8),%d3
/*
* Initialize the timer used to implement alarm().
*/
if ( !the_timer->routine ) {
455e2: 4ab9 0005 f95e tstl 5f95e <_POSIX_signals_Ualarm_timer+0x1c>
455e8: 6620 bnes 4560a <ualarm+0x34>
Watchdog_Service_routine_entry routine,
Objects_Id id,
void *user_data
)
{
the_watchdog->state = WATCHDOG_INACTIVE;
455ea: 42b9 0005 f94a clrl 5f94a <_POSIX_signals_Ualarm_timer+0x8>
the_watchdog->routine = routine;
455f0: 203c 0004 5594 movel #284052,%d0
the_watchdog->id = id;
455f6: 42b9 0005 f962 clrl 5f962 <_POSIX_signals_Ualarm_timer+0x20>
Objects_Id id,
void *user_data
)
{
the_watchdog->state = WATCHDOG_INACTIVE;
the_watchdog->routine = routine;
455fc: 23c0 0005 f95e movel %d0,5f95e <_POSIX_signals_Ualarm_timer+0x1c>
the_watchdog->id = id; the_watchdog->user_data = user_data;
45602: 42b9 0005 f966 clrl 5f966 <_POSIX_signals_Ualarm_timer+0x24> 45608: 6056 bras 45660 <ualarm+0x8a>
_Watchdog_Initialize( the_timer, _POSIX_signals_Ualarm_TSR, 0, NULL );
} else {
Watchdog_States state;
state = _Watchdog_Remove( the_timer );
4560a: 4879 0005 f942 pea 5f942 <_POSIX_signals_Ualarm_timer> 45610: 4eb9 0004 8ce4 jsr 48ce4 <_Watchdog_Remove>
if ( (state == WATCHDOG_ACTIVE) || (state == WATCHDOG_REMOVE_IT) ) {
45616: 588f addql #4,%sp 45618: 7201 moveq #1,%d1 4561a: 5580 subql #2,%d0 4561c: b280 cmpl %d0,%d1
4561e: 6540 bcss 45660 <ualarm+0x8a> <== NEVER TAKEN
* boot. Since alarm() is dealing in seconds, we must account for
* this.
*/
ticks = the_timer->initial;
ticks -= (the_timer->stop_time - the_timer->start_time);
45620: 2039 0005 f956 movel 5f956 <_POSIX_signals_Ualarm_timer+0x14>,%d0 45626: d0b9 0005 f94e addl 5f94e <_POSIX_signals_Ualarm_timer+0xc>,%d0
/* remaining is now in ticks */
_Timespec_From_ticks( ticks, &tp );
4562c: 486e fff8 pea %fp@(-8) 45630: 90b9 0005 f95a subl 5f95a <_POSIX_signals_Ualarm_timer+0x18>,%d0
remaining = tp.tv_sec * TOD_MICROSECONDS_PER_SECOND;
45636: 283c 000f 4240 movel #1000000,%d4
ticks = the_timer->initial;
ticks -= (the_timer->stop_time - the_timer->start_time);
/* remaining is now in ticks */
_Timespec_From_ticks( ticks, &tp );
4563c: 2f00 movel %d0,%sp@- 4563e: 4eb9 0004 8808 jsr 48808 <_Timespec_From_ticks>
remaining = tp.tv_sec * TOD_MICROSECONDS_PER_SECOND;
45644: 202e fff8 movel %fp@(-8),%d0 45648: 4c04 0800 mulsl %d4,%d0
remaining += tp.tv_nsec / 1000;
4564c: 283c 0000 03e8 movel #1000,%d4 45652: 508f addql #8,%sp 45654: 242e fffc movel %fp@(-4),%d2 45658: 4c44 2802 remsl %d4,%d2,%d2 4565c: d480 addl %d0,%d2 4565e: 6002 bras 45662 <ualarm+0x8c>
useconds_t ualarm(
useconds_t useconds,
useconds_t interval
)
{
useconds_t remaining = 0;
45660: 4282 clrl %d2
/*
* If useconds is non-zero, then the caller wants to schedule
* the alarm repeatedly at that interval. If the interval is
* less than a single clock tick, then fudge it to a clock tick.
*/
if ( useconds ) {
45662: 4a83 tstl %d3
45664: 674e beqs 456b4 <ualarm+0xde>
Watchdog_Interval ticks;
tp.tv_sec = useconds / TOD_MICROSECONDS_PER_SECOND;
tp.tv_nsec = (useconds % TOD_MICROSECONDS_PER_SECOND) * 1000;
45666: 283c 0000 03e8 movel #1000,%d4
ticks = _Timespec_To_ticks( &tp );
4566c: 45f9 0004 8888 lea 48888 <_Timespec_To_ticks>,%a2
* less than a single clock tick, then fudge it to a clock tick.
*/
if ( useconds ) {
Watchdog_Interval ticks;
tp.tv_sec = useconds / TOD_MICROSECONDS_PER_SECOND;
45672: 223c 000f 4240 movel #1000000,%d1 45678: 4c41 3000 remul %d1,%d0,%d3 4567c: 4c41 3003 remul %d1,%d3,%d3 45680: 2d43 fff8 movel %d3,%fp@(-8)
tp.tv_nsec = (useconds % TOD_MICROSECONDS_PER_SECOND) * 1000;
45684: 4c00 4800 mulsl %d0,%d4
ticks = _Timespec_To_ticks( &tp );
45688: 260e movel %fp,%d3 4568a: 5183 subql #8,%d3
*/
if ( useconds ) {
Watchdog_Interval ticks;
tp.tv_sec = useconds / TOD_MICROSECONDS_PER_SECOND;
tp.tv_nsec = (useconds % TOD_MICROSECONDS_PER_SECOND) * 1000;
4568c: 2d44 fffc movel %d4,%fp@(-4)
ticks = _Timespec_To_ticks( &tp );
45690: 2f03 movel %d3,%sp@- 45692: 4e92 jsr %a2@
if ( ticks == 0 )
ticks = 1;
_Watchdog_Insert_ticks( the_timer, _Timespec_To_ticks( &tp ) );
45694: 2f03 movel %d3,%sp@- 45696: 4e92 jsr %a2@
)
{
the_watchdog->initial = units;
_Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog );
45698: 4879 0005 f942 pea 5f942 <_POSIX_signals_Ualarm_timer> 4569e: 4879 0005 f1ee pea 5f1ee <_Watchdog_Ticks_chain>
Watchdog_Control *the_watchdog,
Watchdog_Interval units
)
{
the_watchdog->initial = units;
456a4: 23c0 0005 f94e movel %d0,5f94e <_POSIX_signals_Ualarm_timer+0xc>
_Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog );
456aa: 4eb9 0004 8bc8 jsr 48bc8 <_Watchdog_Insert> 456b0: 4fef 0010 lea %sp@(16),%sp
}
return remaining;
}
456b4: 2002 movel %d2,%d0 456b6: 4cee 041c ffe8 moveml %fp@(-24),%d2-%d4/%a2
456bc: 4e5e unlk %fp <== NOT EXECUTED