30016d90 <_CORE_message_queue_Broadcast>:
{
Thread_Control *the_thread;
uint32_t number_broadcasted;
Thread_Wait_information *waitp;
if ( size > the_message_queue->maximum_message_size ) {
30016d90: e590304c ldr r3, [r0, #76] ; 0x4c
Objects_Id id __attribute__((unused)),
CORE_message_queue_API_mp_support_callout api_message_queue_mp_support __attribute__((unused)),
#endif
uint32_t *count
)
{
30016d94: e92d45f0 push {r4, r5, r6, r7, r8, sl, lr}
Thread_Control *the_thread;
uint32_t number_broadcasted;
Thread_Wait_information *waitp;
if ( size > the_message_queue->maximum_message_size ) {
30016d98: e1530002 cmp r3, r2
Objects_Id id __attribute__((unused)),
CORE_message_queue_API_mp_support_callout api_message_queue_mp_support __attribute__((unused)),
#endif
uint32_t *count
)
{
30016d9c: e1a07000 mov r7, r0 30016da0: e1a05002 mov r5, r2 30016da4: e1a08001 mov r8, r1 30016da8: e59da020 ldr sl, [sp, #32]
Thread_Control *the_thread;
uint32_t number_broadcasted;
Thread_Wait_information *waitp;
if ( size > the_message_queue->maximum_message_size ) {
30016dac: 3a000016 bcc 30016e0c <_CORE_message_queue_Broadcast+0x7c>
* 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 ) {
30016db0: e5906048 ldr r6, [r0, #72] ; 0x48 30016db4: e3560000 cmp r6, #0
*count = 0;
30016db8: 13a00000 movne r0, #0 30016dbc: 158a0000 strne r0, [sl]
* 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 ) {
30016dc0: 18bd85f0 popne {r4, r5, r6, r7, r8, sl, pc}
/* * There must be no pending messages if there is a thread waiting to * receive a message. */ number_broadcasted = 0; while ((the_thread =
30016dc4: e1a00007 mov r0, r7 30016dc8: eb000a5c bl 30019740 <_Thread_queue_Dequeue> 30016dcc: e2504000 subs r4, r0, #0
30016dd0: 0a00000a beq 30016e00 <_CORE_message_queue_Broadcast+0x70>
const void *source,
void *destination,
size_t size
)
{
memcpy(destination, source, size);
30016dd4: e594002c ldr r0, [r4, #44] ; 0x2c 30016dd8: e1a01008 mov r1, r8 30016ddc: e1a02005 mov r2, r5 30016de0: eb002460 bl 3001ff68 <memcpy>
buffer,
waitp->return_argument_second.mutable_object,
size
);
*(size_t *) the_thread->Wait.return_argument = size;
30016de4: e5943028 ldr r3, [r4, #40] ; 0x28
/* * There must be no pending messages if there is a thread waiting to * receive a message. */ number_broadcasted = 0; while ((the_thread =
30016de8: e1a00007 mov r0, r7
buffer,
waitp->return_argument_second.mutable_object,
size
);
*(size_t *) the_thread->Wait.return_argument = size;
30016dec: e5835000 str r5, [r3]
/* * There must be no pending messages if there is a thread waiting to * receive a message. */ number_broadcasted = 0; while ((the_thread =
30016df0: eb000a52 bl 30019740 <_Thread_queue_Dequeue> 30016df4: e2504000 subs r4, r0, #0
_Thread_queue_Dequeue(&the_message_queue->Wait_queue))) {
waitp = &the_thread->Wait;
number_broadcasted += 1;
30016df8: e2866001 add r6, r6, #1
/*
* There must be no pending messages if there is a thread waiting to
* receive a message.
*/
number_broadcasted = 0;
while ((the_thread =
30016dfc: 1afffff4 bne 30016dd4 <_CORE_message_queue_Broadcast+0x44>
if ( !_Objects_Is_local_id( the_thread->Object.id ) )
(*api_message_queue_mp_support) ( the_thread, id );
#endif
}
*count = number_broadcasted;
30016e00: e58a6000 str r6, [sl]
return CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL;
30016e04: e1a00004 mov r0, r4
30016e08: e8bd85f0 pop {r4, r5, r6, r7, r8, sl, pc}
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;
30016e0c: e3a00001 mov r0, #1 <== NOT EXECUTED
#endif
}
*count = number_broadcasted;
return CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL;
}
30016e10: e8bd85f0 pop {r4, r5, r6, r7, r8, sl, pc} <== NOT EXECUTED
3000b570 <_Chain_Initialize>:
count = number_nodes;
current = _Chain_Head( the_chain );
the_chain->permanent_null = NULL;
next = starting_address;
while ( count-- ) {
3000b570: e3520000 cmp r2, #0
Chain_Node *current;
Chain_Node *next;
count = number_nodes;
current = _Chain_Head( the_chain );
the_chain->permanent_null = NULL;
3000b574: e3a0c000 mov ip, #0
Chain_Control *the_chain,
void *starting_address,
size_t number_nodes,
size_t node_size
)
{
3000b578: e92d0070 push {r4, r5, r6}
Chain_Node *current;
Chain_Node *next;
count = number_nodes;
current = _Chain_Head( the_chain );
the_chain->permanent_null = NULL;
3000b57c: e580c004 str ip, [r0, #4]
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Head(
Chain_Control *the_chain
)
{
return (Chain_Node *) the_chain;
3000b580: e1a04000 mov r4, r0
next = starting_address;
3000b584: 11a05002 movne r5, r2 3000b588: 11a0c001 movne ip, r1
while ( count-- ) {
3000b58c: 1a000002 bne 3000b59c <_Chain_Initialize+0x2c>
3000b590: ea000008 b 3000b5b8 <_Chain_Initialize+0x48> <== NOT EXECUTED
3000b594: e1a0400c mov r4, ip
current->next = next;
next->previous = current;
current = next;
next = (Chain_Node *)
3000b598: e1a0c006 mov ip, r6
count = number_nodes;
current = _Chain_Head( the_chain );
the_chain->permanent_null = NULL;
next = starting_address;
while ( count-- ) {
3000b59c: e2555001 subs r5, r5, #1
current->next = next;
3000b5a0: e584c000 str ip, [r4]
next->previous = current;
3000b5a4: e58c4004 str r4, [ip, #4]
* node_size - size of node in bytes
*
* Output parameters: NONE
*/
void _Chain_Initialize(
3000b5a8: e08c6003 add r6, ip, r3
count = number_nodes;
current = _Chain_Head( the_chain );
the_chain->permanent_null = NULL;
next = starting_address;
while ( count-- ) {
3000b5ac: 1afffff8 bne 3000b594 <_Chain_Initialize+0x24>
* node_size - size of node in bytes
*
* Output parameters: NONE
*/
void _Chain_Initialize(
3000b5b0: e2422001 sub r2, r2, #1
count = number_nodes;
current = _Chain_Head( the_chain );
the_chain->permanent_null = NULL;
next = starting_address;
while ( count-- ) {
3000b5b4: e0241293 mla r4, r3, r2, r1
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
3000b5b8: e2803004 add r3, r0, #4
next->previous = current;
current = next;
next = (Chain_Node *)
_Addresses_Add_offset( (void *) next, node_size );
}
current->next = _Chain_Tail( the_chain );
3000b5bc: e5843000 str r3, [r4]
the_chain->last = current;
3000b5c0: e5804008 str r4, [r0, #8]
}
3000b5c4: e8bd0070 pop {r4, r5, r6}
3000b5c8: e12fff1e bx lr
3000b7ac <_Heap_Allocate_aligned_with_boundary>:
Heap_Control *heap,
uintptr_t alloc_size,
uintptr_t alignment,
uintptr_t boundary
)
{
3000b7ac: e92d4ff0 push {r4, r5, r6, r7, r8, r9, sl, fp, lr}
3000b7b0: e1a08002 mov r8, r2
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;
3000b7b4: e5902010 ldr r2, [r0, #16]
Heap_Control *heap,
uintptr_t alloc_size,
uintptr_t alignment,
uintptr_t boundary
)
{
3000b7b8: e24dd01c sub sp, sp, #28 3000b7bc: e1a05001 mov r5, r1
- HEAP_BLOCK_SIZE_OFFSET;
uintptr_t const page_size = heap->page_size;
uintptr_t alloc_begin = 0;
uint32_t search_count = 0;
if ( block_size_floor < alloc_size ) {
3000b7c0: e2911004 adds r1, r1, #4
Heap_Control *heap,
uintptr_t alloc_size,
uintptr_t alignment,
uintptr_t boundary
)
{
3000b7c4: e1a07000 mov r7, r0
- HEAP_BLOCK_SIZE_OFFSET;
uintptr_t const page_size = heap->page_size;
uintptr_t alloc_begin = 0;
uint32_t search_count = 0;
if ( block_size_floor < alloc_size ) {
3000b7c8: e58d1000 str r1, [sp]
Heap_Control *heap,
uintptr_t alloc_size,
uintptr_t alignment,
uintptr_t boundary
)
{
3000b7cc: e1a0b003 mov fp, r3
if ( stats->max_search < search_count ) {
stats->max_search = search_count;
}
return (void *) alloc_begin;
}
3000b7d0: e5909008 ldr r9, [r0, #8]
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;
3000b7d4: e58d200c str r2, [sp, #12]
uintptr_t alloc_begin = 0;
uint32_t search_count = 0;
if ( block_size_floor < alloc_size ) {
3000b7d8: 2a000073 bcs 3000b9ac <_Heap_Allocate_aligned_with_boundary+0x200>
/* Integer overflow occured */
return NULL;
}
if ( boundary != 0 ) {
3000b7dc: e3530000 cmp r3, #0
3000b7e0: 1a00006f bne 3000b9a4 <_Heap_Allocate_aligned_with_boundary+0x1f8>
if ( alignment == 0 ) {
alignment = page_size;
}
}
while ( block != free_list_tail ) {
3000b7e4: e1570009 cmp r7, r9
3000b7e8: 0a00006f beq 3000b9ac <_Heap_Allocate_aligned_with_boundary+0x200>
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
3000b7ec: e59d300c ldr r3, [sp, #12]
+ HEAP_BLOCK_HEADER_SIZE + page_size - 1;
uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET;
3000b7f0: e2651004 rsb r1, r5, #4
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
3000b7f4: e2833007 add r3, r3, #7
if ( alignment == 0 ) {
alignment = page_size;
}
}
while ( block != free_list_tail ) {
3000b7f8: e3a06000 mov r6, #0
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
3000b7fc: e58d3010 str r3, [sp, #16]
+ HEAP_BLOCK_HEADER_SIZE + page_size - 1;
uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET;
3000b800: e58d1014 str r1, [sp, #20]
/*
* 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 ) {
3000b804: e599a004 ldr sl, [r9, #4] 3000b808: e59d2000 ldr r2, [sp]
while ( block != free_list_tail ) {
_HAssert( _Heap_Is_prev_used( block ) );
/* Statistics */
++search_count;
3000b80c: e2866001 add r6, r6, #1
/*
* 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 ) {
3000b810: e152000a cmp r2, sl
3000b814: 2a00004f bcs 3000b958 <_Heap_Allocate_aligned_with_boundary+0x1ac>
if ( alignment == 0 ) {
3000b818: e3580000 cmp r8, #0
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Alloc_area_of_block(
const Heap_Block *block
)
{
return (uintptr_t) block + HEAP_BLOCK_HEADER_SIZE;
3000b81c: 02894008 addeq r4, r9, #8
3000b820: 0a00004a beq 3000b950 <_Heap_Allocate_aligned_with_boundary+0x1a4>
if ( stats->max_search < search_count ) {
stats->max_search = search_count;
}
return (void *) alloc_begin;
}
3000b824: e5973014 ldr r3, [r7, #20]
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;
uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET;
uintptr_t alloc_begin = alloc_end - alloc_size;
3000b828: e59d1014 ldr r1, [sp, #20]
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;
3000b82c: e59d2010 ldr r2, [sp, #16]
- 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;
3000b830: e3caa001 bic sl, sl, #1
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;
3000b834: e089a00a add sl, r9, sl
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;
uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET;
uintptr_t alloc_begin = alloc_end - alloc_size;
3000b838: e081400a add r4, r1, sl
if ( stats->max_search < search_count ) {
stats->max_search = search_count;
}
return (void *) alloc_begin;
}
3000b83c: e58d3004 str r3, [sp, #4]
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;
3000b840: e0633002 rsb r3, r3, r2
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_down(
uintptr_t value,
uintptr_t alignment
)
{
return value - (value % alignment);
3000b844: e1a00004 mov r0, r4
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
3000b848: e083a00a add sl, r3, sl 3000b84c: e1a01008 mov r1, r8
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Alloc_area_of_block(
const Heap_Block *block
)
{
return (uintptr_t) block + HEAP_BLOCK_HEADER_SIZE;
3000b850: e2893008 add r3, r9, #8 3000b854: e58d3008 str r3, [sp, #8]
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_down(
uintptr_t value,
uintptr_t alignment
)
{
return value - (value % alignment);
3000b858: eb00169b bl 300112cc <__umodsi3> 3000b85c: e0604004 rsb r4, r0, r4
uintptr_t alloc_begin = alloc_end - alloc_size;
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 ) {
3000b860: e15a0004 cmp sl, r4
3000b864: 2a000003 bcs 3000b878 <_Heap_Allocate_aligned_with_boundary+0xcc>
3000b868: e1a0000a mov r0, sl 3000b86c: e1a01008 mov r1, r8 3000b870: eb001695 bl 300112cc <__umodsi3> 3000b874: e060400a rsb r4, r0, sl
}
alloc_end = alloc_begin + alloc_size;
/* Ensure boundary constaint */
if ( boundary != 0 ) {
3000b878: e35b0000 cmp fp, #0
3000b87c: 0a000025 beq 3000b918 <_Heap_Allocate_aligned_with_boundary+0x16c>
/* 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;
3000b880: e084a005 add sl, r4, r5 3000b884: e1a0000a mov r0, sl 3000b888: e1a0100b mov r1, fp 3000b88c: eb00168e bl 300112cc <__umodsi3> 3000b890: e060000a rsb r0, r0, sl
/* 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 ) {
3000b894: e1540000 cmp r4, r0 3000b898: 23a03000 movcs r3, #0 3000b89c: 33a03001 movcc r3, #1 3000b8a0: e15a0000 cmp sl, r0 3000b8a4: 93a03000 movls r3, #0 3000b8a8: e3530000 cmp r3, #0
3000b8ac: 0a000019 beq 3000b918 <_Heap_Allocate_aligned_with_boundary+0x16c>
alloc_end = alloc_begin + alloc_size;
/* Ensure boundary constaint */
if ( boundary != 0 ) {
uintptr_t const boundary_floor = alloc_begin_floor + alloc_size;
3000b8b0: e59d1008 ldr r1, [sp, #8] 3000b8b4: e081a005 add sl, r1, r5
uintptr_t boundary_line = _Heap_Align_down( alloc_end, boundary );
while ( alloc_begin < boundary_line && boundary_line < alloc_end ) {
if ( boundary_line < boundary_floor ) {
3000b8b8: e15a0000 cmp sl, r0 3000b8bc: 958d6018 strls r6, [sp, #24]
3000b8c0: 9a000002 bls 3000b8d0 <_Heap_Allocate_aligned_with_boundary+0x124>
3000b8c4: ea000023 b 3000b958 <_Heap_Allocate_aligned_with_boundary+0x1ac> 3000b8c8: e15a0000 cmp sl, r0
3000b8cc: 8a000038 bhi 3000b9b4 <_Heap_Allocate_aligned_with_boundary+0x208>
return 0;
}
alloc_begin = boundary_line - alloc_size;
3000b8d0: e0654000 rsb r4, r5, r0 3000b8d4: e1a01008 mov r1, r8 3000b8d8: e1a00004 mov r0, r4 3000b8dc: eb00167a bl 300112cc <__umodsi3> 3000b8e0: e0604004 rsb r4, r0, r4
alloc_begin = _Heap_Align_down( alloc_begin, alignment );
alloc_end = alloc_begin + alloc_size;
3000b8e4: e0846005 add r6, r4, r5 3000b8e8: e1a00006 mov r0, r6 3000b8ec: e1a0100b mov r1, fp 3000b8f0: eb001675 bl 300112cc <__umodsi3> 3000b8f4: e0600006 rsb r0, r0, r6
/* 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 ) {
3000b8f8: e1560000 cmp r6, r0 3000b8fc: 93a06000 movls r6, #0 3000b900: 83a06001 movhi r6, #1 3000b904: e1540000 cmp r4, r0 3000b908: 23a06000 movcs r6, #0 3000b90c: e3560000 cmp r6, #0
3000b910: 1affffec bne 3000b8c8 <_Heap_Allocate_aligned_with_boundary+0x11c>
3000b914: e59d6018 ldr r6, [sp, #24]
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 ) {
3000b918: e59d2008 ldr r2, [sp, #8] 3000b91c: e1520004 cmp r2, r4
3000b920: 8a00000c bhi 3000b958 <_Heap_Allocate_aligned_with_boundary+0x1ac>
3000b924: e59d100c ldr r1, [sp, #12] 3000b928: e1a00004 mov r0, r4 3000b92c: eb001666 bl 300112cc <__umodsi3> 3000b930: e3e0a007 mvn sl, #7 3000b934: e069a00a rsb sl, r9, sl
uintptr_t alloc_begin,
uintptr_t page_size
)
{
return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size )
- HEAP_BLOCK_HEADER_SIZE);
3000b938: e08aa004 add sl, sl, r4
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;
if ( free_size >= min_block_size || free_size == 0 ) {
3000b93c: e59d1004 ldr r1, [sp, #4] 3000b940: e060300a rsb r3, r0, sl 3000b944: e15a0000 cmp sl, r0 3000b948: 11510003 cmpne r1, r3
3000b94c: 8a000001 bhi 3000b958 <_Heap_Allocate_aligned_with_boundary+0x1ac>
boundary
);
}
}
if ( alloc_begin != 0 ) {
3000b950: e3540000 cmp r4, #0
3000b954: 1a000004 bne 3000b96c <_Heap_Allocate_aligned_with_boundary+0x1c0>
break;
}
block = block->next;
3000b958: e5999008 ldr r9, [r9, #8]
if ( alignment == 0 ) {
alignment = page_size;
}
}
while ( block != free_list_tail ) {
3000b95c: e1570009 cmp r7, r9
3000b960: 1affffa7 bne 3000b804 <_Heap_Allocate_aligned_with_boundary+0x58>
3000b964: e3a00000 mov r0, #0 3000b968: ea000008 b 3000b990 <_Heap_Allocate_aligned_with_boundary+0x1e4>
block = block->next;
}
if ( alloc_begin != 0 ) {
/* Statistics */
stats->searches += search_count;
3000b96c: e597304c ldr r3, [r7, #76] ; 0x4c
block = _Heap_Block_allocate( heap, block, alloc_begin, alloc_size );
3000b970: e1a00007 mov r0, r7
block = block->next;
}
if ( alloc_begin != 0 ) {
/* Statistics */
stats->searches += search_count;
3000b974: e0833006 add r3, r3, r6 3000b978: e587304c str r3, [r7, #76] ; 0x4c
block = _Heap_Block_allocate( heap, block, alloc_begin, alloc_size );
3000b97c: e1a01009 mov r1, r9 3000b980: e1a02004 mov r2, r4 3000b984: e1a03005 mov r3, r5 3000b988: ebffebcc bl 300068c0 <_Heap_Block_allocate> 3000b98c: e1a00004 mov r0, r4
boundary
);
}
/* Statistics */
if ( stats->max_search < search_count ) {
3000b990: e5973044 ldr r3, [r7, #68] ; 0x44 3000b994: e1530006 cmp r3, r6
stats->max_search = search_count;
3000b998: 35876044 strcc r6, [r7, #68] ; 0x44
}
return (void *) alloc_begin;
}
3000b99c: e28dd01c add sp, sp, #28
3000b9a0: e8bd8ff0 pop {r4, r5, r6, r7, r8, r9, sl, fp, pc}
/* Integer overflow occured */
return NULL;
}
if ( boundary != 0 ) {
if ( boundary < alloc_size ) {
3000b9a4: e1550003 cmp r5, r3
3000b9a8: 9a000006 bls 3000b9c8 <_Heap_Allocate_aligned_with_boundary+0x21c>
if ( alignment == 0 ) {
alignment = page_size;
}
}
while ( block != free_list_tail ) {
3000b9ac: e3a00000 mov r0, #0 3000b9b0: eafffff9 b 3000b99c <_Heap_Allocate_aligned_with_boundary+0x1f0>
if ( alloc_begin != 0 ) {
break;
}
block = block->next;
3000b9b4: e5999008 ldr r9, [r9, #8] <== NOT EXECUTED 3000b9b8: e59d6018 ldr r6, [sp, #24] <== NOT EXECUTED
if ( alignment == 0 ) {
alignment = page_size;
}
}
while ( block != free_list_tail ) {
3000b9bc: e1570009 cmp r7, r9 <== NOT EXECUTED 3000b9c0: 1affff8f bne 3000b804 <_Heap_Allocate_aligned_with_boundary+0x58><== NOT EXECUTED 3000b9c4: eaffffe6 b 3000b964 <_Heap_Allocate_aligned_with_boundary+0x1b8><== NOT EXECUTED
if ( boundary < alloc_size ) {
return NULL;
}
if ( alignment == 0 ) {
alignment = page_size;
3000b9c8: e3580000 cmp r8, #0 3000b9cc: 01a08002 moveq r8, r2 3000b9d0: eaffff83 b 3000b7e4 <_Heap_Allocate_aligned_with_boundary+0x38>
3000b9d4 <_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 )
{
3000b9d4: e92d45f0 push {r4, r5, r6, r7, r8, sl, lr}
3000b9d8: e1a04000 mov r4, r0
3000b9dc: e1a05001 mov r5, r1
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_down(
uintptr_t value,
uintptr_t alignment
)
{
return value - (value % alignment);
3000b9e0: e1a00001 mov r0, r1 3000b9e4: e5941010 ldr r1, [r4, #16] 3000b9e8: eb001637 bl 300112cc <__umodsi3> 3000b9ec: e2455008 sub r5, r5, #8
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
3000b9f0: e5943020 ldr r3, [r4, #32]
uintptr_t alloc_begin,
uintptr_t page_size
)
{
return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size )
- HEAP_BLOCK_HEADER_SIZE);
3000b9f4: e0605005 rsb r5, r0, r5
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;
3000b9f8: e1550003 cmp r5, r3
3000b9fc: 3a00002f bcc 3000bac0 <_Heap_Free+0xec>
3000ba00: e5941024 ldr r1, [r4, #36] ; 0x24 3000ba04: e1550001 cmp r5, r1
3000ba08: 8a00002c bhi 3000bac0 <_Heap_Free+0xec>
--stats->used_blocks;
++stats->frees;
stats->free_size += block_size;
return( true );
}
3000ba0c: e595c004 ldr ip, [r5, #4]
- 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;
3000ba10: e3cc6001 bic r6, ip, #1
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
3000ba14: e0852006 add r2, r5, r6
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;
3000ba18: e1530002 cmp r3, r2
3000ba1c: 8a000027 bhi 3000bac0 <_Heap_Free+0xec>
3000ba20: e1510002 cmp r1, r2
3000ba24: 3a000027 bcc 3000bac8 <_Heap_Free+0xf4>
3000ba28: e5927004 ldr r7, [r2, #4]
if ( !_Heap_Is_block_in_heap( heap, next_block ) ) {
_HAssert( false );
return false;
}
if ( !_Heap_Is_prev_used( next_block ) ) {
3000ba2c: e2170001 ands r0, r7, #1
3000ba30: 08bd85f0 popeq {r4, r5, r6, r7, r8, sl, pc}
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 ));
3000ba34: e1510002 cmp r1, r2
- 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;
3000ba38: e3c77001 bic r7, r7, #1 3000ba3c: 03a08000 moveq r8, #0
3000ba40: 0a000004 beq 3000ba58 <_Heap_Free+0x84>
--stats->used_blocks;
++stats->frees;
stats->free_size += block_size;
return( true );
}
3000ba44: e0820007 add r0, r2, r7
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;
3000ba48: e5900004 ldr r0, [r0, #4]
#include <rtems/system.h>
#include <rtems/score/sysstate.h>
#include <rtems/score/heap.h>
bool _Heap_Free( Heap_Control *heap, void *alloc_begin_ptr )
3000ba4c: e3100001 tst r0, #1 3000ba50: 13a08000 movne r8, #0 3000ba54: 03a08001 moveq r8, #1
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 ));
if ( !_Heap_Is_prev_used( block ) ) {
3000ba58: e21c0001 ands r0, ip, #1
3000ba5c: 1a00001b bne 3000bad0 <_Heap_Free+0xfc>
uintptr_t const prev_size = block->prev_size;
3000ba60: e595c000 ldr ip, [r5]
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
3000ba64: e06ca005 rsb sl, ip, r5
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;
3000ba68: e153000a cmp r3, sl
3000ba6c: 88bd85f0 pophi {r4, r5, r6, r7, r8, sl, pc}
3000ba70: e151000a cmp r1, sl
3000ba74: 38bd85f0 popcc {r4, r5, r6, r7, r8, sl, pc}
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;
3000ba78: e59a0004 ldr r0, [sl, #4]
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) ) {
3000ba7c: e2100001 ands r0, r0, #1
3000ba80: 08bd85f0 popeq {r4, r5, r6, r7, r8, sl, pc}
_HAssert( false );
return( false );
}
if ( next_is_free ) { /* coalesce both */
3000ba84: e3580000 cmp r8, #0
3000ba88: 0a000039 beq 3000bb74 <_Heap_Free+0x1a0>
uintptr_t const size = block_size + prev_size + next_block_size;
_Heap_Free_list_remove( next_block );
stats->free_blocks -= 1;
3000ba8c: e5940038 ldr r0, [r4, #56] ; 0x38
_HAssert( false );
return( false );
}
if ( next_is_free ) { /* coalesce both */
uintptr_t const size = block_size + prev_size + next_block_size;
3000ba90: e0867007 add r7, r6, r7
--stats->used_blocks;
++stats->frees;
stats->free_size += block_size;
return( true );
}
3000ba94: e5923008 ldr r3, [r2, #8]
_HAssert( false );
return( false );
}
if ( next_is_free ) { /* coalesce both */
uintptr_t const size = block_size + prev_size + next_block_size;
3000ba98: e087c00c add ip, r7, ip
--stats->used_blocks;
++stats->frees;
stats->free_size += block_size;
return( true );
}
3000ba9c: e592200c ldr r2, [r2, #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;
3000baa0: e2400001 sub r0, r0, #1
prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
3000baa4: e38c1001 orr r1, ip, #1
RTEMS_INLINE_ROUTINE void _Heap_Free_list_remove( Heap_Block *block )
{
Heap_Block *next = block->next;
Heap_Block *prev = block->prev;
prev->next = next;
3000baa8: e5823008 str r3, [r2, #8]
next->prev = prev;
3000baac: e583200c str r2, [r3, #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;
3000bab0: e5840038 str r0, [r4, #56] ; 0x38
prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
3000bab4: e58a1004 str r1, [sl, #4]
next_block = _Heap_Block_at( prev_block, size );
_HAssert(!_Heap_Is_prev_used( next_block));
next_block->prev_size = size;
3000bab8: e78ac00c str ip, [sl, ip] 3000babc: ea00000f b 3000bb00 <_Heap_Free+0x12c>
block_size = _Heap_Block_size( block );
next_block = _Heap_Block_at( block, block_size );
if ( !_Heap_Is_block_in_heap( heap, next_block ) ) {
_HAssert( false );
return false;
3000bac0: e3a00000 mov r0, #0
3000bac4: e8bd85f0 pop {r4, r5, r6, r7, r8, sl, pc}
3000bac8: e3a00000 mov r0, #0 <== NOT EXECUTED
--stats->used_blocks;
++stats->frees;
stats->free_size += block_size;
return( true );
}
3000bacc: e8bd85f0 pop {r4, r5, r6, r7, r8, sl, pc} <== NOT EXECUTED
uintptr_t const size = block_size + prev_size;
prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED;
next_block->prev_size = size;
}
} else if ( next_is_free ) { /* coalesce next */
3000bad0: e3580000 cmp r8, #0
3000bad4: 0a000014 beq 3000bb2c <_Heap_Free+0x158>
--stats->used_blocks;
++stats->frees;
stats->free_size += block_size;
return( true );
}
3000bad8: e5923008 ldr r3, [r2, #8]
prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED;
next_block->prev_size = size;
}
} else if ( next_is_free ) { /* coalesce next */
uintptr_t const size = block_size + next_block_size;
3000badc: e0877006 add r7, r7, r6
--stats->used_blocks;
++stats->frees;
stats->free_size += block_size;
return( true );
}
3000bae0: e592200c ldr r2, [r2, #12]
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;
3000bae4: e3871001 orr r1, r7, #1
)
{
Heap_Block *next = old_block->next;
Heap_Block *prev = old_block->prev;
new_block->next = next;
3000bae8: e5853008 str r3, [r5, #8]
new_block->prev = prev;
3000baec: e585200c str r2, [r5, #12]
next->prev = new_block;
prev->next = new_block;
3000baf0: e5825008 str r5, [r2, #8]
Heap_Block *prev = old_block->prev;
new_block->next = next;
new_block->prev = prev;
next->prev = new_block;
3000baf4: e583500c str r5, [r3, #12] 3000baf8: e5851004 str r1, [r5, #4]
next_block = _Heap_Block_at( block, size );
next_block->prev_size = size;
3000bafc: e7857007 str r7, [r5, r7]
stats->max_free_blocks = stats->free_blocks;
}
}
/* Statistics */
--stats->used_blocks;
3000bb00: e5942040 ldr r2, [r4, #64] ; 0x40
++stats->frees;
3000bb04: e5943050 ldr r3, [r4, #80] ; 0x50
stats->free_size += block_size;
3000bb08: e5941030 ldr r1, [r4, #48] ; 0x30
stats->max_free_blocks = stats->free_blocks;
}
}
/* Statistics */
--stats->used_blocks;
3000bb0c: e2422001 sub r2, r2, #1
++stats->frees;
3000bb10: e2833001 add r3, r3, #1
stats->free_size += block_size;
3000bb14: e0816006 add r6, r1, r6
stats->max_free_blocks = stats->free_blocks;
}
}
/* Statistics */
--stats->used_blocks;
3000bb18: e5842040 str r2, [r4, #64] ; 0x40
++stats->frees;
3000bb1c: e5843050 str r3, [r4, #80] ; 0x50
stats->free_size += block_size;
3000bb20: e5846030 str r6, [r4, #48] ; 0x30
return( true );
3000bb24: e3a00001 mov r0, #1
3000bb28: e8bd85f0 pop {r4, r5, r6, r7, r8, sl, pc}
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;
3000bb2c: e3863001 orr r3, r6, #1 3000bb30: e5853004 str r3, [r5, #4]
next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED;
next_block->prev_size = block_size;
/* Statistics */
++stats->free_blocks;
3000bb34: e5943038 ldr r3, [r4, #56] ; 0x38
if ( stats->max_free_blocks < stats->free_blocks ) {
3000bb38: e594c03c ldr ip, [r4, #60] ; 0x3c
} 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;
3000bb3c: e5920004 ldr r0, [r2, #4]
RTEMS_INLINE_ROUTINE void _Heap_Free_list_insert_after(
Heap_Block *block_before,
Heap_Block *new_block
)
{
Heap_Block *next = block_before->next;
3000bb40: e5941008 ldr r1, [r4, #8]
next_block->prev_size = block_size;
/* Statistics */
++stats->free_blocks;
3000bb44: e2833001 add r3, r3, #1
} 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;
3000bb48: e3c00001 bic r0, r0, #1
next_block->prev_size = block_size;
/* Statistics */
++stats->free_blocks;
if ( stats->max_free_blocks < stats->free_blocks ) {
3000bb4c: e153000c cmp r3, ip
new_block->next = next;
3000bb50: e5851008 str r1, [r5, #8]
new_block->prev = block_before;
3000bb54: e585400c str r4, [r5, #12]
} 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;
3000bb58: e5820004 str r0, [r2, #4]
block_before->next = new_block; next->prev = new_block;
3000bb5c: e581500c str r5, [r1, #12]
next_block->prev_size = block_size;
3000bb60: e7856006 str r6, [r5, r6]
{
Heap_Block *next = block_before->next;
new_block->next = next;
new_block->prev = block_before;
block_before->next = new_block;
3000bb64: e5845008 str r5, [r4, #8]
/* Statistics */
++stats->free_blocks;
3000bb68: e5843038 str r3, [r4, #56] ; 0x38
if ( stats->max_free_blocks < stats->free_blocks ) {
stats->max_free_blocks = stats->free_blocks;
3000bb6c: 8584303c strhi r3, [r4, #60] ; 0x3c 3000bb70: eaffffe2 b 3000bb00 <_Heap_Free+0x12c>
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;
} else { /* coalesce prev */
uintptr_t const size = block_size + prev_size;
3000bb74: e086c00c add ip, r6, ip
prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED;
3000bb78: e38c3001 orr r3, ip, #1 3000bb7c: e58a3004 str r3, [sl, #4]
next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED;
3000bb80: e5923004 ldr r3, [r2, #4]
next_block->prev_size = size;
3000bb84: e785c006 str ip, [r5, r6]
_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;
next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED;
3000bb88: e3c33001 bic r3, r3, #1 3000bb8c: e5823004 str r3, [r2, #4] 3000bb90: eaffffda b 3000bb00 <_Heap_Free+0x12c>
30013858 <_Heap_Size_of_alloc_area>:
bool _Heap_Size_of_alloc_area(
Heap_Control *heap,
void *alloc_begin_ptr,
uintptr_t *alloc_size
)
{
30013858: e92d40f0 push {r4, r5, r6, r7, lr}
3001385c: e1a04000 mov r4, r0
30013860: e1a05001 mov r5, r1
RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_down(
uintptr_t value,
uintptr_t alignment
)
{
return value - (value % alignment);
30013864: e1a00001 mov r0, r1 30013868: e5941010 ldr r1, [r4, #16] 3001386c: e1a07002 mov r7, r2 30013870: ebfff695 bl 300112cc <__umodsi3> 30013874: e2456008 sub r6, r5, #8
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
30013878: e5943020 ldr r3, [r4, #32]
uintptr_t alloc_begin,
uintptr_t page_size
)
{
return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size )
- HEAP_BLOCK_HEADER_SIZE);
3001387c: e0600006 rsb r0, r0, r6
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;
30013880: e1500003 cmp r0, r3
30013884: 3a000010 bcc 300138cc <_Heap_Size_of_alloc_area+0x74>
30013888: e5942024 ldr r2, [r4, #36] ; 0x24 3001388c: e1500002 cmp r0, r2
30013890: 8a00000d bhi 300138cc <_Heap_Size_of_alloc_area+0x74>
- 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;
30013894: e5906004 ldr r6, [r0, #4] 30013898: e3c66001 bic r6, r6, #1
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
3001389c: e0806006 add r6, r0, r6
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;
300138a0: e1530006 cmp r3, r6
300138a4: 8a000008 bhi 300138cc <_Heap_Size_of_alloc_area+0x74>
300138a8: e1520006 cmp r2, r6
300138ac: 3a000008 bcc 300138d4 <_Heap_Size_of_alloc_area+0x7c>
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;
300138b0: e5960004 ldr r0, [r6, #4]
block_size = _Heap_Block_size( block );
next_block = _Heap_Block_at( block, block_size );
if (
!_Heap_Is_block_in_heap( heap, next_block )
|| !_Heap_Is_prev_used( next_block )
300138b4: e2100001 ands r0, r0, #1
) {
return false;
}
*alloc_size = (uintptr_t) next_block + HEAP_BLOCK_SIZE_OFFSET - alloc_begin;
300138b8: 12655004 rsbne r5, r5, #4 300138bc: 10856006 addne r6, r5, r6 300138c0: 15876000 strne r6, [r7]
return true;
300138c4: 13a00001 movne r0, #1
300138c8: e8bd80f0 pop {r4, r5, r6, r7, pc}
if (
!_Heap_Is_block_in_heap( heap, next_block )
|| !_Heap_Is_prev_used( next_block )
) {
return false;
300138cc: e3a00000 mov r0, #0
300138d0: e8bd80f0 pop {r4, r5, r6, r7, pc}
300138d4: e3a00000 mov r0, #0 <== NOT EXECUTED
}
*alloc_size = (uintptr_t) next_block + HEAP_BLOCK_SIZE_OFFSET - alloc_begin;
return true;
}
300138d8: e8bd80f0 pop {r4, r5, r6, r7, pc} <== NOT EXECUTED
30007608 <_Heap_Walk>:
bool _Heap_Walk(
Heap_Control *heap,
int source,
bool dump
)
{
30007608: e92d4ff0 push {r4, r5, r6, r7, r8, r9, sl, fp, lr}
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;
if ( !_System_state_Is_up( _System_state_Get() ) ) {
3000760c: e59f35cc ldr r3, [pc, #1484] ; 30007be0 <_Heap_Walk+0x5d8>
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;
30007610: e31200ff tst r2, #255 ; 0xff
if ( !_System_state_Is_up( _System_state_Get() ) ) {
30007614: e5933000 ldr r3, [r3]
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;
30007618: e59f25c4 ldr r2, [pc, #1476] ; 30007be4 <_Heap_Walk+0x5dc> 3000761c: e59f95c4 ldr r9, [pc, #1476] ; 30007be8 <_Heap_Walk+0x5e0>
bool _Heap_Walk(
Heap_Control *heap,
int source,
bool dump
)
{
30007620: e1a0a001 mov sl, r1
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;
30007624: 11a09002 movne r9, r2
Heap_Control *heap,
int source,
bool dump
)
{
uintptr_t const page_size = heap->page_size;
30007628: e5901010 ldr r1, [r0, #16]
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;
if ( !_System_state_Is_up( _System_state_Get() ) ) {
3000762c: e3530003 cmp r3, #3
int source,
bool dump
)
{
uintptr_t const page_size = heap->page_size;
uintptr_t const min_block_size = heap->min_block_size;
30007630: e5902014 ldr r2, [r0, #20]
Heap_Block *const first_block = heap->first_block; Heap_Block *const last_block = heap->last_block;
30007634: e5903024 ldr r3, [r0, #36] ; 0x24
bool _Heap_Walk(
Heap_Control *heap,
int source,
bool dump
)
{
30007638: e24dd038 sub sp, sp, #56 ; 0x38 3000763c: e1a04000 mov r4, r0
uintptr_t const page_size = heap->page_size;
30007640: e58d1024 str r1, [sp, #36] ; 0x24
uintptr_t const min_block_size = heap->min_block_size;
30007644: e58d2028 str r2, [sp, #40] ; 0x28
Heap_Block *const first_block = heap->first_block;
30007648: e5908020 ldr r8, [r0, #32]
Heap_Block *const last_block = heap->last_block;
3000764c: e58d302c str r3, [sp, #44] ; 0x2c
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() ) ) {
30007650: 0a000002 beq 30007660 <_Heap_Walk+0x58>
}
block = next_block;
} while ( block != first_block );
return true;
30007654: e3a00001 mov r0, #1
}
30007658: e28dd038 add sp, sp, #56 ; 0x38
3000765c: e8bd8ff0 pop {r4, r5, r6, r7, r8, r9, sl, fp, pc}
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)(
30007660: e594101c ldr r1, [r4, #28] 30007664: e5900018 ldr r0, [r0, #24] 30007668: e5942008 ldr r2, [r4, #8] 3000766c: e594300c ldr r3, [r4, #12] 30007670: e59dc028 ldr ip, [sp, #40] ; 0x28 30007674: e58d1008 str r1, [sp, #8] 30007678: e59d102c ldr r1, [sp, #44] ; 0x2c 3000767c: e58d0004 str r0, [sp, #4] 30007680: e58d1010 str r1, [sp, #16] 30007684: e58d2014 str r2, [sp, #20] 30007688: e58d3018 str r3, [sp, #24] 3000768c: e59f2558 ldr r2, [pc, #1368] ; 30007bec <_Heap_Walk+0x5e4> 30007690: e58dc000 str ip, [sp] 30007694: e58d800c str r8, [sp, #12] 30007698: e1a0000a mov r0, sl 3000769c: e3a01000 mov r1, #0 300076a0: e59d3024 ldr r3, [sp, #36] ; 0x24 300076a4: e1a0e00f mov lr, pc 300076a8: e12fff19 bx r9
heap->area_begin, heap->area_end,
first_block, last_block,
first_free_block, last_free_block
);
if ( page_size == 0 ) {
300076ac: e59d2024 ldr r2, [sp, #36] ; 0x24 300076b0: e3520000 cmp r2, #0
300076b4: 0a000026 beq 30007754 <_Heap_Walk+0x14c>
(*printer)( source, true, "page size is zero\n" );
return false;
}
if ( !_Addresses_Is_aligned( (void *) page_size ) ) {
300076b8: e59d3024 ldr r3, [sp, #36] ; 0x24 300076bc: e2135003 ands r5, r3, #3
300076c0: 1a00002a bne 30007770 <_Heap_Walk+0x168>
RTEMS_INLINE_ROUTINE bool _Heap_Is_aligned(
uintptr_t value,
uintptr_t alignment
)
{
return (value % alignment) == 0;
300076c4: e59d0028 ldr r0, [sp, #40] ; 0x28 300076c8: e59d1024 ldr r1, [sp, #36] ; 0x24 300076cc: ebffe530 bl 30000b94 <__umodsi3>
);
return false;
}
if ( !_Heap_Is_aligned( min_block_size, page_size ) ) {
300076d0: e250b000 subs fp, r0, #0
300076d4: 1a00002c bne 3000778c <_Heap_Walk+0x184>
300076d8: e2880008 add r0, r8, #8 300076dc: e59d1024 ldr r1, [sp, #36] ; 0x24 300076e0: ebffe52b bl 30000b94 <__umodsi3>
);
return false;
}
if (
300076e4: e2506000 subs r6, r0, #0
300076e8: 1a00002f bne 300077ac <_Heap_Walk+0x1a4>
block = next_block;
} while ( block != first_block );
return true;
}
300076ec: e598b004 ldr fp, [r8, #4]
);
return false;
}
if ( !_Heap_Is_prev_used( first_block ) ) {
300076f0: e21b5001 ands r5, fp, #1
300076f4: 0a0000cd beq 30007a30 <_Heap_Walk+0x428>
- 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;
300076f8: e59dc02c ldr ip, [sp, #44] ; 0x2c 300076fc: e59c3004 ldr r3, [ip, #4] 30007700: e3c33001 bic r3, r3, #1
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
30007704: e08c3003 add r3, ip, r3
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;
30007708: e5935004 ldr r5, [r3, #4]
);
return false;
}
if ( _Heap_Is_free( last_block ) ) {
3000770c: e2155001 ands r5, r5, #1
30007710: 0a000008 beq 30007738 <_Heap_Walk+0x130>
);
return false;
}
if (
30007714: e1580003 cmp r8, r3
30007718: 0a00002b beq 300077cc <_Heap_Walk+0x1c4>
_Heap_Block_at( last_block, _Heap_Block_size( last_block ) ) != first_block
) {
(*printer)(
3000771c: e1a0000a mov r0, sl <== NOT EXECUTED 30007720: e3a01001 mov r1, #1 <== NOT EXECUTED 30007724: e59f24c4 ldr r2, [pc, #1220] ; 30007bf0 <_Heap_Walk+0x5e8> <== NOT EXECUTED 30007728: e1a0e00f mov lr, pc <== NOT EXECUTED 3000772c: e12fff19 bx r9 <== NOT EXECUTED
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
30007730: e1a00006 mov r0, r6 <== NOT EXECUTED 30007734: eaffffc7 b 30007658 <_Heap_Walk+0x50> <== NOT EXECUTED
return false;
}
if ( _Heap_Is_free( last_block ) ) {
(*printer)(
30007738: e1a0000a mov r0, sl 3000773c: e3a01001 mov r1, #1 30007740: e59f24ac ldr r2, [pc, #1196] ; 30007bf4 <_Heap_Walk+0x5ec> 30007744: e1a0e00f mov lr, pc 30007748: e12fff19 bx r9
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
3000774c: e1a00005 mov r0, r5 30007750: eaffffc0 b 30007658 <_Heap_Walk+0x50>
first_block, last_block,
first_free_block, last_free_block
);
if ( page_size == 0 ) {
(*printer)( source, true, "page size is zero\n" );
30007754: e1a0000a mov r0, sl 30007758: e3a01001 mov r1, #1 3000775c: e59f2494 ldr r2, [pc, #1172] ; 30007bf8 <_Heap_Walk+0x5f0> 30007760: e1a0e00f mov lr, pc 30007764: e12fff19 bx r9
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
30007768: e59d0024 ldr r0, [sp, #36] ; 0x24 3000776c: eaffffb9 b 30007658 <_Heap_Walk+0x50>
return false;
}
if ( !_Addresses_Is_aligned( (void *) page_size ) ) {
(*printer)(
30007770: e1a0000a mov r0, sl 30007774: e3a01001 mov r1, #1 30007778: e59f247c ldr r2, [pc, #1148] ; 30007bfc <_Heap_Walk+0x5f4> 3000777c: e1a0e00f mov lr, pc 30007780: e12fff19 bx r9
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
30007784: e3a00000 mov r0, #0 30007788: eaffffb2 b 30007658 <_Heap_Walk+0x50>
return false;
}
if ( !_Heap_Is_aligned( min_block_size, page_size ) ) {
(*printer)(
3000778c: e1a0000a mov r0, sl 30007790: e3a01001 mov r1, #1 30007794: e59f2464 ldr r2, [pc, #1124] ; 30007c00 <_Heap_Walk+0x5f8> 30007798: e59d3028 ldr r3, [sp, #40] ; 0x28 3000779c: e1a0e00f mov lr, pc 300077a0: e12fff19 bx r9
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
300077a4: e1a00005 mov r0, r5 300077a8: eaffffaa b 30007658 <_Heap_Walk+0x50>
}
if (
!_Heap_Is_aligned( _Heap_Alloc_area_of_block( first_block ), page_size )
) {
(*printer)(
300077ac: e1a0000a mov r0, sl 300077b0: e3a01001 mov r1, #1 300077b4: e59f2448 ldr r2, [pc, #1096] ; 30007c04 <_Heap_Walk+0x5fc> 300077b8: e1a03008 mov r3, r8 300077bc: e1a0e00f mov lr, pc 300077c0: e12fff19 bx r9
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
300077c4: e1a0000b mov r0, fp 300077c8: eaffffa2 b 30007658 <_Heap_Walk+0x50>
block = next_block;
} while ( block != first_block );
return true;
}
300077cc: e5945008 ldr r5, [r4, #8]
int source,
Heap_Walk_printer printer,
Heap_Control *heap
)
{
uintptr_t const page_size = heap->page_size;
300077d0: e5947010 ldr r7, [r4, #16]
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 ) {
300077d4: e1540005 cmp r4, r5 300077d8: 05943020 ldreq r3, [r4, #32]
300077dc: 0a00000d beq 30007818 <_Heap_Walk+0x210>
block = next_block;
} while ( block != first_block );
return true;
}
300077e0: e5943020 ldr r3, [r4, #32]
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;
300077e4: e1530005 cmp r3, r5
300077e8: 9a000097 bls 30007a4c <_Heap_Walk+0x444>
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 ) ) {
(*printer)(
300077ec: e1a0000a mov r0, sl 300077f0: e3a01001 mov r1, #1 300077f4: e59f240c ldr r2, [pc, #1036] ; 30007c08 <_Heap_Walk+0x600> 300077f8: e1a03005 mov r3, r5 300077fc: e1a0e00f mov lr, pc 30007800: e12fff19 bx r9
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
30007804: e3a00000 mov r0, #0 30007808: eaffff92 b 30007658 <_Heap_Walk+0x50> 3000780c: e1a03008 mov r3, r8 30007810: e59db034 ldr fp, [sp, #52] ; 0x34 30007814: e59d8030 ldr r8, [sp, #48] ; 0x30
);
return false;
}
if ( _Heap_Is_used( free_block ) ) {
30007818: e1a06008 mov r6, r8
- 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;
3000781c: e3cb7001 bic r7, fp, #1
RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at(
const Heap_Block *block,
uintptr_t offset
)
{
return (Heap_Block *) ((uintptr_t) block + offset);
30007820: e0875006 add r5, r7, r6
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;
30007824: e1530005 cmp r3, r5
30007828: 9a000008 bls 30007850 <_Heap_Walk+0x248>
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 ) ) {
(*printer)(
3000782c: e1a0000a mov r0, sl 30007830: e58d5000 str r5, [sp] 30007834: e3a01001 mov r1, #1 30007838: e59f23cc ldr r2, [pc, #972] ; 30007c0c <_Heap_Walk+0x604> 3000783c: e1a03006 mov r3, r6 30007840: e1a0e00f mov lr, pc 30007844: e12fff19 bx r9
"block 0x%08x: next block 0x%08x not in heap\n",
block,
next_block
);
return false;
30007848: e3a00000 mov r0, #0 3000784c: eaffff81 b 30007658 <_Heap_Walk+0x50> 30007850: e5943024 ldr r3, [r4, #36] ; 0x24 30007854: e1530005 cmp r3, r5
30007858: 3afffff3 bcc 3000782c <_Heap_Walk+0x224>
RTEMS_INLINE_ROUTINE bool _Heap_Is_aligned(
uintptr_t value,
uintptr_t alignment
)
{
return (value % alignment) == 0;
3000785c: e59d1024 ldr r1, [sp, #36] ; 0x24 30007860: e1a00007 mov r0, r7 30007864: ebffe4ca bl 30000b94 <__umodsi3>
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;
30007868: e59d102c ldr r1, [sp, #44] ; 0x2c 3000786c: e0563001 subs r3, r6, r1 30007870: 13a03001 movne r3, #1
);
return false;
}
if ( !_Heap_Is_aligned( block_size, page_size ) && is_not_last_block ) {
30007874: e3500000 cmp r0, #0
30007878: 0a000001 beq 30007884 <_Heap_Walk+0x27c>
3000787c: e3530000 cmp r3, #0
30007880: 1a0000aa bne 30007b30 <_Heap_Walk+0x528>
);
return false;
}
if ( block_size < min_block_size && is_not_last_block ) {
30007884: e59d2028 ldr r2, [sp, #40] ; 0x28 30007888: e1520007 cmp r2, r7
3000788c: 9a000001 bls 30007898 <_Heap_Walk+0x290>
30007890: e3530000 cmp r3, #0
30007894: 1a0000ae bne 30007b54 <_Heap_Walk+0x54c>
);
return false;
}
if ( next_block_begin <= block_begin && is_not_last_block ) {
30007898: e1560005 cmp r6, r5
3000789c: 3a000001 bcc 300078a8 <_Heap_Walk+0x2a0>
300078a0: e3530000 cmp r3, #0
300078a4: 1a0000b4 bne 30007b7c <_Heap_Walk+0x574>
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;
300078a8: e5953004 ldr r3, [r5, #4] 300078ac: e20bb001 and fp, fp, #1
);
return false;
}
if ( !_Heap_Is_prev_used( next_block ) ) {
300078b0: e3130001 tst r3, #1
300078b4: 0a000018 beq 3000791c <_Heap_Walk+0x314>
if ( !_Heap_Walk_check_free_block( source, printer, heap, block ) ) {
return false;
}
} else if (prev_used) {
300078b8: e35b0000 cmp fp, #0
300078bc: 0a00000c beq 300078f4 <_Heap_Walk+0x2ec>
(*printer)(
300078c0: e58d7000 str r7, [sp] 300078c4: e1a0000a mov r0, sl 300078c8: e3a01000 mov r1, #0 300078cc: e59f233c ldr r2, [pc, #828] ; 30007c10 <_Heap_Walk+0x608> 300078d0: e1a03006 mov r3, r6 300078d4: e1a0e00f mov lr, pc 300078d8: e12fff19 bx r9
block->prev_size
);
}
block = next_block;
} while ( block != first_block );
300078dc: e1580005 cmp r8, r5
300078e0: 0affff5b beq 30007654 <_Heap_Walk+0x4c>
300078e4: e595b004 ldr fp, [r5, #4] 300078e8: e5943020 ldr r3, [r4, #32] 300078ec: e1a06005 mov r6, r5 300078f0: eaffffc9 b 3000781c <_Heap_Walk+0x214>
"block 0x%08x: size %u\n",
block,
block_size
);
} else {
(*printer)(
300078f4: e58d7000 str r7, [sp] 300078f8: e5963000 ldr r3, [r6] 300078fc: e1a0000a mov r0, sl 30007900: e58d3004 str r3, [sp, #4] 30007904: e1a0100b mov r1, fp 30007908: e59f2304 ldr r2, [pc, #772] ; 30007c14 <_Heap_Walk+0x60c> 3000790c: e1a03006 mov r3, r6 30007910: e1a0e00f mov lr, pc 30007914: e12fff19 bx r9 30007918: eaffffef b 300078dc <_Heap_Walk+0x2d4>
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 ?
3000791c: e596200c ldr r2, [r6, #12]
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)(
30007920: e5943008 ldr r3, [r4, #8]
block = next_block;
} while ( block != first_block );
return true;
}
30007924: e594100c ldr r1, [r4, #12]
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)(
30007928: e1530002 cmp r3, r2 3000792c: 059f02e4 ldreq r0, [pc, #740] ; 30007c18 <_Heap_Walk+0x610>
30007930: 0a000003 beq 30007944 <_Heap_Walk+0x33c>
block,
block_size,
block->prev,
block->prev == first_free_block ?
" (= first free)"
: (block->prev == free_list_head ? " (= head)" : ""),
30007934: e59f32e0 ldr r3, [pc, #736] ; 30007c1c <_Heap_Walk+0x614> 30007938: e1540002 cmp r4, r2 3000793c: e59f02dc ldr r0, [pc, #732] ; 30007c20 <_Heap_Walk+0x618> 30007940: 01a00003 moveq r0, r3
block->next,
block->next == last_free_block ?
30007944: e5963008 ldr r3, [r6, #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)(
30007948: e1510003 cmp r1, r3 3000794c: 059f12d0 ldreq r1, [pc, #720] ; 30007c24 <_Heap_Walk+0x61c>
30007950: 0a000003 beq 30007964 <_Heap_Walk+0x35c>
" (= first free)"
: (block->prev == free_list_head ? " (= head)" : ""),
block->next,
block->next == last_free_block ?
" (= last free)"
: (block->next == free_list_tail ? " (= tail)" : "")
30007954: e59fc2cc ldr ip, [pc, #716] ; 30007c28 <_Heap_Walk+0x620> 30007958: e1540003 cmp r4, r3 3000795c: e59f12bc ldr r1, [pc, #700] ; 30007c20 <_Heap_Walk+0x618> 30007960: 01a0100c moveq r1, ip
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)(
30007964: e58d2004 str r2, [sp, #4] 30007968: e58d0008 str r0, [sp, #8] 3000796c: e58d300c str r3, [sp, #12] 30007970: e58d1010 str r1, [sp, #16] 30007974: e1a03006 mov r3, r6 30007978: e58d7000 str r7, [sp] 3000797c: e1a0000a mov r0, sl 30007980: e3a01000 mov r1, #0 30007984: e59f22a0 ldr r2, [pc, #672] ; 30007c2c <_Heap_Walk+0x624> 30007988: e1a0e00f mov lr, pc 3000798c: e12fff19 bx r9
block->next == last_free_block ?
" (= last free)"
: (block->next == free_list_tail ? " (= tail)" : "")
);
if ( block_size != next_block->prev_size ) {
30007990: e5953000 ldr r3, [r5] 30007994: e1570003 cmp r7, r3
30007998: 1a000011 bne 300079e4 <_Heap_Walk+0x3dc>
);
return false;
}
if ( !prev_used ) {
3000799c: e35b0000 cmp fp, #0
300079a0: 0a00001a beq 30007a10 <_Heap_Walk+0x408>
block = next_block;
} while ( block != first_block );
return true;
}
300079a4: e5943008 ldr r3, [r4, #8]
)
{
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 ) {
300079a8: e1540003 cmp r4, r3
300079ac: 0a000004 beq 300079c4 <_Heap_Walk+0x3bc>
if ( free_block == block ) {
300079b0: e1560003 cmp r6, r3
300079b4: 0affffc8 beq 300078dc <_Heap_Walk+0x2d4>
return true;
}
free_block = free_block->next;
300079b8: e5933008 ldr r3, [r3, #8]
)
{
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 ) {
300079bc: e1540003 cmp r4, r3
300079c0: 1afffffa bne 300079b0 <_Heap_Walk+0x3a8>
return false;
}
if ( !_Heap_Walk_is_in_free_list( heap, block ) ) {
(*printer)(
300079c4: e1a0000a mov r0, sl 300079c8: e3a01001 mov r1, #1 300079cc: e59f225c ldr r2, [pc, #604] ; 30007c30 <_Heap_Walk+0x628> 300079d0: e1a03006 mov r3, r6 300079d4: e1a0e00f mov lr, pc 300079d8: e12fff19 bx r9
return false;
}
if ( !_Heap_Is_prev_used( next_block ) ) {
if ( !_Heap_Walk_check_free_block( source, printer, heap, block ) ) {
return false;
300079dc: e3a00000 mov r0, #0 300079e0: eaffff1c b 30007658 <_Heap_Walk+0x50>
" (= last free)"
: (block->next == free_list_tail ? " (= tail)" : "")
);
if ( block_size != next_block->prev_size ) {
(*printer)(
300079e4: e58d3004 str r3, [sp, #4] 300079e8: e1a0000a mov r0, sl 300079ec: e58d7000 str r7, [sp] 300079f0: e58d5008 str r5, [sp, #8] 300079f4: e3a01001 mov r1, #1 300079f8: e59f2234 ldr r2, [pc, #564] ; 30007c34 <_Heap_Walk+0x62c> 300079fc: e1a03006 mov r3, r6 30007a00: e1a0e00f mov lr, pc 30007a04: e12fff19 bx r9
return false;
}
if ( !_Heap_Is_prev_used( next_block ) ) {
if ( !_Heap_Walk_check_free_block( source, printer, heap, block ) ) {
return false;
30007a08: e3a00000 mov r0, #0 30007a0c: eaffff11 b 30007658 <_Heap_Walk+0x50>
return false;
}
if ( !prev_used ) {
(*printer)(
30007a10: e1a0000a mov r0, sl 30007a14: e3a01001 mov r1, #1 30007a18: e59f2218 ldr r2, [pc, #536] ; 30007c38 <_Heap_Walk+0x630> 30007a1c: e1a03006 mov r3, r6 30007a20: e1a0e00f mov lr, pc 30007a24: e12fff19 bx r9
return false;
}
if ( !_Heap_Is_prev_used( next_block ) ) {
if ( !_Heap_Walk_check_free_block( source, printer, heap, block ) ) {
return false;
30007a28: e1a0000b mov r0, fp 30007a2c: eaffff09 b 30007658 <_Heap_Walk+0x50>
return false;
}
if ( !_Heap_Is_prev_used( first_block ) ) {
(*printer)(
30007a30: e1a0000a mov r0, sl 30007a34: e3a01001 mov r1, #1 30007a38: e59f21fc ldr r2, [pc, #508] ; 30007c3c <_Heap_Walk+0x634> 30007a3c: e1a0e00f mov lr, pc 30007a40: e12fff19 bx r9
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
30007a44: e1a00005 mov r0, r5 30007a48: eaffff02 b 30007658 <_Heap_Walk+0x50>
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;
30007a4c: e594c024 ldr ip, [r4, #36] ; 0x24 30007a50: e15c0005 cmp ip, r5
30007a54: 3affff64 bcc 300077ec <_Heap_Walk+0x1e4>
RTEMS_INLINE_ROUTINE bool _Heap_Is_aligned(
uintptr_t value,
uintptr_t alignment
)
{
return (value % alignment) == 0;
30007a58: e2850008 add r0, r5, #8 30007a5c: e1a01007 mov r1, r7 30007a60: e58d301c str r3, [sp, #28] 30007a64: e58dc020 str ip, [sp, #32] 30007a68: ebffe449 bl 30000b94 <__umodsi3>
);
return false;
}
if (
30007a6c: e3500000 cmp r0, #0 30007a70: e59d301c ldr r3, [sp, #28] 30007a74: e59dc020 ldr ip, [sp, #32]
30007a78: 1a000048 bne 30007ba0 <_Heap_Walk+0x598>
- 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;
30007a7c: e5952004 ldr r2, [r5, #4] 30007a80: e3c22001 bic r2, r2, #1
block = next_block;
} while ( block != first_block );
return true;
}
30007a84: e0852002 add r2, r5, r2
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;
30007a88: e5922004 ldr r2, [r2, #4]
);
return false;
}
if ( _Heap_Is_used( free_block ) ) {
30007a8c: e3120001 tst r2, #1
30007a90: 1a00004a bne 30007bc0 <_Heap_Walk+0x5b8>
30007a94: e58d8030 str r8, [sp, #48] ; 0x30 30007a98: e58db034 str fp, [sp, #52] ; 0x34 30007a9c: e1a01004 mov r1, r4 30007aa0: e1a06005 mov r6, r5 30007aa4: e1a0b00c mov fp, ip 30007aa8: e1a08003 mov r8, r3 30007aac: ea000013 b 30007b00 <_Heap_Walk+0x4f8>
return false;
}
prev_block = free_block;
free_block = free_block->next;
30007ab0: e5955008 ldr r5, [r5, #8]
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 ) {
30007ab4: e1540005 cmp r4, r5
30007ab8: 0affff53 beq 3000780c <_Heap_Walk+0x204>
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;
30007abc: e1580005 cmp r8, r5
30007ac0: 8affff49 bhi 300077ec <_Heap_Walk+0x1e4>
30007ac4: e155000b cmp r5, fp
RTEMS_INLINE_ROUTINE bool _Heap_Is_aligned(
uintptr_t value,
uintptr_t alignment
)
{
return (value % alignment) == 0;
30007ac8: e2850008 add r0, r5, #8 30007acc: e1a01007 mov r1, r7
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;
30007ad0: 8affff45 bhi 300077ec <_Heap_Walk+0x1e4>
RTEMS_INLINE_ROUTINE bool _Heap_Is_aligned(
uintptr_t value,
uintptr_t alignment
)
{
return (value % alignment) == 0;
30007ad4: ebffe42e bl 30000b94 <__umodsi3>
);
return false;
}
if (
30007ad8: e3500000 cmp r0, #0
30007adc: 1a00002f bne 30007ba0 <_Heap_Walk+0x598>
- 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;
30007ae0: e5953004 ldr r3, [r5, #4]
);
return false;
}
if ( _Heap_Is_used( free_block ) ) {
30007ae4: e1a01006 mov r1, r6 30007ae8: e3c33001 bic r3, r3, #1
block = next_block;
} while ( block != first_block );
return true;
}
30007aec: e0833005 add r3, r3, r5
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;
30007af0: e5933004 ldr r3, [r3, #4]
);
return false;
}
if ( _Heap_Is_used( free_block ) ) {
30007af4: e1a06005 mov r6, r5 30007af8: e3130001 tst r3, #1
30007afc: 1a00002f bne 30007bc0 <_Heap_Walk+0x5b8>
);
return false;
}
if ( free_block->prev != prev_block ) {
30007b00: e595200c ldr r2, [r5, #12] 30007b04: e1520001 cmp r2, r1
30007b08: 0affffe8 beq 30007ab0 <_Heap_Walk+0x4a8>
(*printer)(
30007b0c: e58d2000 str r2, [sp] 30007b10: e1a0000a mov r0, sl 30007b14: e3a01001 mov r1, #1 30007b18: e59f2120 ldr r2, [pc, #288] ; 30007c40 <_Heap_Walk+0x638> 30007b1c: e1a03005 mov r3, r5 30007b20: e1a0e00f mov lr, pc 30007b24: e12fff19 bx r9
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
30007b28: e3a00000 mov r0, #0 30007b2c: eafffec9 b 30007658 <_Heap_Walk+0x50>
return false;
}
if ( !_Heap_Is_aligned( block_size, page_size ) && is_not_last_block ) {
(*printer)(
30007b30: e1a0000a mov r0, sl 30007b34: e58d7000 str r7, [sp] 30007b38: e3a01001 mov r1, #1 30007b3c: e59f2100 ldr r2, [pc, #256] ; 30007c44 <_Heap_Walk+0x63c> 30007b40: e1a03006 mov r3, r6 30007b44: e1a0e00f mov lr, pc 30007b48: e12fff19 bx r9
"block 0x%08x: block size %u not page aligned\n",
block,
block_size
);
return false;
30007b4c: e3a00000 mov r0, #0 30007b50: eafffec0 b 30007658 <_Heap_Walk+0x50>
}
if ( block_size < min_block_size && is_not_last_block ) {
(*printer)(
30007b54: e58d2004 str r2, [sp, #4] 30007b58: e1a0000a mov r0, sl 30007b5c: e58d7000 str r7, [sp] 30007b60: e3a01001 mov r1, #1 30007b64: e59f20dc ldr r2, [pc, #220] ; 30007c48 <_Heap_Walk+0x640> 30007b68: e1a03006 mov r3, r6 30007b6c: e1a0e00f mov lr, pc 30007b70: e12fff19 bx r9
block,
block_size,
min_block_size
);
return false;
30007b74: e3a00000 mov r0, #0 30007b78: eafffeb6 b 30007658 <_Heap_Walk+0x50>
}
if ( next_block_begin <= block_begin && is_not_last_block ) {
(*printer)(
30007b7c: e1a0000a mov r0, sl 30007b80: e58d5000 str r5, [sp] 30007b84: e3a01001 mov r1, #1 30007b88: e59f20bc ldr r2, [pc, #188] ; 30007c4c <_Heap_Walk+0x644> 30007b8c: e1a03006 mov r3, r6 30007b90: e1a0e00f mov lr, pc 30007b94: e12fff19 bx r9
"block 0x%08x: next block 0x%08x is not a successor\n",
block,
next_block
);
return false;
30007b98: e3a00000 mov r0, #0 30007b9c: eafffead b 30007658 <_Heap_Walk+0x50>
}
if (
!_Heap_Is_aligned( _Heap_Alloc_area_of_block( free_block ), page_size )
) {
(*printer)(
30007ba0: e1a0000a mov r0, sl 30007ba4: e3a01001 mov r1, #1 30007ba8: e59f20a0 ldr r2, [pc, #160] ; 30007c50 <_Heap_Walk+0x648> 30007bac: e1a03005 mov r3, r5 30007bb0: e1a0e00f mov lr, pc 30007bb4: e12fff19 bx r9
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
30007bb8: e3a00000 mov r0, #0 30007bbc: eafffea5 b 30007658 <_Heap_Walk+0x50>
return false;
}
if ( _Heap_Is_used( free_block ) ) {
(*printer)(
30007bc0: e1a0000a mov r0, sl 30007bc4: e3a01001 mov r1, #1 30007bc8: e59f2084 ldr r2, [pc, #132] ; 30007c54 <_Heap_Walk+0x64c> 30007bcc: e1a03005 mov r3, r5 30007bd0: e1a0e00f mov lr, pc 30007bd4: e12fff19 bx r9
if ( !_System_state_Is_up( _System_state_Get() ) ) {
return true;
}
if ( !_Heap_Walk_check_control( source, printer, heap ) ) {
return false;
30007bd8: e3a00000 mov r0, #0 30007bdc: eafffe9d b 30007658 <_Heap_Walk+0x50>
30006a04 <_Internal_error_Occurred>:
bool is_internal,
Internal_errors_t the_error
)
{
_Internal_errors_What_happened.the_source = the_source;
30006a04: e59f303c ldr r3, [pc, #60] ; 30006a48 <_Internal_error_Occurred+0x44>
void _Internal_error_Occurred(
Internal_errors_Source the_source,
bool is_internal,
Internal_errors_t the_error
)
{
30006a08: e201c0ff and ip, r1, #255 ; 0xff
30006a0c: e52de004 push {lr} ; (str lr, [sp, #-4]!)
_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 );
30006a10: e1a0100c mov r1, ip
bool is_internal,
Internal_errors_t the_error
)
{
_Internal_errors_What_happened.the_source = the_source;
30006a14: e5830000 str r0, [r3]
_Internal_errors_What_happened.is_internal = is_internal;
30006a18: e5c3c004 strb ip, [r3, #4]
_Internal_errors_What_happened.the_error = the_error;
30006a1c: e5832008 str r2, [r3, #8]
void _Internal_error_Occurred(
Internal_errors_Source the_source,
bool is_internal,
Internal_errors_t the_error
)
{
30006a20: e1a04002 mov r4, r2
_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 );
30006a24: eb00075f bl 300087a8 <_User_extensions_Fatal>
RTEMS_INLINE_ROUTINE void _System_state_Set (
System_state_Codes state
)
{
_System_state_Current = state;
30006a28: e59f301c ldr r3, [pc, #28] ; 30006a4c <_Internal_error_Occurred+0x48><== NOT EXECUTED 30006a2c: e3a02005 mov r2, #5 <== NOT EXECUTED 30006a30: e5832000 str r2, [r3] <== NOT EXECUTED
static inline uint32_t arm_interrupt_disable( void )
{
uint32_t arm_switch_reg;
uint32_t level;
asm volatile (
30006a34: e10f2000 mrs r2, CPSR <== NOT EXECUTED 30006a38: e3823080 orr r3, r2, #128 ; 0x80 <== NOT EXECUTED 30006a3c: e129f003 msr CPSR_fc, r3 <== NOT EXECUTED
_System_state_Set( SYSTEM_STATE_FAILED );
_CPU_Fatal_halt( the_error );
30006a40: e1a00004 mov r0, r4 <== NOT EXECUTED 30006a44: eafffffe b 30006a44 <_Internal_error_Occurred+0x40> <== NOT EXECUTED
30006b0c <_Objects_Extend_information>:
*/
void _Objects_Extend_information(
Objects_Information *information
)
{
30006b0c: e92d4ff0 push {r4, r5, r6, r7, r8, r9, sl, fp, lr}
minimum_index = _Objects_Get_index( information->minimum_id );
index_base = minimum_index;
block = 0;
/* if ( information->maximum < minimum_index ) */
if ( information->object_blocks == NULL )
30006b10: e5904034 ldr r4, [r0, #52] ; 0x34
*/
void _Objects_Extend_information(
Objects_Information *information
)
{
30006b14: e24dd014 sub sp, sp, #20
minimum_index = _Objects_Get_index( information->minimum_id );
index_base = minimum_index;
block = 0;
/* if ( information->maximum < minimum_index ) */
if ( information->object_blocks == NULL )
30006b18: e3540000 cmp r4, #0
*/
void _Objects_Extend_information(
Objects_Information *information
)
{
30006b1c: e1a05000 mov r5, r0
/* * Search for a free block of indexes. If we do NOT need to allocate or * extend the block table, then we will change do_extend. */ do_extend = true; minimum_index = _Objects_Get_index( information->minimum_id );
30006b20: e1d070b8 ldrh r7, [r0, #8]
index_base = minimum_index;
block = 0;
/* if ( information->maximum < minimum_index ) */
if ( information->object_blocks == NULL )
30006b24: 0a00009b beq 30006d98 <_Objects_Extend_information+0x28c>
block_count = 0;
else {
block_count = information->maximum / information->allocation_size;
30006b28: e1d081b4 ldrh r8, [r0, #20] 30006b2c: e1d0a1b0 ldrh sl, [r0, #16] 30006b30: e1a01008 mov r1, r8 30006b34: e1a0000a mov r0, sl 30006b38: eb00299d bl 300111b4 <__aeabi_uidiv> 30006b3c: e1a03800 lsl r3, r0, #16
for ( ; block < block_count; block++ ) {
30006b40: e1b03823 lsrs r3, r3, #16
30006b44: 0a000099 beq 30006db0 <_Objects_Extend_information+0x2a4>
if ( information->object_blocks[ block ] == NULL ) {
30006b48: e5949000 ldr r9, [r4] 30006b4c: e3590000 cmp r9, #0 30006b50: 01a01008 moveq r1, r8
/* * Search for a free block of indexes. If we do NOT need to allocate or * extend the block table, then we will change do_extend. */ do_extend = true; minimum_index = _Objects_Get_index( information->minimum_id );
30006b54: 01a06007 moveq r6, r7
index_base = minimum_index; block = 0;
30006b58: 01a04009 moveq r4, r9
block_count = 0;
else {
block_count = information->maximum / information->allocation_size;
for ( ; block < block_count; block++ ) {
if ( information->object_blocks[ block ] == NULL ) {
30006b5c: 0a00000c beq 30006b94 <_Objects_Extend_information+0x88>
30006b60: e1a02004 mov r2, r4 30006b64: e1a01008 mov r1, r8
/* * Search for a free block of indexes. If we do NOT need to allocate or * extend the block table, then we will change do_extend. */ do_extend = true; minimum_index = _Objects_Get_index( information->minimum_id );
30006b68: e1a06007 mov r6, r7
index_base = minimum_index; block = 0;
30006b6c: e3a04000 mov r4, #0 30006b70: ea000002 b 30006b80 <_Objects_Extend_information+0x74>
block_count = 0;
else {
block_count = information->maximum / information->allocation_size;
for ( ; block < block_count; block++ ) {
if ( information->object_blocks[ block ] == NULL ) {
30006b74: e5b29004 ldr r9, [r2, #4]! 30006b78: e3590000 cmp r9, #0
30006b7c: 0a000004 beq 30006b94 <_Objects_Extend_information+0x88>
if ( information->object_blocks == NULL )
block_count = 0;
else {
block_count = information->maximum / information->allocation_size;
for ( ; block < block_count; block++ ) {
30006b80: e2844001 add r4, r4, #1 30006b84: e1530004 cmp r3, r4
if ( information->object_blocks[ block ] == NULL ) {
do_extend = false;
break;
} else
index_base += information->allocation_size;
30006b88: e0866008 add r6, r6, r8
if ( information->object_blocks == NULL )
block_count = 0;
else {
block_count = information->maximum / information->allocation_size;
for ( ; block < block_count; block++ ) {
30006b8c: 8afffff8 bhi 30006b74 <_Objects_Extend_information+0x68>
/*
* Search for a free block of indexes. If we do NOT need to allocate or
* extend the block table, then we will change do_extend.
*/
do_extend = true;
30006b90: e3a09001 mov r9, #1
} else
index_base += information->allocation_size;
}
}
maximum = (uint32_t) information->maximum + information->allocation_size;
30006b94: e08aa001 add sl, sl, r1
/*
* We need to limit the number of objects to the maximum number
* representable in the index portion of the object Id. In the
* case of 16-bit Ids, this is only 256 object instances.
*/
if ( maximum > OBJECTS_ID_FINAL_INDEX ) {
30006b98: e35a0801 cmp sl, #65536 ; 0x10000
30006b9c: 2a000063 bcs 30006d30 <_Objects_Extend_information+0x224>
/*
* Allocate the name table, and the objects and if it fails either return or
* generate a fatal error depending on auto-extending being active.
*/
block_size = information->allocation_size * information->size;
if ( information->auto_extend ) {
30006ba0: e5d52012 ldrb r2, [r5, #18]
/*
* Allocate the name table, and the objects and if it fails either return or
* generate a fatal error depending on auto-extending being active.
*/
block_size = information->allocation_size * information->size;
30006ba4: e5950018 ldr r0, [r5, #24]
if ( information->auto_extend ) {
30006ba8: e3520000 cmp r2, #0
/*
* Allocate the name table, and the objects and if it fails either return or
* generate a fatal error depending on auto-extending being active.
*/
block_size = information->allocation_size * information->size;
30006bac: e0000091 mul r0, r1, r0
if ( information->auto_extend ) {
30006bb0: 1a000060 bne 30006d38 <_Objects_Extend_information+0x22c>
new_object_block = _Workspace_Allocate( block_size );
if ( !new_object_block )
return;
} else {
new_object_block = _Workspace_Allocate_or_fatal_error( block_size );
30006bb4: e58d3000 str r3, [sp] 30006bb8: eb00083d bl 30008cb4 <_Workspace_Allocate_or_fatal_error> 30006bbc: e59d3000 ldr r3, [sp] 30006bc0: e1a08000 mov r8, r0
}
/*
* Do we need to grow the tables?
*/
if ( do_extend ) {
30006bc4: e3590000 cmp r9, #0
30006bc8: 0a000039 beq 30006cb4 <_Objects_Extend_information+0x1a8>
*/
/*
* Up the block count and maximum
*/
block_count++;
30006bcc: e283b001 add fp, r3, #1
/*
* Allocate the tables and break it up.
*/
block_size = block_count *
(sizeof(void *) + sizeof(uint32_t) + sizeof(Objects_Name *)) +
30006bd0: e08b008b add r0, fp, fp, lsl #1
((maximum + minimum_index) * sizeof(Objects_Control *));
30006bd4: e08a0000 add r0, sl, r0
/*
* Allocate the tables and break it up.
*/
block_size = block_count *
(sizeof(void *) + sizeof(uint32_t) + sizeof(Objects_Name *)) +
30006bd8: e0800007 add r0, r0, r7
((maximum + minimum_index) * sizeof(Objects_Control *));
object_blocks = (void**) _Workspace_Allocate( block_size );
30006bdc: e1a00100 lsl r0, r0, #2 30006be0: e58d3000 str r3, [sp] 30006be4: eb000828 bl 30008c8c <_Workspace_Allocate>
if ( !object_blocks ) {
30006be8: e2509000 subs r9, r0, #0 30006bec: e59d3000 ldr r3, [sp]
30006bf0: 0a000073 beq 30006dc4 <_Objects_Extend_information+0x2b8>
* Take the block count down. Saves all the (block_count - 1)
* in the copies.
*/
block_count--;
if ( information->maximum > minimum_index ) {
30006bf4: e1d521b0 ldrh r2, [r5, #16]
RTEMS_INLINE_ROUTINE void *_Addresses_Add_offset (
const void *base,
uintptr_t offset
)
{
return (void *)((uintptr_t)base + offset);
30006bf8: e089c10b add ip, r9, fp, lsl #2 30006bfc: e1570002 cmp r7, r2 30006c00: e089b18b add fp, r9, fp, lsl #3
30006c04: 3a000051 bcc 30006d50 <_Objects_Extend_information+0x244>
} else {
/*
* Deal with the special case of the 0 to minimum_index
*/
for ( index = 0; index < minimum_index; index++ ) {
30006c08: e3570000 cmp r7, #0 30006c0c: 13a02000 movne r2, #0 30006c10: 11a0100b movne r1, fp
local_table[ index ] = NULL;
30006c14: 11a00002 movne r0, r2
} else {
/*
* Deal with the special case of the 0 to minimum_index
*/
for ( index = 0; index < minimum_index; index++ ) {
30006c18: 0a000003 beq 30006c2c <_Objects_Extend_information+0x120>
30006c1c: e2822001 add r2, r2, #1 30006c20: e1570002 cmp r7, r2
local_table[ index ] = NULL;
30006c24: e4810004 str r0, [r1], #4
} else {
/*
* Deal with the special case of the 0 to minimum_index
*/
for ( index = 0; index < minimum_index; index++ ) {
30006c28: 8afffffb bhi 30006c1c <_Objects_Extend_information+0x110>
30006c2c: e1a03103 lsl r3, r3, #2
*/
object_blocks[block_count] = NULL;
inactive_per_block[block_count] = 0;
for ( index=index_base ;
index < ( information->allocation_size + index_base );
30006c30: e1d511b4 ldrh r1, [r5, #20]
}
/*
* Initialise the new entries in the table.
*/
object_blocks[block_count] = NULL;
30006c34: e3a00000 mov r0, #0
inactive_per_block[block_count] = 0;
for ( index=index_base ;
index < ( information->allocation_size + index_base );
30006c38: e0861001 add r1, r6, r1
* Initialise the new entries in the table.
*/
object_blocks[block_count] = NULL;
inactive_per_block[block_count] = 0;
for ( index=index_base ;
30006c3c: e1560001 cmp r6, r1
}
/*
* Initialise the new entries in the table.
*/
object_blocks[block_count] = NULL;
30006c40: e7890003 str r0, [r9, r3]
inactive_per_block[block_count] = 0;
30006c44: e78c0003 str r0, [ip, r3]
for ( index=index_base ;
30006c48: 2a000005 bcs 30006c64 <_Objects_Extend_information+0x158>
30006c4c: e08b2106 add r2, fp, r6, lsl #2
* information - object information table
*
* Output parameters: NONE
*/
void _Objects_Extend_information(
30006c50: e1a03006 mov r3, r6
object_blocks[block_count] = NULL;
inactive_per_block[block_count] = 0;
for ( index=index_base ;
index < ( information->allocation_size + index_base );
index++ ) {
30006c54: e2833001 add r3, r3, #1
* Initialise the new entries in the table.
*/
object_blocks[block_count] = NULL;
inactive_per_block[block_count] = 0;
for ( index=index_base ;
30006c58: e1530001 cmp r3, r1
index < ( information->allocation_size + index_base );
index++ ) {
local_table[ index ] = NULL;
30006c5c: e4820004 str r0, [r2], #4
* Initialise the new entries in the table.
*/
object_blocks[block_count] = NULL;
inactive_per_block[block_count] = 0;
for ( index=index_base ;
30006c60: 3afffffb bcc 30006c54 <_Objects_Extend_information+0x148>
30006c64: e10f3000 mrs r3, CPSR 30006c68: e3832080 orr r2, r3, #128 ; 0x80 30006c6c: e129f002 msr CPSR_fc, r2
uint32_t the_class,
uint32_t node,
uint32_t index
)
{
return (( (Objects_Id) the_api ) << OBJECTS_API_START_BIT) |
30006c70: e5952000 ldr r2, [r5]
information->object_blocks = object_blocks;
information->inactive_per_block = inactive_per_block;
information->local_table = local_table;
information->maximum = (Objects_Maximum) maximum;
information->maximum_id = _Objects_Build_id(
30006c74: e1d510b4 ldrh r1, [r5, #4] 30006c78: e1a02c02 lsl r2, r2, #24
old_tables = information->object_blocks;
information->object_blocks = object_blocks;
information->inactive_per_block = inactive_per_block;
information->local_table = local_table;
information->maximum = (Objects_Maximum) maximum;
30006c7c: e1a0a80a lsl sl, sl, #16 30006c80: e3822801 orr r2, r2, #65536 ; 0x10000 30006c84: e1a0a82a lsr sl, sl, #16
(( (Objects_Id) the_class ) << OBJECTS_CLASS_START_BIT) |
30006c88: e1822d81 orr r2, r2, r1, lsl #27
uint32_t the_class,
uint32_t node,
uint32_t index
)
{
return (( (Objects_Id) the_api ) << OBJECTS_API_START_BIT) |
30006c8c: e182200a orr r2, r2, sl
local_table[ index ] = NULL;
}
_ISR_Disable( level );
old_tables = information->object_blocks;
30006c90: e5950034 ldr r0, [r5, #52] ; 0x34
information->object_blocks = object_blocks;
information->inactive_per_block = inactive_per_block;
30006c94: e585c030 str ip, [r5, #48] ; 0x30
_ISR_Disable( level );
old_tables = information->object_blocks;
information->object_blocks = object_blocks;
30006c98: e5859034 str r9, [r5, #52] ; 0x34
information->inactive_per_block = inactive_per_block;
information->local_table = local_table;
30006c9c: e585b01c str fp, [r5, #28]
information->maximum = (Objects_Maximum) maximum;
30006ca0: e1c5a1b0 strh sl, [r5, #16]
information->maximum_id = _Objects_Build_id(
30006ca4: e585200c str r2, [r5, #12]
static inline void arm_interrupt_enable( uint32_t level )
{
ARM_SWITCH_REGISTERS;
asm volatile (
30006ca8: e129f003 msr CPSR_fc, r3
information->maximum
);
_ISR_Enable( level );
if ( old_tables )
30006cac: e3500000 cmp r0, #0
_Workspace_Free( old_tables );
30006cb0: 1b0007fb blne 30008ca4 <_Workspace_Free>
}
/*
* Assign the new object block to the object block table.
*/
information->object_blocks[ block ] = new_object_block;
30006cb4: e5953034 ldr r3, [r5, #52] ; 0x34
/*
* Initialize objects .. add to a local chain first.
*/
_Chain_Initialize(
30006cb8: e28d7008 add r7, sp, #8
}
/*
* Assign the new object block to the object block table.
*/
information->object_blocks[ block ] = new_object_block;
30006cbc: e7838104 str r8, [r3, r4, lsl #2]
/*
* Initialize objects .. add to a local chain first.
*/
_Chain_Initialize(
30006cc0: e1a01008 mov r1, r8 30006cc4: e1a00007 mov r0, r7 30006cc8: e1d521b4 ldrh r2, [r5, #20] 30006ccc: e5953018 ldr r3, [r5, #24] 30006cd0: eb001226 bl 3000b570 <_Chain_Initialize>
}
/*
* Assign the new object block to the object block table.
*/
information->object_blocks[ block ] = new_object_block;
30006cd4: e1a04104 lsl r4, r4, #2
information->the_class,
_Objects_Local_node,
index
);
_Chain_Append( &information->Inactive, &the_object->Node );
30006cd8: e2858020 add r8, r5, #32
/*
* Move from the local chain, initialise, then append to the inactive chain
*/
index = index_base;
while ((the_object = (Objects_Control *) _Chain_Get( &Inactive )) != NULL ) {
30006cdc: ea000009 b 30006d08 <_Objects_Extend_information+0x1fc> 30006ce0: e5953000 ldr r3, [r5]
the_object->id = _Objects_Build_id(
30006ce4: e1d520b4 ldrh r2, [r5, #4] 30006ce8: e1a03c03 lsl r3, r3, #24 30006cec: e3833801 orr r3, r3, #65536 ; 0x10000
(( (Objects_Id) the_class ) << OBJECTS_CLASS_START_BIT) |
30006cf0: e1833d82 orr r3, r3, r2, lsl #27
uint32_t the_class,
uint32_t node,
uint32_t index
)
{
return (( (Objects_Id) the_api ) << OBJECTS_API_START_BIT) |
30006cf4: e1833006 orr r3, r3, r6 30006cf8: e5813008 str r3, [r1, #8]
information->the_class,
_Objects_Local_node,
index
);
_Chain_Append( &information->Inactive, &the_object->Node );
30006cfc: e1a00008 mov r0, r8 30006d00: ebfffce4 bl 30006098 <_Chain_Append>
index++;
30006d04: e2866001 add r6, r6, #1
/*
* Move from the local chain, initialise, then append to the inactive chain
*/
index = index_base;
while ((the_object = (Objects_Control *) _Chain_Get( &Inactive )) != NULL ) {
30006d08: e1a00007 mov r0, r7 30006d0c: ebfffcf4 bl 300060e4 <_Chain_Get> 30006d10: e2501000 subs r1, r0, #0
30006d14: 1afffff1 bne 30006ce0 <_Objects_Extend_information+0x1d4>
index++;
}
information->inactive_per_block[ block ] = information->allocation_size;
information->inactive =
(Objects_Maximum)(information->inactive + information->allocation_size);
30006d18: e1d522bc ldrh r2, [r5, #44] ; 0x2c
_Chain_Append( &information->Inactive, &the_object->Node );
index++;
}
information->inactive_per_block[ block ] = information->allocation_size;
30006d1c: e1d531b4 ldrh r3, [r5, #20] 30006d20: e5951030 ldr r1, [r5, #48] ; 0x30
information->inactive =
(Objects_Maximum)(information->inactive + information->allocation_size);
30006d24: e0832002 add r2, r3, r2
_Chain_Append( &information->Inactive, &the_object->Node );
index++;
}
information->inactive_per_block[ block ] = information->allocation_size;
30006d28: e7813004 str r3, [r1, r4]
information->inactive =
30006d2c: e1c522bc strh r2, [r5, #44] ; 0x2c
(Objects_Maximum)(information->inactive + information->allocation_size);
}
30006d30: e28dd014 add sp, sp, #20
30006d34: e8bd8ff0 pop {r4, r5, r6, r7, r8, r9, sl, fp, pc}
* Allocate the name table, and the objects and if it fails either return or
* generate a fatal error depending on auto-extending being active.
*/
block_size = information->allocation_size * information->size;
if ( information->auto_extend ) {
new_object_block = _Workspace_Allocate( block_size );
30006d38: e58d3000 str r3, [sp] 30006d3c: eb0007d2 bl 30008c8c <_Workspace_Allocate>
if ( !new_object_block )
30006d40: e2508000 subs r8, r0, #0 30006d44: e59d3000 ldr r3, [sp]
30006d48: 1affff9d bne 30006bc4 <_Objects_Extend_information+0xb8>
30006d4c: eafffff7 b 30006d30 <_Objects_Extend_information+0x224>
/*
* Copy each section of the table over. This has to be performed as
* separate parts as size of each block has changed.
*/
memcpy( object_blocks,
30006d50: e1a03103 lsl r3, r3, #2
30006d54: e5951034 ldr r1, [r5, #52] ; 0x34
30006d58: e1a02003 mov r2, r3
30006d5c: e88d1008 stm sp, {r3, ip}
30006d60: eb001d92 bl 3000e3b0 <memcpy>
information->object_blocks,
block_count * sizeof(void*) );
memcpy( inactive_per_block,
30006d64: e89d1008 ldm sp, {r3, ip}
30006d68: e1a0000c mov r0, ip
30006d6c: e1a02003 mov r2, r3
30006d70: e5951030 ldr r1, [r5, #48] ; 0x30
30006d74: eb001d8d bl 3000e3b0 <memcpy>
information->inactive_per_block,
block_count * sizeof(uint32_t) );
memcpy( local_table,
information->local_table,
(information->maximum + minimum_index) * sizeof(Objects_Control *) );
30006d78: e1d521b0 ldrh r2, [r5, #16]
information->object_blocks,
block_count * sizeof(void*) );
memcpy( inactive_per_block,
information->inactive_per_block,
block_count * sizeof(uint32_t) );
memcpy( local_table,
30006d7c: e1a0000b mov r0, fp
information->local_table,
(information->maximum + minimum_index) * sizeof(Objects_Control *) );
30006d80: e0872002 add r2, r7, r2
information->object_blocks,
block_count * sizeof(void*) );
memcpy( inactive_per_block,
information->inactive_per_block,
block_count * sizeof(uint32_t) );
memcpy( local_table,
30006d84: e595101c ldr r1, [r5, #28]
30006d88: e1a02102 lsl r2, r2, #2
30006d8c: eb001d87 bl 3000e3b0 <memcpy>
30006d90: e89d1008 ldm sp, {r3, ip}
30006d94: eaffffa5 b 30006c30 <_Objects_Extend_information+0x124>
minimum_index = _Objects_Get_index( information->minimum_id );
index_base = minimum_index;
block = 0;
/* if ( information->maximum < minimum_index ) */
if ( information->object_blocks == NULL )
30006d98: e1d0a1b0 ldrh sl, [r0, #16] 30006d9c: e1d011b4 ldrh r1, [r0, #20]
/* * Search for a free block of indexes. If we do NOT need to allocate or * extend the block table, then we will change do_extend. */ do_extend = true; minimum_index = _Objects_Get_index( information->minimum_id );
30006da0: e1a06007 mov r6, r7
/*
* Search for a free block of indexes. If we do NOT need to allocate or
* extend the block table, then we will change do_extend.
*/
do_extend = true;
30006da4: e3a09001 mov r9, #1
index_base = minimum_index;
block = 0;
/* if ( information->maximum < minimum_index ) */
if ( information->object_blocks == NULL )
block_count = 0;
30006da8: e1a03004 mov r3, r4 30006dac: eaffff78 b 30006b94 <_Objects_Extend_information+0x88>
else {
block_count = information->maximum / information->allocation_size;
for ( ; block < block_count; block++ ) {
30006db0: e1a01008 mov r1, r8 <== NOT EXECUTED
/* * Search for a free block of indexes. If we do NOT need to allocate or * extend the block table, then we will change do_extend. */ do_extend = true; minimum_index = _Objects_Get_index( information->minimum_id );
30006db4: e1a06007 mov r6, r7 <== NOT EXECUTED
/*
* Search for a free block of indexes. If we do NOT need to allocate or
* extend the block table, then we will change do_extend.
*/
do_extend = true;
30006db8: e3a09001 mov r9, #1 <== NOT EXECUTED
minimum_index = _Objects_Get_index( information->minimum_id ); index_base = minimum_index; block = 0;
30006dbc: e1a04003 mov r4, r3 <== NOT EXECUTED 30006dc0: eaffff73 b 30006b94 <_Objects_Extend_information+0x88> <== NOT EXECUTED
(sizeof(void *) + sizeof(uint32_t) + sizeof(Objects_Name *)) +
((maximum + minimum_index) * sizeof(Objects_Control *));
object_blocks = (void**) _Workspace_Allocate( block_size );
if ( !object_blocks ) {
_Workspace_Free( new_object_block );
30006dc4: e1a00008 mov r0, r8 30006dc8: eb0007b5 bl 30008ca4 <_Workspace_Free>
return;
30006dcc: eaffffd7 b 30006d30 <_Objects_Extend_information+0x224>
300077b8 <_Objects_Set_name>:
bool _Objects_Set_name(
Objects_Information *information,
Objects_Control *the_object,
const char *name
)
{
300077b8: e92d40f0 push {r4, r5, r6, r7, lr}
300077bc: e1a05000 mov r5, r0
300077c0: e1a06001 mov r6, r1
size_t length;
const char *s;
s = name;
length = strnlen( name, information->name_length );
300077c4: e1a00002 mov r0, r2 300077c8: e1d513ba ldrh r1, [r5, #58] ; 0x3a
bool _Objects_Set_name(
Objects_Information *information,
Objects_Control *the_object,
const char *name
)
{
300077cc: e1a07002 mov r7, r2
size_t length;
const char *s;
s = name;
length = strnlen( name, information->name_length );
300077d0: eb002207 bl 3000fff4 <strnlen>
#if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES)
if ( information->is_string ) {
300077d4: e5d53038 ldrb r3, [r5, #56] ; 0x38
{
size_t length;
const char *s;
s = name;
length = strnlen( name, information->name_length );
300077d8: e1a04000 mov r4, r0
#if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES)
if ( information->is_string ) {
300077dc: e3530000 cmp r3, #0
300077e0: 1a000017 bne 30007844 <_Objects_Set_name+0x8c>
d[length] = '\0';
the_object->name.name_p = d;
} else
#endif
{
the_object->name.name_u32 = _Objects_Build_name(
300077e4: e5d72000 ldrb r2, [r7] 300077e8: e3500001 cmp r0, #1 300077ec: e1a02c02 lsl r2, r2, #24
300077f0: 9a00000c bls 30007828 <_Objects_Set_name+0x70>
300077f4: e5d73001 ldrb r3, [r7, #1] 300077f8: e3500002 cmp r0, #2 300077fc: e1822803 orr r2, r2, r3, lsl #16
30007800: 0a000009 beq 3000782c <_Objects_Set_name+0x74>
30007804: e5d73002 ldrb r3, [r7, #2] 30007808: e3500003 cmp r0, #3 3000780c: e1822403 orr r2, r2, r3, lsl #8 30007810: 15d73003 ldrbne r3, [r7, #3] 30007814: 03a03020 moveq r3, #32 30007818: e1823003 orr r3, r2, r3 3000781c: e586300c str r3, [r6, #12]
((3 < length) ? s[ 3 ] : ' ')
);
}
return true;
30007820: e3a00001 mov r0, #1
30007824: e8bd80f0 pop {r4, r5, r6, r7, pc}
d[length] = '\0';
the_object->name.name_p = d;
} else
#endif
{
the_object->name.name_u32 = _Objects_Build_name(
30007828: e3822602 orr r2, r2, #2097152 ; 0x200000 3000782c: e3822a02 orr r2, r2, #8192 ; 0x2000 30007830: e3a03020 mov r3, #32 30007834: e1823003 orr r3, r2, r3 30007838: e586300c str r3, [r6, #12]
((3 < length) ? s[ 3 ] : ' ')
);
}
return true;
3000783c: e3a00001 mov r0, #1
30007840: e8bd80f0 pop {r4, r5, r6, r7, pc}
#if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES)
if ( information->is_string ) {
char *d;
d = _Workspace_Allocate( length + 1 );
30007844: e2800001 add r0, r0, #1 30007848: eb0006e9 bl 300093f4 <_Workspace_Allocate>
if ( !d )
3000784c: e2505000 subs r5, r0, #0
30007850: 0a00000e beq 30007890 <_Objects_Set_name+0xd8>
return false;
if ( the_object->name.name_p ) {
30007854: e596000c ldr r0, [r6, #12] 30007858: e3500000 cmp r0, #0
3000785c: 0a000002 beq 3000786c <_Objects_Set_name+0xb4>
_Workspace_Free( (void *)the_object->name.name_p );
30007860: eb0006e9 bl 3000940c <_Workspace_Free>
the_object->name.name_p = NULL;
30007864: e3a03000 mov r3, #0 30007868: e586300c str r3, [r6, #12]
}
strncpy( d, name, length );
3000786c: e1a00005 mov r0, r5 30007870: e1a01007 mov r1, r7 30007874: e1a02004 mov r2, r4 30007878: eb0021a2 bl 3000ff08 <strncpy>
d[length] = '\0';
3000787c: e3a03000 mov r3, #0 30007880: e7c53004 strb r3, [r5, r4]
((3 < length) ? s[ 3 ] : ' ')
);
}
return true;
30007884: e3a00001 mov r0, #1
the_object->name.name_p = NULL;
}
strncpy( d, name, length );
d[length] = '\0';
the_object->name.name_p = d;
30007888: e586500c str r5, [r6, #12]
3000788c: e8bd80f0 pop {r4, r5, r6, r7, pc}
if ( information->is_string ) {
char *d;
d = _Workspace_Allocate( length + 1 );
if ( !d )
return false;
30007890: e1a00005 mov r0, r5 <== NOT EXECUTED
);
}
return true;
}
30007894: e8bd80f0 pop {r4, r5, r6, r7, pc} <== NOT EXECUTED
30007130 <_Objects_Shrink_information>:
*/
void _Objects_Shrink_information(
Objects_Information *information
)
{
30007130: e92d40f0 push {r4, r5, r6, r7, lr}
/*
* Search the list to find block or chunk with all objects inactive.
*/
index_base = _Objects_Get_index( information->minimum_id );
30007134: e1d040b8 ldrh r4, [r0, #8]
block_count = (information->maximum - index_base) /
30007138: e1d051b4 ldrh r5, [r0, #20]
*/
void _Objects_Shrink_information(
Objects_Information *information
)
{
3000713c: e1a06000 mov r6, r0
/*
* Search the list to find block or chunk with all objects inactive.
*/
index_base = _Objects_Get_index( information->minimum_id );
block_count = (information->maximum - index_base) /
30007140: e1d001b0 ldrh r0, [r0, #16] 30007144: e1a01005 mov r1, r5 30007148: e0640000 rsb r0, r4, r0 3000714c: eb002818 bl 300111b4 <__aeabi_uidiv>
information->allocation_size;
for ( block = 0; block < block_count; block++ ) {
30007150: e3500000 cmp r0, #0
30007154: 08bd80f0 popeq {r4, r5, r6, r7, pc}
if ( information->inactive_per_block[ block ] ==
30007158: e5962030 ldr r2, [r6, #48] ; 0x30 3000715c: e5923000 ldr r3, [r2] 30007160: e1550003 cmp r5, r3
index_base = _Objects_Get_index( information->minimum_id );
block_count = (information->maximum - index_base) /
information->allocation_size;
for ( block = 0; block < block_count; block++ ) {
30007164: 13a03000 movne r3, #0
if ( information->inactive_per_block[ block ] ==
30007168: 1a000005 bne 30007184 <_Objects_Shrink_information+0x54>
3000716c: ea000008 b 30007194 <_Objects_Shrink_information+0x64> <== NOT EXECUTED
30007170: e5b21004 ldr r1, [r2, #4]!
information->inactive -= information->allocation_size;
return;
}
index_base += information->allocation_size;
30007174: e0844005 add r4, r4, r5
index_base = _Objects_Get_index( information->minimum_id );
block_count = (information->maximum - index_base) /
information->allocation_size;
for ( block = 0; block < block_count; block++ ) {
if ( information->inactive_per_block[ block ] ==
30007178: e1550001 cmp r5, r1
information->inactive -= information->allocation_size;
return;
}
index_base += information->allocation_size;
3000717c: e1a07103 lsl r7, r3, #2
index_base = _Objects_Get_index( information->minimum_id );
block_count = (information->maximum - index_base) /
information->allocation_size;
for ( block = 0; block < block_count; block++ ) {
if ( information->inactive_per_block[ block ] ==
30007180: 0a000004 beq 30007198 <_Objects_Shrink_information+0x68>
index_base = _Objects_Get_index( information->minimum_id );
block_count = (information->maximum - index_base) /
information->allocation_size;
for ( block = 0; block < block_count; block++ ) {
30007184: e2833001 add r3, r3, #1 30007188: e1500003 cmp r0, r3
3000718c: 8afffff7 bhi 30007170 <_Objects_Shrink_information+0x40>
30007190: e8bd80f0 pop {r4, r5, r6, r7, pc}
if ( information->inactive_per_block[ block ] ==
30007194: e3a07000 mov r7, #0 <== NOT EXECUTED
information->allocation_size ) {
/*
* Assume the Inactive chain is never empty at this point
*/
the_object = (Objects_Control *) information->Inactive.first;
30007198: e5960020 ldr r0, [r6, #32] 3000719c: ea000002 b 300071ac <_Objects_Shrink_information+0x7c>
if ((index >= index_base) &&
(index < (index_base + information->allocation_size))) {
_Chain_Extract( &extract_me->Node );
}
}
while ( the_object );
300071a0: e3550000 cmp r5, #0
300071a4: 0a00000b beq 300071d8 <_Objects_Shrink_information+0xa8>
index = _Objects_Get_index( the_object->id );
/*
* Get the next node before the node is extracted
*/
extract_me = the_object;
the_object = (Objects_Control *) the_object->Node.next;
300071a8: e1a00005 mov r0, r5
* Assume the Inactive chain is never empty at this point
*/
the_object = (Objects_Control *) information->Inactive.first;
do {
index = _Objects_Get_index( the_object->id );
300071ac: e1d030b8 ldrh r3, [r0, #8]
/*
* Get the next node before the node is extracted
*/
extract_me = the_object;
the_object = (Objects_Control *) the_object->Node.next;
300071b0: e5905000 ldr r5, [r0]
if ((index >= index_base) &&
300071b4: e1530004 cmp r3, r4
300071b8: 3afffff8 bcc 300071a0 <_Objects_Shrink_information+0x70>
(index < (index_base + information->allocation_size))) {
300071bc: e1d621b4 ldrh r2, [r6, #20] 300071c0: e0842002 add r2, r4, r2
/*
* Get the next node before the node is extracted
*/
extract_me = the_object;
the_object = (Objects_Control *) the_object->Node.next;
if ((index >= index_base) &&
300071c4: e1530002 cmp r3, r2
300071c8: 2afffff4 bcs 300071a0 <_Objects_Shrink_information+0x70>
(index < (index_base + information->allocation_size))) {
_Chain_Extract( &extract_me->Node );
300071cc: ebfffbbc bl 300060c4 <_Chain_Extract>
}
}
while ( the_object );
300071d0: e3550000 cmp r5, #0
300071d4: 1afffff3 bne 300071a8 <_Objects_Shrink_information+0x78>
/*
* Free the memory and reset the structures in the object' information
*/
_Workspace_Free( information->object_blocks[ block ] );
300071d8: e5963034 ldr r3, [r6, #52] ; 0x34 300071dc: e7930007 ldr r0, [r3, r7] 300071e0: eb0006af bl 30008ca4 <_Workspace_Free>
information->object_blocks[ block ] = NULL;
information->inactive_per_block[ block ] = 0;
information->inactive -= information->allocation_size;
300071e4: e1d602bc ldrh r0, [r6, #44] ; 0x2c 300071e8: e1d631b4 ldrh r3, [r6, #20]
/*
* Free the memory and reset the structures in the object' information
*/
_Workspace_Free( information->object_blocks[ block ] );
information->object_blocks[ block ] = NULL;
300071ec: e5961034 ldr r1, [r6, #52] ; 0x34
information->inactive_per_block[ block ] = 0;
300071f0: e5962030 ldr r2, [r6, #48] ; 0x30
information->inactive -= information->allocation_size;
300071f4: e0633000 rsb r3, r3, r0
/*
* Free the memory and reset the structures in the object' information
*/
_Workspace_Free( information->object_blocks[ block ] );
information->object_blocks[ block ] = NULL;
300071f8: e7815007 str r5, [r1, r7]
information->inactive_per_block[ block ] = 0;
300071fc: e7825007 str r5, [r2, r7]
information->inactive -= information->allocation_size;
30007200: e1c632bc strh r3, [r6, #44] ; 0x2c
return;
30007204: e8bd80f0 pop {r4, r5, r6, r7, pc}
3000684c <_POSIX_Condition_variables_Wait_support>:
pthread_cond_t *cond,
pthread_mutex_t *mutex,
Watchdog_Interval timeout,
bool already_timedout
)
{
3000684c: e92d45f0 push {r4, r5, r6, r7, r8, sl, lr}
30006850: e24dd004 sub sp, sp, #4
30006854: e1a04001 mov r4, r1
30006858: e1a06000 mov r6, r0
register POSIX_Condition_variables_Control *the_cond;
Objects_Locations location;
int status;
int mutex_status;
if ( !_POSIX_Mutex_Get( mutex, &location ) ) {
3000685c: e1a00001 mov r0, r1 30006860: e1a0100d mov r1, sp
pthread_cond_t *cond,
pthread_mutex_t *mutex,
Watchdog_Interval timeout,
bool already_timedout
)
{
30006864: e1a08002 mov r8, r2 30006868: e20370ff and r7, r3, #255 ; 0xff
register POSIX_Condition_variables_Control *the_cond;
Objects_Locations location;
int status;
int mutex_status;
if ( !_POSIX_Mutex_Get( mutex, &location ) ) {
3000686c: eb00005a bl 300069dc <_POSIX_Mutex_Get> 30006870: e3500000 cmp r0, #0
30006874: 0a00000a beq 300068a4 <_POSIX_Condition_variables_Wait_support+0x58>
*/
RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void )
{
RTEMS_COMPILER_MEMORY_BARRIER();
_Thread_Dispatch_disable_level -= 1;
30006878: e59f30d8 ldr r3, [pc, #216] ; 30006958 <_POSIX_Condition_variables_Wait_support+0x10c>
return EINVAL;
}
_Thread_Unnest_dispatch();
the_cond = _POSIX_Condition_variables_Get( cond, &location );
3000687c: e1a00006 mov r0, r6 30006880: e5932000 ldr r2, [r3] 30006884: e1a0100d mov r1, sp 30006888: e2422001 sub r2, r2, #1 3000688c: e5832000 str r2, [r3] 30006890: ebffff76 bl 30006670 <_POSIX_Condition_variables_Get>
switch ( location ) {
30006894: e59d3000 ldr r3, [sp]
return EINVAL;
}
_Thread_Unnest_dispatch();
the_cond = _POSIX_Condition_variables_Get( cond, &location );
30006898: e1a0a000 mov sl, r0
switch ( location ) {
3000689c: e3530000 cmp r3, #0
300068a0: 0a000003 beq 300068b4 <_POSIX_Condition_variables_Wait_support+0x68>
#endif
case OBJECTS_ERROR:
break;
}
return EINVAL;
300068a4: e3a05016 mov r5, #22
}
300068a8: e1a00005 mov r0, r5
300068ac: e28dd004 add sp, sp, #4
300068b0: e8bd85f0 pop {r4, r5, r6, r7, r8, sl, pc}
the_cond = _POSIX_Condition_variables_Get( cond, &location );
switch ( location ) {
case OBJECTS_LOCAL:
if ( the_cond->Mutex && ( the_cond->Mutex != *mutex ) ) {
300068b4: e5903014 ldr r3, [r0, #20] 300068b8: e3530000 cmp r3, #0
300068bc: 0a000005 beq 300068d8 <_POSIX_Condition_variables_Wait_support+0x8c>
300068c0: e5942000 ldr r2, [r4] 300068c4: e1530002 cmp r3, r2
300068c8: 0a000002 beq 300068d8 <_POSIX_Condition_variables_Wait_support+0x8c>
_Thread_Enable_dispatch();
300068cc: eb000c82 bl 30009adc <_Thread_Enable_dispatch>
return EINVAL;
300068d0: e3a05016 mov r5, #22 300068d4: eafffff3 b 300068a8 <_POSIX_Condition_variables_Wait_support+0x5c>
}
(void) pthread_mutex_unlock( mutex );
300068d8: e1a00004 mov r0, r4 300068dc: eb0000e4 bl 30006c74 <pthread_mutex_unlock>
_Thread_Enable_dispatch();
return EINVAL;
}
*/
if ( !already_timedout ) {
300068e0: e3570000 cmp r7, #0
300068e4: 0a000006 beq 30006904 <_POSIX_Condition_variables_Wait_support+0xb8>
status = _Thread_Executing->Wait.return_code;
if ( status && status != ETIMEDOUT )
return status;
} else {
_Thread_Enable_dispatch();
300068e8: eb000c7b bl 30009adc <_Thread_Enable_dispatch>
status = ETIMEDOUT;
300068ec: e3a05074 mov r5, #116 ; 0x74
/*
* When we get here the dispatch disable level is 0.
*/
mutex_status = pthread_mutex_lock( mutex );
300068f0: e1a00004 mov r0, r4 300068f4: eb0000bd bl 30006bf0 <pthread_mutex_lock>
if ( mutex_status )
return EINVAL;
300068f8: e3500000 cmp r0, #0 300068fc: 13a05016 movne r5, #22 30006900: eaffffe8 b 300068a8 <_POSIX_Condition_variables_Wait_support+0x5c>
if ( !already_timedout ) {
the_cond->Mutex = *mutex;
_Thread_queue_Enter_critical_section( &the_cond->Wait_queue );
_Thread_Executing->Wait.return_code = 0;
30006904: e59f5050 ldr r5, [pc, #80] ; 3000695c <_POSIX_Condition_variables_Wait_support+0x110>
return EINVAL;
}
*/
if ( !already_timedout ) {
the_cond->Mutex = *mutex;
30006908: e5942000 ldr r2, [r4]
_Thread_queue_Enter_critical_section( &the_cond->Wait_queue );
_Thread_Executing->Wait.return_code = 0;
3000690c: e5953004 ldr r3, [r5, #4]
return EINVAL;
}
*/
if ( !already_timedout ) {
the_cond->Mutex = *mutex;
30006910: e58a2014 str r2, [sl, #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;
30006914: e3a02001 mov r2, #1 30006918: e58a2048 str r2, [sl, #72] ; 0x48
_Thread_queue_Enter_critical_section( &the_cond->Wait_queue );
_Thread_Executing->Wait.return_code = 0;
3000691c: e5837034 str r7, [r3, #52] ; 0x34
_Thread_Executing->Wait.queue = &the_cond->Wait_queue;
_Thread_Executing->Wait.id = *cond;
30006920: e5962000 ldr r2, [r6]
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;
30006924: e28a0018 add r0, sl, #24
_Thread_Executing->Wait.id = *cond;
30006928: e5832020 str r2, [r3, #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;
3000692c: e5830044 str r0, [r3, #68] ; 0x44
_Thread_Executing->Wait.id = *cond;
_Thread_queue_Enqueue( &the_cond->Wait_queue, timeout );
30006930: e1a01008 mov r1, r8 30006934: e59f2024 ldr r2, [pc, #36] ; 30006960 <_POSIX_Condition_variables_Wait_support+0x114> 30006938: eb000d9c bl 30009fb0 <_Thread_queue_Enqueue_with_handler>
_Thread_Enable_dispatch();
3000693c: eb000c66 bl 30009adc <_Thread_Enable_dispatch>
/*
* Switch ourself out because we blocked as a result of the
* _Thread_queue_Enqueue.
*/
status = _Thread_Executing->Wait.return_code;
30006940: e5953004 ldr r3, [r5, #4] 30006944: e5935034 ldr r5, [r3, #52] ; 0x34
if ( status && status != ETIMEDOUT )
30006948: e3550074 cmp r5, #116 ; 0x74 3000694c: 13550000 cmpne r5, #0
30006950: 0affffe6 beq 300068f0 <_POSIX_Condition_variables_Wait_support+0xa4>
30006954: eaffffd3 b 300068a8 <_POSIX_Condition_variables_Wait_support+0x5c><== NOT EXECUTED
3000da74 <_POSIX_signals_Clear_process_signals>:
static inline uint32_t arm_interrupt_disable( void )
{
uint32_t arm_switch_reg;
uint32_t level;
asm volatile (
3000da74: e10f2000 mrs r2, CPSR 3000da78: e3823080 orr r3, r2, #128 ; 0x80 3000da7c: e129f003 msr CPSR_fc, r3
mask = signo_to_mask( signo );
ISR_Level level;
_ISR_Disable( level );
if ( _POSIX_signals_Vectors[ signo ].sa_flags == SA_SIGINFO ) {
3000da80: e59f1050 ldr r1, [pc, #80] ; 3000dad8 <_POSIX_signals_Clear_process_signals+0x64> 3000da84: e0803080 add r3, r0, r0, lsl #1 3000da88: e7911103 ldr r1, [r1, r3, lsl #2] 3000da8c: e1a0c103 lsl ip, r3, #2 3000da90: e3510002 cmp r1, #2
3000da94: 0a000007 beq 3000dab8 <_POSIX_signals_Clear_process_signals+0x44>
if ( !_Chain_Is_empty( &_POSIX_signals_Siginfo[ signo ] ) )
clear_signal = false;
}
if ( clear_signal ) {
_POSIX_signals_Pending &= ~mask;
3000da98: e59f303c ldr r3, [pc, #60] ; 3000dadc <_POSIX_signals_Clear_process_signals+0x68> 3000da9c: e3a0c001 mov ip, #1 3000daa0: e5931000 ldr r1, [r3] 3000daa4: e2400001 sub r0, r0, #1 3000daa8: e1c1001c bic r0, r1, ip, lsl r0 3000daac: e5830000 str r0, [r3]
static inline void arm_interrupt_enable( uint32_t level )
{
ARM_SWITCH_REGISTERS;
asm volatile (
3000dab0: e129f002 msr CPSR_fc, r2
}
_ISR_Enable( level );
}
3000dab4: e12fff1e bx lr
*/
RTEMS_INLINE_ROUTINE bool _Chain_Is_empty(
Chain_Control *the_chain
)
{
return (the_chain->first == _Chain_Tail(the_chain));
3000dab8: e59f1020 ldr r1, [pc, #32] ; 3000dae0 <_POSIX_signals_Clear_process_signals+0x6c>
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
3000dabc: e28cc004 add ip, ip, #4
ISR_Level level;
_ISR_Disable( level );
if ( _POSIX_signals_Vectors[ signo ].sa_flags == SA_SIGINFO ) {
if ( !_Chain_Is_empty( &_POSIX_signals_Siginfo[ signo ] ) )
3000dac0: e7913103 ldr r3, [r1, r3, lsl #2] 3000dac4: e08c1001 add r1, ip, r1 3000dac8: e1530001 cmp r3, r1
3000dacc: 0afffff1 beq 3000da98 <_POSIX_signals_Clear_process_signals+0x24>
3000dad0: e129f002 msr CPSR_fc, r2 <== NOT EXECUTED
}
if ( clear_signal ) {
_POSIX_signals_Pending &= ~mask;
}
_ISR_Enable( level );
}
3000dad4: e12fff1e bx lr <== NOT EXECUTED
30006730 <_TOD_Validate>:
{
uint32_t days_in_month;
uint32_t ticks_per_second;
ticks_per_second = TOD_MICROSECONDS_PER_SECOND /
rtems_configuration_get_microseconds_per_tick();
30006730: e59f30b0 ldr r3, [pc, #176] ; 300067e8 <_TOD_Validate+0xb8>
*/
bool _TOD_Validate(
const rtems_time_of_day *the_tod
)
{
30006734: e92d4010 push {r4, lr}
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) ||
30006738: e2504000 subs r4, r0, #0
{
uint32_t days_in_month;
uint32_t ticks_per_second;
ticks_per_second = TOD_MICROSECONDS_PER_SECOND /
rtems_configuration_get_microseconds_per_tick();
3000673c: e593100c ldr r1, [r3, #12]
(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;
30006740: 01a00004 moveq r0, r4
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) ||
30006744: 08bd8010 popeq {r4, pc}
)
{
uint32_t days_in_month;
uint32_t ticks_per_second;
ticks_per_second = TOD_MICROSECONDS_PER_SECOND /
30006748: e59f009c ldr r0, [pc, #156] ; 300067ec <_TOD_Validate+0xbc> 3000674c: eb0048da bl 30018abc <__aeabi_uidiv>
rtems_configuration_get_microseconds_per_tick(); if ((!the_tod) ||
30006750: e5943018 ldr r3, [r4, #24] 30006754: e1500003 cmp r0, r3
30006758: 9a00001e bls 300067d8 <_TOD_Validate+0xa8>
(the_tod->ticks >= ticks_per_second) ||
3000675c: e5943014 ldr r3, [r4, #20] 30006760: e353003b cmp r3, #59 ; 0x3b
30006764: 8a00001b bhi 300067d8 <_TOD_Validate+0xa8>
(the_tod->second >= TOD_SECONDS_PER_MINUTE) ||
30006768: e5943010 ldr r3, [r4, #16] 3000676c: e353003b cmp r3, #59 ; 0x3b
30006770: 8a000018 bhi 300067d8 <_TOD_Validate+0xa8>
(the_tod->minute >= TOD_MINUTES_PER_HOUR) ||
30006774: e594300c ldr r3, [r4, #12] 30006778: e3530017 cmp r3, #23
3000677c: 8a000015 bhi 300067d8 <_TOD_Validate+0xa8>
(the_tod->hour >= TOD_HOURS_PER_DAY) ||
(the_tod->month == 0) ||
30006780: e5940004 ldr r0, [r4, #4]
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) ||
30006784: e3500000 cmp r0, #0
30006788: 08bd8010 popeq {r4, pc}
(the_tod->month == 0) ||
3000678c: e350000c cmp r0, #12
30006790: 8a000010 bhi 300067d8 <_TOD_Validate+0xa8>
(the_tod->month > TOD_MONTHS_PER_YEAR) ||
(the_tod->year < TOD_BASE_YEAR) ||
30006794: e5943000 ldr r3, [r4]
(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) ||
30006798: e59f2050 ldr r2, [pc, #80] ; 300067f0 <_TOD_Validate+0xc0> 3000679c: e1530002 cmp r3, r2
300067a0: 9a00000c bls 300067d8 <_TOD_Validate+0xa8>
(the_tod->year < TOD_BASE_YEAR) ||
(the_tod->day == 0) )
300067a4: e5944008 ldr r4, [r4, #8]
(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) ||
300067a8: e3540000 cmp r4, #0
300067ac: 0a00000b beq 300067e0 <_TOD_Validate+0xb0>
(the_tod->day == 0) )
return false;
if ( (the_tod->year % 4) == 0 )
300067b0: e3130003 tst r3, #3
days_in_month = _TOD_Days_per_month[ 1 ][ the_tod->month ];
300067b4: 059f3038 ldreq r3, [pc, #56] ; 300067f4 <_TOD_Validate+0xc4>
else
days_in_month = _TOD_Days_per_month[ 0 ][ the_tod->month ];
300067b8: 159f3034 ldrne r3, [pc, #52] ; 300067f4 <_TOD_Validate+0xc4>
(the_tod->year < TOD_BASE_YEAR) ||
(the_tod->day == 0) )
return false;
if ( (the_tod->year % 4) == 0 )
days_in_month = _TOD_Days_per_month[ 1 ][ the_tod->month ];
300067bc: 0280000d addeq r0, r0, #13 300067c0: 07930100 ldreq r0, [r3, r0, lsl #2]
else
days_in_month = _TOD_Days_per_month[ 0 ][ the_tod->month ];
300067c4: 17930100 ldrne r0, [r3, r0, lsl #2]
* false - if the the_tod is invalid
*
* NOTE: This routine only works for leap-years through 2099.
*/
bool _TOD_Validate(
300067c8: e1500004 cmp r0, r4
300067cc: 33a00000 movcc r0, #0
300067d0: 23a00001 movcs r0, #1
300067d4: e8bd8010 pop {r4, pc}
(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;
300067d8: e3a00000 mov r0, #0
300067dc: e8bd8010 pop {r4, pc}
300067e0: e1a00004 mov r0, r4 <== NOT EXECUTED
if ( the_tod->day > days_in_month )
return false;
return true;
}
300067e4: e8bd8010 pop {r4, pc} <== NOT EXECUTED
30007ddc <_Thread_queue_Enqueue_priority>:
Priority_Control priority;
States_Control block_state;
_Chain_Initialize_empty( &the_thread->Wait.Block2n );
priority = the_thread->current_priority;
30007ddc: e5913014 ldr r3, [r1, #20]
Thread_blocking_operation_States _Thread_queue_Enqueue_priority (
Thread_queue_Control *the_thread_queue,
Thread_Control *the_thread,
ISR_Level *level_p
)
{
30007de0: e92d0ff0 push {r4, r5, r6, r7, r8, r9, sl, fp}
30007de4: e281403c add r4, r1, #60 ; 0x3c
Chain_Node *previous_node;
Chain_Node *search_node;
Priority_Control priority;
States_Control block_state;
_Chain_Initialize_empty( &the_thread->Wait.Block2n );
30007de8: e281c038 add ip, r1, #56 ; 0x38
*/
RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty(
Chain_Control *the_chain
)
{
the_chain->first = _Chain_Tail(the_chain);
30007dec: e5814038 str r4, [r1, #56] ; 0x38
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 ) )
30007df0: e3130020 tst r3, #32
the_chain->permanent_null = NULL;
30007df4: e3a04000 mov r4, #0 30007df8: e581403c str r4, [r1, #60] ; 0x3c
the_chain->last = _Chain_Head(the_chain);
30007dfc: e581c040 str ip, [r1, #64] ; 0x40
RTEMS_INLINE_ROUTINE uint32_t _Thread_queue_Header_number (
Priority_Control the_priority
)
{
return (the_priority / TASK_QUEUE_DATA_PRIORITIES_PER_HEADER);
30007e00: e1a08323 lsr r8, r3, #6
_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 ];
block_state = the_thread_queue->state;
30007e04: e5905038 ldr r5, [r0, #56] ; 0x38
if ( _Thread_queue_Is_reverse_search( priority ) )
30007e08: 1a00001f bne 30007e8c <_Thread_queue_Enqueue_priority+0xb0>
goto restart_reverse_search;
restart_forward_search:
search_priority = PRIORITY_MINIMUM - 1;
_ISR_Disable( level );
search_thread = (Thread_Control *) header->first;
30007e0c: e0888088 add r8, r8, r8, lsl #1 30007e10: e1a09108 lsl r9, r8, #2
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
30007e14: e2898004 add r8, r9, #4 30007e18: e0808008 add r8, r0, r8 30007e1c: e0809009 add r9, r0, r9
static inline uint32_t arm_interrupt_disable( void )
{
uint32_t arm_switch_reg;
uint32_t level;
asm volatile (
30007e20: e10f7000 mrs r7, CPSR 30007e24: e387c080 orr ip, r7, #128 ; 0x80 30007e28: e129f00c msr CPSR_fc, ip 30007e2c: e1a0a007 mov sl, r7 30007e30: e599c000 ldr ip, [r9]
while ( !_Chain_Is_tail( header, (Chain_Node *)search_thread ) ) {
30007e34: e15c0008 cmp ip, r8
30007e38: 1a000009 bne 30007e64 <_Thread_queue_Enqueue_priority+0x88>
30007e3c: ea000054 b 30007f94 <_Thread_queue_Enqueue_priority+0x1b8>
static inline void arm_interrupt_flash( uint32_t level )
{
uint32_t arm_switch_reg;
asm volatile (
30007e40: e10f6000 mrs r6, CPSR 30007e44: e129f007 msr CPSR_fc, r7 30007e48: e129f006 msr CPSR_fc, r6
RTEMS_INLINE_ROUTINE bool _States_Are_set (
States_Control the_states,
States_Control mask
)
{
return ( (the_states & mask) != STATES_READY);
30007e4c: e59c6010 ldr r6, [ip, #16]
search_priority = search_thread->current_priority;
if ( priority <= search_priority )
break;
#endif
_ISR_Flash( level );
if ( !_States_Are_set( search_thread->current_state, block_state) ) {
30007e50: e1150006 tst r5, r6
30007e54: 0a000036 beq 30007f34 <_Thread_queue_Enqueue_priority+0x158>
_ISR_Enable( level );
goto restart_forward_search;
}
search_thread =
(Thread_Control *)search_thread->Object.Node.next;
30007e58: e59cc000 ldr ip, [ip]
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 ) ) {
30007e5c: e15c0008 cmp ip, r8
30007e60: 0a000002 beq 30007e70 <_Thread_queue_Enqueue_priority+0x94>
search_priority = search_thread->current_priority;
30007e64: e59c4014 ldr r4, [ip, #20]
if ( priority <= search_priority )
30007e68: e1530004 cmp r3, r4
30007e6c: 8afffff3 bhi 30007e40 <_Thread_queue_Enqueue_priority+0x64>
}
search_thread =
(Thread_Control *)search_thread->Object.Node.next;
}
if ( the_thread_queue->sync_state !=
30007e70: e5905030 ldr r5, [r0, #48] ; 0x30 30007e74: e3550001 cmp r5, #1
30007e78: 0a00002f beq 30007f3c <_Thread_queue_Enqueue_priority+0x160> * 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;
30007e7c: e582a000 str sl, [r2]
return the_thread_queue->sync_state; }
30007e80: e1a00005 mov r0, r5
30007e84: e8bd0ff0 pop {r4, r5, r6, r7, r8, r9, sl, fp}
30007e88: e12fff1e bx lr
_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 ];
30007e8c: e0888088 add r8, r8, r8, lsl #1 30007e90: e0808108 add r8, r0, r8, lsl #2 30007e94: e59f9100 ldr r9, [pc, #256] ; 30007f9c <_Thread_queue_Enqueue_priority+0x1c0>
restart_reverse_search:
search_priority = PRIORITY_MAXIMUM + 1;
_ISR_Disable( level );
search_thread = (Thread_Control *) header->last;
30007e98: e1a0b008 mov fp, r8
the_thread->Wait.queue = the_thread_queue;
_ISR_Enable( level );
return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
restart_reverse_search:
search_priority = PRIORITY_MAXIMUM + 1;
30007e9c: e5d94000 ldrb r4, [r9] 30007ea0: e2844001 add r4, r4, #1
static inline uint32_t arm_interrupt_disable( void )
{
uint32_t arm_switch_reg;
uint32_t level;
asm volatile (
30007ea4: e10f7000 mrs r7, CPSR 30007ea8: e387c080 orr ip, r7, #128 ; 0x80 30007eac: e129f00c msr CPSR_fc, ip 30007eb0: e1a0a007 mov sl, r7
_ISR_Disable( level );
search_thread = (Thread_Control *) header->last;
30007eb4: e59bc008 ldr ip, [fp, #8]
while ( !_Chain_Is_head( header, (Chain_Node *)search_thread ) ) {
30007eb8: e15c0008 cmp ip, r8
30007ebc: 1a000009 bne 30007ee8 <_Thread_queue_Enqueue_priority+0x10c>
30007ec0: ea00000b b 30007ef4 <_Thread_queue_Enqueue_priority+0x118>
static inline void arm_interrupt_flash( uint32_t level )
{
uint32_t arm_switch_reg;
asm volatile (
30007ec4: e10f6000 mrs r6, CPSR 30007ec8: e129f007 msr CPSR_fc, r7 30007ecc: e129f006 msr CPSR_fc, r6 30007ed0: e59c6010 ldr r6, [ip, #16]
search_priority = search_thread->current_priority;
if ( priority >= search_priority )
break;
#endif
_ISR_Flash( level );
if ( !_States_Are_set( search_thread->current_state, block_state) ) {
30007ed4: e1150006 tst r5, r6
30007ed8: 0a000013 beq 30007f2c <_Thread_queue_Enqueue_priority+0x150>
_ISR_Enable( level );
goto restart_reverse_search;
}
search_thread = (Thread_Control *)
search_thread->Object.Node.previous;
30007edc: e59cc004 ldr ip, [ip, #4]
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 ) ) {
30007ee0: e15c0008 cmp ip, r8
30007ee4: 0a000002 beq 30007ef4 <_Thread_queue_Enqueue_priority+0x118>
search_priority = search_thread->current_priority;
30007ee8: e59c4014 ldr r4, [ip, #20]
if ( priority >= search_priority )
30007eec: e1530004 cmp r3, r4
30007ef0: 3afffff3 bcc 30007ec4 <_Thread_queue_Enqueue_priority+0xe8>
}
search_thread = (Thread_Control *)
search_thread->Object.Node.previous;
}
if ( the_thread_queue->sync_state !=
30007ef4: e5905030 ldr r5, [r0, #48] ; 0x30 30007ef8: e3550001 cmp r5, #1
30007efc: 1affffde bne 30007e7c <_Thread_queue_Enqueue_priority+0xa0>
THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED )
goto synchronize;
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED;
if ( priority == search_priority )
30007f00: e1530004 cmp r3, r4
if ( the_thread_queue->sync_state !=
THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED )
goto synchronize;
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED;
30007f04: e3a03000 mov r3, #0 30007f08: e5803030 str r3, [r0, #48] ; 0x30
if ( priority == search_priority )
30007f0c: 0a000016 beq 30007f6c <_Thread_queue_Enqueue_priority+0x190>
goto equal_priority;
search_node = (Chain_Node *) search_thread;
next_node = search_node->next;
30007f10: e59c3000 ldr r3, [ip]
the_node = (Chain_Node *) the_thread;
the_node->next = next_node;
the_node->previous = search_node;
30007f14: e8811008 stm r1, {r3, ip}
search_node->next = the_node; next_node->previous = the_node;
30007f18: e5831004 str r1, [r3, #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;
30007f1c: e58c1000 str r1, [ip]
next_node->previous = the_node; the_thread->Wait.queue = the_thread_queue;
30007f20: e5810044 str r0, [r1, #68] ; 0x44
static inline void arm_interrupt_enable( uint32_t level )
{
ARM_SWITCH_REGISTERS;
asm volatile (
30007f24: e129f007 msr CPSR_fc, r7
_ISR_Enable( level ); return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
30007f28: eaffffd4 b 30007e80 <_Thread_queue_Enqueue_priority+0xa4>
30007f2c: e129f007 msr CPSR_fc, r7 <== NOT EXECUTED 30007f30: eaffffd9 b 30007e9c <_Thread_queue_Enqueue_priority+0xc0> <== NOT EXECUTED
30007f34: e129f007 msr CPSR_fc, r7 30007f38: eaffffb8 b 30007e20 <_Thread_queue_Enqueue_priority+0x44>
THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED )
goto synchronize;
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED;
if ( priority == search_priority )
30007f3c: e1530004 cmp r3, r4
if ( the_thread_queue->sync_state !=
THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED )
goto synchronize;
the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED;
30007f40: e3a03000 mov r3, #0 30007f44: e5803030 str r3, [r0, #48] ; 0x30
if ( priority == search_priority )
30007f48: 0a000007 beq 30007f6c <_Thread_queue_Enqueue_priority+0x190>
goto equal_priority;
search_node = (Chain_Node *) search_thread;
previous_node = search_node->previous;
30007f4c: e59c3004 ldr r3, [ip, #4]
the_node = (Chain_Node *) the_thread;
the_node->next = search_node;
30007f50: e581c000 str ip, [r1]
the_node->previous = previous_node;
30007f54: e5813004 str r3, [r1, #4]
previous_node->next = the_node;
30007f58: e5831000 str r1, [r3]
search_node->previous = the_node;
30007f5c: e58c1004 str r1, [ip, #4]
the_thread->Wait.queue = the_thread_queue;
30007f60: e5810044 str r0, [r1, #68] ; 0x44 30007f64: e129f007 msr CPSR_fc, r7
_ISR_Enable( level ); return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
30007f68: eaffffc4 b 30007e80 <_Thread_queue_Enqueue_priority+0xa4> 30007f6c: e28cc03c add ip, ip, #60 ; 0x3c
_ISR_Enable( level );
return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
equal_priority: /* add at end of priority group */
search_node = _Chain_Tail( &search_thread->Wait.Block2n );
previous_node = search_node->previous;
30007f70: e59c3004 ldr r3, [ip, #4]
the_node = (Chain_Node *) the_thread;
the_node->next = search_node;
30007f74: e581c000 str ip, [r1]
the_node->previous = previous_node;
30007f78: e5813004 str r3, [r1, #4]
previous_node->next = the_node;
30007f7c: e5831000 str r1, [r3]
search_node->previous = the_node;
30007f80: e58c1004 str r1, [ip, #4]
the_thread->Wait.queue = the_thread_queue;
30007f84: e5810044 str r0, [r1, #68] ; 0x44 30007f88: e129f00a msr CPSR_fc, sl
_ISR_Enable( level ); return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED;
30007f8c: e3a05001 mov r5, #1 30007f90: eaffffba b 30007e80 <_Thread_queue_Enqueue_priority+0xa4>
if ( _Thread_queue_Is_reverse_search( priority ) )
goto restart_reverse_search;
restart_forward_search:
search_priority = PRIORITY_MINIMUM - 1;
30007f94: e3e04000 mvn r4, #0 30007f98: eaffffb4 b 30007e70 <_Thread_queue_Enqueue_priority+0x94>
3000bd04 <_Thread_queue_Extract_priority_helper>:
void _Thread_queue_Extract_priority_helper(
Thread_queue_Control *the_thread_queue __attribute__((unused)),
Thread_Control *the_thread,
bool requeuing
)
{
3000bd04: e92d4070 push {r4, r5, r6, lr}
3000bd08: e20220ff and r2, r2, #255 ; 0xff
3000bd0c: e24dd004 sub sp, sp, #4
static inline uint32_t arm_interrupt_disable( void )
{
uint32_t arm_switch_reg;
uint32_t level;
asm volatile (
3000bd10: e10fc000 mrs ip, CPSR 3000bd14: e38c3080 orr r3, ip, #128 ; 0x80 3000bd18: e129f003 msr CPSR_fc, r3
*/
RTEMS_INLINE_ROUTINE bool _States_Is_waiting_on_thread_queue (
States_Control the_states
)
{
return (the_states & STATES_WAITING_ON_THREAD_QUEUE);
3000bd1c: e59f30bc ldr r3, [pc, #188] ; 3000bde0 <_Thread_queue_Extract_priority_helper+0xdc> 3000bd20: e5910010 ldr r0, [r1, #16] 3000bd24: e0003003 and r3, r0, r3
Chain_Node *new_second_node;
Chain_Node *last_node;
the_node = (Chain_Node *) the_thread;
_ISR_Disable( level );
if ( !_States_Is_waiting_on_thread_queue( the_thread->current_state ) ) {
3000bd28: e3530000 cmp r3, #0
3000bd2c: 0a000021 beq 3000bdb8 <_Thread_queue_Extract_priority_helper+0xb4>
*/
RTEMS_INLINE_ROUTINE bool _Chain_Is_empty(
Chain_Control *the_chain
)
{
return (the_chain->first == _Chain_Tail(the_chain));
3000bd30: e5913038 ldr r3, [r1, #56] ; 0x38
/*
* The thread was actually waiting on a thread queue so let's remove it.
*/
next_node = the_node->next;
3000bd34: e8910030 ldm r1, {r4, r5}
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail(
Chain_Control *the_chain
)
{
return (Chain_Node *) &the_chain->permanent_null;
3000bd38: e281003c add r0, r1, #60 ; 0x3c
previous_node = the_node->previous;
if ( !_Chain_Is_empty( &the_thread->Wait.Block2n ) ) {
3000bd3c: e1530000 cmp r3, r0
new_first_thread->Wait.Block2n.last = last_node;
last_node->next = _Chain_Tail( &new_first_thread->Wait.Block2n );
}
} else {
previous_node->next = next_node;
3000bd40: 05854000 streq r4, [r5]
next_node->previous = previous_node;
3000bd44: 05845004 streq r5, [r4, #4]
*/
next_node = the_node->next;
previous_node = the_node->previous;
if ( !_Chain_Is_empty( &the_thread->Wait.Block2n ) ) {
3000bd48: 0a00000c beq 3000bd80 <_Thread_queue_Extract_priority_helper+0x7c>
new_first_node = the_thread->Wait.Block2n.first;
new_first_thread = (Thread_Control *) new_first_node;
last_node = the_thread->Wait.Block2n.last;
3000bd4c: e5910040 ldr r0, [r1, #64] ; 0x40
new_second_node = new_first_node->next;
3000bd50: e5936000 ldr r6, [r3]
previous_node->next = new_first_node;
next_node->previous = new_first_node;
new_first_node->next = next_node;
new_first_node->previous = previous_node;
if ( !_Chain_Has_only_one_node( &the_thread->Wait.Block2n ) ) {
3000bd54: e1500003 cmp r0, r3
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;
3000bd58: e5853000 str r3, [r5]
next_node->previous = new_first_node;
3000bd5c: e5843004 str r3, [r4, #4]
new_first_node->next = next_node;
3000bd60: e8830030 stm r3, {r4, r5}
new_first_node->previous = previous_node;
if ( !_Chain_Has_only_one_node( &the_thread->Wait.Block2n ) ) {
3000bd64: 0a000005 beq 3000bd80 <_Thread_queue_Extract_priority_helper+0x7c>
/* > two threads on 2-n */
new_second_node->previous =
_Chain_Head( &new_first_thread->Wait.Block2n );
3000bd68: e2835038 add r5, r3, #56 ; 0x38 3000bd6c: e283403c add r4, r3, #60 ; 0x3c
new_first_node->next = next_node;
new_first_node->previous = previous_node;
if ( !_Chain_Has_only_one_node( &the_thread->Wait.Block2n ) ) {
/* > two threads on 2-n */
new_second_node->previous =
3000bd70: e5865004 str r5, [r6, #4]
_Chain_Head( &new_first_thread->Wait.Block2n );
new_first_thread->Wait.Block2n.first = new_second_node;
3000bd74: e5836038 str r6, [r3, #56] ; 0x38
new_first_thread->Wait.Block2n.last = last_node;
3000bd78: e5830040 str r0, [r3, #64] ; 0x40
last_node->next = _Chain_Tail( &new_first_thread->Wait.Block2n );
3000bd7c: e5804000 str r4, [r0]
/*
* If we are not supposed to touch timers or the thread's state, return.
*/
if ( requeuing ) {
3000bd80: e3520000 cmp r2, #0
3000bd84: 1a000008 bne 3000bdac <_Thread_queue_Extract_priority_helper+0xa8>
_ISR_Enable( level );
return;
}
if ( !_Watchdog_Is_active( &the_thread->Timer ) ) {
3000bd88: e5913050 ldr r3, [r1, #80] ; 0x50 3000bd8c: e3530002 cmp r3, #2
3000bd90: 0a00000a beq 3000bdc0 <_Thread_queue_Extract_priority_helper+0xbc>
static inline void arm_interrupt_enable( uint32_t level )
{
ARM_SWITCH_REGISTERS;
asm volatile (
3000bd94: e129f00c msr CPSR_fc, ip 3000bd98: e1a00001 mov r0, r1 3000bd9c: e59f1040 ldr r1, [pc, #64] ; 3000bde4 <_Thread_queue_Extract_priority_helper+0xe0>
#if defined(RTEMS_MULTIPROCESSING)
if ( !_Objects_Is_local_id( the_thread->Object.id ) )
_Thread_MP_Free_proxy( the_thread );
#endif
}
3000bda0: e28dd004 add sp, sp, #4
3000bda4: e8bd4070 pop {r4, r5, r6, lr}
3000bda8: eaffedb4 b 30007480 <_Thread_Clear_state>
3000bdac: e129f00c msr CPSR_fc, ip
3000bdb0: e28dd004 add sp, sp, #4
3000bdb4: e8bd8070 pop {r4, r5, r6, pc}
3000bdb8: e129f00c msr CPSR_fc, ip
3000bdbc: eafffffb b 3000bdb0 <_Thread_queue_Extract_priority_helper+0xac>
3000bdc0: e3a03003 mov r3, #3 <== NOT EXECUTED 3000bdc4: e5813050 str r3, [r1, #80] ; 0x50 <== NOT EXECUTED 3000bdc8: e129f00c msr CPSR_fc, ip <== NOT EXECUTED
if ( !_Watchdog_Is_active( &the_thread->Timer ) ) {
_ISR_Enable( level );
} else {
_Watchdog_Deactivate( &the_thread->Timer );
_ISR_Enable( level );
(void) _Watchdog_Remove( &the_thread->Timer );
3000bdcc: e2810048 add r0, r1, #72 ; 0x48 <== NOT EXECUTED 3000bdd0: e58d1000 str r1, [sp] <== NOT EXECUTED 3000bdd4: ebfff343 bl 30008ae8 <_Watchdog_Remove> <== NOT EXECUTED 3000bdd8: e59d1000 ldr r1, [sp] <== NOT EXECUTED 3000bddc: eaffffed b 3000bd98 <_Thread_queue_Extract_priority_helper+0x94><== NOT EXECUTED
30016118 <_Timer_server_Body>:
* @a arg points to the corresponding timer server control block.
*/
static rtems_task _Timer_server_Body(
rtems_task_argument arg
)
{
30016118: e92d4ff0 push {r4, r5, r6, r7, r8, r9, sl, fp, lr}
3001611c: e24dd024 sub sp, sp, #36 ; 0x24
30016120: e28d700c add r7, sp, #12
30016124: e28d2018 add r2, sp, #24
30016128: e282a004 add sl, r2, #4
3001612c: e2872004 add r2, r7, #4
30016130: e58d2000 str r2, [sp]
Chain_Control *the_chain
)
{
the_chain->first = _Chain_Tail(the_chain);
the_chain->permanent_null = NULL;
the_chain->last = _Chain_Head(the_chain);
30016134: e28d2018 add r2, sp, #24 30016138: e58d2020 str r2, [sp, #32]
*/
RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty(
Chain_Control *the_chain
)
{
the_chain->first = _Chain_Tail(the_chain);
3001613c: e59d2000 ldr r2, [sp]
the_chain->permanent_null = NULL;
30016140: e3a03000 mov r3, #0
*/
RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty(
Chain_Control *the_chain
)
{
the_chain->first = _Chain_Tail(the_chain);
30016144: e58d200c str r2, [sp, #12] 30016148: e2802008 add r2, r0, #8 3001614c: e58d2004 str r2, [sp, #4] 30016150: e59f91bc ldr r9, [pc, #444] ; 30016314 <_Timer_server_Body+0x1fc> 30016154: e2802040 add r2, r0, #64 ; 0x40 30016158: e59fb1b8 ldr fp, [pc, #440] ; 30016318 <_Timer_server_Body+0x200> 3001615c: e1a04000 mov r4, r0 30016160: e58da018 str sl, [sp, #24]
the_chain->permanent_null = NULL;
30016164: e58d301c str r3, [sp, #28] 30016168: e58d3010 str r3, [sp, #16]
the_chain->last = _Chain_Head(the_chain);
3001616c: e58d7014 str r7, [sp, #20] 30016170: e2806030 add r6, r0, #48 ; 0x30 30016174: e2808068 add r8, r0, #104 ; 0x68 30016178: e58d2008 str r2, [sp, #8]
{
/*
* 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;
3001617c: e28d3018 add r3, sp, #24 30016180: e5843078 str r3, [r4, #120] ; 0x78
static void _Timer_server_Process_interval_watchdogs(
Timer_server_Watchdogs *watchdogs,
Chain_Control *fire_chain
)
{
Watchdog_Interval snapshot = _Watchdog_Ticks_since_boot;
30016184: e5993000 ldr r3, [r9]
/*
* We assume adequate unsigned arithmetic here.
*/
Watchdog_Interval delta = snapshot - watchdogs->last_snapshot;
30016188: e594103c ldr r1, [r4, #60] ; 0x3c
watchdogs->last_snapshot = snapshot;
_Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain );
3001618c: e1a02007 mov r2, r7 30016190: e1a00006 mov r0, r6
/*
* We assume adequate unsigned arithmetic here.
*/
Watchdog_Interval delta = snapshot - watchdogs->last_snapshot;
watchdogs->last_snapshot = snapshot;
30016194: e584303c str r3, [r4, #60] ; 0x3c
_Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain );
30016198: e0611003 rsb r1, r1, r3 3001619c: eb0011c2 bl 3001a8ac <_Watchdog_Adjust_to_chain>
static void _Timer_server_Process_tod_watchdogs(
Timer_server_Watchdogs *watchdogs,
Chain_Control *fire_chain
)
{
Watchdog_Interval snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch();
300161a0: e59b5000 ldr r5, [fp]
Watchdog_Interval last_snapshot = watchdogs->last_snapshot;
300161a4: e5942074 ldr r2, [r4, #116] ; 0x74
/*
* 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 ) {
300161a8: e1550002 cmp r5, r2
300161ac: 8a000022 bhi 3001623c <_Timer_server_Body+0x124>
* TOD has been set forward.
*/
delta = snapshot - last_snapshot;
_Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain );
} else if ( snapshot < last_snapshot ) {
300161b0: 3a000018 bcc 30016218 <_Timer_server_Body+0x100>
*/
delta = last_snapshot - snapshot;
_Watchdog_Adjust( &watchdogs->Chain, WATCHDOG_BACKWARD, delta );
}
watchdogs->last_snapshot = snapshot;
300161b4: e5845074 str r5, [r4, #116] ; 0x74
}
static void _Timer_server_Process_insertions( Timer_server_Control *ts )
{
while ( true ) {
Timer_Control *timer = (Timer_Control *) _Chain_Get( ts->insert_chain );
300161b8: e5940078 ldr r0, [r4, #120] ; 0x78 300161bc: eb0002cf bl 30016d00 <_Chain_Get>
if ( timer == NULL ) {
300161c0: e2501000 subs r1, r0, #0
300161c4: 0a00000b beq 300161f8 <_Timer_server_Body+0xe0>
static void _Timer_server_Insert_timer(
Timer_server_Control *ts,
Timer_Control *timer
)
{
if ( timer->the_class == TIMER_INTERVAL_ON_TASK ) {
300161c8: e5913038 ldr r3, [r1, #56] ; 0x38 300161cc: e3530001 cmp r3, #1
300161d0: 0a000015 beq 3001622c <_Timer_server_Body+0x114>
_Watchdog_Insert( &ts->Interval_watchdogs.Chain, &timer->Ticker );
} else if ( timer->the_class == TIMER_TIME_OF_DAY_ON_TASK ) {
300161d4: e3530003 cmp r3, #3
300161d8: 1afffff6 bne 300161b8 <_Timer_server_Body+0xa0>
_Watchdog_Insert( &ts->TOD_watchdogs.Chain, &timer->Ticker );
300161dc: e2811010 add r1, r1, #16 300161e0: e1a00008 mov r0, r8 300161e4: eb0011da bl 3001a954 <_Watchdog_Insert>
}
static void _Timer_server_Process_insertions( Timer_server_Control *ts )
{
while ( true ) {
Timer_Control *timer = (Timer_Control *) _Chain_Get( ts->insert_chain );
300161e8: e5940078 ldr r0, [r4, #120] ; 0x78 300161ec: eb0002c3 bl 30016d00 <_Chain_Get>
if ( timer == NULL ) {
300161f0: e2501000 subs r1, r0, #0
300161f4: 1afffff3 bne 300161c8 <_Timer_server_Body+0xb0>
static inline uint32_t arm_interrupt_disable( void )
{
uint32_t arm_switch_reg;
uint32_t level;
asm volatile (
300161f8: e10f2000 mrs r2, CPSR 300161fc: e3823080 orr r3, r2, #128 ; 0x80 30016200: e129f003 msr CPSR_fc, r3
* body loop.
*/
_Timer_server_Process_insertions( ts );
_ISR_Disable( level );
if ( _Chain_Is_empty( insert_chain ) ) {
30016204: e59d3018 ldr r3, [sp, #24] 30016208: e15a0003 cmp sl, r3
3001620c: 0a00000f beq 30016250 <_Timer_server_Body+0x138>
static inline void arm_interrupt_enable( uint32_t level )
{
ARM_SWITCH_REGISTERS;
asm volatile (
30016210: e129f002 msr CPSR_fc, r2 <== NOT EXECUTED 30016214: eaffffda b 30016184 <_Timer_server_Body+0x6c> <== NOT EXECUTED
/*
* 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 );
30016218: e1a00008 mov r0, r8 3001621c: e3a01001 mov r1, #1 30016220: e0652002 rsb r2, r5, r2 30016224: eb001171 bl 3001a7f0 <_Watchdog_Adjust> 30016228: eaffffe1 b 300161b4 <_Timer_server_Body+0x9c>
Timer_server_Control *ts,
Timer_Control *timer
)
{
if ( timer->the_class == TIMER_INTERVAL_ON_TASK ) {
_Watchdog_Insert( &ts->Interval_watchdogs.Chain, &timer->Ticker );
3001622c: e1a00006 mov r0, r6 30016230: e2811010 add r1, r1, #16 30016234: eb0011c6 bl 3001a954 <_Watchdog_Insert> 30016238: eaffffde b 300161b8 <_Timer_server_Body+0xa0>
/*
* 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 );
3001623c: e0621005 rsb r1, r2, r5 30016240: e1a00008 mov r0, r8 30016244: e1a02007 mov r2, r7 30016248: eb001197 bl 3001a8ac <_Watchdog_Adjust_to_chain> 3001624c: eaffffd8 b 300161b4 <_Timer_server_Body+0x9c>
*/
_Timer_server_Process_insertions( ts );
_ISR_Disable( level );
if ( _Chain_Is_empty( insert_chain ) ) {
ts->insert_chain = NULL;
30016250: e5841078 str r1, [r4, #120] ; 0x78 30016254: e129f002 msr CPSR_fc, r2
_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 ) ) {
30016258: e59d300c ldr r3, [sp, #12] 3001625c: e59d2000 ldr r2, [sp] 30016260: e1520003 cmp r2, r3
30016264: 0a000015 beq 300162c0 <_Timer_server_Body+0x1a8>
30016268: e1a05004 mov r5, r4 3001626c: e59d4000 ldr r4, [sp] 30016270: ea000009 b 3001629c <_Timer_server_Body+0x184>
{
Chain_Node *return_node;
Chain_Node *new_first;
return_node = the_chain->first;
new_first = return_node->next;
30016274: e5932000 ldr r2, [r3]
the_chain->first = new_first; new_first->previous = _Chain_Head(the_chain);
30016278: e5827004 str r7, [r2, #4]
Chain_Node *return_node;
Chain_Node *new_first;
return_node = the_chain->first;
new_first = return_node->next;
the_chain->first = new_first;
3001627c: e58d200c str r2, [sp, #12]
* service routine may remove a watchdog from the chain.
*/
_ISR_Disable( level );
watchdog = (Watchdog_Control *) _Chain_Get_unprotected( &fire_chain );
if ( watchdog != NULL ) {
watchdog->state = WATCHDOG_INACTIVE;
30016280: e3a02000 mov r2, #0 30016284: e5832008 str r2, [r3, #8] 30016288: e129f001 msr CPSR_fc, r1
/*
* 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 );
3001628c: e5930020 ldr r0, [r3, #32] 30016290: e5931024 ldr r1, [r3, #36] ; 0x24 30016294: e1a0e00f mov lr, pc 30016298: e593f01c ldr pc, [r3, #28]
static inline uint32_t arm_interrupt_disable( void )
{
uint32_t arm_switch_reg;
uint32_t level;
asm volatile (
3001629c: e10f1000 mrs r1, CPSR 300162a0: e3813080 orr r3, r1, #128 ; 0x80 300162a4: e129f003 msr CPSR_fc, r3
*/
RTEMS_INLINE_ROUTINE bool _Chain_Is_empty(
Chain_Control *the_chain
)
{
return (the_chain->first == _Chain_Tail(the_chain));
300162a8: e59d300c ldr r3, [sp, #12]
*/
RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Get_unprotected(
Chain_Control *the_chain
)
{
if ( !_Chain_Is_empty(the_chain))
300162ac: e1540003 cmp r4, r3
300162b0: 1affffef bne 30016274 <_Timer_server_Body+0x15c>
300162b4: e1a04005 mov r4, r5
static inline void arm_interrupt_enable( uint32_t level )
{
ARM_SWITCH_REGISTERS;
asm volatile (
300162b8: e129f001 msr CPSR_fc, r1 300162bc: eaffffae b 3001617c <_Timer_server_Body+0x64> 300162c0: e59f2054 ldr r2, [pc, #84] ; 3001631c <_Timer_server_Body+0x204>
}
} else {
ts->active = false;
300162c4: e3a03000 mov r3, #0 300162c8: e5c4307c strb r3, [r4, #124] ; 0x7c 300162cc: e5923000 ldr r3, [r2] 300162d0: e2833001 add r3, r3, #1 300162d4: e5823000 str r3, [r2]
/*
* Block until there is something to do.
*/
_Thread_Disable_dispatch();
_Thread_Set_state( ts->thread, STATES_DELAYING );
300162d8: e3a01008 mov r1, #8 300162dc: e5940000 ldr r0, [r4] 300162e0: eb000ed9 bl 30019e4c <_Thread_Set_state>
_Timer_server_Reset_interval_system_watchdog( ts );
300162e4: e1a00004 mov r0, r4 300162e8: ebffff5e bl 30016068 <_Timer_server_Reset_interval_system_watchdog>
_Timer_server_Reset_tod_system_watchdog( ts );
300162ec: e1a00004 mov r0, r4 300162f0: ebffff72 bl 300160c0 <_Timer_server_Reset_tod_system_watchdog>
_Thread_Enable_dispatch();
300162f4: eb000c38 bl 300193dc <_Thread_Enable_dispatch>
ts->active = true;
300162f8: e3a03001 mov r3, #1 300162fc: e5c4307c strb r3, [r4, #124] ; 0x7c
static void _Timer_server_Stop_interval_system_watchdog(
Timer_server_Control *ts
)
{
_Watchdog_Remove( &ts->Interval_watchdogs.System_watchdog );
30016300: e59d0004 ldr r0, [sp, #4] 30016304: eb0011ff bl 3001ab08 <_Watchdog_Remove>
static void _Timer_server_Stop_tod_system_watchdog(
Timer_server_Control *ts
)
{
_Watchdog_Remove( &ts->TOD_watchdogs.System_watchdog );
30016308: e59d0008 ldr r0, [sp, #8] 3001630c: eb0011fd bl 3001ab08 <_Watchdog_Remove> 30016310: eaffff99 b 3001617c <_Timer_server_Body+0x64>
300087a8 <_User_extensions_Fatal>:
void _User_extensions_Fatal (
Internal_errors_Source the_source,
bool is_internal,
Internal_errors_t the_error
)
{
300087a8: e92d41f0 push {r4, r5, r6, r7, r8, lr}
Chain_Node *the_node;
User_extensions_Control *the_extension;
for ( the_node = _User_extensions_List.last ;
300087ac: e59f5040 ldr r5, [pc, #64] ; 300087f4 <_User_extensions_Fatal+0x4c>
void _User_extensions_Fatal (
Internal_errors_Source the_source,
bool is_internal,
Internal_errors_t the_error
)
{
300087b0: e1a08000 mov r8, r0
Chain_Node *the_node;
User_extensions_Control *the_extension;
for ( the_node = _User_extensions_List.last ;
300087b4: e5954008 ldr r4, [r5, #8]
void _User_extensions_Fatal (
Internal_errors_Source the_source,
bool is_internal,
Internal_errors_t the_error
)
{
300087b8: e1a07002 mov r7, r2
Chain_Node *the_node;
User_extensions_Control *the_extension;
for ( the_node = _User_extensions_List.last ;
300087bc: e1540005 cmp r4, r5
void _User_extensions_Fatal (
Internal_errors_Source the_source,
bool is_internal,
Internal_errors_t the_error
)
{
300087c0: e20160ff and r6, r1, #255 ; 0xff
Chain_Node *the_node;
User_extensions_Control *the_extension;
for ( the_node = _User_extensions_List.last ;
300087c4: 08bd81f0 popeq {r4, r5, r6, r7, r8, pc}
!_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 )
300087c8: e5943030 ldr r3, [r4, #48] ; 0x30
(*the_extension->Callouts.fatal)( the_source, is_internal, the_error );
300087cc: e1a00008 mov r0, r8
!_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 )
300087d0: e3530000 cmp r3, #0
(*the_extension->Callouts.fatal)( the_source, is_internal, the_error );
300087d4: e1a01006 mov r1, r6 300087d8: e1a02007 mov r2, r7 300087dc: 11a0e00f movne lr, pc 300087e0: 112fff13 bxne r3
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 ) {
300087e4: e5944004 ldr r4, [r4, #4]
)
{
Chain_Node *the_node;
User_extensions_Control *the_extension;
for ( the_node = _User_extensions_List.last ;
300087e8: e1540005 cmp r4, r5
300087ec: 1afffff5 bne 300087c8 <_User_extensions_Fatal+0x20>
300087f0: e8bd81f0 pop {r4, r5, r6, r7, r8, pc} <== NOT EXECUTED
300087f8 <_User_extensions_Thread_create>:
#include <rtems/score/userext.h>
bool _User_extensions_Thread_create (
Thread_Control *the_thread
)
{
300087f8: e92d40f0 push {r4, r5, r6, r7, lr}
Chain_Node *the_node;
User_extensions_Control *the_extension;
bool status;
for ( the_node = _User_extensions_List.first ;
300087fc: e59f5050 ldr r5, [pc, #80] ; 30008854 <_User_extensions_Thread_create+0x5c>
#include <rtems/score/userext.h>
bool _User_extensions_Thread_create (
Thread_Control *the_thread
)
{
30008800: e1a06000 mov r6, r0
Chain_Node *the_node;
User_extensions_Control *the_extension;
bool status;
for ( the_node = _User_extensions_List.first ;
30008804: e4954004 ldr r4, [r5], #4 30008808: e1540005 cmp r4, r5
3000880c: 0a00000e beq 3000884c <_User_extensions_Thread_create+0x54>
the_node = the_node->next ) {
the_extension = (User_extensions_Control *) the_node;
if ( the_extension->Callouts.thread_create != NULL ) {
status = (*the_extension->Callouts.thread_create)(
30008810: e59f7040 ldr r7, [pc, #64] ; 30008858 <_User_extensions_Thread_create+0x60>
!_Chain_Is_tail( &_User_extensions_List, the_node ) ;
the_node = the_node->next ) {
the_extension = (User_extensions_Control *) the_node;
if ( the_extension->Callouts.thread_create != NULL ) {
30008814: e5943014 ldr r3, [r4, #20]
status = (*the_extension->Callouts.thread_create)(
30008818: e1a01006 mov r1, r6
!_Chain_Is_tail( &_User_extensions_List, the_node ) ;
the_node = the_node->next ) {
the_extension = (User_extensions_Control *) the_node;
if ( the_extension->Callouts.thread_create != NULL ) {
3000881c: e3530000 cmp r3, #0
30008820: 0a000004 beq 30008838 <_User_extensions_Thread_create+0x40>
status = (*the_extension->Callouts.thread_create)(
30008824: e5970004 ldr r0, [r7, #4] 30008828: e1a0e00f mov lr, pc 3000882c: e12fff13 bx r3
_Thread_Executing,
the_thread
);
if ( !status )
30008830: e3500000 cmp r0, #0
30008834: 08bd80f0 popeq {r4, r5, r6, r7, pc}
User_extensions_Control *the_extension;
bool status;
for ( the_node = _User_extensions_List.first ;
!_Chain_Is_tail( &_User_extensions_List, the_node ) ;
the_node = the_node->next ) {
30008838: e5944000 ldr r4, [r4]
{
Chain_Node *the_node;
User_extensions_Control *the_extension;
bool status;
for ( the_node = _User_extensions_List.first ;
3000883c: e1540005 cmp r4, r5
30008840: 1afffff3 bne 30008814 <_User_extensions_Thread_create+0x1c>
if ( !status )
return false;
}
}
return true;
30008844: e3a00001 mov r0, #1
30008848: e8bd80f0 pop {r4, r5, r6, r7, pc}
3000884c: e3a00001 mov r0, #1 <== NOT EXECUTED
}
30008850: e8bd80f0 pop {r4, r5, r6, r7, pc} <== NOT EXECUTED
3000a7cc <_Watchdog_Adjust>:
void _Watchdog_Adjust(
Chain_Control *header,
Watchdog_Adjust_directions direction,
Watchdog_Interval units
)
{
3000a7cc: e92d41f0 push {r4, r5, r6, r7, r8, lr}
3000a7d0: e1a04000 mov r4, r0
3000a7d4: e1a05002 mov r5, r2
static inline uint32_t arm_interrupt_disable( void )
{
uint32_t arm_switch_reg;
uint32_t level;
asm volatile (
3000a7d8: e10f3000 mrs r3, CPSR 3000a7dc: e3832080 orr r2, r3, #128 ; 0x80 3000a7e0: e129f002 msr CPSR_fc, r2
*/
RTEMS_INLINE_ROUTINE bool _Chain_Is_empty(
Chain_Control *the_chain
)
{
return (the_chain->first == _Chain_Tail(the_chain));
3000a7e4: e1a07000 mov r7, r0 3000a7e8: e4972004 ldr r2, [r7], #4
* hence the compiler must not assume *header to remain
* unmodified across that call.
*
* Till Straumann, 7/2003
*/
if ( !_Chain_Is_empty( header ) ) {
3000a7ec: e1520007 cmp r2, r7
3000a7f0: 0a000018 beq 3000a858 <_Watchdog_Adjust+0x8c>
switch ( direction ) {
3000a7f4: e3510000 cmp r1, #0
3000a7f8: 1a000018 bne 3000a860 <_Watchdog_Adjust+0x94>
case WATCHDOG_BACKWARD:
_Watchdog_First( header )->delta_interval += units;
break;
case WATCHDOG_FORWARD:
while ( units ) {
3000a7fc: e3550000 cmp r5, #0
3000a800: 0a000014 beq 3000a858 <_Watchdog_Adjust+0x8c>
if ( units < _Watchdog_First( header )->delta_interval ) {
3000a804: e5926010 ldr r6, [r2, #16] 3000a808: e1550006 cmp r5, r6
_Watchdog_First( header )->delta_interval -= units;
break;
} else {
units -= _Watchdog_First( header )->delta_interval;
_Watchdog_First( header )->delta_interval = 1;
3000a80c: 23a08001 movcs r8, #1
case WATCHDOG_BACKWARD:
_Watchdog_First( header )->delta_interval += units;
break;
case WATCHDOG_FORWARD:
while ( units ) {
if ( units < _Watchdog_First( header )->delta_interval ) {
3000a810: 2a000005 bcs 3000a82c <_Watchdog_Adjust+0x60>
3000a814: ea000018 b 3000a87c <_Watchdog_Adjust+0xb0> <== NOT EXECUTED
switch ( direction ) {
case WATCHDOG_BACKWARD:
_Watchdog_First( header )->delta_interval += units;
break;
case WATCHDOG_FORWARD:
while ( units ) {
3000a818: e0555006 subs r5, r5, r6
3000a81c: 0a00000d beq 3000a858 <_Watchdog_Adjust+0x8c>
if ( units < _Watchdog_First( header )->delta_interval ) {
3000a820: e5926010 ldr r6, [r2, #16] 3000a824: e1560005 cmp r6, r5
3000a828: 8a000013 bhi 3000a87c <_Watchdog_Adjust+0xb0>
_Watchdog_First( header )->delta_interval -= units;
break;
} else {
units -= _Watchdog_First( header )->delta_interval;
_Watchdog_First( header )->delta_interval = 1;
3000a82c: e5828010 str r8, [r2, #16]
static inline void arm_interrupt_enable( uint32_t level )
{
ARM_SWITCH_REGISTERS;
asm volatile (
3000a830: e129f003 msr CPSR_fc, r3
_ISR_Enable( level );
_Watchdog_Tickle( header );
3000a834: e1a00004 mov r0, r4 3000a838: eb0000aa bl 3000aae8 <_Watchdog_Tickle>
static inline uint32_t arm_interrupt_disable( void )
{
uint32_t arm_switch_reg;
uint32_t level;
asm volatile (
3000a83c: e10f3000 mrs r3, CPSR 3000a840: e3832080 orr r2, r3, #128 ; 0x80 3000a844: e129f002 msr CPSR_fc, r2 3000a848: e5941000 ldr r1, [r4]
_ISR_Disable( level );
if ( _Chain_Is_empty( header ) )
3000a84c: e1570001 cmp r7, r1
RTEMS_INLINE_ROUTINE Watchdog_Control *_Watchdog_First(
Chain_Control *header
)
{
return ( (Watchdog_Control *) header->first );
3000a850: e1a02001 mov r2, r1
3000a854: 1affffef bne 3000a818 <_Watchdog_Adjust+0x4c>
static inline void arm_interrupt_enable( uint32_t level )
{
ARM_SWITCH_REGISTERS;
asm volatile (
3000a858: e129f003 msr CPSR_fc, r3
}
}
_ISR_Enable( level );
}
3000a85c: e8bd81f0 pop {r4, r5, r6, r7, r8, pc}
* unmodified across that call.
*
* Till Straumann, 7/2003
*/
if ( !_Chain_Is_empty( header ) ) {
switch ( direction ) {
3000a860: e3510001 cmp r1, #1
3000a864: 1afffffb bne 3000a858 <_Watchdog_Adjust+0x8c>
case WATCHDOG_BACKWARD:
_Watchdog_First( header )->delta_interval += units;
3000a868: e5921010 ldr r1, [r2, #16] 3000a86c: e0815005 add r5, r1, r5 3000a870: e5825010 str r5, [r2, #16] 3000a874: e129f003 msr CPSR_fc, r3
}
}
_ISR_Enable( level );
}
3000a878: e8bd81f0 pop {r4, r5, r6, r7, r8, pc}
_Watchdog_First( header )->delta_interval += units;
break;
case WATCHDOG_FORWARD:
while ( units ) {
if ( units < _Watchdog_First( header )->delta_interval ) {
_Watchdog_First( header )->delta_interval -= units;
3000a87c: e0655006 rsb r5, r5, r6 3000a880: e5825010 str r5, [r2, #16]
break;
3000a884: eafffff3 b 3000a858 <_Watchdog_Adjust+0x8c>
30021b50 <killinfo>:
int killinfo(
pid_t pid,
int sig,
const union sigval *value
)
{
30021b50: e92d4ff0 push {r4, r5, r6, r7, r8, r9, sl, fp, lr}
30021b54: e24dd00c sub sp, sp, #12
30021b58: e1a04000 mov r4, r0
30021b5c: e1a05001 mov r5, r1
30021b60: e1a08002 mov r8, r2
POSIX_signals_Siginfo_node *psiginfo;
/*
* Only supported for the "calling process" (i.e. this node).
*/
if ( pid != getpid() )
30021b64: ebffff40 bl 3002186c <getpid> 30021b68: e1500004 cmp r0, r4
30021b6c: 1a000090 bne 30021db4 <killinfo+0x264>
rtems_set_errno_and_return_minus_one( ESRCH );
/*
* Validate the signal passed.
*/
if ( !sig )
30021b70: e3550000 cmp r5, #0
30021b74: 0a000093 beq 30021dc8 <killinfo+0x278>
static inline bool is_valid_signo(
int signo
)
{
return ((signo) >= 1 && (signo) <= 32 );
30021b78: e2454001 sub r4, r5, #1
rtems_set_errno_and_return_minus_one( EINVAL );
if ( !is_valid_signo(sig) )
30021b7c: e354001f cmp r4, #31
30021b80: 8a000090 bhi 30021dc8 <killinfo+0x278>
rtems_set_errno_and_return_minus_one( EINVAL );
/*
* If the signal is being ignored, then we are out of here.
*/
if ( _POSIX_signals_Vectors[ sig ].sa_handler == SIG_IGN )
30021b84: e59f6268 ldr r6, [pc, #616] ; 30021df4 <killinfo+0x2a4> 30021b88: e1a07085 lsl r7, r5, #1 30021b8c: e0873005 add r3, r7, r5 30021b90: e0863103 add r3, r6, r3, lsl #2 30021b94: e5933008 ldr r3, [r3, #8] 30021b98: e3530001 cmp r3, #1
return 0;
30021b9c: 03a00000 moveq r0, #0
rtems_set_errno_and_return_minus_one( EINVAL );
/*
* If the signal is being ignored, then we are out of here.
*/
if ( _POSIX_signals_Vectors[ sig ].sa_handler == SIG_IGN )
30021ba0: 0a00006a beq 30021d50 <killinfo+0x200>
/*
* 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 ) )
30021ba4: e3550008 cmp r5, #8 30021ba8: 13550004 cmpne r5, #4
30021bac: 0a000069 beq 30021d58 <killinfo+0x208>
30021bb0: e355000b cmp r5, #11
30021bb4: 0a000067 beq 30021d58 <killinfo+0x208>
static inline sigset_t signo_to_mask(
uint32_t sig
)
{
return 1u << (sig - 1);
30021bb8: e3a03001 mov r3, #1
* Build up a siginfo structure
*/
siginfo = &siginfo_struct;
siginfo->si_signo = sig;
siginfo->si_code = SI_USER;
if ( !value ) {
30021bbc: e3580000 cmp r8, #0
/* * Build up a siginfo structure */ siginfo = &siginfo_struct; siginfo->si_signo = sig; siginfo->si_code = SI_USER;
30021bc0: e58d3004 str r3, [sp, #4]
/*
* Build up a siginfo structure
*/
siginfo = &siginfo_struct;
siginfo->si_signo = sig;
30021bc4: e58d5000 str r5, [sp] 30021bc8: e1a04413 lsl r4, r3, r4
siginfo->si_code = SI_USER;
if ( !value ) {
siginfo->si_value.sival_int = 0;
} else {
siginfo->si_value = *value;
30021bcc: 15983000 ldrne r3, [r8]
*/
siginfo = &siginfo_struct;
siginfo->si_signo = sig;
siginfo->si_code = SI_USER;
if ( !value ) {
siginfo->si_value.sival_int = 0;
30021bd0: 058d8008 streq r8, [sp, #8]
} else {
siginfo->si_value = *value;
30021bd4: 158d3008 strne r3, [sp, #8] 30021bd8: e59f3218 ldr r3, [pc, #536] ; 30021df8 <killinfo+0x2a8> 30021bdc: e5932000 ldr r2, [r3] 30021be0: e2822001 add r2, r2, #1 30021be4: e5832000 str r2, [r3]
/*
* 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;
30021be8: e59f320c ldr r3, [pc, #524] ; 30021dfc <killinfo+0x2ac> 30021bec: e5930004 ldr r0, [r3, #4]
api = the_thread->API_Extensions[ THREAD_API_POSIX ];
if ( _POSIX_signals_Is_interested( api, mask ) ) {
30021bf0: e5903108 ldr r3, [r0, #264] ; 0x108 30021bf4: e59330cc ldr r3, [r3, #204] ; 0xcc 30021bf8: e1d43003 bics r3, r4, r3
30021bfc: 1a000046 bne 30021d1c <killinfo+0x1cc>
/* XXX violation of visibility -- need to define thread queue support */
the_chain = &_POSIX_signals_Wait_queue.Queues.Fifo;
for ( the_node = the_chain->first ;
30021c00: e59fc1f8 ldr ip, [pc, #504] ; 30021e00 <killinfo+0x2b0> 30021c04: e49c3004 ldr r3, [ip], #4 30021c08: e153000c cmp r3, ip
30021c0c: 0a000013 beq 30021c60 <killinfo+0x110>
#endif
/*
* Is this thread is actually blocked waiting for the signal?
*/
if (the_thread->Wait.option & mask)
30021c10: e5932030 ldr r2, [r3, #48] ; 0x30
for ( the_node = the_chain->first ;
!_Chain_Is_tail( the_chain, the_node ) ;
the_node = the_node->next ) {
the_thread = (Thread_Control *)the_node;
30021c14: e1a00003 mov r0, r3
#endif
/*
* Is this thread is actually blocked waiting for the signal?
*/
if (the_thread->Wait.option & mask)
30021c18: e1140002 tst r4, r2
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 ];
30021c1c: e5932108 ldr r2, [r3, #264] ; 0x108
#endif
/*
* Is this thread is actually blocked waiting for the signal?
*/
if (the_thread->Wait.option & mask)
30021c20: 1a00003d bne 30021d1c <killinfo+0x1cc>
/*
* Is this thread is blocked waiting for another signal but has
* not blocked this one?
*/
if (~api->signals_blocked & mask)
30021c24: e59220cc ldr r2, [r2, #204] ; 0xcc 30021c28: e1d42002 bics r2, r4, r2
30021c2c: 0a000008 beq 30021c54 <killinfo+0x104>
30021c30: ea000039 b 30021d1c <killinfo+0x1cc>
#endif
/*
* Is this thread is actually blocked waiting for the signal?
*/
if (the_thread->Wait.option & mask)
30021c34: e5932030 ldr r2, [r3, #48] ; 0x30 <== NOT EXECUTED
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 ];
30021c38: e5931108 ldr r1, [r3, #264] ; 0x108 <== NOT EXECUTED
#endif
/*
* Is this thread is actually blocked waiting for the signal?
*/
if (the_thread->Wait.option & mask)
30021c3c: e1140002 tst r4, r2 <== NOT EXECUTED
for ( the_node = the_chain->first ;
!_Chain_Is_tail( the_chain, the_node ) ;
the_node = the_node->next ) {
the_thread = (Thread_Control *)the_node;
30021c40: e1a00003 mov r0, r3 <== NOT EXECUTED
#endif
/*
* Is this thread is actually blocked waiting for the signal?
*/
if (the_thread->Wait.option & mask)
30021c44: 1a000034 bne 30021d1c <killinfo+0x1cc> <== NOT EXECUTED
/*
* Is this thread is blocked waiting for another signal but has
* not blocked this one?
*/
if (~api->signals_blocked & mask)
30021c48: e59120cc ldr r2, [r1, #204] ; 0xcc <== NOT EXECUTED 30021c4c: e1d42002 bics r2, r4, r2 <== NOT EXECUTED 30021c50: 1a000031 bne 30021d1c <killinfo+0x1cc> <== NOT EXECUTED
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 ) {
30021c54: e5933000 ldr r3, [r3]
/* XXX violation of visibility -- need to define thread queue support */
the_chain = &_POSIX_signals_Wait_queue.Queues.Fifo;
for ( the_node = the_chain->first ;
30021c58: e153000c cmp r3, ip
30021c5c: 1afffff4 bne 30021c34 <killinfo+0xe4> * NOTES: * * + rtems internal threads do not receive signals. */ interested = NULL; interested_priority = PRIORITY_MAXIMUM + 1;
30021c60: e59f319c ldr r3, [pc, #412] ; 30021e04 <killinfo+0x2b4> 30021c64: e59f819c ldr r8, [pc, #412] ; 30021e08 <killinfo+0x2b8> 30021c68: e5d3e000 ldrb lr, [r3]
* * NOTES: * * + rtems internal threads do not receive signals. */ interested = NULL;
30021c6c: e3a0a000 mov sl, #0
interested_priority = PRIORITY_MAXIMUM + 1;
30021c70: e28ee001 add lr, lr, #1
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 ] )
30021c74: e5b83004 ldr r3, [r8, #4]! 30021c78: e3530000 cmp r3, #0
30021c7c: 0a000020 beq 30021d04 <killinfo+0x1b4>
continue;
the_info = _Objects_Information_table[ the_api ][ 1 ];
30021c80: e5933004 ldr r3, [r3, #4]
*/
if ( !the_info )
continue;
#endif
maximum = the_info->maximum;
30021c84: e1d3c1b0 ldrh ip, [r3, #16]
object_table = the_info->local_table;
30021c88: e593101c ldr r1, [r3, #28]
for ( index = 1 ; index <= maximum ; index++ ) {
30021c8c: e35c0000 cmp ip, #0
30021c90: 0a00001b beq 30021d04 <killinfo+0x1b4>
30021c94: e3a02001 mov r2, #1
the_thread = (Thread_Control *) object_table[ index ];
30021c98: e5b13004 ldr r3, [r1, #4]!
if ( !the_thread )
30021c9c: e3530000 cmp r3, #0
30021ca0: 0a000014 beq 30021cf8 <killinfo+0x1a8>
/*
* If this thread is of lower priority than the interested thread,
* go on to the next thread.
*/
if ( the_thread->current_priority > interested_priority )
30021ca4: e5930014 ldr r0, [r3, #20] 30021ca8: e150000e cmp r0, lr
30021cac: 8a000011 bhi 30021cf8 <killinfo+0x1a8>
#if defined(RTEMS_DEBUG)
if ( !api )
continue;
#endif
if ( !_POSIX_signals_Is_interested( api, mask ) )
30021cb0: e5939108 ldr r9, [r3, #264] ; 0x108 30021cb4: e59990cc ldr r9, [r9, #204] ; 0xcc 30021cb8: e1d49009 bics r9, r4, r9
30021cbc: 0a00000d beq 30021cf8 <killinfo+0x1a8>
*
* 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 ) {
30021cc0: e150000e cmp r0, lr
30021cc4: 3a000034 bcc 30021d9c <killinfo+0x24c>
* and blocking interruptibutable by signal.
*
* If the interested thread is ready, don't think about changing.
*/
if ( !_States_Is_ready( interested->current_state ) ) {
30021cc8: e59a9010 ldr r9, [sl, #16] 30021ccc: e3590000 cmp r9, #0
30021cd0: 0a000008 beq 30021cf8 <killinfo+0x1a8>
/* preferred ready over blocked */
DEBUG_STEP("5");
if ( _States_Is_ready( the_thread->current_state ) ) {
30021cd4: e593b010 ldr fp, [r3, #16] 30021cd8: e35b0000 cmp fp, #0
30021cdc: 0a00002e beq 30021d9c <killinfo+0x24c>
continue;
}
DEBUG_STEP("6");
/* prefer blocked/interruptible over blocked/not interruptible */
if ( !_States_Is_interruptible_by_signal(interested->current_state) ) {
30021ce0: e3190201 tst r9, #268435456 ; 0x10000000
30021ce4: 1a000003 bne 30021cf8 <killinfo+0x1a8>
*/
RTEMS_INLINE_ROUTINE bool _States_Is_interruptible_by_signal (
States_Control the_states
)
{
return (the_states & STATES_INTERRUPTIBLE_BY_SIGNAL);
30021ce8: e20bb201 and fp, fp, #268435456 ; 0x10000000
DEBUG_STEP("7");
if ( _States_Is_interruptible_by_signal(the_thread->current_state) ) {
30021cec: e35b0000 cmp fp, #0 30021cf0: 11a0e000 movne lr, r0 30021cf4: 11a0a003 movne sl, r3
#endif
maximum = the_info->maximum;
object_table = the_info->local_table;
for ( index = 1 ; index <= maximum ; index++ ) {
30021cf8: e2822001 add r2, r2, #1 30021cfc: e15c0002 cmp ip, r2
30021d00: 2affffe4 bcs 30021c98 <killinfo+0x148>
* + 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++) {
30021d04: e59f3100 ldr r3, [pc, #256] ; 30021e0c <killinfo+0x2bc> 30021d08: e1580003 cmp r8, r3
30021d0c: 1affffd8 bne 30021c74 <killinfo+0x124>
}
}
}
}
if ( interested ) {
30021d10: e35a0000 cmp sl, #0
30021d14: 0a000005 beq 30021d30 <killinfo+0x1e0>
30021d18: e1a0000a mov r0, sl
/*
* 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 ) ) {
30021d1c: e1a01005 mov r1, r5 30021d20: e1a0200d mov r2, sp 30021d24: eb000045 bl 30021e40 <_POSIX_signals_Unblock_thread> 30021d28: e3500000 cmp r0, #0
30021d2c: 1a000005 bne 30021d48 <killinfo+0x1f8>
/*
* 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 );
30021d30: e1a00004 mov r0, r4
if ( _POSIX_signals_Vectors[ sig ].sa_flags == SA_SIGINFO ) {
30021d34: e0875005 add r5, r7, r5
/*
* 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 );
30021d38: eb000036 bl 30021e18 <_POSIX_signals_Set_process_signals>
if ( _POSIX_signals_Vectors[ sig ].sa_flags == SA_SIGINFO ) {
30021d3c: e7963105 ldr r3, [r6, r5, lsl #2] 30021d40: e3530002 cmp r3, #2
30021d44: 0a000007 beq 30021d68 <killinfo+0x218>
_Chain_Append( &_POSIX_signals_Siginfo[ sig ], &psiginfo->Node );
}
DEBUG_STEP("\n");
_Thread_Enable_dispatch();
30021d48: ebffac42 bl 3000ce58 <_Thread_Enable_dispatch>
return 0;
30021d4c: e3a00000 mov r0, #0
}
30021d50: e28dd00c add sp, sp, #12
30021d54: e8bd8ff0 pop {r4, r5, r6, r7, r8, r9, sl, fp, pc}
* 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 ) )
return pthread_kill( pthread_self(), sig );
30021d58: eb0000b5 bl 30022034 <pthread_self> 30021d5c: e1a01005 mov r1, r5 30021d60: eb00007a bl 30021f50 <pthread_kill> 30021d64: eafffff9 b 30021d50 <killinfo+0x200>
_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 );
30021d68: e59f00a0 ldr r0, [pc, #160] ; 30021e10 <killinfo+0x2c0> 30021d6c: ebffa645 bl 3000b688 <_Chain_Get>
if ( !psiginfo ) {
30021d70: e250c000 subs ip, r0, #0
30021d74: 0a000018 beq 30021ddc <killinfo+0x28c>
_Thread_Enable_dispatch();
rtems_set_errno_and_return_minus_one( EAGAIN );
}
psiginfo->Info = *siginfo;
30021d78: e28c3008 add r3, ip, #8
30021d7c: e1a0200d mov r2, sp
30021d80: e8920007 ldm r2, {r0, r1, r2}
30021d84: e8830007 stm r3, {r0, r1, r2}
_Chain_Append( &_POSIX_signals_Siginfo[ sig ], &psiginfo->Node );
30021d88: e59f0084 ldr r0, [pc, #132] ; 30021e14 <killinfo+0x2c4> 30021d8c: e1a0100c mov r1, ip 30021d90: e0800105 add r0, r0, r5, lsl #2 30021d94: ebffa628 bl 3000b63c <_Chain_Append> 30021d98: eaffffea b 30021d48 <killinfo+0x1f8>
#endif
maximum = the_info->maximum;
object_table = the_info->local_table;
for ( index = 1 ; index <= maximum ; index++ ) {
30021d9c: e2822001 add r2, r2, #1 30021da0: e15c0002 cmp ip, r2
*/
if ( !_States_Is_ready( interested->current_state ) ) {
/* preferred ready over blocked */
DEBUG_STEP("5");
if ( _States_Is_ready( the_thread->current_state ) ) {
30021da4: e1a0e000 mov lr, r0 30021da8: e1a0a003 mov sl, r3
#endif
maximum = the_info->maximum;
object_table = the_info->local_table;
for ( index = 1 ; index <= maximum ; index++ ) {
30021dac: 2affffb9 bcs 30021c98 <killinfo+0x148>
30021db0: eaffffd3 b 30021d04 <killinfo+0x1b4>
/*
* Only supported for the "calling process" (i.e. this node).
*/
if ( pid != getpid() )
rtems_set_errno_and_return_minus_one( ESRCH );
30021db4: ebffc50f bl 300131f8 <__errno> 30021db8: e3a03003 mov r3, #3 30021dbc: e5803000 str r3, [r0] 30021dc0: e3e00000 mvn r0, #0 30021dc4: eaffffe1 b 30021d50 <killinfo+0x200>
*/
if ( !sig )
rtems_set_errno_and_return_minus_one( EINVAL );
if ( !is_valid_signo(sig) )
rtems_set_errno_and_return_minus_one( EINVAL );
30021dc8: ebffc50a bl 300131f8 <__errno> 30021dcc: e3a03016 mov r3, #22 30021dd0: e5803000 str r3, [r0] 30021dd4: e3e00000 mvn r0, #0 30021dd8: eaffffdc b 30021d50 <killinfo+0x200>
if ( _POSIX_signals_Vectors[ sig ].sa_flags == SA_SIGINFO ) {
psiginfo = (POSIX_signals_Siginfo_node *)
_Chain_Get( &_POSIX_signals_Inactive_siginfo );
if ( !psiginfo ) {
_Thread_Enable_dispatch();
30021ddc: ebffac1d bl 3000ce58 <_Thread_Enable_dispatch>
rtems_set_errno_and_return_minus_one( EAGAIN );
30021de0: ebffc504 bl 300131f8 <__errno> 30021de4: e3a0300b mov r3, #11 30021de8: e5803000 str r3, [r0] 30021dec: e3e00000 mvn r0, #0 30021df0: eaffffd6 b 30021d50 <killinfo+0x200>
30009e08 <pthread_attr_setschedpolicy>:
int pthread_attr_setschedpolicy(
pthread_attr_t *attr,
int policy
)
{
if ( !attr || !attr->is_initialized )
30009e08: e3500000 cmp r0, #0
30009e0c: 0a00000e beq 30009e4c <pthread_attr_setschedpolicy+0x44>
30009e10: e5903000 ldr r3, [r0] 30009e14: e3530000 cmp r3, #0
30009e18: 0a00000b beq 30009e4c <pthread_attr_setschedpolicy+0x44>
return EINVAL;
switch ( policy ) {
30009e1c: e3510004 cmp r1, #4
30009e20: 9a000001 bls 30009e2c <pthread_attr_setschedpolicy+0x24>
case SCHED_SPORADIC:
attr->schedpolicy = policy;
return 0;
default:
return ENOTSUP;
30009e24: e3a00086 mov r0, #134 ; 0x86
} }
30009e28: e12fff1e bx lr
)
{
if ( !attr || !attr->is_initialized )
return EINVAL;
switch ( policy ) {
30009e2c: e3a03001 mov r3, #1 30009e30: e1a03113 lsl r3, r3, r1 30009e34: e3130017 tst r3, #23
case SCHED_OTHER:
case SCHED_FIFO:
case SCHED_RR:
case SCHED_SPORADIC:
attr->schedpolicy = policy;
30009e38: 15801014 strne r1, [r0, #20]
return 0;
30009e3c: 13a00000 movne r0, #0
)
{
if ( !attr || !attr->is_initialized )
return EINVAL;
switch ( policy ) {
30009e40: 112fff1e bxne lr
case SCHED_SPORADIC:
attr->schedpolicy = policy;
return 0;
default:
return ENOTSUP;
30009e44: e3a00086 mov r0, #134 ; 0x86 <== NOT EXECUTED
} }
30009e48: e12fff1e bx lr <== NOT EXECUTED
pthread_attr_t *attr,
int policy
)
{
if ( !attr || !attr->is_initialized )
return EINVAL;
30009e4c: e3a00016 mov r0, #22 30009e50: e12fff1e bx lr
30005760 <pthread_key_create>:
30005760: e59f30f8 ldr r3, [pc, #248] ; 30005860 <pthread_key_create+0x100>
int pthread_key_create(
pthread_key_t *key,
void (*destructor)( void * )
)
{
30005764: e92d45f0 push {r4, r5, r6, r7, r8, sl, lr}
30005768: e5932000 ldr r2, [r3]
3000576c: e1a08000 mov r8, r0
30005770: e2822001 add r2, r2, #1
30005774: e5832000 str r2, [r3]
30005778: e1a04001 mov r4, r1
* 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 );
3000577c: e59f00e0 ldr r0, [pc, #224] ; 30005864 <pthread_key_create+0x104> 30005780: eb0008a2 bl 30007a10 <_Objects_Allocate>
_Thread_Disable_dispatch();
the_key = _POSIX_Keys_Allocate();
if ( !the_key ) {
30005784: e2507000 subs r7, r0, #0
30005788: 0a000023 beq 3000581c <pthread_key_create+0xbc>
_Thread_Enable_dispatch();
return EAGAIN;
}
the_key->destructor = destructor;
3000578c: e59f60d4 ldr r6, [pc, #212] ; 30005868 <pthread_key_create+0x108> 30005790: e5874010 str r4, [r7, #16] 30005794: e1a05007 mov r5, r7
* APIs are optional.
*
* NOTE: Currently RTEMS Classic API tasks are always enabled.
*/
for ( the_api = 1;
30005798: e3a04001 mov r4, #1
the_api <= OBJECTS_APIS_LAST;
the_api++ ) {
if ( _Objects_Information_table[ the_api ] ) {
3000579c: e5b63004 ldr r3, [r6, #4]! 300057a0: e3530000 cmp r3, #0
300057a4: 0a00001a beq 30005814 <pthread_key_create+0xb4>
true,
INTERNAL_ERROR_IMPLEMENTATION_KEY_CREATE_INCONSISTENCY
);
#endif
bytes_to_allocate = sizeof( void * ) *
(_Objects_Information_table[ the_api ][ 1 ]->maximum + 1);
300057a8: e5933004 ldr r3, [r3, #4] 300057ac: e1d3a1b0 ldrh sl, [r3, #16] 300057b0: e28aa001 add sl, sl, #1
INTERNAL_ERROR_CORE,
true,
INTERNAL_ERROR_IMPLEMENTATION_KEY_CREATE_INCONSISTENCY
);
#endif
bytes_to_allocate = sizeof( void * ) *
300057b4: e1a0a10a lsl sl, sl, #2
(_Objects_Information_table[ the_api ][ 1 ]->maximum + 1);
table = _Workspace_Allocate( bytes_to_allocate );
300057b8: e1a0000a mov r0, sl 300057bc: eb00114e bl 30009cfc <_Workspace_Allocate>
if ( !table ) {
300057c0: e2503000 subs r3, r0, #0
300057c4: 0a000017 beq 30005828 <pthread_key_create+0xc8>
_POSIX_Keys_Free( the_key );
_Thread_Enable_dispatch();
return ENOMEM;
}
the_key->Values[ the_api ] = table;
300057c8: e5853018 str r3, [r5, #24]
memset( table, '\0', bytes_to_allocate );
300057cc: e3a01000 mov r1, #0 300057d0: e1a0200a mov r2, sl 300057d4: eb0026cc bl 3000f30c <memset>
* NOTE: Currently RTEMS Classic API tasks are always enabled.
*/
for ( the_api = 1;
the_api <= OBJECTS_APIS_LAST;
the_api++ ) {
300057d8: e2844001 add r4, r4, #1
* APIs are optional.
*
* NOTE: Currently RTEMS Classic API tasks are always enabled.
*/
for ( the_api = 1;
300057dc: e3540004 cmp r4, #4
the_api <= OBJECTS_APIS_LAST;
the_api++ ) {
300057e0: e2855004 add r5, r5, #4
* APIs are optional.
*
* NOTE: Currently RTEMS Classic API tasks are always enabled.
*/
for ( the_api = 1;
300057e4: 1affffec bne 3000579c <pthread_key_create+0x3c>
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
300057e8: e59f2074 ldr r2, [pc, #116] ; 30005864 <pthread_key_create+0x104>
uint32_t name
)
{
_Objects_Set_local_object(
information,
_Objects_Get_index( the_object->id ),
300057ec: e5973008 ldr r3, [r7, #8]
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
300057f0: e592201c ldr r2, [r2, #28]
_Objects_Get_index( the_object->id ),
the_object
);
/* ASSERT: information->is_string == false */
the_object->name.name_u32 = name;
300057f4: e3a04000 mov r4, #0
Objects_Information *information,
Objects_Control *the_object,
uint32_t name
)
{
_Objects_Set_local_object(
300057f8: e1a01803 lsl r1, r3, #16
#if defined(RTEMS_DEBUG)
if ( index > information->maximum )
return;
#endif
information->local_table[ index ] = the_object;
300057fc: e7827721 str r7, [r2, r1, lsr #14]
_Objects_Get_index( the_object->id ),
the_object
);
/* ASSERT: information->is_string == false */
the_object->name.name_u32 = name;
30005800: e587400c str r4, [r7, #12]
}
_Objects_Open_u32( &_POSIX_Keys_Information, &the_key->Object, 0 );
*key = the_key->Object.id;
30005804: e5883000 str r3, [r8]
_Thread_Enable_dispatch();
30005808: eb000bdc bl 30008780 <_Thread_Enable_dispatch>
return 0;
3000580c: e1a00004 mov r0, r4
}
30005810: e8bd85f0 pop {r4, r5, r6, r7, r8, sl, pc}
}
the_key->Values[ the_api ] = table;
memset( table, '\0', bytes_to_allocate );
} else {
the_key->Values[ the_api ] = NULL;
30005814: e5853018 str r3, [r5, #24] <== NOT EXECUTED 30005818: eaffffee b 300057d8 <pthread_key_create+0x78> <== NOT EXECUTED
_Thread_Disable_dispatch();
the_key = _POSIX_Keys_Allocate();
if ( !the_key ) {
_Thread_Enable_dispatch();
3000581c: eb000bd7 bl 30008780 <_Thread_Enable_dispatch>
return EAGAIN;
30005820: e3a0000b mov r0, #11
30005824: e8bd85f0 pop {r4, r5, r6, r7, r8, sl, pc}
#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;
30005828: e2545001 subs r5, r4, #1
3000582c: 0a000005 beq 30005848 <pthread_key_create+0xe8>
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,
30005830: e2844005 add r4, r4, #5 30005834: e0874104 add r4, r7, r4, lsl #2
the_api >= 1;
the_api-- )
_Workspace_Free( the_key->Values[ the_api ] );
30005838: e5340004 ldr r0, [r4, #-4]! 3000583c: eb001134 bl 30009d14 <_Workspace_Free>
#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;
30005840: e2555001 subs r5, r5, #1
30005844: 1afffffb bne 30005838 <pthread_key_create+0xd8>
*/
RTEMS_INLINE_ROUTINE void _POSIX_Keys_Free (
POSIX_Keys_Control *the_key
)
{
_Objects_Free( &_POSIX_Keys_Information, &the_key->Object );
30005848: e59f0014 ldr r0, [pc, #20] ; 30005864 <pthread_key_create+0x104> 3000584c: e1a01007 mov r1, r7 30005850: eb000949 bl 30007d7c <_Objects_Free>
the_api >= 1;
the_api-- )
_Workspace_Free( the_key->Values[ the_api ] );
_POSIX_Keys_Free( the_key );
_Thread_Enable_dispatch();
30005854: eb000bc9 bl 30008780 <_Thread_Enable_dispatch>
return ENOMEM;
30005858: e3a0000c mov r0, #12
3000585c: e8bd85f0 pop {r4, r5, r6, r7, r8, sl, pc}
30007b3c <pthread_mutexattr_setpshared>:
int pthread_mutexattr_setpshared(
pthread_mutexattr_t *attr,
int pshared
)
{
if ( !attr || !attr->is_initialized )
30007b3c: e3500000 cmp r0, #0
30007b40: 0a000008 beq 30007b68 <pthread_mutexattr_setpshared+0x2c>
30007b44: e5903000 ldr r3, [r0] 30007b48: e3530000 cmp r3, #0
30007b4c: 0a000005 beq 30007b68 <pthread_mutexattr_setpshared+0x2c>
return EINVAL;
switch ( pshared ) {
30007b50: e3510001 cmp r1, #1
case PTHREAD_PROCESS_SHARED:
case PTHREAD_PROCESS_PRIVATE:
attr->process_shared = pshared;
30007b54: 95801004 strls r1, [r0, #4]
return 0;
30007b58: 93a00000 movls r0, #0
)
{
if ( !attr || !attr->is_initialized )
return EINVAL;
switch ( pshared ) {
30007b5c: 912fff1e bxls lr
case PTHREAD_PROCESS_PRIVATE:
attr->process_shared = pshared;
return 0;
default:
return EINVAL;
30007b60: e3a00016 mov r0, #22 <== NOT EXECUTED
} }
30007b64: e12fff1e bx lr <== NOT EXECUTED
pthread_mutexattr_t *attr,
int pshared
)
{
if ( !attr || !attr->is_initialized )
return EINVAL;
30007b68: e3a00016 mov r0, #22 30007b6c: e12fff1e bx lr
3000752c <pthread_rwlockattr_setpshared>:
int pthread_rwlockattr_setpshared(
pthread_rwlockattr_t *attr,
int pshared
)
{
if ( !attr )
3000752c: e3500000 cmp r0, #0
30007530: 0a000008 beq 30007558 <pthread_rwlockattr_setpshared+0x2c>
return EINVAL;
if ( !attr->is_initialized )
30007534: e5903000 ldr r3, [r0] 30007538: e3530000 cmp r3, #0
3000753c: 0a000005 beq 30007558 <pthread_rwlockattr_setpshared+0x2c>
return EINVAL;
switch ( pshared ) {
30007540: e3510001 cmp r1, #1
case PTHREAD_PROCESS_SHARED:
case PTHREAD_PROCESS_PRIVATE:
attr->process_shared = pshared;
30007544: 95801004 strls r1, [r0, #4]
return 0;
30007548: 93a00000 movls r0, #0
return EINVAL;
if ( !attr->is_initialized )
return EINVAL;
switch ( pshared ) {
3000754c: 912fff1e bxls lr
case PTHREAD_PROCESS_PRIVATE:
attr->process_shared = pshared;
return 0;
default:
return EINVAL;
30007550: e3a00016 mov r0, #22 <== NOT EXECUTED
} }
30007554: e12fff1e bx lr <== NOT EXECUTED
{
if ( !attr )
return EINVAL;
if ( !attr->is_initialized )
return EINVAL;
30007558: e3a00016 mov r0, #22 3000755c: e12fff1e bx lr
30007328 <rtems_io_register_driver>:
rtems_device_major_number *registered_major
)
{
rtems_device_major_number major_limit = _IO_Number_of_drivers;
if ( rtems_interrupt_is_in_progress() )
30007328: e59fc150 ldr ip, [pc, #336] ; 30007480 <rtems_io_register_driver+0x158>
rtems_device_major_number major,
const rtems_driver_address_table *driver_table,
rtems_device_major_number *registered_major
)
{
rtems_device_major_number major_limit = _IO_Number_of_drivers;
3000732c: e59f3150 ldr r3, [pc, #336] ; 30007484 <rtems_io_register_driver+0x15c>
if ( rtems_interrupt_is_in_progress() )
30007330: e59cc000 ldr ip, [ip]
rtems_status_code rtems_io_register_driver(
rtems_device_major_number major,
const rtems_driver_address_table *driver_table,
rtems_device_major_number *registered_major
)
{
30007334: e92d4030 push {r4, r5, lr}
rtems_device_major_number major_limit = _IO_Number_of_drivers;
if ( rtems_interrupt_is_in_progress() )
30007338: e35c0000 cmp ip, #0
rtems_status_code rtems_io_register_driver(
rtems_device_major_number major,
const rtems_driver_address_table *driver_table,
rtems_device_major_number *registered_major
)
{
3000733c: e1a04000 mov r4, r0
rtems_device_major_number major_limit = _IO_Number_of_drivers;
30007340: e5930000 ldr r0, [r3]
if ( rtems_interrupt_is_in_progress() )
return RTEMS_CALLED_FROM_ISR;
30007344: 13a00012 movne r0, #18
rtems_device_major_number *registered_major
)
{
rtems_device_major_number major_limit = _IO_Number_of_drivers;
if ( rtems_interrupt_is_in_progress() )
30007348: 18bd8030 popne {r4, r5, pc}
return RTEMS_CALLED_FROM_ISR;
if ( registered_major == NULL )
3000734c: e3520000 cmp r2, #0
30007350: 0a00003f beq 30007454 <rtems_io_register_driver+0x12c>
return RTEMS_INVALID_ADDRESS;
/* Set it to an invalid value */
*registered_major = major_limit;
if ( driver_table == NULL )
30007354: e3510000 cmp r1, #0
if ( registered_major == NULL )
return RTEMS_INVALID_ADDRESS;
/* Set it to an invalid value */
*registered_major = major_limit;
30007358: e5820000 str r0, [r2]
if ( driver_table == NULL )
3000735c: 0a00003c beq 30007454 <rtems_io_register_driver+0x12c>
static inline bool rtems_io_is_empty_table(
const rtems_driver_address_table *table
)
{
return table->initialization_entry == NULL && table->open_entry == NULL;
30007360: e591c000 ldr ip, [r1] 30007364: e35c0000 cmp ip, #0
30007368: 0a000036 beq 30007448 <rtems_io_register_driver+0x120>
return RTEMS_INVALID_ADDRESS;
if ( rtems_io_is_empty_table( driver_table ) )
return RTEMS_INVALID_ADDRESS;
if ( major >= major_limit )
3000736c: e1500004 cmp r0, r4
30007370: 9a000027 bls 30007414 <rtems_io_register_driver+0xec>
rtems_fatal_error_occurred( 99 );
}
}
#endif
_Thread_Dispatch_disable_level += 1;
30007374: e59f010c ldr r0, [pc, #268] ; 30007488 <rtems_io_register_driver+0x160> 30007378: e590c000 ldr ip, [r0] 3000737c: e28cc001 add ip, ip, #1 30007380: e580c000 str ip, [r0]
return RTEMS_INVALID_NUMBER;
_Thread_Disable_dispatch();
if ( major == 0 ) {
30007384: e3540000 cmp r4, #0
30007388: 1a000023 bne 3000741c <rtems_io_register_driver+0xf4>
static rtems_status_code rtems_io_obtain_major_number(
rtems_device_major_number *major
)
{
rtems_device_major_number n = _IO_Number_of_drivers;
3000738c: e593c000 ldr ip, [r3]
rtems_device_major_number m = 0;
/* major is error checked by caller */
for ( m = 0; m < n; ++m ) {
30007390: e35c0000 cmp ip, #0
30007394: 0a000030 beq 3000745c <rtems_io_register_driver+0x134>
30007398: e59fe0ec ldr lr, [pc, #236] ; 3000748c <rtems_io_register_driver+0x164> 3000739c: e59e3000 ldr r3, [lr] 300073a0: ea000003 b 300073b4 <rtems_io_register_driver+0x8c> 300073a4: e2844001 add r4, r4, #1 300073a8: e15c0004 cmp ip, r4 300073ac: e2833018 add r3, r3, #24
300073b0: 9a000005 bls 300073cc <rtems_io_register_driver+0xa4>
static inline bool rtems_io_is_empty_table(
const rtems_driver_address_table *table
)
{
return table->initialization_entry == NULL && table->open_entry == NULL;
300073b4: e5930000 ldr r0, [r3] 300073b8: e3500000 cmp r0, #0
300073bc: 1afffff8 bne 300073a4 <rtems_io_register_driver+0x7c>
300073c0: e5930004 ldr r0, [r3, #4] 300073c4: e3500000 cmp r0, #0
300073c8: 1afffff5 bne 300073a4 <rtems_io_register_driver+0x7c>
}
/* Assigns invalid value in case of failure */
*major = m;
if ( m != n )
300073cc: e15c0004 cmp ip, r4 300073d0: 1084c084 addne ip, r4, r4, lsl #1
if ( rtems_io_is_empty_table( table ) )
break;
}
/* Assigns invalid value in case of failure */
*major = m;
300073d4: e5824000 str r4, [r2]
if ( m != n )
300073d8: 11a0c18c lslne ip, ip, #3
300073dc: 0a00001f beq 30007460 <rtems_io_register_driver+0x138>
}
*registered_major = major;
}
_IO_Driver_address_table [major] = *driver_table;
300073e0: e59e5000 ldr r5, [lr]
300073e4: e1a0e001 mov lr, r1
300073e8: e085c00c add ip, r5, ip
300073ec: e8be000f ldm lr!, {r0, r1, r2, r3}
300073f0: e8ac000f stmia ip!, {r0, r1, r2, r3}
300073f4: e89e0003 ldm lr, {r0, r1}
300073f8: e88c0003 stm ip, {r0, r1}
_Thread_Enable_dispatch();
300073fc: eb0006c4 bl 30008f14 <_Thread_Enable_dispatch>
return rtems_io_initialize( major, 0, NULL );
30007400: e3a01000 mov r1, #0 30007404: e1a00004 mov r0, r4 30007408: e1a02001 mov r2, r1
}
3000740c: e8bd4030 pop {r4, r5, lr}
_IO_Driver_address_table [major] = *driver_table;
_Thread_Enable_dispatch();
return rtems_io_initialize( major, 0, NULL );
30007410: ea002177 b 3000f9f4 <rtems_io_initialize>
if ( rtems_io_is_empty_table( driver_table ) )
return RTEMS_INVALID_ADDRESS;
if ( major >= major_limit )
return RTEMS_INVALID_NUMBER;
30007414: e3a0000a mov r0, #10
_IO_Driver_address_table [major] = *driver_table;
_Thread_Enable_dispatch();
return rtems_io_initialize( major, 0, NULL );
}
30007418: e8bd8030 pop {r4, r5, pc}
_Thread_Enable_dispatch();
return sc;
}
major = *registered_major;
} else {
rtems_driver_address_table *const table = _IO_Driver_address_table + major;
3000741c: e59fe068 ldr lr, [pc, #104] ; 3000748c <rtems_io_register_driver+0x164> 30007420: e0840084 add r0, r4, r4, lsl #1 30007424: e59e3000 ldr r3, [lr] 30007428: e1a0c180 lsl ip, r0, #3
static inline bool rtems_io_is_empty_table(
const rtems_driver_address_table *table
)
{
return table->initialization_entry == NULL && table->open_entry == NULL;
3000742c: e7930180 ldr r0, [r3, r0, lsl #3]
_Thread_Enable_dispatch();
return sc;
}
major = *registered_major;
} else {
rtems_driver_address_table *const table = _IO_Driver_address_table + major;
30007430: e083300c add r3, r3, ip
static inline bool rtems_io_is_empty_table(
const rtems_driver_address_table *table
)
{
return table->initialization_entry == NULL && table->open_entry == NULL;
30007434: e3500000 cmp r0, #0
30007438: 0a00000b beq 3000746c <rtems_io_register_driver+0x144>
major = *registered_major;
} else {
rtems_driver_address_table *const table = _IO_Driver_address_table + major;
if ( !rtems_io_is_empty_table( table ) ) {
_Thread_Enable_dispatch();
3000743c: eb0006b4 bl 30008f14 <_Thread_Enable_dispatch>
return RTEMS_RESOURCE_IN_USE;
30007440: e3a0000c mov r0, #12
30007444: e8bd8030 pop {r4, r5, pc}
static inline bool rtems_io_is_empty_table(
const rtems_driver_address_table *table
)
{
return table->initialization_entry == NULL && table->open_entry == NULL;
30007448: e591c004 ldr ip, [r1, #4] 3000744c: e35c0000 cmp ip, #0
30007450: 1affffc5 bne 3000736c <rtems_io_register_driver+0x44>
if ( driver_table == NULL )
return RTEMS_INVALID_ADDRESS;
if ( rtems_io_is_empty_table( driver_table ) )
return RTEMS_INVALID_ADDRESS;
30007454: e3a00009 mov r0, #9
30007458: e8bd8030 pop {r4, r5, pc}
if ( rtems_io_is_empty_table( table ) )
break;
}
/* Assigns invalid value in case of failure */
*major = m;
3000745c: e5824000 str r4, [r2] <== NOT EXECUTED
if ( major == 0 ) {
rtems_status_code sc = rtems_io_obtain_major_number( registered_major );
if ( sc != RTEMS_SUCCESSFUL ) {
_Thread_Enable_dispatch();
30007460: eb0006ab bl 30008f14 <_Thread_Enable_dispatch>
*major = m;
if ( m != n )
return RTEMS_SUCCESSFUL;
return RTEMS_TOO_MANY;
30007464: e3a00005 mov r0, #5
if ( major == 0 ) {
rtems_status_code sc = rtems_io_obtain_major_number( registered_major );
if ( sc != RTEMS_SUCCESSFUL ) {
_Thread_Enable_dispatch();
return sc;
30007468: e8bd8030 pop {r4, r5, pc}
static inline bool rtems_io_is_empty_table(
const rtems_driver_address_table *table
)
{
return table->initialization_entry == NULL && table->open_entry == NULL;
3000746c: e5933004 ldr r3, [r3, #4] 30007470: e3530000 cmp r3, #0
30007474: 1afffff0 bne 3000743c <rtems_io_register_driver+0x114>
if ( !rtems_io_is_empty_table( table ) ) {
_Thread_Enable_dispatch();
return RTEMS_RESOURCE_IN_USE;
}
*registered_major = major;
30007478: e5824000 str r4, [r2] 3000747c: eaffffd7 b 300073e0 <rtems_io_register_driver+0xb8>
300059e8 <rtems_object_get_api_class_name>:
)
{
const rtems_assoc_t *api_assoc;
const rtems_assoc_t *class_assoc;
if ( the_api == OBJECTS_INTERNAL_API )
300059e8: e3500001 cmp r0, #1
const char *rtems_object_get_api_class_name(
int the_api,
int the_class
)
{
300059ec: e52de004 push {lr} ; (str lr, [sp, #-4]!)
const rtems_assoc_t *api_assoc;
const rtems_assoc_t *class_assoc;
if ( the_api == OBJECTS_INTERNAL_API )
300059f0: 0a00000d beq 30005a2c <rtems_object_get_api_class_name+0x44>
api_assoc = rtems_object_api_internal_assoc;
else if ( the_api == OBJECTS_CLASSIC_API )
300059f4: e3500002 cmp r0, #2
300059f8: 0a000004 beq 30005a10 <rtems_object_get_api_class_name+0x28>
api_assoc = rtems_object_api_classic_assoc;
#ifdef RTEMS_POSIX_API
else if ( the_api == OBJECTS_POSIX_API )
300059fc: e3500003 cmp r0, #3
api_assoc = rtems_object_api_posix_assoc;
30005a00: 059f003c ldreq r0, [pc, #60] ; 30005a44 <rtems_object_get_api_class_name+0x5c>
if ( the_api == OBJECTS_INTERNAL_API )
api_assoc = rtems_object_api_internal_assoc;
else if ( the_api == OBJECTS_CLASSIC_API )
api_assoc = rtems_object_api_classic_assoc;
#ifdef RTEMS_POSIX_API
else if ( the_api == OBJECTS_POSIX_API )
30005a04: 0a000002 beq 30005a14 <rtems_object_get_api_class_name+0x2c>
api_assoc = rtems_object_api_posix_assoc;
#endif
else
return "BAD API";
30005a08: e59f0038 ldr r0, [pc, #56] ; 30005a48 <rtems_object_get_api_class_name+0x60>
30005a0c: e49df004 pop {pc} ; (ldr pc, [sp], #4)
const rtems_assoc_t *class_assoc;
if ( the_api == OBJECTS_INTERNAL_API )
api_assoc = rtems_object_api_internal_assoc;
else if ( the_api == OBJECTS_CLASSIC_API )
api_assoc = rtems_object_api_classic_assoc;
30005a10: e59f0034 ldr r0, [pc, #52] ; 30005a4c <rtems_object_get_api_class_name+0x64>
else if ( the_api == OBJECTS_POSIX_API )
api_assoc = rtems_object_api_posix_assoc;
#endif
else
return "BAD API";
class_assoc = rtems_assoc_ptr_by_local( api_assoc, the_class );
30005a14: eb001345 bl 3000a730 <rtems_assoc_ptr_by_local>
if ( class_assoc )
30005a18: e3500000 cmp r0, #0
return class_assoc->name;
30005a1c: 15900000 ldrne r0, [r0]
api_assoc = rtems_object_api_posix_assoc;
#endif
else
return "BAD API";
class_assoc = rtems_assoc_ptr_by_local( api_assoc, the_class );
if ( class_assoc )
30005a20: 149df004 popne {pc} ; (ldrne pc, [sp], #4)
return class_assoc->name;
return "BAD CLASS";
30005a24: e59f0024 ldr r0, [pc, #36] ; 30005a50 <rtems_object_get_api_class_name+0x68>
}
30005a28: e49df004 pop {pc} ; (ldr pc, [sp], #4)
{
const rtems_assoc_t *api_assoc;
const rtems_assoc_t *class_assoc;
if ( the_api == OBJECTS_INTERNAL_API )
api_assoc = rtems_object_api_internal_assoc;
30005a2c: e59f0020 ldr r0, [pc, #32] ; 30005a54 <rtems_object_get_api_class_name+0x6c>
else if ( the_api == OBJECTS_POSIX_API )
api_assoc = rtems_object_api_posix_assoc;
#endif
else
return "BAD API";
class_assoc = rtems_assoc_ptr_by_local( api_assoc, the_class );
30005a30: eb00133e bl 3000a730 <rtems_assoc_ptr_by_local>
if ( class_assoc )
30005a34: e3500000 cmp r0, #0
return class_assoc->name;
30005a38: 15900000 ldrne r0, [r0]
api_assoc = rtems_object_api_posix_assoc;
#endif
else
return "BAD API";
class_assoc = rtems_assoc_ptr_by_local( api_assoc, the_class );
if ( class_assoc )
30005a3c: 149df004 popne {pc} ; (ldrne pc, [sp], #4)
30005a40: eafffff7 b 30005a24 <rtems_object_get_api_class_name+0x3c> <== NOT EXECUTED
300087f8 <sem_timedwait>:
int sem_timedwait(
sem_t *sem,
const struct timespec *abstime
)
{
300087f8: e92d4010 push {r4, lr}
300087fc: e24dd004 sub sp, sp, #4
30008800: e1a04000 mov r4, r0
* * 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 );
30008804: e1a00001 mov r0, r1 30008808: e1a0100d mov r1, sp 3000880c: eb001635 bl 3000e0e8 <_POSIX_Absolute_timeout_to_ticks>
if ( status != POSIX_ABSOLUTE_TIMEOUT_IS_IN_FUTURE )
30008810: e3500003 cmp r0, #3
30008814: 0a000005 beq 30008830 <sem_timedwait+0x38>
do_wait = false;
lock_status = _POSIX_Semaphore_Wait_support( sem, do_wait, ticks );
30008818: e1a00004 mov r0, r4 <== NOT EXECUTED 3000881c: e3a01000 mov r1, #0 <== NOT EXECUTED 30008820: e59d2000 ldr r2, [sp] <== NOT EXECUTED 30008824: eb001948 bl 3000ed4c <_POSIX_Semaphore_Wait_support> <== NOT EXECUTED
break;
}
}
return lock_status;
}
30008828: e28dd004 add sp, sp, #4
3000882c: e8bd8010 pop {r4, pc}
*/
status = _POSIX_Absolute_timeout_to_ticks( abstime, &ticks );
if ( status != POSIX_ABSOLUTE_TIMEOUT_IS_IN_FUTURE )
do_wait = false;
lock_status = _POSIX_Semaphore_Wait_support( sem, do_wait, ticks );
30008830: e1a00004 mov r0, r4 30008834: e3a01001 mov r1, #1 30008838: e59d2000 ldr r2, [sp] 3000883c: eb001942 bl 3000ed4c <_POSIX_Semaphore_Wait_support> 30008840: eafffff8 b 30008828 <sem_timedwait+0x30>
30006028 <sigaction>:
struct sigaction *oact
)
{
ISR_Level level;
if ( oact )
30006028: e2523000 subs r3, r2, #0
*oact = _POSIX_signals_Vectors[ sig ];
3000602c: 159f20c4 ldrne r2, [pc, #196] ; 300060f8 <sigaction+0xd0>
int sigaction(
int sig,
const struct sigaction *act,
struct sigaction *oact
)
{
30006030: e92d4070 push {r4, r5, r6, lr}
30006034: e1a05001 mov r5, r1
ISR_Level level;
if ( oact )
*oact = _POSIX_signals_Vectors[ sig ];
30006038: 10801080 addne r1, r0, r0, lsl #1 3000603c: 10822101 addne r2, r2, r1, lsl #2
int sigaction(
int sig,
const struct sigaction *act,
struct sigaction *oact
)
{
30006040: e1a04000 mov r4, r0
ISR_Level level;
if ( oact )
*oact = _POSIX_signals_Vectors[ sig ];
30006044: 18920007 ldmne r2, {r0, r1, r2}
30006048: 18830007 stmne r3, {r0, r1, r2}
if ( !sig )
3000604c: e3540000 cmp r4, #0
30006050: 0a000023 beq 300060e4 <sigaction+0xbc>
static inline bool is_valid_signo(
int signo
)
{
return ((signo) >= 1 && (signo) <= 32 );
30006054: e2443001 sub r3, r4, #1
rtems_set_errno_and_return_minus_one( EINVAL );
if ( !is_valid_signo(sig) )
30006058: e353001f cmp r3, #31
3000605c: 8a000020 bhi 300060e4 <sigaction+0xbc>
*
* NOTE: Solaris documentation claims to "silently enforce" this which
* contradicts the POSIX specification.
*/
if ( sig == SIGKILL )
30006060: e3540009 cmp r4, #9
30006064: 0a00001e beq 300060e4 <sigaction+0xbc>
/*
* Evaluate the new action structure and set the global signal vector
* appropriately.
*/
if ( act ) {
30006068: e3550000 cmp r5, #0
3000606c: 0a00001a beq 300060dc <sigaction+0xb4>
static inline uint32_t arm_interrupt_disable( void )
{
uint32_t arm_switch_reg;
uint32_t level;
asm volatile (
30006070: e10f6000 mrs r6, CPSR 30006074: e3863080 orr r3, r6, #128 ; 0x80 30006078: e129f003 msr CPSR_fc, r3
* Unless the user is installing the default signal actions, then
* we can just copy the provided sigaction structure into the vectors.
*/
_ISR_Disable( level );
if ( act->sa_handler == SIG_DFL ) {
3000607c: e5953008 ldr r3, [r5, #8] 30006080: e3530000 cmp r3, #0
30006084: 0a000009 beq 300060b0 <sigaction+0x88>
_POSIX_signals_Vectors[ sig ] = _POSIX_signals_Default_vectors[ sig ];
} else {
_POSIX_signals_Clear_process_signals( sig );
30006088: e1a00004 mov r0, r4 3000608c: eb001708 bl 3000bcb4 <_POSIX_signals_Clear_process_signals>
_POSIX_signals_Vectors[ sig ] = *act;
30006090: e8950007 ldm r5, {r0, r1, r2}
30006094: e59f305c ldr r3, [pc, #92] ; 300060f8 <sigaction+0xd0>
30006098: e0844084 add r4, r4, r4, lsl #1
3000609c: e0834104 add r4, r3, r4, lsl #2
300060a0: e8840007 stm r4, {r0, r1, r2}
static inline void arm_interrupt_enable( uint32_t level )
{
ARM_SWITCH_REGISTERS;
asm volatile (
300060a4: e129f006 msr CPSR_fc, r6
* 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;
300060a8: e3a00000 mov r0, #0
300060ac: e8bd8070 pop {r4, r5, r6, pc}
* we can just copy the provided sigaction structure into the vectors.
*/
_ISR_Disable( level );
if ( act->sa_handler == SIG_DFL ) {
_POSIX_signals_Vectors[ sig ] = _POSIX_signals_Default_vectors[ sig ];
300060b0: e59f2044 ldr r2, [pc, #68] ; 300060fc <sigaction+0xd4>
300060b4: e0844084 add r4, r4, r4, lsl #1
300060b8: e59f3038 ldr r3, [pc, #56] ; 300060f8 <sigaction+0xd0>
300060bc: e1a04104 lsl r4, r4, #2
300060c0: e0833004 add r3, r3, r4
300060c4: e0824004 add r4, r2, r4
300060c8: e8940007 ldm r4, {r0, r1, r2}
300060cc: e8830007 stm r3, {r0, r1, r2}
300060d0: e129f006 msr CPSR_fc, r6
* 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;
300060d4: e3a00000 mov r0, #0
300060d8: e8bd8070 pop {r4, r5, r6, pc}
300060dc: e1a00005 mov r0, r5 <== NOT EXECUTED
}
300060e0: e8bd8070 pop {r4, r5, r6, pc} <== NOT EXECUTED
* NOTE: Solaris documentation claims to "silently enforce" this which
* contradicts the POSIX specification.
*/
if ( sig == SIGKILL )
rtems_set_errno_and_return_minus_one( EINVAL );
300060e4: eb002338 bl 3000edcc <__errno>
300060e8: e3a03016 mov r3, #22
300060ec: e5803000 str r3, [r0]
300060f0: e3e00000 mvn r0, #0
300060f4: e8bd8070 pop {r4, r5, r6, pc}
3000890c <sigwait>:
int sigwait(
const sigset_t *set,
int *sig
)
{
3000890c: e92d4010 push {r4, lr}
30008910: e1a04001 mov r4, r1
int status;
status = sigtimedwait( set, NULL, NULL );
30008914: e3a01000 mov r1, #0 30008918: e1a02001 mov r2, r1 3000891c: ebffff8a bl 3000874c <sigtimedwait>
if ( status != -1 ) {
30008920: e3700001 cmn r0, #1
30008924: 0a000005 beq 30008940 <sigwait+0x34>
if ( sig )
30008928: e3540000 cmp r4, #0
*sig = status;
3000892c: 15840000 strne r0, [r4]
return 0;
30008930: 13a00000 movne r0, #0
int status;
status = sigtimedwait( set, NULL, NULL );
if ( status != -1 ) {
if ( sig )
30008934: 18bd8010 popne {r4, pc}
*sig = status;
return 0;
30008938: e1a00004 mov r0, r4 <== NOT EXECUTED
}
return errno;
}
3000893c: e8bd8010 pop {r4, pc} <== NOT EXECUTED
if ( sig )
*sig = status;
return 0;
}
return errno;
30008940: eb002294 bl 30011398 <__errno>
30008944: e5900000 ldr r0, [r0]
30008948: e8bd8010 pop {r4, pc}