=============================================================================== 00046764 <_API_Mutex_Unlock>: #include void _API_Mutex_Unlock( API_Mutex_Control *the_mutex ) { 46764: 4e56 0000 linkw %fp,#0 rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 46768: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 4676e: 5280 addql #1,%d0 46770: 206e 0008 moveal %fp@(8),%a0 46774: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> _Thread_Disable_dispatch(); _CORE_mutex_Surrender( 4677a: 42a7 clrl %sp@- 4677c: 2f28 0008 movel %a0@(8),%sp@- 46780: 4868 0010 pea %a0@(16) 46784: 4eb9 0004 6a08 jsr 46a08 <_CORE_mutex_Surrender> &the_mutex->Mutex, the_mutex->Object.id, NULL ); _Thread_Enable_dispatch(); 4678a: 4fef 000c lea %sp@(12),%sp } 4678e: 4e5e unlk %fp _CORE_mutex_Surrender( &the_mutex->Mutex, the_mutex->Object.id, NULL ); _Thread_Enable_dispatch(); 46790: 4ef9 0004 7dbc jmp 47dbc <_Thread_Enable_dispatch> ... =============================================================================== 00046624 <_API_extensions_Run_postdriver>: * * _API_extensions_Run_postdriver */ void _API_extensions_Run_postdriver( void ) { 46624: 4e56 0000 linkw %fp,#0 46628: 2f0a movel %a2,%sp@- Chain_Node *the_node; API_extensions_Control *the_extension; for ( the_node = _API_extensions_List.first ; 4662a: 2479 0005 f118 moveal 5f118 <_API_extensions_List>,%a2 46630: b5fc 0005 f11c cmpal #389404,%a2 46636: 6710 beqs 46648 <_API_extensions_Run_postdriver+0x24><== NEVER TAKEN * Currently all APIs configure this hook so it is always non-NULL. */ #if defined(FUNCTIONALITY_NOT_CURRENTLY_USED_BY_ANY_API) if ( the_extension->postdriver_hook ) #endif (*the_extension->postdriver_hook)(); 46638: 206a 0008 moveal %a2@(8),%a0 4663c: 4e90 jsr %a0@ Chain_Node *the_node; API_extensions_Control *the_extension; for ( the_node = _API_extensions_List.first ; !_Chain_Is_tail( &_API_extensions_List, the_node ) ; the_node = the_node->next ) { 4663e: 2452 moveal %a2@,%a2 void _API_extensions_Run_postdriver( void ) { Chain_Node *the_node; API_extensions_Control *the_extension; for ( the_node = _API_extensions_List.first ; 46640: b5fc 0005 f11c cmpal #389404,%a2 46646: 66f0 bnes 46638 <_API_extensions_Run_postdriver+0x14> #if defined(FUNCTIONALITY_NOT_CURRENTLY_USED_BY_ANY_API) if ( the_extension->postdriver_hook ) #endif (*the_extension->postdriver_hook)(); } } 46648: 246e fffc moveal %fp@(-4),%a2 4664c: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00046650 <_API_extensions_Run_postswitch>: * * _API_extensions_Run_postswitch */ void _API_extensions_Run_postswitch( void ) { 46650: 4e56 0000 linkw %fp,#0 46654: 2f0a movel %a2,%sp@- Chain_Node *the_node; API_extensions_Control *the_extension; for ( the_node = _API_extensions_List.first ; 46656: 2479 0005 f118 moveal 5f118 <_API_extensions_List>,%a2 4665c: b5fc 0005 f11c cmpal #389404,%a2 46662: 6718 beqs 4667c <_API_extensions_Run_postswitch+0x2c><== NEVER TAKEN * provide this hook. */ #if defined(RTEMS_ITRON_API) if ( the_extension->postswitch_hook ) #endif (*the_extension->postswitch_hook)( _Thread_Executing ); 46664: 2f39 0005 f032 movel 5f032 <_Thread_Executing>,%sp@- 4666a: 206a 000c moveal %a2@(12),%a0 4666e: 4e90 jsr %a0@ Chain_Node *the_node; API_extensions_Control *the_extension; for ( the_node = _API_extensions_List.first ; !_Chain_Is_tail( &_API_extensions_List, the_node ) ; the_node = the_node->next ) { 46670: 2452 moveal %a2@,%a2 void _API_extensions_Run_postswitch( void ) { Chain_Node *the_node; API_extensions_Control *the_extension; for ( the_node = _API_extensions_List.first ; 46672: 588f addql #4,%sp 46674: b5fc 0005 f11c cmpal #389404,%a2 4667a: 66e8 bnes 46664 <_API_extensions_Run_postswitch+0x14> #if defined(RTEMS_ITRON_API) if ( the_extension->postswitch_hook ) #endif (*the_extension->postswitch_hook)( _Thread_Executing ); } } 4667c: 246e fffc moveal %fp@(-4),%a2 46680: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00048b1c <_CORE_RWLock_Obtain_for_reading>: * If unlocked, then OK to read. * If locked for reading and no waiters, then OK to read. * If any thread is waiting, then we wait. */ _ISR_Disable( level ); 48b1c: 203c 0000 0700 movel #1792,%d0 Objects_Id id, bool wait, Watchdog_Interval timeout, CORE_RWLock_API_mp_support_callout api_rwlock_mp_support ) { 48b22: 4e56 ffe8 linkw %fp,#-24 48b26: 48d7 0c3c moveml %d2-%d5/%a2-%a3,%sp@ 48b2a: 246e 0008 moveal %fp@(8),%a2 48b2e: 2a2e 000c movel %fp@(12),%d5 48b32: 282e 0014 movel %fp@(20),%d4 48b36: 162e 0013 moveb %fp@(19),%d3 ISR_Level level; Thread_Control *executing = _Thread_Executing; 48b3a: 2679 0006 1d86 moveal 61d86 <_Thread_Executing>,%a3 * If unlocked, then OK to read. * If locked for reading and no waiters, then OK to read. * If any thread is waiting, then we wait. */ _ISR_Disable( level ); 48b40: 40c2 movew %sr,%d2 48b42: 8082 orl %d2,%d0 48b44: 46c0 movew %d0,%sr switch ( the_rwlock->current_state ) { 48b46: 202a 0044 movel %a2@(68),%d0 48b4a: 661a bnes 48b66 <_CORE_RWLock_Obtain_for_reading+0x4a> case CORE_RWLOCK_UNLOCKED: the_rwlock->current_state = CORE_RWLOCK_LOCKED_FOR_READING; the_rwlock->number_of_readers += 1; 48b4c: 52aa 0048 addql #1,%a2@(72) */ _ISR_Disable( level ); switch ( the_rwlock->current_state ) { case CORE_RWLOCK_UNLOCKED: the_rwlock->current_state = CORE_RWLOCK_LOCKED_FOR_READING; 48b50: 7001 moveq #1,%d0 48b52: 2540 0044 movel %d0,%a2@(68) the_rwlock->number_of_readers += 1; _ISR_Enable( level ); 48b56: 46c2 movew %d2,%sr executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; 48b58: 42ab 0034 clrl %a3@(52) timeout, _CORE_RWLock_Timeout ); /* return to API level so it can dispatch and we block */ } 48b5c: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 48b62: 4e5e unlk %fp 48b64: 4e75 rts * If locked for reading and no waiters, then OK to read. * If any thread is waiting, then we wait. */ _ISR_Disable( level ); switch ( the_rwlock->current_state ) { 48b66: 7201 moveq #1,%d1 48b68: b280 cmpl %d0,%d1 48b6a: 674e beqs 48bba <_CORE_RWLock_Obtain_for_reading+0x9e> /* * If the thread is not willing to wait, then return immediately. */ if ( !wait ) { 48b6c: 4a03 tstb %d3 48b6e: 6612 bnes 48b82 <_CORE_RWLock_Obtain_for_reading+0x66> _ISR_Enable( level ); 48b70: 46c2 movew %d2,%sr executing->Wait.return_code = CORE_RWLOCK_UNAVAILABLE; 48b72: 7202 moveq #2,%d1 48b74: 2741 0034 movel %d1,%a3@(52) timeout, _CORE_RWLock_Timeout ); /* return to API level so it can dispatch and we block */ } 48b78: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 48b7e: 4e5e unlk %fp 48b80: 4e75 rts 48b82: 7001 moveq #1,%d0 * We need to wait to enter this critical section */ _Thread_queue_Enter_critical_section( &the_rwlock->Wait_queue ); executing->Wait.queue = &the_rwlock->Wait_queue; executing->Wait.id = id; 48b84: 2745 0020 movel %d5,%a3@(32) executing->Wait.option = CORE_RWLOCK_THREAD_WAITING_FOR_READ; executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; 48b88: 42ab 0034 clrl %a3@(52) /* * We need to wait to enter this critical section */ _Thread_queue_Enter_critical_section( &the_rwlock->Wait_queue ); executing->Wait.queue = &the_rwlock->Wait_queue; 48b8c: 274a 0044 movel %a2,%a3@(68) executing->Wait.id = id; executing->Wait.option = CORE_RWLOCK_THREAD_WAITING_FOR_READ; 48b90: 42ab 0030 clrl %a3@(48) 48b94: 2540 0030 movel %d0,%a2@(48) executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; _ISR_Enable( level ); 48b98: 46c2 movew %d2,%sr _Thread_queue_Enqueue_with_handler( 48b9a: 2d44 000c movel %d4,%fp@(12) 48b9e: 223c 0004 8d48 movel #298312,%d1 48ba4: 2d4a 0008 movel %a2,%fp@(8) timeout, _CORE_RWLock_Timeout ); /* return to API level so it can dispatch and we block */ } 48ba8: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 executing->Wait.id = id; executing->Wait.option = CORE_RWLOCK_THREAD_WAITING_FOR_READ; executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; _ISR_Enable( level ); _Thread_queue_Enqueue_with_handler( 48bae: 2d41 0010 movel %d1,%fp@(16) timeout, _CORE_RWLock_Timeout ); /* return to API level so it can dispatch and we block */ } 48bb2: 4e5e unlk %fp executing->Wait.id = id; executing->Wait.option = CORE_RWLOCK_THREAD_WAITING_FOR_READ; executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; _ISR_Enable( level ); _Thread_queue_Enqueue_with_handler( 48bb4: 4ef9 0004 a5c4 jmp 4a5c4 <_Thread_queue_Enqueue_with_handler> executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; return; case CORE_RWLOCK_LOCKED_FOR_READING: { Thread_Control *waiter; waiter = _Thread_queue_First( &the_rwlock->Wait_queue ); 48bba: 2f0a movel %a2,%sp@- 48bbc: 4eb9 0004 a92c jsr 4a92c <_Thread_queue_First> if ( !waiter ) { 48bc2: 588f addql #4,%sp 48bc4: 4a80 tstl %d0 48bc6: 66a4 bnes 48b6c <_CORE_RWLock_Obtain_for_reading+0x50><== NEVER TAKEN the_rwlock->number_of_readers += 1; 48bc8: 52aa 0048 addql #1,%a2@(72) _ISR_Enable( level ); 48bcc: 46c2 movew %d2,%sr executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; 48bce: 42ab 0034 clrl %a3@(52) timeout, _CORE_RWLock_Timeout ); /* return to API level so it can dispatch and we block */ } 48bd2: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 48bd8: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00048bdc <_CORE_RWLock_Obtain_for_writing>: * Otherwise, we have to block. * If locked for reading and no waiters, then OK to read. * If any thread is waiting, then we wait. */ _ISR_Disable( level ); 48bdc: 203c 0000 0700 movel #1792,%d0 Objects_Id id, bool wait, Watchdog_Interval timeout, CORE_RWLock_API_mp_support_callout api_rwlock_mp_support ) { 48be2: 4e56 fff4 linkw %fp,#-12 48be6: 206e 0008 moveal %fp@(8),%a0 48bea: 48d7 001c moveml %d2-%d4,%sp@ 48bee: 282e 000c movel %fp@(12),%d4 48bf2: 242e 0010 movel %fp@(16),%d2 48bf6: 262e 0014 movel %fp@(20),%d3 ISR_Level level; Thread_Control *executing = _Thread_Executing; 48bfa: 2279 0006 1d86 moveal 61d86 <_Thread_Executing>,%a1 * Otherwise, we have to block. * If locked for reading and no waiters, then OK to read. * If any thread is waiting, then we wait. */ _ISR_Disable( level ); 48c00: 40c1 movew %sr,%d1 48c02: 8081 orl %d1,%d0 48c04: 46c0 movew %d0,%sr switch ( the_rwlock->current_state ) { 48c06: 4aa8 0044 tstl %a0@(68) 48c0a: 6614 bnes 48c20 <_CORE_RWLock_Obtain_for_writing+0x44> case CORE_RWLOCK_UNLOCKED: the_rwlock->current_state = CORE_RWLOCK_LOCKED_FOR_WRITING; 48c0c: 7002 moveq #2,%d0 48c0e: 2140 0044 movel %d0,%a0@(68) _ISR_Enable( level ); 48c12: 46c1 movew %d1,%sr executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; 48c14: 42a9 0034 clrl %a1@(52) _CORE_RWLock_Timeout ); /* return to API level so it can dispatch and we block */ } 48c18: 4cd7 001c moveml %sp@,%d2-%d4 48c1c: 4e5e unlk %fp 48c1e: 4e75 rts /* * If the thread is not willing to wait, then return immediately. */ if ( !wait ) { 48c20: 4a02 tstb %d2 48c22: 6610 bnes 48c34 <_CORE_RWLock_Obtain_for_writing+0x58> _ISR_Enable( level ); 48c24: 46c1 movew %d1,%sr executing->Wait.return_code = CORE_RWLOCK_UNAVAILABLE; 48c26: 7002 moveq #2,%d0 _CORE_RWLock_Timeout ); /* return to API level so it can dispatch and we block */ } 48c28: 4cd7 001c moveml %sp@,%d2-%d4 * If the thread is not willing to wait, then return immediately. */ if ( !wait ) { _ISR_Enable( level ); executing->Wait.return_code = CORE_RWLOCK_UNAVAILABLE; 48c2c: 2340 0034 movel %d0,%a1@(52) _CORE_RWLock_Timeout ); /* return to API level so it can dispatch and we block */ } 48c30: 4e5e unlk %fp 48c32: 4e75 rts */ _Thread_queue_Enter_critical_section( &the_rwlock->Wait_queue ); executing->Wait.queue = &the_rwlock->Wait_queue; executing->Wait.id = id; executing->Wait.option = CORE_RWLOCK_THREAD_WAITING_FOR_WRITE; 48c34: 7001 moveq #1,%d0 * We need to wait to enter this critical section */ _Thread_queue_Enter_critical_section( &the_rwlock->Wait_queue ); executing->Wait.queue = &the_rwlock->Wait_queue; executing->Wait.id = id; 48c36: 2344 0020 movel %d4,%a1@(32) executing->Wait.option = CORE_RWLOCK_THREAD_WAITING_FOR_WRITE; executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; 48c3a: 42a9 0034 clrl %a1@(52) /* * We need to wait to enter this critical section */ _Thread_queue_Enter_critical_section( &the_rwlock->Wait_queue ); executing->Wait.queue = &the_rwlock->Wait_queue; 48c3e: 2348 0044 movel %a0,%a1@(68) executing->Wait.id = id; executing->Wait.option = CORE_RWLOCK_THREAD_WAITING_FOR_WRITE; 48c42: 2340 0030 movel %d0,%a1@(48) 48c46: 2140 0030 movel %d0,%a0@(48) executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; _ISR_Enable( level ); 48c4a: 46c1 movew %d1,%sr _Thread_queue_Enqueue_with_handler( 48c4c: 2d43 000c movel %d3,%fp@(12) 48c50: 203c 0004 8d48 movel #298312,%d0 48c56: 2d48 0008 movel %a0,%fp@(8) 48c5a: 2d40 0010 movel %d0,%fp@(16) _CORE_RWLock_Timeout ); /* return to API level so it can dispatch and we block */ } 48c5e: 4cd7 001c moveml %sp@,%d2-%d4 48c62: 4e5e unlk %fp executing->Wait.id = id; executing->Wait.option = CORE_RWLOCK_THREAD_WAITING_FOR_WRITE; executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; _ISR_Enable( level ); _Thread_queue_Enqueue_with_handler( 48c64: 4ef9 0004 a5c4 jmp 4a5c4 <_Thread_queue_Enqueue_with_handler> ... =============================================================================== 00048c6c <_CORE_RWLock_Release>: * Otherwise, we have to block. * If locked for reading and no waiters, then OK to read. * If any thread is waiting, then we wait. */ _ISR_Disable( level ); 48c6c: 203c 0000 0700 movel #1792,%d0 */ CORE_RWLock_Status _CORE_RWLock_Release( CORE_RWLock_Control *the_rwlock ) { 48c72: 4e56 fff0 linkw %fp,#-16 ISR_Level level; Thread_Control *executing = _Thread_Executing; 48c76: 2079 0006 1d86 moveal 61d86 <_Thread_Executing>,%a0 */ CORE_RWLock_Status _CORE_RWLock_Release( CORE_RWLock_Control *the_rwlock ) { 48c7c: 48d7 1c04 moveml %d2/%a2-%a4,%sp@ 48c80: 246e 0008 moveal %fp@(8),%a2 * Otherwise, we have to block. * If locked for reading and no waiters, then OK to read. * If any thread is waiting, then we wait. */ _ISR_Disable( level ); 48c84: 40c1 movew %sr,%d1 48c86: 8081 orl %d1,%d0 48c88: 46c0 movew %d0,%sr if ( the_rwlock->current_state == CORE_RWLOCK_UNLOCKED){ 48c8a: 202a 0044 movel %a2@(68),%d0 48c8e: 6700 0090 beqw 48d20 <_CORE_RWLock_Release+0xb4> _ISR_Enable( level ); executing->Wait.return_code = CORE_RWLOCK_UNAVAILABLE; return CORE_RWLOCK_SUCCESSFUL; } if ( the_rwlock->current_state == CORE_RWLOCK_LOCKED_FOR_READING ) { 48c92: 7401 moveq #1,%d2 48c94: b480 cmpl %d0,%d2 48c96: 676e beqs 48d06 <_CORE_RWLock_Release+0x9a> return CORE_RWLOCK_SUCCESSFUL; } } /* CORE_RWLOCK_LOCKED_FOR_WRITING or READING with readers */ executing->Wait.return_code = CORE_RWLOCK_SUCCESSFUL; 48c98: 42a8 0034 clrl %a0@(52) /* * Implicitly transition to "unlocked" and find another thread interested * in obtaining this rwlock. */ the_rwlock->current_state = CORE_RWLOCK_UNLOCKED; 48c9c: 42aa 0044 clrl %a2@(68) _ISR_Enable( level ); 48ca0: 46c1 movew %d1,%sr next = _Thread_queue_Dequeue( &the_rwlock->Wait_queue ); 48ca2: 2f0a movel %a2,%sp@- 48ca4: 4eb9 0004 a464 jsr 4a464 <_Thread_queue_Dequeue> if ( next ) { 48caa: 588f addql #4,%sp 48cac: 4a80 tstl %d0 48cae: 674a beqs 48cfa <_CORE_RWLock_Release+0x8e> if ( next->Wait.option == CORE_RWLOCK_THREAD_WAITING_FOR_WRITE ) { 48cb0: 7201 moveq #1,%d1 48cb2: 2040 moveal %d0,%a0 48cb4: b2a8 0030 cmpl %a0@(48),%d1 48cb8: 677c beqs 48d36 <_CORE_RWLock_Release+0xca> /* * Must be CORE_RWLOCK_THREAD_WAITING_FOR_READING */ the_rwlock->number_of_readers += 1; the_rwlock->current_state = CORE_RWLOCK_LOCKED_FOR_READING; 48cba: 7201 moveq #1,%d1 } /* * Must be CORE_RWLOCK_THREAD_WAITING_FOR_READING */ the_rwlock->number_of_readers += 1; 48cbc: 52aa 0048 addql #1,%a2@(72) 48cc0: 47f9 0004 a92c lea 4a92c <_Thread_queue_First>,%a3 next = _Thread_queue_First( &the_rwlock->Wait_queue ); if ( !next || next->Wait.option == CORE_RWLOCK_THREAD_WAITING_FOR_WRITE ) return CORE_RWLOCK_SUCCESSFUL; the_rwlock->number_of_readers += 1; _Thread_queue_Extract( &the_rwlock->Wait_queue, next ); 48cc6: 49f9 0004 a7d8 lea 4a7d8 <_Thread_queue_Extract>,%a4 /* * Must be CORE_RWLOCK_THREAD_WAITING_FOR_READING */ the_rwlock->number_of_readers += 1; the_rwlock->current_state = CORE_RWLOCK_LOCKED_FOR_READING; 48ccc: 2541 0044 movel %d1,%a2@(68) /* * Now see if more readers can be let go. */ while ( 1 ) { next = _Thread_queue_First( &the_rwlock->Wait_queue ); 48cd0: 2f0a movel %a2,%sp@- 48cd2: 4e93 jsr %a3@ if ( !next || 48cd4: 588f addql #4,%sp 48cd6: 4a80 tstl %d0 48cd8: 6720 beqs 48cfa <_CORE_RWLock_Release+0x8e> <== NEVER TAKEN next->Wait.option == CORE_RWLOCK_THREAD_WAITING_FOR_WRITE ) 48cda: 7401 moveq #1,%d2 48cdc: 2040 moveal %d0,%a0 48cde: b4a8 0030 cmpl %a0@(48),%d2 48ce2: 6716 beqs 48cfa <_CORE_RWLock_Release+0x8e> <== NEVER TAKEN return CORE_RWLOCK_SUCCESSFUL; the_rwlock->number_of_readers += 1; 48ce4: 52aa 0048 addql #1,%a2@(72) _Thread_queue_Extract( &the_rwlock->Wait_queue, next ); 48ce8: 2f00 movel %d0,%sp@- 48cea: 2f0a movel %a2,%sp@- 48cec: 4e94 jsr %a4@ } 48cee: 508f addql #8,%sp /* * Now see if more readers can be let go. */ while ( 1 ) { next = _Thread_queue_First( &the_rwlock->Wait_queue ); 48cf0: 2f0a movel %a2,%sp@- 48cf2: 4e93 jsr %a3@ if ( !next || 48cf4: 588f addql #4,%sp 48cf6: 4a80 tstl %d0 48cf8: 66e0 bnes 48cda <_CORE_RWLock_Release+0x6e> <== NEVER TAKEN } /* indentation is to match _ISR_Disable at top */ return CORE_RWLOCK_SUCCESSFUL; } 48cfa: 4280 clrl %d0 48cfc: 4cee 1c04 fff0 moveml %fp@(-16),%d2/%a2-%a4 48d02: 4e5e unlk %fp 48d04: 4e75 rts _ISR_Enable( level ); executing->Wait.return_code = CORE_RWLOCK_UNAVAILABLE; return CORE_RWLOCK_SUCCESSFUL; } if ( the_rwlock->current_state == CORE_RWLOCK_LOCKED_FOR_READING ) { the_rwlock->number_of_readers -= 1; 48d06: 202a 0048 movel %a2@(72),%d0 48d0a: 5380 subql #1,%d0 48d0c: 2540 0048 movel %d0,%a2@(72) if ( the_rwlock->number_of_readers != 0 ) { 48d10: 6786 beqs 48c98 <_CORE_RWLock_Release+0x2c> /* must be unlocked again */ _ISR_Enable( level ); 48d12: 46c1 movew %d1,%sr } /* indentation is to match _ISR_Disable at top */ return CORE_RWLOCK_SUCCESSFUL; } 48d14: 4280 clrl %d0 48d16: 4cee 1c04 fff0 moveml %fp@(-16),%d2/%a2-%a4 48d1c: 4e5e unlk %fp 48d1e: 4e75 rts * If any thread is waiting, then we wait. */ _ISR_Disable( level ); if ( the_rwlock->current_state == CORE_RWLOCK_UNLOCKED){ _ISR_Enable( level ); 48d20: 46c1 movew %d1,%sr executing->Wait.return_code = CORE_RWLOCK_UNAVAILABLE; 48d22: 103c 0002 moveb #2,%d0 } /* indentation is to match _ISR_Disable at top */ return CORE_RWLOCK_SUCCESSFUL; } 48d26: 4cee 1c04 fff0 moveml %fp@(-16),%d2/%a2-%a4 */ _ISR_Disable( level ); if ( the_rwlock->current_state == CORE_RWLOCK_UNLOCKED){ _ISR_Enable( level ); executing->Wait.return_code = CORE_RWLOCK_UNAVAILABLE; 48d2c: 2140 0034 movel %d0,%a0@(52) } /* indentation is to match _ISR_Disable at top */ return CORE_RWLOCK_SUCCESSFUL; } 48d30: 4280 clrl %d0 48d32: 4e5e unlk %fp 48d34: 4e75 rts next = _Thread_queue_Dequeue( &the_rwlock->Wait_queue ); if ( next ) { if ( next->Wait.option == CORE_RWLOCK_THREAD_WAITING_FOR_WRITE ) { the_rwlock->current_state = CORE_RWLOCK_LOCKED_FOR_WRITING; 48d36: 7002 moveq #2,%d0 48d38: 2540 0044 movel %d0,%a2@(68) } /* indentation is to match _ISR_Disable at top */ return CORE_RWLOCK_SUCCESSFUL; } 48d3c: 4280 clrl %d0 48d3e: 4cee 1c04 fff0 moveml %fp@(-16),%d2/%a2-%a4 48d44: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00048d48 <_CORE_RWLock_Timeout>: void _CORE_RWLock_Timeout( Objects_Id id, void *ignored ) { 48d48: 4e56 fffc linkw %fp,#-4 Thread_Control *the_thread; Objects_Locations location; the_thread = _Thread_Get( id, &location ); 48d4c: 486e fffc pea %fp@(-4) 48d50: 2f2e 0008 movel %fp@(8),%sp@- 48d54: 4eb9 0004 a090 jsr 4a090 <_Thread_Get> switch ( location ) { 48d5a: 508f addql #8,%sp 48d5c: 4aae fffc tstl %fp@(-4) 48d60: 6618 bnes 48d7a <_CORE_RWLock_Timeout+0x32> <== NEVER TAKEN #if defined(RTEMS_MULTIPROCESSING) case OBJECTS_REMOTE: /* impossible */ #endif break; case OBJECTS_LOCAL: _Thread_queue_Process_timeout( the_thread ); 48d62: 2f00 movel %d0,%sp@- 48d64: 4eb9 0004 aa34 jsr 4aa34 <_Thread_queue_Process_timeout> */ RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void ) { RTEMS_COMPILER_MEMORY_BARRIER(); _Thread_Dispatch_disable_level -= 1; 48d6a: 588f addql #4,%sp 48d6c: 2039 0006 1ccc movel 61ccc <_Thread_Dispatch_disable_level>,%d0 48d72: 5380 subql #1,%d0 48d74: 23c0 0006 1ccc movel %d0,61ccc <_Thread_Dispatch_disable_level> _Thread_Unnest_dispatch(); break; } } 48d7a: 4e5e unlk %fp ... =============================================================================== 0004df24 <_CORE_barrier_Wait>: Thread_Control *executing; ISR_Level level; executing = _Thread_Executing; executing->Wait.return_code = CORE_BARRIER_STATUS_SUCCESSFUL; _ISR_Disable( level ); 4df24: 203c 0000 0700 movel #1792,%d0 Objects_Id id, bool wait, Watchdog_Interval timeout, CORE_barrier_API_mp_support_callout api_barrier_mp_support ) { 4df2a: 4e56 fff4 linkw %fp,#-12 Thread_Control *executing; ISR_Level level; executing = _Thread_Executing; 4df2e: 2279 0005 f032 moveal 5f032 <_Thread_Executing>,%a1 Objects_Id id, bool wait, Watchdog_Interval timeout, CORE_barrier_API_mp_support_callout api_barrier_mp_support ) { 4df34: 48d7 001c moveml %d2-%d4,%sp@ 4df38: 242e 000c movel %fp@(12),%d2 4df3c: 262e 0014 movel %fp@(20),%d3 Thread_Control *executing; ISR_Level level; executing = _Thread_Executing; executing->Wait.return_code = CORE_BARRIER_STATUS_SUCCESSFUL; 4df40: 42a9 0034 clrl %a1@(52) Objects_Id id, bool wait, Watchdog_Interval timeout, CORE_barrier_API_mp_support_callout api_barrier_mp_support ) { 4df44: 206e 0008 moveal %fp@(8),%a0 4df48: 282e 0018 movel %fp@(24),%d4 Thread_Control *executing; ISR_Level level; executing = _Thread_Executing; executing->Wait.return_code = CORE_BARRIER_STATUS_SUCCESSFUL; _ISR_Disable( level ); 4df4c: 40c1 movew %sr,%d1 4df4e: 8081 orl %d1,%d0 4df50: 46c0 movew %d0,%sr the_barrier->number_of_waiting_threads++; 4df52: 2028 0048 movel %a0@(72),%d0 4df56: 5280 addql #1,%d0 4df58: 2140 0048 movel %d0,%a0@(72) if ( _CORE_barrier_Is_automatic( &the_barrier->Attributes ) ) { 4df5c: 4aa8 0040 tstl %a0@(64) 4df60: 6606 bnes 4df68 <_CORE_barrier_Wait+0x44> if ( the_barrier->number_of_waiting_threads == the_barrier->Attributes.maximum_count) { 4df62: b0a8 0044 cmpl %a0@(68),%d0 4df66: 672e beqs 4df96 <_CORE_barrier_Wait+0x72> 4df68: 7001 moveq #1,%d0 } } _Thread_queue_Enter_critical_section( &the_barrier->Wait_queue ); executing->Wait.queue = &the_barrier->Wait_queue; executing->Wait.id = id; 4df6a: 2342 0020 movel %d2,%a1@(32) return; } } _Thread_queue_Enter_critical_section( &the_barrier->Wait_queue ); executing->Wait.queue = &the_barrier->Wait_queue; 4df6e: 2348 0044 movel %a0,%a1@(68) 4df72: 2140 0030 movel %d0,%a0@(48) executing->Wait.id = id; _ISR_Enable( level ); 4df76: 46c1 movew %d1,%sr _Thread_queue_Enqueue( &the_barrier->Wait_queue, timeout ); 4df78: 2d43 000c movel %d3,%fp@(12) 4df7c: 203c 0004 8678 movel #296568,%d0 4df82: 2d48 0008 movel %a0,%fp@(8) 4df86: 2d40 0010 movel %d0,%fp@(16) } 4df8a: 4cd7 001c moveml %sp@,%d2-%d4 4df8e: 4e5e unlk %fp _Thread_queue_Enter_critical_section( &the_barrier->Wait_queue ); executing->Wait.queue = &the_barrier->Wait_queue; executing->Wait.id = id; _ISR_Enable( level ); _Thread_queue_Enqueue( &the_barrier->Wait_queue, timeout ); 4df90: 4ef9 0004 8318 jmp 48318 <_Thread_queue_Enqueue_with_handler> _ISR_Disable( level ); the_barrier->number_of_waiting_threads++; if ( _CORE_barrier_Is_automatic( &the_barrier->Attributes ) ) { if ( the_barrier->number_of_waiting_threads == the_barrier->Attributes.maximum_count) { executing->Wait.return_code = CORE_BARRIER_STATUS_AUTOMATICALLY_RELEASED; 4df96: 7001 moveq #1,%d0 4df98: 2340 0034 movel %d0,%a1@(52) _ISR_Enable( level ); 4df9c: 46c1 movew %d1,%sr _CORE_barrier_Release( the_barrier, id, api_barrier_mp_support ); 4df9e: 2d44 0010 movel %d4,%fp@(16) 4dfa2: 2d42 000c movel %d2,%fp@(12) 4dfa6: 2d48 0008 movel %a0,%fp@(8) executing->Wait.queue = &the_barrier->Wait_queue; executing->Wait.id = id; _ISR_Enable( level ); _Thread_queue_Enqueue( &the_barrier->Wait_queue, timeout ); } 4dfaa: 4cd7 001c moveml %sp@,%d2-%d4 4dfae: 4e5e unlk %fp if ( _CORE_barrier_Is_automatic( &the_barrier->Attributes ) ) { if ( the_barrier->number_of_waiting_threads == the_barrier->Attributes.maximum_count) { executing->Wait.return_code = CORE_BARRIER_STATUS_AUTOMATICALLY_RELEASED; _ISR_Enable( level ); _CORE_barrier_Release( the_barrier, id, api_barrier_mp_support ); 4dfb0: 4ef9 0004 dee8 jmp 4dee8 <_CORE_barrier_Release> ... =============================================================================== 00059f8c <_CORE_message_queue_Broadcast>: Objects_Id id __attribute__((unused)), CORE_message_queue_API_mp_support_callout api_message_queue_mp_support __attribute__((unused)), #endif uint32_t *count ) { 59f8c: 4e56 ffe0 linkw %fp,#-32 59f90: 48d7 3c3c moveml %d2-%d5/%a2-%a5,%sp@ 59f94: 266e 0008 moveal %fp@(8),%a3 59f98: 282e 000c movel %fp@(12),%d4 59f9c: 242e 0010 movel %fp@(16),%d2 59fa0: 2a2e 001c movel %fp@(28),%d5 Thread_Control *the_thread; uint32_t number_broadcasted; Thread_Wait_information *waitp; if ( size > the_message_queue->maximum_message_size ) { 59fa4: b4ab 004c cmpl %a3@(76),%d2 59fa8: 6262 bhis 5a00c <_CORE_message_queue_Broadcast+0x80><== NEVER TAKEN * NOTE: This check is critical because threads can block on * send and receive and this ensures that we are broadcasting * the message to threads waiting to receive -- not to send. */ if ( the_message_queue->number_of_pending_messages != 0 ) { 59faa: 4aab 0048 tstl %a3@(72) 59fae: 664c bnes 59ffc <_CORE_message_queue_Broadcast+0x70> * There must be no pending messages if there is a thread waiting to * receive a message. */ number_broadcasted = 0; while ((the_thread = _Thread_queue_Dequeue(&the_message_queue->Wait_queue))) { 59fb0: 2f0b movel %a3,%sp@- 59fb2: 49f9 0005 c6ec lea 5c6ec <_Thread_queue_Dequeue>,%a4 59fb8: 4283 clrl %d3 const void *source, void *destination, size_t size ) { memcpy(destination, source, size); 59fba: 4bf9 0006 3654 lea 63654 ,%a5 59fc0: 4e94 jsr %a4@ /* * There must be no pending messages if there is a thread waiting to * receive a message. */ number_broadcasted = 0; while ((the_thread = 59fc2: 588f addql #4,%sp _Thread_queue_Dequeue(&the_message_queue->Wait_queue))) { 59fc4: 2440 moveal %d0,%a2 /* * There must be no pending messages if there is a thread waiting to * receive a message. */ number_broadcasted = 0; while ((the_thread = 59fc6: 4a80 tstl %d0 59fc8: 6722 beqs 59fec <_CORE_message_queue_Broadcast+0x60> 59fca: 2f02 movel %d2,%sp@- _Thread_queue_Dequeue(&the_message_queue->Wait_queue))) { waitp = &the_thread->Wait; number_broadcasted += 1; 59fcc: 5283 addql #1,%d3 59fce: 2f04 movel %d4,%sp@- 59fd0: 2f2a 002c movel %a2@(44),%sp@- 59fd4: 4e95 jsr %a5@ buffer, waitp->return_argument_second.mutable_object, size ); *(size_t *) the_thread->Wait.return_argument = size; 59fd6: 206a 0028 moveal %a2@(40),%a0 59fda: 4fef 000c lea %sp@(12),%sp 59fde: 2082 movel %d2,%a0@ * There must be no pending messages if there is a thread waiting to * receive a message. */ number_broadcasted = 0; while ((the_thread = _Thread_queue_Dequeue(&the_message_queue->Wait_queue))) { 59fe0: 2f0b movel %a3,%sp@- 59fe2: 4e94 jsr %a4@ /* * There must be no pending messages if there is a thread waiting to * receive a message. */ number_broadcasted = 0; while ((the_thread = 59fe4: 588f addql #4,%sp _Thread_queue_Dequeue(&the_message_queue->Wait_queue))) { 59fe6: 2440 moveal %d0,%a2 /* * There must be no pending messages if there is a thread waiting to * receive a message. */ number_broadcasted = 0; while ((the_thread = 59fe8: 4a80 tstl %d0 59fea: 66de bnes 59fca <_CORE_message_queue_Broadcast+0x3e> if ( !_Objects_Is_local_id( the_thread->Object.id ) ) (*api_message_queue_mp_support) ( the_thread, id ); #endif } *count = number_broadcasted; 59fec: 2045 moveal %d5,%a0 59fee: 4280 clrl %d0 59ff0: 2083 movel %d3,%a0@ return CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL; } 59ff2: 4cee 3c3c ffe0 moveml %fp@(-32),%d2-%d5/%a2-%a5 59ff8: 4e5e unlk %fp 59ffa: 4e75 rts * send and receive and this ensures that we are broadcasting * the message to threads waiting to receive -- not to send. */ if ( the_message_queue->number_of_pending_messages != 0 ) { *count = 0; 59ffc: 2045 moveal %d5,%a0 59ffe: 4280 clrl %d0 #endif } *count = number_broadcasted; return CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL; } 5a000: 4cee 3c3c ffe0 moveml %fp@(-32),%d2-%d5/%a2-%a5 * send and receive and this ensures that we are broadcasting * the message to threads waiting to receive -- not to send. */ if ( the_message_queue->number_of_pending_messages != 0 ) { *count = 0; 5a006: 4290 clrl %a0@ #endif } *count = number_broadcasted; return CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL; } 5a008: 4e5e unlk %fp 5a00a: 4e75 rts { Thread_Control *the_thread; uint32_t number_broadcasted; Thread_Wait_information *waitp; if ( size > the_message_queue->maximum_message_size ) { 5a00c: 7001 moveq #1,%d0 <== NOT EXECUTED #endif } *count = number_broadcasted; return CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL; } 5a00e: 4cee 3c3c ffe0 moveml %fp@(-32),%d2-%d5/%a2-%a5 <== NOT EXECUTED 5a014: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004dd90 <_CORE_message_queue_Close>: void _CORE_message_queue_Close( CORE_message_queue_Control *the_message_queue, Thread_queue_Flush_callout remote_extract_callout, uint32_t status ) { 4dd90: 4e56 0000 linkw %fp,#0 4dd94: 2f0a movel %a2,%sp@- /* * This will flush blocked threads whether they were blocked on * a send or receive. */ _Thread_queue_Flush( 4dd96: 2f2e 0010 movel %fp@(16),%sp@- 4dd9a: 2f2e 000c movel %fp@(12),%sp@- void _CORE_message_queue_Close( CORE_message_queue_Control *the_message_queue, Thread_queue_Flush_callout remote_extract_callout, uint32_t status ) { 4dd9e: 246e 0008 moveal %fp@(8),%a2 /* * This will flush blocked threads whether they were blocked on * a send or receive. */ _Thread_queue_Flush( 4dda2: 2f0a movel %a2,%sp@- 4dda4: 4eb9 0004 ff54 jsr 4ff54 <_Thread_queue_Flush> * This removes all messages from the pending message queue. Since * we just flushed all waiting threads, we don't have to worry about * the flush satisfying any blocked senders as a side-effect. */ if ( the_message_queue->number_of_pending_messages != 0 ) 4ddaa: 4fef 000c lea %sp@(12),%sp 4ddae: 4aaa 0048 tstl %a2@(72) 4ddb2: 6612 bnes 4ddc6 <_CORE_message_queue_Close+0x36> (void) _CORE_message_queue_Flush_support( the_message_queue ); (void) _Workspace_Free( the_message_queue->message_buffers ); 4ddb4: 2d6a 005c 0008 movel %a2@(92),%fp@(8) } 4ddba: 246e fffc moveal %fp@(-4),%a2 4ddbe: 4e5e unlk %fp */ if ( the_message_queue->number_of_pending_messages != 0 ) (void) _CORE_message_queue_Flush_support( the_message_queue ); (void) _Workspace_Free( the_message_queue->message_buffers ); 4ddc0: 4ef9 0005 0d10 jmp 50d10 <_Workspace_Free> * we just flushed all waiting threads, we don't have to worry about * the flush satisfying any blocked senders as a side-effect. */ if ( the_message_queue->number_of_pending_messages != 0 ) (void) _CORE_message_queue_Flush_support( the_message_queue ); 4ddc6: 2f0a movel %a2,%sp@- 4ddc8: 4eb9 0004 dde4 jsr 4dde4 <_CORE_message_queue_Flush_support> (void) _Workspace_Free( the_message_queue->message_buffers ); 4ddce: 2d6a 005c 0008 movel %a2@(92),%fp@(8) * we just flushed all waiting threads, we don't have to worry about * the flush satisfying any blocked senders as a side-effect. */ if ( the_message_queue->number_of_pending_messages != 0 ) (void) _CORE_message_queue_Flush_support( the_message_queue ); 4ddd4: 588f addql #4,%sp (void) _Workspace_Free( the_message_queue->message_buffers ); } 4ddd6: 246e fffc moveal %fp@(-4),%a2 4ddda: 4e5e unlk %fp */ if ( the_message_queue->number_of_pending_messages != 0 ) (void) _CORE_message_queue_Flush_support( the_message_queue ); (void) _Workspace_Free( the_message_queue->message_buffers ); 4dddc: 4ef9 0005 0d10 jmp 50d10 <_Workspace_Free> ... =============================================================================== 0004febc <_CORE_message_queue_Initialize>: /* * Round size up to multiple of a pointer for chain init and * check for overflow on adding overhead to each message. */ allocated_message_size = maximum_message_size; if (allocated_message_size & (sizeof(uint32_t) - 1)) { 4febc: 7203 moveq #3,%d1 CORE_message_queue_Control *the_message_queue, CORE_message_queue_Attributes *the_message_queue_attributes, uint32_t maximum_pending_messages, size_t maximum_message_size ) { 4febe: 4e56 fff4 linkw %fp,#-12 4fec2: 202e 0014 movel %fp@(20),%d0 4fec6: 48d7 040c moveml %d2-%d3/%a2,%sp@ 4feca: 246e 0008 moveal %fp@(8),%a2 4fece: 242e 0010 movel %fp@(16),%d2 /* * Round size up to multiple of a pointer for chain init and * check for overflow on adding overhead to each message. */ allocated_message_size = maximum_message_size; if (allocated_message_size & (sizeof(uint32_t) - 1)) { 4fed2: c280 andl %d0,%d1 ) { size_t message_buffering_required; size_t allocated_message_size; the_message_queue->maximum_pending_messages = maximum_pending_messages; 4fed4: 2542 0044 movel %d2,%a2@(68) the_message_queue->number_of_pending_messages = 0; 4fed8: 42aa 0048 clrl %a2@(72) the_message_queue->maximum_message_size = maximum_message_size; 4fedc: 2540 004c movel %d0,%a2@(76) CORE_message_queue_Control *the_message_queue, CORE_message_queue_Notify_Handler the_handler, void *the_argument ) { the_message_queue->notify_handler = the_handler; 4fee0: 42aa 0060 clrl %a2@(96) the_message_queue->notify_argument = the_argument; 4fee4: 42aa 0064 clrl %a2@(100) /* * Round size up to multiple of a pointer for chain init and * check for overflow on adding overhead to each message. */ allocated_message_size = maximum_message_size; if (allocated_message_size & (sizeof(uint32_t) - 1)) { 4fee8: 4a81 tstl %d1 4feea: 6620 bnes 4ff0c <_CORE_message_queue_Initialize+0x50> 4feec: 2200 movel %d0,%d1 /* * Calculate how much total memory is required for message buffering and * check for overflow on the multiplication. */ message_buffering_required = (size_t) maximum_pending_messages * (allocated_message_size + sizeof(CORE_message_queue_Buffer_control)); 4feee: 2601 movel %d1,%d3 4fef0: 0683 0000 0014 addil #20,%d3 /* * Calculate how much total memory is required for message buffering and * check for overflow on the multiplication. */ message_buffering_required = (size_t) maximum_pending_messages * 4fef6: 2003 movel %d3,%d0 4fef8: 4c02 0800 mulsl %d2,%d0 (allocated_message_size + sizeof(CORE_message_queue_Buffer_control)); if (message_buffering_required < allocated_message_size) 4fefc: b280 cmpl %d0,%d1 4fefe: 631c blss 4ff1c <_CORE_message_queue_Initialize+0x60><== ALWAYS TAKEN THREAD_QUEUE_DISCIPLINE_PRIORITY : THREAD_QUEUE_DISCIPLINE_FIFO, STATES_WAITING_FOR_MESSAGE, CORE_MESSAGE_QUEUE_STATUS_TIMEOUT ); return true; 4ff00: 4200 clrb %d0 } 4ff02: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 4ff08: 4e5e unlk %fp 4ff0a: 4e75 rts * Round size up to multiple of a pointer for chain init and * check for overflow on adding overhead to each message. */ allocated_message_size = maximum_message_size; if (allocated_message_size & (sizeof(uint32_t) - 1)) { allocated_message_size += sizeof(uint32_t); 4ff0c: 2200 movel %d0,%d1 4ff0e: 5881 addql #4,%d1 allocated_message_size &= ~(sizeof(uint32_t) - 1); 4ff10: 76fc moveq #-4,%d3 4ff12: c283 andl %d3,%d1 } if (allocated_message_size < maximum_message_size) 4ff14: b280 cmpl %d0,%d1 4ff16: 64d6 bccs 4feee <_CORE_message_queue_Initialize+0x32><== ALWAYS TAKEN THREAD_QUEUE_DISCIPLINE_PRIORITY : THREAD_QUEUE_DISCIPLINE_FIFO, STATES_WAITING_FOR_MESSAGE, CORE_MESSAGE_QUEUE_STATUS_TIMEOUT ); return true; 4ff18: 4200 clrb %d0 <== NOT EXECUTED 4ff1a: 60e6 bras 4ff02 <_CORE_message_queue_Initialize+0x46><== NOT EXECUTED return false; /* * Attempt to allocate the message memory */ the_message_queue->message_buffers = (CORE_message_queue_Buffer *) 4ff1c: 2f00 movel %d0,%sp@- 4ff1e: 4eb9 0005 2d4c jsr 52d4c <_Workspace_Allocate> _Workspace_Allocate( message_buffering_required ); if (the_message_queue->message_buffers == 0) 4ff24: 588f addql #4,%sp return false; /* * Attempt to allocate the message memory */ the_message_queue->message_buffers = (CORE_message_queue_Buffer *) 4ff26: 2540 005c movel %d0,%a2@(92) _Workspace_Allocate( message_buffering_required ); if (the_message_queue->message_buffers == 0) 4ff2a: 67d4 beqs 4ff00 <_CORE_message_queue_Initialize+0x44> /* * Initialize the pool of inactive messages, pending messages, * and set of waiting threads. */ _Chain_Initialize ( 4ff2c: 2f03 movel %d3,%sp@- 4ff2e: 2f02 movel %d2,%sp@- 4ff30: 2f00 movel %d0,%sp@- 4ff32: 486a 0068 pea %a2@(104) 4ff36: 4eb9 0005 52bc jsr 552bc <_Chain_Initialize> allocated_message_size + sizeof( CORE_message_queue_Buffer_control ) ); _Chain_Initialize_empty( &the_message_queue->Pending_messages ); _Thread_queue_Initialize( 4ff3c: 4878 0006 pea 6 4ff40: 7001 moveq #1,%d0 4ff42: 206e 000c moveal %fp@(12),%a0 4ff46: b090 cmpl %a0@,%d0 4ff48: 57c0 seq %d0 4ff4a: 4878 0080 pea 80 4ff4e: 49c0 extbl %d0 4ff50: 4480 negl %d0 */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 4ff52: 41ea 0054 lea %a2@(84),%a0 4ff56: 2f00 movel %d0,%sp@- 4ff58: 2548 0050 movel %a0,%a2@(80) the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain); 4ff5c: 41ea 0050 lea %a2@(80),%a0 4ff60: 2548 0058 movel %a0,%a2@(88) 4ff64: 2f0a movel %a2,%sp@- RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); the_chain->permanent_null = NULL; 4ff66: 42aa 0054 clrl %a2@(84) 4ff6a: 4eb9 0005 20ec jsr 520ec <_Thread_queue_Initialize> THREAD_QUEUE_DISCIPLINE_PRIORITY : THREAD_QUEUE_DISCIPLINE_FIFO, STATES_WAITING_FOR_MESSAGE, CORE_MESSAGE_QUEUE_STATUS_TIMEOUT ); return true; 4ff70: 4fef 0020 lea %sp@(32),%sp } 4ff74: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 allocated_message_size + sizeof( CORE_message_queue_Buffer_control ) ); _Chain_Initialize_empty( &the_message_queue->Pending_messages ); _Thread_queue_Initialize( 4ff7a: 7001 moveq #1,%d0 STATES_WAITING_FOR_MESSAGE, CORE_MESSAGE_QUEUE_STATUS_TIMEOUT ); return true; } 4ff7c: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00055304 <_CORE_message_queue_Insert_message>: void _CORE_message_queue_Insert_message( CORE_message_queue_Control *the_message_queue, CORE_message_queue_Buffer_control *the_message, CORE_message_queue_Submit_types submit_type ) { 55304: 4e56 0000 linkw %fp,#0 55308: 226e 000c moveal %fp@(12),%a1 5530c: 2f0b movel %a3,%sp@- 5530e: 202e 0010 movel %fp@(16),%d0 55312: 206e 0008 moveal %fp@(8),%a0 55316: 2f0a movel %a2,%sp@- 55318: 2340 0008 movel %d0,%a1@(8) _CORE_message_queue_Append_unprotected(the_message_queue, the_message); else _CORE_message_queue_Prepend_unprotected(the_message_queue, the_message); _ISR_Enable( level ); #else if ( submit_type == CORE_MESSAGE_QUEUE_SEND_REQUEST ) { 5531c: 0c80 7fff ffff cmpil #2147483647,%d0 55322: 6760 beqs 55384 <_CORE_message_queue_Insert_message+0x80> _ISR_Disable( level ); SET_NOTIFY(); the_message_queue->number_of_pending_messages++; _CORE_message_queue_Append_unprotected(the_message_queue, the_message); _ISR_Enable( level ); } else if ( submit_type == CORE_MESSAGE_QUEUE_URGENT_REQUEST ) { 55324: 0c80 8000 0000 cmpil #-2147483648,%d0 5532a: 6700 008e beqw 553ba <_CORE_message_queue_Insert_message+0xb6> */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 5532e: 2208 movel %a0,%d1 55330: 0681 0000 0054 addil #84,%d1 Chain_Control *the_header; int the_priority; the_priority = _CORE_message_queue_Get_message_priority(the_message); the_header = &the_message_queue->Pending_messages; the_node = the_header->first; 55336: 2468 0050 moveal %a0@(80),%a2 while ( !_Chain_Is_tail( the_header, the_node ) ) { 5533a: b28a cmpl %a2,%d1 5533c: 670c beqs 5534a <_CORE_message_queue_Insert_message+0x46> this_message = (CORE_message_queue_Buffer_control *) the_node; this_priority = _CORE_message_queue_Get_message_priority(this_message); if ( this_priority <= the_priority ) { 5533e: b0aa 0008 cmpl %a2@(8),%d0 55342: 6d06 blts 5534a <_CORE_message_queue_Insert_message+0x46> the_node = the_node->next; 55344: 2452 moveal %a2@,%a2 int the_priority; the_priority = _CORE_message_queue_Get_message_priority(the_message); the_header = &the_message_queue->Pending_messages; the_node = the_header->first; while ( !_Chain_Is_tail( the_header, the_node ) ) { 55346: b28a cmpl %a2,%d1 55348: 66f4 bnes 5533e <_CORE_message_queue_Insert_message+0x3a> the_node = the_node->next; continue; } break; } _ISR_Disable( level ); 5534a: 203c 0000 0700 movel #1792,%d0 55350: 40c1 movew %sr,%d1 55352: 8081 orl %d1,%d0 55354: 46c0 movew %d0,%sr SET_NOTIFY(); the_message_queue->number_of_pending_messages++; _Chain_Insert_unprotected( the_node->previous, &the_message->Node ); 55356: 246a 0004 moveal %a2@(4),%a2 } break; } _ISR_Disable( level ); SET_NOTIFY(); the_message_queue->number_of_pending_messages++; 5535a: 52a8 0048 addql #1,%a0@(72) ) { Chain_Node *before_node; the_node->previous = after_node; before_node = after_node->next; 5535e: 2652 moveal %a2@,%a3 Chain_Node *the_node ) { Chain_Node *before_node; the_node->previous = after_node; 55360: 234a 0004 movel %a2,%a1@(4) before_node = after_node->next; after_node->next = the_node; 55364: 2489 movel %a1,%a2@ the_node->next = before_node; before_node->previous = the_node; 55366: 2749 0004 movel %a1,%a3@(4) Chain_Node *before_node; the_node->previous = after_node; before_node = after_node->next; after_node->next = the_node; the_node->next = before_node; 5536a: 228b movel %a3,%a1@ _Chain_Insert_unprotected( the_node->previous, &the_message->Node ); _ISR_Enable( level ); 5536c: 46c1 movew %d1,%sr /* * According to POSIX, does this happen before or after the message * is actually enqueued. It is logical to think afterwards, because * the message is actually in the queue at this point. */ if ( notify && the_message_queue->notify_handler ) 5536e: 2268 0060 moveal %a0@(96),%a1 55372: 4a89 tstl %a1 55374: 673c beqs 553b2 <_CORE_message_queue_Insert_message+0xae> (*the_message_queue->notify_handler)(the_message_queue->notify_argument); 55376: 2d68 0064 0008 movel %a0@(100),%fp@(8) #endif } 5537c: 245f moveal %sp@+,%a2 5537e: 265f moveal %sp@+,%a3 55380: 4e5e unlk %fp * According to POSIX, does this happen before or after the message * is actually enqueued. It is logical to think afterwards, because * the message is actually in the queue at this point. */ if ( notify && the_message_queue->notify_handler ) (*the_message_queue->notify_handler)(the_message_queue->notify_argument); 55382: 4ed1 jmp %a1@ else _CORE_message_queue_Prepend_unprotected(the_message_queue, the_message); _ISR_Enable( level ); #else if ( submit_type == CORE_MESSAGE_QUEUE_SEND_REQUEST ) { _ISR_Disable( level ); 55384: 203c 0000 0700 movel #1792,%d0 5538a: 40c1 movew %sr,%d1 5538c: 8081 orl %d1,%d0 5538e: 46c0 movew %d0,%sr Chain_Node *the_node ) { Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); 55390: 45e8 0054 lea %a0@(84),%a2 SET_NOTIFY(); the_message_queue->number_of_pending_messages++; 55394: 52a8 0048 addql #1,%a0@(72) 55398: 228a movel %a2,%a1@ old_last_node = the_chain->last; 5539a: 2468 0058 moveal %a0@(88),%a2 the_chain->last = the_node; 5539e: 2149 0058 movel %a1,%a0@(88) old_last_node->next = the_node; the_node->previous = old_last_node; 553a2: 234a 0004 movel %a2,%a1@(4) Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); old_last_node = the_chain->last; the_chain->last = the_node; old_last_node->next = the_node; 553a6: 2489 movel %a1,%a2@ _CORE_message_queue_Append_unprotected(the_message_queue, the_message); _ISR_Enable( level ); 553a8: 46c1 movew %d1,%sr /* * According to POSIX, does this happen before or after the message * is actually enqueued. It is logical to think afterwards, because * the message is actually in the queue at this point. */ if ( notify && the_message_queue->notify_handler ) 553aa: 2268 0060 moveal %a0@(96),%a1 553ae: 4a89 tstl %a1 553b0: 66c4 bnes 55376 <_CORE_message_queue_Insert_message+0x72><== NEVER TAKEN (*the_message_queue->notify_handler)(the_message_queue->notify_argument); #endif } 553b2: 245f moveal %sp@+,%a2 553b4: 265f moveal %sp@+,%a3 553b6: 4e5e unlk %fp 553b8: 4e75 rts SET_NOTIFY(); the_message_queue->number_of_pending_messages++; _CORE_message_queue_Append_unprotected(the_message_queue, the_message); _ISR_Enable( level ); } else if ( submit_type == CORE_MESSAGE_QUEUE_URGENT_REQUEST ) { _ISR_Disable( level ); 553ba: 203c 0000 0700 movel #1792,%d0 553c0: 40c1 movew %sr,%d1 553c2: 8081 orl %d1,%d0 553c4: 46c0 movew %d0,%sr */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Head( Chain_Control *the_chain ) { return (Chain_Node *) the_chain; 553c6: 45e8 0050 lea %a0@(80),%a2 SET_NOTIFY(); the_message_queue->number_of_pending_messages++; 553ca: 52a8 0048 addql #1,%a0@(72) ) { Chain_Node *before_node; the_node->previous = after_node; before_node = after_node->next; 553ce: 2652 moveal %a2@,%a3 Chain_Node *the_node ) { Chain_Node *before_node; the_node->previous = after_node; 553d0: 234a 0004 movel %a2,%a1@(4) before_node = after_node->next; after_node->next = the_node; 553d4: 2489 movel %a1,%a2@ the_node->next = before_node; before_node->previous = the_node; 553d6: 2749 0004 movel %a1,%a3@(4) Chain_Node *before_node; the_node->previous = after_node; before_node = after_node->next; after_node->next = the_node; the_node->next = before_node; 553da: 228b movel %a3,%a1@ _CORE_message_queue_Prepend_unprotected(the_message_queue, the_message); _ISR_Enable( level ); 553dc: 46c1 movew %d1,%sr 553de: 608e bras 5536e <_CORE_message_queue_Insert_message+0x6a> =============================================================================== 0004ff80 <_CORE_message_queue_Seize>: CORE_message_queue_Buffer_control *the_message; Thread_Control *executing; executing = _Thread_Executing; executing->Wait.return_code = CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL; _ISR_Disable( level ); 4ff80: 203c 0000 0700 movel #1792,%d0 void *buffer, size_t *size_p, bool wait, Watchdog_Interval timeout ) { 4ff86: 4e56 ffe8 linkw %fp,#-24 ISR_Level level; CORE_message_queue_Buffer_control *the_message; Thread_Control *executing; executing = _Thread_Executing; 4ff8a: 2279 0006 98a6 moveal 698a6 <_Thread_Executing>,%a1 void *buffer, size_t *size_p, bool wait, Watchdog_Interval timeout ) { 4ff90: 48d7 1c1c moveml %d2-%d4/%a2-%a4,%sp@ 4ff94: 282e 000c movel %fp@(12),%d4 4ff98: 286e 001c moveal %fp@(28),%a4 4ff9c: 246e 0008 moveal %fp@(8),%a2 ISR_Level level; CORE_message_queue_Buffer_control *the_message; Thread_Control *executing; executing = _Thread_Executing; executing->Wait.return_code = CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL; 4ffa0: 42a9 0034 clrl %a1@(52) void *buffer, size_t *size_p, bool wait, Watchdog_Interval timeout ) { 4ffa4: 262e 0010 movel %fp@(16),%d3 4ffa8: 206e 0014 moveal %fp@(20),%a0 4ffac: 242e 0018 movel %fp@(24),%d2 CORE_message_queue_Buffer_control *the_message; Thread_Control *executing; executing = _Thread_Executing; executing->Wait.return_code = CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL; _ISR_Disable( level ); 4ffb0: 40c1 movew %sr,%d1 4ffb2: 8081 orl %d1,%d0 4ffb4: 46c0 movew %d0,%sr */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 4ffb6: 200a movel %a2,%d0 4ffb8: 0680 0000 0054 addil #84,%d0 */ RTEMS_INLINE_ROUTINE bool _Chain_Is_empty( Chain_Control *the_chain ) { return (the_chain->first == _Chain_Tail(the_chain)); 4ffbe: 266a 0050 moveal %a2@(80),%a3 */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 4ffc2: b08b cmpl %a3,%d0 4ffc4: 6700 0088 beqw 5004e <_CORE_message_queue_Seize+0xce> { Chain_Node *return_node; Chain_Node *new_first; return_node = the_chain->first; new_first = return_node->next; 4ffc8: 2253 moveal %a3@,%a1 the_message = _CORE_message_queue_Get_pending_message( the_message_queue ); if ( the_message != NULL ) { the_message_queue->number_of_pending_messages -= 1; 4ffca: 53aa 0048 subql #1,%a2@(72) the_chain->first = new_first; new_first->previous = _Chain_Head(the_chain); 4ffce: 49ea 0050 lea %a2@(80),%a4 Chain_Node *return_node; Chain_Node *new_first; return_node = the_chain->first; new_first = return_node->next; the_chain->first = new_first; 4ffd2: 2549 0050 movel %a1,%a2@(80) new_first->previous = _Chain_Head(the_chain); 4ffd6: 234c 0004 movel %a4,%a1@(4) _ISR_Enable( level ); 4ffda: 46c1 movew %d1,%sr *size_p = the_message->Contents.size; _Thread_Executing->Wait.count = 4ffdc: 2279 0006 98a6 moveal 698a6 <_Thread_Executing>,%a1 _CORE_message_queue_Get_message_priority( the_message ); _CORE_message_queue_Copy_buffer( the_message->Contents.buffer, 4ffe2: 240b movel %a3,%d2 4ffe4: 0682 0000 0010 addil #16,%d2 const void *source, void *destination, size_t size ) { memcpy(destination, source, size); 4ffea: 49f9 0005 8a20 lea 58a20 ,%a4 the_message = _CORE_message_queue_Get_pending_message( the_message_queue ); if ( the_message != NULL ) { the_message_queue->number_of_pending_messages -= 1; _ISR_Enable( level ); *size_p = the_message->Contents.size; 4fff0: 20ab 000c movel %a3@(12),%a0@ _Thread_Executing->Wait.count = 4fff4: 236b 0008 0024 movel %a3@(8),%a1@(36) 4fffa: 2f10 movel %a0@,%sp@- 4fffc: 2f02 movel %d2,%sp@- 4fffe: 2f03 movel %d3,%sp@- 50000: 4e94 jsr %a4@ * is not, then we can go ahead and free the buffer. * * NOTE: If we note that the queue was not full before this receive, * then we can avoid this dequeue. */ the_thread = _Thread_queue_Dequeue( &the_message_queue->Wait_queue ); 50002: 2f0a movel %a2,%sp@- 50004: 4eb9 0005 1d10 jsr 51d10 <_Thread_queue_Dequeue> if ( !the_thread ) { 5000a: 4fef 0010 lea %sp@(16),%sp * is not, then we can go ahead and free the buffer. * * NOTE: If we note that the queue was not full before this receive, * then we can avoid this dequeue. */ the_thread = _Thread_queue_Dequeue( &the_message_queue->Wait_queue ); 5000e: 2040 moveal %d0,%a0 if ( !the_thread ) { 50010: 4a80 tstl %d0 50012: 6700 0088 beqw 5009c <_CORE_message_queue_Seize+0x11c> */ _CORE_message_queue_Set_message_priority( the_message, the_thread->Wait.count ); the_message->Contents.size = (size_t) the_thread->Wait.option; 50016: 2028 0030 movel %a0@(48),%d0 CORE_message_queue_Buffer_control *the_message, int priority ) { #if defined(RTEMS_SCORE_COREMSG_ENABLE_MESSAGE_PRIORITY) the_message->priority = priority; 5001a: 2768 0024 0008 movel %a0@(36),%a3@(8) 50020: 2740 000c movel %d0,%a3@(12) const void *source, void *destination, size_t size ) { memcpy(destination, source, size); 50024: 2f00 movel %d0,%sp@- 50026: 2f28 002c movel %a0@(44),%sp@- 5002a: 2f02 movel %d2,%sp@- 5002c: 4e94 jsr %a4@ the_thread->Wait.return_argument_second.immutable_object, the_message->Contents.buffer, the_message->Contents.size ); _CORE_message_queue_Insert_message( 5002e: 2d6b 0008 0010 movel %a3@(8),%fp@(16) 50034: 4fef 000c lea %sp@(12),%sp 50038: 2d4b 000c movel %a3,%fp@(12) 5003c: 2d4a 0008 movel %a2,%fp@(8) executing->Wait.return_argument = size_p; /* Wait.count will be filled in with the message priority */ _ISR_Enable( level ); _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); } 50040: 4cee 1c1c ffe8 moveml %fp@(-24),%d2-%d4/%a2-%a4 50046: 4e5e unlk %fp the_thread->Wait.return_argument_second.immutable_object, the_message->Contents.buffer, the_message->Contents.size ); _CORE_message_queue_Insert_message( 50048: 4ef9 0005 5304 jmp 55304 <_CORE_message_queue_Insert_message> return; } #endif } if ( !wait ) { 5004e: 4a02 tstb %d2 50050: 6612 bnes 50064 <_CORE_message_queue_Seize+0xe4> _ISR_Enable( level ); 50052: 46c1 movew %d1,%sr executing->Wait.return_code = CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_NOWAIT; 50054: 7004 moveq #4,%d0 executing->Wait.return_argument = size_p; /* Wait.count will be filled in with the message priority */ _ISR_Enable( level ); _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); } 50056: 4cee 1c1c ffe8 moveml %fp@(-24),%d2-%d4/%a2-%a4 #endif } if ( !wait ) { _ISR_Enable( level ); executing->Wait.return_code = CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_NOWAIT; 5005c: 2340 0034 movel %d0,%a1@(52) executing->Wait.return_argument = size_p; /* Wait.count will be filled in with the message priority */ _ISR_Enable( level ); _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); } 50060: 4e5e unlk %fp 50062: 4e75 rts 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; 50064: 7001 moveq #1,%d0 50066: 2540 0030 movel %d0,%a2@(48) _Thread_queue_Enter_critical_section( &the_message_queue->Wait_queue ); executing->Wait.queue = &the_message_queue->Wait_queue; executing->Wait.id = id; executing->Wait.return_argument_second.mutable_object = buffer; executing->Wait.return_argument = size_p; 5006a: 2348 0028 movel %a0,%a1@(40) } _Thread_queue_Enter_critical_section( &the_message_queue->Wait_queue ); executing->Wait.queue = &the_message_queue->Wait_queue; executing->Wait.id = id; executing->Wait.return_argument_second.mutable_object = buffer; 5006e: 2343 002c movel %d3,%a1@(44) return; } _Thread_queue_Enter_critical_section( &the_message_queue->Wait_queue ); executing->Wait.queue = &the_message_queue->Wait_queue; executing->Wait.id = id; 50072: 2344 0020 movel %d4,%a1@(32) executing->Wait.return_code = CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_NOWAIT; return; } _Thread_queue_Enter_critical_section( &the_message_queue->Wait_queue ); executing->Wait.queue = &the_message_queue->Wait_queue; 50076: 234a 0044 movel %a2,%a1@(68) executing->Wait.id = id; executing->Wait.return_argument_second.mutable_object = buffer; executing->Wait.return_argument = size_p; /* Wait.count will be filled in with the message priority */ _ISR_Enable( level ); 5007a: 46c1 movew %d1,%sr _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); 5007c: 2d4c 000c movel %a4,%fp@(12) 50080: 49f9 0005 21d0 lea 521d0 <_Thread_queue_Timeout>,%a4 50086: 2d4a 0008 movel %a2,%fp@(8) 5008a: 2d4c 0010 movel %a4,%fp@(16) } 5008e: 4cee 1c1c ffe8 moveml %fp@(-24),%d2-%d4/%a2-%a4 50094: 4e5e unlk %fp executing->Wait.return_argument_second.mutable_object = buffer; executing->Wait.return_argument = size_p; /* Wait.count will be filled in with the message priority */ _ISR_Enable( level ); _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); 50096: 4ef9 0005 1e70 jmp 51e70 <_Thread_queue_Enqueue_with_handler> RTEMS_INLINE_ROUTINE void _CORE_message_queue_Free_message_buffer ( CORE_message_queue_Control *the_message_queue, CORE_message_queue_Buffer_control *the_message ) { _Chain_Append( &the_message_queue->Inactive_messages, &the_message->Node ); 5009c: 45ea 0068 lea %a2@(104),%a2 500a0: 2d4b 000c movel %a3,%fp@(12) 500a4: 2d4a 0008 movel %a2,%fp@(8) } 500a8: 4cee 1c1c ffe8 moveml %fp@(-24),%d2-%d4/%a2-%a4 500ae: 4e5e unlk %fp 500b0: 4ef9 0004 fdf0 jmp 4fdf0 <_Chain_Append> ... =============================================================================== 000500b8 <_CORE_message_queue_Submit>: #endif CORE_message_queue_Submit_types submit_type, bool wait, Watchdog_Interval timeout ) { 500b8: 4e56 ffec linkw %fp,#-20 500bc: 48d7 0c1c moveml %d2-%d4/%a2-%a3,%sp@ 500c0: 246e 0008 moveal %fp@(8),%a2 500c4: 242e 0010 movel %fp@(16),%d2 500c8: 282e 001c movel %fp@(28),%d4 500cc: 162e 0023 moveb %fp@(35),%d3 CORE_message_queue_Buffer_control *the_message; Thread_Control *the_thread; if ( size > the_message_queue->maximum_message_size ) { 500d0: b4aa 004c cmpl %a2@(76),%d2 500d4: 6228 bhis 500fe <_CORE_message_queue_Submit+0x46> } /* * Is there a thread currently waiting on this message queue? */ if ( the_message_queue->number_of_pending_messages == 0 ) { 500d6: 202a 0048 movel %a2@(72),%d0 500da: 672e beqs 5010a <_CORE_message_queue_Submit+0x52> /* * No one waiting on the message queue at this time, so attempt to * queue the message up for a future receive. */ if ( the_message_queue->number_of_pending_messages < the_message_queue->maximum_pending_messages ) { 500dc: b0aa 0044 cmpl %a2@(68),%d0 500e0: 6500 00ba bcsw 5019c <_CORE_message_queue_Submit+0xe4> /* * No message buffers were available so we may need to return an * overflow error or block the sender until the message is placed * on the queue. */ if ( !wait ) { 500e4: 4a03 tstb %d3 500e6: 6700 00f4 beqw 501dc <_CORE_message_queue_Submit+0x124> /* * Do NOT block on a send if the caller is in an ISR. It is * deadly to block in an ISR. */ if ( _ISR_Is_in_progress() ) { 500ea: 2039 0006 9886 movel 69886 <_ISR_Nest_level>,%d0 500f0: 6754 beqs 50146 <_CORE_message_queue_Submit+0x8e><== NEVER TAKEN 500f2: 7003 moveq #3,%d0 _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); } return CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_WAIT; #endif } 500f4: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3 500fa: 4e5e unlk %fp 500fc: 4e75 rts ) { CORE_message_queue_Buffer_control *the_message; Thread_Control *the_thread; if ( size > the_message_queue->maximum_message_size ) { 500fe: 7001 moveq #1,%d0 _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); } return CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_WAIT; #endif } 50100: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3 50106: 4e5e unlk %fp 50108: 4e75 rts /* * Is there a thread currently waiting on this message queue? */ if ( the_message_queue->number_of_pending_messages == 0 ) { the_thread = _Thread_queue_Dequeue( &the_message_queue->Wait_queue ); 5010a: 2f0a movel %a2,%sp@- 5010c: 4eb9 0005 1d10 jsr 51d10 <_Thread_queue_Dequeue> if ( the_thread ) { 50112: 588f addql #4,%sp /* * Is there a thread currently waiting on this message queue? */ if ( the_message_queue->number_of_pending_messages == 0 ) { the_thread = _Thread_queue_Dequeue( &the_message_queue->Wait_queue ); 50114: 2640 moveal %d0,%a3 if ( the_thread ) { 50116: 4a80 tstl %d0 50118: 6700 00ce beqw 501e8 <_CORE_message_queue_Submit+0x130> const void *source, void *destination, size_t size ) { memcpy(destination, source, size); 5011c: 2f02 movel %d2,%sp@- 5011e: 2f2e 000c movel %fp@(12),%sp@- 50122: 2f2b 002c movel %a3@(44),%sp@- 50126: 4eb9 0005 8a20 jsr 58a20 _CORE_message_queue_Copy_buffer( buffer, the_thread->Wait.return_argument_second.mutable_object, size ); *(size_t *) the_thread->Wait.return_argument = size; 5012c: 206b 0028 moveal %a3@(40),%a0 #if defined(RTEMS_MULTIPROCESSING) if ( !_Objects_Is_local_id( the_thread->Object.id ) ) (*api_message_queue_mp_support) ( the_thread, id ); #endif return CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL; 50130: 4fef 000c lea %sp@(12),%sp buffer, the_thread->Wait.return_argument_second.mutable_object, size ); *(size_t *) the_thread->Wait.return_argument = size; the_thread->Wait.count = (uint32_t) submit_type; 50134: 4280 clrl %d0 _CORE_message_queue_Copy_buffer( buffer, the_thread->Wait.return_argument_second.mutable_object, size ); *(size_t *) the_thread->Wait.return_argument = size; 50136: 2082 movel %d2,%a0@ the_thread->Wait.count = (uint32_t) submit_type; 50138: 2744 0024 movel %d4,%a3@(36) _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); } return CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_WAIT; #endif } 5013c: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3 50142: 4e5e unlk %fp 50144: 4e75 rts * Thus the unusual choice to open a new scope and declare * it as a variable. Doing this emphasizes how dangerous it * would be to use this variable prior to here. */ { Thread_Control *executing = _Thread_Executing; 50146: 2079 0006 98a6 moveal 698a6 <_Thread_Executing>,%a0 ISR_Level level; _ISR_Disable( level ); 5014c: 203c 0000 0700 movel #1792,%d0 50152: 40c1 movew %sr,%d1 50154: 8081 orl %d1,%d0 50156: 46c0 movew %d0,%sr 50158: 7001 moveq #1,%d0 _Thread_queue_Enter_critical_section( &the_message_queue->Wait_queue ); executing->Wait.queue = &the_message_queue->Wait_queue; executing->Wait.id = id; 5015a: 216e 0014 0020 movel %fp@(20),%a0@(32) 50160: 2540 0030 movel %d0,%a2@(48) executing->Wait.return_argument_second.immutable_object = buffer; 50164: 202e 000c movel %fp@(12),%d0 executing->Wait.option = (uint32_t) size; executing->Wait.count = submit_type; 50168: 2144 0024 movel %d4,%a0@(36) _ISR_Disable( level ); _Thread_queue_Enter_critical_section( &the_message_queue->Wait_queue ); executing->Wait.queue = &the_message_queue->Wait_queue; executing->Wait.id = id; executing->Wait.return_argument_second.immutable_object = buffer; 5016c: 2140 002c movel %d0,%a0@(44) executing->Wait.option = (uint32_t) size; 50170: 2142 0030 movel %d2,%a0@(48) Thread_Control *executing = _Thread_Executing; ISR_Level level; _ISR_Disable( level ); _Thread_queue_Enter_critical_section( &the_message_queue->Wait_queue ); executing->Wait.queue = &the_message_queue->Wait_queue; 50174: 214a 0044 movel %a2,%a0@(68) executing->Wait.id = id; executing->Wait.return_argument_second.immutable_object = buffer; executing->Wait.option = (uint32_t) size; executing->Wait.count = submit_type; _ISR_Enable( level ); 50178: 46c1 movew %d1,%sr _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); 5017a: 4879 0005 21d0 pea 521d0 <_Thread_queue_Timeout> 50180: 2f2e 0024 movel %fp@(36),%sp@- 50184: 2f0a movel %a2,%sp@- 50186: 4eb9 0005 1e70 jsr 51e70 <_Thread_queue_Enqueue_with_handler> } return CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_WAIT; 5018c: 4fef 000c lea %sp@(12),%sp executing->Wait.return_argument_second.immutable_object = buffer; executing->Wait.option = (uint32_t) size; executing->Wait.count = submit_type; _ISR_Enable( level ); _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); 50190: 7007 moveq #7,%d0 } return CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_WAIT; #endif } 50192: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3 50198: 4e5e unlk %fp 5019a: 4e75 rts RTEMS_INLINE_ROUTINE CORE_message_queue_Buffer_control * _CORE_message_queue_Allocate_message_buffer ( CORE_message_queue_Control *the_message_queue ) { return (CORE_message_queue_Buffer_control *) 5019c: 486a 0068 pea %a2@(104) 501a0: 4eb9 0004 fe50 jsr 4fe50 <_Chain_Get> 501a6: 2640 moveal %d0,%a3 const void *source, void *destination, size_t size ) { memcpy(destination, source, size); 501a8: 2f02 movel %d2,%sp@- 501aa: 2f2e 000c movel %fp@(12),%sp@- 501ae: 486b 0010 pea %a3@(16) 501b2: 4eb9 0005 8a20 jsr 58a20 _CORE_message_queue_Copy_buffer( buffer, the_message->Contents.buffer, size ); the_message->Contents.size = size; 501b8: 2742 000c movel %d2,%a3@(12) CORE_message_queue_Buffer_control *the_message, int priority ) { #if defined(RTEMS_SCORE_COREMSG_ENABLE_MESSAGE_PRIORITY) the_message->priority = priority; 501bc: 2744 0008 movel %d4,%a3@(8) _CORE_message_queue_Set_message_priority( the_message, submit_type ); _CORE_message_queue_Insert_message( 501c0: 2f04 movel %d4,%sp@- 501c2: 2f0b movel %a3,%sp@- 501c4: 2f0a movel %a2,%sp@- 501c6: 4eb9 0005 5304 jsr 55304 <_CORE_message_queue_Insert_message> the_message_queue, the_message, submit_type ); return CORE_MESSAGE_QUEUE_STATUS_SUCCESSFUL; 501cc: 4fef 001c lea %sp@(28),%sp size ); the_message->Contents.size = size; _CORE_message_queue_Set_message_priority( the_message, submit_type ); _CORE_message_queue_Insert_message( 501d0: 4280 clrl %d0 _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); } return CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_WAIT; #endif } 501d2: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3 501d8: 4e5e unlk %fp 501da: 4e75 rts /* * No message buffers were available so we may need to return an * overflow error or block the sender until the message is placed * on the queue. */ if ( !wait ) { 501dc: 7002 moveq #2,%d0 _Thread_queue_Enqueue( &the_message_queue->Wait_queue, timeout ); } return CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_WAIT; #endif } 501de: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3 501e4: 4e5e unlk %fp 501e6: 4e75 rts /* * Is there a thread currently waiting on this message queue? */ if ( the_message_queue->number_of_pending_messages == 0 ) { the_thread = _Thread_queue_Dequeue( &the_message_queue->Wait_queue ); if ( the_thread ) { 501e8: 202a 0048 movel %a2@(72),%d0 /* * No one waiting on the message queue at this time, so attempt to * queue the message up for a future receive. */ if ( the_message_queue->number_of_pending_messages < the_message_queue->maximum_pending_messages ) { 501ec: b0aa 0044 cmpl %a2@(68),%d0 501f0: 6400 fef2 bccw 500e4 <_CORE_message_queue_Submit+0x2c> 501f4: 60a6 bras 5019c <_CORE_message_queue_Submit+0xe4> ... =============================================================================== 00046958 <_CORE_mutex_Seize>: Objects_Id _id, bool _wait, Watchdog_Interval _timeout, ISR_Level _level ) { 46958: 4e56 0000 linkw %fp,#0 4695c: 202e 0010 movel %fp@(16),%d0 46960: 2f0a movel %a2,%sp@- 46962: 246e 0008 moveal %fp@(8),%a2 46966: 2f02 movel %d2,%sp@- _CORE_mutex_Seize_body( _the_mutex, _id, _wait, _timeout, _level ); 46968: 2239 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d1 Objects_Id _id, bool _wait, Watchdog_Interval _timeout, ISR_Level _level ) { 4696e: 1400 moveb %d0,%d2 _CORE_mutex_Seize_body( _the_mutex, _id, _wait, _timeout, _level ); 46970: 4a81 tstl %d1 46972: 6704 beqs 46978 <_CORE_mutex_Seize+0x20> 46974: 4a00 tstb %d0 46976: 6634 bnes 469ac <_CORE_mutex_Seize+0x54> <== ALWAYS TAKEN 46978: 486e 0018 pea %fp@(24) 4697c: 2f0a movel %a2,%sp@- 4697e: 4eb9 0004 ba44 jsr 4ba44 <_CORE_mutex_Seize_interrupt_trylock> 46984: 508f addql #8,%sp 46986: 4a80 tstl %d0 46988: 6716 beqs 469a0 <_CORE_mutex_Seize+0x48> 4698a: 4a02 tstb %d2 4698c: 6636 bnes 469c4 <_CORE_mutex_Seize+0x6c> 4698e: 202e 0018 movel %fp@(24),%d0 46992: 46c0 movew %d0,%sr 46994: 2079 0005 f032 moveal 5f032 <_Thread_Executing>,%a0 4699a: 7001 moveq #1,%d0 4699c: 2140 0034 movel %d0,%a0@(52) } 469a0: 242e fff8 movel %fp@(-8),%d2 469a4: 246e fffc moveal %fp@(-4),%a2 469a8: 4e5e unlk %fp 469aa: 4e75 rts bool _wait, Watchdog_Interval _timeout, ISR_Level _level ) { _CORE_mutex_Seize_body( _the_mutex, _id, _wait, _timeout, _level ); 469ac: 7001 moveq #1,%d0 469ae: b0b9 0005 f100 cmpl 5f100 <_System_state_Current>,%d0 469b4: 64c2 bccs 46978 <_CORE_mutex_Seize+0x20> 469b6: 4878 0013 pea 13 469ba: 42a7 clrl %sp@- 469bc: 42a7 clrl %sp@- 469be: 4eb9 0004 6fcc jsr 46fcc <_Internal_error_Occurred> 469c4: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 469ca: 5280 addql #1,%d0 469cc: 2079 0005 f032 moveal 5f032 <_Thread_Executing>,%a0 469d2: 216e 000c 0020 movel %fp@(12),%a0@(32) 469d8: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> 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; 469de: 7001 moveq #1,%d0 469e0: 214a 0044 movel %a2,%a0@(68) 469e4: 2540 0030 movel %d0,%a2@(48) 469e8: 202e 0018 movel %fp@(24),%d0 469ec: 46c0 movew %d0,%sr 469ee: 2f2e 0014 movel %fp@(20),%sp@- 469f2: 2f0a movel %a2,%sp@- 469f4: 4eb9 0004 68cc jsr 468cc <_CORE_mutex_Seize_interrupt_blocking> } 469fa: 242e fff8 movel %fp@(-8),%d2 bool _wait, Watchdog_Interval _timeout, ISR_Level _level ) { _CORE_mutex_Seize_body( _the_mutex, _id, _wait, _timeout, _level ); 469fe: 508f addql #8,%sp } 46a00: 246e fffc moveal %fp@(-4),%a2 46a04: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00046a08 <_CORE_mutex_Surrender>: #else Objects_Id id __attribute__((unused)), CORE_mutex_API_mp_support_callout api_mutex_mp_support __attribute__((unused)) #endif ) { 46a08: 4e56 0000 linkw %fp,#0 46a0c: 2f0a movel %a2,%sp@- 46a0e: 246e 0008 moveal %fp@(8),%a2 Thread_Control *the_thread; Thread_Control *holder; #ifdef __RTEMS_STRICT_ORDER_MUTEX__ Chain_Node *first_node; #endif holder = the_mutex->holder; 46a12: 206a 005a moveal %a2@(90),%a0 * allowed when the mutex in quetion is FIFO or simple Priority * discipline. But Priority Ceiling or Priority Inheritance mutexes * must be released by the thread which acquired them. */ if ( the_mutex->Attributes.only_owner_release ) { 46a16: 4a2a 0044 tstb %a2@(68) 46a1a: 6712 beqs 46a2e <_CORE_mutex_Surrender+0x26> if ( !_Thread_Is_executing( holder ) ) 46a1c: b1f9 0005 f032 cmpal 5f032 <_Thread_Executing>,%a0 46a22: 670a beqs 46a2e <_CORE_mutex_Surrender+0x26> } } else the_mutex->lock = CORE_MUTEX_UNLOCKED; return CORE_MUTEX_STATUS_SUCCESSFUL; } 46a24: 246e fffc moveal %fp@(-4),%a2 * discipline. But Priority Ceiling or Priority Inheritance mutexes * must be released by the thread which acquired them. */ if ( the_mutex->Attributes.only_owner_release ) { if ( !_Thread_Is_executing( holder ) ) 46a28: 7003 moveq #3,%d0 } } else the_mutex->lock = CORE_MUTEX_UNLOCKED; return CORE_MUTEX_STATUS_SUCCESSFUL; } 46a2a: 4e5e unlk %fp 46a2c: 4e75 rts return CORE_MUTEX_STATUS_NOT_OWNER_OF_RESOURCE; } /* XXX already unlocked -- not right status */ if ( !the_mutex->nest_count ) 46a2e: 202a 0052 movel %a2@(82),%d0 46a32: 6768 beqs 46a9c <_CORE_mutex_Surrender+0x94> return CORE_MUTEX_STATUS_SUCCESSFUL; the_mutex->nest_count--; 46a34: 5380 subql #1,%d0 46a36: 2540 0052 movel %d0,%a2@(82) if ( the_mutex->nest_count != 0 ) { 46a3a: 6660 bnes 46a9c <_CORE_mutex_Surrender+0x94> <== NEVER TAKEN 46a3c: 202a 0046 movel %a2@(70),%d0 /* * Formally release the mutex before possibly transferring it to a * blocked thread. */ if ( _CORE_mutex_Is_inherit_priority( &the_mutex->Attributes ) || 46a40: 7202 moveq #2,%d1 46a42: b280 cmpl %d0,%d1 46a44: 6700 0084 beqw 46aca <_CORE_mutex_Surrender+0xc2> 46a48: 123c 0003 moveb #3,%d1 46a4c: b280 cmpl %d0,%d1 46a4e: 677a beqs 46aca <_CORE_mutex_Surrender+0xc2> } first_node = _Chain_Get_first_unprotected(&holder->lock_mutex); #endif holder->resource_count--; } the_mutex->holder = NULL; 46a50: 42aa 005a clrl %a2@(90) /* * Whether or not someone is waiting for the mutex, an * inherited priority must be lowered if this is the last * mutex (i.e. resource) this task has. */ if ( _CORE_mutex_Is_inherit_priority( &the_mutex->Attributes ) || 46a54: 7202 moveq #2,%d1 first_node = _Chain_Get_first_unprotected(&holder->lock_mutex); #endif holder->resource_count--; } the_mutex->holder = NULL; the_mutex->holder_id = 0; 46a56: 42aa 005e clrl %a2@(94) /* * Whether or not someone is waiting for the mutex, an * inherited priority must be lowered if this is the last * mutex (i.e. resource) this task has. */ if ( _CORE_mutex_Is_inherit_priority( &the_mutex->Attributes ) || 46a5a: b280 cmpl %d0,%d1 46a5c: 6748 beqs 46aa6 <_CORE_mutex_Surrender+0x9e> 46a5e: 123c 0003 moveb #3,%d1 46a62: b280 cmpl %d0,%d1 46a64: 6740 beqs 46aa6 <_CORE_mutex_Surrender+0x9e> /* * Now we check if another thread was waiting for this mutex. If so, * transfer the mutex to that thread. */ if ( ( the_thread = _Thread_queue_Dequeue( &the_mutex->Wait_queue ) ) ) { 46a66: 2f0a movel %a2,%sp@- 46a68: 4eb9 0004 81b8 jsr 481b8 <_Thread_queue_Dequeue> 46a6e: 588f addql #4,%sp 46a70: 2040 moveal %d0,%a0 46a72: 4a80 tstl %d0 46a74: 6700 0090 beqw 46b06 <_CORE_mutex_Surrender+0xfe> #endif { the_mutex->holder = the_thread; the_mutex->holder_id = the_thread->Object.id; the_mutex->nest_count = 1; 46a78: 7201 moveq #1,%d1 } else #endif { the_mutex->holder = the_thread; the_mutex->holder_id = the_thread->Object.id; 46a7a: 2568 0008 005e movel %a0@(8),%a2@(94) the_mutex->nest_count = 1; switch ( the_mutex->Attributes.discipline ) { 46a80: 202a 0046 movel %a2@(70),%d0 #endif { the_mutex->holder = the_thread; the_mutex->holder_id = the_thread->Object.id; the_mutex->nest_count = 1; 46a84: 2541 0052 movel %d1,%a2@(82) switch ( the_mutex->Attributes.discipline ) { 46a88: 123c 0002 moveb #2,%d1 } else #endif { the_mutex->holder = the_thread; 46a8c: 2548 005a movel %a0,%a2@(90) the_mutex->holder_id = the_thread->Object.id; the_mutex->nest_count = 1; switch ( the_mutex->Attributes.discipline ) { 46a90: b280 cmpl %d0,%d1 46a92: 6764 beqs 46af8 <_CORE_mutex_Surrender+0xf0> 46a94: 123c 0003 moveb #3,%d1 46a98: b280 cmpl %d0,%d1 46a9a: 6734 beqs 46ad0 <_CORE_mutex_Surrender+0xc8> } } else the_mutex->lock = CORE_MUTEX_UNLOCKED; return CORE_MUTEX_STATUS_SUCCESSFUL; } 46a9c: 246e fffc moveal %fp@(-4),%a2 } break; } } } else the_mutex->lock = CORE_MUTEX_UNLOCKED; 46aa0: 4280 clrl %d0 return CORE_MUTEX_STATUS_SUCCESSFUL; } 46aa2: 4e5e unlk %fp 46aa4: 4e75 rts _CORE_mutex_Is_priority_ceiling( &the_mutex->Attributes ) ) { #ifdef __RTEMS_STRICT_ORDER_MUTEX__ if(the_mutex->queue.priority_before != holder->current_priority) _Thread_Change_priority(holder,the_mutex->queue.priority_before,true); #endif if ( holder->resource_count == 0 && 46aa6: 4aa8 001c tstl %a0@(28) 46aaa: 66ba bnes 46a66 <_CORE_mutex_Surrender+0x5e> holder->real_priority != holder->current_priority ) { 46aac: 2028 0018 movel %a0@(24),%d0 46ab0: b0a8 0014 cmpl %a0@(20),%d0 46ab4: 67b0 beqs 46a66 <_CORE_mutex_Surrender+0x5e> _Thread_Change_priority( holder, holder->real_priority, true ); 46ab6: 4878 0001 pea 1 46aba: 2f00 movel %d0,%sp@- 46abc: 2f08 movel %a0,%sp@- 46abe: 4eb9 0004 789c jsr 4789c <_Thread_Change_priority> 46ac4: 4fef 000c lea %sp@(12),%sp 46ac8: 609c bras 46a66 <_CORE_mutex_Surrender+0x5e> the_mutex->nest_count++; return CORE_MUTEX_RELEASE_NOT_ORDER; } first_node = _Chain_Get_first_unprotected(&holder->lock_mutex); #endif holder->resource_count--; 46aca: 53a8 001c subql #1,%a0@(28) 46ace: 6080 bras 46a50 <_CORE_mutex_Surrender+0x48> case CORE_MUTEX_DISCIPLINES_PRIORITY_CEILING: #ifdef __RTEMS_STRICT_ORDER_MUTEX__ _Chain_Prepend_unprotected(&the_thread->lock_mutex,&the_mutex->queue.lock_queue); the_mutex->queue.priority_before = the_thread->current_priority; #endif the_thread->resource_count++; 46ad0: 52a8 001c addql #1,%a0@(28) if (the_mutex->Attributes.priority_ceiling < 46ad4: 202a 004a movel %a2@(74),%d0 the_thread->current_priority){ 46ad8: b0a8 0014 cmpl %a0@(20),%d0 46adc: 64be bccs 46a9c <_CORE_mutex_Surrender+0x94> _Thread_Change_priority( 46ade: 42a7 clrl %sp@- 46ae0: 2f00 movel %d0,%sp@- 46ae2: 2f08 movel %a0,%sp@- 46ae4: 4eb9 0004 789c jsr 4789c <_Thread_Change_priority> } } else the_mutex->lock = CORE_MUTEX_UNLOCKED; return CORE_MUTEX_STATUS_SUCCESSFUL; } 46aea: 246e fffc moveal %fp@(-4),%a2 the_mutex->queue.priority_before = the_thread->current_priority; #endif the_thread->resource_count++; if (the_mutex->Attributes.priority_ceiling < the_thread->current_priority){ _Thread_Change_priority( 46aee: 4fef 000c lea %sp@(12),%sp 46af2: 4280 clrl %d0 } } else the_mutex->lock = CORE_MUTEX_UNLOCKED; return CORE_MUTEX_STATUS_SUCCESSFUL; } 46af4: 4e5e unlk %fp 46af6: 4e75 rts 46af8: 246e fffc moveal %fp@(-4),%a2 case CORE_MUTEX_DISCIPLINES_PRIORITY_INHERIT: #ifdef __RTEMS_STRICT_ORDER_MUTEX__ _Chain_Prepend_unprotected(&the_thread->lock_mutex,&the_mutex->queue.lock_queue); the_mutex->queue.priority_before = the_thread->current_priority; #endif the_thread->resource_count++; 46afc: 4280 clrl %d0 46afe: 52a8 001c addql #1,%a0@(28) } } else the_mutex->lock = CORE_MUTEX_UNLOCKED; return CORE_MUTEX_STATUS_SUCCESSFUL; } 46b02: 4e5e unlk %fp 46b04: 4e75 rts } break; } } } else the_mutex->lock = CORE_MUTEX_UNLOCKED; 46b06: 7001 moveq #1,%d0 46b08: 2540 004e movel %d0,%a2@(78) return CORE_MUTEX_STATUS_SUCCESSFUL; } 46b0c: 246e fffc moveal %fp@(-4),%a2 } break; } } } else the_mutex->lock = CORE_MUTEX_UNLOCKED; 46b10: 4200 clrb %d0 return CORE_MUTEX_STATUS_SUCCESSFUL; } 46b12: 4e5e unlk %fp ... =============================================================================== 00046b6c <_CORE_semaphore_Surrender>: CORE_semaphore_Status _CORE_semaphore_Surrender( CORE_semaphore_Control *the_semaphore, Objects_Id id, CORE_semaphore_API_mp_support_callout api_semaphore_mp_support ) { 46b6c: 4e56 0000 linkw %fp,#0 46b70: 2f0a movel %a2,%sp@- 46b72: 246e 0008 moveal %fp@(8),%a2 ISR_Level level; CORE_semaphore_Status status; status = CORE_SEMAPHORE_STATUS_SUCCESSFUL; if ( (the_thread = _Thread_queue_Dequeue(&the_semaphore->Wait_queue)) ) { 46b76: 2f0a movel %a2,%sp@- 46b78: 4eb9 0004 81b8 jsr 481b8 <_Thread_queue_Dequeue> 46b7e: 588f addql #4,%sp 46b80: 4a80 tstl %d0 46b82: 670a beqs 46b8e <_CORE_semaphore_Surrender+0x22> status = CORE_SEMAPHORE_MAXIMUM_COUNT_EXCEEDED; _ISR_Enable( level ); } return status; } 46b84: 246e fffc moveal %fp@(-4),%a2 ISR_Level level; CORE_semaphore_Status status; status = CORE_SEMAPHORE_STATUS_SUCCESSFUL; if ( (the_thread = _Thread_queue_Dequeue(&the_semaphore->Wait_queue)) ) { 46b88: 4280 clrl %d0 status = CORE_SEMAPHORE_MAXIMUM_COUNT_EXCEEDED; _ISR_Enable( level ); } return status; } 46b8a: 4e5e unlk %fp 46b8c: 4e75 rts if ( !_Objects_Is_local_id( the_thread->Object.id ) ) (*api_semaphore_mp_support) ( the_thread, id ); #endif } else { _ISR_Disable( level ); 46b8e: 203c 0000 0700 movel #1792,%d0 46b94: 40c1 movew %sr,%d1 46b96: 8081 orl %d1,%d0 46b98: 46c0 movew %d0,%sr if ( the_semaphore->count < the_semaphore->Attributes.maximum_count ) 46b9a: 202a 0048 movel %a2@(72),%d0 46b9e: b0aa 0040 cmpl %a2@(64),%d0 46ba2: 6412 bccs 46bb6 <_CORE_semaphore_Surrender+0x4a> <== NEVER TAKEN the_semaphore->count += 1; 46ba4: 5280 addql #1,%d0 46ba6: 2540 0048 movel %d0,%a2@(72) 46baa: 4280 clrl %d0 else status = CORE_SEMAPHORE_MAXIMUM_COUNT_EXCEEDED; _ISR_Enable( level ); 46bac: 46c1 movew %d1,%sr } return status; } 46bae: 246e fffc moveal %fp@(-4),%a2 46bb2: 4e5e unlk %fp 46bb4: 4e75 rts (*api_semaphore_mp_support) ( the_thread, id ); #endif } else { _ISR_Disable( level ); if ( the_semaphore->count < the_semaphore->Attributes.maximum_count ) 46bb6: 7004 moveq #4,%d0 <== NOT EXECUTED the_semaphore->count += 1; else status = CORE_SEMAPHORE_MAXIMUM_COUNT_EXCEEDED; _ISR_Enable( level ); 46bb8: 46c1 movew %d1,%sr <== NOT EXECUTED 46bba: 60f2 bras 46bae <_CORE_semaphore_Surrender+0x42> <== NOT EXECUTED =============================================================================== 0004b9fc <_Chain_Initialize>: Chain_Control *the_chain, void *starting_address, size_t number_nodes, size_t node_size ) { 4b9fc: 4e56 0000 linkw %fp,#0 4ba00: 202e 0010 movel %fp@(16),%d0 4ba04: 2f0a movel %a2,%sp@- 4ba06: 246e 0008 moveal %fp@(8),%a2 */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Head( Chain_Control *the_chain ) { return (Chain_Node *) the_chain; 4ba0a: 224a moveal %a2,%a1 4ba0c: 2f02 movel %d2,%sp@- 4ba0e: 242e 0014 movel %fp@(20),%d2 Chain_Node *current; Chain_Node *next; count = number_nodes; current = _Chain_Head( the_chain ); the_chain->permanent_null = NULL; 4ba12: 42aa 0004 clrl %a2@(4) next = starting_address; while ( count-- ) { 4ba16: 4a80 tstl %d0 4ba18: 6718 beqs 4ba32 <_Chain_Initialize+0x36> <== NEVER TAKEN Chain_Node *next; count = number_nodes; current = _Chain_Head( the_chain ); the_chain->permanent_null = NULL; next = starting_address; 4ba1a: 206e 000c moveal %fp@(12),%a0 while ( count-- ) { current->next = next; next->previous = current; 4ba1e: 2149 0004 movel %a1,%a0@(4) 4ba22: 2208 movel %a0,%d1 4ba24: d282 addl %d2,%d1 current = next; next = (Chain_Node *) 4ba26: 5380 subql #1,%d0 count = number_nodes; current = _Chain_Head( the_chain ); the_chain->permanent_null = NULL; next = starting_address; while ( count-- ) { current->next = next; 4ba28: 2288 movel %a0,%a1@ next->previous = current; current = next; next = (Chain_Node *) 4ba2a: 2248 moveal %a0,%a1 count = number_nodes; current = _Chain_Head( the_chain ); the_chain->permanent_null = NULL; next = starting_address; while ( count-- ) { 4ba2c: 2041 moveal %d1,%a0 4ba2e: 4a80 tstl %d0 4ba30: 66ec bnes 4ba1e <_Chain_Initialize+0x22> next->previous = current; current = next; next = (Chain_Node *) _Addresses_Add_offset( (void *) next, node_size ); } current->next = _Chain_Tail( the_chain ); 4ba32: 200a movel %a2,%d0 4ba34: 5880 addql #4,%d0 4ba36: 2280 movel %d0,%a1@ the_chain->last = current; } 4ba38: 241f movel %sp@+,%d2 current = next; next = (Chain_Node *) _Addresses_Add_offset( (void *) next, node_size ); } current->next = _Chain_Tail( the_chain ); the_chain->last = current; 4ba3a: 2549 0008 movel %a1,%a2@(8) } 4ba3e: 245f moveal %sp@+,%a2 4ba40: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 000456d0 <_Event_Seize>: executing = _Thread_Executing; executing->Wait.return_code = RTEMS_SUCCESSFUL; api = executing->API_Extensions[ THREAD_API_RTEMS ]; _ISR_Disable( level ); 456d0: 203c 0000 0700 movel #1792,%d0 rtems_event_set event_in, rtems_option option_set, rtems_interval ticks, rtems_event_set *event_out ) { 456d6: 4e56 ffec linkw %fp,#-20 456da: 222e 0008 movel %fp@(8),%d1 456de: 48d7 043c moveml %d2-%d5/%a2,%sp@ rtems_event_set pending_events; ISR_Level level; RTEMS_API_Control *api; Thread_blocking_operation_States sync_state; executing = _Thread_Executing; 456e2: 2479 0005 f032 moveal 5f032 <_Thread_Executing>,%a2 rtems_event_set event_in, rtems_option option_set, rtems_interval ticks, rtems_event_set *event_out ) { 456e8: 242e 000c movel %fp@(12),%d2 456ec: 2a2e 0010 movel %fp@(16),%d5 ISR_Level level; RTEMS_API_Control *api; Thread_blocking_operation_States sync_state; executing = _Thread_Executing; executing->Wait.return_code = RTEMS_SUCCESSFUL; 456f0: 42aa 0034 clrl %a2@(52) rtems_event_set event_in, rtems_option option_set, rtems_interval ticks, rtems_event_set *event_out ) { 456f4: 226e 0014 moveal %fp@(20),%a1 Thread_blocking_operation_States sync_state; executing = _Thread_Executing; executing->Wait.return_code = RTEMS_SUCCESSFUL; api = executing->API_Extensions[ THREAD_API_RTEMS ]; 456f8: 206a 010a moveal %a2@(266),%a0 _ISR_Disable( level ); 456fc: 40c4 movew %sr,%d4 456fe: 8084 orl %d4,%d0 45700: 46c0 movew %d0,%sr pending_events = api->pending_events; 45702: 2610 movel %a0@,%d3 RTEMS_INLINE_ROUTINE rtems_event_set _Event_sets_Get( rtems_event_set the_event_set, rtems_event_set the_event_condition ) { return ( the_event_set & the_event_condition ); 45704: 2001 movel %d1,%d0 45706: c083 andl %d3,%d0 seized_events = _Event_sets_Get( pending_events, event_in ); if ( !_Event_sets_Is_empty( seized_events ) && 45708: 670c beqs 45716 <_Event_Seize+0x46> 4570a: b081 cmpl %d1,%d0 4570c: 6700 0084 beqw 45792 <_Event_Seize+0xc2> 45710: 0802 0001 btst #1,%d2 45714: 667c bnes 45792 <_Event_Seize+0xc2> <== ALWAYS TAKEN _ISR_Enable( level ); *event_out = seized_events; return; } if ( _Options_Is_no_wait( option_set ) ) { 45716: 0802 0000 btst #0,%d2 4571a: 6662 bnes 4577e <_Event_Seize+0xae> * set properly when we are marked as in the event critical section. * * NOTE: Since interrupts are disabled, this isn't that much of an * issue but better safe than sorry. */ executing->Wait.option = (uint32_t) option_set; 4571c: 2542 0030 movel %d2,%a2@(48) executing->Wait.count = (uint32_t) event_in; executing->Wait.return_argument = event_out; _Event_Sync_state = THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED; 45720: 7401 moveq #1,%d2 * * NOTE: Since interrupts are disabled, this isn't that much of an * issue but better safe than sorry. */ executing->Wait.option = (uint32_t) option_set; executing->Wait.count = (uint32_t) event_in; 45722: 2541 0024 movel %d1,%a2@(36) executing->Wait.return_argument = event_out; 45726: 2549 0028 movel %a1,%a2@(40) _Event_Sync_state = THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED; 4572a: 23c2 0005 f7c6 movel %d2,5f7c6 <_Event_Sync_state> _ISR_Enable( level ); 45730: 46c4 movew %d4,%sr if ( ticks ) { 45732: 4a85 tstl %d5 45734: 6672 bnes 457a8 <_Event_Seize+0xd8> NULL ); _Watchdog_Insert_ticks( &executing->Timer, ticks ); } _Thread_Set_state( executing, STATES_WAITING_FOR_EVENT ); 45736: 4878 0100 pea 100 4573a: 2f0a movel %a2,%sp@- 4573c: 4eb9 0004 8720 jsr 48720 <_Thread_Set_state> _ISR_Disable( level ); 45742: 203c 0000 0700 movel #1792,%d0 45748: 40c1 movew %sr,%d1 4574a: 8081 orl %d1,%d0 4574c: 46c0 movew %d0,%sr sync_state = _Event_Sync_state; _Event_Sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED; if ( sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) { 4574e: 7401 moveq #1,%d2 45750: 508f addql #8,%sp _Thread_Set_state( executing, STATES_WAITING_FOR_EVENT ); _ISR_Disable( level ); sync_state = _Event_Sync_state; 45752: 2039 0005 f7c6 movel 5f7c6 <_Event_Sync_state>,%d0 _Event_Sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED; 45758: 42b9 0005 f7c6 clrl 5f7c6 <_Event_Sync_state> if ( sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) { 4575e: b480 cmpl %d0,%d2 45760: 6700 00a4 beqw 45806 <_Event_Seize+0x136> * An interrupt completed the thread's blocking request. * The blocking thread was satisfied by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ _Thread_blocking_operation_Cancel( sync_state, executing, level ); 45764: 2d4a 000c movel %a2,%fp@(12) 45768: 2d41 0010 movel %d1,%fp@(16) } 4576c: 4cee 043c ffec moveml %fp@(-20),%d2-%d5/%a2 * An interrupt completed the thread's blocking request. * The blocking thread was satisfied by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ _Thread_blocking_operation_Cancel( sync_state, executing, level ); 45772: 2d40 0008 movel %d0,%fp@(8) } 45776: 4e5e unlk %fp * An interrupt completed the thread's blocking request. * The blocking thread was satisfied by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ _Thread_blocking_operation_Cancel( sync_state, executing, level ); 45778: 4ef9 0004 7834 jmp 47834 <_Thread_blocking_operation_Cancel> *event_out = seized_events; return; } if ( _Options_Is_no_wait( option_set ) ) { _ISR_Enable( level ); 4577e: 46c4 movew %d4,%sr executing->Wait.return_code = RTEMS_UNSATISFIED; 45780: 720d moveq #13,%d1 45782: 2541 0034 movel %d1,%a2@(52) * The blocking thread was satisfied by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ _Thread_blocking_operation_Cancel( sync_state, executing, level ); } 45786: 4cee 043c ffec moveml %fp@(-20),%d2-%d5/%a2 } if ( _Options_Is_no_wait( option_set ) ) { _ISR_Enable( level ); executing->Wait.return_code = RTEMS_UNSATISFIED; *event_out = seized_events; 4578c: 2280 movel %d0,%a1@ * The blocking thread was satisfied by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ _Thread_blocking_operation_Cancel( sync_state, executing, level ); } 4578e: 4e5e unlk %fp 45790: 4e75 rts pending_events = api->pending_events; seized_events = _Event_sets_Get( pending_events, event_in ); if ( !_Event_sets_Is_empty( seized_events ) && (seized_events == event_in || _Options_Is_any( option_set )) ) { api->pending_events = 45792: 2200 movel %d0,%d1 45794: 4681 notl %d1 45796: c283 andl %d3,%d1 45798: 2081 movel %d1,%a0@ _Event_sets_Clear( pending_events, seized_events ); _ISR_Enable( level ); 4579a: 46c4 movew %d4,%sr *event_out = seized_events; 4579c: 2280 movel %d0,%a1@ * The blocking thread was satisfied by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ _Thread_blocking_operation_Cancel( sync_state, executing, level ); } 4579e: 4cee 043c ffec moveml %fp@(-20),%d2-%d5/%a2 457a4: 4e5e unlk %fp 457a6: 4e75 rts _Event_Sync_state = THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED; _ISR_Enable( level ); if ( ticks ) { _Watchdog_Initialize( 457a8: 202a 0008 movel %a2@(8),%d0 Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; 457ac: 223c 0004 599c movel #285084,%d1 the_watchdog->id = id; 457b2: 2540 0068 movel %d0,%a2@(104) Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; 457b6: 2541 0064 movel %d1,%a2@(100) Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 457ba: 2545 0054 movel %d5,%a2@(84) Watchdog_Service_routine_entry routine, Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; 457be: 42aa 0050 clrl %a2@(80) the_watchdog->routine = routine; the_watchdog->id = id; the_watchdog->user_data = user_data; 457c2: 42aa 006c clrl %a2@(108) ) { the_watchdog->initial = units; _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 457c6: 486a 0048 pea %a2@(72) 457ca: 4879 0005 f050 pea 5f050 <_Watchdog_Ticks_chain> 457d0: 4eb9 0004 8f5c jsr 48f5c <_Watchdog_Insert> 457d6: 508f addql #8,%sp NULL ); _Watchdog_Insert_ticks( &executing->Timer, ticks ); } _Thread_Set_state( executing, STATES_WAITING_FOR_EVENT ); 457d8: 4878 0100 pea 100 457dc: 2f0a movel %a2,%sp@- 457de: 4eb9 0004 8720 jsr 48720 <_Thread_Set_state> _ISR_Disable( level ); 457e4: 203c 0000 0700 movel #1792,%d0 457ea: 40c1 movew %sr,%d1 457ec: 8081 orl %d1,%d0 457ee: 46c0 movew %d0,%sr sync_state = _Event_Sync_state; _Event_Sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED; if ( sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) { 457f0: 7401 moveq #1,%d2 457f2: 508f addql #8,%sp _Thread_Set_state( executing, STATES_WAITING_FOR_EVENT ); _ISR_Disable( level ); sync_state = _Event_Sync_state; 457f4: 2039 0005 f7c6 movel 5f7c6 <_Event_Sync_state>,%d0 _Event_Sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED; 457fa: 42b9 0005 f7c6 clrl 5f7c6 <_Event_Sync_state> if ( sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) { 45800: b480 cmpl %d0,%d2 45802: 6600 ff60 bnew 45764 <_Event_Seize+0x94> _ISR_Enable( level ); 45806: 46c1 movew %d1,%sr * The blocking thread was satisfied by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ _Thread_blocking_operation_Cancel( sync_state, executing, level ); } 45808: 4cee 043c ffec moveml %fp@(-20),%d2-%d5/%a2 4580e: 4e5e unlk %fp ... =============================================================================== 00045870 <_Event_Surrender>: api = the_thread->API_Extensions[ THREAD_API_RTEMS ]; option_set = (rtems_option) the_thread->Wait.option; _ISR_Disable( level ); 45870: 203c 0000 0700 movel #1792,%d0 */ void _Event_Surrender( Thread_Control *the_thread ) { 45876: 4e56 ffec linkw %fp,#-20 4587a: 48d7 043c moveml %d2-%d5/%a2,%sp@ 4587e: 246e 0008 moveal %fp@(8),%a2 rtems_event_set event_condition; rtems_event_set seized_events; rtems_option option_set; RTEMS_API_Control *api; api = the_thread->API_Extensions[ THREAD_API_RTEMS ]; 45882: 206a 010a moveal %a2@(266),%a0 option_set = (rtems_option) the_thread->Wait.option; 45886: 282a 0030 movel %a2@(48),%d4 _ISR_Disable( level ); 4588a: 40c3 movew %sr,%d3 4588c: 8083 orl %d3,%d0 4588e: 46c0 movew %d0,%sr pending_events = api->pending_events; event_condition = (rtems_event_set) the_thread->Wait.count; 45890: 222a 0024 movel %a2@(36),%d1 RTEMS_INLINE_ROUTINE rtems_event_set _Event_sets_Get( rtems_event_set the_event_set, rtems_event_set the_event_condition ) { return ( the_event_set & the_event_condition ); 45894: 2001 movel %d1,%d0 api = the_thread->API_Extensions[ THREAD_API_RTEMS ]; option_set = (rtems_option) the_thread->Wait.option; _ISR_Disable( level ); pending_events = api->pending_events; 45896: 2410 movel %a0@,%d2 45898: c082 andl %d2,%d0 seized_events = _Event_sets_Get( pending_events, event_condition ); /* * No events were seized in this operation */ if ( _Event_sets_Is_empty( seized_events ) ) { 4589a: 6778 beqs 45914 <_Event_Surrender+0xa4> /* * If we are in an ISR and sending to the current thread, then * we have a critical section issue to deal with. */ if ( _ISR_Is_in_progress() && 4589c: 2279 0005 f012 moveal 5f012 <_ISR_Nest_level>,%a1 458a2: 4a89 tstl %a1 458a4: 670a beqs 458b0 <_Event_Surrender+0x40> 458a6: b5f9 0005 f032 cmpal 5f032 <_Thread_Executing>,%a2 458ac: 6700 00a0 beqw 4594e <_Event_Surrender+0xde> } /* * Otherwise, this is a normal send to another thread */ if ( _States_Is_waiting_for_event( the_thread->current_state ) ) { 458b0: 2a2a 0010 movel %a2@(16),%d5 458b4: 0285 0000 0100 andil #256,%d5 458ba: 674c beqs 45908 <_Event_Surrender+0x98> if ( seized_events == event_condition || _Options_Is_any( option_set ) ) { 458bc: b081 cmpl %d1,%d0 458be: 6706 beqs 458c6 <_Event_Surrender+0x56> 458c0: 0804 0001 btst #1,%d4 458c4: 6742 beqs 45908 <_Event_Surrender+0x98> <== NEVER TAKEN api->pending_events = _Event_sets_Clear( pending_events, seized_events ); 458c6: 2200 movel %d0,%d1 458c8: 4681 notl %d1 458ca: c282 andl %d2,%d1 458cc: 2081 movel %d1,%a0@ the_thread->Wait.count = 0; *(rtems_event_set *)the_thread->Wait.return_argument = seized_events; 458ce: 206a 0028 moveal %a2@(40),%a0 * Otherwise, this is a normal send to another thread */ if ( _States_Is_waiting_for_event( the_thread->current_state ) ) { if ( seized_events == event_condition || _Options_Is_any( option_set ) ) { api->pending_events = _Event_sets_Clear( pending_events, seized_events ); the_thread->Wait.count = 0; 458d2: 42aa 0024 clrl %a2@(36) *(rtems_event_set *)the_thread->Wait.return_argument = seized_events; 458d6: 2080 movel %d0,%a0@ _ISR_Flash( level ); 458d8: 203c 0000 0700 movel #1792,%d0 458de: 46c3 movew %d3,%sr 458e0: 8083 orl %d3,%d0 458e2: 46c0 movew %d0,%sr if ( !_Watchdog_Is_active( &the_thread->Timer ) ) { 458e4: 7a02 moveq #2,%d5 458e6: baaa 0050 cmpl %a2@(80),%d5 458ea: 6734 beqs 45920 <_Event_Surrender+0xb0> _ISR_Enable( level ); 458ec: 46c3 movew %d3,%sr RTEMS_INLINE_ROUTINE void _Thread_Unblock ( Thread_Control *the_thread ) { _Thread_Clear_state( the_thread, STATES_BLOCKED ); 458ee: 2f3c 1003 fff8 movel #268697592,%sp@- 458f4: 2f0a movel %a2,%sp@- 458f6: 4eb9 0004 79e8 jsr 479e8 <_Thread_Clear_state> 458fc: 508f addql #8,%sp } return; } } _ISR_Enable( level ); } 458fe: 4cee 043c ffec moveml %fp@(-20),%d2-%d5/%a2 45904: 4e5e unlk %fp 45906: 4e75 rts _Thread_Unblock( the_thread ); } return; } } _ISR_Enable( level ); 45908: 46c3 movew %d3,%sr } 4590a: 4cee 043c ffec moveml %fp@(-20),%d2-%d5/%a2 45910: 4e5e unlk %fp 45912: 4e75 rts /* * No events were seized in this operation */ if ( _Event_sets_Is_empty( seized_events ) ) { _ISR_Enable( level ); 45914: 46c3 movew %d3,%sr } return; } } _ISR_Enable( level ); } 45916: 4cee 043c ffec moveml %fp@(-20),%d2-%d5/%a2 4591c: 4e5e unlk %fp 4591e: 4e75 rts RTEMS_INLINE_ROUTINE void _Watchdog_Deactivate( Watchdog_Control *the_watchdog ) { the_watchdog->state = WATCHDOG_REMOVE_IT; 45920: 7003 moveq #3,%d0 45922: 2540 0050 movel %d0,%a2@(80) if ( !_Watchdog_Is_active( &the_thread->Timer ) ) { _ISR_Enable( level ); _Thread_Unblock( the_thread ); } else { _Watchdog_Deactivate( &the_thread->Timer ); _ISR_Enable( level ); 45926: 46c3 movew %d3,%sr (void) _Watchdog_Remove( &the_thread->Timer ); 45928: 486a 0048 pea %a2@(72) 4592c: 4eb9 0004 90a4 jsr 490a4 <_Watchdog_Remove> 45932: 2f3c 1003 fff8 movel #268697592,%sp@- 45938: 2f0a movel %a2,%sp@- 4593a: 4eb9 0004 79e8 jsr 479e8 <_Thread_Clear_state> 45940: 4fef 000c lea %sp@(12),%sp } return; } } _ISR_Enable( level ); } 45944: 4cee 043c ffec moveml %fp@(-20),%d2-%d5/%a2 4594a: 4e5e unlk %fp 4594c: 4e75 rts * If we are in an ISR and sending to the current thread, then * we have a critical section issue to deal with. */ if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) && ((_Event_Sync_state == THREAD_BLOCKING_OPERATION_TIMEOUT) || 4594e: 2279 0005 f7c6 moveal 5f7c6 <_Event_Sync_state>,%a1 /* * If we are in an ISR and sending to the current thread, then * we have a critical section issue to deal with. */ if ( _ISR_Is_in_progress() && 45954: 7a02 moveq #2,%d5 45956: ba89 cmpl %a1,%d5 45958: 6710 beqs 4596a <_Event_Surrender+0xfa> <== NEVER TAKEN _Thread_Is_executing( the_thread ) && ((_Event_Sync_state == THREAD_BLOCKING_OPERATION_TIMEOUT) || (_Event_Sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED)) ) { 4595a: 2279 0005 f7c6 moveal 5f7c6 <_Event_Sync_state>,%a1 /* * If we are in an ISR and sending to the current thread, then * we have a critical section issue to deal with. */ if ( _ISR_Is_in_progress() && 45960: 1a3c 0001 moveb #1,%d5 45964: ba89 cmpl %a1,%d5 45966: 6600 ff48 bnew 458b0 <_Event_Surrender+0x40> _Thread_Is_executing( the_thread ) && ((_Event_Sync_state == THREAD_BLOCKING_OPERATION_TIMEOUT) || (_Event_Sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED)) ) { if ( seized_events == event_condition || _Options_Is_any(option_set) ) { 4596a: b081 cmpl %d1,%d0 4596c: 6706 beqs 45974 <_Event_Surrender+0x104> 4596e: 0804 0001 btst #1,%d4 45972: 671a beqs 4598e <_Event_Surrender+0x11e> <== NEVER TAKEN api->pending_events = _Event_sets_Clear( pending_events,seized_events ); 45974: 2200 movel %d0,%d1 45976: 4681 notl %d1 45978: c282 andl %d2,%d1 4597a: 2081 movel %d1,%a0@ the_thread->Wait.count = 0; *(rtems_event_set *)the_thread->Wait.return_argument = seized_events; 4597c: 206a 0028 moveal %a2@(40),%a0 _Thread_Is_executing( the_thread ) && ((_Event_Sync_state == THREAD_BLOCKING_OPERATION_TIMEOUT) || (_Event_Sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED)) ) { if ( seized_events == event_condition || _Options_Is_any(option_set) ) { api->pending_events = _Event_sets_Clear( pending_events,seized_events ); the_thread->Wait.count = 0; 45980: 42aa 0024 clrl %a2@(36) *(rtems_event_set *)the_thread->Wait.return_argument = seized_events; 45984: 2080 movel %d0,%a0@ _Event_Sync_state = THREAD_BLOCKING_OPERATION_SATISFIED; 45986: 7003 moveq #3,%d0 45988: 23c0 0005 f7c6 movel %d0,5f7c6 <_Event_Sync_state> } _ISR_Enable( level ); 4598e: 46c3 movew %d3,%sr } return; } } _ISR_Enable( level ); } 45990: 4cee 043c ffec moveml %fp@(-20),%d2-%d5/%a2 45996: 4e5e unlk %fp ... =============================================================================== 0004599c <_Event_Timeout>: void _Event_Timeout( Objects_Id id, void *ignored ) { 4599c: 4e56 fffc linkw %fp,#-4 459a0: 2f03 movel %d3,%sp@- 459a2: 2f02 movel %d2,%sp@- Thread_Control *the_thread; Objects_Locations location; ISR_Level level; the_thread = _Thread_Get( id, &location ); 459a4: 486e fffc pea %fp@(-4) 459a8: 2f2e 0008 movel %fp@(8),%sp@- 459ac: 4eb9 0004 7de4 jsr 47de4 <_Thread_Get> switch ( location ) { 459b2: 508f addql #8,%sp 459b4: 4aae fffc tstl %fp@(-4) 459b8: 6642 bnes 459fc <_Event_Timeout+0x60> <== NEVER TAKEN * * If it is not satisfied, then it is "nothing happened" and * this is the "timeout" transition. After a request is satisfied, * a timeout is not allowed to occur. */ _ISR_Disable( level ); 459ba: 223c 0000 0700 movel #1792,%d1 459c0: 40c2 movew %sr,%d2 459c2: 8282 orl %d2,%d1 459c4: 46c1 movew %d1,%sr _ISR_Enable( level ); return; } #endif the_thread->Wait.count = 0; 459c6: 2040 moveal %d0,%a0 459c8: 42a8 0024 clrl %a0@(36) if ( _Thread_Is_executing( the_thread ) ) { 459cc: b0b9 0005 f032 cmpl 5f032 <_Thread_Executing>,%d0 459d2: 6734 beqs 45a08 <_Event_Timeout+0x6c> if ( _Event_Sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) _Event_Sync_state = THREAD_BLOCKING_OPERATION_TIMEOUT; } the_thread->Wait.return_code = RTEMS_TIMEOUT; 459d4: 7606 moveq #6,%d3 459d6: 2040 moveal %d0,%a0 459d8: 2143 0034 movel %d3,%a0@(52) _ISR_Enable( level ); 459dc: 46c2 movew %d2,%sr 459de: 2f3c 1003 fff8 movel #268697592,%sp@- 459e4: 2f00 movel %d0,%sp@- 459e6: 4eb9 0004 79e8 jsr 479e8 <_Thread_Clear_state> */ RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void ) { RTEMS_COMPILER_MEMORY_BARRIER(); _Thread_Dispatch_disable_level -= 1; 459ec: 508f addql #8,%sp 459ee: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 459f4: 5380 subql #1,%d0 459f6: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> case OBJECTS_REMOTE: /* impossible */ #endif case OBJECTS_ERROR: break; } } 459fc: 242e fff4 movel %fp@(-12),%d2 45a00: 262e fff8 movel %fp@(-8),%d3 45a04: 4e5e unlk %fp 45a06: 4e75 rts } #endif the_thread->Wait.count = 0; if ( _Thread_Is_executing( the_thread ) ) { if ( _Event_Sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) 45a08: 2239 0005 f7c6 movel 5f7c6 <_Event_Sync_state>,%d1 45a0e: 7601 moveq #1,%d3 45a10: b681 cmpl %d1,%d3 45a12: 66c0 bnes 459d4 <_Event_Timeout+0x38> _Event_Sync_state = THREAD_BLOCKING_OPERATION_TIMEOUT; } the_thread->Wait.return_code = RTEMS_TIMEOUT; 45a14: 7606 moveq #6,%d3 45a16: 2040 moveal %d0,%a0 #endif the_thread->Wait.count = 0; if ( _Thread_Is_executing( the_thread ) ) { if ( _Event_Sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) _Event_Sync_state = THREAD_BLOCKING_OPERATION_TIMEOUT; 45a18: 7202 moveq #2,%d1 } the_thread->Wait.return_code = RTEMS_TIMEOUT; 45a1a: 2143 0034 movel %d3,%a0@(52) #endif the_thread->Wait.count = 0; if ( _Thread_Is_executing( the_thread ) ) { if ( _Event_Sync_state == THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) _Event_Sync_state = THREAD_BLOCKING_OPERATION_TIMEOUT; 45a1e: 23c1 0005 f7c6 movel %d1,5f7c6 <_Event_Sync_state> } the_thread->Wait.return_code = RTEMS_TIMEOUT; _ISR_Enable( level ); 45a24: 46c2 movew %d2,%sr RTEMS_INLINE_ROUTINE void _Thread_Unblock ( Thread_Control *the_thread ) { _Thread_Clear_state( the_thread, STATES_BLOCKED ); 45a26: 2f3c 1003 fff8 movel #268697592,%sp@- 45a2c: 2f00 movel %d0,%sp@- 45a2e: 4eb9 0004 79e8 jsr 479e8 <_Thread_Clear_state> */ RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void ) { RTEMS_COMPILER_MEMORY_BARRIER(); _Thread_Dispatch_disable_level -= 1; 45a34: 508f addql #8,%sp 45a36: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 45a3c: 5380 subql #1,%d0 45a3e: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> 45a44: 60b6 bras 459fc <_Event_Timeout+0x60> ... =============================================================================== 0004bcc0 <_Heap_Allocate_aligned_with_boundary>: Heap_Control *heap, uintptr_t alloc_size, uintptr_t alignment, uintptr_t boundary ) { 4bcc0: 4e56 ffcc linkw %fp,#-52 4bcc4: 226e 000c moveal %fp@(12),%a1 4bcc8: 48d7 3cfc moveml %d2-%d7/%a2-%a5,%sp@ 4bccc: 246e 0008 moveal %fp@(8),%a2 Heap_Statistics *const stats = &heap->stats; Heap_Block *const free_list_tail = _Heap_Free_list_tail( heap ); Heap_Block *block = _Heap_Free_list_first( heap ); uintptr_t const block_size_floor = alloc_size + HEAP_BLOCK_HEADER_SIZE - HEAP_BLOCK_SIZE_OFFSET; 4bcd0: 2c09 movel %a1,%d6 4bcd2: 5886 addql #4,%d6 uintptr_t const page_size = heap->page_size; 4bcd4: 202a 0010 movel %a2@(16),%d0 Heap_Control *heap, uintptr_t alloc_size, uintptr_t alignment, uintptr_t boundary ) { 4bcd8: 222e 0010 movel %fp@(16),%d1 4bcdc: 282e 0014 movel %fp@(20),%d4 return &heap->free_list; } RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Free_list_first( Heap_Control *heap ) { return _Heap_Free_list_head(heap)->next; 4bce0: 206a 0008 moveal %a2@(8),%a0 Heap_Statistics *const stats = &heap->stats; Heap_Block *const free_list_tail = _Heap_Free_list_tail( heap ); Heap_Block *block = _Heap_Free_list_first( heap ); uintptr_t const block_size_floor = alloc_size + HEAP_BLOCK_HEADER_SIZE - HEAP_BLOCK_SIZE_OFFSET; uintptr_t const page_size = heap->page_size; 4bce4: 2d40 fffc movel %d0,%fp@(-4) uintptr_t alloc_begin = 0; uint32_t search_count = 0; if ( block_size_floor < alloc_size ) { 4bce8: bc89 cmpl %a1,%d6 4bcea: 6500 0146 bcsw 4be32 <_Heap_Allocate_aligned_with_boundary+0x172> /* Integer overflow occured */ return NULL; } if ( boundary != 0 ) { 4bcee: 4a84 tstl %d4 4bcf0: 6600 013c bnew 4be2e <_Heap_Allocate_aligned_with_boundary+0x16e> if ( alignment == 0 ) { alignment = page_size; } } while ( block != free_list_tail ) { 4bcf4: b1ca cmpal %a2,%a0 4bcf6: 6700 0152 beqw 4be4a <_Heap_Allocate_aligned_with_boundary+0x18a> 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; 4bcfa: 242e fffc movel %fp@(-4),%d2 uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET; uintptr_t alloc_begin = alloc_end - alloc_size; 4bcfe: 7a04 moveq #4,%d5 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; 4bd00: 5e82 addql #7,%d2 uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET; uintptr_t alloc_begin = alloc_end - alloc_size; 4bd02: 9a89 subl %a1,%d5 if ( alignment == 0 ) { alignment = page_size; } } while ( block != free_list_tail ) { 4bd04: 4283 clrl %d3 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; 4bd06: 2d42 fff8 movel %d2,%fp@(-8) uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET; uintptr_t alloc_begin = alloc_end - alloc_size; 4bd0a: 2d45 fff4 movel %d5,%fp@(-12) /* * 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 ) { 4bd0e: 2028 0004 movel %a0@(4),%d0 while ( block != free_list_tail ) { _HAssert( _Heap_Is_prev_used( block ) ); /* Statistics */ ++search_count; 4bd12: 5283 addql #1,%d3 /* * The HEAP_PREV_BLOCK_USED flag is always set in the block size_and_flag * field. Thus the value is about one unit larger than the real block * size. The greater than operator takes this into account. */ if ( block->size_and_flag > block_size_floor ) { 4bd14: b086 cmpl %d6,%d0 4bd16: 630e blss 4bd26 <_Heap_Allocate_aligned_with_boundary+0x66> if ( alignment == 0 ) { 4bd18: 4a81 tstl %d1 4bd1a: 6628 bnes 4bd44 <_Heap_Allocate_aligned_with_boundary+0x84> RTEMS_INLINE_ROUTINE uintptr_t _Heap_Alloc_area_of_block( const Heap_Block *block ) { return (uintptr_t) block + HEAP_BLOCK_HEADER_SIZE; 4bd1c: 2408 movel %a0,%d2 4bd1e: 5082 addql #8,%d2 boundary ); } } if ( alloc_begin != 0 ) { 4bd20: 4a82 tstl %d2 4bd22: 6600 00ee bnew 4be12 <_Heap_Allocate_aligned_with_boundary+0x152> break; } block = block->next; 4bd26: 2068 0008 moveal %a0@(8),%a0 if ( alignment == 0 ) { alignment = page_size; } } while ( block != free_list_tail ) { 4bd2a: b1ca cmpal %a2,%a0 4bd2c: 66e0 bnes 4bd0e <_Heap_Allocate_aligned_with_boundary+0x4e> 4bd2e: 4280 clrl %d0 uintptr_t alloc_size, uintptr_t alignment, uintptr_t boundary ) { Heap_Statistics *const stats = &heap->stats; 4bd30: b6aa 0044 cmpl %a2@(68),%d3 4bd34: 6304 blss 4bd3a <_Heap_Allocate_aligned_with_boundary+0x7a> ); } /* Statistics */ if ( stats->max_search < search_count ) { stats->max_search = search_count; 4bd36: 2543 0044 movel %d3,%a2@(68) } return (void *) alloc_begin; } 4bd3a: 4cee 3cfc ffcc moveml %fp@(-52),%d2-%d7/%a2-%a5 4bd40: 4e5e unlk %fp 4bd42: 4e75 rts 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; 4bd44: 7efe moveq #-2,%d7 4bd46: 4be8 0008 lea %a0@(8),%a5 4bd4a: c087 andl %d7,%d0 uintptr_t alignment, uintptr_t boundary ) { uintptr_t const page_size = heap->page_size; uintptr_t const min_block_size = heap->min_block_size; 4bd4c: 286a 0014 moveal %a2@(20),%a4 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; 4bd50: d088 addl %a0,%d0 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; 4bd52: 2a2e fff8 movel %fp@(-8),%d5 4bd56: 9a8c subl %a4,%d5 uintptr_t alloc_end = block_end + HEAP_BLOCK_SIZE_OFFSET; uintptr_t alloc_begin = alloc_end - alloc_size; 4bd58: 242e fff4 movel %fp@(-12),%d2 4bd5c: d480 addl %d0,%d2 RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_down( uintptr_t value, uintptr_t alignment ) { return value - (value % alignment); 4bd5e: 2e02 movel %d2,%d7 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; 4bd60: d085 addl %d5,%d0 4bd62: 4c41 7005 remul %d1,%d5,%d7 4bd66: 9485 subl %d5,%d2 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 ) { 4bd68: b480 cmpl %d0,%d2 4bd6a: 630a blss 4bd76 <_Heap_Allocate_aligned_with_boundary+0xb6> 4bd6c: 2a00 movel %d0,%d5 4bd6e: 4c41 5002 remul %d1,%d2,%d5 4bd72: 9082 subl %d2,%d0 4bd74: 2400 movel %d0,%d2 } alloc_end = alloc_begin + alloc_size; /* Ensure boundary constaint */ if ( boundary != 0 ) { 4bd76: 4a84 tstl %d4 4bd78: 676c beqs 4bde6 <_Heap_Allocate_aligned_with_boundary+0x126> /* 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; 4bd7a: 2002 movel %d2,%d0 4bd7c: d089 addl %a1,%d0 4bd7e: 2e00 movel %d0,%d7 4bd80: 4c44 7005 remul %d4,%d5,%d7 4bd84: 2e00 movel %d0,%d7 4bd86: 9e85 subl %d5,%d7 4bd88: 2a07 movel %d7,%d5 /* 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 ) { 4bd8a: be82 cmpl %d2,%d7 4bd8c: 6358 blss 4bde6 <_Heap_Allocate_aligned_with_boundary+0x126> 4bd8e: be80 cmpl %d0,%d7 4bd90: 6454 bccs 4bde6 <_Heap_Allocate_aligned_with_boundary+0x126> alloc_end = alloc_begin + alloc_size; /* Ensure boundary constaint */ if ( boundary != 0 ) { uintptr_t const boundary_floor = alloc_begin_floor + alloc_size; 4bd92: 2e0d movel %a5,%d7 4bd94: de89 addl %a1,%d7 uintptr_t boundary_line = _Heap_Align_down( alloc_end, boundary ); while ( alloc_begin < boundary_line && boundary_line < alloc_end ) { if ( boundary_line < boundary_floor ) { 4bd96: ba87 cmpl %d7,%d5 4bd98: 658c bcss 4bd26 <_Heap_Allocate_aligned_with_boundary+0x66> return 0; } alloc_begin = boundary_line - alloc_size; 4bd9a: 9a89 subl %a1,%d5 4bd9c: 2005 movel %d5,%d0 4bd9e: 2647 moveal %d7,%a3 4bda0: 4c41 0002 remul %d1,%d2,%d0 4bda4: 9a82 subl %d2,%d5 alloc_begin = _Heap_Align_down( alloc_begin, alignment ); alloc_end = alloc_begin + alloc_size; 4bda6: 2005 movel %d5,%d0 4bda8: d089 addl %a1,%d0 4bdaa: 2405 movel %d5,%d2 4bdac: 2e00 movel %d0,%d7 4bdae: 4c44 7005 remul %d4,%d5,%d7 4bdb2: 2e00 movel %d0,%d7 4bdb4: 9e85 subl %d5,%d7 4bdb6: 2a07 movel %d7,%d5 /* 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 ) { 4bdb8: be82 cmpl %d2,%d7 4bdba: 632a blss 4bde6 <_Heap_Allocate_aligned_with_boundary+0x126> 4bdbc: be80 cmpl %d0,%d7 4bdbe: 6426 bccs 4bde6 <_Heap_Allocate_aligned_with_boundary+0x126> if ( boundary_line < boundary_floor ) { 4bdc0: ba8b cmpl %a3,%d5 4bdc2: 6500 ff62 bcsw 4bd26 <_Heap_Allocate_aligned_with_boundary+0x66> return 0; } alloc_begin = boundary_line - alloc_size; 4bdc6: 9a89 subl %a1,%d5 4bdc8: 2005 movel %d5,%d0 4bdca: 4c41 0002 remul %d1,%d2,%d0 4bdce: 9a82 subl %d2,%d5 alloc_begin = _Heap_Align_down( alloc_begin, alignment ); alloc_end = alloc_begin + alloc_size; 4bdd0: 2005 movel %d5,%d0 4bdd2: d089 addl %a1,%d0 4bdd4: 2405 movel %d5,%d2 4bdd6: 2e00 movel %d0,%d7 4bdd8: 4c44 7005 remul %d4,%d5,%d7 4bddc: 2e00 movel %d0,%d7 4bdde: 9e85 subl %d5,%d7 4bde0: 2a07 movel %d7,%d5 /* 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 ) { 4bde2: be82 cmpl %d2,%d7 4bde4: 62d6 bhis 4bdbc <_Heap_Allocate_aligned_with_boundary+0xfc><== ALWAYS TAKEN 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 ) { 4bde6: b48d cmpl %a5,%d2 4bde8: 6500 ff3c bcsw 4bd26 <_Heap_Allocate_aligned_with_boundary+0x66> 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; 4bdec: 70f8 moveq #-8,%d0 4bdee: 9088 subl %a0,%d0 4bdf0: 2a40 moveal %d0,%a5 4bdf2: 2e02 movel %d2,%d7 4bdf4: dbc2 addal %d2,%a5 4bdf6: 202e fffc movel %fp@(-4),%d0 4bdfa: 4c40 7005 remul %d0,%d5,%d7 4bdfe: 9bc5 subal %d5,%a5 if ( free_size >= min_block_size || free_size == 0 ) { 4be00: bbcc cmpal %a4,%a5 4be02: 6400 ff1c bccw 4bd20 <_Heap_Allocate_aligned_with_boundary+0x60> 4be06: 4a8d tstl %a5 4be08: 6600 ff1c bnew 4bd26 <_Heap_Allocate_aligned_with_boundary+0x66> boundary ); } } if ( alloc_begin != 0 ) { 4be0c: 4a82 tstl %d2 4be0e: 6700 ff16 beqw 4bd26 <_Heap_Allocate_aligned_with_boundary+0x66> if ( alloc_begin != 0 ) { /* Statistics */ stats->searches += search_count; block = _Heap_Block_allocate( heap, block, alloc_begin, alloc_size ); 4be12: 2f09 movel %a1,%sp@- block = block->next; } if ( alloc_begin != 0 ) { /* Statistics */ stats->searches += search_count; 4be14: d7aa 004c addl %d3,%a2@(76) block = _Heap_Block_allocate( heap, block, alloc_begin, alloc_size ); 4be18: 2f02 movel %d2,%sp@- 4be1a: 2f08 movel %a0,%sp@- 4be1c: 2f0a movel %a2,%sp@- 4be1e: 4eb9 0004 6e94 jsr 46e94 <_Heap_Block_allocate> 4be24: 4fef 0010 lea %sp@(16),%sp 4be28: 2002 movel %d2,%d0 4be2a: 6000 ff04 braw 4bd30 <_Heap_Allocate_aligned_with_boundary+0x70> /* Integer overflow occured */ return NULL; } if ( boundary != 0 ) { if ( boundary < alloc_size ) { 4be2e: b889 cmpl %a1,%d4 4be30: 640c bccs 4be3e <_Heap_Allocate_aligned_with_boundary+0x17e> ); } /* Statistics */ if ( stats->max_search < search_count ) { stats->max_search = search_count; 4be32: 4280 clrl %d0 } return (void *) alloc_begin; } 4be34: 4cee 3cfc ffcc moveml %fp@(-52),%d2-%d7/%a2-%a5 4be3a: 4e5e unlk %fp 4be3c: 4e75 rts if ( boundary != 0 ) { if ( boundary < alloc_size ) { return NULL; } if ( alignment == 0 ) { 4be3e: 4a81 tstl %d1 4be40: 6600 feb2 bnew 4bcf4 <_Heap_Allocate_aligned_with_boundary+0x34> 4be44: 2200 movel %d0,%d1 4be46: 6000 feac braw 4bcf4 <_Heap_Allocate_aligned_with_boundary+0x34> alignment = page_size; } } while ( block != free_list_tail ) { 4be4a: 4283 clrl %d3 4be4c: 4280 clrl %d0 4be4e: 6000 fee0 braw 4bd30 <_Heap_Allocate_aligned_with_boundary+0x70> ... =============================================================================== 00046e94 <_Heap_Block_allocate>: Heap_Block *free_list_anchor = NULL; _HAssert( alloc_area_begin <= alloc_begin ); if ( _Heap_Is_free( block ) ) { 46e94: 70fe moveq #-2,%d0 Heap_Control *heap, Heap_Block *block, uintptr_t alloc_begin, uintptr_t alloc_size ) { 46e96: 4e56 ffe0 linkw %fp,#-32 46e9a: 222e 0010 movel %fp@(16),%d1 RTEMS_INLINE_ROUTINE uintptr_t _Heap_Alloc_area_of_block( const Heap_Block *block ) { return (uintptr_t) block + HEAP_BLOCK_HEADER_SIZE; 46e9e: 2041 moveal %d1,%a0 46ea0: 5188 subql #8,%a0 46ea2: 48d7 3c3c moveml %d2-%d5/%a2-%a5,%sp@ 46ea6: 246e 000c moveal %fp@(12),%a2 Heap_Block *free_list_anchor = NULL; _HAssert( alloc_area_begin <= alloc_begin ); if ( _Heap_Is_free( block ) ) { 46eaa: 7601 moveq #1,%d3 ) { Heap_Statistics *const stats = &heap->stats; uintptr_t const alloc_area_begin = _Heap_Alloc_area_of_block( block ); uintptr_t const alloc_area_offset = alloc_begin - alloc_area_begin; 46eac: 2848 moveal %a0,%a4 46eae: 240a movel %a2,%d2 46eb0: 99ca subal %a2,%a4 Heap_Block *free_list_anchor = NULL; _HAssert( alloc_area_begin <= alloc_begin ); if ( _Heap_Is_free( block ) ) { 46eb2: c0aa 0004 andl %a2@(4),%d0 Heap_Control *heap, Heap_Block *block, uintptr_t alloc_begin, uintptr_t alloc_size ) { 46eb6: 266e 0008 moveal %fp@(8),%a3 Heap_Block *free_list_anchor = NULL; _HAssert( alloc_area_begin <= alloc_begin ); if ( _Heap_Is_free( block ) ) { 46eba: c6b2 0804 andl %a2@(00000004,%d0:l),%d3 Heap_Control *heap, Heap_Block *block, uintptr_t alloc_begin, uintptr_t alloc_size ) { 46ebe: 2a2e 0014 movel %fp@(20),%d5 Heap_Block *free_list_anchor = NULL; _HAssert( alloc_area_begin <= alloc_begin ); if ( _Heap_Is_free( block ) ) { 46ec2: 4a03 tstb %d3 46ec4: 6600 00aa bnew 46f70 <_Heap_Block_allocate+0xdc> free_list_anchor = block->prev; _Heap_Free_list_remove( block ); /* Statistics */ --stats->free_blocks; 46ec8: 53ab 0038 subql #1,%a3@(56) ++stats->used_blocks; stats->free_size -= _Heap_Block_size( block ); 46ecc: 76fe moveq #-2,%d3 _Heap_Free_list_remove( block ); /* Statistics */ --stats->free_blocks; ++stats->used_blocks; 46ece: 52ab 0040 addql #1,%a3@(64) return _Heap_Free_list_tail(heap)->prev; } RTEMS_INLINE_ROUTINE void _Heap_Free_list_remove( Heap_Block *block ) { Heap_Block *next = block->next; 46ed2: 202a 0008 movel %a2@(8),%d0 Heap_Block *prev = block->prev; prev->next = next; next->prev = prev; 46ed6: 2a40 moveal %d0,%a5 Heap_Block *free_list_anchor = NULL; _HAssert( alloc_area_begin <= alloc_begin ); if ( _Heap_Is_free( block ) ) { free_list_anchor = block->prev; 46ed8: 226a 000c moveal %a2@(12),%a1 _Heap_Free_list_remove( block ); /* Statistics */ --stats->free_blocks; ++stats->used_blocks; stats->free_size -= _Heap_Block_size( block ); 46edc: c6aa 0004 andl %a2@(4),%d3 RTEMS_INLINE_ROUTINE void _Heap_Free_list_remove( Heap_Block *block ) { Heap_Block *next = block->next; Heap_Block *prev = block->prev; prev->next = next; 46ee0: 2340 0008 movel %d0,%a1@(8) } else { free_list_anchor = _Heap_Free_list_head( heap ); } if ( alloc_area_offset < heap->page_size ) { 46ee4: 202b 0010 movel %a3@(16),%d0 _Heap_Free_list_remove( block ); /* Statistics */ --stats->free_blocks; ++stats->used_blocks; stats->free_size -= _Heap_Block_size( block ); 46ee8: 97ab 0030 subl %d3,%a3@(48) next->prev = prev; 46eec: 2b49 000c movel %a1,%a5@(12) } else { free_list_anchor = _Heap_Free_list_head( heap ); } if ( alloc_area_offset < heap->page_size ) { 46ef0: b08c cmpl %a4,%d0 46ef2: 6200 0088 bhiw 46f7c <_Heap_Block_allocate+0xe8> - 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; 46ef6: 262a 0004 movel %a2@(4),%d3 RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_of_alloc_area( uintptr_t alloc_begin, uintptr_t page_size ) { return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size ) 46efa: 4c40 1004 remul %d0,%d4,%d1 _HAssert( new_block_size >= heap->min_block_size ); /* Statistics */ stats->free_size += block_size; if ( _Heap_Is_prev_used( block ) ) { 46efe: 7201 moveq #1,%d1 46f00: 91c4 subal %d4,%a0 _Heap_Block_of_alloc_area( alloc_begin, heap->page_size ); uintptr_t const new_block_begin = (uintptr_t) new_block; uintptr_t const new_block_size = block_end - new_block_begin; block_end = new_block_begin; block_size = block_end - block_begin; 46f02: 2008 movel %a0,%d0 46f04: 908a subl %a2,%d0 _HAssert( block_size >= heap->min_block_size ); _HAssert( new_block_size >= heap->min_block_size ); /* Statistics */ stats->free_size += block_size; 46f06: d1ab 0030 addl %d0,%a3@(48) if ( _Heap_Is_prev_used( block ) ) { 46f0a: c2aa 0004 andl %a2@(4),%d1 46f0e: 6700 0082 beqw 46f92 <_Heap_Block_allocate+0xfe> } block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED; new_block->prev_size = block_size; new_block->size_and_flag = new_block_size; 46f12: 78fe moveq #-2,%d4 _Heap_Free_list_insert_after( free_list_anchor, block ); free_list_anchor = block; /* Statistics */ ++stats->free_blocks; 46f14: 52ab 0038 addql #1,%a3@(56) 46f18: 220a movel %a2,%d1 RTEMS_INLINE_ROUTINE void _Heap_Free_list_insert_after( Heap_Block *block_before, Heap_Block *new_block ) { Heap_Block *next = block_before->next; 46f1a: 2869 0008 moveal %a1@(8),%a4 } block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED; new_block->prev_size = block_size; new_block->size_and_flag = new_block_size; 46f1e: c684 andl %d4,%d3 block = prev_block; block_begin = (uintptr_t) block; block_size += prev_block_size; } block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED; 46f20: 7801 moveq #1,%d4 46f22: 8880 orl %d0,%d4 new_block->next = next; 46f24: 254c 0008 movel %a4,%a2@(8) new_block->prev_size = block_size; new_block->size_and_flag = new_block_size; 46f28: d483 addl %d3,%d2 46f2a: 9488 subl %a0,%d2 new_block->prev = block_before; 46f2c: 2549 000c movel %a1,%a2@(12) block = prev_block; block_begin = (uintptr_t) block; block_size += prev_block_size; } block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED; 46f30: 2544 0004 movel %d4,%a2@(4) block_before->next = new_block; 46f34: 234a 0008 movel %a2,%a1@(8) next->prev = new_block; 46f38: 294a 000c movel %a2,%a4@(12) new_block->prev_size = block_size; new_block->size_and_flag = new_block_size; _Heap_Block_split( heap, new_block, free_list_anchor, alloc_size ); 46f3c: 2448 moveal %a0,%a2 block_size += prev_block_size; } block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED; new_block->prev_size = block_size; 46f3e: 2080 movel %d0,%a0@ new_block->size_and_flag = new_block_size; 46f40: 2142 0004 movel %d2,%a0@(4) _Heap_Block_split( heap, new_block, free_list_anchor, alloc_size ); 46f44: 2f05 movel %d5,%sp@- 46f46: 2f01 movel %d1,%sp@- 46f48: 2f08 movel %a0,%sp@- 46f4a: 2f0b movel %a3,%sp@- 46f4c: 4eb9 0004 6da0 jsr 46da0 <_Heap_Block_split> 46f52: 4fef 0010 lea %sp@(16),%sp alloc_size ); } /* Statistics */ if ( stats->min_free_size > stats->free_size ) { 46f56: 202b 0030 movel %a3@(48),%d0 Heap_Block *block, uintptr_t alloc_begin, uintptr_t alloc_size ) { Heap_Statistics *const stats = &heap->stats; 46f5a: b0ab 0034 cmpl %a3@(52),%d0 46f5e: 6404 bccs 46f64 <_Heap_Block_allocate+0xd0> ); } /* Statistics */ if ( stats->min_free_size > stats->free_size ) { stats->min_free_size = stats->free_size; 46f60: 2740 0034 movel %d0,%a3@(52) } return block; } 46f64: 200a movel %a2,%d0 46f66: 4cee 3c3c ffe0 moveml %fp@(-32),%d2-%d5/%a2-%a5 46f6c: 4e5e unlk %fp 46f6e: 4e75 rts stats->free_size -= _Heap_Block_size( block ); } else { free_list_anchor = _Heap_Free_list_head( heap ); } if ( alloc_area_offset < heap->page_size ) { 46f70: 202b 0010 movel %a3@(16),%d0 /* Statistics */ --stats->free_blocks; ++stats->used_blocks; stats->free_size -= _Heap_Block_size( block ); } else { free_list_anchor = _Heap_Free_list_head( heap ); 46f74: 224b moveal %a3,%a1 } if ( alloc_area_offset < heap->page_size ) { 46f76: b08c cmpl %a4,%d0 46f78: 6300 ff7c blsw 46ef6 <_Heap_Block_allocate+0x62> Heap_Block *block, Heap_Block *free_list_anchor, uintptr_t alloc_size ) { _Heap_Block_split( heap, block, free_list_anchor, alloc_size ); 46f7c: 4874 5800 pea %a4@(00000000,%d5:l) 46f80: 2f09 movel %a1,%sp@- 46f82: 2f0a movel %a2,%sp@- 46f84: 2f0b movel %a3,%sp@- 46f86: 4eb9 0004 6da0 jsr 46da0 <_Heap_Block_split> 46f8c: 4fef 0010 lea %sp@(16),%sp 46f90: 60c4 bras 46f56 <_Heap_Block_allocate+0xc2> RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Prev_block( const Heap_Block *block ) { return (Heap_Block *) ((uintptr_t) block - block->prev_size); 46f92: 95d2 subal %a2@,%a2 Heap_Block *const prev_block = _Heap_Prev_block( block ); uintptr_t const prev_block_size = _Heap_Block_size( prev_block ); block = prev_block; block_begin = (uintptr_t) block; block_size += prev_block_size; 46f94: 78fe moveq #-2,%d4 46f96: 2209 movel %a1,%d1 46f98: c8aa 0004 andl %a2@(4),%d4 46f9c: d084 addl %d4,%d0 } block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED; new_block->prev_size = block_size; new_block->size_and_flag = new_block_size; 46f9e: 78fe moveq #-2,%d4 46fa0: c684 andl %d4,%d3 block = prev_block; block_begin = (uintptr_t) block; block_size += prev_block_size; } block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED; 46fa2: 7801 moveq #1,%d4 46fa4: 8880 orl %d0,%d4 new_block->prev_size = block_size; new_block->size_and_flag = new_block_size; 46fa6: d483 addl %d3,%d2 46fa8: 9488 subl %a0,%d2 block = prev_block; block_begin = (uintptr_t) block; block_size += prev_block_size; } block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED; 46faa: 2544 0004 movel %d4,%a2@(4) new_block->prev_size = block_size; new_block->size_and_flag = new_block_size; _Heap_Block_split( heap, new_block, free_list_anchor, alloc_size ); 46fae: 2448 moveal %a0,%a2 block_size += prev_block_size; } block->size_and_flag = block_size | HEAP_PREV_BLOCK_USED; new_block->prev_size = block_size; 46fb0: 2080 movel %d0,%a0@ new_block->size_and_flag = new_block_size; 46fb2: 2142 0004 movel %d2,%a0@(4) _Heap_Block_split( heap, new_block, free_list_anchor, alloc_size ); 46fb6: 2f05 movel %d5,%sp@- 46fb8: 2f01 movel %d1,%sp@- 46fba: 2f08 movel %a0,%sp@- 46fbc: 2f0b movel %a3,%sp@- 46fbe: 4eb9 0004 6da0 jsr 46da0 <_Heap_Block_split> 46fc4: 4fef 0010 lea %sp@(16),%sp 46fc8: 608c bras 46f56 <_Heap_Block_allocate+0xc2> ... =============================================================================== 00050dc4 <_Heap_Extend>: Heap_Control *heap, void *area_begin_ptr, uintptr_t area_size, uintptr_t *amount_extended ) { 50dc4: 4e56 fff4 linkw %fp,#-12 50dc8: 206e 0008 moveal %fp@(8),%a0 50dcc: 202e 000c movel %fp@(12),%d0 Heap_Statistics *const stats = &heap->stats; uintptr_t const area_begin = (uintptr_t) area_begin_ptr; uintptr_t const heap_area_begin = heap->area_begin; uintptr_t const heap_area_end = heap->area_end; 50dd0: 2228 001c movel %a0@(28),%d1 uintptr_t const new_heap_area_end = heap_area_end + area_size; uintptr_t extend_size = 0; Heap_Block *const last_block = heap->last_block; 50dd4: 2268 0024 moveal %a0@(36),%a1 Heap_Control *heap, void *area_begin_ptr, uintptr_t area_size, uintptr_t *amount_extended ) { 50dd8: 48d7 040c moveml %d2-%d3/%a2,%sp@ Heap_Statistics *const stats = &heap->stats; uintptr_t const area_begin = (uintptr_t) area_begin_ptr; uintptr_t const heap_area_begin = heap->area_begin; 50ddc: b0a8 0018 cmpl %a0@(24),%d0 50de0: 6410 bccs 50df2 <_Heap_Extend+0x2e> * As noted, this code only supports (4). */ if ( area_begin >= heap_area_begin && area_begin < heap_area_end ) { return HEAP_EXTEND_ERROR; /* case 3 */ } else if ( area_begin != heap_area_end ) { 50de2: b280 cmpl %d0,%d1 50de4: 671c beqs 50e02 <_Heap_Extend+0x3e> 50de6: 7002 moveq #2,%d0 _Heap_Free( heap, (void *) _Heap_Alloc_area_of_block( last_block )); } return HEAP_EXTEND_SUCCESSFUL; } 50de8: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 50dee: 4e5e unlk %fp 50df0: 4e75 rts * 5. non-contiguous higher address (NOT SUPPORTED) * * As noted, this code only supports (4). */ if ( area_begin >= heap_area_begin && area_begin < heap_area_end ) { 50df2: b280 cmpl %d0,%d1 50df4: 63ec blss 50de2 <_Heap_Extend+0x1e> 50df6: 7001 moveq #1,%d0 _Heap_Free( heap, (void *) _Heap_Alloc_area_of_block( last_block )); } return HEAP_EXTEND_SUCCESSFUL; } 50df8: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 50dfe: 4e5e unlk %fp 50e00: 4e75 rts { Heap_Statistics *const stats = &heap->stats; uintptr_t const area_begin = (uintptr_t) area_begin_ptr; uintptr_t const heap_area_begin = heap->area_begin; uintptr_t const heap_area_end = heap->area_end; uintptr_t const new_heap_area_end = heap_area_end + area_size; 50e02: 2200 movel %d0,%d1 50e04: d2ae 0010 addl %fp@(16),%d1 * block and free it. */ heap->area_end = new_heap_area_end; extend_size = new_heap_area_end 50e08: 70f8 moveq #-8,%d0 50e0a: 9089 subl %a1,%d0 50e0c: d081 addl %d1,%d0 RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_down( uintptr_t value, uintptr_t alignment ) { return value - (value % alignment); 50e0e: 2600 movel %d0,%d3 50e10: 4c68 3002 0010 remul %a0@(16),%d2,%d3 * Currently only case 4 should make it to this point. * The basic trick is to make the extend area look like a used * block and free it. */ heap->area_end = new_heap_area_end; 50e16: 2141 001c movel %d1,%a0@(28) extend_size = new_heap_area_end - (uintptr_t) last_block - HEAP_BLOCK_HEADER_SIZE; extend_size = _Heap_Align_down( extend_size, heap->page_size ); *amount_extended = extend_size; 50e1a: 246e 0014 moveal %fp@(20),%a2 50e1e: 9082 subl %d2,%d0 50e20: 2480 movel %d0,%a2@ if( extend_size >= heap->min_block_size ) { 50e22: b0a8 0014 cmpl %a0@(20),%d0 50e26: 640c bccs 50e34 <_Heap_Extend+0x70> <== ALWAYS TAKEN /* Statistics */ stats->size += extend_size; ++stats->used_blocks; --stats->frees; /* Do not count subsequent call as actual free() */ _Heap_Free( heap, (void *) _Heap_Alloc_area_of_block( last_block )); 50e28: 4280 clrl %d0 <== NOT EXECUTED } return HEAP_EXTEND_SUCCESSFUL; } 50e2a: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 50e30: 4e5e unlk %fp 50e32: 4e75 rts uintptr_t size ) { uintptr_t flag = block->size_and_flag & HEAP_PREV_BLOCK_USED; block->size_and_flag = size | flag; 50e34: 7401 moveq #1,%d2 RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at( const Heap_Block *block, uintptr_t offset ) { return (Heap_Block *) ((uintptr_t) block + offset); 50e36: 45f1 0800 lea %a1@(00000000,%d0:l),%a2 uintptr_t size ) { uintptr_t flag = block->size_and_flag & HEAP_PREV_BLOCK_USED; block->size_and_flag = size | flag; 50e3a: c4a9 0004 andl %a1@(4),%d2 if( extend_size >= heap->min_block_size ) { Heap_Block *const new_last_block = _Heap_Block_at( last_block, extend_size ); _Heap_Block_set_size( last_block, extend_size ); new_last_block->size_and_flag = 50e3e: 2228 0020 movel %a0@(32),%d1 50e42: 928a subl %a2,%d1 50e44: 8480 orl %d0,%d2 ((uintptr_t) heap->first_block - (uintptr_t) new_last_block) | HEAP_PREV_BLOCK_USED; heap->last_block = new_last_block; 50e46: 214a 0024 movel %a2,%a0@(36) 50e4a: 2342 0004 movel %d2,%a1@(4) if( extend_size >= heap->min_block_size ) { Heap_Block *const new_last_block = _Heap_Block_at( last_block, extend_size ); _Heap_Block_set_size( last_block, extend_size ); new_last_block->size_and_flag = 50e4e: 7401 moveq #1,%d2 50e50: 8481 orl %d1,%d2 50e52: 2542 0004 movel %d2,%a2@(4) /* Statistics */ stats->size += extend_size; ++stats->used_blocks; --stats->frees; /* Do not count subsequent call as actual free() */ _Heap_Free( heap, (void *) _Heap_Alloc_area_of_block( last_block )); 50e56: 4869 0008 pea %a1@(8) | HEAP_PREV_BLOCK_USED; heap->last_block = new_last_block; /* Statistics */ stats->size += extend_size; 50e5a: d1a8 002c addl %d0,%a0@(44) ++stats->used_blocks; 50e5e: 52a8 0040 addql #1,%a0@(64) --stats->frees; /* Do not count subsequent call as actual free() */ 50e62: 53a8 0050 subql #1,%a0@(80) _Heap_Free( heap, (void *) _Heap_Alloc_area_of_block( last_block )); 50e66: 2f08 movel %a0,%sp@- 50e68: 4eb9 0004 b5e8 jsr 4b5e8 <_Heap_Free> 50e6e: 508f addql #8,%sp 50e70: 4280 clrl %d0 50e72: 60b6 bras 50e2a <_Heap_Extend+0x66> =============================================================================== 0004be54 <_Heap_Free>: #include #include #include bool _Heap_Free( Heap_Control *heap, void *alloc_begin_ptr ) { 4be54: 4e56 ffe4 linkw %fp,#-28 4be58: 202e 000c movel %fp@(12),%d0 RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_of_alloc_area( uintptr_t alloc_begin, uintptr_t page_size ) { return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size ) 4be5c: 2040 moveal %d0,%a0 4be5e: 5188 subql #8,%a0 4be60: 226e 0008 moveal %fp@(8),%a1 4be64: 4c69 0001 0010 remul %a1@(16),%d1,%d0 4be6a: 48d7 0c7c moveml %d2-%d6/%a2-%a3,%sp@ 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; 4be6e: 2029 0020 movel %a1@(32),%d0 RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_of_alloc_area( uintptr_t alloc_begin, uintptr_t page_size ) { return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size ) 4be72: 91c1 subal %d1,%a0 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 4be74: b088 cmpl %a0,%d0 4be76: 6200 00a0 bhiw 4bf18 <_Heap_Free+0xc4> && (uintptr_t) block <= (uintptr_t) heap->last_block; 4be7a: 2229 0024 movel %a1@(36),%d1 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 4be7e: b288 cmpl %a0,%d1 4be80: 6500 0096 bcsw 4bf18 <_Heap_Free+0xc4> - 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; 4be84: 2628 0004 movel %a0@(4),%d3 4be88: 74fe moveq #-2,%d2 4be8a: c483 andl %d3,%d2 RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at( const Heap_Block *block, uintptr_t offset ) { return (Heap_Block *) ((uintptr_t) block + offset); 4be8c: 45f0 2800 lea %a0@(00000000,%d2:l),%a2 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 4be90: b5c0 cmpal %d0,%a2 4be92: 6500 0084 bcsw 4bf18 <_Heap_Free+0xc4> 4be96: b5c1 cmpal %d1,%a2 4be98: 627e bhis 4bf18 <_Heap_Free+0xc4> <== NEVER TAKEN block->size_and_flag = size | flag; } RTEMS_INLINE_ROUTINE bool _Heap_Is_prev_used( const Heap_Block *block ) { return block->size_and_flag & HEAP_PREV_BLOCK_USED; 4be9a: 282a 0004 movel %a2@(4),%d4 if ( !_Heap_Is_block_in_heap( heap, next_block ) ) { _HAssert( false ); return false; } if ( !_Heap_Is_prev_used( next_block ) ) { 4be9e: 7a01 moveq #1,%d5 4bea0: ca84 andl %d4,%d5 4bea2: 4a05 tstb %d5 4bea4: 6772 beqs 4bf18 <_Heap_Free+0xc4> <== NEVER TAKEN - 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; 4bea6: 7afe moveq #-2,%d5 4bea8: c885 andl %d5,%d4 _HAssert( false ); return false; } next_block_size = _Heap_Block_size( next_block ); next_is_free = next_block != heap->last_block 4beaa: b5c1 cmpal %d1,%a2 4beac: 6700 00fa beqw 4bfa8 <_Heap_Free+0x154> #include #include #include bool _Heap_Free( Heap_Control *heap, void *alloc_begin_ptr ) 4beb0: 7a01 moveq #1,%d5 4beb2: 7c01 moveq #1,%d6 4beb4: cab2 4804 andl %a2@(00000004,%d4:l),%d5 4beb8: bd85 eorl %d6,%d5 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 ) ) { 4beba: 7c01 moveq #1,%d6 4bebc: c686 andl %d6,%d3 4bebe: 4a03 tstb %d3 4bec0: 6660 bnes 4bf22 <_Heap_Free+0xce> uintptr_t const prev_size = block->prev_size; 4bec2: 2610 movel %a0@,%d3 RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at( const Heap_Block *block, uintptr_t offset ) { return (Heap_Block *) ((uintptr_t) block + offset); 4bec4: 91c3 subal %d3,%a0 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 4bec6: b1c0 cmpal %d0,%a0 4bec8: 654e bcss 4bf18 <_Heap_Free+0xc4> <== NEVER TAKEN 4beca: b1c1 cmpal %d1,%a0 4becc: 624a bhis 4bf18 <_Heap_Free+0xc4> <== NEVER TAKEN 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) ) { 4bece: 7001 moveq #1,%d0 4bed0: c0a8 0004 andl %a0@(4),%d0 4bed4: 4a00 tstb %d0 4bed6: 6740 beqs 4bf18 <_Heap_Free+0xc4> <== NEVER TAKEN _HAssert( false ); return( false ); } if ( next_is_free ) { /* coalesce both */ 4bed8: 4a05 tstb %d5 4beda: 6700 00d2 beqw 4bfae <_Heap_Free+0x15a> } RTEMS_INLINE_ROUTINE void _Heap_Free_list_remove( Heap_Block *block ) { Heap_Block *next = block->next; Heap_Block *prev = block->prev; 4bede: 266a 000c moveal %a2@(12),%a3 uintptr_t const size = block_size + prev_size + next_block_size; _Heap_Free_list_remove( next_block ); stats->free_blocks -= 1; 4bee2: 53a9 0038 subql #1,%a1@(56) _HAssert( false ); return( false ); } if ( next_is_free ) { /* coalesce both */ uintptr_t const size = block_size + prev_size + next_block_size; 4bee6: d882 addl %d2,%d4 4bee8: d684 addl %d4,%d3 _Heap_Free_list_remove( next_block ); stats->free_blocks -= 1; prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED; 4beea: 7001 moveq #1,%d0 return _Heap_Free_list_tail(heap)->prev; } RTEMS_INLINE_ROUTINE void _Heap_Free_list_remove( Heap_Block *block ) { Heap_Block *next = block->next; 4beec: 246a 0008 moveal %a2@(8),%a2 4bef0: 8083 orl %d3,%d0 next_block = _Heap_Block_at( prev_block, size ); _HAssert(!_Heap_Is_prev_used( next_block)); next_block->prev_size = size; 4bef2: 2183 3800 movel %d3,%a0@(00000000,%d3:l) if ( next_is_free ) { /* coalesce both */ uintptr_t const size = block_size + prev_size + next_block_size; _Heap_Free_list_remove( next_block ); stats->free_blocks -= 1; prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED; 4bef6: 2140 0004 movel %d0,%a0@(4) Heap_Block *prev = block->prev; prev->next = next; next->prev = prev; 4befa: 254b 000c movel %a3,%a2@(12) RTEMS_INLINE_ROUTINE void _Heap_Free_list_remove( Heap_Block *block ) { Heap_Block *next = block->next; Heap_Block *prev = block->prev; prev->next = next; 4befe: 274a 0008 movel %a2,%a3@(8) } /* Statistics */ --stats->used_blocks; ++stats->frees; stats->free_size += block_size; 4bf02: d5a9 0030 addl %d2,%a1@(48) stats->max_free_blocks = stats->free_blocks; } } /* Statistics */ --stats->used_blocks; 4bf06: 53a9 0040 subql #1,%a1@(64) ++stats->frees; 4bf0a: 52a9 0050 addql #1,%a1@(80) stats->free_size += block_size; 4bf0e: 7001 moveq #1,%d0 return( true ); } 4bf10: 4cd7 0c7c moveml %sp@,%d2-%d6/%a2-%a3 4bf14: 4e5e unlk %fp 4bf16: 4e75 rts 4bf18: 4cd7 0c7c moveml %sp@,%d2-%d6/%a2-%a3 /* Statistics */ --stats->used_blocks; ++stats->frees; stats->free_size += block_size; return( true ); 4bf1c: 4200 clrb %d0 } 4bf1e: 4e5e unlk %fp 4bf20: 4e75 rts 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 */ 4bf22: 4a05 tstb %d5 4bf24: 6736 beqs 4bf5c <_Heap_Free+0x108> Heap_Block *old_block, Heap_Block *new_block ) { Heap_Block *next = old_block->next; Heap_Block *prev = old_block->prev; 4bf26: 266a 000c moveal %a2@(12),%a3 uintptr_t const size = block_size + next_block_size; 4bf2a: d882 addl %d2,%d4 _Heap_Free_list_replace( next_block, block ); block->size_and_flag = size | HEAP_PREV_BLOCK_USED; 4bf2c: 7001 moveq #1,%d0 RTEMS_INLINE_ROUTINE void _Heap_Free_list_replace( Heap_Block *old_block, Heap_Block *new_block ) { Heap_Block *next = old_block->next; 4bf2e: 246a 0008 moveal %a2@(8),%a2 4bf32: 8084 orl %d4,%d0 next_block = _Heap_Block_at( block, size ); next_block->prev_size = size; 4bf34: 2184 4800 movel %d4,%a0@(00000000,%d4:l) Heap_Block *prev = old_block->prev; new_block->next = next; new_block->prev = prev; 4bf38: 214b 000c movel %a3,%a0@(12) ) { Heap_Block *next = old_block->next; Heap_Block *prev = old_block->prev; new_block->next = next; 4bf3c: 214a 0008 movel %a2,%a0@(8) next_block->prev_size = size; } } else if ( next_is_free ) { /* coalesce next */ uintptr_t const size = block_size + next_block_size; _Heap_Free_list_replace( next_block, block ); block->size_and_flag = size | HEAP_PREV_BLOCK_USED; 4bf40: 2140 0004 movel %d0,%a0@(4) } /* Statistics */ --stats->used_blocks; ++stats->frees; stats->free_size += block_size; 4bf44: d5a9 0030 addl %d2,%a1@(48) stats->max_free_blocks = stats->free_blocks; } } /* Statistics */ --stats->used_blocks; 4bf48: 53a9 0040 subql #1,%a1@(64) ++stats->frees; 4bf4c: 52a9 0050 addql #1,%a1@(80) stats->free_size += block_size; 4bf50: 7001 moveq #1,%d0 new_block->prev = prev; next->prev = new_block; 4bf52: 2548 000c movel %a0,%a2@(12) prev->next = new_block; 4bf56: 2748 0008 movel %a0,%a3@(8) 4bf5a: 60b4 bras 4bf10 <_Heap_Free+0xbc> 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; 4bf5c: 7a01 moveq #1,%d5 next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED; 4bf5e: 7cfe moveq #-2,%d6 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; 4bf60: 8a82 orl %d2,%d5 RTEMS_INLINE_ROUTINE void _Heap_Free_list_insert_after( Heap_Block *block_before, Heap_Block *new_block ) { Heap_Block *next = block_before->next; 4bf62: 2669 0008 moveal %a1@(8),%a3 4bf66: 2145 0004 movel %d5,%a0@(4) next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED; 4bf6a: cdaa 0004 andl %d6,%a2@(4) next_block->prev_size = block_size; 4bf6e: 2482 movel %d2,%a2@ /* Statistics */ ++stats->free_blocks; 4bf70: 2029 0038 movel %a1@(56),%d0 4bf74: 5280 addql #1,%d0 new_block->next = next; 4bf76: 214b 0008 movel %a3,%a0@(8) new_block->prev = block_before; 4bf7a: 2149 000c movel %a1,%a0@(12) block_before->next = new_block; 4bf7e: 2348 0008 movel %a0,%a1@(8) next->prev = new_block; 4bf82: 2748 000c movel %a0,%a3@(12) 4bf86: 2340 0038 movel %d0,%a1@(56) #include #include bool _Heap_Free( Heap_Control *heap, void *alloc_begin_ptr ) { Heap_Statistics *const stats = &heap->stats; 4bf8a: b0a9 003c cmpl %a1@(60),%d0 4bf8e: 6300 ff72 blsw 4bf02 <_Heap_Free+0xae> } /* Statistics */ --stats->used_blocks; ++stats->frees; stats->free_size += block_size; 4bf92: d5a9 0030 addl %d2,%a1@(48) stats->max_free_blocks = stats->free_blocks; } } /* Statistics */ --stats->used_blocks; 4bf96: 53a9 0040 subql #1,%a1@(64) ++stats->frees; 4bf9a: 52a9 0050 addql #1,%a1@(80) next_block->prev_size = block_size; /* Statistics */ ++stats->free_blocks; if ( stats->max_free_blocks < stats->free_blocks ) { stats->max_free_blocks = stats->free_blocks; 4bf9e: 2340 003c movel %d0,%a1@(60) } /* Statistics */ --stats->used_blocks; ++stats->frees; stats->free_size += block_size; 4bfa2: 7001 moveq #1,%d0 4bfa4: 6000 ff6a braw 4bf10 <_Heap_Free+0xbc> _HAssert( false ); return false; } next_block_size = _Heap_Block_size( next_block ); next_is_free = next_block != heap->last_block 4bfa8: 4205 clrb %d5 4bfaa: 6000 ff0e braw 4beba <_Heap_Free+0x66> 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; 4bfae: d682 addl %d2,%d3 prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED; 4bfb0: 7a01 moveq #1,%d5 next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED; 4bfb2: 7cfe moveq #-2,%d6 next_block = _Heap_Block_at( prev_block, size ); _HAssert(!_Heap_Is_prev_used( next_block)); next_block->prev_size = size; } else { /* coalesce prev */ uintptr_t const size = block_size + prev_size; prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED; 4bfb4: 8a83 orl %d3,%d5 next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED; next_block->prev_size = size; 4bfb6: 2483 movel %d3,%a2@ } /* Statistics */ --stats->used_blocks; ++stats->frees; stats->free_size += block_size; 4bfb8: 7001 moveq #1,%d0 next_block = _Heap_Block_at( prev_block, size ); _HAssert(!_Heap_Is_prev_used( next_block)); next_block->prev_size = size; } else { /* coalesce prev */ uintptr_t const size = block_size + prev_size; prev_block->size_and_flag = size | HEAP_PREV_BLOCK_USED; 4bfba: 2145 0004 movel %d5,%a0@(4) next_block->size_and_flag &= ~HEAP_PREV_BLOCK_USED; 4bfbe: cdaa 0004 andl %d6,%a2@(4) } /* Statistics */ --stats->used_blocks; ++stats->frees; stats->free_size += block_size; 4bfc2: d5a9 0030 addl %d2,%a1@(48) stats->max_free_blocks = stats->free_blocks; } } /* Statistics */ --stats->used_blocks; 4bfc6: 53a9 0040 subql #1,%a1@(64) ++stats->frees; 4bfca: 52a9 0050 addql #1,%a1@(80) 4bfce: 6000 ff40 braw 4bf10 <_Heap_Free+0xbc> ... =============================================================================== 00050e74 <_Heap_Get_free_information>: void _Heap_Get_free_information( Heap_Control *the_heap, Heap_Information *info ) { 50e74: 4e56 fff4 linkw %fp,#-12 50e78: 48d7 0c04 moveml %d2/%a2-%a3,%sp@ 50e7c: 266e 0008 moveal %fp@(8),%a3 50e80: 246e 000c moveal %fp@(12),%a2 return &heap->free_list; } RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Free_list_first( Heap_Control *heap ) { return _Heap_Free_list_head(heap)->next; 50e84: 206b 0008 moveal %a3@(8),%a0 Heap_Block *the_block; Heap_Block *const tail = _Heap_Free_list_tail(the_heap); info->number = 0; 50e88: 4292 clrl %a2@ info->largest = 0; 50e8a: 42aa 0004 clrl %a2@(4) info->total = 0; 50e8e: 42aa 0008 clrl %a2@(8) for(the_block = _Heap_Free_list_first(the_heap); 50e92: b1cb cmpal %a3,%a0 50e94: 672e beqs 50ec4 <_Heap_Get_free_information+0x50><== NEVER TAKEN 50e96: 327c 0001 moveaw #1,%a1 50e9a: 4281 clrl %d1 - 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; 50e9c: 70fe moveq #-2,%d0 the_block != tail; the_block = the_block->next) 50e9e: 2409 movel %a1,%d2 50ea0: 5282 addql #1,%d2 50ea2: c0a8 0004 andl %a0@(4),%d0 /* As we always coalesce free blocks, prev block must have been used. */ _HAssert(_Heap_Is_prev_used(the_block)); info->number++; info->total += the_size; 50ea6: d280 addl %d0,%d1 if ( info->largest < the_size ) 50ea8: b0aa 0004 cmpl %a2@(4),%d0 50eac: 6304 blss 50eb2 <_Heap_Get_free_information+0x3e> info->largest = the_size; 50eae: 2540 0004 movel %d0,%a2@(4) info->largest = 0; info->total = 0; for(the_block = _Heap_Free_list_first(the_heap); the_block != tail; the_block = the_block->next) 50eb2: 2068 0008 moveal %a0@(8),%a0 info->number = 0; info->largest = 0; info->total = 0; for(the_block = _Heap_Free_list_first(the_heap); 50eb6: b1cb cmpal %a3,%a0 50eb8: 6704 beqs 50ebe <_Heap_Get_free_information+0x4a> 50eba: 2242 moveal %d2,%a1 50ebc: 60de bras 50e9c <_Heap_Get_free_information+0x28> 50ebe: 2541 0008 movel %d1,%a2@(8) 50ec2: 2489 movel %a1,%a2@ info->number++; info->total += the_size; if ( info->largest < the_size ) info->largest = the_size; } } 50ec4: 4cd7 0c04 moveml %sp@,%d2/%a2-%a3 50ec8: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00050ecc <_Heap_Get_information>: void _Heap_Get_information( Heap_Control *the_heap, Heap_Information_block *the_info ) { 50ecc: 4e56 fff4 linkw %fp,#-12 50ed0: 206e 0008 moveal %fp@(8),%a0 50ed4: 48d7 040c moveml %d2-%d3/%a2,%sp@ 50ed8: 246e 000c moveal %fp@(12),%a2 Heap_Block *the_block = the_heap->first_block; Heap_Block *const end = the_heap->last_block; 50edc: 2428 0024 movel %a0@(36),%d2 void _Heap_Get_information( Heap_Control *the_heap, Heap_Information_block *the_info ) { Heap_Block *the_block = the_heap->first_block; 50ee0: 2268 0020 moveal %a0@(32),%a1 Heap_Block *const end = the_heap->last_block; _HAssert(the_block->prev_size == the_heap->page_size); _HAssert(_Heap_Is_prev_used(the_block)); the_info->Free.number = 0; 50ee4: 4292 clrl %a2@ the_info->Free.total = 0; 50ee6: 42aa 0008 clrl %a2@(8) the_info->Free.largest = 0; 50eea: 42aa 0004 clrl %a2@(4) the_info->Used.number = 0; 50eee: 42aa 000c clrl %a2@(12) the_info->Used.total = 0; 50ef2: 42aa 0014 clrl %a2@(20) the_info->Used.largest = 0; 50ef6: 42aa 0010 clrl %a2@(16) while ( the_block != end ) { 50efa: b489 cmpl %a1,%d2 50efc: 6746 beqs 50f44 <_Heap_Get_information+0x78> <== NEVER TAKEN uintptr_t const the_size = _Heap_Block_size(the_block); Heap_Block *const next_block = _Heap_Block_at(the_block, the_size); Heap_Information *info; if ( _Heap_Is_prev_used(next_block) ) info = &the_info->Used; 50efe: 260a movel %a2,%d3 50f00: 0683 0000 000c addil #12,%d3 the_info->Free.largest = 0; the_info->Used.number = 0; the_info->Used.total = 0; the_info->Used.largest = 0; while ( the_block != end ) { 50f06: 2229 0004 movel %a1@(4),%d1 50f0a: 70fe moveq #-2,%d0 uintptr_t const the_size = _Heap_Block_size(the_block); Heap_Block *const next_block = _Heap_Block_at(the_block, the_size); Heap_Information *info; if ( _Heap_Is_prev_used(next_block) ) 50f0c: 204a moveal %a2,%a0 50f0e: c081 andl %d1,%d0 RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at( const Heap_Block *block, uintptr_t offset ) { return (Heap_Block *) ((uintptr_t) block + offset); 50f10: d3c0 addal %d0,%a1 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; 50f12: 2229 0004 movel %a1@(4),%d1 50f16: 0801 0000 btst #0,%d1 50f1a: 6702 beqs 50f1e <_Heap_Get_information+0x52> 50f1c: 2043 moveal %d3,%a0 info = &the_info->Used; else info = &the_info->Free; info->number++; 50f1e: 5290 addql #1,%a0@ info->total += the_size; 50f20: d1a8 0008 addl %d0,%a0@(8) if ( info->largest < the_size ) 50f24: b0a8 0004 cmpl %a0@(4),%d0 50f28: 6304 blss 50f2e <_Heap_Get_information+0x62> info->largest = the_size; 50f2a: 2140 0004 movel %d0,%a0@(4) the_info->Free.largest = 0; the_info->Used.number = 0; the_info->Used.total = 0; the_info->Used.largest = 0; while ( the_block != end ) { 50f2e: b3c2 cmpal %d2,%a1 50f30: 66d8 bnes 50f0a <_Heap_Get_information+0x3e> 50f32: 202a 0014 movel %a2@(20),%d0 50f36: 5080 addql #8,%d0 /* * Handle the last dummy block. Don't consider this block to be * "used" as client never allocated it. Make 'Used.total' contain this * blocks' overhead though. */ the_info->Used.total += HEAP_BLOCK_HEADER_SIZE; 50f38: 2540 0014 movel %d0,%a2@(20) } 50f3c: 4cd7 040c moveml %sp@,%d2-%d3/%a2 50f40: 4e5e unlk %fp 50f42: 4e75 rts the_info->Free.largest = 0; the_info->Used.number = 0; the_info->Used.total = 0; the_info->Used.largest = 0; while ( the_block != end ) { 50f44: 7008 moveq #8,%d0 <== NOT EXECUTED /* * Handle the last dummy block. Don't consider this block to be * "used" as client never allocated it. Make 'Used.total' contain this * blocks' overhead though. */ the_info->Used.total += HEAP_BLOCK_HEADER_SIZE; 50f46: 2540 0014 movel %d0,%a2@(20) <== NOT EXECUTED } 50f4a: 4cd7 040c moveml %sp@,%d2-%d3/%a2 <== NOT EXECUTED 50f4e: 4e5e unlk %fp <== NOT EXECUTED ... =============================================================================== 00046c60 <_Heap_Initialize>: Heap_Control *heap, void *heap_area_begin_ptr, uintptr_t heap_area_size, uintptr_t page_size ) { 46c60: 4e56 ffe8 linkw %fp,#-24 46c64: 206e 0008 moveal %fp@(8),%a0 46c68: 48d7 0c3c moveml %d2-%d5/%a2-%a3,%sp@ 46c6c: 226e 000c moveal %fp@(12),%a1 46c70: 242e 0010 movel %fp@(16),%d2 46c74: 222e 0014 movel %fp@(20),%d1 uintptr_t min_block_size = 0; uintptr_t overhead = 0; Heap_Block *first_block = NULL; Heap_Block *last_block = NULL; if ( page_size == 0 ) { 46c78: 6600 00ce bnew 46d48 <_Heap_Initialize+0xe8> ) { Heap_Statistics *const stats = &heap->stats; uintptr_t const heap_area_begin = (uintptr_t) heap_area_begin_ptr; uintptr_t const heap_area_end = heap_area_begin + heap_area_size; uintptr_t alloc_area_begin = heap_area_begin + HEAP_BLOCK_HEADER_SIZE; 46c7c: 2009 movel %a1,%d0 46c7e: 5080 addql #8,%d0 uintptr_t min_block_size = 0; uintptr_t overhead = 0; Heap_Block *first_block = NULL; Heap_Block *last_block = NULL; if ( page_size == 0 ) { 46c80: 123c 0004 moveb #4,%d1 RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_up( uintptr_t value, uintptr_t alignment ) { uintptr_t remainder = value % alignment; 46c84: 2a00 movel %d0,%d5 46c86: 7610 moveq #16,%d3 46c88: 4c41 5004 remul %d1,%d4,%d5 if ( remainder != 0 ) { 46c8c: 4a84 tstl %d4 46c8e: 6704 beqs 46c94 <_Heap_Initialize+0x34> <== ALWAYS TAKEN return value - remainder + alignment; 46c90: d081 addl %d1,%d0 46c92: 9084 subl %d4,%d0 uintptr_t page_size ) { Heap_Statistics *const stats = &heap->stats; uintptr_t const heap_area_begin = (uintptr_t) heap_area_begin_ptr; uintptr_t const heap_area_end = heap_area_begin + heap_area_size; 46c94: 2809 movel %a1,%d4 46c96: d882 addl %d2,%d4 overhead = HEAP_BLOCK_HEADER_SIZE + (first_block_begin - heap_area_begin); first_block_size = heap_area_size - overhead; first_block_size = _Heap_Align_down ( first_block_size, page_size ); alloc_area_size = first_block_size - HEAP_BLOCK_HEADER_SIZE; if ( 46c98: b889 cmpl %a1,%d4 46c9a: 6500 00bc bcsw 46d58 <_Heap_Initialize+0xf8> } min_block_size = _Heap_Align_up( sizeof( Heap_Block ), page_size ); alloc_area_begin = _Heap_Align_up( alloc_area_begin, page_size ); first_block_begin = alloc_area_begin - HEAP_BLOCK_HEADER_SIZE; overhead = HEAP_BLOCK_HEADER_SIZE + (first_block_begin - heap_area_begin); 46c9e: 2a00 movel %d0,%d5 46ca0: 2440 moveal %d0,%a2 46ca2: 9a89 subl %a1,%d5 46ca4: 518a subql #8,%a2 first_block_size = heap_area_size - overhead; first_block_size = _Heap_Align_down ( first_block_size, page_size ); alloc_area_size = first_block_size - HEAP_BLOCK_HEADER_SIZE; if ( 46ca6: ba82 cmpl %d2,%d5 46ca8: 6400 00ae bccw 46d58 <_Heap_Initialize+0xf8> min_block_size = _Heap_Align_up( sizeof( Heap_Block ), page_size ); alloc_area_begin = _Heap_Align_up( alloc_area_begin, page_size ); first_block_begin = alloc_area_begin - HEAP_BLOCK_HEADER_SIZE; overhead = HEAP_BLOCK_HEADER_SIZE + (first_block_begin - heap_area_begin); first_block_size = heap_area_size - overhead; 46cac: 9485 subl %d5,%d2 RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_down( uintptr_t value, uintptr_t alignment ) { return value - (value % alignment); 46cae: 2a02 movel %d2,%d5 46cb0: 4c41 5000 remul %d1,%d0,%d5 46cb4: 9480 subl %d0,%d2 first_block_size = _Heap_Align_down ( first_block_size, page_size ); alloc_area_size = first_block_size - HEAP_BLOCK_HEADER_SIZE; if ( 46cb6: b483 cmpl %d3,%d2 46cb8: 6500 009e bcsw 46d58 <_Heap_Initialize+0xf8> } /* First block */ first_block = (Heap_Block *) first_block_begin; first_block->prev_size = page_size; first_block->size_and_flag = first_block_size | HEAP_PREV_BLOCK_USED; 46cbc: 7a01 moveq #1,%d5 RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at( const Heap_Block *block, uintptr_t offset ) { return (Heap_Block *) ((uintptr_t) block + offset); 46cbe: 47f2 2800 lea %a2@(00000000,%d2:l),%a3 alloc_area_begin = _Heap_Align_up( alloc_area_begin, page_size ); first_block_begin = alloc_area_begin - HEAP_BLOCK_HEADER_SIZE; overhead = HEAP_BLOCK_HEADER_SIZE + (first_block_begin - heap_area_begin); first_block_size = heap_area_size - overhead; first_block_size = _Heap_Align_down ( first_block_size, page_size ); alloc_area_size = first_block_size - HEAP_BLOCK_HEADER_SIZE; 46cc2: 2002 movel %d2,%d0 46cc4: 5180 subql #8,%d0 } /* First block */ first_block = (Heap_Block *) first_block_begin; first_block->prev_size = page_size; first_block->size_and_flag = first_block_size | HEAP_PREV_BLOCK_USED; 46cc6: 8a82 orl %d2,%d5 return 0; } /* First block */ first_block = (Heap_Block *) first_block_begin; first_block->prev_size = page_size; 46cc8: 2481 movel %d1,%a2@ first_block->size_and_flag = first_block_size | HEAP_PREV_BLOCK_USED; 46cca: 2545 0004 movel %d5,%a2@(4) * last block appears as used for the _Heap_Is_used() and _Heap_Is_free() * functions. */ last_block = _Heap_Block_at( first_block, first_block_size ); last_block->prev_size = first_block_size; last_block->size_and_flag = first_block_begin - (uintptr_t) last_block; 46cce: 2a0a movel %a2,%d5 46cd0: 9a8b subl %a3,%d5 46cd2: 2745 0004 movel %d5,%a3@(4) stats->max_search = 0; stats->allocs = 0; stats->searches = 0; stats->frees = 0; stats->resizes = 0; stats->instance = instance++; 46cd6: 2a39 0005 e714 movel 5e714 ,%d5 * block indicates that the previous block is used, this ensures that the * last block appears as used for the _Heap_Is_used() and _Heap_Is_free() * functions. */ last_block = _Heap_Block_at( first_block, first_block_size ); last_block->prev_size = first_block_size; 46cdc: 2682 movel %d2,%a3@ last_block->size_and_flag = first_block_begin - (uintptr_t) last_block; /* Heap control */ heap->page_size = page_size; 46cde: 2141 0010 movel %d1,%a0@(16) /* Statistics */ stats->size = first_block_size; stats->free_size = first_block_size; stats->min_free_size = first_block_size; stats->free_blocks = 1; 46ce2: 7201 moveq #1,%d1 /* First block */ first_block = (Heap_Block *) first_block_begin; first_block->prev_size = page_size; first_block->size_and_flag = first_block_size | HEAP_PREV_BLOCK_USED; first_block->next = _Heap_Free_list_tail( heap ); 46ce4: 2548 0008 movel %a0,%a2@(8) first_block->prev = _Heap_Free_list_head( heap ); 46ce8: 2548 000c movel %a0,%a2@(12) last_block->prev_size = first_block_size; last_block->size_and_flag = first_block_begin - (uintptr_t) last_block; /* Heap control */ heap->page_size = page_size; heap->min_block_size = min_block_size; 46cec: 2143 0014 movel %d3,%a0@(20) heap->area_begin = heap_area_begin; heap->area_end = heap_area_end; 46cf0: 2144 001c movel %d4,%a0@(28) _Heap_Free_list_tail( heap )->prev = first_block; /* Statistics */ stats->size = first_block_size; stats->free_size = first_block_size; stats->min_free_size = first_block_size; 46cf4: 2142 0034 movel %d2,%a0@(52) stats->max_search = 0; stats->allocs = 0; stats->searches = 0; stats->frees = 0; stats->resizes = 0; stats->instance = instance++; 46cf8: 2145 0028 movel %d5,%a0@(40) 46cfc: 5285 addql #1,%d5 heap->last_block = last_block; _Heap_Free_list_head( heap )->next = first_block; _Heap_Free_list_tail( heap )->prev = first_block; /* Statistics */ stats->size = first_block_size; 46cfe: 2142 002c movel %d2,%a0@(44) stats->free_size = first_block_size; 46d02: 2142 0030 movel %d2,%a0@(48) last_block->size_and_flag = first_block_begin - (uintptr_t) last_block; /* Heap control */ heap->page_size = page_size; heap->min_block_size = min_block_size; heap->area_begin = heap_area_begin; 46d06: 2149 0018 movel %a1,%a0@(24) /* Statistics */ stats->size = first_block_size; stats->free_size = first_block_size; stats->min_free_size = first_block_size; stats->free_blocks = 1; 46d0a: 2141 0038 movel %d1,%a0@(56) stats->max_free_blocks = 1; 46d0e: 2141 003c movel %d1,%a0@(60) stats->used_blocks = 0; 46d12: 42a8 0040 clrl %a0@(64) stats->max_search = 0; 46d16: 42a8 0044 clrl %a0@(68) stats->allocs = 0; 46d1a: 42a8 0048 clrl %a0@(72) stats->searches = 0; 46d1e: 42a8 004c clrl %a0@(76) stats->frees = 0; 46d22: 42a8 0050 clrl %a0@(80) stats->resizes = 0; 46d26: 42a8 0054 clrl %a0@(84) heap->page_size = page_size; heap->min_block_size = min_block_size; heap->area_begin = heap_area_begin; heap->area_end = heap_area_end; heap->first_block = first_block; heap->last_block = last_block; 46d2a: 214b 0024 movel %a3,%a0@(36) stats->max_search = 0; stats->allocs = 0; stats->searches = 0; stats->frees = 0; stats->resizes = 0; stats->instance = instance++; 46d2e: 23c5 0005 e714 movel %d5,5e714 heap->area_begin = heap_area_begin; heap->area_end = heap_area_end; heap->first_block = first_block; heap->last_block = last_block; _Heap_Free_list_head( heap )->next = first_block; _Heap_Free_list_tail( heap )->prev = first_block; 46d34: 214a 000c movel %a2,%a0@(12) /* Heap control */ heap->page_size = page_size; heap->min_block_size = min_block_size; heap->area_begin = heap_area_begin; heap->area_end = heap_area_end; heap->first_block = first_block; 46d38: 214a 0020 movel %a2,%a0@(32) heap->last_block = last_block; _Heap_Free_list_head( heap )->next = first_block; 46d3c: 214a 0008 movel %a2,%a0@(8) _HAssert( _Heap_Is_aligned( _Heap_Alloc_area_of_block( last_block ), page_size ) ); return alloc_area_size; } 46d40: 4cd7 0c3c moveml %sp@,%d2-%d5/%a2-%a3 46d44: 4e5e unlk %fp 46d46: 4e75 rts RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_up( uintptr_t value, uintptr_t alignment ) { uintptr_t remainder = value % alignment; 46d48: 7003 moveq #3,%d0 46d4a: c081 andl %d1,%d0 if ( remainder != 0 ) { 46d4c: 6704 beqs 46d52 <_Heap_Initialize+0xf2> return value - remainder + alignment; 46d4e: 5881 addql #4,%d1 46d50: 9280 subl %d0,%d1 if ( page_size == 0 ) { page_size = CPU_ALIGNMENT; } else { page_size = _Heap_Align_up( page_size, CPU_ALIGNMENT ); if ( page_size < CPU_ALIGNMENT ) { 46d52: 7003 moveq #3,%d0 46d54: b081 cmpl %d1,%d0 46d56: 650a bcss 46d62 <_Heap_Initialize+0x102> ); _HAssert( _Heap_Is_aligned( _Heap_Alloc_area_of_block( last_block ), page_size ) ); return alloc_area_size; 46d58: 4280 clrl %d0 } 46d5a: 4cd7 0c3c moveml %sp@,%d2-%d5/%a2-%a3 46d5e: 4e5e unlk %fp 46d60: 4e75 rts RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_up( uintptr_t value, uintptr_t alignment ) { uintptr_t remainder = value % alignment; 46d62: 7610 moveq #16,%d3 46d64: 4c41 3000 remul %d1,%d0,%d3 if ( remainder != 0 ) { 46d68: 4a80 tstl %d0 46d6a: 671e beqs 46d8a <_Heap_Initialize+0x12a> return value - remainder + alignment; 46d6c: 2601 movel %d1,%d3 46d6e: 0683 0000 0010 addil #16,%d3 46d74: 9680 subl %d0,%d3 ) { Heap_Statistics *const stats = &heap->stats; uintptr_t const heap_area_begin = (uintptr_t) heap_area_begin_ptr; uintptr_t const heap_area_end = heap_area_begin + heap_area_size; uintptr_t alloc_area_begin = heap_area_begin + HEAP_BLOCK_HEADER_SIZE; 46d76: 2009 movel %a1,%d0 46d78: 5080 addql #8,%d0 RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_up( uintptr_t value, uintptr_t alignment ) { uintptr_t remainder = value % alignment; 46d7a: 2a00 movel %d0,%d5 46d7c: 4c41 5004 remul %d1,%d4,%d5 if ( remainder != 0 ) { 46d80: 4a84 tstl %d4 46d82: 6700 ff10 beqw 46c94 <_Heap_Initialize+0x34> 46d86: 6000 ff08 braw 46c90 <_Heap_Initialize+0x30> 46d8a: 2009 movel %a1,%d0 46d8c: 5080 addql #8,%d0 RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_up( uintptr_t value, uintptr_t alignment ) { uintptr_t remainder = value % alignment; 46d8e: 2a00 movel %d0,%d5 if ( remainder != 0 ) { 46d90: 7610 moveq #16,%d3 RTEMS_INLINE_ROUTINE uintptr_t _Heap_Align_up( uintptr_t value, uintptr_t alignment ) { uintptr_t remainder = value % alignment; 46d92: 4c41 5004 remul %d1,%d4,%d5 if ( remainder != 0 ) { 46d96: 4a84 tstl %d4 46d98: 6700 fefa beqw 46c94 <_Heap_Initialize+0x34> 46d9c: 6000 fef2 braw 46c90 <_Heap_Initialize+0x30> =============================================================================== 0005bb3c <_Heap_Size_of_alloc_area>: bool _Heap_Size_of_alloc_area( Heap_Control *heap, void *alloc_begin_ptr, uintptr_t *alloc_size ) { 5bb3c: 4e56 0000 linkw %fp,#0 5bb40: 202e 000c movel %fp@(12),%d0 RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_of_alloc_area( uintptr_t alloc_begin, uintptr_t page_size ) { return (Heap_Block *) (_Heap_Align_down( alloc_begin, page_size ) 5bb44: 2040 moveal %d0,%a0 5bb46: 5188 subql #8,%a0 5bb48: 226e 0008 moveal %fp@(8),%a1 5bb4c: 2f02 movel %d2,%sp@- 5bb4e: 2400 movel %d0,%d2 5bb50: 4c69 2001 0010 remul %a1@(16),%d1,%d2 5bb56: 91c1 subal %d1,%a0 const Heap_Control *heap, const Heap_Block *block ) { return (uintptr_t) block >= (uintptr_t) heap->first_block && (uintptr_t) block <= (uintptr_t) heap->last_block; 5bb58: 2229 0020 movel %a1@(32),%d1 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 5bb5c: b288 cmpl %a0,%d1 5bb5e: 6238 bhis 5bb98 <_Heap_Size_of_alloc_area+0x5c> && (uintptr_t) block <= (uintptr_t) heap->last_block; 5bb60: 2269 0024 moveal %a1@(36),%a1 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 5bb64: b3c8 cmpal %a0,%a1 5bb66: 6530 bcss 5bb98 <_Heap_Size_of_alloc_area+0x5c> <== NEVER TAKEN RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at( const Heap_Block *block, uintptr_t offset ) { return (Heap_Block *) ((uintptr_t) block + offset); 5bb68: 74fe moveq #-2,%d2 5bb6a: c4a8 0004 andl %a0@(4),%d2 5bb6e: d1c2 addal %d2,%a0 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 5bb70: b1c1 cmpal %d1,%a0 5bb72: 6524 bcss 5bb98 <_Heap_Size_of_alloc_area+0x5c> <== NEVER TAKEN 5bb74: b1c9 cmpal %a1,%a0 5bb76: 6220 bhis 5bb98 <_Heap_Size_of_alloc_area+0x5c> <== NEVER TAKEN } block_size = _Heap_Block_size( block ); next_block = _Heap_Block_at( block, block_size ); if ( 5bb78: 7201 moveq #1,%d1 5bb7a: c2a8 0004 andl %a0@(4),%d1 5bb7e: 4a01 tstb %d1 5bb80: 6716 beqs 5bb98 <_Heap_Size_of_alloc_area+0x5c> <== NEVER TAKEN || !_Heap_Is_prev_used( next_block ) ) { return false; } *alloc_size = (uintptr_t) next_block + HEAP_BLOCK_SIZE_OFFSET - alloc_begin; 5bb82: 7204 moveq #4,%d1 5bb84: 9280 subl %d0,%d1 5bb86: 2001 movel %d1,%d0 5bb88: d088 addl %a0,%d0 5bb8a: 226e 0010 moveal %fp@(16),%a1 return true; } 5bb8e: 241f movel %sp@+,%d2 5bb90: 4e5e unlk %fp || !_Heap_Is_prev_used( next_block ) ) { return false; } *alloc_size = (uintptr_t) next_block + HEAP_BLOCK_SIZE_OFFSET - alloc_begin; 5bb92: 2280 movel %d0,%a1@ 5bb94: 7001 moveq #1,%d0 return true; } 5bb96: 4e75 rts 5bb98: 241f movel %sp@+,%d2 5bb9a: 4e5e unlk %fp return false; } *alloc_size = (uintptr_t) next_block + HEAP_BLOCK_SIZE_OFFSET - alloc_begin; return true; 5bb9c: 4200 clrb %d0 <== NOT EXECUTED } =============================================================================== 000479bc <_Heap_Walk>: bool _Heap_Walk( Heap_Control *heap, int source, bool dump ) { 479bc: 4e56 ffc8 linkw %fp,#-56 479c0: 48d7 3cfc moveml %d2-%d7/%a2-%a5,%sp@ 479c4: 246e 0008 moveal %fp@(8),%a2 uintptr_t const page_size = heap->page_size; uintptr_t const min_block_size = heap->min_block_size; Heap_Block *const last_block = heap->last_block; Heap_Block *block = heap->first_block; Heap_Walk_printer printer = dump ? _Heap_Walk_print : _Heap_Walk_print_nothing; 479c8: 4bfa 0496 lea %pc@(47e60 <_Heap_Walk_print>),%a5 bool _Heap_Walk( Heap_Control *heap, int source, bool dump ) { 479cc: 242e 000c movel %fp@(12),%d2 uintptr_t const page_size = heap->page_size; 479d0: 262a 0010 movel %a2@(16),%d3 uintptr_t const min_block_size = heap->min_block_size; 479d4: 282a 0014 movel %a2@(20),%d4 Heap_Block *const last_block = heap->last_block; 479d8: 2a2a 0024 movel %a2@(36),%d5 Heap_Block *block = heap->first_block; 479dc: 266a 0020 moveal %a2@(32),%a3 Heap_Walk_printer printer = dump ? _Heap_Walk_print : _Heap_Walk_print_nothing; 479e0: 4a2e 0013 tstb %fp@(19) 479e4: 6604 bnes 479ea <_Heap_Walk+0x2e> 479e6: 4bfa ffcc lea %pc@(479b4 <_Heap_Walk_print_nothing>),%a5 if ( !_System_state_Is_up( _System_state_Get() ) ) { 479ea: 7003 moveq #3,%d0 479ec: b0b9 0006 1608 cmpl 61608 <_System_state_Current>,%d0 479f2: 670c beqs 47a00 <_Heap_Walk+0x44> block = next_block; } return true; } 479f4: 4cee 3cfc ffc8 moveml %fp@(-56),%d2-%d7/%a2-%a5 if ( !_Heap_Walk_check_control( source, printer, heap ) ) { return false; } while ( block != last_block ) { 479fa: 7001 moveq #1,%d0 block = next_block; } return true; } 479fc: 4e5e unlk %fp 479fe: 4e75 rts 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)( 47a00: 2f2a 000c movel %a2@(12),%sp@- 47a04: 2f2a 0008 movel %a2@(8),%sp@- 47a08: 2f05 movel %d5,%sp@- 47a0a: 2f0b movel %a3,%sp@- 47a0c: 2f2a 001c movel %a2@(28),%sp@- 47a10: 2f2a 0018 movel %a2@(24),%sp@- 47a14: 2f04 movel %d4,%sp@- 47a16: 2f03 movel %d3,%sp@- 47a18: 4879 0005 d784 pea 5d784 <_Status_Object_name_errors_to_status+0x14> 47a1e: 42a7 clrl %sp@- 47a20: 2f02 movel %d2,%sp@- 47a22: 4e95 jsr %a5@ heap->area_begin, heap->area_end, first_block, last_block, first_free_block, last_free_block ); if ( page_size == 0 ) { 47a24: 4fef 002c lea %sp@(44),%sp 47a28: 4a83 tstl %d3 47a2a: 6700 0154 beqw 47b80 <_Heap_Walk+0x1c4> (*printer)( source, true, "page size is zero\n" ); return false; } if ( !_Addresses_Is_aligned( (void *) page_size ) ) { 47a2e: 7003 moveq #3,%d0 47a30: c083 andl %d3,%d0 47a32: 6600 016a bnew 47b9e <_Heap_Walk+0x1e2> ); return false; } if ( !_Heap_Is_aligned( min_block_size, page_size ) ) { 47a36: 2204 movel %d4,%d1 47a38: 4c43 1000 remul %d3,%d0,%d1 47a3c: 4a80 tstl %d0 47a3e: 6600 0176 bnew 47bb6 <_Heap_Walk+0x1fa> ); return false; } if ( 47a42: 200b movel %a3,%d0 47a44: 5080 addql #8,%d0 47a46: 4c43 0001 remul %d3,%d1,%d0 47a4a: 4a81 tstl %d1 47a4c: 6600 0180 bnew 47bce <_Heap_Walk+0x212> 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; 47a50: 2c2b 0004 movel %a3@(4),%d6 ); return false; } if ( !_Heap_Is_prev_used( first_block ) ) { 47a54: 7201 moveq #1,%d1 47a56: c286 andl %d6,%d1 47a58: 2d46 fff0 movel %d6,%fp@(-16) 47a5c: 4a01 tstb %d1 47a5e: 6700 0186 beqw 47be6 <_Heap_Walk+0x22a> ); return false; } if ( first_block->prev_size != page_size ) { 47a62: 2053 moveal %a3@,%a0 47a64: b1c3 cmpal %d3,%a0 47a66: 6600 00de bnew 47b46 <_Heap_Walk+0x18a> ); return false; } if ( _Heap_Is_free( last_block ) ) { 47a6a: 2045 moveal %d5,%a0 47a6c: 7cfe moveq #-2,%d6 47a6e: 7001 moveq #1,%d0 47a70: cca8 0004 andl %a0@(4),%d6 47a74: c0b0 6804 andl %a0@(00000004,%d6:l),%d0 47a78: 4a00 tstb %d0 47a7a: 6700 0180 beqw 47bfc <_Heap_Walk+0x240> int source, Heap_Walk_printer printer, Heap_Control *heap ) { uintptr_t const page_size = heap->page_size; 47a7e: 2c2a 0010 movel %a2@(16),%d6 return &heap->free_list; } RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Free_list_first( Heap_Control *heap ) { return _Heap_Free_list_head(heap)->next; 47a82: 206a 0008 moveal %a2@(8),%a0 47a86: 2d46 fffc movel %d6,%fp@(-4) 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 ) { 47a8a: b1ca cmpal %a2,%a0 47a8c: 6700 0192 beqw 47c20 <_Heap_Walk+0x264> 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; 47a90: 2e2a 0020 movel %a2@(32),%d7 47a94: 2d47 fff4 movel %d7,%fp@(-12) 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 47a98: b1c7 cmpal %d7,%a0 47a9a: 6500 00c4 bcsw 47b60 <_Heap_Walk+0x1a4> && (uintptr_t) block <= (uintptr_t) heap->last_block; 47a9e: 286a 0024 moveal %a2@(36),%a4 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 47aa2: b1cc cmpal %a4,%a0 47aa4: 6200 00ba bhiw 47b60 <_Heap_Walk+0x1a4> ); return false; } if ( 47aa8: 2248 moveal %a0,%a1 47aaa: 5089 addql #8,%a1 47aac: 2009 movel %a1,%d0 47aae: 4c46 0007 remul %d6,%d7,%d0 47ab2: 2d49 fff8 movel %a1,%fp@(-8) 47ab6: 4a87 tstl %d7 47ab8: 6600 0372 bnew 47e2c <_Heap_Walk+0x470> ); return false; } if ( _Heap_Is_used( free_block ) ) { 47abc: 7efe moveq #-2,%d7 47abe: 7001 moveq #1,%d0 47ac0: cea8 0004 andl %a0@(4),%d7 47ac4: c0b0 7804 andl %a0@(00000004,%d7:l),%d0 47ac8: 6600 037c bnew 47e46 <_Heap_Walk+0x48a> ); return false; } if ( free_block->prev != prev_block ) { 47acc: 2e28 000c movel %a0@(12),%d7 47ad0: be8a cmpl %a2,%d7 47ad2: 6650 bnes 47b24 <_Heap_Walk+0x168> <== NEVER TAKEN 47ad4: 202e fff0 movel %fp@(-16),%d0 47ad8: 2241 moveal %d1,%a1 47ada: 2c2e fff4 movel %fp@(-12),%d6 47ade: 2d40 fff8 movel %d0,%fp@(-8) 47ae2: 2d43 fff4 movel %d3,%fp@(-12) (*printer)( 47ae6: 2008 movel %a0,%d0 return false; } prev_block = free_block; free_block = free_block->next; 47ae8: 2068 0008 moveal %a0@(8),%a0 const Heap_Block *const free_list_tail = _Heap_Free_list_tail( heap ); const Heap_Block *const first_free_block = _Heap_Free_list_first( heap ); const Heap_Block *prev_block = free_list_tail; const Heap_Block *free_block = first_free_block; while ( free_block != free_list_tail ) { 47aec: b1ca cmpal %a2,%a0 47aee: 6700 0122 beqw 47c12 <_Heap_Walk+0x256> 47af2: bc88 cmpl %a0,%d6 47af4: 626a bhis 47b60 <_Heap_Walk+0x1a4> ); return false; } if ( 47af6: 2e08 movel %a0,%d7 47af8: 5087 addql #8,%d7 47afa: b1cc cmpal %a4,%a0 47afc: 6262 bhis 47b60 <_Heap_Walk+0x1a4> <== NEVER TAKEN 47afe: 262e fffc movel %fp@(-4),%d3 47b02: 4c43 7001 remul %d3,%d1,%d7 47b06: 4a81 tstl %d1 47b08: 6600 0322 bnew 47e2c <_Heap_Walk+0x470> ); return false; } if ( _Heap_Is_used( free_block ) ) { 47b0c: 72fe moveq #-2,%d1 47b0e: 7e01 moveq #1,%d7 47b10: c2a8 0004 andl %a0@(4),%d1 47b14: ceb0 1804 andl %a0@(00000004,%d1:l),%d7 47b18: 6600 032c bnew 47e46 <_Heap_Walk+0x48a> ); return false; } if ( free_block->prev != prev_block ) { 47b1c: 2e28 000c movel %a0@(12),%d7 47b20: b087 cmpl %d7,%d0 47b22: 67c2 beqs 47ae6 <_Heap_Walk+0x12a> (*printer)( 47b24: 2f07 movel %d7,%sp@- 47b26: 2f08 movel %a0,%sp@- 47b28: 4879 0005 d975 pea 5d975 <_Status_Object_name_errors_to_status+0x205> return false; } if ( next_block_begin <= block_begin ) { (*printer)( 47b2e: 4878 0001 pea 1 47b32: 2f02 movel %d2,%sp@- 47b34: 4e95 jsr %a5@ "block 0x%08x: next block 0x%08x is not a successor\n", block, next_block ); return false; 47b36: 4fef 0014 lea %sp@(20),%sp return false; } if ( next_block_begin <= block_begin ) { (*printer)( 47b3a: 4200 clrb %d0 block = next_block; } return true; } 47b3c: 4cee 3cfc ffc8 moveml %fp@(-56),%d2-%d7/%a2-%a5 47b42: 4e5e unlk %fp 47b44: 4e75 rts return false; } if ( first_block->prev_size != page_size ) { (*printer)( 47b46: 2f03 movel %d3,%sp@- 47b48: 2f08 movel %a0,%sp@- 47b4a: 4879 0005 d8c9 pea 5d8c9 <_Status_Object_name_errors_to_status+0x159> return false; } if ( next_block_begin <= block_begin ) { (*printer)( 47b50: 4878 0001 pea 1 47b54: 2f02 movel %d2,%sp@- 47b56: 4e95 jsr %a5@ "block 0x%08x: next block 0x%08x is not a successor\n", block, next_block ); return false; 47b58: 4fef 0014 lea %sp@(20),%sp return false; } if ( next_block_begin <= block_begin ) { (*printer)( 47b5c: 4200 clrb %d0 47b5e: 60dc bras 47b3c <_Heap_Walk+0x180> 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)( 47b60: 2f08 movel %a0,%sp@- 47b62: 4879 0005 d909 pea 5d909 <_Status_Object_name_errors_to_status+0x199> return false; } if ( !_Heap_Walk_is_in_free_list( heap, block ) ) { (*printer)( 47b68: 4878 0001 pea 1 47b6c: 2f02 movel %d2,%sp@- 47b6e: 4e95 jsr %a5@ 47b70: 4fef 0010 lea %sp@(16),%sp 47b74: 4200 clrb %d0 block = next_block; } return true; } 47b76: 4cee 3cfc ffc8 moveml %fp@(-56),%d2-%d7/%a2-%a5 47b7c: 4e5e unlk %fp 47b7e: 4e75 rts first_block, last_block, first_free_block, last_free_block ); if ( page_size == 0 ) { (*printer)( source, true, "page size is zero\n" ); 47b80: 4879 0005 d815 pea 5d815 <_Status_Object_name_errors_to_status+0xa5> return false; } if ( !_Heap_Is_prev_used( first_block ) ) { (*printer)( 47b86: 4878 0001 pea 1 47b8a: 2f02 movel %d2,%sp@- 47b8c: 4e95 jsr %a5@ 47b8e: 4fef 000c lea %sp@(12),%sp 47b92: 4200 clrb %d0 block = next_block; } return true; } 47b94: 4cee 3cfc ffc8 moveml %fp@(-56),%d2-%d7/%a2-%a5 47b9a: 4e5e unlk %fp 47b9c: 4e75 rts return false; } if ( !_Addresses_Is_aligned( (void *) page_size ) ) { (*printer)( 47b9e: 2f03 movel %d3,%sp@- 47ba0: 4879 0005 d828 pea 5d828 <_Status_Object_name_errors_to_status+0xb8> return false; } if ( !_Heap_Walk_is_in_free_list( heap, block ) ) { (*printer)( 47ba6: 4878 0001 pea 1 47baa: 2f02 movel %d2,%sp@- 47bac: 4e95 jsr %a5@ 47bae: 4fef 0010 lea %sp@(16),%sp 47bb2: 4200 clrb %d0 47bb4: 60c0 bras 47b76 <_Heap_Walk+0x1ba> return false; } if ( !_Heap_Is_aligned( min_block_size, page_size ) ) { (*printer)( 47bb6: 2f04 movel %d4,%sp@- 47bb8: 4879 0005 d846 pea 5d846 <_Status_Object_name_errors_to_status+0xd6> return false; } if ( !_Heap_Walk_is_in_free_list( heap, block ) ) { (*printer)( 47bbe: 4878 0001 pea 1 47bc2: 2f02 movel %d2,%sp@- 47bc4: 4e95 jsr %a5@ 47bc6: 4fef 0010 lea %sp@(16),%sp 47bca: 4200 clrb %d0 47bcc: 60a8 bras 47b76 <_Heap_Walk+0x1ba> } if ( !_Heap_Is_aligned( _Heap_Alloc_area_of_block( first_block ), page_size ) ) { (*printer)( 47bce: 2f0b movel %a3,%sp@- 47bd0: 4879 0005 d86a pea 5d86a <_Status_Object_name_errors_to_status+0xfa> return false; } if ( !_Heap_Walk_is_in_free_list( heap, block ) ) { (*printer)( 47bd6: 4878 0001 pea 1 47bda: 2f02 movel %d2,%sp@- 47bdc: 4e95 jsr %a5@ 47bde: 4fef 0010 lea %sp@(16),%sp 47be2: 4200 clrb %d0 47be4: 6090 bras 47b76 <_Heap_Walk+0x1ba> return false; } if ( !_Heap_Is_prev_used( first_block ) ) { (*printer)( 47be6: 4879 0005 d89b pea 5d89b <_Status_Object_name_errors_to_status+0x12b> 47bec: 4878 0001 pea 1 47bf0: 2f02 movel %d2,%sp@- 47bf2: 4e95 jsr %a5@ 47bf4: 4fef 000c lea %sp@(12),%sp 47bf8: 4200 clrb %d0 47bfa: 6098 bras 47b94 <_Heap_Walk+0x1d8> return false; } if ( _Heap_Is_free( last_block ) ) { (*printer)( 47bfc: 4879 0005 d8f4 pea 5d8f4 <_Status_Object_name_errors_to_status+0x184> return false; } if ( !_Heap_Is_prev_used( first_block ) ) { (*printer)( 47c02: 4878 0001 pea 1 47c06: 2f02 movel %d2,%sp@- 47c08: 4e95 jsr %a5@ 47c0a: 4fef 000c lea %sp@(12),%sp 47c0e: 4200 clrb %d0 47c10: 6082 bras 47b94 <_Heap_Walk+0x1d8> 47c12: 262e fff8 movel %fp@(-8),%d3 47c16: 2209 movel %a1,%d1 47c18: 2d43 fff0 movel %d3,%fp@(-16) 47c1c: 262e fff4 movel %fp@(-12),%d3 if ( !_Heap_Walk_check_control( source, printer, heap ) ) { return false; } while ( block != last_block ) { 47c20: b7c5 cmpal %d5,%a3 47c22: 6700 fdd0 beqw 479f4 <_Heap_Walk+0x38> 47c26: 2c2e fff0 movel %fp@(-16),%d6 - 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; 47c2a: 7efe moveq #-2,%d7 47c2c: cc87 andl %d7,%d6 47c2e: 2d43 fff8 movel %d3,%fp@(-8) RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at( const Heap_Block *block, uintptr_t offset ) { return (Heap_Block *) ((uintptr_t) block + offset); 47c32: 49f3 6800 lea %a3@(00000000,%d6:l),%a4 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; if ( prev_used ) { 47c36: 4a01 tstb %d1 47c38: 6700 0126 beqw 47d60 <_Heap_Walk+0x3a4> (*printer)( 47c3c: 2f06 movel %d6,%sp@- 47c3e: 2f0b movel %a3,%sp@- 47c40: 4879 0005 d9a7 pea 5d9a7 <_Status_Object_name_errors_to_status+0x237> 47c46: 42a7 clrl %sp@- 47c48: 2f02 movel %d2,%sp@- 47c4a: 4e95 jsr %a5@ 47c4c: 4fef 0014 lea %sp@(20),%sp RTEMS_INLINE_ROUTINE bool _Heap_Is_block_in_heap( const Heap_Control *heap, const Heap_Block *block ) { return (uintptr_t) block >= (uintptr_t) heap->first_block 47c50: b9ea 0020 cmpal %a2@(32),%a4 47c54: 6500 00d0 bcsw 47d26 <_Heap_Walk+0x36a> 47c58: b9ea 0024 cmpal %a2@(36),%a4 47c5c: 6200 00c8 bhiw 47d26 <_Heap_Walk+0x36a> ); return false; } if ( !_Heap_Is_aligned( block_size, page_size ) ) { 47c60: 262e fff8 movel %fp@(-8),%d3 47c64: 2206 movel %d6,%d1 47c66: 4c43 1000 remul %d3,%d0,%d1 47c6a: 4a80 tstl %d0 47c6c: 6600 0162 bnew 47dd0 <_Heap_Walk+0x414> ); return false; } if ( block_size < min_block_size ) { 47c70: bc84 cmpl %d4,%d6 47c72: 6500 0178 bcsw 47dec <_Heap_Walk+0x430> ); return false; } if ( next_block_begin <= block_begin ) { 47c76: b9cb cmpal %a3,%a4 47c78: 6300 0196 blsw 47e10 <_Heap_Walk+0x454> ); return false; } if ( !_Heap_Is_prev_used( next_block ) ) { 47c7c: 7001 moveq #1,%d0 47c7e: c0ac 0004 andl %a4@(4),%d0 47c82: 4a00 tstb %d0 47c84: 6600 00bc bnew 47d42 <_Heap_Walk+0x386> 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; 47c88: 262b 0004 movel %a3@(4),%d3 - HEAP_BLOCK_HEADER_SIZE); } RTEMS_INLINE_ROUTINE uintptr_t _Heap_Block_size( const Heap_Block *block ) { return block->size_and_flag & ~HEAP_PREV_BLOCK_USED; 47c8c: 7cfe moveq #-2,%d6 return _Heap_Free_list_head(heap)->next; } RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Free_list_last( Heap_Control *heap ) { return _Heap_Free_list_tail(heap)->prev; 47c8e: 43f9 0005 da9d lea 5da9d <_Status_Object_name_errors_to_status+0x32d>,%a1 return &heap->free_list; } RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Free_list_first( Heap_Control *heap ) { return _Heap_Free_list_head(heap)->next; 47c94: 2e2a 0008 movel %a2@(8),%d7 - 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; 47c98: cc83 andl %d3,%d6 return &heap->free_list; } RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Free_list_first( Heap_Control *heap ) { return _Heap_Free_list_head(heap)->next; 47c9a: 2d47 fffc movel %d7,%fp@(-4) RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at( const Heap_Block *block, uintptr_t offset ) { return (Heap_Block *) ((uintptr_t) block + offset); 47c9e: 2e0b movel %a3,%d7 47ca0: de86 addl %d6,%d7 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)( 47ca2: 222b 0008 movel %a3@(8),%d1 return _Heap_Free_list_head(heap)->next; } RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Free_list_last( Heap_Control *heap ) { return _Heap_Free_list_tail(heap)->prev; 47ca6: b2aa 000c cmpl %a2@(12),%d1 47caa: 6710 beqs 47cbc <_Heap_Walk+0x300> " (= first)" : (block->prev == free_list_head ? " (= head)" : ""), block->next, block->next == last_free_block ? " (= last)" : (block->next == free_list_tail ? " (= tail)" : "") 47cac: 43f9 0005 daa7 lea 5daa7 <_Status_Object_name_errors_to_status+0x337>,%a1 47cb2: b5c1 cmpal %d1,%a2 47cb4: 6706 beqs 47cbc <_Heap_Walk+0x300> 47cb6: 43f9 0005 d6e2 lea 5d6e2 ,%a1 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)( 47cbc: 202b 000c movel %a3@(12),%d0 47cc0: 41f9 0005 dab1 lea 5dab1 <_Status_Object_name_errors_to_status+0x341>,%a0 47cc6: b0ae fffc cmpl %fp@(-4),%d0 47cca: 6710 beqs 47cdc <_Heap_Walk+0x320> "block 0x%08x: prev 0x%08x%s, next 0x%08x%s\n", block, block->prev, block->prev == first_free_block ? " (= first)" : (block->prev == free_list_head ? " (= head)" : ""), 47ccc: 41f9 0005 dabc lea 5dabc <_Status_Object_name_errors_to_status+0x34c>,%a0 47cd2: b5c0 cmpal %d0,%a2 47cd4: 6706 beqs 47cdc <_Heap_Walk+0x320> 47cd6: 41f9 0005 d6e2 lea 5d6e2 ,%a0 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)( 47cdc: 2f09 movel %a1,%sp@- 47cde: 2f01 movel %d1,%sp@- 47ce0: 2f08 movel %a0,%sp@- 47ce2: 2f00 movel %d0,%sp@- 47ce4: 2f0b movel %a3,%sp@- 47ce6: 4879 0005 dac6 pea 5dac6 <_Status_Object_name_errors_to_status+0x356> 47cec: 42a7 clrl %sp@- 47cee: 2f02 movel %d2,%sp@- 47cf0: 4e95 jsr %a5@ block->next == last_free_block ? " (= last)" : (block->next == free_list_tail ? " (= tail)" : "") ); if ( block_size != next_block->prev_size ) { 47cf2: 4fef 0020 lea %sp@(32),%sp 47cf6: 2047 moveal %d7,%a0 47cf8: 2010 movel %a0@,%d0 47cfa: b086 cmpl %d6,%d0 47cfc: 6700 0082 beqw 47d80 <_Heap_Walk+0x3c4> (*printer)( 47d00: 2f07 movel %d7,%sp@- 47d02: 2f00 movel %d0,%sp@- 47d04: 2f06 movel %d6,%sp@- 47d06: 2f0b movel %a3,%sp@- 47d08: 4879 0005 daf2 pea 5daf2 <_Status_Object_name_errors_to_status+0x382> 47d0e: 4878 0001 pea 1 47d12: 2f02 movel %d2,%sp@- 47d14: 4e95 jsr %a5@ 47d16: 4fef 001c lea %sp@(28),%sp block = next_block; } return true; } 47d1a: 4cee 3cfc ffc8 moveml %fp@(-56),%d2-%d7/%a2-%a5 " (= last)" : (block->next == free_list_tail ? " (= tail)" : "") ); if ( block_size != next_block->prev_size ) { (*printer)( 47d20: 4200 clrb %d0 block = next_block; } return true; } 47d22: 4e5e unlk %fp 47d24: 4e75 rts block->prev_size ); } if ( !_Heap_Is_block_in_heap( heap, next_block ) ) { (*printer)( 47d26: 2f0c movel %a4,%sp@- 47d28: 2f0b movel %a3,%sp@- 47d2a: 4879 0005 d9e3 pea 5d9e3 <_Status_Object_name_errors_to_status+0x273> return false; } if ( next_block_begin <= block_begin ) { (*printer)( 47d30: 4878 0001 pea 1 47d34: 2f02 movel %d2,%sp@- 47d36: 4e95 jsr %a5@ "block 0x%08x: next block 0x%08x is not a successor\n", block, next_block ); return false; 47d38: 4fef 0014 lea %sp@(20),%sp return false; } if ( next_block_begin <= block_begin ) { (*printer)( 47d3c: 4200 clrb %d0 47d3e: 6000 fdfc braw 47b3c <_Heap_Walk+0x180> if ( !_Heap_Walk_check_control( source, printer, heap ) ) { return false; } while ( block != last_block ) { 47d42: b9c5 cmpal %d5,%a4 47d44: 6700 fcae beqw 479f4 <_Heap_Walk+0x38> 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 ) { 47d48: 2c2c 0004 movel %a4@(4),%d6 47d4c: 7201 moveq #1,%d1 - 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; 47d4e: 7efe moveq #-2,%d7 47d50: 264c moveal %a4,%a3 47d52: c286 andl %d6,%d1 47d54: cc87 andl %d7,%d6 RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Block_at( const Heap_Block *block, uintptr_t offset ) { return (Heap_Block *) ((uintptr_t) block + offset); 47d56: 49f3 6800 lea %a3@(00000000,%d6:l),%a4 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; if ( prev_used ) { 47d5a: 4a01 tstb %d1 47d5c: 6600 fede bnew 47c3c <_Heap_Walk+0x280> "block 0x%08x: size %u\n", block, block_size ); } else { (*printer)( 47d60: 2f13 movel %a3@,%sp@- 47d62: 2f06 movel %d6,%sp@- 47d64: 2f0b movel %a3,%sp@- 47d66: 4879 0005 d9be pea 5d9be <_Status_Object_name_errors_to_status+0x24e> 47d6c: 42a7 clrl %sp@- 47d6e: 2f02 movel %d2,%sp@- 47d70: 4e95 jsr %a5@ 47d72: 4fef 0018 lea %sp@(24),%sp RTEMS_INLINE_ROUTINE bool _Heap_Is_block_in_heap( const Heap_Control *heap, const Heap_Block *block ) { return (uintptr_t) block >= (uintptr_t) heap->first_block 47d76: b9ea 0020 cmpal %a2@(32),%a4 47d7a: 65aa bcss 47d26 <_Heap_Walk+0x36a> <== NEVER TAKEN 47d7c: 6000 feda braw 47c58 <_Heap_Walk+0x29c> ); return false; } if ( !prev_used ) { 47d80: 7001 moveq #1,%d0 47d82: c680 andl %d0,%d3 47d84: 4a03 tstb %d3 47d86: 672e beqs 47db6 <_Heap_Walk+0x3fa> return &heap->free_list; } RTEMS_INLINE_ROUTINE Heap_Block *_Heap_Free_list_first( Heap_Control *heap ) { return _Heap_Free_list_head(heap)->next; 47d88: 206a 0008 moveal %a2@(8),%a0 ) { const Heap_Block *const free_list_tail = _Heap_Free_list_tail( heap ); const Heap_Block *free_block = _Heap_Free_list_first( heap ); while ( free_block != free_list_tail ) { 47d8c: b5c8 cmpal %a0,%a2 47d8e: 670c beqs 47d9c <_Heap_Walk+0x3e0> <== NEVER TAKEN if ( free_block == block ) { 47d90: b7c8 cmpal %a0,%a3 47d92: 67ae beqs 47d42 <_Heap_Walk+0x386> return true; } free_block = free_block->next; 47d94: 2068 0008 moveal %a0@(8),%a0 ) { const Heap_Block *const free_list_tail = _Heap_Free_list_tail( heap ); const Heap_Block *free_block = _Heap_Free_list_first( heap ); while ( free_block != free_list_tail ) { 47d98: b5c8 cmpal %a0,%a2 47d9a: 66f4 bnes 47d90 <_Heap_Walk+0x3d4> return false; } if ( !_Heap_Walk_is_in_free_list( heap, block ) ) { (*printer)( 47d9c: 2f0b movel %a3,%sp@- 47d9e: 4879 0005 db5a pea 5db5a <_Status_Object_name_errors_to_status+0x3ea> 47da4: 4878 0001 pea 1 47da8: 2f02 movel %d2,%sp@- 47daa: 4e95 jsr %a5@ 47dac: 4fef 0010 lea %sp@(16),%sp 47db0: 4200 clrb %d0 47db2: 6000 fdc2 braw 47b76 <_Heap_Walk+0x1ba> return false; } if ( !prev_used ) { (*printer)( 47db6: 2f0b movel %a3,%sp@- 47db8: 4879 0005 db2b pea 5db2b <_Status_Object_name_errors_to_status+0x3bb> return false; } if ( !_Heap_Walk_is_in_free_list( heap, block ) ) { (*printer)( 47dbe: 4878 0001 pea 1 47dc2: 2f02 movel %d2,%sp@- 47dc4: 4e95 jsr %a5@ 47dc6: 4fef 0010 lea %sp@(16),%sp 47dca: 4200 clrb %d0 47dcc: 6000 fda8 braw 47b76 <_Heap_Walk+0x1ba> return false; } if ( !_Heap_Is_aligned( block_size, page_size ) ) { (*printer)( 47dd0: 2f06 movel %d6,%sp@- 47dd2: 2f0b movel %a3,%sp@- 47dd4: 4879 0005 da10 pea 5da10 <_Status_Object_name_errors_to_status+0x2a0> return false; } if ( next_block_begin <= block_begin ) { (*printer)( 47dda: 4878 0001 pea 1 47dde: 2f02 movel %d2,%sp@- 47de0: 4e95 jsr %a5@ "block 0x%08x: next block 0x%08x is not a successor\n", block, next_block ); return false; 47de2: 4fef 0014 lea %sp@(20),%sp return false; } if ( next_block_begin <= block_begin ) { (*printer)( 47de6: 4200 clrb %d0 47de8: 6000 fd52 braw 47b3c <_Heap_Walk+0x180> return false; } if ( block_size < min_block_size ) { (*printer)( 47dec: 2f04 movel %d4,%sp@- 47dee: 2f06 movel %d6,%sp@- 47df0: 2f0b movel %a3,%sp@- 47df2: 4879 0005 da3e pea 5da3e <_Status_Object_name_errors_to_status+0x2ce> 47df8: 4878 0001 pea 1 47dfc: 2f02 movel %d2,%sp@- 47dfe: 4e95 jsr %a5@ block, block_size, min_block_size ); return false; 47e00: 4fef 0018 lea %sp@(24),%sp block = next_block; } return true; } 47e04: 4cee 3cfc ffc8 moveml %fp@(-56),%d2-%d7/%a2-%a5 return false; } if ( block_size < min_block_size ) { (*printer)( 47e0a: 4200 clrb %d0 block = next_block; } return true; } 47e0c: 4e5e unlk %fp 47e0e: 4e75 rts return false; } if ( next_block_begin <= block_begin ) { (*printer)( 47e10: 2f0c movel %a4,%sp@- 47e12: 2f0b movel %a3,%sp@- 47e14: 4879 0005 da69 pea 5da69 <_Status_Object_name_errors_to_status+0x2f9> 47e1a: 4878 0001 pea 1 47e1e: 2f02 movel %d2,%sp@- 47e20: 4e95 jsr %a5@ "block 0x%08x: next block 0x%08x is not a successor\n", block, next_block ); return false; 47e22: 4fef 0014 lea %sp@(20),%sp return false; } if ( next_block_begin <= block_begin ) { (*printer)( 47e26: 4200 clrb %d0 47e28: 6000 fd12 braw 47b3c <_Heap_Walk+0x180> } if ( !_Heap_Is_aligned( _Heap_Alloc_area_of_block( free_block ), page_size ) ) { (*printer)( 47e2c: 2f08 movel %a0,%sp@- 47e2e: 4879 0005 d929 pea 5d929 <_Status_Object_name_errors_to_status+0x1b9> return false; } if ( !_Heap_Walk_is_in_free_list( heap, block ) ) { (*printer)( 47e34: 4878 0001 pea 1 47e38: 2f02 movel %d2,%sp@- 47e3a: 4e95 jsr %a5@ 47e3c: 4fef 0010 lea %sp@(16),%sp 47e40: 4200 clrb %d0 47e42: 6000 fd32 braw 47b76 <_Heap_Walk+0x1ba> return false; } if ( _Heap_Is_used( free_block ) ) { (*printer)( 47e46: 2f08 movel %a0,%sp@- 47e48: 4879 0005 d959 pea 5d959 <_Status_Object_name_errors_to_status+0x1e9> return false; } if ( !_Heap_Walk_is_in_free_list( heap, block ) ) { (*printer)( 47e4e: 4878 0001 pea 1 47e52: 2f02 movel %d2,%sp@- 47e54: 4e95 jsr %a5@ 47e56: 4fef 0010 lea %sp@(16),%sp 47e5a: 4200 clrb %d0 47e5c: 6000 fd18 braw 47b76 <_Heap_Walk+0x1ba> =============================================================================== 0004646c <_IO_Initialize_all_drivers>: * * Output Parameters: NONE */ void _IO_Initialize_all_drivers( void ) { 4646c: 4e56 0000 linkw %fp,#0 46470: 2f0a movel %a2,%sp@- 46472: 2f02 movel %d2,%sp@- rtems_device_major_number major; for ( major=0 ; major < _IO_Number_of_drivers ; major ++ ) 46474: 4ab9 0005 f804 tstl 5f804 <_IO_Number_of_drivers> 4647a: 671e beqs 4649a <_IO_Initialize_all_drivers+0x2e><== NEVER TAKEN 4647c: 4282 clrl %d2 4647e: 45f9 0004 b93c lea 4b93c ,%a2 (void) rtems_io_initialize( major, 0, NULL ); 46484: 42a7 clrl %sp@- 46486: 42a7 clrl %sp@- 46488: 2f02 movel %d2,%sp@- void _IO_Initialize_all_drivers( void ) { rtems_device_major_number major; for ( major=0 ; major < _IO_Number_of_drivers ; major ++ ) 4648a: 5282 addql #1,%d2 (void) rtems_io_initialize( major, 0, NULL ); 4648c: 4e92 jsr %a2@ void _IO_Initialize_all_drivers( void ) { rtems_device_major_number major; for ( major=0 ; major < _IO_Number_of_drivers ; major ++ ) 4648e: 4fef 000c lea %sp@(12),%sp 46492: b4b9 0005 f804 cmpl 5f804 <_IO_Number_of_drivers>,%d2 46498: 65ea bcss 46484 <_IO_Initialize_all_drivers+0x18> (void) rtems_io_initialize( major, 0, NULL ); } 4649a: 242e fff8 movel %fp@(-8),%d2 4649e: 246e fffc moveal %fp@(-4),%a2 464a2: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 000464a6 <_IO_Manager_initialization>: * workspace. * */ void _IO_Manager_initialization(void) { 464a6: 4e56 fff0 linkw %fp,#-16 464aa: 48d7 003c moveml %d2-%d5,%sp@ uint32_t index; rtems_driver_address_table *driver_table; uint32_t drivers_in_table; uint32_t number_of_drivers; driver_table = Configuration.Device_driver_table; 464ae: 2639 0005 d7f6 movel 5d7f6 ,%d3 drivers_in_table = Configuration.number_of_device_drivers; 464b4: 2439 0005 d7f2 movel 5d7f2 ,%d2 number_of_drivers = Configuration.maximum_drivers; 464ba: 2839 0005 d7ee movel 5d7ee ,%d4 /* * If the user claims there are less drivers than are actually in * the table, then let's just go with the table's count. */ if ( number_of_drivers <= drivers_in_table ) 464c0: b882 cmpl %d2,%d4 464c2: 6216 bhis 464da <_IO_Manager_initialization+0x34> * If the maximum number of driver is the same as the number in the * table, then we do not have to copy the driver table. They can't * register any dynamically. */ if ( number_of_drivers == drivers_in_table ) { _IO_Driver_address_table = driver_table; 464c4: 23c3 0005 f808 movel %d3,5f808 <_IO_Driver_address_table> _IO_Number_of_drivers = number_of_drivers; 464ca: 23c2 0005 f804 movel %d2,5f804 <_IO_Number_of_drivers> ); for ( index = 0 ; index < drivers_in_table ; index++ ) _IO_Driver_address_table[index] = driver_table[index]; number_of_drivers = drivers_in_table; } 464d0: 4cee 003c fff0 moveml %fp@(-16),%d2-%d5 464d6: 4e5e unlk %fp 464d8: 4e75 rts /* * The application requested extra slots in the driver table, so we * have to allocate a new driver table and copy theirs to it. */ _IO_Driver_address_table = (rtems_driver_address_table *) 464da: 2004 movel %d4,%d0 464dc: 2a04 movel %d4,%d5 464de: e788 lsll #3,%d0 464e0: eb8d lsll #5,%d5 464e2: 9a80 subl %d0,%d5 464e4: 2f05 movel %d5,%sp@- 464e6: 4eb9 0004 91c0 jsr 491c0 <_Workspace_Allocate_or_fatal_error> _Workspace_Allocate_or_fatal_error( sizeof( rtems_driver_address_table ) * ( number_of_drivers ) ); _IO_Number_of_drivers = number_of_drivers; memset( 464ec: 2f05 movel %d5,%sp@- 464ee: 42a7 clrl %sp@- _IO_Driver_address_table = (rtems_driver_address_table *) _Workspace_Allocate_or_fatal_error( sizeof( rtems_driver_address_table ) * ( number_of_drivers ) ); _IO_Number_of_drivers = number_of_drivers; 464f0: 23c4 0005 f804 movel %d4,5f804 <_IO_Number_of_drivers> memset( 464f6: 2f00 movel %d0,%sp@- /* * The application requested extra slots in the driver table, so we * have to allocate a new driver table and copy theirs to it. */ _IO_Driver_address_table = (rtems_driver_address_table *) 464f8: 23c0 0005 f808 movel %d0,5f808 <_IO_Driver_address_table> _Workspace_Allocate_or_fatal_error( sizeof( rtems_driver_address_table ) * ( number_of_drivers ) ); _IO_Number_of_drivers = number_of_drivers; memset( 464fe: 4eb9 0004 f484 jsr 4f484 _IO_Driver_address_table, 0, sizeof( rtems_driver_address_table ) * ( number_of_drivers ) ); for ( index = 0 ; index < drivers_in_table ; index++ ) 46504: 4fef 0010 lea %sp@(16),%sp 46508: 4a82 tstl %d2 4650a: 67c4 beqs 464d0 <_IO_Manager_initialization+0x2a><== NEVER TAKEN 4650c: 2839 0005 f808 movel 5f808 <_IO_Driver_address_table>,%d4 46512: 4280 clrl %d0 46514: 4281 clrl %d1 _IO_Driver_address_table[index] = driver_table[index]; 46516: 2243 moveal %d3,%a1 46518: 2044 moveal %d4,%a0 4651a: d3c0 addal %d0,%a1 4651c: d1c0 addal %d0,%a0 memset( _IO_Driver_address_table, 0, sizeof( rtems_driver_address_table ) * ( number_of_drivers ) ); for ( index = 0 ; index < drivers_in_table ; index++ ) 4651e: 5281 addql #1,%d1 46520: 0680 0000 0018 addil #24,%d0 _IO_Driver_address_table[index] = driver_table[index]; 46526: 20d9 movel %a1@+,%a0@+ 46528: 20d9 movel %a1@+,%a0@+ 4652a: 20d9 movel %a1@+,%a0@+ 4652c: 20d9 movel %a1@+,%a0@+ 4652e: 20d9 movel %a1@+,%a0@+ 46530: 2091 movel %a1@,%a0@ memset( _IO_Driver_address_table, 0, sizeof( rtems_driver_address_table ) * ( number_of_drivers ) ); for ( index = 0 ; index < drivers_in_table ; index++ ) 46532: b282 cmpl %d2,%d1 46534: 649a bccs 464d0 <_IO_Manager_initialization+0x2a> _IO_Driver_address_table[index] = driver_table[index]; 46536: 2243 moveal %d3,%a1 46538: 2044 moveal %d4,%a0 4653a: d3c0 addal %d0,%a1 4653c: d1c0 addal %d0,%a0 memset( _IO_Driver_address_table, 0, sizeof( rtems_driver_address_table ) * ( number_of_drivers ) ); for ( index = 0 ; index < drivers_in_table ; index++ ) 4653e: 5281 addql #1,%d1 46540: 0680 0000 0018 addil #24,%d0 _IO_Driver_address_table[index] = driver_table[index]; 46546: 20d9 movel %a1@+,%a0@+ 46548: 20d9 movel %a1@+,%a0@+ 4654a: 20d9 movel %a1@+,%a0@+ 4654c: 20d9 movel %a1@+,%a0@+ 4654e: 20d9 movel %a1@+,%a0@+ 46550: 2091 movel %a1@,%a0@ memset( _IO_Driver_address_table, 0, sizeof( rtems_driver_address_table ) * ( number_of_drivers ) ); for ( index = 0 ; index < drivers_in_table ; index++ ) 46552: b282 cmpl %d2,%d1 46554: 65c0 bcss 46516 <_IO_Manager_initialization+0x70><== NEVER TAKEN 46556: 6000 ff78 braw 464d0 <_IO_Manager_initialization+0x2a> ... =============================================================================== 00046fcc <_Internal_error_Occurred>: _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 ); 46fcc: 4280 clrl %d0 void _Internal_error_Occurred( Internal_errors_Source the_source, bool is_internal, Internal_errors_t the_error ) { 46fce: 4e56 0000 linkw %fp,#0 46fd2: 222e 000c movel %fp@(12),%d1 _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 ); 46fd6: 1001 moveb %d1,%d0 46fd8: 2040 moveal %d0,%a0 void _Internal_error_Occurred( Internal_errors_Source the_source, bool is_internal, Internal_errors_t the_error ) { 46fda: 2f03 movel %d3,%sp@- 46fdc: 202e 0008 movel %fp@(8),%d0 46fe0: 2f02 movel %d2,%sp@- 46fe2: 242e 0010 movel %fp@(16),%d2 _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 ); 46fe6: 2f02 movel %d2,%sp@- Internal_errors_t the_error ) { _Internal_errors_What_happened.the_source = the_source; _Internal_errors_What_happened.is_internal = is_internal; 46fe8: 13c1 0005 f022 moveb %d1,5f022 <_Internal_errors_What_happened+0x4> _Internal_errors_What_happened.the_error = the_error; _User_extensions_Fatal( the_source, is_internal, the_error ); 46fee: 2f08 movel %a0,%sp@- bool is_internal, Internal_errors_t the_error ) { _Internal_errors_What_happened.the_source = the_source; 46ff0: 23c0 0005 f01e movel %d0,5f01e <_Internal_errors_What_happened> _Internal_errors_What_happened.is_internal = is_internal; _Internal_errors_What_happened.the_error = the_error; _User_extensions_Fatal( the_source, is_internal, the_error ); 46ff6: 2f00 movel %d0,%sp@- ) { _Internal_errors_What_happened.the_source = the_source; _Internal_errors_What_happened.is_internal = is_internal; _Internal_errors_What_happened.the_error = the_error; 46ff8: 23c2 0005 f024 movel %d2,5f024 <_Internal_errors_What_happened+0x6> _User_extensions_Fatal( the_source, is_internal, the_error ); 46ffe: 4eb9 0004 8df2 jsr 48df2 <_User_extensions_Fatal> _System_state_Set( SYSTEM_STATE_FAILED ); _CPU_Fatal_halt( the_error ); 47004: 307c 0700 moveaw #1792,%a0 47008: 2608 movel %a0,%d3 4700a: 40c0 movew %sr,%d0 4700c: 8083 orl %d3,%d0 4700e: 46c0 movew %d0,%sr 47010: 2002 movel %d2,%d0 <== NOT EXECUTED 47012: 223c dead beef movel #-559038737,%d1 <== NOT EXECUTED 47018: 4ac8 halt <== NOT EXECUTED RTEMS_INLINE_ROUTINE void _System_state_Set ( System_state_Codes state ) { _System_state_Current = state; 4701a: 7005 moveq #5,%d0 4701c: 4fef 000c lea %sp@(12),%sp 47020: 23c0 0005 f100 movel %d0,5f100 <_System_state_Current> 47026: 60fe bras 47026 <_Internal_error_Occurred+0x5a> =============================================================================== 00047090 <_Objects_Allocate>: */ Objects_Control *_Objects_Allocate( Objects_Information *information ) { 47090: 4e56 fff0 linkw %fp,#-16 47094: 48d7 0c0c moveml %d2-%d3/%a2-%a3,%sp@ 47098: 246e 0008 moveal %fp@(8),%a2 * If the application is using the optional manager stubs and * still attempts to create the object, the information block * should be all zeroed out because it is in the BSS. So let's * check that code for this manager is even present. */ if ( information->size == 0 ) 4709c: 4aaa 0014 tstl %a2@(20) 470a0: 660c bnes 470ae <_Objects_Allocate+0x1e> <== ALWAYS TAKEN 470a2: 4280 clrl %d0 <== NOT EXECUTED information->inactive--; } } return the_object; } 470a4: 4cee 0c0c fff0 moveml %fp@(-16),%d2-%d3/%a2-%a3 470aa: 4e5e unlk %fp 470ac: 4e75 rts /* * OK. The manager should be initialized and configured to have objects. * With any luck, it is safe to attempt to allocate an object. */ the_object = (Objects_Control *) _Chain_Get( &information->Inactive ); 470ae: 240a movel %a2,%d2 470b0: 0682 0000 001c addil #28,%d2 470b6: 47f9 0004 b9c0 lea 4b9c0 <_Chain_Get>,%a3 470bc: 2f02 movel %d2,%sp@- 470be: 4e93 jsr %a3@ if ( information->auto_extend ) { 470c0: 588f addql #4,%sp 470c2: 4a2a 0010 tstb %a2@(16) 470c6: 67dc beqs 470a4 <_Objects_Allocate+0x14> /* * If the list is empty then we are out of objects and need to * extend information base. */ if ( !the_object ) { 470c8: 4a80 tstl %d0 470ca: 6738 beqs 47104 <_Objects_Allocate+0x74> } if ( the_object ) { uint32_t block; block = (uint32_t) _Objects_Get_index( the_object->id ) - 470cc: 2040 moveal %d0,%a0 470ce: 4281 clrl %d1 470d0: 4283 clrl %d3 _Objects_Get_index( information->minimum_id ); block /= information->allocation_size; information->inactive_per_block[ block ]--; 470d2: 4282 clrl %d2 } if ( the_object ) { uint32_t block; block = (uint32_t) _Objects_Get_index( the_object->id ) - 470d4: 362a 0008 movew %a2@(8),%d3 470d8: 3228 000a movew %a0@(10),%d1 _Objects_Get_index( information->minimum_id ); block /= information->allocation_size; information->inactive_per_block[ block ]--; information->inactive--; 470dc: 306a 0028 moveaw %a2@(40),%a0 block = (uint32_t) _Objects_Get_index( the_object->id ) - _Objects_Get_index( information->minimum_id ); block /= information->allocation_size; information->inactive_per_block[ block ]--; 470e0: 342a 0012 movew %a2@(18),%d2 } if ( the_object ) { uint32_t block; block = (uint32_t) _Objects_Get_index( the_object->id ) - 470e4: 9283 subl %d3,%d1 _Objects_Get_index( information->minimum_id ); block /= information->allocation_size; information->inactive_per_block[ block ]--; information->inactive--; 470e6: 5388 subql #1,%a0 block = (uint32_t) _Objects_Get_index( the_object->id ) - _Objects_Get_index( information->minimum_id ); block /= information->allocation_size; information->inactive_per_block[ block ]--; 470e8: 4c42 1001 remul %d2,%d1,%d1 information->inactive--; 470ec: 3548 0028 movew %a0,%a2@(40) block = (uint32_t) _Objects_Get_index( the_object->id ) - _Objects_Get_index( information->minimum_id ); block /= information->allocation_size; information->inactive_per_block[ block ]--; 470f0: 206a 002a moveal %a2@(42),%a0 470f4: e589 lsll #2,%d1 information->inactive--; } } return the_object; } 470f6: 4cee 0c0c fff0 moveml %fp@(-16),%d2-%d3/%a2-%a3 470fc: 4e5e unlk %fp block = (uint32_t) _Objects_Get_index( the_object->id ) - _Objects_Get_index( information->minimum_id ); block /= information->allocation_size; information->inactive_per_block[ block ]--; 470fe: d1c1 addal %d1,%a0 47100: 5390 subql #1,%a0@ information->inactive--; } } return the_object; } 47102: 4e75 rts * If the list is empty then we are out of objects and need to * extend information base. */ if ( !the_object ) { _Objects_Extend_information( information ); 47104: 2f0a movel %a2,%sp@- 47106: 4eb9 0004 714c jsr 4714c <_Objects_Extend_information> the_object = (Objects_Control *) _Chain_Get( &information->Inactive ); 4710c: 2f02 movel %d2,%sp@- 4710e: 4e93 jsr %a3@ } if ( the_object ) { 47110: 508f addql #8,%sp 47112: 4a80 tstl %d0 47114: 66b6 bnes 470cc <_Objects_Allocate+0x3c> information->inactive--; } } return the_object; } 47116: 4cee 0c0c fff0 moveml %fp@(-16),%d2-%d3/%a2-%a3 4711c: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00047120 <_Objects_Close>: #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 47120: 4280 clrl %d0 void _Objects_Close( Objects_Information *information, Objects_Control *the_object ) { 47122: 4e56 0000 linkw %fp,#0 47126: 226e 000c moveal %fp@(12),%a1 4712a: 206e 0008 moveal %fp@(8),%a0 4712e: 2f0a movel %a2,%sp@- 47130: 2468 0018 moveal %a0@(24),%a2 47134: 3029 000a movew %a1@(10),%d0 47138: 42b2 0c00 clrl %a2@(00000000,%d0:l:4) _Objects_Invalidate_Id( information, the_object ); _Objects_Namespace_remove( information, the_object ); 4713c: 2d49 000c movel %a1,%fp@(12) } 47140: 245f moveal %sp@+,%a2 47142: 4e5e unlk %fp Objects_Control *the_object ) { _Objects_Invalidate_Id( information, the_object ); _Objects_Namespace_remove( information, the_object ); 47144: 4ef9 0004 76a8 jmp 476a8 <_Objects_Namespace_remove> ... =============================================================================== 0004714c <_Objects_Extend_information>: */ void _Objects_Extend_information( Objects_Information *information ) { 4714c: 4e56 ffcc linkw %fp,#-52 47150: 48d7 3cfc moveml %d2-%d7/%a2-%a5,%sp@ 47154: 246e 0008 moveal %fp@(8),%a2 /* * Search for a free block of indexes. The block variable ends up set * to block_count + 1 if the table needs to be extended. */ minimum_index = _Objects_Get_index( information->minimum_id ); 47158: 4285 clrl %d5 index_base = minimum_index; block = 0; /* if ( information->maximum < minimum_index ) */ if ( information->object_blocks == NULL ) 4715a: 206a 002e moveal %a2@(46),%a0 /* * Search for a free block of indexes. The block variable ends up set * to block_count + 1 if the table needs to be extended. */ minimum_index = _Objects_Get_index( information->minimum_id ); 4715e: 3a2a 0008 movew %a2@(8),%d5 index_base = minimum_index; block = 0; /* if ( information->maximum < minimum_index ) */ if ( information->object_blocks == NULL ) 47162: 4a88 tstl %a0 47164: 6700 022c beqw 47392 <_Objects_Extend_information+0x246> block_count = 0; else { block_count = information->maximum / information->allocation_size; 47168: 322a 000e movew %a2@(14),%d1 4716c: 302a 0012 movew %a2@(18),%d0 47170: 3801 movew %d1,%d4 47172: 0284 0000 ffff andil #65535,%d4 47178: 88c0 divuw %d0,%d4 4717a: 0284 0000 ffff andil #65535,%d4 for ( ; block < block_count; block++ ) { 47180: 6700 0224 beqw 473a6 <_Objects_Extend_information+0x25a> if ( information->object_blocks[ block ] == NULL ) 47184: 4a90 tstl %a0@ 47186: 6700 021e beqw 473a6 <_Objects_Extend_information+0x25a> 4718a: 5888 addql #4,%a0 4718c: 2605 movel %d5,%d3 4718e: 4282 clrl %d2 47190: 0280 0000 ffff andil #65535,%d0 break; else index_base += information->allocation_size; 47196: d680 addl %d0,%d3 if ( information->object_blocks == NULL ) block_count = 0; else { block_count = information->maximum / information->allocation_size; for ( ; block < block_count; block++ ) { 47198: 5282 addql #1,%d2 4719a: b484 cmpl %d4,%d2 4719c: 6404 bccs 471a2 <_Objects_Extend_information+0x56> if ( information->object_blocks[ block ] == NULL ) 4719e: 4a98 tstl %a0@+ 471a0: 66f4 bnes 47196 <_Objects_Extend_information+0x4a> else index_base += information->allocation_size; } } maximum = (uint32_t) information->maximum + information->allocation_size; 471a2: 0281 0000 ffff andil #65535,%d1 471a8: 2641 moveal %d1,%a3 471aa: d7c0 addal %d0,%a3 /* * 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 ) { 471ac: b7fc 0000 ffff cmpal #65535,%a3 471b2: 6200 0186 bhiw 4733a <_Objects_Extend_information+0x1ee> /* * 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; 471b6: 41ea 0014 lea %a2@(20),%a0 471ba: 4c10 0800 mulsl %a0@,%d0 if ( information->auto_extend ) { 471be: 4a2a 0010 tstb %a2@(16) 471c2: 6700 0180 beqw 47344 <_Objects_Extend_information+0x1f8> new_object_block = _Workspace_Allocate( block_size ); 471c6: 2f00 movel %d0,%sp@- 471c8: 4eb9 0004 91f4 jsr 491f4 <_Workspace_Allocate> if ( !new_object_block ) 471ce: 588f addql #4,%sp * 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 ); 471d0: 2c00 movel %d0,%d6 if ( !new_object_block ) 471d2: 6700 0166 beqw 4733a <_Objects_Extend_information+0x1ee> } /* * If the index_base is the maximum we need to grow the tables. */ if (index_base >= information->maximum ) { 471d6: 4280 clrl %d0 471d8: 302a 000e movew %a2@(14),%d0 471dc: b083 cmpl %d3,%d0 471de: 6200 00c4 bhiw 472a4 <_Objects_Extend_information+0x158> */ /* * Up the block count and maximum */ block_count++; 471e2: 2a44 moveal %d4,%a5 471e4: 528d addql #1,%a5 * Allocate the tables and break it up. */ block_size = block_count * (sizeof(void *) + sizeof(uint32_t) + sizeof(Objects_Name *)) + ((maximum + minimum_index) * sizeof(Objects_Control *)); object_blocks = (void**) _Workspace_Allocate( block_size ); 471e6: 200b movel %a3,%d0 471e8: 41f5 da00 lea %a5@(00000000,%a5:l:2),%a0 471ec: d088 addl %a0,%d0 471ee: d085 addl %d5,%d0 471f0: e588 lsll #2,%d0 471f2: 2f00 movel %d0,%sp@- 471f4: 4eb9 0004 91f4 jsr 491f4 <_Workspace_Allocate> if ( !object_blocks ) { 471fa: 588f addql #4,%sp * Allocate the tables and break it up. */ block_size = block_count * (sizeof(void *) + sizeof(uint32_t) + sizeof(Objects_Name *)) + ((maximum + minimum_index) * sizeof(Objects_Control *)); object_blocks = (void**) _Workspace_Allocate( block_size ); 471fc: 2840 moveal %d0,%a4 if ( !object_blocks ) { 471fe: 4a80 tstl %d0 47200: 6700 01b2 beqw 473b4 <_Objects_Extend_information+0x268> } /* * Break the block into the various sections. */ inactive_per_block = (uint32_t *) _Addresses_Add_offset( 47204: 2e0d movel %a5,%d7 * Take the block count down. Saves all the (block_count - 1) * in the copies. */ block_count--; if ( information->maximum > minimum_index ) { 47206: 4280 clrl %d0 } /* * Break the block into the various sections. */ inactive_per_block = (uint32_t *) _Addresses_Add_offset( 47208: e58f lsll #2,%d7 * Take the block count down. Saves all the (block_count - 1) * in the copies. */ block_count--; if ( information->maximum > minimum_index ) { 4720a: 302a 000e movew %a2@(14),%d0 RTEMS_INLINE_ROUTINE void *_Addresses_Add_offset ( const void *base, uintptr_t offset ) { return (void *)((uintptr_t)base + offset); 4720e: 4bf4 7800 lea %a4@(00000000,%d7:l),%a5 47212: de8d addl %a5,%d7 47214: b085 cmpl %d5,%d0 47216: 6200 013c bhiw 47354 <_Objects_Extend_information+0x208> } else { /* * Deal with the special case of the 0 to minimum_index */ for ( index = 0; index < minimum_index; index++ ) { 4721a: 4a85 tstl %d5 4721c: 670c beqs 4722a <_Objects_Extend_information+0xde><== NEVER TAKEN information->object_blocks, block_count * sizeof(void*) ); memcpy( inactive_per_block, information->inactive_per_block, block_count * sizeof(uint32_t) ); memcpy( local_table, 4721e: 2047 moveal %d7,%a0 47220: 4280 clrl %d0 /* * Deal with the special case of the 0 to minimum_index */ for ( index = 0; index < minimum_index; index++ ) { local_table[ index ] = NULL; 47222: 4298 clrl %a0@+ } else { /* * Deal with the special case of the 0 to minimum_index */ for ( index = 0; index < minimum_index; index++ ) { 47224: 5280 addql #1,%d0 47226: b085 cmpl %d5,%d0 47228: 65f8 bcss 47222 <_Objects_Extend_information+0xd6><== NEVER TAKEN 4722a: e58c lsll #2,%d4 */ object_blocks[block_count] = NULL; inactive_per_block[block_count] = 0; for ( index=index_base ; index < ( information->allocation_size + index_base ); 4722c: 4281 clrl %d1 4722e: 322a 0012 movew %a2@(18),%d1 /* * Initialise the new entries in the table. */ object_blocks[block_count] = NULL; inactive_per_block[block_count] = 0; 47232: 42b5 4800 clrl %a5@(00000000,%d4:l) for ( index=index_base ; index < ( information->allocation_size + index_base ); 47236: d283 addl %d3,%d1 } /* * Initialise the new entries in the table. */ object_blocks[block_count] = NULL; 47238: 42b4 4800 clrl %a4@(00000000,%d4:l) inactive_per_block[block_count] = 0; for ( index=index_base ; 4723c: b283 cmpl %d3,%d1 4723e: 6310 blss 47250 <_Objects_Extend_information+0x104><== NEVER TAKEN 47240: 2247 moveal %d7,%a1 47242: 2003 movel %d3,%d0 47244: 41f1 3c00 lea %a1@(00000000,%d3:l:4),%a0 index < ( information->allocation_size + index_base ); index++ ) { local_table[ index ] = NULL; 47248: 4298 clrl %a0@+ object_blocks[block_count] = NULL; inactive_per_block[block_count] = 0; for ( index=index_base ; index < ( information->allocation_size + index_base ); index++ ) { 4724a: 5280 addql #1,%d0 * Initialise the new entries in the table. */ object_blocks[block_count] = NULL; inactive_per_block[block_count] = 0; for ( index=index_base ; 4724c: b280 cmpl %d0,%d1 4724e: 62f8 bhis 47248 <_Objects_Extend_information+0xfc> index < ( information->allocation_size + index_base ); index++ ) { local_table[ index ] = NULL; } _ISR_Disable( level ); 47250: 203c 0000 0700 movel #1792,%d0 47256: 40c4 movew %sr,%d4 47258: 8084 orl %d4,%d0 4725a: 46c0 movew %d0,%sr 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( 4725c: 2012 movel %a2@,%d0 4725e: 7218 moveq #24,%d1 47260: 4285 clrl %d5 47262: e3a8 lsll %d1,%d0 47264: 3a0b movew %a3,%d5 47266: 4281 clrl %d1 47268: 2245 moveal %d5,%a1 4726a: 7a1b moveq #27,%d5 4726c: 322a 0004 movew %a2@(4),%d1 47270: 08c0 0010 bset #16,%d0 local_table[ index ] = NULL; } _ISR_Disable( level ); old_tables = information->object_blocks; 47274: 206a 002e moveal %a2@(46),%a0 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( 47278: eba9 lsll %d5,%d1 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; 4727a: 354b 000e movew %a3,%a2@(14) _ISR_Disable( level ); old_tables = information->object_blocks; information->object_blocks = object_blocks; 4727e: 254c 002e movel %a4,%a2@(46) information->inactive_per_block = inactive_per_block; information->local_table = local_table; information->maximum = (Objects_Maximum) maximum; information->maximum_id = _Objects_Build_id( 47282: 8081 orl %d1,%d0 47284: 2209 movel %a1,%d1 47286: 8280 orl %d0,%d1 _ISR_Disable( level ); old_tables = information->object_blocks; information->object_blocks = object_blocks; information->inactive_per_block = inactive_per_block; 47288: 254d 002a movel %a5,%a2@(42) information->local_table = local_table; information->maximum = (Objects_Maximum) maximum; information->maximum_id = _Objects_Build_id( 4728c: 2541 000a movel %d1,%a2@(10) old_tables = information->object_blocks; information->object_blocks = object_blocks; information->inactive_per_block = inactive_per_block; information->local_table = local_table; 47290: 2547 0018 movel %d7,%a2@(24) information->the_class, _Objects_Local_node, information->maximum ); _ISR_Enable( level ); 47294: 46c4 movew %d4,%sr if ( old_tables ) 47296: 4a88 tstl %a0 47298: 670a beqs 472a4 <_Objects_Extend_information+0x158> _Workspace_Free( old_tables ); 4729a: 2f08 movel %a0,%sp@- 4729c: 4eb9 0004 9210 jsr 49210 <_Workspace_Free> 472a2: 588f addql #4,%sp } /* * Assign the new object block to the object block table. */ information->object_blocks[ block ] = new_object_block; 472a4: 206a 002e moveal %a2@(46),%a0 /* * Initialize objects .. add to a local chain first. */ _Chain_Initialize( 472a8: 4280 clrl %d0 472aa: 280e movel %fp,%d4 472ac: 0684 ffff fff4 addil #-12,%d4 472b2: 47f9 0004 b9c0 lea 4b9c0 <_Chain_Get>,%a3 information->the_class, _Objects_Local_node, index ); _Chain_Append( &information->Inactive, &the_object->Node ); 472b8: 2a0a movel %a2,%d5 472ba: 0685 0000 001c addil #28,%d5 472c0: 49f9 0004 6798 lea 46798 <_Chain_Append>,%a4 } /* * Assign the new object block to the object block table. */ information->object_blocks[ block ] = new_object_block; 472c6: e58a lsll #2,%d2 /* * Initialize objects .. add to a local chain first. */ _Chain_Initialize( 472c8: 302a 0012 movew %a2@(18),%d0 } /* * Assign the new object block to the object block table. */ information->object_blocks[ block ] = new_object_block; 472cc: 2186 2800 movel %d6,%a0@(00000000,%d2:l) /* * Initialize objects .. add to a local chain first. */ _Chain_Initialize( 472d0: 2f2a 0014 movel %a2@(20),%sp@- 472d4: 2f00 movel %d0,%sp@- 472d6: 2f06 movel %d6,%sp@- 472d8: 2f04 movel %d4,%sp@- 472da: 4eb9 0004 b9fc jsr 4b9fc <_Chain_Initialize> /* * Move from the local chain, initialise, then append to the inactive chain */ index = index_base; while ((the_object = (Objects_Control *) _Chain_Get( &Inactive )) != NULL ) { 472e0: 4fef 0010 lea %sp@(16),%sp 472e4: 2f04 movel %d4,%sp@- 472e6: 4e93 jsr %a3@ 472e8: 588f addql #4,%sp 472ea: 4a80 tstl %d0 472ec: 6732 beqs 47320 <_Objects_Extend_information+0x1d4><== NEVER TAKEN the_object->id = _Objects_Build_id( 472ee: 2212 movel %a2@,%d1 472f0: 7c18 moveq #24,%d6 472f2: 7e1b moveq #27,%d7 472f4: 2040 moveal %d0,%a0 472f6: eda9 lsll %d6,%d1 472f8: 4286 clrl %d6 472fa: 3c2a 0004 movew %a2@(4),%d6 472fe: 08c1 0010 bset #16,%d1 47302: efae lsll %d7,%d6 47304: 8286 orl %d6,%d1 47306: 8283 orl %d3,%d1 index ); _Chain_Append( &information->Inactive, &the_object->Node ); index++; 47308: 5283 addql #1,%d3 */ index = index_base; while ((the_object = (Objects_Control *) _Chain_Get( &Inactive )) != NULL ) { the_object->id = _Objects_Build_id( 4730a: 2141 0008 movel %d1,%a0@(8) information->the_class, _Objects_Local_node, index ); _Chain_Append( &information->Inactive, &the_object->Node ); 4730e: 2f00 movel %d0,%sp@- 47310: 2f05 movel %d5,%sp@- 47312: 4e94 jsr %a4@ index++; 47314: 508f addql #8,%sp /* * Move from the local chain, initialise, then append to the inactive chain */ index = index_base; while ((the_object = (Objects_Control *) _Chain_Get( &Inactive )) != NULL ) { 47316: 2f04 movel %d4,%sp@- 47318: 4e93 jsr %a3@ 4731a: 588f addql #4,%sp 4731c: 4a80 tstl %d0 4731e: 66ce bnes 472ee <_Objects_Extend_information+0x1a2> _Chain_Append( &information->Inactive, &the_object->Node ); index++; } information->inactive_per_block[ block ] = information->allocation_size; 47320: 4280 clrl %d0 information->inactive = 47322: 322a 0028 movew %a2@(40),%d1 47326: 326a 0012 moveaw %a2@(18),%a1 _Chain_Append( &information->Inactive, &the_object->Node ); index++; } information->inactive_per_block[ block ] = information->allocation_size; 4732a: 206a 002a moveal %a2@(42),%a0 information->inactive = 4732e: d289 addl %a1,%d1 _Chain_Append( &information->Inactive, &the_object->Node ); index++; } information->inactive_per_block[ block ] = information->allocation_size; 47330: 3009 movew %a1,%d0 information->inactive = 47332: 3541 0028 movew %d1,%a2@(40) _Chain_Append( &information->Inactive, &the_object->Node ); index++; } information->inactive_per_block[ block ] = information->allocation_size; 47336: 2180 2800 movel %d0,%a0@(00000000,%d2:l) information->inactive = (Objects_Maximum)(information->inactive + information->allocation_size); } 4733a: 4cee 3cfc ffcc moveml %fp@(-52),%d2-%d7/%a2-%a5 47340: 4e5e unlk %fp 47342: 4e75 rts if ( information->auto_extend ) { new_object_block = _Workspace_Allocate( block_size ); if ( !new_object_block ) return; } else { new_object_block = _Workspace_Allocate_or_fatal_error( block_size ); 47344: 2f00 movel %d0,%sp@- 47346: 4eb9 0004 91c0 jsr 491c0 <_Workspace_Allocate_or_fatal_error> 4734c: 588f addql #4,%sp 4734e: 2c00 movel %d0,%d6 47350: 6000 fe84 braw 471d6 <_Objects_Extend_information+0x8a> /* * 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, 47354: e58c lsll #2,%d4 47356: 2f04 movel %d4,%sp@- 47358: 2f2a 002e movel %a2@(46),%sp@- 4735c: 2f0c movel %a4,%sp@- 4735e: 4eb9 0004 f414 jsr 4f414 information->object_blocks, block_count * sizeof(void*) ); memcpy( inactive_per_block, 47364: 2f04 movel %d4,%sp@- 47366: 2f2a 002a movel %a2@(42),%sp@- 4736a: 2f0d movel %a5,%sp@- 4736c: 4eb9 0004 f414 jsr 4f414 information->inactive_per_block, block_count * sizeof(uint32_t) ); memcpy( local_table, 47372: 4280 clrl %d0 47374: 302a 000e movew %a2@(14),%d0 47378: da80 addl %d0,%d5 4737a: e58d lsll #2,%d5 4737c: 2f05 movel %d5,%sp@- 4737e: 2f2a 0018 movel %a2@(24),%sp@- 47382: 2f07 movel %d7,%sp@- 47384: 4eb9 0004 f414 jsr 4f414 4738a: 4fef 0024 lea %sp@(36),%sp 4738e: 6000 fe9c braw 4722c <_Objects_Extend_information+0xe0> minimum_index = _Objects_Get_index( information->minimum_id ); index_base = minimum_index; block = 0; /* if ( information->maximum < minimum_index ) */ if ( information->object_blocks == NULL ) 47392: 4280 clrl %d0 47394: 2605 movel %d5,%d3 47396: 4282 clrl %d2 47398: 4284 clrl %d4 4739a: 322a 000e movew %a2@(14),%d1 4739e: 302a 0012 movew %a2@(18),%d0 473a2: 6000 fdfe braw 471a2 <_Objects_Extend_information+0x56> block_count = 0; else { block_count = information->maximum / information->allocation_size; for ( ; block < block_count; block++ ) { if ( information->object_blocks[ block ] == NULL ) 473a6: 2605 movel %d5,%d3 <== NOT EXECUTED 473a8: 4282 clrl %d2 <== NOT EXECUTED 473aa: 0280 0000 ffff andil #65535,%d0 <== NOT EXECUTED 473b0: 6000 fdf0 braw 471a2 <_Objects_Extend_information+0x56><== 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 ); 473b4: 2f06 movel %d6,%sp@- 473b6: 4eb9 0004 9210 jsr 49210 <_Workspace_Free> return; 473bc: 588f addql #4,%sp } information->inactive_per_block[ block ] = information->allocation_size; information->inactive = (Objects_Maximum)(information->inactive + information->allocation_size); } 473be: 4cee 3cfc ffcc moveml %fp@(-52),%d2-%d7/%a2-%a5 473c4: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00047478 <_Objects_Get_information>: Objects_Information *_Objects_Get_information( Objects_APIs the_api, uint32_t the_class ) { 47478: 4e56 0000 linkw %fp,#0 4747c: 2f02 movel %d2,%sp@- 4747e: 242e 000c movel %fp@(12),%d2 Objects_Information *info; int the_class_api_maximum; if ( !the_class ) 47482: 660a bnes 4748e <_Objects_Get_information+0x16> * In a multprocessing configuration, we may access remote objects. * Thus we may have 0 local instances and still have a valid object * pointer. */ #if !defined(RTEMS_MULTIPROCESSING) if ( info->maximum == 0 ) 47484: 4280 clrl %d0 return NULL; #endif return info; } 47486: 242e fffc movel %fp@(-4),%d2 4748a: 4e5e unlk %fp 4748c: 4e75 rts /* * This call implicitly validates the_api so we do not call * _Objects_Is_api_valid above here. */ the_class_api_maximum = _Objects_API_maximum_class( the_api ); 4748e: 2f2e 0008 movel %fp@(8),%sp@- 47492: 4eb9 0004 bfd4 jsr 4bfd4 <_Objects_API_maximum_class> if ( the_class_api_maximum == 0 ) 47498: 588f addql #4,%sp 4749a: 4a80 tstl %d0 4749c: 67e6 beqs 47484 <_Objects_Get_information+0xc> return NULL; if ( the_class > (uint32_t) the_class_api_maximum ) 4749e: b082 cmpl %d2,%d0 474a0: 65e2 bcss 47484 <_Objects_Get_information+0xc> return NULL; if ( !_Objects_Information_table[ the_api ] ) 474a2: 202e 0008 movel %fp@(8),%d0 474a6: 41f9 0005 ef30 lea 5ef30 <_Objects_Information_table>,%a0 474ac: 2070 0c00 moveal %a0@(00000000,%d0:l:4),%a0 474b0: 4a88 tstl %a0 474b2: 67d0 beqs 47484 <_Objects_Get_information+0xc> <== NEVER TAKEN return NULL; info = _Objects_Information_table[ the_api ][ the_class ]; 474b4: 2030 2c00 movel %a0@(00000000,%d2:l:4),%d0 if ( !info ) 474b8: 67cc beqs 47486 <_Objects_Get_information+0xe> <== NEVER TAKEN * In a multprocessing configuration, we may access remote objects. * Thus we may have 0 local instances and still have a valid object * pointer. */ #if !defined(RTEMS_MULTIPROCESSING) if ( info->maximum == 0 ) 474ba: 2040 moveal %d0,%a0 474bc: 4a68 000e tstw %a0@(14) 474c0: 67c2 beqs 47484 <_Objects_Get_information+0xc> return NULL; #endif return info; } 474c2: 242e fffc movel %fp@(-4),%d2 474c6: 4e5e unlk %fp ... =============================================================================== 00049000 <_Objects_Get_name_as_string>: char *_Objects_Get_name_as_string( Objects_Id id, size_t length, char *name ) { 49000: 4e56 ffe0 linkw %fp,#-32 49004: 48d7 043c moveml %d2-%d5/%a2,%sp@ 49008: 262e 000c movel %fp@(12),%d3 4900c: 242e 0010 movel %fp@(16),%d2 char lname[5]; Objects_Control *the_object; Objects_Locations location; Objects_Id tmpId; if ( length == 0 ) 49010: 4a83 tstl %d3 49012: 660e bnes 49022 <_Objects_Get_name_as_string+0x22> } } *d = '\0'; _Thread_Enable_dispatch(); return name; 49014: 4282 clrl %d2 } return NULL; /* unreachable path */ } 49016: 2002 movel %d2,%d0 49018: 4cee 043c ffe0 moveml %fp@(-32),%d2-%d5/%a2 4901e: 4e5e unlk %fp 49020: 4e75 rts Objects_Id tmpId; if ( length == 0 ) return NULL; if ( name == NULL ) 49022: 4a82 tstl %d2 49024: 67f0 beqs 49016 <_Objects_Get_name_as_string+0x16> return NULL; tmpId = (id == OBJECTS_ID_OF_SELF) ? _Thread_Executing->Object.id : id; 49026: 4aae 0008 tstl %fp@(8) 4902a: 6700 0092 beqw 490be <_Objects_Get_name_as_string+0xbe> 4902e: 282e 0008 movel %fp@(8),%d4 information = _Objects_Get_information_id( tmpId ); 49032: 2f04 movel %d4,%sp@- 49034: 4eb9 0004 8f20 jsr 48f20 <_Objects_Get_information_id> if ( !information ) 4903a: 588f addql #4,%sp if ( name == NULL ) return NULL; tmpId = (id == OBJECTS_ID_OF_SELF) ? _Thread_Executing->Object.id : id; information = _Objects_Get_information_id( tmpId ); 4903c: 2440 moveal %d0,%a2 if ( !information ) 4903e: 4a80 tstl %d0 49040: 67d2 beqs 49014 <_Objects_Get_name_as_string+0x14> return NULL; the_object = _Objects_Get( information, tmpId, &location ); 49042: 486e fffc pea %fp@(-4) 49046: 2f04 movel %d4,%sp@- 49048: 2f00 movel %d0,%sp@- 4904a: 4eb9 0004 9100 jsr 49100 <_Objects_Get> switch ( location ) { 49050: 4fef 000c lea %sp@(12),%sp 49054: 4aae fffc tstl %fp@(-4) 49058: 66ba bnes 49014 <_Objects_Get_name_as_string+0x14> return NULL; case OBJECTS_LOCAL: #if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES) if ( information->is_string ) { 4905a: 4a2a 0032 tstb %a2@(50) 4905e: 676c beqs 490cc <_Objects_Get_name_as_string+0xcc> s = the_object->name.name_p; 49060: 2040 moveal %d0,%a0 49062: 2468 000c moveal %a0@(12),%a2 lname[ 4 ] = '\0'; s = lname; } d = name; if ( s ) { 49066: 4a8a tstl %a2 49068: 6748 beqs 490b2 <_Objects_Get_name_as_string+0xb2> for ( i=0 ; i<(length-1) && *s ; i++, s++, d++ ) { 4906a: 5383 subql #1,%d3 4906c: 6744 beqs 490b2 <_Objects_Get_name_as_string+0xb2><== NEVER TAKEN 4906e: 1012 moveb %a2@,%d0 49070: 6740 beqs 490b2 <_Objects_Get_name_as_string+0xb2> 49072: 2042 moveal %d2,%a0 49074: 4281 clrl %d1 *d = (isprint((unsigned char)*s)) ? *s : '*'; 49076: 4284 clrl %d4 49078: 1800 moveb %d0,%d4 s = lname; } d = name; if ( s ) { for ( i=0 ; i<(length-1) && *s ; i++, s++, d++ ) { 4907a: 5281 addql #1,%d1 *d = (isprint((unsigned char)*s)) ? *s : '*'; 4907c: 2279 0006 015c moveal 6015c <__ctype_ptr__>,%a1 49082: 1831 4801 moveb %a1@(00000001,%d4:l),%d4 49086: 49c4 extbl %d4 49088: 0284 0000 0097 andil #151,%d4 4908e: 6602 bnes 49092 <_Objects_Get_name_as_string+0x92> 49090: 702a moveq #42,%d0 49092: 10c0 moveb %d0,%a0@+ s = lname; } d = name; if ( s ) { for ( i=0 ; i<(length-1) && *s ; i++, s++, d++ ) { 49094: b681 cmpl %d1,%d3 49096: 6306 blss 4909e <_Objects_Get_name_as_string+0x9e> 49098: 1032 1800 moveb %a2@(00000000,%d1:l),%d0 4909c: 66d8 bnes 49076 <_Objects_Get_name_as_string+0x76> *d = (isprint((unsigned char)*s)) ? *s : '*'; } } *d = '\0'; 4909e: 4210 clrb %a0@ _Thread_Enable_dispatch(); 490a0: 4eb9 0004 9910 jsr 49910 <_Thread_Enable_dispatch> return name; } return NULL; /* unreachable path */ } 490a6: 2002 movel %d2,%d0 490a8: 4cee 043c ffe0 moveml %fp@(-32),%d2-%d5/%a2 490ae: 4e5e unlk %fp 490b0: 4e75 rts s = lname; } d = name; if ( s ) { for ( i=0 ; i<(length-1) && *s ; i++, s++, d++ ) { 490b2: 2042 moveal %d2,%a0 *d = (isprint((unsigned char)*s)) ? *s : '*'; } } *d = '\0'; 490b4: 4210 clrb %a0@ _Thread_Enable_dispatch(); 490b6: 4eb9 0004 9910 jsr 49910 <_Thread_Enable_dispatch> 490bc: 60e8 bras 490a6 <_Objects_Get_name_as_string+0xa6> return NULL; if ( name == NULL ) return NULL; tmpId = (id == OBJECTS_ID_OF_SELF) ? _Thread_Executing->Object.id : id; 490be: 2079 0006 9652 moveal 69652 <_Thread_Executing>,%a0 490c4: 2828 0008 movel %a0@(8),%d4 490c8: 6000 ff68 braw 49032 <_Objects_Get_name_as_string+0x32> if ( information->is_string ) { s = the_object->name.name_p; } else #endif { uint32_t u32_name = (uint32_t) the_object->name.name_u32; 490cc: 2040 moveal %d0,%a0 lname[ 0 ] = (u32_name >> 24) & 0xff; 490ce: 7218 moveq #24,%d1 lname[ 1 ] = (u32_name >> 16) & 0xff; lname[ 2 ] = (u32_name >> 8) & 0xff; lname[ 3 ] = (u32_name >> 0) & 0xff; lname[ 4 ] = '\0'; 490d0: 45ee fff7 lea %fp@(-9),%a2 if ( information->is_string ) { s = the_object->name.name_p; } else #endif { uint32_t u32_name = (uint32_t) the_object->name.name_u32; 490d4: 2028 000c movel %a0@(12),%d0 lname[ 0 ] = (u32_name >> 24) & 0xff; 490d8: 2a00 movel %d0,%d5 490da: e2ad lsrl %d1,%d5 lname[ 1 ] = (u32_name >> 16) & 0xff; lname[ 2 ] = (u32_name >> 8) & 0xff; 490dc: 2200 movel %d0,%d1 #endif { uint32_t u32_name = (uint32_t) the_object->name.name_u32; lname[ 0 ] = (u32_name >> 24) & 0xff; lname[ 1 ] = (u32_name >> 16) & 0xff; 490de: 2800 movel %d0,%d4 lname[ 2 ] = (u32_name >> 8) & 0xff; 490e0: e089 lsrl #8,%d1 lname[ 3 ] = (u32_name >> 0) & 0xff; 490e2: 1d40 fffa moveb %d0,%fp@(-6) #endif { uint32_t u32_name = (uint32_t) the_object->name.name_u32; lname[ 0 ] = (u32_name >> 24) & 0xff; lname[ 1 ] = (u32_name >> 16) & 0xff; 490e6: 4244 clrw %d4 490e8: 4844 swap %d4 lname[ 2 ] = (u32_name >> 8) & 0xff; lname[ 3 ] = (u32_name >> 0) & 0xff; lname[ 4 ] = '\0'; 490ea: 4200 clrb %d0 } else #endif { uint32_t u32_name = (uint32_t) the_object->name.name_u32; lname[ 0 ] = (u32_name >> 24) & 0xff; 490ec: 1d45 fff7 moveb %d5,%fp@(-9) lname[ 1 ] = (u32_name >> 16) & 0xff; 490f0: 1d44 fff8 moveb %d4,%fp@(-8) lname[ 2 ] = (u32_name >> 8) & 0xff; 490f4: 1d41 fff9 moveb %d1,%fp@(-7) lname[ 3 ] = (u32_name >> 0) & 0xff; lname[ 4 ] = '\0'; 490f8: 1d40 fffb moveb %d0,%fp@(-5) 490fc: 6000 ff6c braw 4906a <_Objects_Get_name_as_string+0x6a> =============================================================================== 0005b968 <_Objects_Get_no_protection>: /* * You can't just extract the index portion or you can get tricked * by a value between 1 and maximum. */ index = id - information->minimum_id + 1; 5b968: 7001 moveq #1,%d0 if ( information->maximum >= index ) { 5b96a: 4281 clrl %d1 Objects_Control *_Objects_Get_no_protection( Objects_Information *information, Objects_Id id, Objects_Locations *location ) { 5b96c: 4e56 0000 linkw %fp,#0 5b970: 206e 0008 moveal %fp@(8),%a0 /* * You can't just extract the index portion or you can get tricked * by a value between 1 and maximum. */ index = id - information->minimum_id + 1; 5b974: 90a8 0006 subl %a0@(6),%d0 5b978: d0ae 000c addl %fp@(12),%d0 if ( information->maximum >= index ) { 5b97c: 3228 000e movew %a0@(14),%d1 Objects_Control *_Objects_Get_no_protection( Objects_Information *information, Objects_Id id, Objects_Locations *location ) { 5b980: 226e 0010 moveal %fp@(16),%a1 * You can't just extract the index portion or you can get tricked * by a value between 1 and maximum. */ index = id - information->minimum_id + 1; if ( information->maximum >= index ) { 5b984: b280 cmpl %d0,%d1 5b986: 6510 bcss 5b998 <_Objects_Get_no_protection+0x30> if ( (the_object = information->local_table[ index ]) != NULL ) { 5b988: 2068 0018 moveal %a0@(24),%a0 5b98c: 2030 0c00 movel %a0@(00000000,%d0:l:4),%d0 5b990: 6706 beqs 5b998 <_Objects_Get_no_protection+0x30><== NEVER TAKEN *location = OBJECTS_LOCAL; 5b992: 4291 clrl %a1@ * This isn't supported or required yet for Global objects so * if it isn't local, we don't find it. */ *location = OBJECTS_ERROR; return NULL; } 5b994: 4e5e unlk %fp 5b996: 4e75 rts /* * This isn't supported or required yet for Global objects so * if it isn't local, we don't find it. */ *location = OBJECTS_ERROR; 5b998: 7001 moveq #1,%d0 return NULL; } 5b99a: 4e5e unlk %fp /* * This isn't supported or required yet for Global objects so * if it isn't local, we don't find it. */ *location = OBJECTS_ERROR; 5b99c: 2280 movel %d0,%a1@ 5b99e: 4280 clrl %d0 return NULL; } ... =============================================================================== 00048ccc <_Objects_Id_to_name>: */ Objects_Name_or_id_lookup_errors _Objects_Id_to_name ( Objects_Id id, Objects_Name *name ) { 48ccc: 4e56 fffc linkw %fp,#-4 48cd0: 222e 0008 movel %fp@(8),%d1 48cd4: 2f02 movel %d2,%sp@- /* * Caller is trusted for name != NULL. */ tmpId = (id == OBJECTS_ID_OF_SELF) ? _Thread_Executing->Object.id : id; 48cd6: 4a81 tstl %d1 48cd8: 660a bnes 48ce4 <_Objects_Id_to_name+0x18> 48cda: 2079 0006 0d5a moveal 60d5a <_Thread_Executing>,%a0 48ce0: 2228 0008 movel %a0@(8),%d1 */ RTEMS_INLINE_ROUTINE Objects_APIs _Objects_Get_API( Objects_Id id ) { return (Objects_APIs) ((id >> OBJECTS_API_START_BIT) & OBJECTS_API_VALID_BITS); 48ce4: 7418 moveq #24,%d2 48ce6: 2001 movel %d1,%d0 48ce8: e4a8 lsrl %d2,%d0 48cea: 143c 0007 moveb #7,%d2 48cee: c082 andl %d2,%d0 */ RTEMS_INLINE_ROUTINE bool _Objects_Is_api_valid( uint32_t the_api ) { if ( !the_api || the_api > OBJECTS_APIS_LAST ) 48cf0: 143c 0003 moveb #3,%d2 48cf4: 2040 moveal %d0,%a0 48cf6: 5388 subql #1,%a0 48cf8: b488 cmpl %a0,%d2 48cfa: 6522 bcss 48d1e <_Objects_Id_to_name+0x52> the_api = _Objects_Get_API( tmpId ); if ( !_Objects_Is_api_valid( the_api ) ) return OBJECTS_INVALID_ID; if ( !_Objects_Information_table[ the_api ] ) 48cfc: 41f9 0006 0c58 lea 60c58 <_Objects_Information_table>,%a0 48d02: 2070 0c00 moveal %a0@(00000000,%d0:l:4),%a0 48d06: 4a88 tstl %a0 48d08: 6714 beqs 48d1e <_Objects_Id_to_name+0x52> return OBJECTS_INVALID_ID; the_class = _Objects_Get_class( tmpId ); information = _Objects_Information_table[ the_api ][ the_class ]; 48d0a: 2001 movel %d1,%d0 48d0c: 741b moveq #27,%d2 48d0e: e4a8 lsrl %d2,%d0 48d10: 2070 0c00 moveal %a0@(00000000,%d0:l:4),%a0 if ( !information ) 48d14: 4a88 tstl %a0 48d16: 6706 beqs 48d1e <_Objects_Id_to_name+0x52> <== NEVER TAKEN return OBJECTS_INVALID_ID; #if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES) if ( information->is_string ) 48d18: 4a28 0032 tstb %a0@(50) 48d1c: 670a beqs 48d28 <_Objects_Id_to_name+0x5c> <== ALWAYS TAKEN return OBJECTS_INVALID_ID; *name = the_object->name; _Thread_Enable_dispatch(); return OBJECTS_NAME_OR_ID_LOOKUP_SUCCESSFUL; } 48d1e: 242e fff8 movel %fp@(-8),%d2 if ( !the_object ) return OBJECTS_INVALID_ID; *name = the_object->name; _Thread_Enable_dispatch(); return OBJECTS_NAME_OR_ID_LOOKUP_SUCCESSFUL; 48d22: 7003 moveq #3,%d0 } 48d24: 4e5e unlk %fp 48d26: 4e75 rts #if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES) if ( information->is_string ) return OBJECTS_INVALID_ID; #endif the_object = _Objects_Get( information, tmpId, &ignored_location ); 48d28: 486e fffc pea %fp@(-4) 48d2c: 2f01 movel %d1,%sp@- 48d2e: 2f08 movel %a0,%sp@- 48d30: 4eb9 0004 8c60 jsr 48c60 <_Objects_Get> if ( !the_object ) 48d36: 4fef 000c lea %sp@(12),%sp 48d3a: 4a80 tstl %d0 48d3c: 67e0 beqs 48d1e <_Objects_Id_to_name+0x52> return OBJECTS_INVALID_ID; *name = the_object->name; 48d3e: 206e 000c moveal %fp@(12),%a0 48d42: 2240 moveal %d0,%a1 48d44: 20a9 000c movel %a1@(12),%a0@ _Thread_Enable_dispatch(); 48d48: 4eb9 0004 957c jsr 4957c <_Thread_Enable_dispatch> return OBJECTS_NAME_OR_ID_LOOKUP_SUCCESSFUL; } 48d4e: 242e fff8 movel %fp@(-8),%d2 the_object = _Objects_Get( information, tmpId, &ignored_location ); if ( !the_object ) return OBJECTS_INVALID_ID; *name = the_object->name; _Thread_Enable_dispatch(); 48d52: 4280 clrl %d0 return OBJECTS_NAME_OR_ID_LOOKUP_SUCCESSFUL; } 48d54: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 000476d8 <_Objects_Name_to_id_u32>: Objects_Information *information, uint32_t name, uint32_t node, Objects_Id *id ) { 476d8: 4e56 fff4 linkw %fp,#-12 476dc: 206e 0008 moveal %fp@(8),%a0 476e0: 48d7 040c moveml %d2-%d3/%a2,%sp@ 476e4: 222e 000c movel %fp@(12),%d1 476e8: 202e 0010 movel %fp@(16),%d0 476ec: 246e 0014 moveal %fp@(20),%a2 Objects_Name name_for_mp; #endif /* ASSERT: information->is_string == false */ if ( !id ) 476f0: 4a8a tstl %a2 476f2: 675a beqs 4774e <_Objects_Name_to_id_u32+0x76> return OBJECTS_INVALID_ADDRESS; if ( name == 0 ) 476f4: 4a81 tstl %d1 476f6: 6718 beqs 47710 <_Objects_Name_to_id_u32+0x38> <== NEVER TAKEN return OBJECTS_INVALID_NAME; search_local_node = false; if ( information->maximum != 0 && 476f8: 3428 000e movew %a0@(14),%d2 476fc: 6712 beqs 47710 <_Objects_Name_to_id_u32+0x38> 476fe: 4a80 tstl %d0 47700: 6718 beqs 4771a <_Objects_Name_to_id_u32+0x42> 47702: 0c80 7fff ffff cmpil #2147483647,%d0 47708: 6710 beqs 4771a <_Objects_Name_to_id_u32+0x42> 4770a: 7601 moveq #1,%d3 4770c: b680 cmpl %d0,%d3 4770e: 670a beqs 4771a <_Objects_Name_to_id_u32+0x42> search_local_node = true; if ( search_local_node ) { name_length = information->name_length; for ( index = 1; index <= information->maximum; index++ ) { 47710: 7001 moveq #1,%d0 name_for_mp.name_u32 = name; return _Objects_MP_Global_name_search( information, name_for_mp, node, id ); #else return OBJECTS_INVALID_NAME; #endif } 47712: 4cd7 040c moveml %sp@,%d2-%d3/%a2 47716: 4e5e unlk %fp 47718: 4e75 rts search_local_node = true; if ( search_local_node ) { name_length = information->name_length; for ( index = 1; index <= information->maximum; index++ ) { 4771a: 2068 0018 moveal %a0@(24),%a0 4771e: 7001 moveq #1,%d0 47720: 5888 addql #4,%a0 47722: 0282 0000 ffff andil #65535,%d2 the_object = information->local_table[ index ]; 47728: 2250 moveal %a0@,%a1 search_local_node = true; if ( search_local_node ) { name_length = information->name_length; for ( index = 1; index <= information->maximum; index++ ) { 4772a: 5280 addql #1,%d0 4772c: 5888 addql #4,%a0 the_object = information->local_table[ index ]; if ( !the_object ) 4772e: 4a89 tstl %a1 47730: 6706 beqs 47738 <_Objects_Name_to_id_u32+0x60> continue; if ( name == the_object->name.name_u32 ) { 47732: b2a9 000c cmpl %a1@(12),%d1 47736: 6708 beqs 47740 <_Objects_Name_to_id_u32+0x68> search_local_node = true; if ( search_local_node ) { name_length = information->name_length; for ( index = 1; index <= information->maximum; index++ ) { 47738: b082 cmpl %d2,%d0 4773a: 63ec blss 47728 <_Objects_Name_to_id_u32+0x50> 4773c: 7001 moveq #1,%d0 4773e: 60d2 bras 47712 <_Objects_Name_to_id_u32+0x3a> the_object = information->local_table[ index ]; if ( !the_object ) continue; if ( name == the_object->name.name_u32 ) { *id = the_object->id; 47740: 24a9 0008 movel %a1@(8),%a2@ 47744: 4280 clrl %d0 name_for_mp.name_u32 = name; return _Objects_MP_Global_name_search( information, name_for_mp, node, id ); #else return OBJECTS_INVALID_NAME; #endif } 47746: 4cd7 040c moveml %sp@,%d2-%d3/%a2 4774a: 4e5e unlk %fp 4774c: 4e75 rts Objects_Name name_for_mp; #endif /* ASSERT: information->is_string == false */ if ( !id ) 4774e: 7002 moveq #2,%d0 name_for_mp.name_u32 = name; return _Objects_MP_Global_name_search( information, name_for_mp, node, id ); #else return OBJECTS_INVALID_NAME; #endif } 47750: 4cd7 040c moveml %sp@,%d2-%d3/%a2 47754: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00047ad8 <_Objects_Set_name>: { size_t length; const char *s; s = name; length = strnlen( name, information->name_length ); 47ad8: 4280 clrl %d0 bool _Objects_Set_name( Objects_Information *information, Objects_Control *the_object, const char *name ) { 47ada: 4e56 fff0 linkw %fp,#-16 47ade: 48d7 3c00 moveml %a2-%a5,%sp@ 47ae2: 286e 0008 moveal %fp@(8),%a4 47ae6: 246e 0010 moveal %fp@(16),%a2 size_t length; const char *s; s = name; length = strnlen( name, information->name_length ); 47aea: 302c 0034 movew %a4@(52),%d0 47aee: 2f00 movel %d0,%sp@- bool _Objects_Set_name( Objects_Information *information, Objects_Control *the_object, const char *name ) { 47af0: 2a6e 000c moveal %fp@(12),%a5 size_t length; const char *s; s = name; length = strnlen( name, information->name_length ); 47af4: 2f0a movel %a2,%sp@- 47af6: 4eb9 0005 08a0 jsr 508a0 #if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES) if ( information->is_string ) { 47afc: 508f addql #8,%sp { size_t length; const char *s; s = name; length = strnlen( name, information->name_length ); 47afe: 2640 moveal %d0,%a3 #if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES) if ( information->is_string ) { 47b00: 4a2c 0032 tstb %a4@(50) 47b04: 6662 bnes 47b68 <_Objects_Set_name+0x90> d[length] = '\0'; the_object->name.name_p = d; } else #endif { the_object->name.name_u32 = _Objects_Build_name( 47b06: 7018 moveq #24,%d0 47b08: 1212 moveb %a2@,%d1 47b0a: 49c1 extbl %d1 47b0c: e1a9 lsll %d0,%d1 47b0e: 103c 0001 moveb #1,%d0 47b12: b08b cmpl %a3,%d0 47b14: 643c bccs 47b52 <_Objects_Set_name+0x7a> 47b16: 102a 0001 moveb %a2@(1),%d0 47b1a: 49c0 extbl %d0 47b1c: 4840 swap %d0 47b1e: 4240 clrw %d0 47b20: 8081 orl %d1,%d0 47b22: 7202 moveq #2,%d1 47b24: b28b cmpl %a3,%d1 47b26: 6730 beqs 47b58 <_Objects_Set_name+0x80> 47b28: 122a 0002 moveb %a2@(2),%d1 47b2c: 49c1 extbl %d1 47b2e: e189 lsll #8,%d1 47b30: 8081 orl %d1,%d0 47b32: 7203 moveq #3,%d1 47b34: b28b cmpl %a3,%d1 47b36: 6700 0088 beqw 47bc0 <_Objects_Set_name+0xe8> 47b3a: 122a 0003 moveb %a2@(3),%d1 47b3e: 49c1 extbl %d1 47b40: 8081 orl %d1,%d0 47b42: 2b40 000c movel %d0,%a5@(12) 47b46: 7001 moveq #1,%d0 ); } return true; } 47b48: 4cee 3c00 fff0 moveml %fp@(-16),%a2-%a5 47b4e: 4e5e unlk %fp 47b50: 4e75 rts d[length] = '\0'; the_object->name.name_p = d; } else #endif { the_object->name.name_u32 = _Objects_Build_name( 47b52: 2001 movel %d1,%d0 47b54: 08c0 0015 bset #21,%d0 47b58: 7220 moveq #32,%d1 47b5a: 08c0 000d bset #13,%d0 47b5e: 8081 orl %d1,%d0 47b60: 2b40 000c movel %d0,%a5@(12) 47b64: 7001 moveq #1,%d0 47b66: 60e0 bras 47b48 <_Objects_Set_name+0x70> #if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES) if ( information->is_string ) { char *d; d = _Workspace_Allocate( length + 1 ); 47b68: 486b 0001 pea %a3@(1) 47b6c: 4eb9 0004 966c jsr 4966c <_Workspace_Allocate> if ( !d ) 47b72: 588f addql #4,%sp #if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES) if ( information->is_string ) { char *d; d = _Workspace_Allocate( length + 1 ); 47b74: 2840 moveal %d0,%a4 if ( !d ) 47b76: 4a80 tstl %d0 47b78: 673a beqs 47bb4 <_Objects_Set_name+0xdc> <== NEVER TAKEN return false; if ( the_object->name.name_p ) { 47b7a: 202d 000c movel %a5@(12),%d0 47b7e: 670e beqs 47b8e <_Objects_Set_name+0xb6> _Workspace_Free( (void *)the_object->name.name_p ); 47b80: 2f00 movel %d0,%sp@- 47b82: 4eb9 0004 9688 jsr 49688 <_Workspace_Free> the_object->name.name_p = NULL; 47b88: 588f addql #4,%sp 47b8a: 42ad 000c clrl %a5@(12) } strncpy( d, name, length ); 47b8e: 2f0b movel %a3,%sp@- 47b90: 2f0a movel %a2,%sp@- 47b92: 2f0c movel %a4,%sp@- 47b94: 4eb9 0005 0818 jsr 50818 d[length] = '\0'; the_object->name.name_p = d; 47b9a: 4fef 000c lea %sp@(12),%sp _Workspace_Free( (void *)the_object->name.name_p ); the_object->name.name_p = NULL; } strncpy( d, name, length ); d[length] = '\0'; 47b9e: 4200 clrb %d0 47ba0: 1980 b800 moveb %d0,%a4@(00000000,%a3:l) the_object->name.name_p = d; 47ba4: 7001 moveq #1,%d0 47ba6: 2b4c 000c movel %a4,%a5@(12) ); } return true; } 47baa: 4cee 3c00 fff0 moveml %fp@(-16),%a2-%a5 47bb0: 4e5e unlk %fp 47bb2: 4e75 rts 47bb4: 4cee 3c00 fff0 moveml %fp@(-16),%a2-%a5 <== NOT EXECUTED #if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES) if ( information->is_string ) { char *d; d = _Workspace_Allocate( length + 1 ); if ( !d ) 47bba: 4200 clrb %d0 <== NOT EXECUTED ); } return true; } 47bbc: 4e5e unlk %fp <== NOT EXECUTED 47bbe: 4e75 rts <== NOT EXECUTED d[length] = '\0'; the_object->name.name_p = d; } else #endif { the_object->name.name_u32 = _Objects_Build_name( 47bc0: 123c 0020 moveb #32,%d1 47bc4: 8081 orl %d1,%d0 47bc6: 2b40 000c movel %d0,%a5@(12) 47bca: 7001 moveq #1,%d0 47bcc: 6000 ff7a braw 47b48 <_Objects_Set_name+0x70> =============================================================================== 00047758 <_Objects_Shrink_information>: /* * 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) / 47758: 4281 clrl %d1 */ void _Objects_Shrink_information( Objects_Information *information ) { 4775a: 4e56 ffec linkw %fp,#-20 4775e: 48d7 0c1c moveml %d2-%d4/%a2-%a3,%sp@ 47762: 246e 0008 moveal %fp@(8),%a2 /* * Search the list to find block or chunk with all objects inactive. */ index_base = _Objects_Get_index( information->minimum_id ); 47766: 4283 clrl %d3 block_count = (information->maximum - index_base) / 47768: 4284 clrl %d4 /* * Search the list to find block or chunk with all objects inactive. */ index_base = _Objects_Get_index( information->minimum_id ); 4776a: 362a 0008 movew %a2@(8),%d3 block_count = (information->maximum - index_base) / 4776e: 382a 000e movew %a2@(14),%d4 47772: 322a 0012 movew %a2@(18),%d1 47776: 9883 subl %d3,%d4 47778: 4c41 4004 remul %d1,%d4,%d4 information->allocation_size; for ( block = 0; block < block_count; block++ ) { 4777c: 672c beqs 477aa <_Objects_Shrink_information+0x52><== NEVER TAKEN if ( information->inactive_per_block[ block ] == 4777e: 226a 002a moveal %a2@(42),%a1 47782: b291 cmpl %a1@,%d1 47784: 672e beqs 477b4 <_Objects_Shrink_information+0x5c><== NEVER TAKEN information->object_blocks[ block ] = NULL; information->inactive_per_block[ block ] = 0; information->inactive -= information->allocation_size; return; 47786: 7404 moveq #4,%d2 47788: 4280 clrl %d0 } index_base += information->allocation_size; 4778a: 2042 moveal %d2,%a0 4778c: d681 addl %d1,%d3 4778e: 5888 addql #4,%a0 index_base = _Objects_Get_index( information->minimum_id ); block_count = (information->maximum - index_base) / information->allocation_size; for ( block = 0; block < block_count; block++ ) { 47790: 5280 addql #1,%d0 47792: b084 cmpl %d4,%d0 47794: 6414 bccs 477aa <_Objects_Shrink_information+0x52><== NEVER TAKEN if ( information->inactive_per_block[ block ] == 47796: b2b1 2800 cmpl %a1@(00000000,%d2:l),%d1 4779a: 671a beqs 477b6 <_Objects_Shrink_information+0x5e> 4779c: 2408 movel %a0,%d2 information->inactive -= information->allocation_size; return; } index_base += information->allocation_size; 4779e: 2042 moveal %d2,%a0 477a0: d681 addl %d1,%d3 477a2: 5888 addql #4,%a0 index_base = _Objects_Get_index( information->minimum_id ); block_count = (information->maximum - index_base) / information->allocation_size; for ( block = 0; block < block_count; block++ ) { 477a4: 5280 addql #1,%d0 477a6: b084 cmpl %d4,%d0 477a8: 65ec bcss 47796 <_Objects_Shrink_information+0x3e> return; } index_base += information->allocation_size; } } 477aa: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3 477b0: 4e5e unlk %fp 477b2: 4e75 rts 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 ] == 477b4: 4282 clrl %d2 <== NOT EXECUTED information->allocation_size ) { /* * Assume the Inactive chain is never empty at this point */ the_object = (Objects_Control *) information->Inactive.first; 477b6: 206a 001c moveal %a2@(28),%a0 */ extract_me = the_object; the_object = (Objects_Control *) the_object->Node.next; if ((index >= index_base) && (index < (index_base + information->allocation_size))) { _Chain_Extract( &extract_me->Node ); 477ba: 47f9 0004 b998 lea 4b998 <_Chain_Extract>,%a3 * 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 ); 477c0: 4280 clrl %d0 477c2: 3028 000a movew %a0@(10),%d0 /* * Get the next node before the node is extracted */ extract_me = the_object; the_object = (Objects_Control *) the_object->Node.next; 477c6: 2810 movel %a0@,%d4 if ((index >= index_base) && 477c8: b680 cmpl %d0,%d3 477ca: 620c bhis 477d8 <_Objects_Shrink_information+0x80> (index < (index_base + information->allocation_size))) { 477cc: 4281 clrl %d1 477ce: 322a 0012 movew %a2@(18),%d1 477d2: d283 addl %d3,%d1 477d4: b280 cmpl %d0,%d1 477d6: 623e bhis 47816 <_Objects_Shrink_information+0xbe> _Chain_Extract( &extract_me->Node ); } } while ( the_object ); 477d8: 2044 moveal %d4,%a0 477da: 4a84 tstl %d4 477dc: 66e2 bnes 477c0 <_Objects_Shrink_information+0x68> /* * Free the memory and reset the structures in the object' information */ _Workspace_Free( information->object_blocks[ block ] ); 477de: 206a 002e moveal %a2@(46),%a0 477e2: 2f30 2800 movel %a0@(00000000,%d2:l),%sp@- 477e6: 4eb9 0004 9210 jsr 49210 <_Workspace_Free> information->object_blocks[ block ] = NULL; 477ec: 206a 002e moveal %a2@(46),%a0 information->inactive_per_block[ block ] = 0; information->inactive -= information->allocation_size; return; 477f0: 588f addql #4,%sp _Workspace_Free( information->object_blocks[ block ] ); information->object_blocks[ block ] = NULL; information->inactive_per_block[ block ] = 0; information->inactive -= information->allocation_size; 477f2: 302a 0028 movew %a2@(40),%d0 477f6: 322a 0012 movew %a2@(18),%d1 * Free the memory and reset the structures in the object' information */ _Workspace_Free( information->object_blocks[ block ] ); information->object_blocks[ block ] = NULL; information->inactive_per_block[ block ] = 0; 477fa: 226a 002a moveal %a2@(42),%a1 information->inactive -= information->allocation_size; 477fe: 9081 subl %d1,%d0 * Free the memory and reset the structures in the object' information */ _Workspace_Free( information->object_blocks[ block ] ); information->object_blocks[ block ] = NULL; information->inactive_per_block[ block ] = 0; 47800: 42b1 2800 clrl %a1@(00000000,%d2:l) /* * Free the memory and reset the structures in the object' information */ _Workspace_Free( information->object_blocks[ block ] ); information->object_blocks[ block ] = NULL; 47804: 42b0 2800 clrl %a0@(00000000,%d2:l) information->inactive_per_block[ block ] = 0; information->inactive -= information->allocation_size; 47808: 3540 0028 movew %d0,%a2@(40) return; } index_base += information->allocation_size; } } 4780c: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3 47812: 4e5e unlk %fp 47814: 4e75 rts */ extract_me = the_object; the_object = (Objects_Control *) the_object->Node.next; if ((index >= index_base) && (index < (index_base + information->allocation_size))) { _Chain_Extract( &extract_me->Node ); 47816: 2f08 movel %a0,%sp@- 47818: 4e93 jsr %a3@ 4781a: 588f addql #4,%sp } } while ( the_object ); 4781c: 2044 moveal %d4,%a0 4781e: 4a84 tstl %d4 47820: 669e bnes 477c0 <_Objects_Shrink_information+0x68> 47822: 60ba bras 477de <_Objects_Shrink_information+0x86> =============================================================================== 00046bc8 <_POSIX_Condition_variables_Wait_support>: pthread_cond_t *cond, pthread_mutex_t *mutex, Watchdog_Interval timeout, bool already_timedout ) { 46bc8: 4e56 ffe8 linkw %fp,#-24 46bcc: 48d7 1c0c moveml %d2-%d3/%a2-%a4,%sp@ register POSIX_Condition_variables_Control *the_cond; Objects_Locations location; int status; int mutex_status; if ( !_POSIX_Mutex_Get( mutex, &location ) ) { 46bd0: 240e movel %fp,%d2 46bd2: 5982 subql #4,%d2 46bd4: 2f02 movel %d2,%sp@- pthread_cond_t *cond, pthread_mutex_t *mutex, Watchdog_Interval timeout, bool already_timedout ) { 46bd6: 246e 000c moveal %fp@(12),%a2 register POSIX_Condition_variables_Control *the_cond; Objects_Locations location; int status; int mutex_status; if ( !_POSIX_Mutex_Get( mutex, &location ) ) { 46bda: 2f0a movel %a2,%sp@- pthread_cond_t *cond, pthread_mutex_t *mutex, Watchdog_Interval timeout, bool already_timedout ) { 46bdc: 266e 0008 moveal %fp@(8),%a3 46be0: 162e 0017 moveb %fp@(23),%d3 register POSIX_Condition_variables_Control *the_cond; Objects_Locations location; int status; int mutex_status; if ( !_POSIX_Mutex_Get( mutex, &location ) ) { 46be4: 4eb9 0004 6dbe jsr 46dbe <_POSIX_Mutex_Get> 46bea: 508f addql #8,%sp 46bec: 4a80 tstl %d0 46bee: 6764 beqs 46c54 <_POSIX_Condition_variables_Wait_support+0x8c><== NEVER TAKEN */ RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void ) { RTEMS_COMPILER_MEMORY_BARRIER(); _Thread_Dispatch_disable_level -= 1; 46bf0: 2039 0006 19d8 movel 619d8 <_Thread_Dispatch_disable_level>,%d0 46bf6: 5380 subql #1,%d0 return EINVAL; } _Thread_Unnest_dispatch(); the_cond = _POSIX_Condition_variables_Get( cond, &location ); 46bf8: 2f02 movel %d2,%sp@- 46bfa: 23c0 0006 19d8 movel %d0,619d8 <_Thread_Dispatch_disable_level> 46c00: 2f0b movel %a3,%sp@- 46c02: 4eb9 0004 69b4 jsr 469b4 <_POSIX_Condition_variables_Get> switch ( location ) { 46c08: 508f addql #8,%sp return EINVAL; } _Thread_Unnest_dispatch(); the_cond = _POSIX_Condition_variables_Get( cond, &location ); 46c0a: 2840 moveal %d0,%a4 switch ( location ) { 46c0c: 4aae fffc tstl %fp@(-4) 46c10: 6642 bnes 46c54 <_POSIX_Condition_variables_Wait_support+0x8c> case OBJECTS_LOCAL: if ( the_cond->Mutex && ( the_cond->Mutex != *mutex ) ) { 46c12: 202c 0014 movel %a4@(20),%d0 46c16: 6718 beqs 46c30 <_POSIX_Condition_variables_Wait_support+0x68> 46c18: b092 cmpl %a2@,%d0 46c1a: 6714 beqs 46c30 <_POSIX_Condition_variables_Wait_support+0x68> _Thread_Enable_dispatch(); 46c1c: 4eb9 0004 a008 jsr 4a008 <_Thread_Enable_dispatch> 46c22: 7416 moveq #22,%d2 case OBJECTS_ERROR: break; } return EINVAL; } 46c24: 2002 movel %d2,%d0 46c26: 4cee 1c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a4 46c2c: 4e5e unlk %fp 46c2e: 4e75 rts if ( the_cond->Mutex && ( the_cond->Mutex != *mutex ) ) { _Thread_Enable_dispatch(); return EINVAL; } (void) pthread_mutex_unlock( mutex ); 46c30: 2f0a movel %a2,%sp@- 46c32: 4eb9 0004 700c jsr 4700c _Thread_Enable_dispatch(); return EINVAL; } */ if ( !already_timedout ) { 46c38: 588f addql #4,%sp 46c3a: 4a03 tstb %d3 46c3c: 6724 beqs 46c62 <_POSIX_Condition_variables_Wait_support+0x9a> status = _Thread_Executing->Wait.return_code; if ( status && status != ETIMEDOUT ) return status; } else { _Thread_Enable_dispatch(); 46c3e: 4eb9 0004 a008 jsr 4a008 <_Thread_Enable_dispatch> 46c44: 7474 moveq #116,%d2 /* * When we get here the dispatch disable level is 0. */ mutex_status = pthread_mutex_lock( mutex ); 46c46: 2f0a movel %a2,%sp@- 46c48: 4eb9 0004 6f70 jsr 46f70 if ( mutex_status ) 46c4e: 588f addql #4,%sp 46c50: 4a80 tstl %d0 46c52: 67d0 beqs 46c24 <_POSIX_Condition_variables_Wait_support+0x5c> 46c54: 7416 moveq #22,%d2 case OBJECTS_ERROR: break; } return EINVAL; } 46c56: 2002 movel %d2,%d0 46c58: 4cee 1c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a4 46c5e: 4e5e unlk %fp 46c60: 4e75 rts return EINVAL; } */ if ( !already_timedout ) { the_cond->Mutex = *mutex; 46c62: 2952 0014 movel %a2@,%a4@(20) _Thread_queue_Enter_critical_section( &the_cond->Wait_queue ); _Thread_Executing->Wait.return_code = 0; _Thread_Executing->Wait.queue = &the_cond->Wait_queue; 46c66: 200c movel %a4,%d0 46c68: 0680 0000 0018 addil #24,%d0 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; 46c6e: 7201 moveq #1,%d1 if ( !already_timedout ) { the_cond->Mutex = *mutex; _Thread_queue_Enter_critical_section( &the_cond->Wait_queue ); _Thread_Executing->Wait.return_code = 0; 46c70: 2079 0006 1a92 moveal 61a92 <_Thread_Executing>,%a0 46c76: 42a8 0034 clrl %a0@(52) _Thread_Executing->Wait.queue = &the_cond->Wait_queue; _Thread_Executing->Wait.id = *cond; 46c7a: 2153 0020 movel %a3@,%a0@(32) if ( !already_timedout ) { the_cond->Mutex = *mutex; _Thread_queue_Enter_critical_section( &the_cond->Wait_queue ); _Thread_Executing->Wait.return_code = 0; _Thread_Executing->Wait.queue = &the_cond->Wait_queue; 46c7e: 2140 0044 movel %d0,%a0@(68) 46c82: 2941 0048 movel %d1,%a4@(72) _Thread_Executing->Wait.id = *cond; _Thread_queue_Enqueue( &the_cond->Wait_queue, timeout ); 46c86: 4879 0004 a920 pea 4a920 <_Thread_queue_Timeout> 46c8c: 2f2e 0010 movel %fp@(16),%sp@- 46c90: 2f00 movel %d0,%sp@- 46c92: 4eb9 0004 a564 jsr 4a564 <_Thread_queue_Enqueue_with_handler> _Thread_Enable_dispatch(); 46c98: 4eb9 0004 a008 jsr 4a008 <_Thread_Enable_dispatch> /* * Switch ourself out because we blocked as a result of the * _Thread_queue_Enqueue. */ status = _Thread_Executing->Wait.return_code; 46c9e: 2079 0006 1a92 moveal 61a92 <_Thread_Executing>,%a0 if ( status && status != ETIMEDOUT ) 46ca4: 4fef 000c lea %sp@(12),%sp /* * Switch ourself out because we blocked as a result of the * _Thread_queue_Enqueue. */ status = _Thread_Executing->Wait.return_code; 46ca8: 2428 0034 movel %a0@(52),%d2 if ( status && status != ETIMEDOUT ) 46cac: 6798 beqs 46c46 <_POSIX_Condition_variables_Wait_support+0x7e> 46cae: 7074 moveq #116,%d0 46cb0: b082 cmpl %d2,%d0 46cb2: 6792 beqs 46c46 <_POSIX_Condition_variables_Wait_support+0x7e><== ALWAYS TAKEN case OBJECTS_ERROR: break; } return EINVAL; } 46cb4: 2002 movel %d2,%d0 <== NOT EXECUTED 46cb6: 4cee 1c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a4 <== NOT EXECUTED 46cbc: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004d620 <_POSIX_Keys_Run_destructors>: */ RTEMS_INLINE_ROUTINE Objects_APIs _Objects_Get_API( Objects_Id id ) { return (Objects_APIs) ((id >> OBJECTS_API_START_BIT) & OBJECTS_API_VALID_BITS); 4d620: 7018 moveq #24,%d0 4d622: 7207 moveq #7,%d1 */ void _POSIX_Keys_Run_destructors( Thread_Control *thread ) { 4d624: 4e56 ffe8 linkw %fp,#-24 uint32_t iterations; bool are_all_null; POSIX_Keys_Control *the_key; void *value; thread_index = _Objects_Get_index( thread->Object.id ); 4d628: 206e 0008 moveal %fp@(8),%a0 */ void _POSIX_Keys_Run_destructors( Thread_Control *thread ) { 4d62c: 48d7 047c moveml %d2-%d6/%a2,%sp@ uint32_t iterations; bool are_all_null; POSIX_Keys_Control *the_key; void *value; thread_index = _Objects_Get_index( thread->Object.id ); 4d630: 2628 0008 movel %a0@(8),%d3 4d634: 2803 movel %d3,%d4 4d636: e0ac lsrl %d0,%d4 if ( !the_key ) continue; if ( !the_key->destructor ) continue; value = the_key->Values[ thread_api ][ thread_index ]; 4d638: 4286 clrl %d6 4d63a: 0283 0000 ffff andil #65535,%d3 4d640: c881 andl %d1,%d4 4d642: 3039 0005 f31a movew 5f31a <_POSIX_Keys_Information+0xe>,%d0 4d648: e58b lsll #2,%d3 4d64a: 5a84 addql #5,%d4 for ( ; ; ) { are_all_null = true; for ( index=1 ; index <= _POSIX_Keys_Information.maximum ; index++ ) { 4d64c: 4a40 tstw %d0 4d64e: 6752 beqs 4d6a2 <_POSIX_Keys_Run_destructors+0x82> 4d650: 7401 moveq #1,%d2 4d652: 7a01 moveq #1,%d5 the_key = (POSIX_Keys_Control *) 4d654: 2079 0005 f324 moveal 5f324 <_POSIX_Keys_Information+0x18>,%a0 4d65a: 2470 2c00 moveal %a0@(00000000,%d2:l:4),%a2 for ( ; ; ) { are_all_null = true; for ( index=1 ; index <= _POSIX_Keys_Information.maximum ; index++ ) { 4d65e: 5282 addql #1,%d2 the_key = (POSIX_Keys_Control *) _POSIX_Keys_Information.local_table[ index ]; if ( !the_key ) 4d660: 4a8a tstl %a2 4d662: 6724 beqs 4d688 <_POSIX_Keys_Run_destructors+0x68> continue; if ( !the_key->destructor ) 4d664: 206a 0010 moveal %a2@(16),%a0 4d668: 4a88 tstl %a0 4d66a: 671c beqs 4d688 <_POSIX_Keys_Run_destructors+0x68><== NEVER TAKEN continue; value = the_key->Values[ thread_api ][ thread_index ]; 4d66c: 2272 4c00 moveal %a2@(00000000,%d4:l:4),%a1 4d670: 2031 3800 movel %a1@(00000000,%d3:l),%d0 if ( value ) { 4d674: 6712 beqs 4d688 <_POSIX_Keys_Run_destructors+0x68><== NEVER TAKEN (*the_key->destructor)( value ); 4d676: 2f00 movel %d0,%sp@- 4d678: 4e90 jsr %a0@ if ( the_key->Values[ thread_api ][ thread_index ] ) 4d67a: 588f addql #4,%sp 4d67c: 2072 4c00 moveal %a2@(00000000,%d4:l:4),%a0 4d680: 4ab0 3800 tstl %a0@(00000000,%d3:l) 4d684: 57c0 seq %d0 4d686: ca80 andl %d0,%d5 for ( ; ; ) { are_all_null = true; for ( index=1 ; index <= _POSIX_Keys_Information.maximum ; index++ ) { 4d688: 4281 clrl %d1 4d68a: 3039 0005 f31a movew 5f31a <_POSIX_Keys_Information+0xe>,%d0 4d690: 3200 movew %d0,%d1 4d692: b481 cmpl %d1,%d2 4d694: 63be blss 4d654 <_POSIX_Keys_Run_destructors+0x34> if ( the_key->Values[ thread_api ][ thread_index ] ) are_all_null = false; } } if ( are_all_null == true ) 4d696: 4a05 tstb %d5 4d698: 6608 bnes 4d6a2 <_POSIX_Keys_Run_destructors+0x82> return; iterations++; 4d69a: 5286 addql #1,%d6 * loop. It seems rude to unnecessarily lock up a system. * * Reference: 17.1.1.2 P1003.1c/Draft 10, p. 163, line 99. */ if ( iterations >= PTHREAD_DESTRUCTOR_ITERATIONS ) 4d69c: 7204 moveq #4,%d1 4d69e: b286 cmpl %d6,%d1 4d6a0: 66aa bnes 4d64c <_POSIX_Keys_Run_destructors+0x2c> return; } } 4d6a2: 4cee 047c ffe8 moveml %fp@(-24),%d2-%d6/%a2 4d6a8: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004bac4 <_POSIX_Message_queue_Receive_support>: size_t msg_len, unsigned int *msg_prio, bool wait, Watchdog_Interval timeout ) { 4bac4: 4e56 ffe8 linkw %fp,#-24 4bac8: 48d7 041c moveml %d2-%d4/%a2,%sp@ RTEMS_INLINE_ROUTINE POSIX_Message_queue_Control_fd *_POSIX_Message_queue_Get_fd ( mqd_t id, Objects_Locations *location ) { return (POSIX_Message_queue_Control_fd *) _Objects_Get( 4bacc: 486e fffc pea %fp@(-4) 4bad0: 242e 0008 movel %fp@(8),%d2 4bad4: 2f02 movel %d2,%sp@- 4bad6: 4879 0006 8f90 pea 68f90 <_POSIX_Message_queue_Information_fds> 4badc: 246e 0014 moveal %fp@(20),%a2 4bae0: 262e 0018 movel %fp@(24),%d3 4bae4: 4eb9 0004 eed8 jsr 4eed8 <_Objects_Get> Objects_Locations location; size_t length_out; bool do_wait; the_mq_fd = _POSIX_Message_queue_Get_fd( mqdes, &location ); switch ( location ) { 4baea: 4fef 000c lea %sp@(12),%sp 4baee: 2040 moveal %d0,%a0 4baf0: 4aae fffc tstl %fp@(-4) 4baf4: 671a beqs 4bb10 <_POSIX_Message_queue_Receive_support+0x4c> #endif case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); 4baf6: 4eb9 0005 66ec jsr 566ec <__errno> 4bafc: 72ff moveq #-1,%d1 4bafe: 2040 moveal %d0,%a0 4bb00: 7009 moveq #9,%d0 } 4bb02: 4cee 041c ffe8 moveml %fp@(-24),%d2-%d4/%a2 #endif case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); 4bb08: 2080 movel %d0,%a0@ } 4bb0a: 2001 movel %d1,%d0 4bb0c: 4e5e unlk %fp 4bb0e: 4e75 rts the_mq_fd = _POSIX_Message_queue_Get_fd( mqdes, &location ); switch ( location ) { case OBJECTS_LOCAL: if ( (the_mq_fd->oflag & O_ACCMODE) == O_WRONLY ) { 4bb10: 2028 0014 movel %a0@(20),%d0 4bb14: 7203 moveq #3,%d1 4bb16: 7801 moveq #1,%d4 4bb18: c280 andl %d0,%d1 4bb1a: b881 cmpl %d1,%d4 4bb1c: 6700 00f2 beqw 4bc10 <_POSIX_Message_queue_Receive_support+0x14c> _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one( EBADF ); } the_mq = the_mq_fd->Queue; 4bb20: 2068 0010 moveal %a0@(16),%a0 if ( msg_len < the_mq->Message_queue.maximum_message_size ) { 4bb24: 222e 0010 movel %fp@(16),%d1 4bb28: b2a8 0066 cmpl %a0@(102),%d1 4bb2c: 6500 0098 bcsw 4bbc6 <_POSIX_Message_queue_Receive_support+0x102> length_out = -1; /* * A timed receive with a bad time will do a poll regardless. */ if ( wait ) 4bb30: 4a03 tstb %d3 4bb32: 6756 beqs 4bb8a <_POSIX_Message_queue_Receive_support+0xc6><== NEVER TAKEN 4bb34: 720e moveq #14,%d1 4bb36: e2a8 lsrl %d1,%d0 4bb38: 7801 moveq #1,%d4 4bb3a: b980 eorl %d4,%d0 do_wait = wait; /* * Now perform the actual message receive */ _CORE_message_queue_Seize( 4bb3c: 2f2e 001c movel %fp@(28),%sp@- length_out = -1; /* * A timed receive with a bad time will do a poll regardless. */ if ( wait ) 4bb40: c084 andl %d4,%d0 do_wait = wait; /* * Now perform the actual message receive */ _CORE_message_queue_Seize( 4bb42: 2f00 movel %d0,%sp@- 4bb44: 486e fff8 pea %fp@(-8) /* * Now if something goes wrong, we return a "length" of -1 * to indicate an error. */ length_out = -1; 4bb48: 70ff moveq #-1,%d0 do_wait = wait; /* * Now perform the actual message receive */ _CORE_message_queue_Seize( 4bb4a: 2f2e 000c movel %fp@(12),%sp@- 4bb4e: 2f02 movel %d2,%sp@- 4bb50: 4868 001a pea %a0@(26) /* * Now if something goes wrong, we return a "length" of -1 * to indicate an error. */ length_out = -1; 4bb54: 2d40 fff8 movel %d0,%fp@(-8) do_wait = wait; /* * Now perform the actual message receive */ _CORE_message_queue_Seize( 4bb58: 4eb9 0004 de40 jsr 4de40 <_CORE_message_queue_Seize> &length_out, do_wait, timeout ); _Thread_Enable_dispatch(); 4bb5e: 4eb9 0004 f7b8 jsr 4f7b8 <_Thread_Enable_dispatch> *msg_prio = _POSIX_Message_queue_Priority_from_core(_Thread_Executing->Wait.count); 4bb64: 2079 0006 8c0e moveal 68c0e <_Thread_Executing>,%a0 do_wait, timeout ); _Thread_Enable_dispatch(); *msg_prio = 4bb6a: 24a8 0024 movel %a0@(36),%a2@ 4bb6e: 6d4e blts 4bbbe <_POSIX_Message_queue_Receive_support+0xfa> _POSIX_Message_queue_Priority_from_core(_Thread_Executing->Wait.count); if ( !_Thread_Executing->Wait.return_code ) 4bb70: 4fef 0018 lea %sp@(24),%sp 4bb74: 4aa8 0034 tstl %a0@(52) 4bb78: 666c bnes 4bbe6 <_POSIX_Message_queue_Receive_support+0x122> return length_out; 4bb7a: 222e fff8 movel %fp@(-8),%d1 case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bb7e: 2001 movel %d1,%d0 4bb80: 4cee 041c ffe8 moveml %fp@(-24),%d2-%d4/%a2 4bb86: 4e5e unlk %fp 4bb88: 4e75 rts do_wait = wait; /* * Now perform the actual message receive */ _CORE_message_queue_Seize( 4bb8a: 2f2e 001c movel %fp@(28),%sp@- <== NOT EXECUTED length_out = -1; /* * A timed receive with a bad time will do a poll regardless. */ if ( wait ) 4bb8e: 4280 clrl %d0 <== NOT EXECUTED do_wait = wait; /* * Now perform the actual message receive */ _CORE_message_queue_Seize( 4bb90: 2f00 movel %d0,%sp@- <== NOT EXECUTED 4bb92: 486e fff8 pea %fp@(-8) <== NOT EXECUTED /* * Now if something goes wrong, we return a "length" of -1 * to indicate an error. */ length_out = -1; 4bb96: 70ff moveq #-1,%d0 <== NOT EXECUTED do_wait = wait; /* * Now perform the actual message receive */ _CORE_message_queue_Seize( 4bb98: 2f2e 000c movel %fp@(12),%sp@- <== NOT EXECUTED 4bb9c: 2f02 movel %d2,%sp@- <== NOT EXECUTED 4bb9e: 4868 001a pea %a0@(26) <== NOT EXECUTED /* * Now if something goes wrong, we return a "length" of -1 * to indicate an error. */ length_out = -1; 4bba2: 2d40 fff8 movel %d0,%fp@(-8) <== NOT EXECUTED do_wait = wait; /* * Now perform the actual message receive */ _CORE_message_queue_Seize( 4bba6: 4eb9 0004 de40 jsr 4de40 <_CORE_message_queue_Seize> <== NOT EXECUTED &length_out, do_wait, timeout ); _Thread_Enable_dispatch(); 4bbac: 4eb9 0004 f7b8 jsr 4f7b8 <_Thread_Enable_dispatch> <== NOT EXECUTED *msg_prio = _POSIX_Message_queue_Priority_from_core(_Thread_Executing->Wait.count); 4bbb2: 2079 0006 8c0e moveal 68c0e <_Thread_Executing>,%a0 <== NOT EXECUTED do_wait, timeout ); _Thread_Enable_dispatch(); *msg_prio = 4bbb8: 24a8 0024 movel %a0@(36),%a2@ <== NOT EXECUTED 4bbbc: 6cb2 bges 4bb70 <_POSIX_Message_queue_Receive_support+0xac><== NOT EXECUTED 4bbbe: 2212 movel %a2@,%d1 4bbc0: 4481 negl %d1 4bbc2: 2481 movel %d1,%a2@ 4bbc4: 60aa bras 4bb70 <_POSIX_Message_queue_Receive_support+0xac> } the_mq = the_mq_fd->Queue; if ( msg_len < the_mq->Message_queue.maximum_message_size ) { _Thread_Enable_dispatch(); 4bbc6: 4eb9 0004 f7b8 jsr 4f7b8 <_Thread_Enable_dispatch> rtems_set_errno_and_return_minus_one( EMSGSIZE ); 4bbcc: 747a moveq #122,%d2 4bbce: 4eb9 0005 66ec jsr 566ec <__errno> 4bbd4: 72ff moveq #-1,%d1 4bbd6: 2040 moveal %d0,%a0 case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bbd8: 2001 movel %d1,%d0 the_mq = the_mq_fd->Queue; if ( msg_len < the_mq->Message_queue.maximum_message_size ) { _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one( EMSGSIZE ); 4bbda: 2082 movel %d2,%a0@ case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bbdc: 4cee 041c ffe8 moveml %fp@(-24),%d2-%d4/%a2 4bbe2: 4e5e unlk %fp 4bbe4: 4e75 rts _POSIX_Message_queue_Priority_from_core(_Thread_Executing->Wait.count); if ( !_Thread_Executing->Wait.return_code ) return length_out; rtems_set_errno_and_return_minus_one( 4bbe6: 4eb9 0005 66ec jsr 566ec <__errno> 4bbec: 2079 0006 8c0e moveal 68c0e <_Thread_Executing>,%a0 4bbf2: 2440 moveal %d0,%a2 4bbf4: 2f28 0034 movel %a0@(52),%sp@- 4bbf8: 4eb9 0004 bec4 jsr 4bec4 <_POSIX_Message_queue_Translate_core_message_queue_return_code> 4bbfe: 588f addql #4,%sp 4bc00: 72ff moveq #-1,%d1 4bc02: 2480 movel %d0,%a2@ case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bc04: 2001 movel %d1,%d0 4bc06: 4cee 041c ffe8 moveml %fp@(-24),%d2-%d4/%a2 4bc0c: 4e5e unlk %fp 4bc0e: 4e75 rts the_mq_fd = _POSIX_Message_queue_Get_fd( mqdes, &location ); switch ( location ) { case OBJECTS_LOCAL: if ( (the_mq_fd->oflag & O_ACCMODE) == O_WRONLY ) { _Thread_Enable_dispatch(); 4bc10: 4eb9 0004 f7b8 jsr 4f7b8 <_Thread_Enable_dispatch> rtems_set_errno_and_return_minus_one( EBADF ); 4bc16: 7609 moveq #9,%d3 4bc18: 4eb9 0005 66ec jsr 566ec <__errno> 4bc1e: 72ff moveq #-1,%d1 4bc20: 2040 moveal %d0,%a0 case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bc22: 2001 movel %d1,%d0 switch ( location ) { case OBJECTS_LOCAL: if ( (the_mq_fd->oflag & O_ACCMODE) == O_WRONLY ) { _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one( EBADF ); 4bc24: 2083 movel %d3,%a0@ case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bc26: 4cee 041c ffe8 moveml %fp@(-24),%d2-%d4/%a2 4bc2c: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004bc54 <_POSIX_Message_queue_Send_support>: /* * Validate the priority. * XXX - Do not validate msg_prio is not less than 0. */ if ( msg_prio > MQ_PRIO_MAX ) 4bc54: 7020 moveq #32,%d0 size_t msg_len, uint32_t msg_prio, bool wait, Watchdog_Interval timeout ) { 4bc56: 4e56 ffec linkw %fp,#-20 4bc5a: 48d7 041c moveml %d2-%d4/%a2,%sp@ 4bc5e: 262e 0008 movel %fp@(8),%d3 4bc62: 242e 0014 movel %fp@(20),%d2 4bc66: 282e 0018 movel %fp@(24),%d4 /* * Validate the priority. * XXX - Do not validate msg_prio is not less than 0. */ if ( msg_prio > MQ_PRIO_MAX ) 4bc6a: b082 cmpl %d2,%d0 4bc6c: 6500 00e2 bcsw 4bd50 <_POSIX_Message_queue_Send_support+0xfc> 4bc70: 486e fffc pea %fp@(-4) 4bc74: 2f03 movel %d3,%sp@- 4bc76: 4879 0006 8f90 pea 68f90 <_POSIX_Message_queue_Information_fds> 4bc7c: 4eb9 0004 eed8 jsr 4eed8 <_Objects_Get> rtems_set_errno_and_return_minus_one( EINVAL ); the_mq_fd = _POSIX_Message_queue_Get_fd( mqdes, &location ); switch ( location ) { 4bc82: 4fef 000c lea %sp@(12),%sp 4bc86: 2040 moveal %d0,%a0 4bc88: 4aae fffc tstl %fp@(-4) 4bc8c: 6600 00a8 bnew 4bd36 <_POSIX_Message_queue_Send_support+0xe2> case OBJECTS_LOCAL: if ( (the_mq_fd->oflag & O_ACCMODE) == O_RDONLY ) { 4bc90: 2028 0014 movel %a0@(20),%d0 4bc94: 7203 moveq #3,%d1 4bc96: c280 andl %d0,%d1 4bc98: 6700 00d0 beqw 4bd6a <_POSIX_Message_queue_Send_support+0x116> _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one( EBADF ); } the_mq = the_mq_fd->Queue; 4bc9c: 2068 0010 moveal %a0@(16),%a0 /* * A timed receive with a bad time will do a poll regardless. */ if ( wait ) 4bca0: 4a04 tstb %d4 4bca2: 6752 beqs 4bcf6 <_POSIX_Message_queue_Send_support+0xa2> 4bca4: 720e moveq #14,%d1 4bca6: e2a8 lsrl %d1,%d0 4bca8: 123c 0001 moveb #1,%d1 do_wait = wait; /* * Now perform the actual message receive */ msg_status = _CORE_message_queue_Submit( 4bcac: 4482 negl %d2 the_mq = the_mq_fd->Queue; /* * A timed receive with a bad time will do a poll regardless. */ if ( wait ) 4bcae: b380 eorl %d1,%d0 do_wait = wait; /* * Now perform the actual message receive */ msg_status = _CORE_message_queue_Submit( 4bcb0: 2f2e 001c movel %fp@(28),%sp@- the_mq = the_mq_fd->Queue; /* * A timed receive with a bad time will do a poll regardless. */ if ( wait ) 4bcb4: c081 andl %d1,%d0 do_wait = wait; /* * Now perform the actual message receive */ msg_status = _CORE_message_queue_Submit( 4bcb6: 2f00 movel %d0,%sp@- 4bcb8: 2f02 movel %d2,%sp@- 4bcba: 42a7 clrl %sp@- 4bcbc: 2f03 movel %d3,%sp@- 4bcbe: 2f2e 0010 movel %fp@(16),%sp@- 4bcc2: 2f2e 000c movel %fp@(12),%sp@- 4bcc6: 4868 001a pea %a0@(26) 4bcca: 4eb9 0004 df78 jsr 4df78 <_CORE_message_queue_Submit> _POSIX_Message_queue_Priority_to_core( msg_prio ), do_wait, timeout /* no timeout */ ); _Thread_Enable_dispatch(); 4bcd0: 4fef 0020 lea %sp@(32),%sp do_wait = wait; /* * Now perform the actual message receive */ msg_status = _CORE_message_queue_Submit( 4bcd4: 2400 movel %d0,%d2 _POSIX_Message_queue_Priority_to_core( msg_prio ), do_wait, timeout /* no timeout */ ); _Thread_Enable_dispatch(); 4bcd6: 4eb9 0004 f7b8 jsr 4f7b8 <_Thread_Enable_dispatch> * after it wakes up. The returned status is correct for * non-blocking operations but if we blocked, then we need * to look at the status in our TCB. */ if ( msg_status == CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_WAIT ) 4bcdc: 7007 moveq #7,%d0 4bcde: b082 cmpl %d2,%d0 4bce0: 6748 beqs 4bd2a <_POSIX_Message_queue_Send_support+0xd6> msg_status = _Thread_Executing->Wait.return_code; if ( !msg_status ) 4bce2: 4a82 tstl %d2 4bce4: 6600 00a4 bnew 4bd8a <_POSIX_Message_queue_Send_support+0x136> 4bce8: 4281 clrl %d1 case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bcea: 2001 movel %d1,%d0 4bcec: 4cee 041c ffec moveml %fp@(-20),%d2-%d4/%a2 4bcf2: 4e5e unlk %fp 4bcf4: 4e75 rts do_wait = wait; /* * Now perform the actual message receive */ msg_status = _CORE_message_queue_Submit( 4bcf6: 2f2e 001c movel %fp@(28),%sp@- the_mq = the_mq_fd->Queue; /* * A timed receive with a bad time will do a poll regardless. */ if ( wait ) 4bcfa: 4280 clrl %d0 do_wait = wait; /* * Now perform the actual message receive */ msg_status = _CORE_message_queue_Submit( 4bcfc: 4482 negl %d2 4bcfe: 2f00 movel %d0,%sp@- 4bd00: 2f02 movel %d2,%sp@- 4bd02: 42a7 clrl %sp@- 4bd04: 2f03 movel %d3,%sp@- 4bd06: 2f2e 0010 movel %fp@(16),%sp@- 4bd0a: 2f2e 000c movel %fp@(12),%sp@- 4bd0e: 4868 001a pea %a0@(26) 4bd12: 4eb9 0004 df78 jsr 4df78 <_CORE_message_queue_Submit> _POSIX_Message_queue_Priority_to_core( msg_prio ), do_wait, timeout /* no timeout */ ); _Thread_Enable_dispatch(); 4bd18: 4fef 0020 lea %sp@(32),%sp do_wait = wait; /* * Now perform the actual message receive */ msg_status = _CORE_message_queue_Submit( 4bd1c: 2400 movel %d0,%d2 _POSIX_Message_queue_Priority_to_core( msg_prio ), do_wait, timeout /* no timeout */ ); _Thread_Enable_dispatch(); 4bd1e: 4eb9 0004 f7b8 jsr 4f7b8 <_Thread_Enable_dispatch> * after it wakes up. The returned status is correct for * non-blocking operations but if we blocked, then we need * to look at the status in our TCB. */ if ( msg_status == CORE_MESSAGE_QUEUE_STATUS_UNSATISFIED_WAIT ) 4bd24: 7007 moveq #7,%d0 4bd26: b082 cmpl %d2,%d0 4bd28: 66b8 bnes 4bce2 <_POSIX_Message_queue_Send_support+0x8e><== ALWAYS TAKEN msg_status = _Thread_Executing->Wait.return_code; 4bd2a: 2079 0006 8c0e moveal 68c0e <_Thread_Executing>,%a0 4bd30: 2428 0034 movel %a0@(52),%d2 4bd34: 60ac bras 4bce2 <_POSIX_Message_queue_Send_support+0x8e> #endif case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); 4bd36: 4eb9 0005 66ec jsr 566ec <__errno> 4bd3c: 72ff moveq #-1,%d1 4bd3e: 2040 moveal %d0,%a0 4bd40: 7009 moveq #9,%d0 } 4bd42: 4cee 041c ffec moveml %fp@(-20),%d2-%d4/%a2 #endif case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); 4bd48: 2080 movel %d0,%a0@ } 4bd4a: 2001 movel %d1,%d0 4bd4c: 4e5e unlk %fp 4bd4e: 4e75 rts * Validate the priority. * XXX - Do not validate msg_prio is not less than 0. */ if ( msg_prio > MQ_PRIO_MAX ) rtems_set_errno_and_return_minus_one( EINVAL ); 4bd50: 4eb9 0005 66ec jsr 566ec <__errno> 4bd56: 7616 moveq #22,%d3 4bd58: 72ff moveq #-1,%d1 4bd5a: 2040 moveal %d0,%a0 case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bd5c: 2001 movel %d1,%d0 * Validate the priority. * XXX - Do not validate msg_prio is not less than 0. */ if ( msg_prio > MQ_PRIO_MAX ) rtems_set_errno_and_return_minus_one( EINVAL ); 4bd5e: 2083 movel %d3,%a0@ case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bd60: 4cee 041c ffec moveml %fp@(-20),%d2-%d4/%a2 4bd66: 4e5e unlk %fp 4bd68: 4e75 rts the_mq_fd = _POSIX_Message_queue_Get_fd( mqdes, &location ); switch ( location ) { case OBJECTS_LOCAL: if ( (the_mq_fd->oflag & O_ACCMODE) == O_RDONLY ) { _Thread_Enable_dispatch(); 4bd6a: 4eb9 0004 f7b8 jsr 4f7b8 <_Thread_Enable_dispatch> rtems_set_errno_and_return_minus_one( EBADF ); 4bd70: 7409 moveq #9,%d2 4bd72: 4eb9 0005 66ec jsr 566ec <__errno> 4bd78: 72ff moveq #-1,%d1 4bd7a: 2040 moveal %d0,%a0 case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bd7c: 2001 movel %d1,%d0 switch ( location ) { case OBJECTS_LOCAL: if ( (the_mq_fd->oflag & O_ACCMODE) == O_RDONLY ) { _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one( EBADF ); 4bd7e: 2082 movel %d2,%a0@ case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bd80: 4cee 041c ffec moveml %fp@(-20),%d2-%d4/%a2 4bd86: 4e5e unlk %fp 4bd88: 4e75 rts msg_status = _Thread_Executing->Wait.return_code; if ( !msg_status ) return msg_status; rtems_set_errno_and_return_minus_one( 4bd8a: 4eb9 0005 66ec jsr 566ec <__errno> 4bd90: 2440 moveal %d0,%a2 4bd92: 2f02 movel %d2,%sp@- 4bd94: 4eb9 0004 bec4 jsr 4bec4 <_POSIX_Message_queue_Translate_core_message_queue_return_code> 4bd9a: 588f addql #4,%sp 4bd9c: 72ff moveq #-1,%d1 4bd9e: 2480 movel %d0,%a2@ case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EBADF ); } 4bda0: 2001 movel %d1,%d0 4bda2: 4cee 041c ffec moveml %fp@(-20),%d2-%d4/%a2 4bda8: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004ef94 <_POSIX_Semaphore_Create_support>: const char *name, int pshared, unsigned int value, POSIX_Semaphore_Control **the_sem ) { 4ef94: 4e56 0000 linkw %fp,#0 4ef98: 2f0a movel %a2,%sp@- 4ef9a: 2f02 movel %d2,%sp@- 4ef9c: 242e 0008 movel %fp@(8),%d2 POSIX_Semaphore_Control *the_semaphore; CORE_semaphore_Attributes *the_sem_attr; char *name_p = (char *)name; /* Sharing semaphores among processes is not currently supported */ if (pshared != 0) 4efa0: 4aae 000c tstl %fp@(12) 4efa4: 6600 0112 bnew 4f0b8 <_POSIX_Semaphore_Create_support+0x124> rtems_set_errno_and_return_minus_one( ENOSYS ); if ( name ) { 4efa8: 4a82 tstl %d2 4efaa: 6718 beqs 4efc4 <_POSIX_Semaphore_Create_support+0x30> if ( strnlen( name, NAME_MAX ) >= NAME_MAX ) 4efac: 4878 00ff pea ff 4efb0: 2f02 movel %d2,%sp@- 4efb2: 4eb9 0005 4134 jsr 54134 4efb8: 508f addql #8,%sp 4efba: 0c80 0000 00fe cmpil #254,%d0 4efc0: 6200 00dc bhiw 4f09e <_POSIX_Semaphore_Create_support+0x10a> 4efc4: 2039 0006 4024 movel 64024 <_Thread_Dispatch_disable_level>,%d0 4efca: 5280 addql #1,%d0 4efcc: 23c0 0006 4024 movel %d0,64024 <_Thread_Dispatch_disable_level> * _POSIX_Semaphore_Allocate */ RTEMS_INLINE_ROUTINE POSIX_Semaphore_Control *_POSIX_Semaphore_Allocate( void ) { return (POSIX_Semaphore_Control *) 4efd2: 4879 0006 427e pea 6427e <_POSIX_Semaphore_Information> 4efd8: 4eb9 0004 a6e8 jsr 4a6e8 <_Objects_Allocate> _Thread_Disable_dispatch(); the_semaphore = _POSIX_Semaphore_Allocate(); if ( !the_semaphore ) { 4efde: 588f addql #4,%sp 4efe0: 2440 moveal %d0,%a2 4efe2: 4a80 tstl %d0 4efe4: 6700 00ec beqw 4f0d2 <_POSIX_Semaphore_Create_support+0x13e> _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one( ENOSPC ); } the_semaphore->process_shared = pshared; 4efe8: 42aa 0010 clrl %a2@(16) if ( name ) { 4efec: 4a82 tstl %d2 4efee: 675c beqs 4f04c <_POSIX_Semaphore_Create_support+0xb8><== NEVER TAKEN the_semaphore->named = true; the_semaphore->open_count = 1; 4eff0: 7001 moveq #1,%d0 4eff2: 2540 0016 movel %d0,%a2@(22) } the_semaphore->process_shared = pshared; if ( name ) { the_semaphore->named = true; 4eff6: 1540 0014 moveb %d0,%a2@(20) the_semaphore->open_count = 1; the_semaphore->linked = true; 4effa: 1540 0015 moveb %d0,%a2@(21) the_sem_attr->discipline = CORE_SEMAPHORE_DISCIPLINES_FIFO; /* * This effectively disables limit checking. */ the_sem_attr->maximum_count = 0xFFFFFFFF; 4effe: 70ff moveq #-1,%d0 * blocking tasks on this semaphore should be. It could somehow * be derived from the current scheduling policy. One * thing is certain, no matter what we decide, it won't be * the same as all other POSIX implementations. :) */ the_sem_attr->discipline = CORE_SEMAPHORE_DISCIPLINES_FIFO; 4f000: 42aa 005e clrl %a2@(94) /* * This effectively disables limit checking. */ the_sem_attr->maximum_count = 0xFFFFFFFF; 4f004: 2540 005a movel %d0,%a2@(90) _CORE_semaphore_Initialize( &the_semaphore->Semaphore, the_sem_attr, value ); 4f008: 2f2e 0010 movel %fp@(16),%sp@- 4f00c: 486a 005a pea %a2@(90) 4f010: 486a 001a pea %a2@(26) 4f014: 4eb9 0004 a17c jsr 4a17c <_CORE_semaphore_Initialize> #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 4f01a: 2079 0006 4296 moveal 64296 <_POSIX_Semaphore_Information+0x18>,%a0 4f020: 4280 clrl %d0 4f022: 302a 000a movew %a2@(10),%d0 4f026: 218a 0c00 movel %a2,%a0@(00000000,%d0:l:4) the_object ); #if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES) /* ASSERT: information->is_string */ the_object->name.name_p = name; 4f02a: 2542 000c movel %d2,%a2@(12) &_POSIX_Semaphore_Information, &the_semaphore->Object, name_p ); *the_sem = the_semaphore; 4f02e: 206e 0014 moveal %fp@(20),%a0 4f032: 208a movel %a2,%a0@ _Thread_Enable_dispatch(); 4f034: 4eb9 0004 b464 jsr 4b464 <_Thread_Enable_dispatch> return 0; 4f03a: 4fef 000c lea %sp@(12),%sp name_p ); *the_sem = the_semaphore; _Thread_Enable_dispatch(); 4f03e: 4280 clrl %d0 return 0; } 4f040: 242e fff8 movel %fp@(-8),%d2 4f044: 246e fffc moveal %fp@(-4),%a2 4f048: 4e5e unlk %fp 4f04a: 4e75 rts the_semaphore->named = true; the_semaphore->open_count = 1; the_semaphore->linked = true; } else { the_semaphore->named = false; the_semaphore->open_count = 0; 4f04c: 42aa 0016 clrl %a2@(22) if ( name ) { the_semaphore->named = true; the_semaphore->open_count = 1; the_semaphore->linked = true; } else { the_semaphore->named = false; 4f050: 4200 clrb %d0 * blocking tasks on this semaphore should be. It could somehow * be derived from the current scheduling policy. One * thing is certain, no matter what we decide, it won't be * the same as all other POSIX implementations. :) */ the_sem_attr->discipline = CORE_SEMAPHORE_DISCIPLINES_FIFO; 4f052: 42aa 005e clrl %a2@(94) if ( name ) { the_semaphore->named = true; the_semaphore->open_count = 1; the_semaphore->linked = true; } else { the_semaphore->named = false; 4f056: 1540 0014 moveb %d0,%a2@(20) the_semaphore->open_count = 0; the_semaphore->linked = false; 4f05a: 1540 0015 moveb %d0,%a2@(21) the_sem_attr->discipline = CORE_SEMAPHORE_DISCIPLINES_FIFO; /* * This effectively disables limit checking. */ the_sem_attr->maximum_count = 0xFFFFFFFF; 4f05e: 70ff moveq #-1,%d0 4f060: 2540 005a movel %d0,%a2@(90) _CORE_semaphore_Initialize( &the_semaphore->Semaphore, the_sem_attr, value ); 4f064: 2f2e 0010 movel %fp@(16),%sp@- 4f068: 486a 005a pea %a2@(90) 4f06c: 486a 001a pea %a2@(26) 4f070: 4eb9 0004 a17c jsr 4a17c <_CORE_semaphore_Initialize> #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 4f076: 2079 0006 4296 moveal 64296 <_POSIX_Semaphore_Information+0x18>,%a0 4f07c: 4280 clrl %d0 4f07e: 302a 000a movew %a2@(10),%d0 4f082: 218a 0c00 movel %a2,%a0@(00000000,%d0:l:4) the_object ); #if defined(RTEMS_SCORE_OBJECT_ENABLE_STRING_NAMES) /* ASSERT: information->is_string */ the_object->name.name_p = name; 4f086: 2542 000c movel %d2,%a2@(12) &_POSIX_Semaphore_Information, &the_semaphore->Object, name_p ); *the_sem = the_semaphore; 4f08a: 206e 0014 moveal %fp@(20),%a0 4f08e: 208a movel %a2,%a0@ _Thread_Enable_dispatch(); 4f090: 4eb9 0004 b464 jsr 4b464 <_Thread_Enable_dispatch> return 0; 4f096: 4fef 000c lea %sp@(12),%sp name_p ); *the_sem = the_semaphore; _Thread_Enable_dispatch(); 4f09a: 4280 clrl %d0 4f09c: 60a2 bras 4f040 <_POSIX_Semaphore_Create_support+0xac> if (pshared != 0) rtems_set_errno_and_return_minus_one( ENOSYS ); if ( name ) { if ( strnlen( name, NAME_MAX ) >= NAME_MAX ) rtems_set_errno_and_return_minus_one( ENAMETOOLONG ); 4f09e: 4eb9 0005 2c24 jsr 52c24 <__errno> 4f0a4: 745b moveq #91,%d2 4f0a6: 2040 moveal %d0,%a0 4f0a8: 70ff moveq #-1,%d0 4f0aa: 2082 movel %d2,%a0@ *the_sem = the_semaphore; _Thread_Enable_dispatch(); return 0; } 4f0ac: 242e fff8 movel %fp@(-8),%d2 4f0b0: 246e fffc moveal %fp@(-4),%a2 4f0b4: 4e5e unlk %fp 4f0b6: 4e75 rts CORE_semaphore_Attributes *the_sem_attr; char *name_p = (char *)name; /* Sharing semaphores among processes is not currently supported */ if (pshared != 0) rtems_set_errno_and_return_minus_one( ENOSYS ); 4f0b8: 4eb9 0005 2c24 jsr 52c24 <__errno> *the_sem = the_semaphore; _Thread_Enable_dispatch(); return 0; } 4f0be: 242e fff8 movel %fp@(-8),%d2 CORE_semaphore_Attributes *the_sem_attr; char *name_p = (char *)name; /* Sharing semaphores among processes is not currently supported */ if (pshared != 0) rtems_set_errno_and_return_minus_one( ENOSYS ); 4f0c2: 2040 moveal %d0,%a0 4f0c4: 7258 moveq #88,%d1 4f0c6: 70ff moveq #-1,%d0 *the_sem = the_semaphore; _Thread_Enable_dispatch(); return 0; } 4f0c8: 246e fffc moveal %fp@(-4),%a2 4f0cc: 4e5e unlk %fp CORE_semaphore_Attributes *the_sem_attr; char *name_p = (char *)name; /* Sharing semaphores among processes is not currently supported */ if (pshared != 0) rtems_set_errno_and_return_minus_one( ENOSYS ); 4f0ce: 2081 movel %d1,%a0@ *the_sem = the_semaphore; _Thread_Enable_dispatch(); return 0; } 4f0d0: 4e75 rts _Thread_Disable_dispatch(); the_semaphore = _POSIX_Semaphore_Allocate(); if ( !the_semaphore ) { _Thread_Enable_dispatch(); 4f0d2: 4eb9 0004 b464 jsr 4b464 <_Thread_Enable_dispatch> rtems_set_errno_and_return_minus_one( ENOSPC ); 4f0d8: 4eb9 0005 2c24 jsr 52c24 <__errno> *the_sem = the_semaphore; _Thread_Enable_dispatch(); return 0; } 4f0de: 242e fff8 movel %fp@(-8),%d2 the_semaphore = _POSIX_Semaphore_Allocate(); if ( !the_semaphore ) { _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one( ENOSPC ); 4f0e2: 2040 moveal %d0,%a0 4f0e4: 721c moveq #28,%d1 4f0e6: 70ff moveq #-1,%d0 *the_sem = the_semaphore; _Thread_Enable_dispatch(); return 0; } 4f0e8: 246e fffc moveal %fp@(-4),%a2 4f0ec: 4e5e unlk %fp the_semaphore = _POSIX_Semaphore_Allocate(); if ( !the_semaphore ) { _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one( ENOSPC ); 4f0ee: 2081 movel %d1,%a0@ *the_sem = the_semaphore; _Thread_Enable_dispatch(); return 0; } ... =============================================================================== 0004b0c8 <_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch>: #include void _POSIX_Thread_Evaluate_cancellation_and_enable_dispatch( Thread_Control *the_thread ) { 4b0c8: 4e56 0000 linkw %fp,#0 4b0cc: 226e 0008 moveal %fp@(8),%a1 POSIX_API_Control *thread_support; thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ]; 4b0d0: 2069 010e moveal %a1@(270),%a0 if ( thread_support->cancelability_state == PTHREAD_CANCEL_ENABLE && 4b0d4: 4aa8 00d4 tstl %a0@(212) 4b0d8: 6608 bnes 4b0e2 <_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch+0x1a><== NEVER TAKEN thread_support->cancelability_type == PTHREAD_CANCEL_ASYNCHRONOUS && 4b0da: 7001 moveq #1,%d0 4b0dc: b0a8 00d8 cmpl %a0@(216),%d0 4b0e0: 6708 beqs 4b0ea <_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch+0x22> _Thread_Unnest_dispatch(); _POSIX_Thread_Exit( the_thread, PTHREAD_CANCELED ); } else _Thread_Enable_dispatch(); } 4b0e2: 4e5e unlk %fp thread_support->cancelability_type == PTHREAD_CANCEL_ASYNCHRONOUS && thread_support->cancelation_requested ) { _Thread_Unnest_dispatch(); _POSIX_Thread_Exit( the_thread, PTHREAD_CANCELED ); } else _Thread_Enable_dispatch(); 4b0e4: 4ef9 0004 8128 jmp 48128 <_Thread_Enable_dispatch> thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ]; if ( thread_support->cancelability_state == PTHREAD_CANCEL_ENABLE && thread_support->cancelability_type == PTHREAD_CANCEL_ASYNCHRONOUS && thread_support->cancelation_requested ) { 4b0ea: 4aa8 00dc tstl %a0@(220) 4b0ee: 67f2 beqs 4b0e2 <_POSIX_Thread_Evaluate_cancellation_and_enable_dispatch+0x1a> _Thread_Unnest_dispatch(); _POSIX_Thread_Exit( the_thread, PTHREAD_CANCELED ); 4b0f0: 4878 ffff pea ffffffff */ RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void ) { RTEMS_COMPILER_MEMORY_BARRIER(); _Thread_Dispatch_disable_level -= 1; 4b0f4: 2039 0005 f78c movel 5f78c <_Thread_Dispatch_disable_level>,%d0 4b0fa: 5380 subql #1,%d0 4b0fc: 2f09 movel %a1,%sp@- 4b0fe: 23c0 0005 f78c movel %d0,5f78c <_Thread_Dispatch_disable_level> 4b104: 4eb9 0004 b860 jsr 4b860 <_POSIX_Thread_Exit> { POSIX_API_Control *thread_support; thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ]; if ( thread_support->cancelability_state == PTHREAD_CANCEL_ENABLE && 4b10a: 508f addql #8,%sp _Thread_Unnest_dispatch(); _POSIX_Thread_Exit( the_thread, PTHREAD_CANCELED ); } else _Thread_Enable_dispatch(); } 4b10c: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004c668 <_POSIX_Thread_Translate_sched_param>: int policy, struct sched_param *param, Thread_CPU_budget_algorithms *budget_algorithm, Thread_CPU_budget_algorithm_callout *budget_callout ) { 4c668: 4e56 ffe8 linkw %fp,#-24 4c66c: 48d7 3c0c moveml %d2-%d3/%a2-%a5,%sp@ 4c670: 246e 000c moveal %fp@(12),%a2 if ( !_POSIX_Priority_Is_valid( param->sched_priority ) ) 4c674: 47f9 0004 c644 lea 4c644 <_POSIX_Priority_Is_valid>,%a3 4c67a: 2f12 movel %a2@,%sp@- int policy, struct sched_param *param, Thread_CPU_budget_algorithms *budget_algorithm, Thread_CPU_budget_algorithm_callout *budget_callout ) { 4c67c: 242e 0008 movel %fp@(8),%d2 4c680: 286e 0010 moveal %fp@(16),%a4 4c684: 2a6e 0014 moveal %fp@(20),%a5 if ( !_POSIX_Priority_Is_valid( param->sched_priority ) ) 4c688: 4e93 jsr %a3@ 4c68a: 588f addql #4,%sp 4c68c: 4a00 tstb %d0 4c68e: 671e beqs 4c6ae <_POSIX_Thread_Translate_sched_param+0x46><== NEVER TAKEN return EINVAL; *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_NONE; 4c690: 4294 clrl %a4@ *budget_callout = NULL; 4c692: 4295 clrl %a5@ if ( policy == SCHED_OTHER ) { 4c694: 4a82 tstl %d2 4c696: 6722 beqs 4c6ba <_POSIX_Thread_Translate_sched_param+0x52> *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE; return 0; } if ( policy == SCHED_FIFO ) { 4c698: 7001 moveq #1,%d0 4c69a: b082 cmpl %d2,%d0 4c69c: 6700 0084 beqw 4c722 <_POSIX_Thread_Translate_sched_param+0xba> *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_NONE; return 0; } if ( policy == SCHED_RR ) { 4c6a0: 7002 moveq #2,%d0 4c6a2: b082 cmpl %d2,%d0 4c6a4: 6700 008a beqw 4c730 <_POSIX_Thread_Translate_sched_param+0xc8> *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_EXHAUST_TIMESLICE; return 0; } if ( policy == SCHED_SPORADIC ) { 4c6a8: 7004 moveq #4,%d0 4c6aa: b082 cmpl %d2,%d0 4c6ac: 671c beqs 4c6ca <_POSIX_Thread_Translate_sched_param+0x62> if ( !_POSIX_Priority_Is_valid( param->sched_ss_low_priority ) ) return EINVAL; *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_CALLOUT; *budget_callout = _POSIX_Threads_Sporadic_budget_callout; return 0; 4c6ae: 7016 moveq #22,%d0 } return EINVAL; } 4c6b0: 4cee 3c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a5 4c6b6: 4e5e unlk %fp 4c6b8: 4e75 rts *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_NONE; *budget_callout = NULL; if ( policy == SCHED_OTHER ) { *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE; 4c6ba: 7201 moveq #1,%d1 4c6bc: 4280 clrl %d0 4c6be: 2881 movel %d1,%a4@ *budget_callout = _POSIX_Threads_Sporadic_budget_callout; return 0; } return EINVAL; } 4c6c0: 4cee 3c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a5 4c6c6: 4e5e unlk %fp 4c6c8: 4e75 rts *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_EXHAUST_TIMESLICE; return 0; } if ( policy == SCHED_SPORADIC ) { if ( (param->sched_ss_repl_period.tv_sec == 0) && 4c6ca: 4aaa 0008 tstl %a2@(8) 4c6ce: 6606 bnes 4c6d6 <_POSIX_Thread_Translate_sched_param+0x6e> (param->sched_ss_repl_period.tv_nsec == 0) ) 4c6d0: 4aaa 000c tstl %a2@(12) 4c6d4: 67d8 beqs 4c6ae <_POSIX_Thread_Translate_sched_param+0x46> return EINVAL; if ( (param->sched_ss_init_budget.tv_sec == 0) && 4c6d6: 4aaa 0010 tstl %a2@(16) 4c6da: 6606 bnes 4c6e2 <_POSIX_Thread_Translate_sched_param+0x7a> (param->sched_ss_init_budget.tv_nsec == 0) ) 4c6dc: 4aaa 0014 tstl %a2@(20) 4c6e0: 67cc beqs 4c6ae <_POSIX_Thread_Translate_sched_param+0x46> return EINVAL; if ( _Timespec_To_ticks( ¶m->sched_ss_repl_period ) < 4c6e2: 486a 0008 pea %a2@(8) 4c6e6: 243c 0004 a064 movel #303204,%d2 4c6ec: 2042 moveal %d2,%a0 4c6ee: 4e90 jsr %a0@ 4c6f0: 486a 0010 pea %a2@(16) 4c6f4: 2600 movel %d0,%d3 4c6f6: 2042 moveal %d2,%a0 4c6f8: 4e90 jsr %a0@ 4c6fa: 508f addql #8,%sp 4c6fc: b083 cmpl %d3,%d0 4c6fe: 62ae bhis 4c6ae <_POSIX_Thread_Translate_sched_param+0x46> _Timespec_To_ticks( ¶m->sched_ss_init_budget ) ) return EINVAL; if ( !_POSIX_Priority_Is_valid( param->sched_ss_low_priority ) ) 4c700: 2f2a 0004 movel %a2@(4),%sp@- 4c704: 4e93 jsr %a3@ 4c706: 588f addql #4,%sp 4c708: 4a00 tstb %d0 4c70a: 67a2 beqs 4c6ae <_POSIX_Thread_Translate_sched_param+0x46> return EINVAL; *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_CALLOUT; 4c70c: 7003 moveq #3,%d0 *budget_callout = _POSIX_Threads_Sporadic_budget_callout; 4c70e: 2abc 0004 6678 movel #288376,%a5@ return EINVAL; if ( !_POSIX_Priority_Is_valid( param->sched_ss_low_priority ) ) return EINVAL; *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_CALLOUT; 4c714: 2880 movel %d0,%a4@ *budget_callout = _POSIX_Threads_Sporadic_budget_callout; 4c716: 4280 clrl %d0 return 0; } return EINVAL; } 4c718: 4cee 3c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a5 4c71e: 4e5e unlk %fp 4c720: 4e75 rts *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE; return 0; } if ( policy == SCHED_FIFO ) { *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_NONE; 4c722: 4294 clrl %a4@ 4c724: 4200 clrb %d0 *budget_callout = _POSIX_Threads_Sporadic_budget_callout; return 0; } return EINVAL; } 4c726: 4cee 3c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a5 4c72c: 4e5e unlk %fp 4c72e: 4e75 rts *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_NONE; return 0; } if ( policy == SCHED_RR ) { *budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_EXHAUST_TIMESLICE; 4c730: 2880 movel %d0,%a4@ 4c732: 4200 clrb %d0 *budget_callout = _POSIX_Threads_Sporadic_budget_callout; return 0; } return EINVAL; } 4c734: 4cee 3c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a5 4c73a: 4e5e unlk %fp ... =============================================================================== 0004635c <_POSIX_Threads_Initialize_user_threads_body>: * * Output parameters: NONE */ void _POSIX_Threads_Initialize_user_threads_body(void) { 4635c: 4e56 ff9c linkw %fp,#-100 46360: 48d7 3c7c moveml %d2-%d6/%a2-%a5,%sp@ uint32_t maximum; posix_initialization_threads_table *user_threads; pthread_t thread_id; pthread_attr_t attr; user_threads = Configuration_POSIX_API.User_initialization_threads_table; 46364: 2479 0005 ebee moveal 5ebee ,%a2 maximum = Configuration_POSIX_API.number_of_initialization_threads; 4636a: 2839 0005 ebea movel 5ebea ,%d4 if ( !user_threads || maximum == 0 ) 46370: 4a8a tstl %a2 46372: 675a beqs 463ce <_POSIX_Threads_Initialize_user_threads_body+0x72><== NEVER TAKEN 46374: 4a84 tstl %d4 46376: 6756 beqs 463ce <_POSIX_Threads_Initialize_user_threads_body+0x72><== NEVER TAKEN 46378: 240e movel %fp,%d2 4637a: 2a0e movel %fp,%d5 4637c: 4283 clrl %d3 4637e: 0682 ffff ffc0 addil #-64,%d2 46384: 2c3c 0004 c740 movel #313152,%d6 4638a: 4bf9 0004 c770 lea 4c770 ,%a5 46390: 49f9 0004 c7b0 lea 4c7b0 ,%a4 46396: 5985 subql #4,%d5 46398: 47f9 0004 5fb0 lea 45fb0 ,%a3 for ( index=0 ; index < maximum ; index++ ) { /* * There is no way for these calls to fail in this situation. */ (void) pthread_attr_init( &attr ); 4639e: 2f02 movel %d2,%sp@- 463a0: 2046 moveal %d6,%a0 463a2: 4e90 jsr %a0@ (void) pthread_attr_setinheritsched( &attr, PTHREAD_EXPLICIT_SCHED ); 463a4: 4878 0002 pea 2 463a8: 2f02 movel %d2,%sp@- 463aa: 4e95 jsr %a5@ (void) pthread_attr_setstacksize(&attr, user_threads[ index ].stack_size); 463ac: 2f2a 0004 movel %a2@(4),%sp@- 463b0: 2f02 movel %d2,%sp@- 463b2: 4e94 jsr %a4@ status = pthread_create( 463b4: 42a7 clrl %sp@- 463b6: 2f12 movel %a2@,%sp@- 463b8: 2f02 movel %d2,%sp@- 463ba: 2f05 movel %d5,%sp@- 463bc: 4e93 jsr %a3@ &thread_id, &attr, user_threads[ index ].thread_entry, NULL ); if ( status ) 463be: 4fef 0024 lea %sp@(36),%sp 463c2: 4a80 tstl %d0 463c4: 6612 bnes 463d8 <_POSIX_Threads_Initialize_user_threads_body+0x7c> * * Setting the attributes explicitly is critical, since we don't want * to inherit the idle tasks attributes. */ for ( index=0 ; index < maximum ; index++ ) { 463c6: 5283 addql #1,%d3 463c8: 508a addql #8,%a2 463ca: b684 cmpl %d4,%d3 463cc: 65d0 bcss 4639e <_POSIX_Threads_Initialize_user_threads_body+0x42><== NEVER TAKEN NULL ); if ( status ) _Internal_error_Occurred( INTERNAL_ERROR_POSIX_API, true, status ); } } 463ce: 4cee 3c7c ff9c moveml %fp@(-100),%d2-%d6/%a2-%a5 463d4: 4e5e unlk %fp 463d6: 4e75 rts &attr, user_threads[ index ].thread_entry, NULL ); if ( status ) _Internal_error_Occurred( INTERNAL_ERROR_POSIX_API, true, status ); 463d8: 2f00 movel %d0,%sp@- 463da: 4878 0001 pea 1 463de: 4878 0002 pea 2 463e2: 4eb9 0004 8394 jsr 48394 <_Internal_error_Occurred> =============================================================================== 0004b3d0 <_POSIX_Threads_Sporadic_budget_TSR>: */ void _POSIX_Threads_Sporadic_budget_TSR( Objects_Id id __attribute__((unused)), void *argument ) { 4b3d0: 4e56 fff4 linkw %fp,#-12 4b3d4: 48d7 1c00 moveml %a2-%a4,%sp@ 4b3d8: 266e 000c moveal %fp@(12),%a3 the_thread = argument; api = the_thread->API_Extensions[ THREAD_API_POSIX ]; /* ticks is guaranteed to be at least one */ ticks = _Timespec_To_ticks( &api->schedparam.sched_ss_init_budget ); 4b3dc: 49f9 0004 c4a0 lea 4c4a0 <_Timespec_To_ticks>,%a4 Thread_Control *the_thread; POSIX_API_Control *api; the_thread = argument; api = the_thread->API_Extensions[ THREAD_API_POSIX ]; 4b3e2: 246b 010e moveal %a3@(270),%a2 /* ticks is guaranteed to be at least one */ ticks = _Timespec_To_ticks( &api->schedparam.sched_ss_init_budget ); 4b3e6: 486a 0094 pea %a2@(148) 4b3ea: 4e94 jsr %a4@ */ #if 0 printk( "TSR %d %d %d\n", the_thread->resource_count, the_thread->current_priority, new_priority ); #endif if ( the_thread->resource_count == 0 ) { 4b3ec: 588f addql #4,%sp 4b3ee: 4281 clrl %d1 4b3f0: 1239 0005 d7c2 moveb 5d7c2 ,%d1 4b3f6: 92aa 0084 subl %a2@(132),%d1 api = the_thread->API_Extensions[ THREAD_API_POSIX ]; /* ticks is guaranteed to be at least one */ ticks = _Timespec_To_ticks( &api->schedparam.sched_ss_init_budget ); the_thread->cpu_time_budget = ticks; 4b3fa: 2740 0076 movel %d0,%a3@(118) new_priority = _POSIX_Priority_To_core( api->schedparam.sched_priority ); the_thread->real_priority = new_priority; 4b3fe: 2741 0018 movel %d1,%a3@(24) */ #if 0 printk( "TSR %d %d %d\n", the_thread->resource_count, the_thread->current_priority, new_priority ); #endif if ( the_thread->resource_count == 0 ) { 4b402: 4aab 001c tstl %a3@(28) 4b406: 6606 bnes 4b40e <_POSIX_Threads_Sporadic_budget_TSR+0x3e><== NEVER TAKEN /* * If this would make them less important, then do not change it. */ if ( the_thread->current_priority > new_priority ) { 4b408: b2ab 0014 cmpl %a3@(20),%d1 4b40c: 652c bcss 4b43a <_POSIX_Threads_Sporadic_budget_TSR+0x6a> #endif } } /* ticks is guaranteed to be at least one */ ticks = _Timespec_To_ticks( &api->schedparam.sched_ss_repl_period ); 4b40e: 486a 008c pea %a2@(140) 4b412: 4e94 jsr %a4@ ) { the_watchdog->initial = units; _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 4b414: 588f addql #4,%sp Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 4b416: 2540 00b0 movel %d0,%a2@(176) _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 4b41a: 45ea 00a4 lea %a2@(164),%a2 4b41e: 203c 0005 f050 movel #389200,%d0 4b424: 2d4a 000c movel %a2,%fp@(12) _Watchdog_Insert_ticks( &api->Sporadic_timer, ticks ); } 4b428: 4cee 1c00 fff4 moveml %fp@(-12),%a2-%a4 4b42e: 2d40 0008 movel %d0,%fp@(8) 4b432: 4e5e unlk %fp 4b434: 4ef9 0004 8f5c jmp 48f5c <_Watchdog_Insert> if ( the_thread->resource_count == 0 ) { /* * If this would make them less important, then do not change it. */ if ( the_thread->current_priority > new_priority ) { _Thread_Change_priority( the_thread, new_priority, true ); 4b43a: 4878 0001 pea 1 4b43e: 2f01 movel %d1,%sp@- 4b440: 2f0b movel %a3,%sp@- 4b442: 4eb9 0004 789c jsr 4789c <_Thread_Change_priority> 4b448: 4fef 000c lea %sp@(12),%sp #endif } } /* ticks is guaranteed to be at least one */ ticks = _Timespec_To_ticks( &api->schedparam.sched_ss_repl_period ); 4b44c: 486a 008c pea %a2@(140) 4b450: 4e94 jsr %a4@ 4b452: 588f addql #4,%sp Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 4b454: 2540 00b0 movel %d0,%a2@(176) _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 4b458: 45ea 00a4 lea %a2@(164),%a2 4b45c: 203c 0005 f050 movel #389200,%d0 4b462: 2d4a 000c movel %a2,%fp@(12) _Watchdog_Insert_ticks( &api->Sporadic_timer, ticks ); } 4b466: 4cee 1c00 fff4 moveml %fp@(-12),%a2-%a4 4b46c: 2d40 0008 movel %d0,%fp@(8) 4b470: 4e5e unlk %fp 4b472: 4ef9 0004 8f5c jmp 48f5c <_Watchdog_Insert> =============================================================================== 0004b388 <_POSIX_Threads_Sporadic_budget_callout>: RTEMS_INLINE_ROUTINE Priority_Control _POSIX_Priority_To_core( int priority ) { return (Priority_Control) (POSIX_SCHEDULER_MAXIMUM_PRIORITY - priority + 1); 4b388: 4280 clrl %d0 /* * This will prevent the thread from consuming its entire "budget" * while at low priority. */ the_thread->cpu_time_budget = 0xFFFFFFFF; /* XXX should be based on MAX_U32 */ 4b38a: 72ff moveq #-1,%d1 * _POSIX_Threads_Sporadic_budget_callout */ void _POSIX_Threads_Sporadic_budget_callout( Thread_Control *the_thread ) { 4b38c: 4e56 0000 linkw %fp,#0 4b390: 206e 0008 moveal %fp@(8),%a0 4b394: 1039 0005 d7c2 moveb 5d7c2 ,%d0 POSIX_API_Control *api; uint32_t new_priority; api = the_thread->API_Extensions[ THREAD_API_POSIX ]; 4b39a: 2268 010e moveal %a0@(270),%a1 4b39e: 90a9 0088 subl %a1@(136),%d0 /* * This will prevent the thread from consuming its entire "budget" * while at low priority. */ the_thread->cpu_time_budget = 0xFFFFFFFF; /* XXX should be based on MAX_U32 */ 4b3a2: 2141 0076 movel %d1,%a0@(118) new_priority = _POSIX_Priority_To_core(api->schedparam.sched_ss_low_priority); the_thread->real_priority = new_priority; 4b3a6: 2140 0018 movel %d0,%a0@(24) */ #if 0 printk( "callout %d %d %d\n", the_thread->resource_count, the_thread->current_priority, new_priority ); #endif if ( the_thread->resource_count == 0 ) { 4b3aa: 4aa8 001c tstl %a0@(28) 4b3ae: 6606 bnes 4b3b6 <_POSIX_Threads_Sporadic_budget_callout+0x2e><== NEVER TAKEN /* * Make sure we are actually lowering it. If they have lowered it * to logically lower than sched_ss_low_priority, then we do not want to * change it. */ if ( the_thread->current_priority < new_priority ) { 4b3b0: b0a8 0014 cmpl %a0@(20),%d0 4b3b4: 6204 bhis 4b3ba <_POSIX_Threads_Sporadic_budget_callout+0x32><== ALWAYS TAKEN #if 0 printk( "lower priority\n" ); #endif } } } 4b3b6: 4e5e unlk %fp <== NOT EXECUTED 4b3b8: 4e75 rts <== NOT EXECUTED * Make sure we are actually lowering it. If they have lowered it * to logically lower than sched_ss_low_priority, then we do not want to * change it. */ if ( the_thread->current_priority < new_priority ) { _Thread_Change_priority( the_thread, new_priority, true ); 4b3ba: 4878 0001 pea 1 4b3be: 2f00 movel %d0,%sp@- 4b3c0: 2f08 movel %a0,%sp@- 4b3c2: 4eb9 0004 789c jsr 4789c <_Thread_Change_priority> 4b3c8: 4fef 000c lea %sp@(12),%sp #if 0 printk( "lower priority\n" ); #endif } } } 4b3cc: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004d5b8 <_POSIX_Threads_cancel_run>: thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ]; handler_stack = &thread_support->Cancellation_Handlers; thread_support->cancelability_state = PTHREAD_CANCEL_DISABLE; 4d5b8: 7001 moveq #1,%d0 #include void _POSIX_Threads_cancel_run( Thread_Control *the_thread ) { 4d5ba: 4e56 ffec linkw %fp,#-20 4d5be: 206e 0008 moveal %fp@(8),%a0 4d5c2: 48d7 3c04 moveml %d2/%a2-%a5,%sp@ POSIX_Cancel_Handler_control *handler; Chain_Control *handler_stack; POSIX_API_Control *thread_support; ISR_Level level; thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ]; 4d5c6: 2668 010e moveal %a0@(270),%a3 */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 4d5ca: 45eb 00e4 lea %a3@(228),%a2 handler_stack = &thread_support->Cancellation_Handlers; thread_support->cancelability_state = PTHREAD_CANCEL_DISABLE; 4d5ce: 2740 00d4 movel %d0,%a3@(212) POSIX_API_Control *thread_support; ISR_Level level; thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ]; handler_stack = &thread_support->Cancellation_Handlers; 4d5d2: b5eb 00e0 cmpal %a3@(224),%a2 4d5d6: 673c beqs 4d614 <_POSIX_Threads_cancel_run+0x5c> 4d5d8: 49f9 0004 9210 lea 49210 <_Workspace_Free>,%a4 thread_support->cancelability_state = PTHREAD_CANCEL_DISABLE; while ( !_Chain_Is_empty( handler_stack ) ) { _ISR_Disable( level ); 4d5de: 243c 0000 0700 movel #1792,%d2 4d5e4: 2002 movel %d2,%d0 4d5e6: 40c1 movew %sr,%d1 4d5e8: 8081 orl %d1,%d0 4d5ea: 46c0 movew %d0,%sr handler = (POSIX_Cancel_Handler_control *) 4d5ec: 2a6a 0004 moveal %a2@(4),%a5 ) { Chain_Node *next; Chain_Node *previous; next = the_node->next; 4d5f0: 2055 moveal %a5@,%a0 previous = the_node->previous; 4d5f2: 226d 0004 moveal %a5@(4),%a1 next->previous = previous; previous->next = next; 4d5f6: 2288 movel %a0,%a1@ Chain_Node *next; Chain_Node *previous; next = the_node->next; previous = the_node->previous; next->previous = previous; 4d5f8: 2149 0004 movel %a1,%a0@(4) _Chain_Tail( handler_stack )->previous; _Chain_Extract_unprotected( &handler->Node ); _ISR_Enable( level ); 4d5fc: 46c1 movew %d1,%sr (*handler->routine)( handler->arg ); 4d5fe: 2f2d 000c movel %a5@(12),%sp@- 4d602: 206d 0008 moveal %a5@(8),%a0 4d606: 4e90 jsr %a0@ _Workspace_Free( handler ); 4d608: 2f0d movel %a5,%sp@- 4d60a: 4e94 jsr %a4@ POSIX_API_Control *thread_support; ISR_Level level; thread_support = the_thread->API_Extensions[ THREAD_API_POSIX ]; handler_stack = &thread_support->Cancellation_Handlers; 4d60c: 508f addql #8,%sp 4d60e: b5eb 00e0 cmpal %a3@(224),%a2 4d612: 66d0 bnes 4d5e4 <_POSIX_Threads_cancel_run+0x2c> <== NEVER TAKEN (*handler->routine)( handler->arg ); _Workspace_Free( handler ); } } 4d614: 4cee 3c04 ffec moveml %fp@(-20),%d2/%a2-%a5 4d61a: 4e5e unlk %fp ... =============================================================================== 00045cc0 <_POSIX_Timer_TSR>: * This is the operation that is run when a timer expires */ void _POSIX_Timer_TSR( Objects_Id timer __attribute__((unused)), void *data) { 45cc0: 4e56 0000 linkw %fp,#0 45cc4: 2f0a movel %a2,%sp@- 45cc6: 246e 000c moveal %fp@(12),%a2 bool activated; ptimer = (POSIX_Timer_Control *)data; /* Increment the number of expirations. */ ptimer->overrun = ptimer->overrun + 1; 45cca: 52aa 0066 addql #1,%a2@(102) /* The timer must be reprogrammed */ if ( ( ptimer->timer_data.it_interval.tv_sec != 0 ) || 45cce: 4aaa 0052 tstl %a2@(82) 45cd2: 6606 bnes 45cda <_POSIX_Timer_TSR+0x1a> ( ptimer->timer_data.it_interval.tv_nsec != 0 ) ) { 45cd4: 4aaa 0056 tstl %a2@(86) 45cd8: 672a beqs 45d04 <_POSIX_Timer_TSR+0x44> <== NEVER TAKEN activated = _POSIX_Timer_Insert_helper( 45cda: 2f0a movel %a2,%sp@- 45cdc: 4879 0004 5cc0 pea 45cc0 <_POSIX_Timer_TSR> 45ce2: 2f2a 0008 movel %a2@(8),%sp@- 45ce6: 2f2a 0062 movel %a2@(98),%sp@- 45cea: 486a 0010 pea %a2@(16) 45cee: 4eb9 0004 bf48 jsr 4bf48 <_POSIX_Timer_Insert_helper> ptimer->ticks, ptimer->Object.id, _POSIX_Timer_TSR, ptimer ); if ( !activated ) 45cf4: 4fef 0014 lea %sp@(20),%sp 45cf8: 4a00 tstb %d0 45cfa: 662a bnes 45d26 <_POSIX_Timer_TSR+0x66> <== ALWAYS TAKEN /* After the signal handler returns, the count of expirations of the * timer must be set to 0. */ ptimer->overrun = 0; } 45cfc: 246e fffc moveal %fp@(-4),%a2 <== NOT EXECUTED 45d00: 4e5e unlk %fp <== NOT EXECUTED 45d02: 4e75 rts <== NOT EXECUTED /* The state really did not change but just to be safe */ ptimer->state = POSIX_TIMER_STATE_CREATE_RUN; } else { /* Indicates that the timer is stopped */ ptimer->state = POSIX_TIMER_STATE_CREATE_STOP; 45d04: 7004 moveq #4,%d0 <== NOT EXECUTED 45d06: 1540 003c moveb %d0,%a2@(60) <== NOT EXECUTED /* * The sending of the signal to the process running the handling function * specified for that signal is simulated */ if ( pthread_kill ( ptimer->thread_id, ptimer->inf.sigev_signo ) ) { 45d0a: 2f2a 0042 movel %a2@(66),%sp@- <== NOT EXECUTED 45d0e: 2f2a 0038 movel %a2@(56),%sp@- <== NOT EXECUTED 45d12: 4eb9 0004 ba5c jsr 4ba5c <== NOT EXECUTED } /* After the signal handler returns, the count of expirations of the * timer must be set to 0. */ ptimer->overrun = 0; 45d18: 508f addql #8,%sp <== NOT EXECUTED 45d1a: 42aa 0066 clrl %a2@(102) <== NOT EXECUTED } 45d1e: 246e fffc moveal %fp@(-4),%a2 45d22: 4e5e unlk %fp 45d24: 4e75 rts ); if ( !activated ) return; /* Store the time when the timer was started again */ _TOD_Get( &ptimer->time ); 45d26: 486a 006a pea %a2@(106) 45d2a: 4eb9 0004 7470 jsr 47470 <_TOD_Get> /* Increment the number of expirations. */ ptimer->overrun = ptimer->overrun + 1; /* The timer must be reprogrammed */ if ( ( ptimer->timer_data.it_interval.tv_sec != 0 ) || 45d30: 588f addql #4,%sp /* Store the time when the timer was started again */ _TOD_Get( &ptimer->time ); /* The state really did not change but just to be safe */ ptimer->state = POSIX_TIMER_STATE_CREATE_RUN; 45d32: 7003 moveq #3,%d0 45d34: 1540 003c moveb %d0,%a2@(60) /* * The sending of the signal to the process running the handling function * specified for that signal is simulated */ if ( pthread_kill ( ptimer->thread_id, ptimer->inf.sigev_signo ) ) { 45d38: 2f2a 0042 movel %a2@(66),%sp@- 45d3c: 2f2a 0038 movel %a2@(56),%sp@- 45d40: 4eb9 0004 ba5c jsr 4ba5c } /* After the signal handler returns, the count of expirations of the * timer must be set to 0. */ ptimer->overrun = 0; 45d46: 508f addql #8,%sp 45d48: 42aa 0066 clrl %a2@(102) 45d4c: 60d0 bras 45d1e <_POSIX_Timer_TSR+0x5e> ... =============================================================================== 0004d6c4 <_POSIX_signals_Check_signal>: ) { siginfo_t siginfo_struct; sigset_t saved_signals_blocked; if ( ! _POSIX_signals_Clear_signals( api, signo, &siginfo_struct, 4d6c4: 4280 clrl %d0 bool _POSIX_signals_Check_signal( POSIX_API_Control *api, int signo, bool is_global ) { 4d6c6: 4e56 ffdc linkw %fp,#-36 4d6ca: 48d7 1c1c moveml %d2-%d4/%a2-%a4,%sp@ siginfo_t siginfo_struct; sigset_t saved_signals_blocked; if ( ! _POSIX_signals_Clear_signals( api, signo, &siginfo_struct, 4d6ce: 4878 0001 pea 1 4d6d2: 102e 0013 moveb %fp@(19),%d0 4d6d6: 260e movel %fp,%d3 4d6d8: 0683 ffff fff4 addil #-12,%d3 bool _POSIX_signals_Check_signal( POSIX_API_Control *api, int signo, bool is_global ) { 4d6de: 242e 000c movel %fp@(12),%d2 siginfo_t siginfo_struct; sigset_t saved_signals_blocked; if ( ! _POSIX_signals_Clear_signals( api, signo, &siginfo_struct, 4d6e2: 2f00 movel %d0,%sp@- bool _POSIX_signals_Check_signal( POSIX_API_Control *api, int signo, bool is_global ) { 4d6e4: 246e 0008 moveal %fp@(8),%a2 siginfo_t siginfo_struct; sigset_t saved_signals_blocked; if ( ! _POSIX_signals_Clear_signals( api, signo, &siginfo_struct, 4d6e8: 2f03 movel %d3,%sp@- 4d6ea: 2f02 movel %d2,%sp@- 4d6ec: 2f0a movel %a2,%sp@- 4d6ee: 4eb9 0004 d770 jsr 4d770 <_POSIX_signals_Clear_signals> 4d6f4: 4fef 0014 lea %sp@(20),%sp 4d6f8: 4a00 tstb %d0 4d6fa: 6766 beqs 4d762 <_POSIX_signals_Check_signal+0x9e> #endif /* * Just to prevent sending a signal which is currently being ignored. */ if ( _POSIX_signals_Vectors[ signo ].sa_handler == SIG_IGN ) 4d6fc: 2202 movel %d2,%d1 4d6fe: 2002 movel %d2,%d0 4d700: 43f9 0005 f426 lea 5f426 <_POSIX_signals_Vectors>,%a1 4d706: e589 lsll #2,%d1 4d708: e988 lsll #4,%d0 4d70a: 9081 subl %d1,%d0 4d70c: 2040 moveal %d0,%a0 4d70e: d1fc 0005 f42e addal #390190,%a0 4d714: 7201 moveq #1,%d1 4d716: 2050 moveal %a0@,%a0 4d718: b288 cmpl %a0,%d1 4d71a: 6746 beqs 4d762 <_POSIX_signals_Check_signal+0x9e><== NEVER TAKEN /* * Block the signals requested in sa_mask */ saved_signals_blocked = api->signals_blocked; api->signals_blocked |= _POSIX_signals_Vectors[ signo ].sa_mask; 4d71c: 2842 moveal %d2,%a4 4d71e: 47f4 2a01 lea %a4@(00000001,%d2:l:2),%a3 return false; /* * Block the signals requested in sa_mask */ saved_signals_blocked = api->signals_blocked; 4d722: 282a 00cc movel %a2@(204),%d4 api->signals_blocked |= _POSIX_signals_Vectors[ signo ].sa_mask; 4d726: 2231 bc00 movel %a1@(00000000,%a3:l:4),%d1 4d72a: 8284 orl %d4,%d1 4d72c: 2541 00cc movel %d1,%a2@(204) /* * Here, the signal handler function executes */ switch ( _POSIX_signals_Vectors[ signo ].sa_flags ) { 4d730: 7202 moveq #2,%d1 4d732: b2b1 0800 cmpl %a1@(00000000,%d0:l),%d1 4d736: 6716 beqs 4d74e <_POSIX_signals_Check_signal+0x8a> &siginfo_struct, NULL /* context is undefined per 1003.1b-1993, p. 66 */ ); break; default: (*_POSIX_signals_Vectors[ signo ].sa_handler)( signo ); 4d738: 2f02 movel %d2,%sp@- 4d73a: 4e90 jsr %a0@ 4d73c: 588f addql #4,%sp } /* * Restore the previous set of blocked signals */ api->signals_blocked = saved_signals_blocked; 4d73e: 7001 moveq #1,%d0 4d740: 2544 00cc movel %d4,%a2@(204) return true; } 4d744: 4cee 1c1c ffdc moveml %fp@(-36),%d2-%d4/%a2-%a4 4d74a: 4e5e unlk %fp 4d74c: 4e75 rts /* * Here, the signal handler function executes */ switch ( _POSIX_signals_Vectors[ signo ].sa_flags ) { case SA_SIGINFO: (*_POSIX_signals_Vectors[ signo ].sa_sigaction)( 4d74e: 42a7 clrl %sp@- 4d750: 2f03 movel %d3,%sp@- 4d752: 2f02 movel %d2,%sp@- 4d754: 4e90 jsr %a0@ signo, &siginfo_struct, NULL /* context is undefined per 1003.1b-1993, p. 66 */ ); break; 4d756: 4fef 000c lea %sp@(12),%sp } /* * Restore the previous set of blocked signals */ api->signals_blocked = saved_signals_blocked; 4d75a: 2544 00cc movel %d4,%a2@(204) 4d75e: 7001 moveq #1,%d0 4d760: 60e2 bras 4d744 <_POSIX_signals_Check_signal+0x80> return true; } 4d762: 4cee 1c1c ffdc moveml %fp@(-36),%d2-%d4/%a2-%a4 /* * Restore the previous set of blocked signals */ api->signals_blocked = saved_signals_blocked; return true; 4d768: 4200 clrb %d0 } 4d76a: 4e5e unlk %fp ... =============================================================================== 0004e8dc <_POSIX_signals_Clear_process_signals>: clear_signal = true; mask = signo_to_mask( signo ); ISR_Level level; _ISR_Disable( level ); 4e8dc: 203c 0000 0700 movel #1792,%d0 */ void _POSIX_signals_Clear_process_signals( int signo ) { 4e8e2: 4e56 0000 linkw %fp,#0 4e8e6: 222e 0008 movel %fp@(8),%d1 4e8ea: 2f03 movel %d3,%sp@- 4e8ec: 2f02 movel %d2,%sp@- clear_signal = true; mask = signo_to_mask( signo ); ISR_Level level; _ISR_Disable( level ); 4e8ee: 40c2 movew %sr,%d2 4e8f0: 8082 orl %d2,%d0 4e8f2: 46c0 movew %d0,%sr if ( _POSIX_signals_Vectors[ signo ].sa_flags == SA_SIGINFO ) { 4e8f4: 2601 movel %d1,%d3 4e8f6: 2001 movel %d1,%d0 4e8f8: 41f9 0005 f426 lea 5f426 <_POSIX_signals_Vectors>,%a0 4e8fe: e58b lsll #2,%d3 4e900: e988 lsll #4,%d0 4e902: 9083 subl %d3,%d0 4e904: 7602 moveq #2,%d3 4e906: b6b0 0800 cmpl %a0@(00000000,%d0:l),%d3 4e90a: 6726 beqs 4e932 <_POSIX_signals_Clear_process_signals+0x56> if ( !_Chain_Is_empty( &_POSIX_signals_Siginfo[ signo ] ) ) clear_signal = false; } if ( clear_signal ) { _POSIX_signals_Pending &= ~mask; 4e90c: 5381 subql #1,%d1 4e90e: 7001 moveq #1,%d0 4e910: e3a8 lsll %d1,%d0 4e912: 4680 notl %d0 4e914: c0b9 0005 f61a andl 5f61a <_POSIX_signals_Pending>,%d0 4e91a: 23c0 0005 f61a movel %d0,5f61a <_POSIX_signals_Pending> if ( !_POSIX_signals_Pending ) 4e920: 6606 bnes 4e928 <_POSIX_signals_Clear_process_signals+0x4c><== NEVER TAKEN _Thread_Do_post_task_switch_extension--; 4e922: 53b9 0005 f01a subql #1,5f01a <_Thread_Do_post_task_switch_extension> } _ISR_Enable( level ); 4e928: 46c2 movew %d2,%sr } 4e92a: 241f movel %sp@+,%d2 4e92c: 261f movel %sp@+,%d3 4e92e: 4e5e unlk %fp 4e930: 4e75 rts ISR_Level level; _ISR_Disable( level ); if ( _POSIX_signals_Vectors[ signo ].sa_flags == SA_SIGINFO ) { if ( !_Chain_Is_empty( &_POSIX_signals_Siginfo[ signo ] ) ) 4e932: 0680 0005 f61e addil #390686,%d0 */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 4e938: 2040 moveal %d0,%a0 4e93a: 5888 addql #4,%a0 4e93c: 2240 moveal %d0,%a1 4e93e: b1d1 cmpal %a1@,%a0 4e940: 67ca beqs 4e90c <_POSIX_signals_Clear_process_signals+0x30><== ALWAYS TAKEN if ( clear_signal ) { _POSIX_signals_Pending &= ~mask; if ( !_POSIX_signals_Pending ) _Thread_Do_post_task_switch_extension--; } _ISR_Enable( level ); 4e942: 46c2 movew %d2,%sr <== NOT EXECUTED } 4e944: 241f movel %sp@+,%d2 <== NOT EXECUTED 4e946: 261f movel %sp@+,%d3 <== NOT EXECUTED 4e948: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004d770 <_POSIX_signals_Clear_signals>: static inline sigset_t signo_to_mask( uint32_t sig ) { return 1u << (sig - 1); 4d770: 7001 moveq #1,%d0 int signo, siginfo_t *info, bool is_global, bool check_blocked ) { 4d772: 4e56 ffe8 linkw %fp,#-24 4d776: 206e 0008 moveal %fp@(8),%a0 4d77a: 48d7 0c3c moveml %d2-%d5/%a2-%a3,%sp@ 4d77e: 242e 000c movel %fp@(12),%d2 4d782: 2202 movel %d2,%d1 4d784: 5381 subql #1,%d1 4d786: 1a2e 0017 moveb %fp@(23),%d5 4d78a: e3a8 lsll %d1,%d0 /* set blocked signals based on if checking for them, SIGNAL_ALL_MASK * insures that no signals are blocked and all are checked. */ if ( check_blocked ) 4d78c: 4a2e 001b tstb %fp@(27) 4d790: 664e bnes 4d7e0 <_POSIX_signals_Clear_signals+0x70> 4d792: 78ff moveq #-1,%d4 signals_blocked = SIGNAL_ALL_MASK; /* XXX is this right for siginfo type signals? */ /* XXX are we sure they can be cleared the same way? */ _ISR_Disable( level ); 4d794: 223c 0000 0700 movel #1792,%d1 4d79a: 40c3 movew %sr,%d3 4d79c: 8283 orl %d3,%d1 4d79e: 46c1 movew %d1,%sr if ( is_global ) { 4d7a0: 4a05 tstb %d5 4d7a2: 6752 beqs 4d7f6 <_POSIX_signals_Clear_signals+0x86> if ( mask & (_POSIX_signals_Pending & signals_blocked) ) { 4d7a4: c0b9 0005 f61a andl 5f61a <_POSIX_signals_Pending>,%d0 4d7aa: c084 andl %d4,%d0 4d7ac: 676a beqs 4d818 <_POSIX_signals_Clear_signals+0xa8> if ( _POSIX_signals_Vectors[ signo ].sa_flags == SA_SIGINFO ) { 4d7ae: 2202 movel %d2,%d1 4d7b0: 2002 movel %d2,%d0 4d7b2: 47f9 0004 e8dc lea 4e8dc <_POSIX_signals_Clear_process_signals>,%a3 4d7b8: 41f9 0005 f426 lea 5f426 <_POSIX_signals_Vectors>,%a0 4d7be: e589 lsll #2,%d1 4d7c0: e988 lsll #4,%d0 4d7c2: 9081 subl %d1,%d0 4d7c4: 7202 moveq #2,%d1 4d7c6: b2b0 0800 cmpl %a0@(00000000,%d0:l),%d1 4d7ca: 675a beqs 4d826 <_POSIX_signals_Clear_signals+0xb6> &psiginfo->Node ); } else do_callout = false; } _POSIX_signals_Clear_process_signals( signo ); 4d7cc: 2f02 movel %d2,%sp@- 4d7ce: 4e93 jsr %a3@ 4d7d0: 588f addql #4,%sp 4d7d2: 7001 moveq #1,%d0 if ( mask & (api->signals_pending & signals_blocked) ) { api->signals_pending &= ~mask; do_callout = true; } } _ISR_Enable( level ); 4d7d4: 46c3 movew %d3,%sr return do_callout; } 4d7d6: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 4d7dc: 4e5e unlk %fp 4d7de: 4e75 rts /* set blocked signals based on if checking for them, SIGNAL_ALL_MASK * insures that no signals are blocked and all are checked. */ if ( check_blocked ) signals_blocked = ~api->signals_blocked; 4d7e0: 2828 00cc movel %a0@(204),%d4 signals_blocked = SIGNAL_ALL_MASK; /* XXX is this right for siginfo type signals? */ /* XXX are we sure they can be cleared the same way? */ _ISR_Disable( level ); 4d7e4: 223c 0000 0700 movel #1792,%d1 /* set blocked signals based on if checking for them, SIGNAL_ALL_MASK * insures that no signals are blocked and all are checked. */ if ( check_blocked ) signals_blocked = ~api->signals_blocked; 4d7ea: 4684 notl %d4 signals_blocked = SIGNAL_ALL_MASK; /* XXX is this right for siginfo type signals? */ /* XXX are we sure they can be cleared the same way? */ _ISR_Disable( level ); 4d7ec: 40c3 movew %sr,%d3 4d7ee: 8283 orl %d3,%d1 4d7f0: 46c1 movew %d1,%sr if ( is_global ) { 4d7f2: 4a05 tstb %d5 4d7f4: 66ae bnes 4d7a4 <_POSIX_signals_Clear_signals+0x34> } _POSIX_signals_Clear_process_signals( signo ); do_callout = true; } } else { if ( mask & (api->signals_pending & signals_blocked) ) { 4d7f6: 2428 00d0 movel %a0@(208),%d2 4d7fa: 2200 movel %d0,%d1 4d7fc: c282 andl %d2,%d1 4d7fe: c284 andl %d4,%d1 4d800: 6716 beqs 4d818 <_POSIX_signals_Clear_signals+0xa8> api->signals_pending &= ~mask; 4d802: 4680 notl %d0 4d804: c082 andl %d2,%d0 4d806: 2140 00d0 movel %d0,%a0@(208) 4d80a: 7001 moveq #1,%d0 do_callout = true; } } _ISR_Enable( level ); 4d80c: 46c3 movew %d3,%sr return do_callout; } 4d80e: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 4d814: 4e5e unlk %fp 4d816: 4e75 rts _POSIX_signals_Clear_process_signals( signo ); do_callout = true; } } else { if ( mask & (api->signals_pending & signals_blocked) ) { api->signals_pending &= ~mask; 4d818: 4200 clrb %d0 do_callout = true; } } _ISR_Enable( level ); 4d81a: 46c3 movew %d3,%sr return do_callout; } 4d81c: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 4d822: 4e5e unlk %fp 4d824: 4e75 rts _ISR_Disable( level ); if ( is_global ) { if ( mask & (_POSIX_signals_Pending & signals_blocked) ) { if ( _POSIX_signals_Vectors[ signo ].sa_flags == SA_SIGINFO ) { psiginfo = (POSIX_signals_Siginfo_node *) 4d826: 0680 0005 f61e addil #390686,%d0 */ RTEMS_INLINE_ROUTINE bool _Chain_Is_empty( Chain_Control *the_chain ) { return (the_chain->first == _Chain_Tail(the_chain)); 4d82c: 2040 moveal %d0,%a0 4d82e: 2458 moveal %a0@+,%a2 */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 4d830: b1ca cmpal %a2,%a0 4d832: 6744 beqs 4d878 <_POSIX_signals_Clear_signals+0x108> { Chain_Node *return_node; Chain_Node *new_first; return_node = the_chain->first; new_first = return_node->next; 4d834: 2052 moveal %a2@,%a0 the_chain->first = new_first; 4d836: 2240 moveal %d0,%a1 4d838: 2288 movel %a0,%a1@ new_first->previous = _Chain_Head(the_chain); 4d83a: 2140 0004 movel %d0,%a0@(4) _Chain_Get_unprotected( &_POSIX_signals_Siginfo[ signo ] ); _POSIX_signals_Clear_process_signals( signo ); 4d83e: 2f02 movel %d2,%sp@- 4d840: 4e93 jsr %a3@ * It may be impossible to get here with an empty chain * BUT until that is proven we need to be defensive and * protect against it. */ if ( psiginfo ) { *info = psiginfo->Info; 4d842: 206e 0010 moveal %fp@(16),%a0 the_node->next = _Chain_Tail(the_chain); old_last_node = the_chain->last; the_chain->last = the_node; old_last_node->next = the_node; the_node->previous = old_last_node; 4d846: 588f addql #4,%sp 4d848: 20ea 0008 movel %a2@(8),%a0@+ 4d84c: 20ea 000c movel %a2@(12),%a0@+ 4d850: 20aa 0010 movel %a2@(16),%a0@ Chain_Node *the_node ) { Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); 4d854: 24bc 0005 f5aa movel #390570,%a2@ old_last_node = the_chain->last; 4d85a: 2279 0005 f5ae moveal 5f5ae <_POSIX_signals_Inactive_siginfo+0x8>,%a1 the_chain->last = the_node; 4d860: 23ca 0005 f5ae movel %a2,5f5ae <_POSIX_signals_Inactive_siginfo+0x8> old_last_node->next = the_node; the_node->previous = old_last_node; 4d866: 2549 0004 movel %a1,%a2@(4) Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); old_last_node = the_chain->last; the_chain->last = the_node; old_last_node->next = the_node; 4d86a: 228a movel %a2,%a1@ &psiginfo->Node ); } else do_callout = false; } _POSIX_signals_Clear_process_signals( signo ); 4d86c: 2f02 movel %d2,%sp@- 4d86e: 4e93 jsr %a3@ 4d870: 588f addql #4,%sp 4d872: 7001 moveq #1,%d0 4d874: 6000 ff5e braw 4d7d4 <_POSIX_signals_Clear_signals+0x64> if ( is_global ) { if ( mask & (_POSIX_signals_Pending & signals_blocked) ) { if ( _POSIX_signals_Vectors[ signo ].sa_flags == SA_SIGINFO ) { psiginfo = (POSIX_signals_Siginfo_node *) _Chain_Get_unprotected( &_POSIX_signals_Siginfo[ signo ] ); _POSIX_signals_Clear_process_signals( signo ); 4d878: 2f02 movel %d2,%sp@- 4d87a: 4e93 jsr %a3@ 4d87c: 588f addql #4,%sp &psiginfo->Node ); } else do_callout = false; } _POSIX_signals_Clear_process_signals( signo ); 4d87e: 2f02 movel %d2,%sp@- 4d880: 4e93 jsr %a3@ 4d882: 588f addql #4,%sp 4d884: 7001 moveq #1,%d0 4d886: 6000 ff4c braw 4d7d4 <_POSIX_signals_Clear_signals+0x64> ... =============================================================================== 00046a94 <_POSIX_signals_Get_highest>: #include int _POSIX_signals_Get_highest( sigset_t set ) { 46a94: 701b moveq #27,%d0 46a96: 4e56 fff4 linkw %fp,#-12 46a9a: 48d7 001c moveml %d2-%d4,%sp@ 46a9e: 242e 0008 movel %fp@(8),%d2 int signo; for ( signo = SIGRTMIN ; signo <= SIGRTMAX ; signo++ ) { if ( set & signo_to_mask( signo ) ) { 46aa2: 7601 moveq #1,%d3 46aa4: 2200 movel %d0,%d1 46aa6: 5381 subql #1,%d1 46aa8: 2803 movel %d3,%d4 46aaa: e3ac lsll %d1,%d4 46aac: 2204 movel %d4,%d1 46aae: c282 andl %d2,%d1 46ab0: 6626 bnes 46ad8 <_POSIX_signals_Get_highest+0x44><== NEVER TAKEN sigset_t set ) { int signo; for ( signo = SIGRTMIN ; signo <= SIGRTMAX ; signo++ ) { 46ab2: 5280 addql #1,%d0 46ab4: 123c 0020 moveb #32,%d1 46ab8: b280 cmpl %d0,%d1 46aba: 66e8 bnes 46aa4 <_POSIX_signals_Get_highest+0x10> 46abc: 7001 moveq #1,%d0 #if (SIGHUP != 1) #error "Assumption that SIGHUP==1 violated!!" #endif for ( signo = SIGHUP ; signo <= __SIGLASTNOTRT ; signo++ ) { if ( set & signo_to_mask( signo ) ) { 46abe: 7601 moveq #1,%d3 46ac0: 2200 movel %d0,%d1 46ac2: 5381 subql #1,%d1 46ac4: 2803 movel %d3,%d4 46ac6: e3ac lsll %d1,%d4 46ac8: 2204 movel %d4,%d1 46aca: c282 andl %d2,%d1 46acc: 660a bnes 46ad8 <_POSIX_signals_Get_highest+0x44> */ #if (SIGHUP != 1) #error "Assumption that SIGHUP==1 violated!!" #endif for ( signo = SIGHUP ; signo <= __SIGLASTNOTRT ; signo++ ) { 46ace: 5280 addql #1,%d0 46ad0: 123c 001b moveb #27,%d1 46ad4: b280 cmpl %d0,%d1 46ad6: 66e8 bnes 46ac0 <_POSIX_signals_Get_highest+0x2c><== ALWAYS TAKEN * a return 0. This routine will NOT be called unless a signal * is pending in the set passed in. */ found_it: return signo; } 46ad8: 4cd7 001c moveml %sp@,%d2-%d4 46adc: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004b010 <_POSIX_signals_Post_switch_extension>: */ void _POSIX_signals_Post_switch_extension( Thread_Control *the_thread ) { 4b010: 4e56 fff0 linkw %fp,#-16 POSIX_API_Control *api; int signo; ISR_Level level; api = the_thread->API_Extensions[ THREAD_API_POSIX ]; 4b014: 206e 0008 moveal %fp@(8),%a0 */ void _POSIX_signals_Post_switch_extension( Thread_Control *the_thread ) { 4b018: 48d7 0c0c moveml %d2-%d3/%a2-%a3,%sp@ POSIX_API_Control *api; int signo; ISR_Level level; api = the_thread->API_Extensions[ THREAD_API_POSIX ]; 4b01c: 2468 010e moveal %a0@(270),%a2 * * The first thing done is to check there are any signals to be * processed at all. No point in doing this loop otherwise. */ while (1) { _ISR_Disable( level ); 4b020: 263c 0000 0700 movel #1792,%d3 4b026: 47f9 0004 d6c4 lea 4d6c4 <_POSIX_signals_Check_signal>,%a3 4b02c: 2003 movel %d3,%d0 4b02e: 40c1 movew %sr,%d1 4b030: 8081 orl %d1,%d0 4b032: 46c0 movew %d0,%sr if ( !(~api->signals_blocked & (api->signals_pending | _POSIX_signals_Pending)) ) { 4b034: 2039 0005 f61a movel 5f61a <_POSIX_signals_Pending>,%d0 * The first thing done is to check there are any signals to be * processed at all. No point in doing this loop otherwise. */ while (1) { _ISR_Disable( level ); if ( !(~api->signals_blocked & 4b03a: 242a 00cc movel %a2@(204),%d2 4b03e: 4682 notl %d2 (api->signals_pending | _POSIX_signals_Pending)) ) { 4b040: 80aa 00d0 orl %a2@(208),%d0 * The first thing done is to check there are any signals to be * processed at all. No point in doing this loop otherwise. */ while (1) { _ISR_Disable( level ); if ( !(~api->signals_blocked & 4b044: c082 andl %d2,%d0 4b046: 6762 beqs 4b0aa <_POSIX_signals_Post_switch_extension+0x9a> (api->signals_pending | _POSIX_signals_Pending)) ) { _ISR_Enable( level ); break; } _ISR_Enable( level ); 4b048: 46c1 movew %d1,%sr 4b04a: 741b moveq #27,%d2 for ( signo = SIGRTMIN ; signo <= SIGRTMAX ; signo++ ) { _POSIX_signals_Check_signal( api, signo, false ); 4b04c: 42a7 clrl %sp@- 4b04e: 2f02 movel %d2,%sp@- 4b050: 2f0a movel %a2,%sp@- 4b052: 4e93 jsr %a3@ _POSIX_signals_Check_signal( api, signo, true ); 4b054: 4878 0001 pea 1 4b058: 2f02 movel %d2,%sp@- _ISR_Enable( level ); break; } _ISR_Enable( level ); for ( signo = SIGRTMIN ; signo <= SIGRTMAX ; signo++ ) { 4b05a: 5282 addql #1,%d2 _POSIX_signals_Check_signal( api, signo, false ); _POSIX_signals_Check_signal( api, signo, true ); 4b05c: 2f0a movel %a2,%sp@- 4b05e: 4e93 jsr %a3@ _ISR_Enable( level ); break; } _ISR_Enable( level ); for ( signo = SIGRTMIN ; signo <= SIGRTMAX ; signo++ ) { 4b060: 4fef 0018 lea %sp@(24),%sp 4b064: 7020 moveq #32,%d0 4b066: b082 cmpl %d2,%d0 4b068: 66e2 bnes 4b04c <_POSIX_signals_Post_switch_extension+0x3c> 4b06a: 7401 moveq #1,%d2 _POSIX_signals_Check_signal( api, signo, true ); } /* Unfortunately - nothing like __SIGFIRSTNOTRT in newlib signal .h */ for ( signo = SIGHUP ; signo <= __SIGLASTNOTRT ; signo++ ) { _POSIX_signals_Check_signal( api, signo, false ); 4b06c: 42a7 clrl %sp@- 4b06e: 2f02 movel %d2,%sp@- 4b070: 2f0a movel %a2,%sp@- 4b072: 4e93 jsr %a3@ _POSIX_signals_Check_signal( api, signo, true ); 4b074: 4878 0001 pea 1 4b078: 2f02 movel %d2,%sp@- _POSIX_signals_Check_signal( api, signo, false ); _POSIX_signals_Check_signal( api, signo, true ); } /* Unfortunately - nothing like __SIGFIRSTNOTRT in newlib signal .h */ for ( signo = SIGHUP ; signo <= __SIGLASTNOTRT ; signo++ ) { 4b07a: 5282 addql #1,%d2 _POSIX_signals_Check_signal( api, signo, false ); _POSIX_signals_Check_signal( api, signo, true ); 4b07c: 2f0a movel %a2,%sp@- 4b07e: 4e93 jsr %a3@ _POSIX_signals_Check_signal( api, signo, false ); _POSIX_signals_Check_signal( api, signo, true ); } /* Unfortunately - nothing like __SIGFIRSTNOTRT in newlib signal .h */ for ( signo = SIGHUP ; signo <= __SIGLASTNOTRT ; signo++ ) { 4b080: 4fef 0018 lea %sp@(24),%sp 4b084: 701b moveq #27,%d0 4b086: b082 cmpl %d2,%d0 4b088: 67a2 beqs 4b02c <_POSIX_signals_Post_switch_extension+0x1c><== NEVER TAKEN _POSIX_signals_Check_signal( api, signo, false ); 4b08a: 42a7 clrl %sp@- 4b08c: 2f02 movel %d2,%sp@- 4b08e: 2f0a movel %a2,%sp@- 4b090: 4e93 jsr %a3@ _POSIX_signals_Check_signal( api, signo, true ); 4b092: 4878 0001 pea 1 4b096: 2f02 movel %d2,%sp@- _POSIX_signals_Check_signal( api, signo, false ); _POSIX_signals_Check_signal( api, signo, true ); } /* Unfortunately - nothing like __SIGFIRSTNOTRT in newlib signal .h */ for ( signo = SIGHUP ; signo <= __SIGLASTNOTRT ; signo++ ) { 4b098: 5282 addql #1,%d2 _POSIX_signals_Check_signal( api, signo, false ); _POSIX_signals_Check_signal( api, signo, true ); 4b09a: 2f0a movel %a2,%sp@- 4b09c: 4e93 jsr %a3@ _POSIX_signals_Check_signal( api, signo, false ); _POSIX_signals_Check_signal( api, signo, true ); } /* Unfortunately - nothing like __SIGFIRSTNOTRT in newlib signal .h */ for ( signo = SIGHUP ; signo <= __SIGLASTNOTRT ; signo++ ) { 4b09e: 4fef 0018 lea %sp@(24),%sp 4b0a2: 701b moveq #27,%d0 4b0a4: b082 cmpl %d2,%d0 4b0a6: 66c4 bnes 4b06c <_POSIX_signals_Post_switch_extension+0x5c> 4b0a8: 6082 bras 4b02c <_POSIX_signals_Post_switch_extension+0x1c> */ while (1) { _ISR_Disable( level ); if ( !(~api->signals_blocked & (api->signals_pending | _POSIX_signals_Pending)) ) { _ISR_Enable( level ); 4b0aa: 46c1 movew %d1,%sr for ( signo = SIGHUP ; signo <= __SIGLASTNOTRT ; signo++ ) { _POSIX_signals_Check_signal( api, signo, false ); _POSIX_signals_Check_signal( api, signo, true ); } } } 4b0ac: 4cee 0c0c fff0 moveml %fp@(-16),%d2-%d3/%a2-%a3 4b0b2: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00045b88 <_POSIX_signals_Ualarm_TSR>: void _POSIX_signals_Ualarm_TSR( Objects_Id id __attribute__((unused)), void *argument __attribute__((unused)) ) { 45b88: 4e56 0000 linkw %fp,#0 /* * Send a SIGALRM but if there is a problem, ignore it. * It's OK, there isn't a way this should fail. */ (void) kill( getpid(), SIGALRM ); 45b8c: 4eb9 0004 2a2c jsr 42a2c 45b92: 4878 000e pea e 45b96: 2f00 movel %d0,%sp@- 45b98: 4eb9 0004 5884 jsr 45884 RTEMS_INLINE_ROUTINE void _Watchdog_Reset( Watchdog_Control *the_watchdog ) { (void) _Watchdog_Remove( the_watchdog ); 45b9e: 4879 0006 114e pea 6114e <_POSIX_signals_Ualarm_timer> 45ba4: 4eb9 0004 96fc jsr 496fc <_Watchdog_Remove> _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 45baa: 4fef 000c lea %sp@(12),%sp 45bae: 203c 0006 114e movel #397646,%d0 45bb4: 2d40 000c movel %d0,%fp@(12) 45bb8: 203c 0006 0a00 movel #395776,%d0 45bbe: 2d40 0008 movel %d0,%fp@(8) /* * If the reset interval is non-zero, reschedule ourselves. */ _Watchdog_Reset( &_POSIX_signals_Ualarm_timer ); } 45bc2: 4e5e unlk %fp 45bc4: 4ef9 0004 95b4 jmp 495b4 <_Watchdog_Insert> ... =============================================================================== 0004e97c <_POSIX_signals_Unblock_thread>: 4e97c: 7001 moveq #1,%d0 bool _POSIX_signals_Unblock_thread( Thread_Control *the_thread, int signo, siginfo_t *info ) { 4e97e: 4e56 fff4 linkw %fp,#-12 4e982: 222e 000c movel %fp@(12),%d1 4e986: 48d7 040c moveml %d2-%d3/%a2,%sp@ 4e98a: 246e 0008 moveal %fp@(8),%a2 4e98e: 2601 movel %d1,%d3 4e990: 5383 subql #1,%d3 /* * Is the thread is specifically waiting for a signal? */ if ( _States_Is_interruptible_signal( the_thread->current_state ) ) { 4e992: 242a 0010 movel %a2@(16),%d2 4e996: 0282 1000 8000 andil #268468224,%d2 bool _POSIX_signals_Unblock_thread( Thread_Control *the_thread, int signo, siginfo_t *info ) { 4e99c: 226e 0010 moveal %fp@(16),%a1 POSIX_API_Control *api; sigset_t mask; siginfo_t *the_info = NULL; api = the_thread->API_Extensions[ THREAD_API_POSIX ]; 4e9a0: 206a 010e moveal %a2@(270),%a0 4e9a4: e7a8 lsll %d3,%d0 /* * Is the thread is specifically waiting for a signal? */ if ( _States_Is_interruptible_signal( the_thread->current_state ) ) { 4e9a6: 0c82 1000 8000 cmpil #268468224,%d2 4e9ac: 6772 beqs 4ea20 <_POSIX_signals_Unblock_thread+0xa4> } /* * Thread is not waiting due to a sigwait. */ if ( ~api->signals_blocked & mask ) { 4e9ae: 2228 00cc movel %a0@(204),%d1 4e9b2: 4681 notl %d1 4e9b4: c081 andl %d1,%d0 4e9b6: 675c beqs 4ea14 <_POSIX_signals_Unblock_thread+0x98> * + Any other combination, do nothing. */ the_thread->do_post_task_switch_extension = true; if ( the_thread->current_state & STATES_INTERRUPTIBLE_BY_SIGNAL ) { 4e9b8: 202a 0010 movel %a2@(16),%d0 * it is not blocked, THEN * we need to dispatch at the end of this ISR. * + Any other combination, do nothing. */ the_thread->do_post_task_switch_extension = true; 4e9bc: 7201 moveq #1,%d1 4e9be: 1541 0074 moveb %d1,%a2@(116) if ( the_thread->current_state & STATES_INTERRUPTIBLE_BY_SIGNAL ) { 4e9c2: 0800 001c btst #28,%d0 4e9c6: 6736 beqs 4e9fe <_POSIX_signals_Unblock_thread+0x82> the_thread->Wait.return_code = EINTR; 4e9c8: 7004 moveq #4,%d0 4e9ca: 2540 0034 movel %d0,%a2@(52) #if 0 if ( _States_Is_waiting_on_thread_queue(the_thread->current_state) ) _Thread_queue_Extract_with_proxy( the_thread ); else #endif if ( _States_Is_delaying(the_thread->current_state) ){ 4e9ce: 103c 0008 moveb #8,%d0 4e9d2: c0aa 0010 andl %a2@(16),%d0 4e9d6: 673c beqs 4ea14 <_POSIX_signals_Unblock_thread+0x98><== NEVER TAKEN if ( _Watchdog_Is_active( &the_thread->Timer ) ) 4e9d8: 7202 moveq #2,%d1 4e9da: b2aa 0050 cmpl %a2@(80),%d1 4e9de: 6700 00a4 beqw 4ea84 <_POSIX_signals_Unblock_thread+0x108> RTEMS_INLINE_ROUTINE void _Thread_Unblock ( Thread_Control *the_thread ) { _Thread_Clear_state( the_thread, STATES_BLOCKED ); 4e9e2: 2f3c 1003 fff8 movel #268697592,%sp@- <== NOT EXECUTED 4e9e8: 2f0a movel %a2,%sp@- <== NOT EXECUTED 4e9ea: 4eb9 0004 79e8 jsr 479e8 <_Thread_Clear_state> <== NOT EXECUTED 4e9f0: 508f addql #8,%sp <== NOT EXECUTED 4e9f2: 4200 clrb %d0 <== NOT EXECUTED if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) ) _ISR_Signals_to_thread_executing = true; } } return false; } 4e9f4: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 4e9fa: 4e5e unlk %fp 4e9fc: 4e75 rts if ( _States_Is_delaying(the_thread->current_state) ){ if ( _Watchdog_Is_active( &the_thread->Timer ) ) (void) _Watchdog_Remove( &the_thread->Timer ); _Thread_Unblock( the_thread ); } } else if ( the_thread->current_state == STATES_READY ) { 4e9fe: 4a80 tstl %d0 4ea00: 6612 bnes 4ea14 <_POSIX_signals_Unblock_thread+0x98><== NEVER TAKEN if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) ) 4ea02: 2039 0005 f012 movel 5f012 <_ISR_Nest_level>,%d0 4ea08: 670a beqs 4ea14 <_POSIX_signals_Unblock_thread+0x98> 4ea0a: b5f9 0005 f032 cmpal 5f032 <_Thread_Executing>,%a2 4ea10: 6700 0094 beqw 4eaa6 <_POSIX_signals_Unblock_thread+0x12a> _ISR_Signals_to_thread_executing = true; } } return false; } 4ea14: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 (void) _Watchdog_Remove( &the_thread->Timer ); _Thread_Unblock( the_thread ); } } else if ( the_thread->current_state == STATES_READY ) { if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) ) _ISR_Signals_to_thread_executing = true; 4ea1a: 4200 clrb %d0 } } return false; } 4ea1c: 4e5e unlk %fp 4ea1e: 4e75 rts * Is the thread is specifically waiting for a signal? */ if ( _States_Is_interruptible_signal( the_thread->current_state ) ) { if ( (the_thread->Wait.option & mask) || (~api->signals_blocked & mask) ) { 4ea20: 2400 movel %d0,%d2 4ea22: c4aa 0030 andl %a2@(48),%d2 4ea26: 672a beqs 4ea52 <_POSIX_signals_Unblock_thread+0xd6> the_thread->Wait.return_code = EINTR; 4ea28: 7004 moveq #4,%d0 the_info = (siginfo_t *) the_thread->Wait.return_argument; 4ea2a: 206a 0028 moveal %a2@(40),%a0 */ if ( _States_Is_interruptible_signal( the_thread->current_state ) ) { if ( (the_thread->Wait.option & mask) || (~api->signals_blocked & mask) ) { the_thread->Wait.return_code = EINTR; 4ea2e: 2540 0034 movel %d0,%a2@(52) the_info = (siginfo_t *) the_thread->Wait.return_argument; if ( !info ) { 4ea32: 4a89 tstl %a1 4ea34: 6734 beqs 4ea6a <_POSIX_signals_Unblock_thread+0xee> the_info->si_signo = signo; the_info->si_code = SI_USER; the_info->si_value.sival_int = 0; } else { *the_info = *info; 4ea36: 20d9 movel %a1@+,%a0@+ 4ea38: 20d9 movel %a1@+,%a0@+ 4ea3a: 2091 movel %a1@,%a0@ } _Thread_queue_Extract_with_proxy( the_thread ); 4ea3c: 2f0a movel %a2,%sp@- 4ea3e: 4eb9 0004 852c jsr 4852c <_Thread_queue_Extract_with_proxy> return true; 4ea44: 588f addql #4,%sp the_info->si_value.sival_int = 0; } else { *the_info = *info; } _Thread_queue_Extract_with_proxy( the_thread ); 4ea46: 7001 moveq #1,%d0 if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) ) _ISR_Signals_to_thread_executing = true; } } return false; } 4ea48: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 4ea4e: 4e5e unlk %fp 4ea50: 4e75 rts * Is the thread is specifically waiting for a signal? */ if ( _States_Is_interruptible_signal( the_thread->current_state ) ) { if ( (the_thread->Wait.option & mask) || (~api->signals_blocked & mask) ) { 4ea52: 2428 00cc movel %a0@(204),%d2 4ea56: 4682 notl %d2 4ea58: c082 andl %d2,%d0 4ea5a: 67b8 beqs 4ea14 <_POSIX_signals_Unblock_thread+0x98> the_thread->Wait.return_code = EINTR; 4ea5c: 7004 moveq #4,%d0 the_info = (siginfo_t *) the_thread->Wait.return_argument; 4ea5e: 206a 0028 moveal %a2@(40),%a0 */ if ( _States_Is_interruptible_signal( the_thread->current_state ) ) { if ( (the_thread->Wait.option & mask) || (~api->signals_blocked & mask) ) { the_thread->Wait.return_code = EINTR; 4ea62: 2540 0034 movel %d0,%a2@(52) the_info = (siginfo_t *) the_thread->Wait.return_argument; if ( !info ) { 4ea66: 4a89 tstl %a1 4ea68: 66cc bnes 4ea36 <_POSIX_signals_Unblock_thread+0xba><== ALWAYS TAKEN the_info->si_signo = signo; 4ea6a: 2081 movel %d1,%a0@ the_info->si_code = SI_USER; 4ea6c: 7201 moveq #1,%d1 the_info->si_value.sival_int = 0; 4ea6e: 42a8 0008 clrl %a0@(8) the_info = (siginfo_t *) the_thread->Wait.return_argument; if ( !info ) { the_info->si_signo = signo; the_info->si_code = SI_USER; 4ea72: 2141 0004 movel %d1,%a0@(4) the_info->si_value.sival_int = 0; } else { *the_info = *info; } _Thread_queue_Extract_with_proxy( the_thread ); 4ea76: 2f0a movel %a2,%sp@- 4ea78: 4eb9 0004 852c jsr 4852c <_Thread_queue_Extract_with_proxy> return true; 4ea7e: 588f addql #4,%sp the_info->si_value.sival_int = 0; } else { *the_info = *info; } _Thread_queue_Extract_with_proxy( the_thread ); 4ea80: 7001 moveq #1,%d0 4ea82: 60c4 bras 4ea48 <_POSIX_signals_Unblock_thread+0xcc> _Thread_queue_Extract_with_proxy( the_thread ); else #endif if ( _States_Is_delaying(the_thread->current_state) ){ if ( _Watchdog_Is_active( &the_thread->Timer ) ) (void) _Watchdog_Remove( &the_thread->Timer ); 4ea84: 486a 0048 pea %a2@(72) 4ea88: 4eb9 0004 90a4 jsr 490a4 <_Watchdog_Remove> 4ea8e: 588f addql #4,%sp 4ea90: 2f3c 1003 fff8 movel #268697592,%sp@- 4ea96: 2f0a movel %a2,%sp@- 4ea98: 4eb9 0004 79e8 jsr 479e8 <_Thread_Clear_state> 4ea9e: 508f addql #8,%sp 4eaa0: 4200 clrb %d0 4eaa2: 6000 ff50 braw 4e9f4 <_POSIX_signals_Unblock_thread+0x78> _Thread_Unblock( the_thread ); } } else if ( the_thread->current_state == STATES_READY ) { if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) ) _ISR_Signals_to_thread_executing = true; 4eaa6: 7001 moveq #1,%d0 } } return false; } 4eaa8: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 4eaae: 4e5e unlk %fp (void) _Watchdog_Remove( &the_thread->Timer ); _Thread_Unblock( the_thread ); } } else if ( the_thread->current_state == STATES_READY ) { if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) ) _ISR_Signals_to_thread_executing = true; 4eab0: 13c0 0005 f0c0 moveb %d0,5f0c0 <_ISR_Signals_to_thread_executing> 4eab6: 4200 clrb %d0 } } return false; } ... =============================================================================== 0004b822 <_RTEMS_tasks_Create_extension>: bool _RTEMS_tasks_Create_extension( Thread_Control *executing, Thread_Control *created ) { 4b822: 4e56 0000 linkw %fp,#0 4b826: 2f0a movel %a2,%sp@- 4b828: 246e 000c moveal %fp@(12),%a2 /* * Notepads must be the last entry in the structure and they * can be left off if disabled in the configuration. */ to_allocate = sizeof( RTEMS_API_Control ); if ( !rtems_configuration_get_notepads_enabled() ) 4b82c: 4a39 0005 d794 tstb 5d794 4b832: 665c bnes 4b890 <_RTEMS_tasks_Create_extension+0x6e> 4b834: 701e moveq #30,%d0 to_allocate -= (RTEMS_NUMBER_NOTEPADS * sizeof(uint32_t)); api = _Workspace_Allocate( to_allocate ); 4b836: 2f00 movel %d0,%sp@- 4b838: 4eb9 0004 91f4 jsr 491f4 <_Workspace_Allocate> if ( !api ) 4b83e: 588f addql #4,%sp */ to_allocate = sizeof( RTEMS_API_Control ); if ( !rtems_configuration_get_notepads_enabled() ) to_allocate -= (RTEMS_NUMBER_NOTEPADS * sizeof(uint32_t)); api = _Workspace_Allocate( to_allocate ); 4b840: 2040 moveal %d0,%a0 if ( !api ) 4b842: 4a80 tstl %d0 4b844: 675c beqs 4b8a2 <_RTEMS_tasks_Create_extension+0x80><== NEVER TAKEN created->API_Extensions[ THREAD_API_RTEMS ] = api; api->pending_events = EVENT_SETS_NONE_PENDING; api->event_condition = 0; _ASR_Initialize( &api->Signal ); created->task_variables = NULL; 4b846: 42aa 011a clrl %a2@(282) */ RTEMS_INLINE_ROUTINE void _ASR_Initialize ( ASR_Information *information ) { information->is_enabled = false; 4b84a: 4200 clrb %d0 api = _Workspace_Allocate( to_allocate ); if ( !api ) return false; created->API_Extensions[ THREAD_API_RTEMS ] = api; 4b84c: 2548 010a movel %a0,%a2@(266) 4b850: 1140 0008 moveb %d0,%a0@(8) api->pending_events = EVENT_SETS_NONE_PENDING; 4b854: 4290 clrl %a0@ api->event_condition = 0; 4b856: 42a8 0004 clrl %a0@(4) information->handler = NULL; 4b85a: 42a8 000a clrl %a0@(10) information->mode_set = RTEMS_DEFAULT_MODES; 4b85e: 42a8 000e clrl %a0@(14) information->signals_posted = 0; 4b862: 42a8 0012 clrl %a0@(18) information->signals_pending = 0; 4b866: 42a8 0016 clrl %a0@(22) information->nest_level = 0; 4b86a: 42a8 001a clrl %a0@(26) _ASR_Initialize( &api->Signal ); created->task_variables = NULL; if ( rtems_configuration_get_notepads_enabled() ) { 4b86e: 4a39 0005 d794 tstb 5d794 4b874: 6710 beqs 4b886 <_RTEMS_tasks_Create_extension+0x64> 4b876: 41e8 001e lea %a0@(30),%a0 4b87a: 4280 clrl %d0 for (i=0; i < RTEMS_NUMBER_NOTEPADS; i++) api->Notepads[i] = 0; 4b87c: 4298 clrl %a0@+ api->event_condition = 0; _ASR_Initialize( &api->Signal ); created->task_variables = NULL; if ( rtems_configuration_get_notepads_enabled() ) { for (i=0; i < RTEMS_NUMBER_NOTEPADS; i++) 4b87e: 5280 addql #1,%d0 4b880: 7210 moveq #16,%d1 4b882: b280 cmpl %d0,%d1 4b884: 66f6 bnes 4b87c <_RTEMS_tasks_Create_extension+0x5a> api->Notepads[i] = 0; } return true; } 4b886: 246e fffc moveal %fp@(-4),%a2 4b88a: 4e5e unlk %fp api->event_condition = 0; _ASR_Initialize( &api->Signal ); created->task_variables = NULL; if ( rtems_configuration_get_notepads_enabled() ) { for (i=0; i < RTEMS_NUMBER_NOTEPADS; i++) 4b88c: 7001 moveq #1,%d0 api->Notepads[i] = 0; } return true; } 4b88e: 4e75 rts /* * Notepads must be the last entry in the structure and they * can be left off if disabled in the configuration. */ to_allocate = sizeof( RTEMS_API_Control ); if ( !rtems_configuration_get_notepads_enabled() ) 4b890: 705e moveq #94,%d0 to_allocate -= (RTEMS_NUMBER_NOTEPADS * sizeof(uint32_t)); api = _Workspace_Allocate( to_allocate ); 4b892: 2f00 movel %d0,%sp@- 4b894: 4eb9 0004 91f4 jsr 491f4 <_Workspace_Allocate> if ( !api ) 4b89a: 588f addql #4,%sp */ to_allocate = sizeof( RTEMS_API_Control ); if ( !rtems_configuration_get_notepads_enabled() ) to_allocate -= (RTEMS_NUMBER_NOTEPADS * sizeof(uint32_t)); api = _Workspace_Allocate( to_allocate ); 4b89c: 2040 moveal %d0,%a0 if ( !api ) 4b89e: 4a80 tstl %d0 4b8a0: 66a4 bnes 4b846 <_RTEMS_tasks_Create_extension+0x24> for (i=0; i < RTEMS_NUMBER_NOTEPADS; i++) api->Notepads[i] = 0; } return true; } 4b8a2: 246e fffc moveal %fp@(-4),%a2 4b8a6: 4e5e unlk %fp if ( !rtems_configuration_get_notepads_enabled() ) to_allocate -= (RTEMS_NUMBER_NOTEPADS * sizeof(uint32_t)); api = _Workspace_Allocate( to_allocate ); if ( !api ) 4b8a8: 4200 clrb %d0 <== NOT EXECUTED for (i=0; i < RTEMS_NUMBER_NOTEPADS; i++) api->Notepads[i] = 0; } return true; } =============================================================================== 00046150 <_RTEMS_tasks_Initialize_user_tasks_body>: * * Output parameters: NONE */ void _RTEMS_tasks_Initialize_user_tasks_body( void ) { 46150: 4e56 ffe4 linkw %fp,#-28 46154: 48d7 1c1c moveml %d2-%d4/%a2-%a4,%sp@ rtems_initialization_tasks_table *user_tasks; /* * Move information into local variables */ user_tasks = Configuration_RTEMS_API.User_initialization_tasks_table; 46158: 2479 0005 d7ba moveal 5d7ba ,%a2 maximum = Configuration_RTEMS_API.number_of_initialization_tasks; 4615e: 2639 0005 d7b6 movel 5d7b6 ,%d3 /* * Verify that we have a set of user tasks to iterate */ if ( !user_tasks ) 46164: 4a8a tstl %a2 46166: 6754 beqs 461bc <_RTEMS_tasks_Initialize_user_tasks_body+0x6c> return; /* * Now iterate over the initialization tasks and create/start them. */ for ( index=0 ; index < maximum ; index++ ) { 46168: 4a83 tstl %d3 4616a: 6750 beqs 461bc <_RTEMS_tasks_Initialize_user_tasks_body+0x6c><== NEVER TAKEN 4616c: 280e movel %fp,%d4 4616e: 4282 clrl %d2 46170: 5984 subql #4,%d4 46172: 47f9 0004 5f24 lea 45f24 ,%a3 &id ); if ( !rtems_is_status_successful( return_value ) ) _Internal_error_Occurred( INTERNAL_ERROR_RTEMS_API, true, return_value ); return_value = rtems_task_start( 46178: 49f9 0004 61d8 lea 461d8 ,%a4 /* * Now iterate over the initialization tasks and create/start them. */ for ( index=0 ; index < maximum ; index++ ) { return_value = rtems_task_create( 4617e: 2f04 movel %d4,%sp@- 46180: 2f2a 000c movel %a2@(12),%sp@- 46184: 2f2a 0014 movel %a2@(20),%sp@- 46188: 2f2a 0004 movel %a2@(4),%sp@- 4618c: 2f2a 0008 movel %a2@(8),%sp@- 46190: 2f12 movel %a2@,%sp@- 46192: 4e93 jsr %a3@ user_tasks[ index ].stack_size, user_tasks[ index ].mode_set, user_tasks[ index ].attribute_set, &id ); if ( !rtems_is_status_successful( return_value ) ) 46194: 4fef 0018 lea %sp@(24),%sp 46198: 4a80 tstl %d0 4619a: 662a bnes 461c6 <_RTEMS_tasks_Initialize_user_tasks_body+0x76> _Internal_error_Occurred( INTERNAL_ERROR_RTEMS_API, true, return_value ); return_value = rtems_task_start( 4619c: 2f2a 0018 movel %a2@(24),%sp@- 461a0: 2f2a 0010 movel %a2@(16),%sp@- 461a4: 2f2e fffc movel %fp@(-4),%sp@- 461a8: 4e94 jsr %a4@ id, user_tasks[ index ].entry_point, user_tasks[ index ].argument ); if ( !rtems_is_status_successful( return_value ) ) 461aa: 4fef 000c lea %sp@(12),%sp 461ae: 4a80 tstl %d0 461b0: 6614 bnes 461c6 <_RTEMS_tasks_Initialize_user_tasks_body+0x76> return; /* * Now iterate over the initialization tasks and create/start them. */ for ( index=0 ; index < maximum ; index++ ) { 461b2: 5282 addql #1,%d2 461b4: 45ea 001c lea %a2@(28),%a2 461b8: b483 cmpl %d3,%d2 461ba: 65c2 bcss 4617e <_RTEMS_tasks_Initialize_user_tasks_body+0x2e><== NEVER TAKEN user_tasks[ index ].argument ); if ( !rtems_is_status_successful( return_value ) ) _Internal_error_Occurred( INTERNAL_ERROR_RTEMS_API, true, return_value ); } } 461bc: 4cee 1c1c ffe4 moveml %fp@(-28),%d2-%d4/%a2-%a4 461c2: 4e5e unlk %fp 461c4: 4e75 rts id, user_tasks[ index ].entry_point, user_tasks[ index ].argument ); if ( !rtems_is_status_successful( return_value ) ) _Internal_error_Occurred( INTERNAL_ERROR_RTEMS_API, true, return_value ); 461c6: 2f00 movel %d0,%sp@- 461c8: 4878 0001 pea 1 461cc: 4878 0001 pea 1 461d0: 4eb9 0004 6fcc jsr 46fcc <_Internal_error_Occurred> ... =============================================================================== 0004b75e <_RTEMS_tasks_Post_switch_extension>: */ void _RTEMS_tasks_Post_switch_extension( Thread_Control *executing ) { 4b75e: 4e56 ffec linkw %fp,#-20 4b762: 206e 0008 moveal %fp@(8),%a0 4b766: 48d7 0c0c moveml %d2-%d3/%a2-%a3,%sp@ RTEMS_API_Control *api; ASR_Information *asr; rtems_signal_set signal_set; Modes_Control prev_mode; api = executing->API_Extensions[ THREAD_API_RTEMS ]; 4b76a: 2468 010a moveal %a0@(266),%a2 if ( !api ) 4b76e: 4a8a tstl %a2 4b770: 671a beqs 4b78c <_RTEMS_tasks_Post_switch_extension+0x2e><== NEVER TAKEN * Signal Processing */ asr = &api->Signal; _ISR_Disable( level ); 4b772: 203c 0000 0700 movel #1792,%d0 4b778: 40c1 movew %sr,%d1 4b77a: 8081 orl %d1,%d0 4b77c: 46c0 movew %d0,%sr signal_set = asr->signals_posted; 4b77e: 242a 0012 movel %a2@(18),%d2 asr->signals_posted = 0; 4b782: 42aa 0012 clrl %a2@(18) _ISR_Enable( level ); 4b786: 46c1 movew %d1,%sr if ( !signal_set ) /* similar to _ASR_Are_signals_pending( asr ) */ 4b788: 4a82 tstl %d2 4b78a: 660a bnes 4b796 <_RTEMS_tasks_Post_switch_extension+0x38> (*asr->handler)( signal_set ); asr->nest_level -= 1; rtems_task_mode( prev_mode, RTEMS_ALL_MODE_MASKS, &prev_mode ); } 4b78c: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 4b792: 4e5e unlk %fp 4b794: 4e75 rts if ( !signal_set ) /* similar to _ASR_Are_signals_pending( asr ) */ return; asr->nest_level += 1; 4b796: 52aa 001a addql #1,%a2@(26) rtems_task_mode( asr->mode_set, RTEMS_ALL_MODE_MASKS, &prev_mode ); 4b79a: 260e movel %fp,%d3 4b79c: 5983 subql #4,%d3 4b79e: 47f9 0004 db68 lea 4db68 ,%a3 4b7a4: 2f03 movel %d3,%sp@- 4b7a6: 2f3c 0000 ffff movel #65535,%sp@- 4b7ac: 2f2a 000e movel %a2@(14),%sp@- 4b7b0: 4e93 jsr %a3@ (*asr->handler)( signal_set ); 4b7b2: 2f02 movel %d2,%sp@- 4b7b4: 206a 000a moveal %a2@(10),%a0 4b7b8: 4e90 jsr %a0@ asr->nest_level -= 1; 4b7ba: 53aa 001a subql #1,%a2@(26) rtems_task_mode( prev_mode, RTEMS_ALL_MODE_MASKS, &prev_mode ); 4b7be: 2f03 movel %d3,%sp@- 4b7c0: 2f3c 0000 ffff movel #65535,%sp@- 4b7c6: 2f2e fffc movel %fp@(-4),%sp@- 4b7ca: 4e93 jsr %a3@ 4b7cc: 4fef 001c lea %sp@(28),%sp } 4b7d0: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 4b7d6: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004b6ba <_RTEMS_tasks_Switch_extension>: void _RTEMS_tasks_Switch_extension( Thread_Control *executing, Thread_Control *heir ) { 4b6ba: 4e56 0000 linkw %fp,#0 4b6be: 206e 0008 moveal %fp@(8),%a0 /* * Per Task Variables */ tvp = executing->task_variables; 4b6c2: 2068 011a moveal %a0@(282),%a0 while (tvp) { 4b6c6: 4a88 tstl %a0 4b6c8: 6712 beqs 4b6dc <_RTEMS_tasks_Switch_extension+0x22> tvp->tval = *tvp->ptr; 4b6ca: 2268 0004 moveal %a0@(4),%a1 4b6ce: 2151 000c movel %a1@,%a0@(12) *tvp->ptr = tvp->gval; 4b6d2: 22a8 0008 movel %a0@(8),%a1@ tvp = (rtems_task_variable_t *)tvp->next; 4b6d6: 2050 moveal %a0@,%a0 /* * Per Task Variables */ tvp = executing->task_variables; while (tvp) { 4b6d8: 4a88 tstl %a0 4b6da: 66ee bnes 4b6ca <_RTEMS_tasks_Switch_extension+0x10><== NEVER TAKEN tvp->tval = *tvp->ptr; *tvp->ptr = tvp->gval; tvp = (rtems_task_variable_t *)tvp->next; } tvp = heir->task_variables; 4b6dc: 206e 000c moveal %fp@(12),%a0 4b6e0: 2068 011a moveal %a0@(282),%a0 while (tvp) { 4b6e4: 4a88 tstl %a0 4b6e6: 6712 beqs 4b6fa <_RTEMS_tasks_Switch_extension+0x40> tvp->gval = *tvp->ptr; 4b6e8: 2268 0004 moveal %a0@(4),%a1 4b6ec: 2151 0008 movel %a1@,%a0@(8) *tvp->ptr = tvp->tval; 4b6f0: 22a8 000c movel %a0@(12),%a1@ tvp = (rtems_task_variable_t *)tvp->next; 4b6f4: 2050 moveal %a0@,%a0 *tvp->ptr = tvp->gval; tvp = (rtems_task_variable_t *)tvp->next; } tvp = heir->task_variables; while (tvp) { 4b6f6: 4a88 tstl %a0 4b6f8: 66ee bnes 4b6e8 <_RTEMS_tasks_Switch_extension+0x2e><== NEVER TAKEN tvp->gval = *tvp->ptr; *tvp->ptr = tvp->tval; tvp = (rtems_task_variable_t *)tvp->next; } } 4b6fa: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00047224 <_Rate_monotonic_Timeout>: void _Rate_monotonic_Timeout( Objects_Id id, void *ignored ) { 47224: 4e56 fffc linkw %fp,#-4 47228: 2f0a movel %a2,%sp@- 4722a: 486e fffc pea %fp@(-4) 4722e: 2f2e 0008 movel %fp@(8),%sp@- 47232: 4879 0006 0fc0 pea 60fc0 <_Rate_monotonic_Information> 47238: 4eb9 0004 9074 jsr 49074 <_Objects_Get> /* * When we get here, the Timer is already off the chain so we do not * have to worry about that -- hence no _Watchdog_Remove(). */ the_period = _Rate_monotonic_Get( id, &location ); switch ( location ) { 4723e: 4fef 000c lea %sp@(12),%sp 47242: 2440 moveal %d0,%a2 47244: 4aae fffc tstl %fp@(-4) 47248: 6636 bnes 47280 <_Rate_monotonic_Timeout+0x5c> <== NEVER TAKEN case OBJECTS_LOCAL: the_thread = the_period->owner; 4724a: 206a 0040 moveal %a2@(64),%a0 if ( _States_Is_waiting_for_period( the_thread->current_state ) && 4724e: 2028 0010 movel %a0@(16),%d0 47252: 0280 0000 4000 andil #16384,%d0 47258: 670a beqs 47264 <_Rate_monotonic_Timeout+0x40> the_thread->Wait.id == the_period->Object.id ) { 4725a: 202a 0008 movel %a2@(8),%d0 4725e: b0a8 0020 cmpl %a0@(32),%d0 47262: 675e beqs 472c2 <_Rate_monotonic_Timeout+0x9e> _Thread_Unblock( the_thread ); _Rate_monotonic_Initiate_statistics( the_period ); _Watchdog_Insert_ticks( &the_period->Timer, the_period->next_length ); } else if ( the_period->state == RATE_MONOTONIC_OWNER_IS_BLOCKING ) { 47264: 7001 moveq #1,%d0 47266: b0aa 0038 cmpl %a2@(56),%d0 4726a: 671c beqs 47288 <_Rate_monotonic_Timeout+0x64> _Rate_monotonic_Initiate_statistics( the_period ); _Watchdog_Insert_ticks( &the_period->Timer, the_period->next_length ); } else the_period->state = RATE_MONOTONIC_EXPIRED; 4726c: 7004 moveq #4,%d0 4726e: 2540 0038 movel %d0,%a2@(56) */ RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void ) { RTEMS_COMPILER_MEMORY_BARRIER(); _Thread_Dispatch_disable_level -= 1; 47272: 2039 0006 10c4 movel 610c4 <_Thread_Dispatch_disable_level>,%d0 47278: 5380 subql #1,%d0 4727a: 23c0 0006 10c4 movel %d0,610c4 <_Thread_Dispatch_disable_level> case OBJECTS_REMOTE: /* impossible */ #endif case OBJECTS_ERROR: break; } } 47280: 246e fff8 moveal %fp@(-8),%a2 47284: 4e5e unlk %fp 47286: 4e75 rts _Rate_monotonic_Initiate_statistics( the_period ); _Watchdog_Insert_ticks( &the_period->Timer, the_period->next_length ); } else if ( the_period->state == RATE_MONOTONIC_OWNER_IS_BLOCKING ) { the_period->state = RATE_MONOTONIC_EXPIRED_WHILE_BLOCKING; 47288: 103c 0003 moveb #3,%d0 4728c: 2540 0038 movel %d0,%a2@(56) _Rate_monotonic_Initiate_statistics( the_period ); 47290: 2f0a movel %a2,%sp@- 47292: 4eb9 0004 6b78 jsr 46b78 <_Rate_monotonic_Initiate_statistics> Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 47298: 256a 003c 001c movel %a2@(60),%a2@(28) _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 4729e: 486a 0010 pea %a2@(16) 472a2: 4879 0006 119c pea 6119c <_Watchdog_Ticks_chain> 472a8: 4eb9 0004 abcc jsr 4abcc <_Watchdog_Insert> 472ae: 4fef 000c lea %sp@(12),%sp 472b2: 2039 0006 10c4 movel 610c4 <_Thread_Dispatch_disable_level>,%d0 472b8: 5380 subql #1,%d0 472ba: 23c0 0006 10c4 movel %d0,610c4 <_Thread_Dispatch_disable_level> 472c0: 60be bras 47280 <_Rate_monotonic_Timeout+0x5c> RTEMS_INLINE_ROUTINE void _Thread_Unblock ( Thread_Control *the_thread ) { _Thread_Clear_state( the_thread, STATES_BLOCKED ); 472c2: 2f3c 1003 fff8 movel #268697592,%sp@- 472c8: 2f08 movel %a0,%sp@- 472ca: 4eb9 0004 9530 jsr 49530 <_Thread_Clear_state> the_thread = the_period->owner; if ( _States_Is_waiting_for_period( the_thread->current_state ) && the_thread->Wait.id == the_period->Object.id ) { _Thread_Unblock( the_thread ); _Rate_monotonic_Initiate_statistics( the_period ); 472d0: 2f0a movel %a2,%sp@- 472d2: 4eb9 0004 6b78 jsr 46b78 <_Rate_monotonic_Initiate_statistics> Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 472d8: 256a 003c 001c movel %a2@(60),%a2@(28) _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 472de: 486a 0010 pea %a2@(16) 472e2: 4879 0006 119c pea 6119c <_Watchdog_Ticks_chain> 472e8: 4eb9 0004 abcc jsr 4abcc <_Watchdog_Insert> the_period = _Rate_monotonic_Get( id, &location ); switch ( location ) { case OBJECTS_LOCAL: the_thread = the_period->owner; if ( _States_Is_waiting_for_period( the_thread->current_state ) && 472ee: 4fef 0014 lea %sp@(20),%sp */ RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void ) { RTEMS_COMPILER_MEMORY_BARRIER(); _Thread_Dispatch_disable_level -= 1; 472f2: 2039 0006 10c4 movel 610c4 <_Thread_Dispatch_disable_level>,%d0 472f8: 5380 subql #1,%d0 472fa: 23c0 0006 10c4 movel %d0,610c4 <_Thread_Dispatch_disable_level> 47300: 6000 ff7e braw 47280 <_Rate_monotonic_Timeout+0x5c> =============================================================================== 000485c8 <_TOD_Set>: */ void _TOD_Set( const struct timespec *time ) { 485c8: 4e56 0000 linkw %fp,#0 485cc: 2039 0006 9598 movel 69598 <_Thread_Dispatch_disable_level>,%d0 485d2: 5280 addql #1,%d0 485d4: 2f0a movel %a2,%sp@- 485d6: 246e 0008 moveal %fp@(8),%a2 485da: 23c0 0006 9598 movel %d0,69598 <_Thread_Dispatch_disable_level> long seconds; _Thread_Disable_dispatch(); _TOD_Deactivate(); seconds = _TOD_Seconds_since_epoch(); 485e0: 2039 0006 962a movel 6962a <_TOD_Now>,%d0 if ( time->tv_sec < seconds ) 485e6: 2212 movel %a2@,%d1 485e8: b280 cmpl %d0,%d1 485ea: 6d38 blts 48624 <_TOD_Set+0x5c> Watchdog_Adjust_directions direction, Watchdog_Interval units ) { _Watchdog_Adjust( &_Watchdog_Seconds_chain, direction, units ); 485ec: 9280 subl %d0,%d1 485ee: 2f01 movel %d1,%sp@- 485f0: 42a7 clrl %sp@- 485f2: 4879 0006 9664 pea 69664 <_Watchdog_Seconds_chain> 485f8: 4eb9 0004 acbc jsr 4acbc <_Watchdog_Adjust> _Watchdog_Adjust_seconds( WATCHDOG_BACKWARD, seconds - time->tv_sec ); else _Watchdog_Adjust_seconds( WATCHDOG_FORWARD, time->tv_sec - seconds ); /* POSIX format TOD (timespec) */ _Timestamp_Set( &_TOD_Now, time->tv_sec, time->tv_nsec ); 485fe: 23d2 0006 962a movel %a2@,6962a <_TOD_Now> 48604: 588a addql #4,%a2 48606: 4fef 000c lea %sp@(12),%sp 4860a: 23d2 0006 962e movel %a2@,6962e <_TOD_Now+0x4> _TOD_Is_set = true; _TOD_Activate(); _Thread_Enable_dispatch(); } 48610: 246e fffc moveal %fp@(-4),%a2 48614: 4e5e unlk %fp else _Watchdog_Adjust_seconds( WATCHDOG_FORWARD, time->tv_sec - seconds ); /* POSIX format TOD (timespec) */ _Timestamp_Set( &_TOD_Now, time->tv_sec, time->tv_nsec ); _TOD_Is_set = true; 48616: 7001 moveq #1,%d0 48618: 13c0 0006 95ac moveb %d0,695ac <_TOD_Is_set> _TOD_Activate(); _Thread_Enable_dispatch(); 4861e: 4ef9 0004 9910 jmp 49910 <_Thread_Enable_dispatch> 48624: 9081 subl %d1,%d0 48626: 2f00 movel %d0,%sp@- 48628: 4878 0001 pea 1 4862c: 4879 0006 9664 pea 69664 <_Watchdog_Seconds_chain> 48632: 4eb9 0004 acbc jsr 4acbc <_Watchdog_Adjust> _Watchdog_Adjust_seconds( WATCHDOG_BACKWARD, seconds - time->tv_sec ); else _Watchdog_Adjust_seconds( WATCHDOG_FORWARD, time->tv_sec - seconds ); /* POSIX format TOD (timespec) */ _Timestamp_Set( &_TOD_Now, time->tv_sec, time->tv_nsec ); 48638: 23d2 0006 962a movel %a2@,6962a <_TOD_Now> 4863e: 588a addql #4,%a2 48640: 4fef 000c lea %sp@(12),%sp 48644: 23d2 0006 962e movel %a2@,6962e <_TOD_Now+0x4> _TOD_Is_set = true; _TOD_Activate(); _Thread_Enable_dispatch(); } 4864a: 246e fffc moveal %fp@(-4),%a2 4864e: 4e5e unlk %fp else _Watchdog_Adjust_seconds( WATCHDOG_FORWARD, time->tv_sec - seconds ); /* POSIX format TOD (timespec) */ _Timestamp_Set( &_TOD_Now, time->tv_sec, time->tv_nsec ); _TOD_Is_set = true; 48650: 7001 moveq #1,%d0 48652: 13c0 0006 95ac moveb %d0,695ac <_TOD_Is_set> _TOD_Activate(); _Thread_Enable_dispatch(); 48658: 4ef9 0004 9910 jmp 49910 <_Thread_Enable_dispatch> ... =============================================================================== 00046c3c <_TOD_Validate>: */ bool _TOD_Validate( const rtems_time_of_day *the_tod ) { 46c3c: 4e56 0000 linkw %fp,#0 46c40: 206e 0008 moveal %fp@(8),%a0 uint32_t days_in_month; uint32_t ticks_per_second; ticks_per_second = TOD_MICROSECONDS_PER_SECOND / rtems_configuration_get_microseconds_per_tick(); 46c44: 2039 0006 0020 movel 60020 ,%d0 */ bool _TOD_Validate( const rtems_time_of_day *the_tod ) { 46c4a: 2f02 movel %d2,%sp@- uint32_t days_in_month; uint32_t ticks_per_second; ticks_per_second = TOD_MICROSECONDS_PER_SECOND / rtems_configuration_get_microseconds_per_tick(); if ((!the_tod) || 46c4c: 4a88 tstl %a0 46c4e: 6762 beqs 46cb2 <_TOD_Validate+0x76> <== NEVER TAKEN 46c50: 243c 000f 4240 movel #1000000,%d2 46c56: 4c40 2002 remul %d0,%d2,%d2 (the_tod->ticks >= ticks_per_second) || 46c5a: b4a8 0018 cmpl %a0@(24),%d2 46c5e: 6352 blss 46cb2 <_TOD_Validate+0x76> (the_tod->second >= TOD_SECONDS_PER_MINUTE) || 46c60: 703b moveq #59,%d0 46c62: b0a8 0014 cmpl %a0@(20),%d0 46c66: 654a bcss 46cb2 <_TOD_Validate+0x76> (the_tod->minute >= TOD_MINUTES_PER_HOUR) || 46c68: b0a8 0010 cmpl %a0@(16),%d0 46c6c: 6544 bcss 46cb2 <_TOD_Validate+0x76> (the_tod->hour >= TOD_HOURS_PER_DAY) || 46c6e: 7217 moveq #23,%d1 46c70: b2a8 000c cmpl %a0@(12),%d1 46c74: 653c bcss 46cb2 <_TOD_Validate+0x76> (the_tod->month == 0) || 46c76: 2028 0004 movel %a0@(4),%d0 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) || 46c7a: 6736 beqs 46cb2 <_TOD_Validate+0x76> <== NEVER TAKEN 46c7c: 740c moveq #12,%d2 46c7e: b480 cmpl %d0,%d2 46c80: 6530 bcss 46cb2 <_TOD_Validate+0x76> (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) || 46c82: 2210 movel %a0@,%d1 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) || 46c84: 0c81 0000 07c3 cmpil #1987,%d1 46c8a: 6326 blss 46cb2 <_TOD_Validate+0x76> (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) || (the_tod->day == 0) ) 46c8c: 2068 0008 moveal %a0@(8),%a0 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) || 46c90: 4a88 tstl %a0 46c92: 671e beqs 46cb2 <_TOD_Validate+0x76> <== NEVER TAKEN (the_tod->month > TOD_MONTHS_PER_YEAR) || (the_tod->year < TOD_BASE_YEAR) || (the_tod->day == 0) ) return false; if ( (the_tod->year % 4) == 0 ) 46c94: 143c 0003 moveb #3,%d2 46c98: c282 andl %d2,%d1 46c9a: 661e bnes 46cba <_TOD_Validate+0x7e> days_in_month = _TOD_Days_per_month[ 1 ][ the_tod->month ]; 46c9c: 43f9 0005 ee0e lea 5ee0e <_TOD_Days_per_month>,%a1 46ca2: 2031 0c34 movel %a1@(00000034,%d0:l:4),%d0 * false - if the the_tod is invalid * * NOTE: This routine only works for leap-years through 2099. */ bool _TOD_Validate( 46ca6: b1c0 cmpal %d0,%a0 46ca8: 53c0 sls %d0 46caa: 4480 negl %d0 if ( the_tod->day > days_in_month ) return false; return true; } 46cac: 241f movel %sp@+,%d2 46cae: 4e5e unlk %fp 46cb0: 4e75 rts 46cb2: 241f movel %sp@+,%d2 46cb4: 4e5e unlk %fp * false - if the the_tod is invalid * * NOTE: This routine only works for leap-years through 2099. */ bool _TOD_Validate( 46cb6: 4200 clrb %d0 if ( the_tod->day > days_in_month ) return false; return true; } 46cb8: 4e75 rts return false; if ( (the_tod->year % 4) == 0 ) days_in_month = _TOD_Days_per_month[ 1 ][ the_tod->month ]; else days_in_month = _TOD_Days_per_month[ 0 ][ the_tod->month ]; 46cba: 43f9 0005 ee0e lea 5ee0e <_TOD_Days_per_month>,%a1 46cc0: 2031 0c00 movel %a1@(00000000,%d0:l:4),%d0 * false - if the the_tod is invalid * * NOTE: This routine only works for leap-years through 2099. */ bool _TOD_Validate( 46cc4: b1c0 cmpal %d0,%a0 46cc6: 53c0 sls %d0 46cc8: 4480 negl %d0 46cca: 60e0 bras 46cac <_TOD_Validate+0x70> =============================================================================== 0004789c <_Thread_Change_priority>: void _Thread_Change_priority( Thread_Control *the_thread, Priority_Control new_priority, bool prepend_it ) { 4789c: 4e56 fff0 linkw %fp,#-16 478a0: 48d7 041c moveml %d2-%d4/%a2,%sp@ 478a4: 246e 0008 moveal %fp@(8),%a2 /* * Set a transient state for the thread so it is pulled off the Ready chains. * This will prevent it from being scheduled no matter what happens in an * ISR. */ _Thread_Set_transient( the_thread ); 478a8: 2f0a movel %a2,%sp@- void _Thread_Change_priority( Thread_Control *the_thread, Priority_Control new_priority, bool prepend_it ) { 478aa: 242e 000c movel %fp@(12),%d2 */ /* * Save original state */ original_state = the_thread->current_state; 478ae: 262a 0010 movel %a2@(16),%d3 void _Thread_Change_priority( Thread_Control *the_thread, Priority_Control new_priority, bool prepend_it ) { 478b2: 182e 0013 moveb %fp@(19),%d4 /* * Set a transient state for the thread so it is pulled off the Ready chains. * This will prevent it from being scheduled no matter what happens in an * ISR. */ _Thread_Set_transient( the_thread ); 478b6: 4eb9 0004 8834 jsr 48834 <_Thread_Set_transient> /* * Do not bother recomputing all the priority related information if * we are not REALLY changing priority. */ if ( the_thread->current_priority != new_priority ) 478bc: 588f addql #4,%sp 478be: b4aa 0014 cmpl %a2@(20),%d2 478c2: 670c beqs 478d0 <_Thread_Change_priority+0x34> _Thread_Set_priority( the_thread, new_priority ); 478c4: 2f02 movel %d2,%sp@- 478c6: 2f0a movel %a2,%sp@- 478c8: 4eb9 0004 86b0 jsr 486b0 <_Thread_Set_priority> 478ce: 508f addql #8,%sp _ISR_Disable( level ); 478d0: 203c 0000 0700 movel #1792,%d0 478d6: 40c1 movew %sr,%d1 478d8: 8081 orl %d1,%d0 478da: 46c0 movew %d0,%sr /* * If the thread has more than STATES_TRANSIENT set, then it is blocked, * If it is blocked on a thread queue, then we need to requeue it. */ state = the_thread->current_state; 478dc: 202a 0010 movel %a2@(16),%d0 if ( state != STATES_TRANSIENT ) { 478e0: 7404 moveq #4,%d2 478e2: b480 cmpl %d0,%d2 478e4: 6738 beqs 4791e <_Thread_Change_priority+0x82> /* Only clear the transient state if it wasn't set already */ if ( ! _States_Is_transient( original_state ) ) 478e6: 44c3 movew %d3,%ccr 478e8: 6708 beqs 478f2 <_Thread_Change_priority+0x56> <== NEVER TAKEN the_thread->current_state = _States_Clear( STATES_TRANSIENT, state ); 478ea: 74fb moveq #-5,%d2 478ec: c480 andl %d0,%d2 478ee: 2542 0010 movel %d2,%a2@(16) _ISR_Enable( level ); 478f2: 46c1 movew %d1,%sr if ( _States_Is_waiting_on_thread_queue( state ) ) { 478f4: 0280 0003 bee0 andil #245472,%d0 478fa: 660a bnes 47906 <_Thread_Change_priority+0x6a> if ( !_Thread_Is_executing_also_the_heir() && _Thread_Executing->is_preemptible ) _Context_Switch_necessary = true; _ISR_Enable( level ); } 478fc: 4cee 041c fff0 moveml %fp@(-16),%d2-%d4/%a2 47902: 4e5e unlk %fp 47904: 4e75 rts /* Only clear the transient state if it wasn't set already */ if ( ! _States_Is_transient( original_state ) ) the_thread->current_state = _States_Clear( STATES_TRANSIENT, state ); _ISR_Enable( level ); if ( _States_Is_waiting_on_thread_queue( state ) ) { _Thread_queue_Requeue( the_thread->Wait.queue, the_thread ); 47906: 2d4a 000c movel %a2,%fp@(12) 4790a: 2d6a 0044 0008 movel %a2@(68),%fp@(8) if ( !_Thread_Is_executing_also_the_heir() && _Thread_Executing->is_preemptible ) _Context_Switch_necessary = true; _ISR_Enable( level ); } 47910: 4cee 041c fff0 moveml %fp@(-16),%d2-%d4/%a2 47916: 4e5e unlk %fp /* Only clear the transient state if it wasn't set already */ if ( ! _States_Is_transient( original_state ) ) the_thread->current_state = _States_Clear( STATES_TRANSIENT, state ); _ISR_Enable( level ); if ( _States_Is_waiting_on_thread_queue( state ) ) { _Thread_queue_Requeue( the_thread->Wait.queue, the_thread ); 47918: 4ef9 0004 8604 jmp 48604 <_Thread_queue_Requeue> } return; } /* Only clear the transient state if it wasn't set already */ if ( ! _States_Is_transient( original_state ) ) { 4791e: 44c3 movew %d3,%ccr 47920: 673c beqs 4795e <_Thread_Change_priority+0xc2> <== NEVER TAKEN RTEMS_INLINE_ROUTINE void _Priority_Add_to_bit_map ( Priority_Information *the_priority_map ) { *the_priority_map->minor |= the_priority_map->ready_minor; 47922: 206a 008e moveal %a2@(142),%a0 47926: 302a 0094 movew %a2@(148),%d0 4792a: 3410 movew %a0@,%d2 * Interrupts are STILL disabled. * We now know the thread will be in the READY state when we remove * the TRANSIENT state. So we have to place it on the appropriate * Ready Queue with interrupts off. */ the_thread->current_state = _States_Clear( STATES_TRANSIENT, state ); 4792c: 42aa 0010 clrl %a2@(16) 47930: 8082 orl %d2,%d0 47932: 3080 movew %d0,%a0@ _Priority_Major_bit_map |= the_priority_map->ready_major; 47934: 3439 0005 f028 movew 5f028 <_Priority_Major_bit_map>,%d2 4793a: 302a 0092 movew %a2@(146),%d0 4793e: 8082 orl %d2,%d0 47940: 33c0 0005 f028 movew %d0,5f028 <_Priority_Major_bit_map> _Priority_Add_to_bit_map( &the_thread->Priority_map ); if ( prepend_it ) 47946: 4a04 tstb %d4 47948: 6700 0082 beqw 479cc <_Thread_Change_priority+0x130> */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Head( Chain_Control *the_chain ) { return (Chain_Node *) the_chain; 4794c: 206a 008a moveal %a2@(138),%a0 ) { Chain_Node *before_node; the_node->previous = after_node; before_node = after_node->next; 47950: 2250 moveal %a0@,%a1 Chain_Node *the_node ) { Chain_Node *before_node; the_node->previous = after_node; 47952: 2548 0004 movel %a0,%a2@(4) before_node = after_node->next; after_node->next = the_node; 47956: 208a movel %a2,%a0@ the_node->next = before_node; before_node->previous = the_node; 47958: 234a 0004 movel %a2,%a1@(4) Chain_Node *before_node; the_node->previous = after_node; before_node = after_node->next; after_node->next = the_node; the_node->next = before_node; 4795c: 2489 movel %a1,%a2@ _Chain_Prepend_unprotected( the_thread->ready, &the_thread->Object.Node ); else _Chain_Append_unprotected( the_thread->ready, &the_thread->Object.Node ); } _ISR_Flash( level ); 4795e: 203c 0000 0700 movel #1792,%d0 47964: 46c1 movew %d1,%sr 47966: 8081 orl %d1,%d0 47968: 46c0 movew %d0,%sr RTEMS_INLINE_ROUTINE Priority_Control _Priority_Get_highest( void ) { Priority_Bit_map_control minor; Priority_Bit_map_control major; _Bitfield_Find_first_bit( _Priority_Major_bit_map, major ); 4796a: 3039 0005 f028 movew 5f028 <_Priority_Major_bit_map>,%d0 47970: 4840 swap %d0 47972: 04c0 ff1 %d0 _Bitfield_Find_first_bit( _Priority_Bit_map[major], minor ); 47974: 4282 clrl %d2 47976: 41f9 0005 f098 lea 5f098 <_Priority_Bit_map>,%a0 4797c: 3400 movew %d0,%d2 4797e: 3030 2a00 movew %a0@(00000000,%d2:l:2),%d0 47982: 4840 swap %d0 47984: 04c0 ff1 %d0 * ready thread. */ RTEMS_INLINE_ROUTINE void _Thread_Calculate_heir( void ) { _Thread_Heir = (Thread_Control *) 47986: 4283 clrl %d3 47988: e98a lsll #4,%d2 4798a: 3600 movew %d0,%d3 4798c: 2279 0005 ef24 moveal 5ef24 <_Thread_Ready_chain>,%a1 47992: 2002 movel %d2,%d0 47994: d083 addl %d3,%d0 47996: 2400 movel %d0,%d2 47998: e58a lsll #2,%d2 4799a: e988 lsll #4,%d0 * is also the heir thread, and false otherwise. */ RTEMS_INLINE_ROUTINE bool _Thread_Is_executing_also_the_heir( void ) { return ( _Thread_Executing == _Thread_Heir ); 4799c: 2079 0005 f032 moveal 5f032 <_Thread_Executing>,%a0 * ready thread. */ RTEMS_INLINE_ROUTINE void _Thread_Calculate_heir( void ) { _Thread_Heir = (Thread_Control *) 479a2: 93c2 subal %d2,%a1 479a4: 2031 0800 movel %a1@(00000000,%d0:l),%d0 479a8: 23c0 0005 f006 movel %d0,5f006 <_Thread_Heir> * We altered the set of thread priorities. So let's figure out * who is the heir and if we need to switch to them. */ _Thread_Calculate_heir(); if ( !_Thread_Is_executing_also_the_heir() && 479ae: b1c0 cmpal %d0,%a0 479b0: 670e beqs 479c0 <_Thread_Change_priority+0x124> _Thread_Executing->is_preemptible ) 479b2: 4a28 0075 tstb %a0@(117) 479b6: 6708 beqs 479c0 <_Thread_Change_priority+0x124> _Context_Switch_necessary = true; 479b8: 7401 moveq #1,%d2 479ba: 13c2 0005 f042 moveb %d2,5f042 <_Context_Switch_necessary> _ISR_Enable( level ); 479c0: 46c1 movew %d1,%sr } 479c2: 4cee 041c fff0 moveml %fp@(-16),%d2-%d4/%a2 479c8: 4e5e unlk %fp 479ca: 4e75 rts _Priority_Add_to_bit_map( &the_thread->Priority_map ); if ( prepend_it ) _Chain_Prepend_unprotected( the_thread->ready, &the_thread->Object.Node ); else _Chain_Append_unprotected( the_thread->ready, &the_thread->Object.Node ); 479cc: 206a 008a moveal %a2@(138),%a0 Chain_Node *the_node ) { Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); 479d0: 2008 movel %a0,%d0 479d2: 5880 addql #4,%d0 479d4: 2480 movel %d0,%a2@ old_last_node = the_chain->last; 479d6: 2268 0008 moveal %a0@(8),%a1 the_chain->last = the_node; 479da: 214a 0008 movel %a2,%a0@(8) old_last_node->next = the_node; the_node->previous = old_last_node; 479de: 2549 0004 movel %a1,%a2@(4) Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); old_last_node = the_chain->last; the_chain->last = the_node; old_last_node->next = the_node; 479e2: 228a movel %a2,%a1@ 479e4: 6000 ff78 braw 4795e <_Thread_Change_priority+0xc2> =============================================================================== 000479e8 <_Thread_Clear_state>: ) { ISR_Level level; States_Control current_state; _ISR_Disable( level ); 479e8: 327c 0700 moveaw #1792,%a1 479ec: 2009 movel %a1,%d0 void _Thread_Clear_state( Thread_Control *the_thread, States_Control state ) { 479ee: 4e56 ffec linkw %fp,#-20 479f2: 206e 0008 moveal %fp@(8),%a0 479f6: 48d7 1c0c moveml %d2-%d3/%a2-%a4,%sp@ 479fa: 242e 000c movel %fp@(12),%d2 ISR_Level level; States_Control current_state; _ISR_Disable( level ); 479fe: 40c3 movew %sr,%d3 47a00: 8083 orl %d3,%d0 47a02: 46c0 movew %d0,%sr current_state = the_thread->current_state; 47a04: 2228 0010 movel %a0@(16),%d1 if ( current_state & state ) { 47a08: 2002 movel %d2,%d0 47a0a: c081 andl %d1,%d0 47a0c: 6776 beqs 47a84 <_Thread_Clear_state+0x9c> RTEMS_INLINE_ROUTINE States_Control _States_Clear ( States_Control states_to_clear, States_Control current_state ) { return (current_state & ~states_to_clear); 47a0e: 2002 movel %d2,%d0 47a10: 4680 notl %d0 47a12: c081 andl %d1,%d0 current_state = 47a14: 2140 0010 movel %d0,%a0@(16) the_thread->current_state = _States_Clear( state, current_state ); if ( _States_Is_ready( current_state ) ) { 47a18: 666a bnes 47a84 <_Thread_Clear_state+0x9c> RTEMS_INLINE_ROUTINE void _Priority_Add_to_bit_map ( Priority_Information *the_priority_map ) { *the_priority_map->minor |= the_priority_map->ready_minor; 47a1a: 2868 008e moveal %a0@(142),%a4 47a1e: 3028 0094 movew %a0@(148),%d0 47a22: 3214 movew %a4@,%d1 _Priority_Add_to_bit_map( &the_thread->Priority_map ); _Chain_Append_unprotected(the_thread->ready, &the_thread->Object.Node); 47a24: 2468 008a moveal %a0@(138),%a2 Chain_Node *the_node ) { Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); 47a28: 240a movel %a2,%d2 47a2a: 5882 addql #4,%d2 47a2c: 8081 orl %d1,%d0 47a2e: 2082 movel %d2,%a0@ old_last_node = the_chain->last; 47a30: 266a 0008 moveal %a2@(8),%a3 47a34: 3880 movew %d0,%a4@ the_chain->last = the_node; 47a36: 2548 0008 movel %a0,%a2@(8) _Priority_Major_bit_map |= the_priority_map->ready_major; 47a3a: 3239 0005 f028 movew 5f028 <_Priority_Major_bit_map>,%d1 47a40: 3028 0092 movew %a0@(146),%d0 old_last_node->next = the_node; the_node->previous = old_last_node; 47a44: 214b 0004 movel %a3,%a0@(4) 47a48: 8081 orl %d1,%d0 Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); old_last_node = the_chain->last; the_chain->last = the_node; old_last_node->next = the_node; 47a4a: 2688 movel %a0,%a3@ 47a4c: 33c0 0005 f028 movew %d0,5f028 <_Priority_Major_bit_map> _ISR_Flash( level ); 47a52: 2009 movel %a1,%d0 47a54: 46c3 movew %d3,%sr 47a56: 8083 orl %d3,%d0 47a58: 46c0 movew %d0,%sr * a context switch. * Pseudo-ISR case: * Even if the thread isn't preemptible, if the new heir is * a pseudo-ISR system task, we need to do a context switch. */ if ( the_thread->current_priority < _Thread_Heir->current_priority ) { 47a5a: 2028 0014 movel %a0@(20),%d0 47a5e: 2279 0005 f006 moveal 5f006 <_Thread_Heir>,%a1 47a64: b0a9 0014 cmpl %a1@(20),%d0 47a68: 641a bccs 47a84 <_Thread_Clear_state+0x9c> _Thread_Heir = the_thread; 47a6a: 23c8 0005 f006 movel %a0,5f006 <_Thread_Heir> if ( _Thread_Executing->is_preemptible || 47a70: 2079 0005 f032 moveal 5f032 <_Thread_Executing>,%a0 47a76: 4a28 0075 tstb %a0@(117) 47a7a: 6712 beqs 47a8e <_Thread_Clear_state+0xa6> the_thread->current_priority == 0 ) _Context_Switch_necessary = true; 47a7c: 7001 moveq #1,%d0 47a7e: 13c0 0005 f042 moveb %d0,5f042 <_Context_Switch_necessary> } } } _ISR_Enable( level ); 47a84: 46c3 movew %d3,%sr } 47a86: 4cd7 1c0c moveml %sp@,%d2-%d3/%a2-%a4 47a8a: 4e5e unlk %fp 47a8c: 4e75 rts * Even if the thread isn't preemptible, if the new heir is * a pseudo-ISR system task, we need to do a context switch. */ if ( the_thread->current_priority < _Thread_Heir->current_priority ) { _Thread_Heir = the_thread; if ( _Thread_Executing->is_preemptible || 47a8e: 4a80 tstl %d0 47a90: 66f2 bnes 47a84 <_Thread_Clear_state+0x9c> <== ALWAYS TAKEN the_thread->current_priority == 0 ) _Context_Switch_necessary = true; 47a92: 7001 moveq #1,%d0 <== NOT EXECUTED 47a94: 13c0 0005 f042 moveb %d0,5f042 <_Context_Switch_necessary> <== NOT EXECUTED 47a9a: 60e8 bras 47a84 <_Thread_Clear_state+0x9c> <== NOT EXECUTED =============================================================================== 00047a9c <_Thread_Close>: 47a9c: 4280 clrl %d0 void _Thread_Close( Objects_Information *information, Thread_Control *the_thread ) { 47a9e: 4e56 0000 linkw %fp,#0 47aa2: 2f0b movel %a3,%sp@- 47aa4: 266e 0008 moveal %fp@(8),%a3 47aa8: 2f0a movel %a2,%sp@- 47aaa: 246e 000c moveal %fp@(12),%a2 47aae: 206b 0018 moveal %a3@(24),%a0 47ab2: 302a 000a movew %a2@(10),%d0 47ab6: 42b0 0c00 clrl %a0@(00000000,%d0:l:4) */ RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void ) { RTEMS_COMPILER_MEMORY_BARRIER(); _Thread_Dispatch_disable_level -= 1; 47aba: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 47ac0: 5380 subql #1,%d0 * disappear and set a transient state on it. So we temporarily * unnest dispatching. */ _Thread_Unnest_dispatch(); _User_extensions_Thread_delete( the_thread ); 47ac2: 2f0a movel %a2,%sp@- 47ac4: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> 47aca: 4eb9 0004 8e90 jsr 48e90 <_User_extensions_Thread_delete> rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 47ad0: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 47ad6: 5280 addql #1,%d0 47ad8: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> /* * Now we are in a dispatching critical section again and we * can take the thread OUT of the published set. It is invalid * to use this thread's Id OR name after this call. */ _Objects_Close( information, &the_thread->Object ); 47ade: 2f0a movel %a2,%sp@- 47ae0: 2f0b movel %a3,%sp@- 47ae2: 4eb9 0004 7120 jsr 47120 <_Objects_Close> /* * By setting the dormant state, the thread will not be considered * for scheduling when we remove any blocking states. */ _Thread_Set_state( the_thread, STATES_DORMANT ); 47ae8: 4878 0001 pea 1 47aec: 2f0a movel %a2,%sp@- 47aee: 4eb9 0004 8720 jsr 48720 <_Thread_Set_state> if ( !_Thread_queue_Extract_with_proxy( the_thread ) ) { 47af4: 2f0a movel %a2,%sp@- 47af6: 4eb9 0004 852c jsr 4852c <_Thread_queue_Extract_with_proxy> 47afc: 4fef 0018 lea %sp@(24),%sp 47b00: 4a00 tstb %d0 47b02: 6608 bnes 47b0c <_Thread_Close+0x70> if ( _Watchdog_Is_active( &the_thread->Timer ) ) 47b04: 7002 moveq #2,%d0 47b06: b0aa 0050 cmpl %a2@(80),%d0 47b0a: 6756 beqs 47b62 <_Thread_Close+0xc6> /* * The thread might have been FP. So deal with that. */ #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) #if ( CPU_USE_DEFERRED_FP_SWITCH == TRUE ) if ( _Thread_Is_allocated_fp( the_thread ) ) 47b0c: b5f9 0005 effe cmpal 5effe <_Thread_Allocated_fp>,%a2 47b12: 6746 beqs 47b5a <_Thread_Close+0xbe> _Thread_Deallocate_fp(); #endif the_thread->fp_context = NULL; if ( the_thread->Start.fp_context ) 47b14: 202a 00c6 movel %a2@(198),%d0 #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) #if ( CPU_USE_DEFERRED_FP_SWITCH == TRUE ) if ( _Thread_Is_allocated_fp( the_thread ) ) _Thread_Deallocate_fp(); #endif the_thread->fp_context = NULL; 47b18: 42aa 0102 clrl %a2@(258) if ( the_thread->Start.fp_context ) 47b1c: 4a80 tstl %d0 47b1e: 670a beqs 47b2a <_Thread_Close+0x8e> (void) _Workspace_Free( the_thread->Start.fp_context ); 47b20: 2f00 movel %d0,%sp@- 47b22: 4eb9 0004 9210 jsr 49210 <_Workspace_Free> 47b28: 588f addql #4,%sp /* * Free the rest of the memory associated with this task * and set the associated pointers to NULL for safety. */ _Thread_Stack_Free( the_thread ); 47b2a: 2f0a movel %a2,%sp@- 47b2c: 4eb9 0004 891c jsr 4891c <_Thread_Stack_Free> the_thread->Start.stack = NULL; if ( the_thread->extensions ) 47b32: 202a 0116 movel %a2@(278),%d0 47b36: 588f addql #4,%sp /* * Free the rest of the memory associated with this task * and set the associated pointers to NULL for safety. */ _Thread_Stack_Free( the_thread ); the_thread->Start.stack = NULL; 47b38: 42aa 00ca clrl %a2@(202) if ( the_thread->extensions ) 47b3c: 4a80 tstl %d0 47b3e: 670a beqs 47b4a <_Thread_Close+0xae> (void) _Workspace_Free( the_thread->extensions ); 47b40: 2f00 movel %d0,%sp@- 47b42: 4eb9 0004 9210 jsr 49210 <_Workspace_Free> 47b48: 588f addql #4,%sp the_thread->extensions = NULL; 47b4a: 42aa 0116 clrl %a2@(278) } 47b4e: 246e fff8 moveal %fp@(-8),%a2 47b52: 266e fffc moveal %fp@(-4),%a3 47b56: 4e5e unlk %fp 47b58: 4e75 rts */ #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) RTEMS_INLINE_ROUTINE void _Thread_Deallocate_fp( void ) { _Thread_Allocated_fp = NULL; 47b5a: 42b9 0005 effe clrl 5effe <_Thread_Allocated_fp> 47b60: 60b2 bras 47b14 <_Thread_Close+0x78> */ _Thread_Set_state( the_thread, STATES_DORMANT ); if ( !_Thread_queue_Extract_with_proxy( the_thread ) ) { if ( _Watchdog_Is_active( &the_thread->Timer ) ) (void) _Watchdog_Remove( &the_thread->Timer ); 47b62: 486a 0048 pea %a2@(72) 47b66: 4eb9 0004 90a4 jsr 490a4 <_Watchdog_Remove> 47b6c: 588f addql #4,%sp /* * The thread might have been FP. So deal with that. */ #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) #if ( CPU_USE_DEFERRED_FP_SWITCH == TRUE ) if ( _Thread_Is_allocated_fp( the_thread ) ) 47b6e: b5f9 0005 effe cmpal 5effe <_Thread_Allocated_fp>,%a2 47b74: 669e bnes 47b14 <_Thread_Close+0x78> <== ALWAYS TAKEN 47b76: 60e2 bras 47b5a <_Thread_Close+0xbe> <== NOT EXECUTED =============================================================================== 00047c28 <_Thread_Delay_ended>: void _Thread_Delay_ended( Objects_Id id, void *ignored __attribute__((unused)) ) { 47c28: 4e56 fffc linkw %fp,#-4 Thread_Control *the_thread; Objects_Locations location; the_thread = _Thread_Get( id, &location ); 47c2c: 486e fffc pea %fp@(-4) 47c30: 2f2e 0008 movel %fp@(8),%sp@- 47c34: 4eb9 0004 7de4 jsr 47de4 <_Thread_Get> switch ( location ) { 47c3a: 508f addql #8,%sp 47c3c: 4aae fffc tstl %fp@(-4) 47c40: 661e bnes 47c60 <_Thread_Delay_ended+0x38> <== NEVER TAKEN #if defined(RTEMS_MULTIPROCESSING) case OBJECTS_REMOTE: /* impossible */ #endif break; case OBJECTS_LOCAL: _Thread_Clear_state( 47c42: 2f3c 1000 0018 movel #268435480,%sp@- 47c48: 2f00 movel %d0,%sp@- 47c4a: 4eb9 0004 79e8 jsr 479e8 <_Thread_Clear_state> 47c50: 508f addql #8,%sp 47c52: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 47c58: 5380 subql #1,%d0 47c5a: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> | STATES_INTERRUPTIBLE_BY_SIGNAL ); _Thread_Unnest_dispatch(); break; } } 47c60: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00047c64 <_Thread_Dispatch>: * dispatch thread * no dispatch thread */ void _Thread_Dispatch( void ) { 47c64: 4e56 ffc8 linkw %fp,#-56 47c68: 48d7 3cfc moveml %d2-%d7/%a2-%a5,%sp@ Thread_Control *executing; Thread_Control *heir; ISR_Level level; executing = _Thread_Executing; _ISR_Disable( level ); 47c6c: 2e3c 0000 0700 movel #1792,%d7 47c72: 2007 movel %d7,%d0 { Thread_Control *executing; Thread_Control *heir; ISR_Level level; executing = _Thread_Executing; 47c74: 2479 0005 f032 moveal 5f032 <_Thread_Executing>,%a2 _ISR_Disable( level ); 47c7a: 40c1 movew %sr,%d1 47c7c: 8081 orl %d1,%d0 47c7e: 46c0 movew %d0,%sr while ( _Context_Switch_necessary == true ) { 47c80: 1039 0005 f042 moveb 5f042 <_Context_Switch_necessary>,%d0 47c86: 6700 00fa beqw 47d82 <_Thread_Dispatch+0x11e> 47c8a: 260e movel %fp,%d3 47c8c: 240e movel %fp,%d2 47c8e: 5183 subql #8,%d3 47c90: 2c3c 0004 bc24 movel #310308,%d6 47c96: 0682 ffff fff0 addil #-16,%d2 47c9c: 2a3c 0004 8c5c movel #298076,%d5 47ca2: 283c 0004 8c14 movel #298004,%d4 47ca8: 4bf9 0004 8f1c lea 48f1c <_User_extensions_Thread_switch>,%a5 47cae: 49f9 0004 9290 lea 49290 <_CPU_Context_switch>,%a4 heir = _Thread_Heir; _Thread_Dispatch_disable_level = 1; 47cb4: 7001 moveq #1,%d0 47cb6: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> ISR_Level level; executing = _Thread_Executing; _ISR_Disable( level ); while ( _Context_Switch_necessary == true ) { heir = _Thread_Heir; 47cbc: 2679 0005 f006 moveal 5f006 <_Thread_Heir>,%a3 _Thread_Dispatch_disable_level = 1; _Context_Switch_necessary = false; 47cc2: 4200 clrb %d0 _Thread_Executing = heir; 47cc4: 23cb 0005 f032 movel %a3,5f032 <_Thread_Executing> executing = _Thread_Executing; _ISR_Disable( level ); while ( _Context_Switch_necessary == true ) { heir = _Thread_Heir; _Thread_Dispatch_disable_level = 1; _Context_Switch_necessary = false; 47cca: 13c0 0005 f042 moveb %d0,5f042 <_Context_Switch_necessary> _Thread_Executing = heir; #if __RTEMS_ADA__ executing->rtems_ada_self = rtems_ada_self; rtems_ada_self = heir->rtems_ada_self; #endif if ( heir->budget_algorithm == THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE ) 47cd0: 7001 moveq #1,%d0 47cd2: b0ab 007a cmpl %a3@(122),%d0 47cd6: 6700 00d6 beqw 47dae <_Thread_Dispatch+0x14a> heir->cpu_time_budget = _Thread_Ticks_per_timeslice; _ISR_Enable( level ); 47cda: 46c1 movew %d1,%sr #ifndef __RTEMS_USE_TICKS_FOR_STATISTICS__ { Timestamp_Control uptime, ran; _TOD_Get_uptime( &uptime ); 47cdc: 2f03 movel %d3,%sp@- 47cde: 2046 moveal %d6,%a0 47ce0: 4e90 jsr %a0@ _Timestamp_Subtract( 47ce2: 2045 moveal %d5,%a0 47ce4: 2f02 movel %d2,%sp@- 47ce6: 2f03 movel %d3,%sp@- 47ce8: 4879 0005 f03a pea 5f03a <_Thread_Time_of_last_context_switch> 47cee: 4e90 jsr %a0@ &_Thread_Time_of_last_context_switch, &uptime, &ran ); _Timestamp_Add_to( &executing->cpu_time_used, &ran ); 47cf0: 2044 moveal %d4,%a0 47cf2: 2f02 movel %d2,%sp@- 47cf4: 486a 0082 pea %a2@(130) 47cf8: 4e90 jsr %a0@ #endif /* * Switch libc's task specific data. */ if ( _Thread_libc_reent ) { 47cfa: 2079 0005 f002 moveal 5f002 <_Thread_libc_reent>,%a0 47d00: 4fef 0018 lea %sp@(24),%sp &_Thread_Time_of_last_context_switch, &uptime, &ran ); _Timestamp_Add_to( &executing->cpu_time_used, &ran ); _Thread_Time_of_last_context_switch = uptime; 47d04: 202e fff8 movel %fp@(-8),%d0 47d08: 222e fffc movel %fp@(-4),%d1 47d0c: 23c0 0005 f03a movel %d0,5f03a <_Thread_Time_of_last_context_switch> 47d12: 23c1 0005 f03e movel %d1,5f03e <_Thread_Time_of_last_context_switch+0x4> #endif /* * Switch libc's task specific data. */ if ( _Thread_libc_reent ) { 47d18: 4a88 tstl %a0 47d1a: 6708 beqs 47d24 <_Thread_Dispatch+0xc0> <== NEVER TAKEN executing->libc_reent = *_Thread_libc_reent; 47d1c: 2550 0106 movel %a0@,%a2@(262) *_Thread_libc_reent = heir->libc_reent; 47d20: 20ab 0106 movel %a3@(262),%a0@ } _User_extensions_Thread_switch( executing, heir ); 47d24: 2f0b movel %a3,%sp@- 47d26: 2f0a movel %a2,%sp@- 47d28: 4e95 jsr %a5@ if ( executing->fp_context != NULL ) _Context_Save_fp( &executing->fp_context ); #endif #endif _Context_Switch( &executing->Registers, &heir->Registers ); 47d2a: 486b 00ce pea %a3@(206) 47d2e: 486a 00ce pea %a2@(206) 47d32: 4e94 jsr %a4@ #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) #if ( CPU_USE_DEFERRED_FP_SWITCH == TRUE ) if ( (executing->fp_context != NULL) && 47d34: 4fef 0010 lea %sp@(16),%sp 47d38: 4aaa 0102 tstl %a2@(258) 47d3c: 672c beqs 47d6a <_Thread_Dispatch+0x106> #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) RTEMS_INLINE_ROUTINE bool _Thread_Is_allocated_fp ( const Thread_Control *the_thread ) { return ( the_thread == _Thread_Allocated_fp ); 47d3e: 2079 0005 effe moveal 5effe <_Thread_Allocated_fp>,%a0 47d44: b1ca cmpal %a2,%a0 47d46: 6722 beqs 47d6a <_Thread_Dispatch+0x106> !_Thread_Is_allocated_fp( executing ) ) { if ( _Thread_Allocated_fp != NULL ) 47d48: 4a88 tstl %a0 47d4a: 670c beqs 47d58 <_Thread_Dispatch+0xf4> _Context_Save_fp( &_Thread_Allocated_fp->fp_context ); 47d4c: 4868 0102 pea %a0@(258) 47d50: 4eb9 0004 93c6 jsr 493c6 <_CPU_Context_save_fp> 47d56: 588f addql #4,%sp _Context_Restore_fp( &executing->fp_context ); 47d58: 486a 0102 pea %a2@(258) 47d5c: 4eb9 0004 93fe jsr 493fe <_CPU_Context_restore_fp> _Thread_Allocated_fp = executing; 47d62: 588f addql #4,%sp 47d64: 23ca 0005 effe movel %a2,5effe <_Thread_Allocated_fp> if ( executing->fp_context != NULL ) _Context_Restore_fp( &executing->fp_context ); #endif #endif executing = _Thread_Executing; 47d6a: 2479 0005 f032 moveal 5f032 <_Thread_Executing>,%a2 _ISR_Disable( level ); 47d70: 2007 movel %d7,%d0 47d72: 40c1 movew %sr,%d1 47d74: 8081 orl %d1,%d0 47d76: 46c0 movew %d0,%sr Thread_Control *heir; ISR_Level level; executing = _Thread_Executing; _ISR_Disable( level ); while ( _Context_Switch_necessary == true ) { 47d78: 1039 0005 f042 moveb 5f042 <_Context_Switch_necessary>,%d0 47d7e: 6600 ff34 bnew 47cb4 <_Thread_Dispatch+0x50> executing = _Thread_Executing; _ISR_Disable( level ); } _Thread_Dispatch_disable_level = 0; 47d82: 42b9 0005 ef78 clrl 5ef78 <_Thread_Dispatch_disable_level> _ISR_Enable( level ); 47d88: 46c1 movew %d1,%sr if ( _Thread_Do_post_task_switch_extension || 47d8a: 4ab9 0005 f01a tstl 5f01a <_Thread_Do_post_task_switch_extension> 47d90: 6606 bnes 47d98 <_Thread_Dispatch+0x134> executing->do_post_task_switch_extension ) { 47d92: 4a2a 0074 tstb %a2@(116) 47d96: 670c beqs 47da4 <_Thread_Dispatch+0x140> executing->do_post_task_switch_extension = false; 47d98: 4201 clrb %d1 47d9a: 1541 0074 moveb %d1,%a2@(116) _API_extensions_Run_postswitch(); 47d9e: 4eb9 0004 6650 jsr 46650 <_API_extensions_Run_postswitch> } } 47da4: 4cee 3cfc ffc8 moveml %fp@(-56),%d2-%d7/%a2-%a5 47daa: 4e5e unlk %fp 47dac: 4e75 rts #if __RTEMS_ADA__ executing->rtems_ada_self = rtems_ada_self; rtems_ada_self = heir->rtems_ada_self; #endif if ( heir->budget_algorithm == THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE ) heir->cpu_time_budget = _Thread_Ticks_per_timeslice; 47dae: 41f9 0005 ef28 lea 5ef28 <_Thread_Ticks_per_timeslice>,%a0 47db4: 2750 0076 movel %a0@,%a3@(118) 47db8: 6000 ff20 braw 47cda <_Thread_Dispatch+0x76> =============================================================================== 00047dbc <_Thread_Enable_dispatch>: #if ( (defined(CPU_INLINE_ENABLE_DISPATCH) && \ (CPU_INLINE_ENABLE_DISPATCH == FALSE)) || \ (__RTEMS_DO_NOT_INLINE_THREAD_ENABLE_DISPATCH__ == 1) ) void _Thread_Enable_dispatch( void ) { 47dbc: 4e56 0000 linkw %fp,#0 if ( --_Thread_Dispatch_disable_level ) 47dc0: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 47dc6: 5380 subql #1,%d0 47dc8: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> 47dce: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 47dd4: 6704 beqs 47dda <_Thread_Enable_dispatch+0x1e> return; _Thread_Dispatch(); } 47dd6: 4e5e unlk %fp 47dd8: 4e75 rts 47dda: 4e5e unlk %fp (__RTEMS_DO_NOT_INLINE_THREAD_ENABLE_DISPATCH__ == 1) ) void _Thread_Enable_dispatch( void ) { if ( --_Thread_Dispatch_disable_level ) return; _Thread_Dispatch(); 47ddc: 4ef9 0004 7c64 jmp 47c64 <_Thread_Dispatch> ... =============================================================================== 0004dfd0 <_Thread_Evaluate_mode>: * * XXX */ bool _Thread_Evaluate_mode( void ) { 4dfd0: 4e56 0000 linkw %fp,#0 Thread_Control *executing; executing = _Thread_Executing; 4dfd4: 2079 0005 f032 moveal 5f032 <_Thread_Executing>,%a0 if ( !_States_Is_ready( executing->current_state ) || 4dfda: 4aa8 0010 tstl %a0@(16) 4dfde: 660e bnes 4dfee <_Thread_Evaluate_mode+0x1e> <== NEVER TAKEN 4dfe0: b1f9 0005 f006 cmpal 5f006 <_Thread_Heir>,%a0 4dfe6: 6712 beqs 4dffa <_Thread_Evaluate_mode+0x2a> ( !_Thread_Is_heir( executing ) && executing->is_preemptible ) ) { 4dfe8: 4a28 0075 tstb %a0@(117) 4dfec: 670c beqs 4dffa <_Thread_Evaluate_mode+0x2a> <== NEVER TAKEN _Context_Switch_necessary = true; return true; } return false; } 4dfee: 4e5e unlk %fp executing = _Thread_Executing; if ( !_States_Is_ready( executing->current_state ) || ( !_Thread_Is_heir( executing ) && executing->is_preemptible ) ) { _Context_Switch_necessary = true; 4dff0: 7001 moveq #1,%d0 4dff2: 13c0 0005 f042 moveb %d0,5f042 <_Context_Switch_necessary> return true; } return false; } 4dff8: 4e75 rts 4dffa: 4e5e unlk %fp executing = _Thread_Executing; if ( !_States_Is_ready( executing->current_state ) || ( !_Thread_Is_heir( executing ) && executing->is_preemptible ) ) { _Context_Switch_necessary = true; return true; 4dffc: 4200 clrb %d0 <== NOT EXECUTED } return false; } =============================================================================== 0004e000 <_Thread_Handler>: * * Output parameters: NONE */ void _Thread_Handler( void ) { 4e000: 4e56 0000 linkw %fp,#0 4e004: 2f0a movel %a2,%sp@- #if defined(EXECUTE_GLOBAL_CONSTRUCTORS) static char doneConstructors; char doneCons; #endif executing = _Thread_Executing; 4e006: 2479 0005 f032 moveal 5f032 <_Thread_Executing>,%a2 * * Output parameters: NONE */ void _Thread_Handler( void ) { 4e00c: 2f02 movel %d2,%sp@- /* * have to put level into a register for those cpu's that use * inline asm here */ level = executing->Start.isr_level; 4e00e: 222a 00b4 movel %a2@(180),%d1 _ISR_Set_level(level); 4e012: 40c0 movew %sr,%d0 4e014: e189 lsll #8,%d1 4e016: 0280 0000 f8ff andil #63743,%d0 4e01c: 8081 orl %d1,%d0 4e01e: 46c0 movew %d0,%sr #if defined(EXECUTE_GLOBAL_CONSTRUCTORS) doneCons = doneConstructors; doneConstructors = 1; 4e020: 7001 moveq #1,%d0 level = executing->Start.isr_level; _ISR_Set_level(level); #if defined(EXECUTE_GLOBAL_CONSTRUCTORS) doneCons = doneConstructors; 4e022: 1439 0005 e728 moveb 5e728 ,%d2 doneConstructors = 1; 4e028: 13c0 0005 e728 moveb %d0,5e728 #endif #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) #if ( CPU_USE_DEFERRED_FP_SWITCH == TRUE ) if ( (executing->fp_context != NULL) && 4e02e: 4aaa 0102 tstl %a2@(258) 4e032: 6720 beqs 4e054 <_Thread_Handler+0x54> #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) RTEMS_INLINE_ROUTINE bool _Thread_Is_allocated_fp ( const Thread_Control *the_thread ) { return ( the_thread == _Thread_Allocated_fp ); 4e034: 2079 0005 effe moveal 5effe <_Thread_Allocated_fp>,%a0 4e03a: b1ca cmpal %a2,%a0 4e03c: 6716 beqs 4e054 <_Thread_Handler+0x54> !_Thread_Is_allocated_fp( executing ) ) { if ( _Thread_Allocated_fp != NULL ) 4e03e: 4a88 tstl %a0 4e040: 670c beqs 4e04e <_Thread_Handler+0x4e> _Context_Save_fp( &_Thread_Allocated_fp->fp_context ); 4e042: 4868 0102 pea %a0@(258) 4e046: 4eb9 0004 93c6 jsr 493c6 <_CPU_Context_save_fp> 4e04c: 588f addql #4,%sp _Thread_Allocated_fp = executing; 4e04e: 23ca 0005 effe movel %a2,5effe <_Thread_Allocated_fp> /* * Take care that 'begin' extensions get to complete before * 'switch' extensions can run. This means must keep dispatch * disabled until all 'begin' extensions complete. */ _User_extensions_Thread_begin( executing ); 4e054: 2f0a movel %a2,%sp@- 4e056: 4eb9 0004 8d74 jsr 48d74 <_User_extensions_Thread_begin> /* * At this point, the dispatch disable level BETTER be 1. */ _Thread_Enable_dispatch(); 4e05c: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> /* * _init could be a weak symbol and we SHOULD test it but it isn't * in any configuration I know of and it generates a warning on every * RTEMS target configuration. --joel (12 May 2007) */ if (!doneCons) /* && (volatile void *)_init) */ { 4e062: 588f addql #4,%sp 4e064: 4a02 tstb %d2 4e066: 6724 beqs 4e08c <_Thread_Handler+0x8c> INIT_NAME (); } #endif if ( executing->Start.prototype == THREAD_START_NUMERIC ) { 4e068: 202a 009e movel %a2@(158),%d0 4e06c: 672a beqs 4e098 <_Thread_Handler+0x98> (*(Thread_Entry_numeric) executing->Start.entry_point)( executing->Start.numeric_argument ); } #if defined(RTEMS_POSIX_API) else if ( executing->Start.prototype == THREAD_START_POINTER ) { 4e06e: 7201 moveq #1,%d1 4e070: b280 cmpl %d0,%d1 4e072: 674c beqs 4e0c0 <_Thread_Handler+0xc0> <== ALWAYS TAKEN * was placed in return_argument. This assumed that if it returned * anything (which is not supporting in all APIs), then it would be * able to fit in a (void *). */ _User_extensions_Thread_exitted( executing ); 4e074: 2f0a movel %a2,%sp@- <== NOT EXECUTED 4e076: 4eb9 0004 8db2 jsr 48db2 <_User_extensions_Thread_exitted> <== NOT EXECUTED _Internal_error_Occurred( 4e07c: 4878 0006 pea 6 <== NOT EXECUTED 4e080: 4878 0001 pea 1 <== NOT EXECUTED 4e084: 42a7 clrl %sp@- <== NOT EXECUTED 4e086: 4eb9 0004 6fcc jsr 46fcc <_Internal_error_Occurred> <== NOT EXECUTED * _init could be a weak symbol and we SHOULD test it but it isn't * in any configuration I know of and it generates a warning on every * RTEMS target configuration. --joel (12 May 2007) */ if (!doneCons) /* && (volatile void *)_init) */ { INIT_NAME (); 4e08c: 4eb9 0005 bc38 jsr 5bc38 <_init> } #endif if ( executing->Start.prototype == THREAD_START_NUMERIC ) { 4e092: 202a 009e movel %a2@(158),%d0 4e096: 66d6 bnes 4e06e <_Thread_Handler+0x6e> executing->Wait.return_argument = (*(Thread_Entry_numeric) executing->Start.entry_point)( 4e098: 2f2a 00a6 movel %a2@(166),%sp@- 4e09c: 206a 009a moveal %a2@(154),%a0 4e0a0: 4e90 jsr %a0@ INIT_NAME (); } #endif if ( executing->Start.prototype == THREAD_START_NUMERIC ) { executing->Wait.return_argument = 4e0a2: 588f addql #4,%sp 4e0a4: 2540 0028 movel %d0,%a2@(40) * was placed in return_argument. This assumed that if it returned * anything (which is not supporting in all APIs), then it would be * able to fit in a (void *). */ _User_extensions_Thread_exitted( executing ); 4e0a8: 2f0a movel %a2,%sp@- 4e0aa: 4eb9 0004 8db2 jsr 48db2 <_User_extensions_Thread_exitted> _Internal_error_Occurred( 4e0b0: 4878 0006 pea 6 4e0b4: 4878 0001 pea 1 4e0b8: 42a7 clrl %sp@- 4e0ba: 4eb9 0004 6fcc jsr 46fcc <_Internal_error_Occurred> ); } #if defined(RTEMS_POSIX_API) else if ( executing->Start.prototype == THREAD_START_POINTER ) { executing->Wait.return_argument = (*(Thread_Entry_pointer) executing->Start.entry_point)( 4e0c0: 2f2a 00a2 movel %a2@(162),%sp@- 4e0c4: 206a 009a moveal %a2@(154),%a0 4e0c8: 4e90 jsr %a0@ executing->Start.numeric_argument ); } #if defined(RTEMS_POSIX_API) else if ( executing->Start.prototype == THREAD_START_POINTER ) { executing->Wait.return_argument = 4e0ca: 588f addql #4,%sp 4e0cc: 2540 0028 movel %d0,%a2@(40) * was placed in return_argument. This assumed that if it returned * anything (which is not supporting in all APIs), then it would be * able to fit in a (void *). */ _User_extensions_Thread_exitted( executing ); 4e0d0: 2f0a movel %a2,%sp@- 4e0d2: 4eb9 0004 8db2 jsr 48db2 <_User_extensions_Thread_exitted> _Internal_error_Occurred( 4e0d8: 4878 0006 pea 6 <== NOT EXECUTED 4e0dc: 4878 0001 pea 1 <== NOT EXECUTED 4e0e0: 42a7 clrl %sp@- <== NOT EXECUTED 4e0e2: 4eb9 0004 6fcc jsr 46fcc <_Internal_error_Occurred> <== NOT EXECUTED =============================================================================== 000480d8 <_Thread_Handler_initialization>: * * Output parameters: NONE */ void _Thread_Handler_initialization(void) { 480d8: 4e56 0000 linkw %fp,#0 #endif /* * BOTH stacks hooks must be set or both must be NULL. * Do not allow mixture. */ if ( !( (!Configuration.stack_allocate_hook) 480dc: 4ab9 0005 d7e8 tstl 5d7e8 480e2: 57c0 seq %d0 480e4: 4ab9 0005 d7e4 tstl 5d7e4 480ea: 57c1 seq %d1 480ec: 4480 negl %d0 480ee: 4481 negl %d1 480f0: b380 eorl %d1,%d0 uint32_t maximum_extensions; #if defined(RTEMS_MULTIPROCESSING) uint32_t maximum_proxies; #endif ticks_per_timeslice = Configuration.ticks_per_timeslice; 480f2: 2239 0005 d7d4 movel 5d7d4 ,%d1 maximum_extensions = Configuration.maximum_extensions; 480f8: 2079 0005 d7cc moveal 5d7cc ,%a0 * * Output parameters: NONE */ void _Thread_Handler_initialization(void) { 480fe: 2f02 movel %d2,%sp@- #endif /* * BOTH stacks hooks must be set or both must be NULL. * Do not allow mixture. */ if ( !( (!Configuration.stack_allocate_hook) 48100: 4a00 tstb %d0 48102: 6600 00a2 bnew 481a6 <_Thread_Handler_initialization+0xce> _Thread_Maximum_extensions = maximum_extensions; _Thread_Ticks_per_timeslice = ticks_per_timeslice; _Thread_Ready_chain = (Chain_Control *) _Workspace_Allocate_or_fatal_error( 48106: 4280 clrl %d0 48108: 1039 0005 d7c2 moveb 5d7c2 ,%d0 (PRIORITY_MAXIMUM + 1) * sizeof(Chain_Control) ); for ( index=0; index <= PRIORITY_MAXIMUM ; index++ ) 4810e: 4282 clrl %d2 _Thread_Maximum_extensions = maximum_extensions; _Thread_Ticks_per_timeslice = ticks_per_timeslice; _Thread_Ready_chain = (Chain_Control *) _Workspace_Allocate_or_fatal_error( 48110: 5280 addql #1,%d0 _Thread_Do_post_task_switch_extension = 0; _Thread_Maximum_extensions = maximum_extensions; _Thread_Ticks_per_timeslice = ticks_per_timeslice; 48112: 23c1 0005 ef28 movel %d1,5ef28 <_Thread_Ticks_per_timeslice> _Thread_Ready_chain = (Chain_Control *) _Workspace_Allocate_or_fatal_error( 48118: 2200 movel %d0,%d1 4811a: e588 lsll #2,%d0 4811c: e989 lsll #4,%d1 _Thread_Allocated_fp = NULL; #endif _Thread_Do_post_task_switch_extension = 0; _Thread_Maximum_extensions = maximum_extensions; 4811e: 23c8 0005 f016 movel %a0,5f016 <_Thread_Maximum_extensions> _Thread_Ticks_per_timeslice = ticks_per_timeslice; _Thread_Ready_chain = (Chain_Control *) _Workspace_Allocate_or_fatal_error( 48124: 9280 subl %d0,%d1 INTERNAL_ERROR_CORE, true, INTERNAL_ERROR_BAD_STACK_HOOK ); _Context_Switch_necessary = false; 48126: 4200 clrb %d0 _Thread_Maximum_extensions = maximum_extensions; _Thread_Ticks_per_timeslice = ticks_per_timeslice; _Thread_Ready_chain = (Chain_Control *) _Workspace_Allocate_or_fatal_error( 48128: 2f01 movel %d1,%sp@- INTERNAL_ERROR_CORE, true, INTERNAL_ERROR_BAD_STACK_HOOK ); _Context_Switch_necessary = false; 4812a: 13c0 0005 f042 moveb %d0,5f042 <_Context_Switch_necessary> _Thread_Executing = NULL; 48130: 42b9 0005 f032 clrl 5f032 <_Thread_Executing> _Thread_Heir = NULL; 48136: 42b9 0005 f006 clrl 5f006 <_Thread_Heir> #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) _Thread_Allocated_fp = NULL; 4813c: 42b9 0005 effe clrl 5effe <_Thread_Allocated_fp> #endif _Thread_Do_post_task_switch_extension = 0; 48142: 42b9 0005 f01a clrl 5f01a <_Thread_Do_post_task_switch_extension> _Thread_Maximum_extensions = maximum_extensions; _Thread_Ticks_per_timeslice = ticks_per_timeslice; _Thread_Ready_chain = (Chain_Control *) _Workspace_Allocate_or_fatal_error( 48148: 4eb9 0004 91c0 jsr 491c0 <_Workspace_Allocate_or_fatal_error> (PRIORITY_MAXIMUM + 1) * sizeof(Chain_Control) ); for ( index=0; index <= PRIORITY_MAXIMUM ; index++ ) 4814e: 588f addql #4,%sp 48150: 1439 0005 d7c2 moveb 5d7c2 ,%d2 48156: 2040 moveal %d0,%a0 48158: 4281 clrl %d1 _Thread_Maximum_extensions = maximum_extensions; _Thread_Ticks_per_timeslice = ticks_per_timeslice; _Thread_Ready_chain = (Chain_Control *) _Workspace_Allocate_or_fatal_error( 4815a: 23c0 0005 ef24 movel %d0,5ef24 <_Thread_Ready_chain> */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 48160: 2008 movel %a0,%d0 48162: 5880 addql #4,%d0 (PRIORITY_MAXIMUM + 1) * sizeof(Chain_Control) ); for ( index=0; index <= PRIORITY_MAXIMUM ; index++ ) 48164: 5281 addql #1,%d1 48166: 2080 movel %d0,%a0@ the_chain->permanent_null = NULL; 48168: 42a8 0004 clrl %a0@(4) the_chain->last = _Chain_Head(the_chain); 4816c: 2148 0008 movel %a0,%a0@(8) 48170: 41e8 000c lea %a0@(12),%a0 48174: b481 cmpl %d1,%d2 48176: 64e8 bccs 48160 <_Thread_Handler_initialization+0x88> /* * Initialize this class of objects. */ _Objects_Initialize_information( 48178: 4878 0008 pea 8 4817c: 42a7 clrl %sp@- 4817e: 4878 011e pea 11e 48182: 4878 0001 pea 1 48186: 4878 0001 pea 1 4818a: 4878 0001 pea 1 4818e: 4879 0005 f0c6 pea 5f0c6 <_Thread_Internal_information> 48194: 4eb9 0004 7598 jsr 47598 <_Objects_Initialize_information> false, /* true if this is a global object class */ NULL /* Proxy extraction support callout */ #endif ); } 4819a: 242e fffc movel %fp@(-4),%d2 /* * Initialize this class of objects. */ _Objects_Initialize_information( 4819e: 4fef 001c lea %sp@(28),%sp false, /* true if this is a global object class */ NULL /* Proxy extraction support callout */ #endif ); } 481a2: 4e5e unlk %fp 481a4: 4e75 rts * BOTH stacks hooks must be set or both must be NULL. * Do not allow mixture. */ if ( !( (!Configuration.stack_allocate_hook) == (!Configuration.stack_free_hook) ) ) _Internal_error_Occurred( 481a6: 4878 000f pea f 481aa: 4878 0001 pea 1 481ae: 42a7 clrl %sp@- 481b0: 4eb9 0004 6fcc jsr 46fcc <_Internal_error_Occurred> ... =============================================================================== 00047e80 <_Thread_Initialize>: Thread_CPU_budget_algorithms budget_algorithm, Thread_CPU_budget_algorithm_callout budget_callout, uint32_t isr_level, Objects_Name name ) { 47e80: 4e56 ffe8 linkw %fp,#-24 47e84: 202e 0010 movel %fp@(16),%d0 47e88: 48d7 047c moveml %d2-%d6/%a2,%sp@ 47e8c: 246e 000c moveal %fp@(12),%a2 47e90: 282e 0014 movel %fp@(20),%d4 47e94: 242e 001c movel %fp@(28),%d2 47e98: 262e 0024 movel %fp@(36),%d3 /* * Zero out all the allocated memory fields */ for ( i=0 ; i <= THREAD_API_LAST ; i++ ) the_thread->API_Extensions[i] = NULL; 47e9c: 42aa 010a clrl %a2@(266) Thread_CPU_budget_algorithms budget_algorithm, Thread_CPU_budget_algorithm_callout budget_callout, uint32_t isr_level, Objects_Name name ) { 47ea0: 1a2e 001b moveb %fp@(27),%d5 /* * Zero out all the allocated memory fields */ for ( i=0 ; i <= THREAD_API_LAST ; i++ ) the_thread->API_Extensions[i] = NULL; 47ea4: 42aa 010e clrl %a2@(270) Thread_CPU_budget_algorithms budget_algorithm, Thread_CPU_budget_algorithm_callout budget_callout, uint32_t isr_level, Objects_Name name ) { 47ea8: 1c2e 0023 moveb %fp@(35),%d6 /* * Zero out all the allocated memory fields */ for ( i=0 ; i <= THREAD_API_LAST ; i++ ) the_thread->API_Extensions[i] = NULL; 47eac: 42aa 0112 clrl %a2@(274) extensions_area = NULL; the_thread->libc_reent = NULL; 47eb0: 42aa 0106 clrl %a2@(262) if ( !actual_stack_size || actual_stack_size < stack_size ) return false; /* stack allocation failed */ stack = the_thread->Start.stack; #else if ( !stack_area ) { 47eb4: 4a80 tstl %d0 47eb6: 6700 01f0 beqw 480a8 <_Thread_Initialize+0x228> stack = the_thread->Start.stack; the_thread->Start.core_allocated_stack = true; } else { stack = stack_area; actual_stack_size = stack_size; the_thread->Start.core_allocated_stack = false; 47eba: 2204 movel %d4,%d1 47ebc: 4204 clrb %d4 47ebe: 1544 00bc moveb %d4,%a2@(188) Stack_Control *the_stack, void *starting_address, size_t size ) { the_stack->area = starting_address; 47ec2: 2540 00c2 movel %d0,%a2@(194) the_stack->size = size; 47ec6: 2541 00be movel %d1,%a2@(190) /* * Allocate the floating point area for this thread */ #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) if ( is_fp ) { 47eca: 4a05 tstb %d5 47ecc: 6600 017e bnew 4804c <_Thread_Initialize+0x1cc> 47ed0: 4280 clrl %d0 47ed2: 4285 clrl %d5 #endif /* * Allocate the extensions area for this thread */ if ( _Thread_Maximum_extensions ) { 47ed4: 2239 0005 f016 movel 5f016 <_Thread_Maximum_extensions>,%d1 if ( !fp_area ) goto failed; fp_area = _Context_Fp_start( fp_area, 0 ); } the_thread->fp_context = fp_area; the_thread->Start.fp_context = fp_area; 47eda: 2540 00c6 movel %d0,%a2@(198) fp_area = _Workspace_Allocate( CONTEXT_FP_SIZE ); if ( !fp_area ) goto failed; fp_area = _Context_Fp_start( fp_area, 0 ); } the_thread->fp_context = fp_area; 47ede: 2540 0102 movel %d0,%a2@(258) Watchdog_Service_routine_entry routine, Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; 47ee2: 42aa 0050 clrl %a2@(80) the_watchdog->routine = routine; 47ee6: 42aa 0064 clrl %a2@(100) the_watchdog->id = id; 47eea: 42aa 0068 clrl %a2@(104) the_watchdog->user_data = user_data; 47eee: 42aa 006c clrl %a2@(108) #endif /* * Allocate the extensions area for this thread */ if ( _Thread_Maximum_extensions ) { 47ef2: 4a81 tstl %d1 47ef4: 6600 0178 bnew 4806e <_Thread_Initialize+0x1ee> (_Thread_Maximum_extensions + 1) * sizeof( void * ) ); if ( !extensions_area ) goto failed; } the_thread->extensions = (void **) extensions_area; 47ef8: 42aa 0116 clrl %a2@(278) 47efc: 4284 clrl %d4 /* * General initialization */ the_thread->Start.is_preemptible = is_preemptible; the_thread->Start.budget_algorithm = budget_algorithm; 47efe: 2543 00ac movel %d3,%a2@(172) the_thread->Start.budget_callout = budget_callout; switch ( budget_algorithm ) { 47f02: 7002 moveq #2,%d0 * General initialization */ the_thread->Start.is_preemptible = is_preemptible; the_thread->Start.budget_algorithm = budget_algorithm; the_thread->Start.budget_callout = budget_callout; 47f04: 256e 0028 00b0 movel %fp@(40),%a2@(176) /* * General initialization */ the_thread->Start.is_preemptible = is_preemptible; 47f0a: 1546 00aa moveb %d6,%a2@(170) the_thread->Start.budget_algorithm = budget_algorithm; the_thread->Start.budget_callout = budget_callout; switch ( budget_algorithm ) { 47f0e: b083 cmpl %d3,%d0 47f10: 6700 00d6 beqw 47fe8 <_Thread_Initialize+0x168> #if defined(RTEMS_ITRON_API) the_thread->suspend_count = 0; #endif the_thread->real_priority = priority; the_thread->Start.initial_priority = priority; _Thread_Set_priority( the_thread, priority ); 47f14: 2f02 movel %d2,%sp@- case THREAD_CPU_BUDGET_ALGORITHM_CALLOUT: break; #endif } the_thread->Start.isr_level = isr_level; 47f16: 256e 002c 00b4 movel %fp@(44),%a2@(180) the_thread->current_state = STATES_DORMANT; 47f1c: 7001 moveq #1,%d0 #if defined(RTEMS_ITRON_API) the_thread->suspend_count = 0; #endif the_thread->real_priority = priority; the_thread->Start.initial_priority = priority; _Thread_Set_priority( the_thread, priority ); 47f1e: 2f0a movel %a2,%sp@- #endif } the_thread->Start.isr_level = isr_level; the_thread->current_state = STATES_DORMANT; 47f20: 2540 0010 movel %d0,%a2@(16) the_thread->Wait.queue = NULL; 47f24: 42aa 0044 clrl %a2@(68) the_thread->resource_count = 0; 47f28: 42aa 001c clrl %a2@(28) #if defined(RTEMS_ITRON_API) the_thread->suspend_count = 0; #endif the_thread->real_priority = priority; 47f2c: 2542 0018 movel %d2,%a2@(24) the_thread->Start.initial_priority = priority; 47f30: 2542 00b8 movel %d2,%a2@(184) _Thread_Set_priority( the_thread, priority ); 47f34: 4eb9 0004 86b0 jsr 486b0 <_Thread_Set_priority> #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 47f3a: 206e 0008 moveal %fp@(8),%a0 47f3e: 4280 clrl %d0 information, _Objects_Get_index( the_object->id ), the_object ); the_object->name = name; 47f40: 256e 0030 000c movel %fp@(48),%a2@(12) #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 47f46: 2068 0018 moveal %a0@(24),%a0 47f4a: 302a 000a movew %a2@(10),%d0 /* * Initialize the CPU usage statistics */ #ifndef __RTEMS_USE_TICKS_FOR_STATISTICS__ _Timestamp_Set_to_zero( &the_thread->cpu_time_used ); 47f4e: 42aa 0082 clrl %a2@(130) 47f52: 218a 0c00 movel %a2,%a0@(00000000,%d0:l:4) 47f56: 42aa 0086 clrl %a2@(134) * enabled when we get here. We want to be able to run the * user extensions with dispatching enabled. The Allocator * Mutex provides sufficient protection to let the user extensions * run safely. */ extension_status = _User_extensions_Thread_create( the_thread ); 47f5a: 2f0a movel %a2,%sp@- 47f5c: 4eb9 0004 8e44 jsr 48e44 <_User_extensions_Thread_create> if ( extension_status ) 47f62: 4fef 000c lea %sp@(12),%sp 47f66: 4a00 tstb %d0 47f68: 6672 bnes 47fdc <_Thread_Initialize+0x15c> return true; failed: if ( the_thread->libc_reent ) 47f6a: 202a 0106 movel %a2@(262),%d0 47f6e: 670a beqs 47f7a <_Thread_Initialize+0xfa> _Workspace_Free( the_thread->libc_reent ); 47f70: 2f00 movel %d0,%sp@- 47f72: 4eb9 0004 9210 jsr 49210 <_Workspace_Free> 47f78: 588f addql #4,%sp for ( i=0 ; i <= THREAD_API_LAST ; i++ ) if ( the_thread->API_Extensions[i] ) 47f7a: 202a 010a movel %a2@(266),%d0 47f7e: 670a beqs 47f8a <_Thread_Initialize+0x10a> _Workspace_Free( the_thread->API_Extensions[i] ); 47f80: 2f00 movel %d0,%sp@- 47f82: 4eb9 0004 9210 jsr 49210 <_Workspace_Free> 47f88: 588f addql #4,%sp failed: if ( the_thread->libc_reent ) _Workspace_Free( the_thread->libc_reent ); for ( i=0 ; i <= THREAD_API_LAST ; i++ ) if ( the_thread->API_Extensions[i] ) 47f8a: 202a 010e movel %a2@(270),%d0 47f8e: 670a beqs 47f9a <_Thread_Initialize+0x11a> _Workspace_Free( the_thread->API_Extensions[i] ); 47f90: 2f00 movel %d0,%sp@- 47f92: 4eb9 0004 9210 jsr 49210 <_Workspace_Free> 47f98: 588f addql #4,%sp failed: if ( the_thread->libc_reent ) _Workspace_Free( the_thread->libc_reent ); for ( i=0 ; i <= THREAD_API_LAST ; i++ ) if ( the_thread->API_Extensions[i] ) 47f9a: 202a 0112 movel %a2@(274),%d0 47f9e: 670a beqs 47faa <_Thread_Initialize+0x12a> <== ALWAYS TAKEN _Workspace_Free( the_thread->API_Extensions[i] ); 47fa0: 2f00 movel %d0,%sp@- <== NOT EXECUTED 47fa2: 4eb9 0004 9210 jsr 49210 <_Workspace_Free> <== NOT EXECUTED 47fa8: 588f addql #4,%sp <== NOT EXECUTED if ( extensions_area ) 47faa: 4a84 tstl %d4 47fac: 670a beqs 47fb8 <_Thread_Initialize+0x138> (void) _Workspace_Free( extensions_area ); 47fae: 2f04 movel %d4,%sp@- 47fb0: 4eb9 0004 9210 jsr 49210 <_Workspace_Free> 47fb6: 588f addql #4,%sp #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) if ( fp_area ) 47fb8: 4a85 tstl %d5 47fba: 670a beqs 47fc6 <_Thread_Initialize+0x146> (void) _Workspace_Free( fp_area ); 47fbc: 2f05 movel %d5,%sp@- 47fbe: 4eb9 0004 9210 jsr 49210 <_Workspace_Free> 47fc4: 588f addql #4,%sp #endif _Thread_Stack_Free( the_thread ); 47fc6: 2f0a movel %a2,%sp@- 47fc8: 4eb9 0004 891c jsr 4891c <_Thread_Stack_Free> return false; 47fce: 588f addql #4,%sp } 47fd0: 4cee 047c ffe8 moveml %fp@(-24),%d2-%d6/%a2 #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) if ( fp_area ) (void) _Workspace_Free( fp_area ); #endif _Thread_Stack_Free( the_thread ); 47fd6: 4200 clrb %d0 return false; } 47fd8: 4e5e unlk %fp 47fda: 4e75 rts 47fdc: 4cee 047c ffe8 moveml %fp@(-24),%d2-%d6/%a2 * user extensions with dispatching enabled. The Allocator * Mutex provides sufficient protection to let the user extensions * run safely. */ extension_status = _User_extensions_Thread_create( the_thread ); if ( extension_status ) 47fe2: 7001 moveq #1,%d0 _Thread_Stack_Free( the_thread ); return false; } 47fe4: 4e5e unlk %fp 47fe6: 4e75 rts case THREAD_CPU_BUDGET_ALGORITHM_NONE: case THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE: break; #if defined(RTEMS_SCORE_THREAD_ENABLE_EXHAUST_TIMESLICE) case THREAD_CPU_BUDGET_ALGORITHM_EXHAUST_TIMESLICE: the_thread->cpu_time_budget = _Thread_Ticks_per_timeslice; 47fe8: 41f9 0005 ef28 lea 5ef28 <_Thread_Ticks_per_timeslice>,%a0 #endif } the_thread->Start.isr_level = isr_level; the_thread->current_state = STATES_DORMANT; 47fee: 7001 moveq #1,%d0 case THREAD_CPU_BUDGET_ALGORITHM_NONE: case THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE: break; #if defined(RTEMS_SCORE_THREAD_ENABLE_EXHAUST_TIMESLICE) case THREAD_CPU_BUDGET_ALGORITHM_EXHAUST_TIMESLICE: the_thread->cpu_time_budget = _Thread_Ticks_per_timeslice; 47ff0: 2550 0076 movel %a0@,%a2@(118) #if defined(RTEMS_ITRON_API) the_thread->suspend_count = 0; #endif the_thread->real_priority = priority; the_thread->Start.initial_priority = priority; _Thread_Set_priority( the_thread, priority ); 47ff4: 2f02 movel %d2,%sp@- case THREAD_CPU_BUDGET_ALGORITHM_CALLOUT: break; #endif } the_thread->Start.isr_level = isr_level; 47ff6: 256e 002c 00b4 movel %fp@(44),%a2@(180) #if defined(RTEMS_ITRON_API) the_thread->suspend_count = 0; #endif the_thread->real_priority = priority; the_thread->Start.initial_priority = priority; _Thread_Set_priority( the_thread, priority ); 47ffc: 2f0a movel %a2,%sp@- #endif } the_thread->Start.isr_level = isr_level; the_thread->current_state = STATES_DORMANT; 47ffe: 2540 0010 movel %d0,%a2@(16) the_thread->Wait.queue = NULL; 48002: 42aa 0044 clrl %a2@(68) the_thread->resource_count = 0; 48006: 42aa 001c clrl %a2@(28) #if defined(RTEMS_ITRON_API) the_thread->suspend_count = 0; #endif the_thread->real_priority = priority; 4800a: 2542 0018 movel %d2,%a2@(24) the_thread->Start.initial_priority = priority; 4800e: 2542 00b8 movel %d2,%a2@(184) _Thread_Set_priority( the_thread, priority ); 48012: 4eb9 0004 86b0 jsr 486b0 <_Thread_Set_priority> 48018: 206e 0008 moveal %fp@(8),%a0 4801c: 4280 clrl %d0 information, _Objects_Get_index( the_object->id ), the_object ); the_object->name = name; 4801e: 256e 0030 000c movel %fp@(48),%a2@(12) #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 48024: 2068 0018 moveal %a0@(24),%a0 48028: 302a 000a movew %a2@(10),%d0 /* * Initialize the CPU usage statistics */ #ifndef __RTEMS_USE_TICKS_FOR_STATISTICS__ _Timestamp_Set_to_zero( &the_thread->cpu_time_used ); 4802c: 42aa 0082 clrl %a2@(130) 48030: 218a 0c00 movel %a2,%a0@(00000000,%d0:l:4) 48034: 42aa 0086 clrl %a2@(134) * enabled when we get here. We want to be able to run the * user extensions with dispatching enabled. The Allocator * Mutex provides sufficient protection to let the user extensions * run safely. */ extension_status = _User_extensions_Thread_create( the_thread ); 48038: 2f0a movel %a2,%sp@- 4803a: 4eb9 0004 8e44 jsr 48e44 <_User_extensions_Thread_create> if ( extension_status ) 48040: 4fef 000c lea %sp@(12),%sp 48044: 4a00 tstb %d0 48046: 6700 ff22 beqw 47f6a <_Thread_Initialize+0xea> 4804a: 6090 bras 47fdc <_Thread_Initialize+0x15c> /* * Allocate the floating point area for this thread */ #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) if ( is_fp ) { fp_area = _Workspace_Allocate( CONTEXT_FP_SIZE ); 4804c: 4878 001c pea 1c 48050: 4eb9 0004 91f4 jsr 491f4 <_Workspace_Allocate> if ( !fp_area ) 48056: 588f addql #4,%sp /* * Allocate the floating point area for this thread */ #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) if ( is_fp ) { fp_area = _Workspace_Allocate( CONTEXT_FP_SIZE ); 48058: 2a00 movel %d0,%d5 if ( !fp_area ) 4805a: 6600 fe78 bnew 47ed4 <_Thread_Initialize+0x54> extension_status = _User_extensions_Thread_create( the_thread ); if ( extension_status ) return true; failed: if ( the_thread->libc_reent ) 4805e: 202a 0106 movel %a2@(262),%d0 * Allocate the floating point area for this thread */ #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) if ( is_fp ) { fp_area = _Workspace_Allocate( CONTEXT_FP_SIZE ); if ( !fp_area ) 48062: 4284 clrl %d4 extension_status = _User_extensions_Thread_create( the_thread ); if ( extension_status ) return true; failed: if ( the_thread->libc_reent ) 48064: 4a80 tstl %d0 48066: 6600 ff08 bnew 47f70 <_Thread_Initialize+0xf0> 4806a: 6000 ff0e braw 47f7a <_Thread_Initialize+0xfa> /* * Allocate the extensions area for this thread */ if ( _Thread_Maximum_extensions ) { extensions_area = _Workspace_Allocate( 4806e: e589 lsll #2,%d1 48070: 2041 moveal %d1,%a0 48072: 4868 0004 pea %a0@(4) 48076: 4eb9 0004 91f4 jsr 491f4 <_Workspace_Allocate> (_Thread_Maximum_extensions + 1) * sizeof( void * ) ); if ( !extensions_area ) 4807c: 588f addql #4,%sp /* * Allocate the extensions area for this thread */ if ( _Thread_Maximum_extensions ) { extensions_area = _Workspace_Allocate( 4807e: 2800 movel %d0,%d4 (_Thread_Maximum_extensions + 1) * sizeof( void * ) ); if ( !extensions_area ) 48080: 6700 fee8 beqw 47f6a <_Thread_Initialize+0xea> goto failed; } the_thread->extensions = (void **) extensions_area; 48084: 2040 moveal %d0,%a0 * create the extension long after tasks have been created * so they cannot rely on the thread create user extension * call. */ if ( the_thread->extensions ) { for ( i = 0; i <= _Thread_Maximum_extensions ; i++ ) 48086: 4281 clrl %d1 48088: 4280 clrl %d0 4808a: 2279 0005 f016 moveal 5f016 <_Thread_Maximum_extensions>,%a1 (_Thread_Maximum_extensions + 1) * sizeof( void * ) ); if ( !extensions_area ) goto failed; } the_thread->extensions = (void **) extensions_area; 48090: 2544 0116 movel %d4,%a2@(278) * so they cannot rely on the thread create user extension * call. */ if ( the_thread->extensions ) { for ( i = 0; i <= _Thread_Maximum_extensions ; i++ ) the_thread->extensions[i] = NULL; 48094: 42b0 1c00 clrl %a0@(00000000,%d1:l:4) * create the extension long after tasks have been created * so they cannot rely on the thread create user extension * call. */ if ( the_thread->extensions ) { for ( i = 0; i <= _Thread_Maximum_extensions ; i++ ) 48098: 5280 addql #1,%d0 4809a: 2200 movel %d0,%d1 4809c: b089 cmpl %a1,%d0 4809e: 6200 fe5e bhiw 47efe <_Thread_Initialize+0x7e> 480a2: 206a 0116 moveal %a2@(278),%a0 480a6: 60ec bras 48094 <_Thread_Initialize+0x214> return false; /* stack allocation failed */ stack = the_thread->Start.stack; #else if ( !stack_area ) { actual_stack_size = _Thread_Stack_Allocate( the_thread, stack_size ); 480a8: 2f04 movel %d4,%sp@- 480aa: 2f0a movel %a2,%sp@- 480ac: 4eb9 0004 88b8 jsr 488b8 <_Thread_Stack_Allocate> if ( !actual_stack_size || actual_stack_size < stack_size ) 480b2: 508f addql #8,%sp return false; /* stack allocation failed */ stack = the_thread->Start.stack; #else if ( !stack_area ) { actual_stack_size = _Thread_Stack_Allocate( the_thread, stack_size ); 480b4: 2200 movel %d0,%d1 if ( !actual_stack_size || actual_stack_size < stack_size ) 480b6: 6712 beqs 480ca <_Thread_Initialize+0x24a> 480b8: b084 cmpl %d4,%d0 480ba: 650e bcss 480ca <_Thread_Initialize+0x24a> <== NEVER TAKEN return false; /* stack allocation failed */ stack = the_thread->Start.stack; 480bc: 202a 00ca movel %a2@(202),%d0 the_thread->Start.core_allocated_stack = true; 480c0: 7801 moveq #1,%d4 480c2: 1544 00bc moveb %d4,%a2@(188) 480c6: 6000 fdfa braw 47ec2 <_Thread_Initialize+0x42> _Thread_Stack_Free( the_thread ); return false; } 480ca: 4cee 047c ffe8 moveml %fp@(-24),%d2-%d6/%a2 if ( fp_area ) (void) _Workspace_Free( fp_area ); #endif _Thread_Stack_Free( the_thread ); return false; 480d0: 4200 clrb %d0 } 480d2: 4e5e unlk %fp ... =============================================================================== 0004d100 <_Thread_Reset>: void _Thread_Reset( Thread_Control *the_thread, void *pointer_argument, Thread_Entry_numeric_type numeric_argument ) { 4d100: 4e56 0000 linkw %fp,#0 4d104: 2f0a movel %a2,%sp@- 4d106: 246e 0008 moveal %fp@(8),%a2 the_thread->is_preemptible = the_thread->Start.is_preemptible; the_thread->budget_algorithm = the_thread->Start.budget_algorithm; the_thread->budget_callout = the_thread->Start.budget_callout; the_thread->Start.pointer_argument = pointer_argument; the_thread->Start.numeric_argument = numeric_argument; 4d10a: 256e 0010 00a6 movel %fp@(16),%a2@(166) the_thread->resource_count = 0; #if defined(RTEMS_ITRON_API) the_thread->suspend_count = 0; #endif the_thread->is_preemptible = the_thread->Start.is_preemptible; the_thread->budget_algorithm = the_thread->Start.budget_algorithm; 4d110: 256a 00ac 007a movel %a2@(172),%a2@(122) the_thread->budget_callout = the_thread->Start.budget_callout; 4d116: 256a 00b0 007e movel %a2@(176),%a2@(126) the_thread->Start.pointer_argument = pointer_argument; 4d11c: 256e 000c 00a2 movel %fp@(12),%a2@(162) { the_thread->resource_count = 0; #if defined(RTEMS_ITRON_API) the_thread->suspend_count = 0; #endif the_thread->is_preemptible = the_thread->Start.is_preemptible; 4d122: 156a 00aa 0075 moveb %a2@(170),%a2@(117) Thread_Control *the_thread, void *pointer_argument, Thread_Entry_numeric_type numeric_argument ) { the_thread->resource_count = 0; 4d128: 42aa 001c clrl %a2@(28) the_thread->budget_callout = the_thread->Start.budget_callout; the_thread->Start.pointer_argument = pointer_argument; the_thread->Start.numeric_argument = numeric_argument; if ( !_Thread_queue_Extract_with_proxy( the_thread ) ) { 4d12c: 2f0a movel %a2,%sp@- 4d12e: 4eb9 0004 9140 jsr 49140 <_Thread_queue_Extract_with_proxy> 4d134: 588f addql #4,%sp 4d136: 4a00 tstb %d0 4d138: 6608 bnes 4d142 <_Thread_Reset+0x42> if ( _Watchdog_Is_active( &the_thread->Timer ) ) 4d13a: 7002 moveq #2,%d0 4d13c: b0aa 0050 cmpl %a2@(80),%d0 4d140: 672a beqs 4d16c <_Thread_Reset+0x6c> (void) _Watchdog_Remove( &the_thread->Timer ); } if ( the_thread->current_priority != the_thread->Start.initial_priority ) { 4d142: 202a 00b8 movel %a2@(184),%d0 4d146: b0aa 0014 cmpl %a2@(20),%d0 4d14a: 6718 beqs 4d164 <_Thread_Reset+0x64> the_thread->real_priority = the_thread->Start.initial_priority; _Thread_Set_priority( the_thread, the_thread->Start.initial_priority ); 4d14c: 2d4a 0008 movel %a2,%fp@(8) 4d150: 2d40 000c movel %d0,%fp@(12) if ( _Watchdog_Is_active( &the_thread->Timer ) ) (void) _Watchdog_Remove( &the_thread->Timer ); } if ( the_thread->current_priority != the_thread->Start.initial_priority ) { the_thread->real_priority = the_thread->Start.initial_priority; 4d154: 2540 0018 movel %d0,%a2@(24) _Thread_Set_priority( the_thread, the_thread->Start.initial_priority ); } } 4d158: 246e fffc moveal %fp@(-4),%a2 4d15c: 4e5e unlk %fp (void) _Watchdog_Remove( &the_thread->Timer ); } if ( the_thread->current_priority != the_thread->Start.initial_priority ) { the_thread->real_priority = the_thread->Start.initial_priority; _Thread_Set_priority( the_thread, the_thread->Start.initial_priority ); 4d15e: 4ef9 0004 9350 jmp 49350 <_Thread_Set_priority> } } 4d164: 246e fffc moveal %fp@(-4),%a2 4d168: 4e5e unlk %fp 4d16a: 4e75 rts the_thread->Start.numeric_argument = numeric_argument; if ( !_Thread_queue_Extract_with_proxy( the_thread ) ) { if ( _Watchdog_Is_active( &the_thread->Timer ) ) (void) _Watchdog_Remove( &the_thread->Timer ); 4d16c: 486a 0048 pea %a2@(72) 4d170: 4eb9 0004 9d88 jsr 49d88 <_Watchdog_Remove> 4d176: 588f addql #4,%sp 4d178: 60c8 bras 4d142 <_Thread_Reset+0x42> ... =============================================================================== 000492c4 <_Thread_Restart>: Thread_Control *the_thread, void *pointer_argument, Thread_Entry_numeric_type numeric_argument ) { if ( !_States_Is_dormant( the_thread->current_state ) ) { 492c4: 7001 moveq #1,%d0 bool _Thread_Restart( Thread_Control *the_thread, void *pointer_argument, Thread_Entry_numeric_type numeric_argument ) { 492c6: 4e56 0000 linkw %fp,#0 492ca: 2f0a movel %a2,%sp@- 492cc: 246e 0008 moveal %fp@(8),%a2 if ( !_States_Is_dormant( the_thread->current_state ) ) { 492d0: c0aa 0010 andl %a2@(16),%d0 492d4: 4a00 tstb %d0 492d6: 670a beqs 492e2 <_Thread_Restart+0x1e> return true; } return false; } 492d8: 246e fffc moveal %fp@(-4),%a2 492dc: 4e5e unlk %fp Thread_Control *the_thread, void *pointer_argument, Thread_Entry_numeric_type numeric_argument ) { if ( !_States_Is_dormant( the_thread->current_state ) ) { 492de: 4200 clrb %d0 return true; } return false; } 492e0: 4e75 rts Thread_Entry_numeric_type numeric_argument ) { if ( !_States_Is_dormant( the_thread->current_state ) ) { _Thread_Set_transient( the_thread ); 492e2: 2f0a movel %a2,%sp@- 492e4: 4eb9 0004 94d4 jsr 494d4 <_Thread_Set_transient> _Thread_Reset( the_thread, pointer_argument, numeric_argument ); 492ea: 2f2e 0010 movel %fp@(16),%sp@- 492ee: 2f2e 000c movel %fp@(12),%sp@- 492f2: 2f0a movel %a2,%sp@- 492f4: 4eb9 0004 d100 jsr 4d100 <_Thread_Reset> _Thread_Load_environment( the_thread ); 492fa: 2f0a movel %a2,%sp@- 492fc: 4eb9 0004 cd54 jsr 4cd54 <_Thread_Load_environment> _Thread_Ready( the_thread ); 49302: 2f0a movel %a2,%sp@- 49304: 4eb9 0004 d040 jsr 4d040 <_Thread_Ready> _User_extensions_Thread_restart( the_thread ); 4930a: 2f0a movel %a2,%sp@- 4930c: 4eb9 0004 9b78 jsr 49b78 <_User_extensions_Thread_restart> if ( _Thread_Is_executing ( the_thread ) ) 49312: 4fef 001c lea %sp@(28),%sp 49316: b5f9 0005 ffca cmpal 5ffca <_Thread_Executing>,%a2 4931c: 670a beqs 49328 <_Thread_Restart+0x64> #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) if ( _Thread_Executing->fp_context != NULL ) _Context_Restore_fp( &_Thread_Executing->fp_context ); #endif _CPU_Context_Restart_self( &_Thread_Executing->Registers ); 4931e: 7001 moveq #1,%d0 return true; } return false; } 49320: 246e fffc moveal %fp@(-4),%a2 49324: 4e5e unlk %fp 49326: 4e75 rts */ RTEMS_INLINE_ROUTINE void _Thread_Restart_self( void ) { #if ( CPU_HARDWARE_FP == TRUE ) || ( CPU_SOFTWARE_FP == TRUE ) if ( _Thread_Executing->fp_context != NULL ) 49328: 4aaa 0102 tstl %a2@(258) 4932c: 6712 beqs 49340 <_Thread_Restart+0x7c> _Context_Restore_fp( &_Thread_Executing->fp_context ); 4932e: 486a 0102 pea %a2@(258) 49332: 4eb9 0004 a0e2 jsr 4a0e2 <_CPU_Context_restore_fp> 49338: 2479 0005 ffca moveal 5ffca <_Thread_Executing>,%a2 4933e: 588f addql #4,%sp #endif _CPU_Context_Restart_self( &_Thread_Executing->Registers ); 49340: 486a 00ce pea %a2@(206) 49344: 4eb9 0004 9f8a jsr 49f8a <_CPU_Context_Restart_self> 4934a: 588f addql #4,%sp <== NOT EXECUTED 4934c: 7001 moveq #1,%d0 <== NOT EXECUTED 4934e: 60d0 bras 49320 <_Thread_Restart+0x5c> <== NOT EXECUTED =============================================================================== 0004c84c <_Thread_Resume>: { ISR_Level level; States_Control current_state; _ISR_Disable( level ); 4c84c: 327c 0700 moveaw #1792,%a1 4c850: 2009 movel %a1,%d0 void _Thread_Resume( Thread_Control *the_thread, bool force ) { 4c852: 4e56 ffec linkw %fp,#-20 4c856: 206e 0008 moveal %fp@(8),%a0 4c85a: 48d7 1c0c moveml %d2-%d3/%a2-%a4,%sp@ ISR_Level level; States_Control current_state; _ISR_Disable( level ); 4c85e: 40c1 movew %sr,%d1 4c860: 8081 orl %d1,%d0 4c862: 46c0 movew %d0,%sr _ISR_Enable( level ); return; } #endif current_state = the_thread->current_state; 4c864: 2028 0010 movel %a0@(16),%d0 if ( current_state & STATES_SUSPENDED ) { 4c868: 0800 0001 btst #1,%d0 4c86c: 6774 beqs 4c8e2 <_Thread_Resume+0x96> <== NEVER TAKEN 4c86e: 74fd moveq #-3,%d2 4c870: c082 andl %d2,%d0 current_state = 4c872: 2140 0010 movel %d0,%a0@(16) the_thread->current_state = _States_Clear(STATES_SUSPENDED, current_state); if ( _States_Is_ready( current_state ) ) { 4c876: 666a bnes 4c8e2 <_Thread_Resume+0x96> RTEMS_INLINE_ROUTINE void _Priority_Add_to_bit_map ( Priority_Information *the_priority_map ) { *the_priority_map->minor |= the_priority_map->ready_minor; 4c878: 2868 008e moveal %a0@(142),%a4 4c87c: 3028 0094 movew %a0@(148),%d0 4c880: 3414 movew %a4@,%d2 _Priority_Add_to_bit_map( &the_thread->Priority_map ); _Chain_Append_unprotected(the_thread->ready, &the_thread->Object.Node); 4c882: 2468 008a moveal %a0@(138),%a2 Chain_Node *the_node ) { Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); 4c886: 260a movel %a2,%d3 4c888: 5883 addql #4,%d3 4c88a: 8082 orl %d2,%d0 4c88c: 2083 movel %d3,%a0@ old_last_node = the_chain->last; 4c88e: 266a 0008 moveal %a2@(8),%a3 4c892: 3880 movew %d0,%a4@ the_chain->last = the_node; 4c894: 2548 0008 movel %a0,%a2@(8) _Priority_Major_bit_map |= the_priority_map->ready_major; 4c898: 3439 0006 4d10 movew 64d10 <_Priority_Major_bit_map>,%d2 4c89e: 3028 0092 movew %a0@(146),%d0 old_last_node->next = the_node; the_node->previous = old_last_node; 4c8a2: 214b 0004 movel %a3,%a0@(4) 4c8a6: 8082 orl %d2,%d0 Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); old_last_node = the_chain->last; the_chain->last = the_node; old_last_node->next = the_node; 4c8a8: 2688 movel %a0,%a3@ 4c8aa: 33c0 0006 4d10 movew %d0,64d10 <_Priority_Major_bit_map> _ISR_Flash( level ); 4c8b0: 2009 movel %a1,%d0 4c8b2: 46c1 movew %d1,%sr 4c8b4: 8081 orl %d1,%d0 4c8b6: 46c0 movew %d0,%sr if ( the_thread->current_priority < _Thread_Heir->current_priority ) { 4c8b8: 2028 0014 movel %a0@(20),%d0 4c8bc: 2279 0006 4cee moveal 64cee <_Thread_Heir>,%a1 4c8c2: b0a9 0014 cmpl %a1@(20),%d0 4c8c6: 641a bccs 4c8e2 <_Thread_Resume+0x96> _Thread_Heir = the_thread; 4c8c8: 23c8 0006 4cee movel %a0,64cee <_Thread_Heir> if ( _Thread_Executing->is_preemptible || 4c8ce: 2079 0006 4d1a moveal 64d1a <_Thread_Executing>,%a0 4c8d4: 4a28 0075 tstb %a0@(117) 4c8d8: 6712 beqs 4c8ec <_Thread_Resume+0xa0> the_thread->current_priority == 0 ) _Context_Switch_necessary = true; 4c8da: 7001 moveq #1,%d0 4c8dc: 13c0 0006 4d2a moveb %d0,64d2a <_Context_Switch_necessary> } } } _ISR_Enable( level ); 4c8e2: 46c1 movew %d1,%sr } 4c8e4: 4cd7 1c0c moveml %sp@,%d2-%d3/%a2-%a4 4c8e8: 4e5e unlk %fp 4c8ea: 4e75 rts _ISR_Flash( level ); if ( the_thread->current_priority < _Thread_Heir->current_priority ) { _Thread_Heir = the_thread; if ( _Thread_Executing->is_preemptible || 4c8ec: 4a80 tstl %d0 4c8ee: 66f2 bnes 4c8e2 <_Thread_Resume+0x96> <== ALWAYS TAKEN the_thread->current_priority == 0 ) _Context_Switch_necessary = true; 4c8f0: 7001 moveq #1,%d0 <== NOT EXECUTED 4c8f2: 13c0 0006 4d2a moveb %d0,64d2a <_Context_Switch_necessary> <== NOT EXECUTED 4c8f8: 60e8 bras 4c8e2 <_Thread_Resume+0x96> <== NOT EXECUTED ... =============================================================================== 000489f8 <_Thread_Suspend>: { ISR_Level level; Chain_Control *ready; ready = the_thread->ready; _ISR_Disable( level ); 489f8: 203c 0000 0700 movel #1792,%d0 */ void _Thread_Suspend( Thread_Control *the_thread ) { 489fe: 4e56 fff4 linkw %fp,#-12 48a02: 206e 0008 moveal %fp@(8),%a0 48a06: 48d7 040c moveml %d2-%d3/%a2,%sp@ ISR_Level level; Chain_Control *ready; ready = the_thread->ready; 48a0a: 2268 008a moveal %a0@(138),%a1 _ISR_Disable( level ); 48a0e: 40c1 movew %sr,%d1 48a10: 8081 orl %d1,%d0 48a12: 46c0 movew %d0,%sr #if defined(RTEMS_ITRON_API) the_thread->suspend_count++; #endif if ( !_States_Is_ready( the_thread->current_state ) ) { 48a14: 2028 0010 movel %a0@(16),%d0 48a18: 6642 bnes 48a5c <_Thread_Suspend+0x64> _States_Set( STATES_SUSPENDED, the_thread->current_state ); _ISR_Enable( level ); return; } the_thread->current_state = STATES_SUSPENDED; 48a1a: 7002 moveq #2,%d0 if ( _Chain_Has_only_one_node( ready ) ) { 48a1c: 2429 0008 movel %a1@(8),%d2 _States_Set( STATES_SUSPENDED, the_thread->current_state ); _ISR_Enable( level ); return; } the_thread->current_state = STATES_SUSPENDED; 48a20: 2140 0010 movel %d0,%a0@(16) if ( _Chain_Has_only_one_node( ready ) ) { 48a24: b491 cmpl %a1@,%d2 48a26: 6700 0098 beqw 48ac0 <_Thread_Suspend+0xc8> ) { Chain_Node *next; Chain_Node *previous; next = the_node->next; 48a2a: 2250 moveal %a0@,%a1 previous = the_node->previous; 48a2c: 2468 0004 moveal %a0@(4),%a2 next->previous = previous; previous->next = next; 48a30: 2489 movel %a1,%a2@ Chain_Node *next; Chain_Node *previous; next = the_node->next; previous = the_node->previous; next->previous = previous; 48a32: 234a 0004 movel %a2,%a1@(4) _Priority_Remove_from_bit_map( &the_thread->Priority_map ); } else _Chain_Extract_unprotected( &the_thread->Object.Node ); _ISR_Flash( level ); 48a36: 203c 0000 0700 movel #1792,%d0 48a3c: 46c1 movew %d1,%sr 48a3e: 8081 orl %d1,%d0 48a40: 46c0 movew %d0,%sr if ( _Thread_Is_heir( the_thread ) ) 48a42: b1f9 0005 f006 cmpal 5f006 <_Thread_Heir>,%a0 48a48: 6730 beqs 48a7a <_Thread_Suspend+0x82> _Thread_Calculate_heir(); if ( _Thread_Is_executing( the_thread ) ) 48a4a: b1f9 0005 f032 cmpal 5f032 <_Thread_Executing>,%a0 48a50: 671c beqs 48a6e <_Thread_Suspend+0x76> <== NEVER TAKEN _Context_Switch_necessary = true; _ISR_Enable( level ); 48a52: 46c1 movew %d1,%sr } 48a54: 4cd7 040c moveml %sp@,%d2-%d3/%a2 48a58: 4e5e unlk %fp 48a5a: 4e75 rts _ISR_Disable( level ); #if defined(RTEMS_ITRON_API) the_thread->suspend_count++; #endif if ( !_States_Is_ready( the_thread->current_state ) ) { the_thread->current_state = 48a5c: 7402 moveq #2,%d2 48a5e: 8480 orl %d0,%d2 48a60: 2142 0010 movel %d2,%a0@(16) _States_Set( STATES_SUSPENDED, the_thread->current_state ); _ISR_Enable( level ); 48a64: 46c1 movew %d1,%sr if ( _Thread_Is_executing( the_thread ) ) _Context_Switch_necessary = true; _ISR_Enable( level ); } 48a66: 4cd7 040c moveml %sp@,%d2-%d3/%a2 48a6a: 4e5e unlk %fp 48a6c: 4e75 rts if ( _Thread_Is_heir( the_thread ) ) _Thread_Calculate_heir(); if ( _Thread_Is_executing( the_thread ) ) _Context_Switch_necessary = true; 48a6e: 7401 moveq #1,%d2 48a70: 13c2 0005 f042 moveb %d2,5f042 <_Context_Switch_necessary> _ISR_Enable( level ); 48a76: 46c1 movew %d1,%sr 48a78: 60da bras 48a54 <_Thread_Suspend+0x5c> RTEMS_INLINE_ROUTINE Priority_Control _Priority_Get_highest( void ) { Priority_Bit_map_control minor; Priority_Bit_map_control major; _Bitfield_Find_first_bit( _Priority_Major_bit_map, major ); 48a7a: 3039 0005 f028 movew 5f028 <_Priority_Major_bit_map>,%d0 48a80: 4840 swap %d0 48a82: 04c0 ff1 %d0 _Bitfield_Find_first_bit( _Priority_Bit_map[major], minor ); 48a84: 4282 clrl %d2 48a86: 43f9 0005 f098 lea 5f098 <_Priority_Bit_map>,%a1 48a8c: 3400 movew %d0,%d2 48a8e: 3031 2a00 movew %a1@(00000000,%d2:l:2),%d0 48a92: 4840 swap %d0 48a94: 04c0 ff1 %d0 48a96: 4283 clrl %d3 48a98: e98a lsll #4,%d2 48a9a: 3600 movew %d0,%d3 48a9c: 2279 0005 ef24 moveal 5ef24 <_Thread_Ready_chain>,%a1 48aa2: 2002 movel %d2,%d0 48aa4: d083 addl %d3,%d0 48aa6: 2400 movel %d0,%d2 48aa8: e58a lsll #2,%d2 48aaa: e988 lsll #4,%d0 48aac: 93c2 subal %d2,%a1 48aae: d3c0 addal %d0,%a1 48ab0: 23d1 0005 f006 movel %a1@,5f006 <_Thread_Heir> _ISR_Flash( level ); if ( _Thread_Is_heir( the_thread ) ) _Thread_Calculate_heir(); if ( _Thread_Is_executing( the_thread ) ) 48ab6: b1f9 0005 f032 cmpal 5f032 <_Thread_Executing>,%a0 48abc: 6694 bnes 48a52 <_Thread_Suspend+0x5a> <== NEVER TAKEN 48abe: 60ae bras 48a6e <_Thread_Suspend+0x76> */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 48ac0: 2009 movel %a1,%d0 48ac2: 5880 addql #4,%d0 RTEMS_INLINE_ROUTINE void _Priority_Remove_from_bit_map ( Priority_Information *the_priority_map ) { *the_priority_map->minor &= the_priority_map->block_minor; 48ac4: 2468 008e moveal %a0@(142),%a2 48ac8: 2280 movel %d0,%a1@ 48aca: 3412 movew %a2@,%d2 48acc: 3028 0098 movew %a0@(152),%d0 the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain); 48ad0: 2349 0008 movel %a1,%a1@(8) 48ad4: c082 andl %d2,%d0 RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); the_chain->permanent_null = NULL; 48ad6: 42a9 0004 clrl %a1@(4) 48ada: 3480 movew %d0,%a2@ the_thread->current_state = STATES_SUSPENDED; if ( _Chain_Has_only_one_node( ready ) ) { _Chain_Initialize_empty( ready ); _Priority_Remove_from_bit_map( &the_thread->Priority_map ); 48adc: 6600 ff58 bnew 48a36 <_Thread_Suspend+0x3e> if ( *the_priority_map->minor == 0 ) _Priority_Major_bit_map &= the_priority_map->block_major; 48ae0: 3439 0005 f028 movew 5f028 <_Priority_Major_bit_map>,%d2 48ae6: 3028 0096 movew %a0@(150),%d0 48aea: c082 andl %d2,%d0 48aec: 33c0 0005 f028 movew %d0,5f028 <_Priority_Major_bit_map> } else _Chain_Extract_unprotected( &the_thread->Object.Node ); _ISR_Flash( level ); 48af2: 203c 0000 0700 movel #1792,%d0 48af8: 46c1 movew %d1,%sr 48afa: 8081 orl %d1,%d0 48afc: 46c0 movew %d0,%sr if ( _Thread_Is_heir( the_thread ) ) 48afe: b1f9 0005 f006 cmpal 5f006 <_Thread_Heir>,%a0 48b04: 6600 ff44 bnew 48a4a <_Thread_Suspend+0x52> 48b08: 6000 ff70 braw 48a7a <_Thread_Suspend+0x82> =============================================================================== 00048b0c <_Thread_Tickle_timeslice>: * * Output parameters: NONE */ void _Thread_Tickle_timeslice( void ) { 48b0c: 4e56 0000 linkw %fp,#0 48b10: 2f0a movel %a2,%sp@- Thread_Control *executing; executing = _Thread_Executing; 48b12: 2479 0005 f032 moveal 5f032 <_Thread_Executing>,%a2 /* * If the thread is not preemptible or is not ready, then * just return. */ if ( !executing->is_preemptible ) 48b18: 4a2a 0075 tstb %a2@(117) 48b1c: 6720 beqs 48b3e <_Thread_Tickle_timeslice+0x32> return; if ( !_States_Is_ready( executing->current_state ) ) 48b1e: 4aaa 0010 tstl %a2@(16) 48b22: 661a bnes 48b3e <_Thread_Tickle_timeslice+0x32> /* * The cpu budget algorithm determines what happens next. */ switch ( executing->budget_algorithm ) { 48b24: 202a 007a movel %a2@(122),%d0 48b28: 7201 moveq #1,%d1 48b2a: b280 cmpl %d0,%d1 48b2c: 6210 bhis 48b3e <_Thread_Tickle_timeslice+0x32> 48b2e: 123c 0002 moveb #2,%d1 48b32: b280 cmpl %d0,%d1 48b34: 642e bccs 48b64 <_Thread_Tickle_timeslice+0x58> 48b36: 123c 0003 moveb #3,%d1 48b3a: b280 cmpl %d0,%d1 48b3c: 6708 beqs 48b46 <_Thread_Tickle_timeslice+0x3a> <== ALWAYS TAKEN if ( --executing->cpu_time_budget == 0 ) (*executing->budget_callout)( executing ); break; #endif } } 48b3e: 246e fffc moveal %fp@(-4),%a2 48b42: 4e5e unlk %fp 48b44: 4e75 rts } break; #if defined(RTEMS_SCORE_THREAD_ENABLE_SCHEDULER_CALLOUT) case THREAD_CPU_BUDGET_ALGORITHM_CALLOUT: if ( --executing->cpu_time_budget == 0 ) 48b46: 202a 0076 movel %a2@(118),%d0 48b4a: 5380 subql #1,%d0 48b4c: 2540 0076 movel %d0,%a2@(118) 48b50: 66ec bnes 48b3e <_Thread_Tickle_timeslice+0x32> (*executing->budget_callout)( executing ); 48b52: 2f0a movel %a2,%sp@- 48b54: 206a 007e moveal %a2@(126),%a0 48b58: 4e90 jsr %a0@ break; #endif } } 48b5a: 246e fffc moveal %fp@(-4),%a2 break; #if defined(RTEMS_SCORE_THREAD_ENABLE_SCHEDULER_CALLOUT) case THREAD_CPU_BUDGET_ALGORITHM_CALLOUT: if ( --executing->cpu_time_budget == 0 ) (*executing->budget_callout)( executing ); 48b5e: 588f addql #4,%sp break; #endif } } 48b60: 4e5e unlk %fp 48b62: 4e75 rts case THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE: #if defined(RTEMS_SCORE_THREAD_ENABLE_EXHAUST_TIMESLICE) case THREAD_CPU_BUDGET_ALGORITHM_EXHAUST_TIMESLICE: #endif if ( (int)(--executing->cpu_time_budget) <= 0 ) { 48b64: 202a 0076 movel %a2@(118),%d0 48b68: 5380 subql #1,%d0 48b6a: 2540 0076 movel %d0,%a2@(118) 48b6e: 6ece bgts 48b3e <_Thread_Tickle_timeslice+0x32> _Thread_Reset_timeslice(); 48b70: 4eb9 0004 c41c jsr 4c41c <_Thread_Reset_timeslice> executing->cpu_time_budget = _Thread_Ticks_per_timeslice; 48b76: 41f9 0005 ef28 lea 5ef28 <_Thread_Ticks_per_timeslice>,%a0 48b7c: 2550 0076 movel %a0@,%a2@(118) if ( --executing->cpu_time_budget == 0 ) (*executing->budget_callout)( executing ); break; #endif } } 48b80: 246e fffc moveal %fp@(-4),%a2 48b84: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00048b88 <_Thread_Yield_processor>: * ready chain * select heir */ void _Thread_Yield_processor( void ) { 48b88: 4e56 fff4 linkw %fp,#-12 ISR_Level level; Thread_Control *executing; Chain_Control *ready; executing = _Thread_Executing; 48b8c: 2079 0005 f032 moveal 5f032 <_Thread_Executing>,%a0 * ready chain * select heir */ void _Thread_Yield_processor( void ) { 48b92: 48d7 0c04 moveml %d2/%a2-%a3,%sp@ Thread_Control *executing; Chain_Control *ready; executing = _Thread_Executing; ready = executing->ready; _ISR_Disable( level ); 48b96: 243c 0000 0700 movel #1792,%d2 48b9c: 2002 movel %d2,%d0 ISR_Level level; Thread_Control *executing; Chain_Control *ready; executing = _Thread_Executing; ready = executing->ready; 48b9e: 2268 008a moveal %a0@(138),%a1 _ISR_Disable( level ); 48ba2: 40c1 movew %sr,%d1 48ba4: 8081 orl %d1,%d0 48ba6: 46c0 movew %d0,%sr if ( !_Chain_Has_only_one_node( ready ) ) { 48ba8: 2029 0008 movel %a1@(8),%d0 48bac: b091 cmpl %a1@,%d0 48bae: 6750 beqs 48c00 <_Thread_Yield_processor+0x78> ) { Chain_Node *next; Chain_Node *previous; next = the_node->next; 48bb0: 2450 moveal %a0@,%a2 Chain_Node *the_node ) { Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); 48bb2: 2009 movel %a1,%d0 48bb4: 5880 addql #4,%d0 { Chain_Node *next; Chain_Node *previous; next = the_node->next; previous = the_node->previous; 48bb6: 2668 0004 moveal %a0@(4),%a3 next->previous = previous; previous->next = next; 48bba: 268a movel %a2,%a3@ Chain_Node *next; Chain_Node *previous; next = the_node->next; previous = the_node->previous; next->previous = previous; 48bbc: 254b 0004 movel %a3,%a2@(4) Chain_Node *the_node ) { Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); 48bc0: 2080 movel %d0,%a0@ old_last_node = the_chain->last; 48bc2: 2469 0008 moveal %a1@(8),%a2 the_chain->last = the_node; 48bc6: 2348 0008 movel %a0,%a1@(8) old_last_node->next = the_node; the_node->previous = old_last_node; 48bca: 214a 0004 movel %a2,%a0@(4) Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); old_last_node = the_chain->last; the_chain->last = the_node; old_last_node->next = the_node; 48bce: 2488 movel %a0,%a2@ _Chain_Extract_unprotected( &executing->Object.Node ); _Chain_Append_unprotected( ready, &executing->Object.Node ); _ISR_Flash( level ); 48bd0: 46c1 movew %d1,%sr 48bd2: 8481 orl %d1,%d2 48bd4: 46c2 movew %d2,%sr if ( _Thread_Is_heir( executing ) ) 48bd6: b1f9 0005 f006 cmpal 5f006 <_Thread_Heir>,%a0 48bdc: 6712 beqs 48bf0 <_Thread_Yield_processor+0x68> <== ALWAYS TAKEN _Thread_Heir = (Thread_Control *) ready->first; _Context_Switch_necessary = true; } else if ( !_Thread_Is_heir( executing ) ) _Context_Switch_necessary = true; 48bde: 7001 moveq #1,%d0 <== NOT EXECUTED 48be0: 13c0 0005 f042 moveb %d0,5f042 <_Context_Switch_necessary> <== NOT EXECUTED _ISR_Enable( level ); 48be6: 46c1 movew %d1,%sr } 48be8: 4cd7 0c04 moveml %sp@,%d2/%a2-%a3 48bec: 4e5e unlk %fp 48bee: 4e75 rts _Chain_Append_unprotected( ready, &executing->Object.Node ); _ISR_Flash( level ); if ( _Thread_Is_heir( executing ) ) _Thread_Heir = (Thread_Control *) ready->first; 48bf0: 23d1 0005 f006 movel %a1@,5f006 <_Thread_Heir> _Context_Switch_necessary = true; } else if ( !_Thread_Is_heir( executing ) ) _Context_Switch_necessary = true; 48bf6: 7001 moveq #1,%d0 48bf8: 13c0 0005 f042 moveb %d0,5f042 <_Context_Switch_necessary> 48bfe: 60e6 bras 48be6 <_Thread_Yield_processor+0x5e> if ( _Thread_Is_heir( executing ) ) _Thread_Heir = (Thread_Control *) ready->first; _Context_Switch_necessary = true; } else if ( !_Thread_Is_heir( executing ) ) 48c00: b1f9 0005 f006 cmpal 5f006 <_Thread_Heir>,%a0 48c06: 67de beqs 48be6 <_Thread_Yield_processor+0x5e> <== ALWAYS TAKEN _Context_Switch_necessary = true; 48c08: 7001 moveq #1,%d0 <== NOT EXECUTED 48c0a: 13c0 0005 f042 moveb %d0,5f042 <_Context_Switch_necessary> <== NOT EXECUTED 48c10: 60d4 bras 48be6 <_Thread_Yield_processor+0x5e> <== NOT EXECUTED ... =============================================================================== 00047834 <_Thread_blocking_operation_Cancel>: /* * If the sync state is timed out, this is very likely not needed. * But better safe than sorry when it comes to critical sections. */ if ( _Watchdog_Is_active( &the_thread->Timer ) ) { 47834: 7202 moveq #2,%d1 Thread_blocking_operation_States sync_state __attribute__((unused)), #endif Thread_Control *the_thread, ISR_Level level ) { 47836: 4e56 0000 linkw %fp,#0 4783a: 202e 0010 movel %fp@(16),%d0 4783e: 2f0a movel %a2,%sp@- 47840: 246e 000c moveal %fp@(12),%a2 #endif /* * The thread is not waiting on anything after this completes. */ the_thread->Wait.queue = NULL; 47844: 42aa 0044 clrl %a2@(68) /* * If the sync state is timed out, this is very likely not needed. * But better safe than sorry when it comes to critical sections. */ if ( _Watchdog_Is_active( &the_thread->Timer ) ) { 47848: b2aa 0050 cmpl %a2@(80),%d1 4784c: 671c beqs 4786a <_Thread_blocking_operation_Cancel+0x36> _Watchdog_Deactivate( &the_thread->Timer ); _ISR_Enable( level ); (void) _Watchdog_Remove( &the_thread->Timer ); } else _ISR_Enable( level ); 4784e: 46c0 movew %d0,%sr RTEMS_INLINE_ROUTINE void _Thread_Unblock ( Thread_Control *the_thread ) { _Thread_Clear_state( the_thread, STATES_BLOCKED ); 47850: 2d4a 0008 movel %a2,%fp@(8) #if defined(RTEMS_MULTIPROCESSING) if ( !_Objects_Is_local_id( the_thread->Object.id ) ) _Thread_MP_Free_proxy( the_thread ); #endif } 47854: 246e fffc moveal %fp@(-4),%a2 47858: 203c 1003 fff8 movel #268697592,%d0 4785e: 2d40 000c movel %d0,%fp@(12) 47862: 4e5e unlk %fp 47864: 4ef9 0004 79e8 jmp 479e8 <_Thread_Clear_state> RTEMS_INLINE_ROUTINE void _Watchdog_Deactivate( Watchdog_Control *the_watchdog ) { the_watchdog->state = WATCHDOG_REMOVE_IT; 4786a: 123c 0003 moveb #3,%d1 4786e: 2541 0050 movel %d1,%a2@(80) * If the sync state is timed out, this is very likely not needed. * But better safe than sorry when it comes to critical sections. */ if ( _Watchdog_Is_active( &the_thread->Timer ) ) { _Watchdog_Deactivate( &the_thread->Timer ); _ISR_Enable( level ); 47872: 46c0 movew %d0,%sr (void) _Watchdog_Remove( &the_thread->Timer ); 47874: 486a 0048 pea %a2@(72) 47878: 4eb9 0004 90a4 jsr 490a4 <_Watchdog_Remove> 4787e: 588f addql #4,%sp 47880: 203c 1003 fff8 movel #268697592,%d0 47886: 2d4a 0008 movel %a2,%fp@(8) #if defined(RTEMS_MULTIPROCESSING) if ( !_Objects_Is_local_id( the_thread->Object.id ) ) _Thread_MP_Free_proxy( the_thread ); #endif } 4788a: 246e fffc moveal %fp@(-4),%a2 4788e: 2d40 000c movel %d0,%fp@(12) 47892: 4e5e unlk %fp 47894: 4ef9 0004 79e8 jmp 479e8 <_Thread_Clear_state> ... =============================================================================== 000483b4 <_Thread_queue_Enqueue_priority>: Thread_blocking_operation_States _Thread_queue_Enqueue_priority ( Thread_queue_Control *the_thread_queue, Thread_Control *the_thread, ISR_Level *level_p ) { 483b4: 4e56 ffe4 linkw %fp,#-28 483b8: 48d7 1c3c moveml %d2-%d5/%a2-%a4,%sp@ 483bc: 266e 000c moveal %fp@(12),%a3 */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 483c0: 41eb 003c lea %a3@(60),%a0 return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED; restart_reverse_search: search_priority = PRIORITY_MAXIMUM + 1; _ISR_Disable( level ); 483c4: 263c 0000 0700 movel #1792,%d3 Priority_Control priority; States_Control block_state; _Chain_Initialize_empty( &the_thread->Wait.Block2n ); priority = the_thread->current_priority; 483ca: 222b 0014 movel %a3@(20),%d1 header_index = _Thread_queue_Header_number( priority ); header = &the_thread_queue->Queues.Priority[ header_index ]; 483ce: 2401 movel %d1,%d2 483d0: ec8a lsrl #6,%d2 483d2: 2002 movel %d2,%d0 483d4: e58a lsll #2,%d2 483d6: e988 lsll #4,%d0 Thread_blocking_operation_States _Thread_queue_Enqueue_priority ( Thread_queue_Control *the_thread_queue, Thread_Control *the_thread, ISR_Level *level_p ) { 483d8: 286e 0008 moveal %fp@(8),%a4 _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 ]; 483dc: 9082 subl %d2,%d0 483de: 45f4 0800 lea %a4@(00000000,%d0:l),%a2 483e2: 2748 0038 movel %a0,%a3@(56) the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain); 483e6: 41eb 0038 lea %a3@(56),%a0 block_state = the_thread_queue->state; 483ea: 242c 0038 movel %a4@(56),%d2 483ee: 2748 0040 movel %a0,%a3@(64) RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); the_chain->permanent_null = NULL; 483f2: 42ab 003c clrl %a3@(60) if ( _Thread_queue_Is_reverse_search( priority ) ) 483f6: 0801 0005 btst #5,%d1 483fa: 6656 bnes 48452 <_Thread_queue_Enqueue_priority+0x9e> */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 483fc: 2a0a movel %a2,%d5 goto restart_reverse_search; restart_forward_search: search_priority = PRIORITY_MINIMUM - 1; _ISR_Disable( level ); 483fe: 2803 movel %d3,%d4 48400: 5885 addql #4,%d5 48402: 2004 movel %d4,%d0 48404: 40c3 movew %sr,%d3 48406: 8083 orl %d3,%d0 48408: 46c0 movew %d0,%sr search_thread = (Thread_Control *) header->first; 4840a: 2052 moveal %a2@,%a0 while ( !_Chain_Is_tail( header, (Chain_Node *)search_thread ) ) { 4840c: ba88 cmpl %a0,%d5 4840e: 6700 010a beqw 4851a <_Thread_queue_Enqueue_priority+0x166> search_priority = search_thread->current_priority; 48412: 2268 0014 moveal %a0@(20),%a1 if ( priority <= search_priority ) 48416: b3c1 cmpal %d1,%a1 48418: 6418 bccs 48432 <_Thread_queue_Enqueue_priority+0x7e> break; search_priority = search_thread->current_priority; if ( priority <= search_priority ) break; #endif _ISR_Flash( level ); 4841a: 2004 movel %d4,%d0 4841c: 46c3 movew %d3,%sr 4841e: 8083 orl %d3,%d0 48420: 46c0 movew %d0,%sr if ( !_States_Are_set( search_thread->current_state, block_state) ) { 48422: 2002 movel %d2,%d0 48424: c0a8 0010 andl %a0@(16),%d0 48428: 6700 0092 beqw 484bc <_Thread_queue_Enqueue_priority+0x108> _ISR_Enable( level ); goto restart_forward_search; } search_thread = (Thread_Control *)search_thread->Object.Node.next; 4842c: 2050 moveal %a0@,%a0 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 ) ) { 4842e: ba88 cmpl %a0,%d5 48430: 66e0 bnes 48412 <_Thread_queue_Enqueue_priority+0x5e> 48432: 2403 movel %d3,%d2 } search_thread = (Thread_Control *)search_thread->Object.Node.next; } if ( the_thread_queue->sync_state != 48434: 7001 moveq #1,%d0 48436: b0ac 0030 cmpl %a4@(48),%d0 4843a: 6700 0094 beqw 484d0 <_Thread_queue_Enqueue_priority+0x11c> * 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; 4843e: 206e 0010 moveal %fp@(16),%a0 return the_thread_queue->sync_state; 48442: 202c 0030 movel %a4@(48),%d0 * For example, the blocking thread could have been given * the mutex by an ISR or timed out. * * WARNING! Returning with interrupts disabled! */ *level_p = level; 48446: 2082 movel %d2,%a0@ return the_thread_queue->sync_state; } 48448: 4cd7 1c3c moveml %sp@,%d2-%d5/%a2-%a4 4844c: 4e5e unlk %fp 4844e: 4e75 rts if ( priority >= search_priority ) break; #endif _ISR_Flash( level ); if ( !_States_Are_set( search_thread->current_state, block_state) ) { _ISR_Enable( level ); 48450: 46c4 movew %d4,%sr the_thread->Wait.queue = the_thread_queue; _ISR_Enable( level ); return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED; restart_reverse_search: search_priority = PRIORITY_MAXIMUM + 1; 48452: 4284 clrl %d4 48454: 1839 0005 d7c2 moveb 5d7c2 ,%d4 _ISR_Disable( level ); 4845a: 2003 movel %d3,%d0 the_thread->Wait.queue = the_thread_queue; _ISR_Enable( level ); return THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED; restart_reverse_search: search_priority = PRIORITY_MAXIMUM + 1; 4845c: 2244 moveal %d4,%a1 4845e: 5289 addql #1,%a1 _ISR_Disable( level ); 48460: 40c4 movew %sr,%d4 48462: 8084 orl %d4,%d0 48464: 46c0 movew %d0,%sr search_thread = (Thread_Control *) header->last; 48466: 206a 0008 moveal %a2@(8),%a0 while ( !_Chain_Is_head( header, (Chain_Node *)search_thread ) ) { 4846a: b5c8 cmpal %a0,%a2 4846c: 6720 beqs 4848e <_Thread_queue_Enqueue_priority+0xda> search_priority = search_thread->current_priority; 4846e: 2268 0014 moveal %a0@(20),%a1 if ( priority >= search_priority ) 48472: b3c1 cmpal %d1,%a1 48474: 6318 blss 4848e <_Thread_queue_Enqueue_priority+0xda> break; search_priority = search_thread->current_priority; if ( priority >= search_priority ) break; #endif _ISR_Flash( level ); 48476: 2003 movel %d3,%d0 48478: 46c4 movew %d4,%sr 4847a: 8084 orl %d4,%d0 4847c: 46c0 movew %d0,%sr if ( !_States_Are_set( search_thread->current_state, block_state) ) { 4847e: 2002 movel %d2,%d0 48480: c0a8 0010 andl %a0@(16),%d0 48484: 67ca beqs 48450 <_Thread_queue_Enqueue_priority+0x9c> _ISR_Enable( level ); goto restart_reverse_search; } search_thread = (Thread_Control *) 48486: 2068 0004 moveal %a0@(4),%a0 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 ) ) { 4848a: b5c8 cmpal %a0,%a2 4848c: 66e0 bnes 4846e <_Thread_queue_Enqueue_priority+0xba> 4848e: 2404 movel %d4,%d2 } search_thread = (Thread_Control *) search_thread->Object.Node.previous; } if ( the_thread_queue->sync_state != 48490: 7001 moveq #1,%d0 48492: b0ac 0030 cmpl %a4@(48),%d0 48496: 66a6 bnes 4843e <_Thread_queue_Enqueue_priority+0x8a> THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) goto synchronize; the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED; 48498: 42ac 0030 clrl %a4@(48) if ( priority == search_priority ) 4849c: b3c1 cmpal %d1,%a1 4849e: 6756 beqs 484f6 <_Thread_queue_Enqueue_priority+0x142> goto equal_priority; search_node = (Chain_Node *) search_thread; next_node = search_node->next; 484a0: 2250 moveal %a0@,%a1 the_node = (Chain_Node *) the_thread; the_node->next = next_node; the_node->previous = search_node; 484a2: 2748 0004 movel %a0,%a3@(4) search_node = (Chain_Node *) search_thread; next_node = search_node->next; the_node = (Chain_Node *) the_thread; the_node->next = next_node; 484a6: 2689 movel %a1,%a3@ the_node->previous = search_node; search_node->next = the_node; next_node->previous = the_node; the_thread->Wait.queue = the_thread_queue; 484a8: 274c 0044 movel %a4,%a3@(68) 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; 484ac: 208b movel %a3,%a0@ next_node->previous = the_node; 484ae: 234b 0004 movel %a3,%a1@(4) the_thread->Wait.queue = the_thread_queue; _ISR_Enable( level ); 484b2: 46c4 movew %d4,%sr * * WARNING! Returning with interrupts disabled! */ *level_p = level; return the_thread_queue->sync_state; } 484b4: 4cd7 1c3c moveml %sp@,%d2-%d5/%a2-%a4 484b8: 4e5e unlk %fp 484ba: 4e75 rts if ( priority <= search_priority ) break; #endif _ISR_Flash( level ); if ( !_States_Are_set( search_thread->current_state, block_state) ) { _ISR_Enable( level ); 484bc: 46c3 movew %d3,%sr <== NOT EXECUTED if ( _Thread_queue_Is_reverse_search( priority ) ) goto restart_reverse_search; restart_forward_search: search_priority = PRIORITY_MINIMUM - 1; _ISR_Disable( level ); 484be: 2004 movel %d4,%d0 <== NOT EXECUTED 484c0: 40c3 movew %sr,%d3 <== NOT EXECUTED 484c2: 8083 orl %d3,%d0 <== NOT EXECUTED 484c4: 46c0 movew %d0,%sr <== NOT EXECUTED search_thread = (Thread_Control *) header->first; 484c6: 2052 moveal %a2@,%a0 <== NOT EXECUTED while ( !_Chain_Is_tail( header, (Chain_Node *)search_thread ) ) { 484c8: ba88 cmpl %a0,%d5 <== NOT EXECUTED 484ca: 6600 ff46 bnew 48412 <_Thread_queue_Enqueue_priority+0x5e><== NOT EXECUTED 484ce: 604a bras 4851a <_Thread_queue_Enqueue_priority+0x166><== NOT EXECUTED if ( the_thread_queue->sync_state != THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) goto synchronize; the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED; 484d0: 42ac 0030 clrl %a4@(48) if ( priority == search_priority ) 484d4: b3c1 cmpal %d1,%a1 484d6: 671e beqs 484f6 <_Thread_queue_Enqueue_priority+0x142> goto equal_priority; search_node = (Chain_Node *) search_thread; previous_node = search_node->previous; 484d8: 2268 0004 moveal %a0@(4),%a1 the_node = (Chain_Node *) the_thread; the_node->next = search_node; 484dc: 2688 movel %a0,%a3@ the_node->previous = previous_node; 484de: 2749 0004 movel %a1,%a3@(4) previous_node->next = the_node; search_node->previous = the_node; the_thread->Wait.queue = the_thread_queue; 484e2: 274c 0044 movel %a4,%a3@(68) previous_node = search_node->previous; the_node = (Chain_Node *) the_thread; the_node->next = search_node; the_node->previous = previous_node; previous_node->next = the_node; 484e6: 228b movel %a3,%a1@ search_node->previous = the_node; 484e8: 214b 0004 movel %a3,%a0@(4) the_thread->Wait.queue = the_thread_queue; _ISR_Enable( level ); 484ec: 46c3 movew %d3,%sr * * WARNING! Returning with interrupts disabled! */ *level_p = level; return the_thread_queue->sync_state; } 484ee: 4cd7 1c3c moveml %sp@,%d2-%d5/%a2-%a4 484f2: 4e5e unlk %fp 484f4: 4e75 rts 484f6: 41e8 003c lea %a0@(60),%a0 _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; 484fa: 2268 0004 moveal %a0@(4),%a1 the_node = (Chain_Node *) the_thread; the_node->next = search_node; 484fe: 2688 movel %a0,%a3@ the_node->previous = previous_node; 48500: 2749 0004 movel %a1,%a3@(4) previous_node->next = the_node; search_node->previous = the_node; the_thread->Wait.queue = the_thread_queue; 48504: 274c 0044 movel %a4,%a3@(68) previous_node = search_node->previous; the_node = (Chain_Node *) the_thread; the_node->next = search_node; the_node->previous = previous_node; previous_node->next = the_node; 48508: 228b movel %a3,%a1@ search_node->previous = the_node; 4850a: 214b 0004 movel %a3,%a0@(4) the_thread->Wait.queue = the_thread_queue; _ISR_Enable( level ); 4850e: 46c2 movew %d2,%sr 48510: 7001 moveq #1,%d0 * * WARNING! Returning with interrupts disabled! */ *level_p = level; return the_thread_queue->sync_state; } 48512: 4cd7 1c3c moveml %sp@,%d2-%d5/%a2-%a4 48516: 4e5e unlk %fp 48518: 4e75 rts 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 ) ) { 4851a: 2403 movel %d3,%d2 4851c: 327c ffff moveaw #-1,%a1 } search_thread = (Thread_Control *)search_thread->Object.Node.next; } if ( the_thread_queue->sync_state != 48520: 7001 moveq #1,%d0 48522: b0ac 0030 cmpl %a4@(48),%d0 48526: 6600 ff16 bnew 4843e <_Thread_queue_Enqueue_priority+0x8a> 4852a: 60a4 bras 484d0 <_Thread_queue_Enqueue_priority+0x11c> =============================================================================== 00048318 <_Thread_queue_Enqueue_with_handler>: void _Thread_queue_Enqueue_with_handler( Thread_queue_Control *the_thread_queue, Watchdog_Interval timeout, Thread_queue_Timeout_callout handler ) { 48318: 4e56 fff0 linkw %fp,#-16 4831c: 48d7 0c04 moveml %d2/%a2-%a3,%sp@ 48320: 266e 0008 moveal %fp@(8),%a3 else #endif /* * Set the blocking state for this thread queue in the thread. */ _Thread_Set_state( the_thread, the_thread_queue->state ); 48324: 2f2b 0038 movel %a3@(56),%sp@- Thread_queue_Control *, Thread_Control *, ISR_Level * ); the_thread = _Thread_Executing; 48328: 2479 0005 f032 moveal 5f032 <_Thread_Executing>,%a2 void _Thread_queue_Enqueue_with_handler( Thread_queue_Control *the_thread_queue, Watchdog_Interval timeout, Thread_queue_Timeout_callout handler ) { 4832e: 242e 000c movel %fp@(12),%d2 else #endif /* * Set the blocking state for this thread queue in the thread. */ _Thread_Set_state( the_thread, the_thread_queue->state ); 48332: 2f0a movel %a2,%sp@- 48334: 4eb9 0004 8720 jsr 48720 <_Thread_Set_state> /* * If the thread wants to timeout, then schedule its timer. */ if ( timeout ) { 4833a: 508f addql #8,%sp 4833c: 4a82 tstl %d2 4833e: 6644 bnes 48384 <_Thread_queue_Enqueue_with_handler+0x6c> } /* * Now enqueue the thread per the discipline for this thread queue. */ if ( the_thread_queue->discipline == THREAD_QUEUE_DISCIPLINE_PRIORITY ) 48340: 41f9 0004 83b4 lea 483b4 <_Thread_queue_Enqueue_priority>,%a0 48346: 7001 moveq #1,%d0 48348: b0ab 0034 cmpl %a3@(52),%d0 4834c: 6706 beqs 48354 <_Thread_queue_Enqueue_with_handler+0x3c> 4834e: 41f9 0004 c190 lea 4c190 <_Thread_queue_Enqueue_fifo>,%a0 enqueue_p = _Thread_queue_Enqueue_priority; else /* must be THREAD_QUEUE_DISCIPLINE_FIFO */ enqueue_p = _Thread_queue_Enqueue_fifo; sync_state = (*enqueue_p)( the_thread_queue, the_thread, &level ); 48354: 486e fffc pea %fp@(-4) 48358: 2f0a movel %a2,%sp@- 4835a: 2f0b movel %a3,%sp@- 4835c: 4e90 jsr %a0@ if ( sync_state != THREAD_BLOCKING_OPERATION_NOTHING_HAPPENED ) 4835e: 4fef 000c lea %sp@(12),%sp 48362: 7201 moveq #1,%d1 48364: b280 cmpl %d0,%d1 48366: 6712 beqs 4837a <_Thread_queue_Enqueue_with_handler+0x62> _Thread_blocking_operation_Cancel( sync_state, the_thread, level ); 48368: 2f2e fffc movel %fp@(-4),%sp@- 4836c: 2f0a movel %a2,%sp@- 4836e: 2f00 movel %d0,%sp@- 48370: 4eb9 0004 7834 jsr 47834 <_Thread_blocking_operation_Cancel> 48376: 4fef 000c lea %sp@(12),%sp } 4837a: 4cee 0c04 fff0 moveml %fp@(-16),%d2/%a2-%a3 48380: 4e5e unlk %fp 48382: 4e75 rts /* * If the thread wants to timeout, then schedule its timer. */ if ( timeout ) { _Watchdog_Initialize( 48384: 202a 0008 movel %a2@(8),%d0 Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; 48388: 256e 0010 0064 movel %fp@(16),%a2@(100) the_watchdog->id = id; 4838e: 2540 0068 movel %d0,%a2@(104) Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 48392: 2542 0054 movel %d2,%a2@(84) Watchdog_Service_routine_entry routine, Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; 48396: 42aa 0050 clrl %a2@(80) the_watchdog->routine = routine; the_watchdog->id = id; the_watchdog->user_data = user_data; 4839a: 42aa 006c clrl %a2@(108) ) { the_watchdog->initial = units; _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 4839e: 486a 0048 pea %a2@(72) 483a2: 4879 0005 f050 pea 5f050 <_Watchdog_Ticks_chain> 483a8: 4eb9 0004 8f5c jsr 48f5c <_Watchdog_Insert> 483ae: 508f addql #8,%sp 483b0: 608e bras 48340 <_Thread_queue_Enqueue_with_handler+0x28> ... =============================================================================== 0004e0e8 <_Thread_queue_Extract_fifo>: Thread_Control *the_thread ) { ISR_Level level; _ISR_Disable( level ); 4e0e8: 203c 0000 0700 movel #1792,%d0 void _Thread_queue_Extract_fifo( Thread_queue_Control *the_thread_queue __attribute__((unused)), Thread_Control *the_thread ) { 4e0ee: 4e56 0000 linkw %fp,#0 4e0f2: 2f0a movel %a2,%sp@- 4e0f4: 246e 000c moveal %fp@(12),%a2 ISR_Level level; _ISR_Disable( level ); 4e0f8: 40c1 movew %sr,%d1 4e0fa: 8081 orl %d1,%d0 4e0fc: 46c0 movew %d0,%sr if ( !_States_Is_waiting_on_thread_queue( the_thread->current_state ) ) { 4e0fe: 202a 0010 movel %a2@(16),%d0 4e102: 0280 0003 bee0 andil #245472,%d0 4e108: 6734 beqs 4e13e <_Thread_queue_Extract_fifo+0x56> ) { Chain_Node *next; Chain_Node *previous; next = the_node->next; 4e10a: 2052 moveal %a2@,%a0 _Chain_Extract_unprotected( &the_thread->Object.Node ); the_thread->Wait.queue = NULL; if ( !_Watchdog_Is_active( &the_thread->Timer ) ) { 4e10c: 7002 moveq #2,%d0 previous = the_node->previous; 4e10e: 226a 0004 moveal %a2@(4),%a1 return; } _Chain_Extract_unprotected( &the_thread->Object.Node ); the_thread->Wait.queue = NULL; 4e112: 42aa 0044 clrl %a2@(68) next->previous = previous; previous->next = next; 4e116: 2288 movel %a0,%a1@ Chain_Node *next; Chain_Node *previous; next = the_node->next; previous = the_node->previous; next->previous = previous; 4e118: 2149 0004 movel %a1,%a0@(4) if ( !_Watchdog_Is_active( &the_thread->Timer ) ) { 4e11c: b0aa 0050 cmpl %a2@(80),%d0 4e120: 6726 beqs 4e148 <_Thread_queue_Extract_fifo+0x60> _ISR_Enable( level ); 4e122: 46c1 movew %d1,%sr RTEMS_INLINE_ROUTINE void _Thread_Unblock ( Thread_Control *the_thread ) { _Thread_Clear_state( the_thread, STATES_BLOCKED ); 4e124: 2d4a 0008 movel %a2,%fp@(8) #if defined(RTEMS_MULTIPROCESSING) if ( !_Objects_Is_local_id( the_thread->Object.id ) ) _Thread_MP_Free_proxy( the_thread ); #endif } 4e128: 246e fffc moveal %fp@(-4),%a2 4e12c: 203c 1003 fff8 movel #268697592,%d0 4e132: 2d40 000c movel %d0,%fp@(12) 4e136: 4e5e unlk %fp 4e138: 4ef9 0004 79e8 jmp 479e8 <_Thread_Clear_state> ISR_Level level; _ISR_Disable( level ); if ( !_States_Is_waiting_on_thread_queue( the_thread->current_state ) ) { _ISR_Enable( level ); 4e13e: 46c1 movew %d1,%sr #if defined(RTEMS_MULTIPROCESSING) if ( !_Objects_Is_local_id( the_thread->Object.id ) ) _Thread_MP_Free_proxy( the_thread ); #endif } 4e140: 246e fffc moveal %fp@(-4),%a2 4e144: 4e5e unlk %fp 4e146: 4e75 rts 4e148: 7003 moveq #3,%d0 4e14a: 2540 0050 movel %d0,%a2@(80) if ( !_Watchdog_Is_active( &the_thread->Timer ) ) { _ISR_Enable( level ); } else { _Watchdog_Deactivate( &the_thread->Timer ); _ISR_Enable( level ); 4e14e: 46c1 movew %d1,%sr (void) _Watchdog_Remove( &the_thread->Timer ); 4e150: 486a 0048 pea %a2@(72) 4e154: 4eb9 0004 90a4 jsr 490a4 <_Watchdog_Remove> 4e15a: 588f addql #4,%sp 4e15c: 203c 1003 fff8 movel #268697592,%d0 4e162: 2d4a 0008 movel %a2,%fp@(8) #if defined(RTEMS_MULTIPROCESSING) if ( !_Objects_Is_local_id( the_thread->Object.id ) ) _Thread_MP_Free_proxy( the_thread ); #endif } 4e166: 246e fffc moveal %fp@(-4),%a2 4e16a: 2d40 000c movel %d0,%fp@(12) 4e16e: 4e5e unlk %fp 4e170: 4ef9 0004 79e8 jmp 479e8 <_Thread_Clear_state> ... =============================================================================== 0004c224 <_Thread_queue_Extract_priority_helper>: Chain_Node *new_first_node; Chain_Node *new_second_node; Chain_Node *last_node; the_node = (Chain_Node *) the_thread; _ISR_Disable( level ); 4c224: 203c 0000 0700 movel #1792,%d0 void _Thread_queue_Extract_priority_helper( Thread_queue_Control *the_thread_queue __attribute__((unused)), Thread_Control *the_thread, bool requeuing ) { 4c22a: 4e56 ffec linkw %fp,#-20 4c22e: 48d7 3c04 moveml %d2/%a2-%a5,%sp@ 4c232: 246e 000c moveal %fp@(12),%a2 4c236: 142e 0013 moveb %fp@(19),%d2 Chain_Node *new_first_node; Chain_Node *new_second_node; Chain_Node *last_node; the_node = (Chain_Node *) the_thread; _ISR_Disable( level ); 4c23a: 40c1 movew %sr,%d1 4c23c: 8081 orl %d1,%d0 4c23e: 46c0 movew %d0,%sr if ( !_States_Is_waiting_on_thread_queue( the_thread->current_state ) ) { 4c240: 202a 0010 movel %a2@(16),%d0 4c244: 0280 0003 bee0 andil #245472,%d0 4c24a: 677e beqs 4c2ca <_Thread_queue_Extract_priority_helper+0xa6> */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 4c24c: 200a movel %a2,%d0 4c24e: 0680 0000 003c addil #60,%d0 /* * The thread was actually waiting on a thread queue so let's remove it. */ next_node = the_node->next; 4c254: 2652 moveal %a2@,%a3 previous_node = the_node->previous; 4c256: 226a 0004 moveal %a2@(4),%a1 */ RTEMS_INLINE_ROUTINE bool _Chain_Is_empty( Chain_Control *the_chain ) { return (the_chain->first == _Chain_Tail(the_chain)); 4c25a: 206a 0038 moveal %a2@(56),%a0 */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 4c25e: b088 cmpl %a0,%d0 4c260: 6774 beqs 4c2d6 <_Thread_queue_Extract_priority_helper+0xb2> if ( !_Chain_Is_empty( &the_thread->Wait.Block2n ) ) { new_first_node = the_thread->Wait.Block2n.first; new_first_thread = (Thread_Control *) new_first_node; last_node = the_thread->Wait.Block2n.last; 4c262: 286a 0040 moveal %a2@(64),%a4 new_second_node = new_first_node->next; 4c266: 2a50 moveal %a0@,%a5 previous_node->next = new_first_node; next_node->previous = new_first_node; 4c268: 2748 0004 movel %a0,%a3@(4) new_first_node = the_thread->Wait.Block2n.first; new_first_thread = (Thread_Control *) new_first_node; last_node = the_thread->Wait.Block2n.last; new_second_node = new_first_node->next; previous_node->next = new_first_node; 4c26c: 2288 movel %a0,%a1@ next_node->previous = new_first_node; new_first_node->next = next_node; new_first_node->previous = previous_node; 4c26e: 2149 0004 movel %a1,%a0@(4) last_node = the_thread->Wait.Block2n.last; new_second_node = new_first_node->next; previous_node->next = new_first_node; next_node->previous = new_first_node; new_first_node->next = next_node; 4c272: 208b movel %a3,%a0@ new_first_node->previous = previous_node; if ( !_Chain_Has_only_one_node( &the_thread->Wait.Block2n ) ) { 4c274: 202a 0040 movel %a2@(64),%d0 4c278: b0aa 0038 cmpl %a2@(56),%d0 4c27c: 6716 beqs 4c294 <_Thread_queue_Extract_priority_helper+0x70> /* > two threads on 2-n */ new_second_node->previous = 4c27e: 43e8 0038 lea %a0@(56),%a1 4c282: 2b49 0004 movel %a1,%a5@(4) _Chain_Head( &new_first_thread->Wait.Block2n ); new_first_thread->Wait.Block2n.first = new_second_node; 4c286: 214d 0038 movel %a5,%a0@(56) new_first_thread->Wait.Block2n.last = last_node; 4c28a: 214c 0040 movel %a4,%a0@(64) last_node->next = _Chain_Tail( &new_first_thread->Wait.Block2n ); 4c28e: 41e8 003c lea %a0@(60),%a0 4c292: 2888 movel %a0,%a4@ /* * If we are not supposed to touch timers or the thread's state, return. */ if ( requeuing ) { 4c294: 4a02 tstb %d2 4c296: 6626 bnes 4c2be <_Thread_queue_Extract_priority_helper+0x9a> _ISR_Enable( level ); return; } if ( !_Watchdog_Is_active( &the_thread->Timer ) ) { 4c298: 7002 moveq #2,%d0 4c29a: b0aa 0050 cmpl %a2@(80),%d0 4c29e: 6742 beqs 4c2e2 <_Thread_queue_Extract_priority_helper+0xbe> _ISR_Enable( level ); 4c2a0: 46c1 movew %d1,%sr 4c2a2: 2d4a 0008 movel %a2,%fp@(8) 4c2a6: 227c 1003 fff8 moveal #268697592,%a1 #if defined(RTEMS_MULTIPROCESSING) if ( !_Objects_Is_local_id( the_thread->Object.id ) ) _Thread_MP_Free_proxy( the_thread ); #endif } 4c2ac: 4cee 3c04 ffec moveml %fp@(-20),%d2/%a2-%a5 4c2b2: 2d49 000c movel %a1,%fp@(12) 4c2b6: 4e5e unlk %fp 4c2b8: 4ef9 0004 79e8 jmp 479e8 <_Thread_Clear_state> /* * If we are not supposed to touch timers or the thread's state, return. */ if ( requeuing ) { _ISR_Enable( level ); 4c2be: 46c1 movew %d1,%sr #if defined(RTEMS_MULTIPROCESSING) if ( !_Objects_Is_local_id( the_thread->Object.id ) ) _Thread_MP_Free_proxy( the_thread ); #endif } 4c2c0: 4cee 3c04 ffec moveml %fp@(-20),%d2/%a2-%a5 4c2c6: 4e5e unlk %fp 4c2c8: 4e75 rts Chain_Node *last_node; the_node = (Chain_Node *) the_thread; _ISR_Disable( level ); if ( !_States_Is_waiting_on_thread_queue( the_thread->current_state ) ) { _ISR_Enable( level ); 4c2ca: 46c1 movew %d1,%sr #if defined(RTEMS_MULTIPROCESSING) if ( !_Objects_Is_local_id( the_thread->Object.id ) ) _Thread_MP_Free_proxy( the_thread ); #endif } 4c2cc: 4cee 3c04 ffec moveml %fp@(-20),%d2/%a2-%a5 4c2d2: 4e5e unlk %fp 4c2d4: 4e75 rts new_first_thread->Wait.Block2n.last = last_node; last_node->next = _Chain_Tail( &new_first_thread->Wait.Block2n ); } } else { previous_node->next = next_node; next_node->previous = previous_node; 4c2d6: 2749 0004 movel %a1,%a3@(4) new_first_thread->Wait.Block2n.last = last_node; last_node->next = _Chain_Tail( &new_first_thread->Wait.Block2n ); } } else { previous_node->next = next_node; 4c2da: 228b movel %a3,%a1@ /* * If we are not supposed to touch timers or the thread's state, return. */ if ( requeuing ) { 4c2dc: 4a02 tstb %d2 4c2de: 67b8 beqs 4c298 <_Thread_queue_Extract_priority_helper+0x74> 4c2e0: 60dc bras 4c2be <_Thread_queue_Extract_priority_helper+0x9a> 4c2e2: 7003 moveq #3,%d0 4c2e4: 2540 0050 movel %d0,%a2@(80) if ( !_Watchdog_Is_active( &the_thread->Timer ) ) { _ISR_Enable( level ); } else { _Watchdog_Deactivate( &the_thread->Timer ); _ISR_Enable( level ); 4c2e8: 46c1 movew %d1,%sr (void) _Watchdog_Remove( &the_thread->Timer ); 4c2ea: 486a 0048 pea %a2@(72) 4c2ee: 4eb9 0004 90a4 jsr 490a4 <_Watchdog_Remove> 4c2f4: 588f addql #4,%sp 4c2f6: 227c 1003 fff8 moveal #268697592,%a1 4c2fc: 2d4a 0008 movel %a2,%fp@(8) #if defined(RTEMS_MULTIPROCESSING) if ( !_Objects_Is_local_id( the_thread->Object.id ) ) _Thread_MP_Free_proxy( the_thread ); #endif } 4c300: 4cee 3c04 ffec moveml %fp@(-20),%d2/%a2-%a5 4c306: 2d49 000c movel %a1,%fp@(12) 4c30a: 4e5e unlk %fp 4c30c: 4ef9 0004 79e8 jmp 479e8 <_Thread_Clear_state> ... =============================================================================== 00048594 <_Thread_queue_Initialize>: the_thread_queue->state = state; the_thread_queue->discipline = the_discipline; the_thread_queue->timeout_status = timeout_status; the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED; if ( the_discipline == THREAD_QUEUE_DISCIPLINE_PRIORITY ) { 48594: 7201 moveq #1,%d1 Thread_queue_Control *the_thread_queue, Thread_queue_Disciplines the_discipline, States_Control state, uint32_t timeout_status ) { 48596: 4e56 0000 linkw %fp,#0 4859a: 206e 0008 moveal %fp@(8),%a0 the_thread_queue->state = state; 4859e: 216e 0010 0038 movel %fp@(16),%a0@(56) Thread_queue_Control *the_thread_queue, Thread_queue_Disciplines the_discipline, States_Control state, uint32_t timeout_status ) { 485a4: 202e 000c movel %fp@(12),%d0 the_thread_queue->state = state; the_thread_queue->discipline = the_discipline; the_thread_queue->timeout_status = timeout_status; 485a8: 216e 0014 003c movel %fp@(20),%a0@(60) States_Control state, uint32_t timeout_status ) { the_thread_queue->state = state; the_thread_queue->discipline = the_discipline; 485ae: 2140 0034 movel %d0,%a0@(52) the_thread_queue->timeout_status = timeout_status; the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED; 485b2: 42a8 0030 clrl %a0@(48) if ( the_discipline == THREAD_QUEUE_DISCIPLINE_PRIORITY ) { 485b6: b280 cmpl %d0,%d1 485b8: 6712 beqs 485cc <_Thread_queue_Initialize+0x38> */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 485ba: 2008 movel %a0,%d0 485bc: 5880 addql #4,%d0 the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain); 485be: 2148 0008 movel %a0,%a0@(8) */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 485c2: 2080 movel %d0,%a0@ the_chain->permanent_null = NULL; 485c4: 42a8 0004 clrl %a0@(4) _Chain_Initialize_empty( &the_thread_queue->Queues.Priority[index] ); } else { /* must be THREAD_QUEUE_DISCIPLINE_FIFO */ _Chain_Initialize_empty( &the_thread_queue->Queues.Fifo ); } } 485c8: 4e5e unlk %fp 485ca: 4e75 rts * timeout_status - return on a timeout * * Output parameters: NONE */ void _Thread_queue_Initialize( 485cc: 2008 movel %a0,%d0 485ce: 0680 0000 0030 addil #48,%d0 */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 485d4: 2208 movel %a0,%d1 485d6: 5881 addql #4,%d1 the_chain->permanent_null = NULL; 485d8: 42a8 0004 clrl %a0@(4) */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 485dc: 2081 movel %d1,%a0@ the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain); 485de: 2148 0008 movel %a0,%a0@(8) 485e2: 41e8 000c lea %a0@(12),%a0 the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_SYNCHRONIZED; if ( the_discipline == THREAD_QUEUE_DISCIPLINE_PRIORITY ) { uint32_t index; for( index=0 ; 485e6: b088 cmpl %a0,%d0 485e8: 67de beqs 485c8 <_Thread_queue_Initialize+0x34> <== NEVER TAKEN */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 485ea: 2208 movel %a0,%d1 485ec: 5881 addql #4,%d1 the_chain->permanent_null = NULL; 485ee: 42a8 0004 clrl %a0@(4) */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 485f2: 2081 movel %d1,%a0@ the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain); 485f4: 2148 0008 movel %a0,%a0@(8) 485f8: 41e8 000c lea %a0@(12),%a0 485fc: b088 cmpl %a0,%d0 485fe: 66d4 bnes 485d4 <_Thread_queue_Initialize+0x40> 48600: 60c6 bras 485c8 <_Thread_queue_Initialize+0x34> ... =============================================================================== 0004c314 <_Thread_queue_Process_timeout>: #include void _Thread_queue_Process_timeout( Thread_Control *the_thread ) { 4c314: 4e56 0000 linkw %fp,#0 4c318: 206e 0008 moveal %fp@(8),%a0 Thread_queue_Control *the_thread_queue = the_thread->Wait.queue; 4c31c: 2268 0044 moveal %a0@(68),%a1 * If it is not satisfied, then it is "nothing happened" and * this is the "timeout" transition. After a request is satisfied, * a timeout is not allowed to occur. */ if ( the_thread_queue->sync_state != THREAD_BLOCKING_OPERATION_SYNCHRONIZED && 4c320: 2029 0030 movel %a1@(48),%d0 4c324: 6708 beqs 4c32e <_Thread_queue_Process_timeout+0x1a> 4c326: b1f9 0005 f032 cmpal 5f032 <_Thread_Executing>,%a0 4c32c: 6718 beqs 4c346 <_Thread_queue_Process_timeout+0x32><== ALWAYS TAKEN if ( the_thread_queue->sync_state != THREAD_BLOCKING_OPERATION_SATISFIED ) { the_thread->Wait.return_code = the_thread->Wait.queue->timeout_status; the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_TIMEOUT; } } else { the_thread->Wait.return_code = the_thread->Wait.queue->timeout_status; 4c32e: 2169 003c 0034 movel %a1@(60),%a0@(52) _Thread_queue_Extract( the_thread->Wait.queue, the_thread ); 4c334: 2f08 movel %a0,%sp@- 4c336: 2f28 0044 movel %a0@(68),%sp@- 4c33a: 4eb9 0004 c1ec jsr 4c1ec <_Thread_queue_Extract> 4c340: 508f addql #8,%sp } } 4c342: 4e5e unlk %fp 4c344: 4e75 rts * a timeout is not allowed to occur. */ if ( the_thread_queue->sync_state != THREAD_BLOCKING_OPERATION_SYNCHRONIZED && _Thread_Is_executing( the_thread ) ) { if ( the_thread_queue->sync_state != THREAD_BLOCKING_OPERATION_SATISFIED ) { 4c346: 7203 moveq #3,%d1 4c348: b280 cmpl %d0,%d1 4c34a: 67f6 beqs 4c342 <_Thread_queue_Process_timeout+0x2e> the_thread->Wait.return_code = the_thread->Wait.queue->timeout_status; the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_TIMEOUT; 4c34c: 7002 moveq #2,%d0 } } else { the_thread->Wait.return_code = the_thread->Wait.queue->timeout_status; _Thread_queue_Extract( the_thread->Wait.queue, the_thread ); } } 4c34e: 4e5e unlk %fp */ if ( the_thread_queue->sync_state != THREAD_BLOCKING_OPERATION_SYNCHRONIZED && _Thread_Is_executing( the_thread ) ) { if ( the_thread_queue->sync_state != THREAD_BLOCKING_OPERATION_SATISFIED ) { the_thread->Wait.return_code = the_thread->Wait.queue->timeout_status; 4c350: 2169 003c 0034 movel %a1@(60),%a0@(52) the_thread_queue->sync_state = THREAD_BLOCKING_OPERATION_TIMEOUT; 4c356: 2340 0030 movel %d0,%a1@(48) } } else { the_thread->Wait.return_code = the_thread->Wait.queue->timeout_status; _Thread_queue_Extract( the_thread->Wait.queue, the_thread ); } } =============================================================================== 00048604 <_Thread_queue_Requeue>: void _Thread_queue_Requeue( Thread_queue_Control *the_thread_queue, Thread_Control *the_thread ) { 48604: 4e56 fff0 linkw %fp,#-16 48608: 48d7 0c04 moveml %d2/%a2-%a3,%sp@ 4860c: 246e 0008 moveal %fp@(8),%a2 48610: 266e 000c moveal %fp@(12),%a3 /* * Just in case the thread really wasn't blocked on a thread queue * when we get here. */ if ( !the_thread_queue ) 48614: 4a8a tstl %a2 48616: 6708 beqs 48620 <_Thread_queue_Requeue+0x1c> <== NEVER TAKEN /* * If queueing by FIFO, there is nothing to do. This only applies to * priority blocking discipline. */ if ( the_thread_queue->discipline == THREAD_QUEUE_DISCIPLINE_PRIORITY ) { 48618: 7001 moveq #1,%d0 4861a: b0aa 0034 cmpl %a2@(52),%d0 4861e: 670a beqs 4862a <_Thread_queue_Requeue+0x26> <== ALWAYS TAKEN _Thread_queue_Extract_priority_helper( tq, the_thread, true ); (void) _Thread_queue_Enqueue_priority( tq, the_thread, &level_ignored ); } _ISR_Enable( level ); } } 48620: 4cee 0c04 fff0 moveml %fp@(-16),%d2/%a2-%a3 <== NOT EXECUTED 48626: 4e5e unlk %fp <== NOT EXECUTED 48628: 4e75 rts <== NOT EXECUTED if ( the_thread_queue->discipline == THREAD_QUEUE_DISCIPLINE_PRIORITY ) { Thread_queue_Control *tq = the_thread_queue; ISR_Level level; ISR_Level level_ignored; _ISR_Disable( level ); 4862a: 303c 0700 movew #1792,%d0 4862e: 40c2 movew %sr,%d2 48630: 8082 orl %d2,%d0 48632: 46c0 movew %d0,%sr if ( _States_Is_waiting_on_thread_queue( the_thread->current_state ) ) { 48634: 202b 0010 movel %a3@(16),%d0 48638: 0280 0003 bee0 andil #245472,%d0 4863e: 660c bnes 4864c <_Thread_queue_Requeue+0x48> <== ALWAYS TAKEN _Thread_queue_Enter_critical_section( tq ); _Thread_queue_Extract_priority_helper( tq, the_thread, true ); (void) _Thread_queue_Enqueue_priority( tq, the_thread, &level_ignored ); } _ISR_Enable( level ); 48640: 46c2 movew %d2,%sr <== NOT EXECUTED } } 48642: 4cee 0c04 fff0 moveml %fp@(-16),%d2/%a2-%a3 48648: 4e5e unlk %fp 4864a: 4e75 rts ISR_Level level_ignored; _ISR_Disable( level ); if ( _States_Is_waiting_on_thread_queue( the_thread->current_state ) ) { _Thread_queue_Enter_critical_section( tq ); _Thread_queue_Extract_priority_helper( tq, the_thread, true ); 4864c: 4878 0001 pea 1 48650: 7001 moveq #1,%d0 48652: 2f0b movel %a3,%sp@- 48654: 2540 0030 movel %d0,%a2@(48) 48658: 2f0a movel %a2,%sp@- 4865a: 4eb9 0004 c224 jsr 4c224 <_Thread_queue_Extract_priority_helper> (void) _Thread_queue_Enqueue_priority( tq, the_thread, &level_ignored ); 48660: 486e fffc pea %fp@(-4) 48664: 2f0b movel %a3,%sp@- 48666: 2f0a movel %a2,%sp@- 48668: 4eb9 0004 83b4 jsr 483b4 <_Thread_queue_Enqueue_priority> 4866e: 4fef 0018 lea %sp@(24),%sp } _ISR_Enable( level ); 48672: 46c2 movew %d2,%sr 48674: 60cc bras 48642 <_Thread_queue_Requeue+0x3e> ... =============================================================================== 00048678 <_Thread_queue_Timeout>: void _Thread_queue_Timeout( Objects_Id id, void *ignored __attribute__((unused)) ) { 48678: 4e56 fffc linkw %fp,#-4 Thread_Control *the_thread; Objects_Locations location; the_thread = _Thread_Get( id, &location ); 4867c: 486e fffc pea %fp@(-4) 48680: 2f2e 0008 movel %fp@(8),%sp@- 48684: 4eb9 0004 7de4 jsr 47de4 <_Thread_Get> switch ( location ) { 4868a: 508f addql #8,%sp 4868c: 4aae fffc tstl %fp@(-4) 48690: 6618 bnes 486aa <_Thread_queue_Timeout+0x32> <== NEVER TAKEN #if defined(RTEMS_MULTIPROCESSING) case OBJECTS_REMOTE: /* impossible */ #endif break; case OBJECTS_LOCAL: _Thread_queue_Process_timeout( the_thread ); 48692: 2f00 movel %d0,%sp@- 48694: 4eb9 0004 c314 jsr 4c314 <_Thread_queue_Process_timeout> */ RTEMS_INLINE_ROUTINE void _Thread_Unnest_dispatch( void ) { RTEMS_COMPILER_MEMORY_BARRIER(); _Thread_Dispatch_disable_level -= 1; 4869a: 588f addql #4,%sp 4869c: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 486a2: 5380 subql #1,%d0 486a4: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> _Thread_Unnest_dispatch(); break; } } 486aa: 4e5e unlk %fp ... =============================================================================== 0005944c <_Timer_server_Body>: * @a arg points to the corresponding timer server control block. */ static rtems_task _Timer_server_Body( rtems_task_argument arg ) { 5944c: 4e56 ffb0 linkw %fp,#-80 59450: 41ee ffec lea %fp@(-20),%a0 59454: 48d7 3cfc moveml %d2-%d7/%a2-%a5,%sp@ 59458: 246e 0008 moveal %fp@(8),%a2 5945c: 2c0e movel %fp,%d6 5945e: 260e movel %fp,%d3 59460: 5186 subql #8,%d6 59462: 0683 ffff ffe8 addil #-24,%d3 */ Watchdog_Interval delta = snapshot - watchdogs->last_snapshot; watchdogs->last_snapshot = snapshot; _Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain ); 59468: 240a movel %a2,%d2 /* * 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 ); 5946a: 2a0a movel %a2,%d5 5946c: 4bf9 0005 d70c lea 5d70c <_Watchdog_Adjust_to_chain>,%a5 */ Watchdog_Interval delta = snapshot - watchdogs->last_snapshot; watchdogs->last_snapshot = snapshot; _Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain ); 59472: 0682 0000 0030 addil #48,%d2 /* * 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 ); 59478: 0685 0000 0068 addil #104,%d5 5947e: 47f9 0005 9f08 lea 59f08 <_Chain_Get>,%a3 59484: 49f9 0005 d79c lea 5d79c <_Watchdog_Insert>,%a4 * of zero it will be processed in the next iteration of the timer server * body loop. */ _Timer_server_Process_insertions( ts ); _ISR_Disable( level ); 5948a: 283c 0000 0700 movel #1792,%d4 59490: 2d48 ffd8 movel %a0,%fp@(-40) static void _Timer_server_Stop_interval_system_watchdog( Timer_server_Control *ts ) { _Watchdog_Remove( &ts->Interval_watchdogs.System_watchdog ); 59494: 41ea 0008 lea %a2@(8),%a0 59498: 2d48 ffe0 movel %a0,%fp@(-32) static void _Timer_server_Stop_tod_system_watchdog( Timer_server_Control *ts ) { _Watchdog_Remove( &ts->TOD_watchdogs.System_watchdog ); 5949c: 41ea 0040 lea %a2@(64),%a0 594a0: 2d48 ffe4 movel %a0,%fp@(-28) Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain); 594a4: 41ee fff4 lea %fp@(-12),%a0 594a8: 2d48 fffc movel %a0,%fp@(-4) */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 594ac: 41ee ffec lea %fp@(-20),%a0 594b0: 2d46 fff4 movel %d6,%fp@(-12) the_chain->permanent_null = NULL; 594b4: 42ae fff8 clrl %fp@(-8) */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 594b8: 2d48 ffe8 movel %a0,%fp@(-24) the_chain->permanent_null = NULL; 594bc: 42ae ffec clrl %fp@(-20) the_chain->last = _Chain_Head(the_chain); 594c0: 2d43 fff0 movel %d3,%fp@(-16) { /* * 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; 594c4: 41ee fff4 lea %fp@(-12),%a0 594c8: 2548 0078 movel %a0,%a2@(120) static void _Timer_server_Process_interval_watchdogs( Timer_server_Watchdogs *watchdogs, Chain_Control *fire_chain ) { Watchdog_Interval snapshot = _Watchdog_Ticks_since_boot; 594cc: 2039 0007 e910 movel 7e910 <_Watchdog_Ticks_since_boot>,%d0 /* * We assume adequate unsigned arithmetic here. */ Watchdog_Interval delta = snapshot - watchdogs->last_snapshot; 594d2: 222a 003c movel %a2@(60),%d1 watchdogs->last_snapshot = snapshot; 594d6: 2540 003c movel %d0,%a2@(60) _Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain ); 594da: 9081 subl %d1,%d0 594dc: 2f03 movel %d3,%sp@- 594de: 2f00 movel %d0,%sp@- 594e0: 2f02 movel %d2,%sp@- 594e2: 4e95 jsr %a5@ static void _Timer_server_Process_tod_watchdogs( Timer_server_Watchdogs *watchdogs, Chain_Control *fire_chain ) { Watchdog_Interval snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch(); 594e4: 2039 0007 e85e movel 7e85e <_TOD_Now>,%d0 /* * Process the seconds chain. Start by checking that the Time * of Day (TOD) has not been set backwards. If it has then * we want to adjust the watchdogs->Chain to indicate this. */ if ( snapshot > last_snapshot ) { 594ea: 4fef 000c lea %sp@(12),%sp Timer_server_Watchdogs *watchdogs, Chain_Control *fire_chain ) { Watchdog_Interval snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch(); Watchdog_Interval last_snapshot = watchdogs->last_snapshot; 594ee: 222a 0074 movel %a2@(116),%d1 /* * Process the seconds chain. Start by checking that the Time * of Day (TOD) has not been set backwards. If it has then * we want to adjust the watchdogs->Chain to indicate this. */ if ( snapshot > last_snapshot ) { 594f2: b280 cmpl %d0,%d1 594f4: 6500 0086 bcsw 5957c <_Timer_server_Body+0x130> * TOD has been set forward. */ delta = snapshot - last_snapshot; _Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain ); } else if ( snapshot < last_snapshot ) { 594f8: b280 cmpl %d0,%d1 594fa: 6200 00a4 bhiw 595a0 <_Timer_server_Body+0x154> */ delta = last_snapshot - snapshot; _Watchdog_Adjust( &watchdogs->Chain, WATCHDOG_BACKWARD, delta ); } watchdogs->last_snapshot = snapshot; 594fe: 2540 0074 movel %d0,%a2@(116) } static void _Timer_server_Process_insertions( Timer_server_Control *ts ) { while ( true ) { Timer_Control *timer = (Timer_Control *) _Chain_Get( ts->insert_chain ); 59502: 202a 0078 movel %a2@(120),%d0 59506: 2f00 movel %d0,%sp@- 59508: 4e93 jsr %a3@ if ( timer == NULL ) { 5950a: 588f addql #4,%sp 5950c: 4a80 tstl %d0 5950e: 672e beqs 5953e <_Timer_server_Body+0xf2> <== ALWAYS TAKEN static void _Timer_server_Insert_timer( Timer_server_Control *ts, Timer_Control *timer ) { if ( timer->the_class == TIMER_INTERVAL_ON_TASK ) { 59510: 2040 moveal %d0,%a0 <== NOT EXECUTED 59512: 7e01 moveq #1,%d7 <== NOT EXECUTED 59514: 2228 0038 movel %a0@(56),%d1 <== NOT EXECUTED 59518: be81 cmpl %d1,%d7 <== NOT EXECUTED 5951a: 6700 00a8 beqw 595c4 <_Timer_server_Body+0x178> <== NOT EXECUTED _Watchdog_Insert( &ts->Interval_watchdogs.Chain, &timer->Ticker ); } else if ( timer->the_class == TIMER_TIME_OF_DAY_ON_TASK ) { 5951e: 7e03 moveq #3,%d7 <== NOT EXECUTED 59520: be81 cmpl %d1,%d7 <== NOT EXECUTED 59522: 66de bnes 59502 <_Timer_server_Body+0xb6> <== NOT EXECUTED _Watchdog_Insert( &ts->TOD_watchdogs.Chain, &timer->Ticker ); 59524: 2040 moveal %d0,%a0 <== NOT EXECUTED 59526: 4868 0010 pea %a0@(16) <== NOT EXECUTED 5952a: 2f05 movel %d5,%sp@- <== NOT EXECUTED 5952c: 4e94 jsr %a4@ <== NOT EXECUTED } static void _Timer_server_Process_insertions( Timer_server_Control *ts ) { while ( true ) { Timer_Control *timer = (Timer_Control *) _Chain_Get( ts->insert_chain ); 5952e: 202a 0078 movel %a2@(120),%d0 <== NOT EXECUTED ) { if ( timer->the_class == TIMER_INTERVAL_ON_TASK ) { _Watchdog_Insert( &ts->Interval_watchdogs.Chain, &timer->Ticker ); } else if ( timer->the_class == TIMER_TIME_OF_DAY_ON_TASK ) { _Watchdog_Insert( &ts->TOD_watchdogs.Chain, &timer->Ticker ); 59532: 508f addql #8,%sp <== NOT EXECUTED } static void _Timer_server_Process_insertions( Timer_server_Control *ts ) { while ( true ) { Timer_Control *timer = (Timer_Control *) _Chain_Get( ts->insert_chain ); 59534: 2f00 movel %d0,%sp@- <== NOT EXECUTED 59536: 4e93 jsr %a3@ <== NOT EXECUTED if ( timer == NULL ) { 59538: 588f addql #4,%sp <== NOT EXECUTED 5953a: 4a80 tstl %d0 <== NOT EXECUTED 5953c: 66d2 bnes 59510 <_Timer_server_Body+0xc4> <== NOT EXECUTED * of zero it will be processed in the next iteration of the timer server * body loop. */ _Timer_server_Process_insertions( ts ); _ISR_Disable( level ); 5953e: 2004 movel %d4,%d0 59540: 40c1 movew %sr,%d1 59542: 8081 orl %d1,%d0 59544: 46c0 movew %d0,%sr if ( _Chain_Is_empty( insert_chain ) ) { 59546: bcae fff4 cmpl %fp@(-12),%d6 5954a: 6700 0086 beqw 595d2 <_Timer_server_Body+0x186> ts->insert_chain = NULL; _ISR_Enable( level ); break; } else { _ISR_Enable( level ); 5954e: 46c1 movew %d1,%sr <== NOT EXECUTED static void _Timer_server_Process_interval_watchdogs( Timer_server_Watchdogs *watchdogs, Chain_Control *fire_chain ) { Watchdog_Interval snapshot = _Watchdog_Ticks_since_boot; 59550: 2039 0007 e910 movel 7e910 <_Watchdog_Ticks_since_boot>,%d0<== NOT EXECUTED /* * We assume adequate unsigned arithmetic here. */ Watchdog_Interval delta = snapshot - watchdogs->last_snapshot; 59556: 222a 003c movel %a2@(60),%d1 <== NOT EXECUTED watchdogs->last_snapshot = snapshot; 5955a: 2540 003c movel %d0,%a2@(60) <== NOT EXECUTED _Watchdog_Adjust_to_chain( &watchdogs->Chain, delta, fire_chain ); 5955e: 9081 subl %d1,%d0 <== NOT EXECUTED 59560: 2f03 movel %d3,%sp@- <== NOT EXECUTED 59562: 2f00 movel %d0,%sp@- <== NOT EXECUTED 59564: 2f02 movel %d2,%sp@- <== NOT EXECUTED 59566: 4e95 jsr %a5@ <== NOT EXECUTED static void _Timer_server_Process_tod_watchdogs( Timer_server_Watchdogs *watchdogs, Chain_Control *fire_chain ) { Watchdog_Interval snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch(); 59568: 2039 0007 e85e movel 7e85e <_TOD_Now>,%d0 <== NOT EXECUTED /* * 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 ) { 5956e: 4fef 000c lea %sp@(12),%sp <== NOT EXECUTED Timer_server_Watchdogs *watchdogs, Chain_Control *fire_chain ) { Watchdog_Interval snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch(); Watchdog_Interval last_snapshot = watchdogs->last_snapshot; 59572: 222a 0074 movel %a2@(116),%d1 <== NOT EXECUTED /* * 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 ) { 59576: b280 cmpl %d0,%d1 <== NOT EXECUTED 59578: 6400 ff7e bccw 594f8 <_Timer_server_Body+0xac> <== NOT EXECUTED /* * 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 ); 5957c: 2f03 movel %d3,%sp@- 5957e: 2e00 movel %d0,%d7 59580: 9e81 subl %d1,%d7 59582: 2f07 movel %d7,%sp@- 59584: 2d40 ffdc movel %d0,%fp@(-36) 59588: 2f05 movel %d5,%sp@- 5958a: 4eb9 0005 d70c jsr 5d70c <_Watchdog_Adjust_to_chain> 59590: 202e ffdc movel %fp@(-36),%d0 59594: 4fef 000c lea %sp@(12),%sp */ delta = last_snapshot - snapshot; _Watchdog_Adjust( &watchdogs->Chain, WATCHDOG_BACKWARD, delta ); } watchdogs->last_snapshot = snapshot; 59598: 2540 0074 movel %d0,%a2@(116) 5959c: 6000 ff64 braw 59502 <_Timer_server_Body+0xb6> /* * 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 ); 595a0: 9280 subl %d0,%d1 595a2: 2f01 movel %d1,%sp@- 595a4: 4878 0001 pea 1 595a8: 2d40 ffdc movel %d0,%fp@(-36) 595ac: 2f05 movel %d5,%sp@- 595ae: 4eb9 0005 d678 jsr 5d678 <_Watchdog_Adjust> 595b4: 202e ffdc movel %fp@(-36),%d0 595b8: 4fef 000c lea %sp@(12),%sp } watchdogs->last_snapshot = snapshot; 595bc: 2540 0074 movel %d0,%a2@(116) 595c0: 6000 ff40 braw 59502 <_Timer_server_Body+0xb6> Timer_server_Control *ts, Timer_Control *timer ) { if ( timer->the_class == TIMER_INTERVAL_ON_TASK ) { _Watchdog_Insert( &ts->Interval_watchdogs.Chain, &timer->Ticker ); 595c4: 4868 0010 pea %a0@(16) <== NOT EXECUTED 595c8: 2f02 movel %d2,%sp@- <== NOT EXECUTED 595ca: 4e94 jsr %a4@ <== NOT EXECUTED 595cc: 508f addql #8,%sp <== NOT EXECUTED 595ce: 6000 ff32 braw 59502 <_Timer_server_Body+0xb6> <== NOT EXECUTED */ _Timer_server_Process_insertions( ts ); _ISR_Disable( level ); if ( _Chain_Is_empty( insert_chain ) ) { ts->insert_chain = NULL; 595d2: 42aa 0078 clrl %a2@(120) _ISR_Enable( level ); 595d6: 46c1 movew %d1,%sr _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 ) ) { 595d8: 202e ffd8 movel %fp@(-40),%d0 595dc: b0ae ffe8 cmpl %fp@(-24),%d0 595e0: 6752 beqs 59634 <_Timer_server_Body+0x1e8> /* * It is essential that interrupts are disable here since an interrupt * service routine may remove a watchdog from the chain. */ _ISR_Disable( level ); 595e2: 2204 movel %d4,%d1 595e4: 40c0 movew %sr,%d0 595e6: 8280 orl %d0,%d1 595e8: 46c1 movew %d1,%sr */ RTEMS_INLINE_ROUTINE bool _Chain_Is_empty( Chain_Control *the_chain ) { return (the_chain->first == _Chain_Tail(the_chain)); 595ea: 206e ffe8 moveal %fp@(-24),%a0 */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Get_unprotected( Chain_Control *the_chain ) { if ( !_Chain_Is_empty(the_chain)) 595ee: b1ee ffd8 cmpal %fp@(-40),%a0 595f2: 6732 beqs 59626 <_Timer_server_Body+0x1da> <== NEVER TAKEN { Chain_Node *return_node; Chain_Node *new_first; return_node = the_chain->first; new_first = return_node->next; 595f4: 2250 moveal %a0@,%a1 the_chain->first = new_first; 595f6: 2d49 ffe8 movel %a1,%fp@(-24) watchdog = (Watchdog_Control *) _Chain_Get_unprotected( &fire_chain ); if ( watchdog != NULL ) { watchdog->state = WATCHDOG_INACTIVE; 595fa: 42a8 0008 clrl %a0@(8) new_first->previous = _Chain_Head(the_chain); 595fe: 2343 0004 movel %d3,%a1@(4) _ISR_Enable( level ); 59602: 46c0 movew %d0,%sr /* * The timer server may block here and wait for resources or time. * The system watchdogs are inactive and will remain inactive since * the active flag of the timer server is true. */ (*watchdog->routine)( watchdog->id, watchdog->user_data ); 59604: 2f28 0024 movel %a0@(36),%sp@- 59608: 2f28 0020 movel %a0@(32),%sp@- 5960c: 2068 001c moveal %a0@(28),%a0 59610: 4e90 jsr %a0@ } 59612: 508f addql #8,%sp /* * It is essential that interrupts are disable here since an interrupt * service routine may remove a watchdog from the chain. */ _ISR_Disable( level ); 59614: 2204 movel %d4,%d1 59616: 40c0 movew %sr,%d0 59618: 8280 orl %d0,%d1 5961a: 46c1 movew %d1,%sr */ RTEMS_INLINE_ROUTINE bool _Chain_Is_empty( Chain_Control *the_chain ) { return (the_chain->first == _Chain_Tail(the_chain)); 5961c: 206e ffe8 moveal %fp@(-24),%a0 */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Get_unprotected( Chain_Control *the_chain ) { if ( !_Chain_Is_empty(the_chain)) 59620: b1ee ffd8 cmpal %fp@(-40),%a0 59624: 66ce bnes 595f4 <_Timer_server_Body+0x1a8> watchdog = (Watchdog_Control *) _Chain_Get_unprotected( &fire_chain ); if ( watchdog != NULL ) { watchdog->state = WATCHDOG_INACTIVE; _ISR_Enable( level ); } else { _ISR_Enable( level ); 59626: 46c0 movew %d0,%sr { /* * 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; 59628: 41ee fff4 lea %fp@(-12),%a0 5962c: 2548 0078 movel %a0,%a2@(120) 59630: 6000 fe9a braw 594cc <_Timer_server_Body+0x80> * the active flag of the timer server is true. */ (*watchdog->routine)( watchdog->id, watchdog->user_data ); } } else { ts->active = false; 59634: 4207 clrb %d7 59636: 1547 007c moveb %d7,%a2@(124) 5963a: 2039 0007 e7cc movel 7e7cc <_Thread_Dispatch_disable_level>,%d0 59640: 5280 addql #1,%d0 59642: 23c0 0007 e7cc movel %d0,7e7cc <_Thread_Dispatch_disable_level> /* * Block until there is something to do. */ _Thread_Disable_dispatch(); _Thread_Set_state( ts->thread, STATES_DELAYING ); 59648: 4878 0008 pea 8 5964c: 2f12 movel %a2@,%sp@- 5964e: 4eb9 0005 cd90 jsr 5cd90 <_Thread_Set_state> _Timer_server_Reset_interval_system_watchdog( ts ); 59654: 2f0a movel %a2,%sp@- 59656: 4eba fd1c jsr %pc@(59374 <_Timer_server_Reset_interval_system_watchdog>) _Timer_server_Reset_tod_system_watchdog( ts ); 5965a: 2f0a movel %a2,%sp@- 5965c: 4eba fd80 jsr %pc@(593de <_Timer_server_Reset_tod_system_watchdog>) _Thread_Enable_dispatch(); 59660: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> ts->active = true; 59666: 7001 moveq #1,%d0 59668: 1540 007c moveb %d0,%a2@(124) static void _Timer_server_Stop_interval_system_watchdog( Timer_server_Control *ts ) { _Watchdog_Remove( &ts->Interval_watchdogs.System_watchdog ); 5966c: 2f2e ffe0 movel %fp@(-32),%sp@- 59670: 4eb9 0005 d8e4 jsr 5d8e4 <_Watchdog_Remove> static void _Timer_server_Stop_tod_system_watchdog( Timer_server_Control *ts ) { _Watchdog_Remove( &ts->TOD_watchdogs.System_watchdog ); 59676: 2f2e ffe4 movel %fp@(-28),%sp@- 5967a: 4eb9 0005 d8e4 jsr 5d8e4 <_Watchdog_Remove> 59680: 4fef 0018 lea %sp@(24),%sp 59684: 6000 fe3e braw 594c4 <_Timer_server_Body+0x78> =============================================================================== 00059688 <_Timer_server_Schedule_operation_method>: static void _Timer_server_Schedule_operation_method( Timer_server_Control *ts, Timer_Control *timer ) { 59688: 4e56 fff0 linkw %fp,#-16 5968c: 206e 000c moveal %fp@(12),%a0 59690: 48d7 041c moveml %d2-%d4/%a2,%sp@ 59694: 246e 0008 moveal %fp@(8),%a2 if ( ts->insert_chain == NULL ) { 59698: 202a 0078 movel %a2@(120),%d0 5969c: 671a beqs 596b8 <_Timer_server_Schedule_operation_method+0x30><== ALWAYS TAKEN * server is not preemptible, so we must be in interrupt context here. No * thread dispatch will happen until the timer server finishes its * critical section. We have to use the protected chain methods because * we may be interrupted by a higher priority interrupt. */ _Chain_Append( ts->insert_chain, &timer->Object.Node ); 5969e: 202a 0078 movel %a2@(120),%d0 <== NOT EXECUTED 596a2: 2d48 000c movel %a0,%fp@(12) <== NOT EXECUTED } } 596a6: 4cee 041c fff0 moveml %fp@(-16),%d2-%d4/%a2 <== NOT EXECUTED * server is not preemptible, so we must be in interrupt context here. No * thread dispatch will happen until the timer server finishes its * critical section. We have to use the protected chain methods because * we may be interrupted by a higher priority interrupt. */ _Chain_Append( ts->insert_chain, &timer->Object.Node ); 596ac: 2d40 0008 movel %d0,%fp@(8) <== NOT EXECUTED } } 596b0: 4e5e unlk %fp <== NOT EXECUTED * server is not preemptible, so we must be in interrupt context here. No * thread dispatch will happen until the timer server finishes its * critical section. We have to use the protected chain methods because * we may be interrupted by a higher priority interrupt. */ _Chain_Append( ts->insert_chain, &timer->Object.Node ); 596b2: 4ef9 0005 9ed0 jmp 59ed0 <_Chain_Append> <== NOT EXECUTED 596b8: 2039 0007 e7cc movel 7e7cc <_Thread_Dispatch_disable_level>,%d0 596be: 5280 addql #1,%d0 596c0: 23c0 0007 e7cc movel %d0,7e7cc <_Thread_Dispatch_disable_level> * being inserted. This could result in an integer overflow. */ _Thread_Disable_dispatch(); if ( timer->the_class == TIMER_INTERVAL_ON_TASK ) { 596c6: 2028 0038 movel %a0@(56),%d0 596ca: 7201 moveq #1,%d1 596cc: b280 cmpl %d0,%d1 596ce: 6700 0088 beqw 59758 <_Timer_server_Schedule_operation_method+0xd0> _Watchdog_Insert( &ts->Interval_watchdogs.Chain, &timer->Ticker ); if ( !ts->active ) { _Timer_server_Reset_interval_system_watchdog( ts ); } } else if ( timer->the_class == TIMER_TIME_OF_DAY_ON_TASK ) { 596d2: 7203 moveq #3,%d1 596d4: b280 cmpl %d0,%d1 596d6: 670e beqs 596e6 <_Timer_server_Schedule_operation_method+0x5e> * critical section. We have to use the protected chain methods because * we may be interrupted by a higher priority interrupt. */ _Chain_Append( ts->insert_chain, &timer->Object.Node ); } } 596d8: 4cee 041c fff0 moveml %fp@(-16),%d2-%d4/%a2 596de: 4e5e unlk %fp if ( !ts->active ) { _Timer_server_Reset_tod_system_watchdog( ts ); } } _Thread_Enable_dispatch(); 596e0: 4ef9 0005 c2c0 jmp 5c2c0 <_Thread_Enable_dispatch> } else if ( timer->the_class == TIMER_TIME_OF_DAY_ON_TASK ) { /* * We have to advance the last known seconds value of the server and update * the watchdog chain accordingly. */ _ISR_Disable( level ); 596e6: 203c 0000 0700 movel #1792,%d0 596ec: 40c2 movew %sr,%d2 596ee: 8082 orl %d2,%d0 596f0: 46c0 movew %d0,%sr */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 596f2: 260a movel %a2,%d3 596f4: 0683 0000 006c addil #108,%d3 snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch(); 596fa: 2039 0007 e85e movel 7e85e <_TOD_Now>,%d0 last_snapshot = ts->TOD_watchdogs.last_snapshot; 59700: 222a 0074 movel %a2@(116),%d1 */ RTEMS_INLINE_ROUTINE bool _Chain_Is_empty( Chain_Control *the_chain ) { return (the_chain->first == _Chain_Tail(the_chain)); 59704: 226a 0068 moveal %a2@(104),%a1 */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 59708: b689 cmpl %a1,%d3 5970a: 671a beqs 59726 <_Timer_server_Schedule_operation_method+0x9e> if ( !_Chain_Is_empty( &ts->TOD_watchdogs.Chain ) ) { first_watchdog = _Watchdog_First( &ts->TOD_watchdogs.Chain ); delta_interval = first_watchdog->delta_interval; 5970c: 2629 0010 movel %a1@(16),%d3 if ( snapshot > last_snapshot ) { 59710: b280 cmpl %d0,%d1 59712: 6400 00b8 bccw 597cc <_Timer_server_Schedule_operation_method+0x144> /* * We advanced in time. */ delta = snapshot - last_snapshot; 59716: 2800 movel %d0,%d4 59718: 9881 subl %d1,%d4 if (delta_interval > delta) { 5971a: b883 cmpl %d3,%d4 5971c: 6500 00ba bcsw 597d8 <_Timer_server_Schedule_operation_method+0x150> 59720: 4281 clrl %d1 <== NOT EXECUTED * Someone put us in the past. */ delta = last_snapshot - snapshot; delta_interval += delta; } first_watchdog->delta_interval = delta_interval; 59722: 2341 0010 movel %d1,%a1@(16) <== NOT EXECUTED } ts->TOD_watchdogs.last_snapshot = snapshot; 59726: 2540 0074 movel %d0,%a2@(116) _ISR_Enable( level ); 5972a: 46c2 movew %d2,%sr _Watchdog_Insert( &ts->TOD_watchdogs.Chain, &timer->Ticker ); 5972c: 4868 0010 pea %a0@(16) 59730: 486a 0068 pea %a2@(104) 59734: 4eb9 0005 d79c jsr 5d79c <_Watchdog_Insert> if ( !ts->active ) { 5973a: 508f addql #8,%sp 5973c: 102a 007c moveb %a2@(124),%d0 59740: 6696 bnes 596d8 <_Timer_server_Schedule_operation_method+0x50> _Timer_server_Reset_tod_system_watchdog( ts ); 59742: 2f0a movel %a2,%sp@- 59744: 4eba fc98 jsr %pc@(593de <_Timer_server_Reset_tod_system_watchdog>) 59748: 588f addql #4,%sp * critical section. We have to use the protected chain methods because * we may be interrupted by a higher priority interrupt. */ _Chain_Append( ts->insert_chain, &timer->Object.Node ); } } 5974a: 4cee 041c fff0 moveml %fp@(-16),%d2-%d4/%a2 59750: 4e5e unlk %fp if ( !ts->active ) { _Timer_server_Reset_tod_system_watchdog( ts ); } } _Thread_Enable_dispatch(); 59752: 4ef9 0005 c2c0 jmp 5c2c0 <_Thread_Enable_dispatch> if ( timer->the_class == TIMER_INTERVAL_ON_TASK ) { /* * We have to advance the last known ticks value of the server and update * the watchdog chain accordingly. */ _ISR_Disable( level ); 59758: 203c 0000 0700 movel #1792,%d0 5975e: 40c3 movew %sr,%d3 59760: 8083 orl %d3,%d0 59762: 46c0 movew %d0,%sr snapshot = _Watchdog_Ticks_since_boot; 59764: 2039 0007 e910 movel 7e910 <_Watchdog_Ticks_since_boot>,%d0 5976a: 240a movel %a2,%d2 5976c: 0682 0000 0034 addil #52,%d2 last_snapshot = ts->Interval_watchdogs.last_snapshot; 59772: 222a 003c movel %a2@(60),%d1 */ RTEMS_INLINE_ROUTINE bool _Chain_Is_empty( Chain_Control *the_chain ) { return (the_chain->first == _Chain_Tail(the_chain)); 59776: 226a 0030 moveal %a2@(48),%a1 */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 5977a: b489 cmpl %a1,%d2 5977c: 6712 beqs 59790 <_Timer_server_Schedule_operation_method+0x108> first_watchdog = _Watchdog_First( &ts->Interval_watchdogs.Chain ); /* * We assume adequate unsigned arithmetic here. */ delta = snapshot - last_snapshot; 5977e: 2800 movel %d0,%d4 59780: 9881 subl %d1,%d4 delta_interval = first_watchdog->delta_interval; 59782: 2429 0010 movel %a1@(16),%d2 if (delta_interval > delta) { 59786: b484 cmpl %d4,%d2 59788: 623a bhis 597c4 <_Timer_server_Schedule_operation_method+0x13c> 5978a: 4282 clrl %d2 delta_interval -= delta; } else { delta_interval = 0; } first_watchdog->delta_interval = delta_interval; 5978c: 2342 0010 movel %d2,%a1@(16) } ts->Interval_watchdogs.last_snapshot = snapshot; 59790: 2540 003c movel %d0,%a2@(60) _ISR_Enable( level ); 59794: 46c3 movew %d3,%sr _Watchdog_Insert( &ts->Interval_watchdogs.Chain, &timer->Ticker ); 59796: 4868 0010 pea %a0@(16) 5979a: 486a 0030 pea %a2@(48) 5979e: 4eb9 0005 d79c jsr 5d79c <_Watchdog_Insert> if ( !ts->active ) { 597a4: 508f addql #8,%sp 597a6: 102a 007c moveb %a2@(124),%d0 597aa: 6600 ff2c bnew 596d8 <_Timer_server_Schedule_operation_method+0x50> _Timer_server_Reset_interval_system_watchdog( ts ); 597ae: 2f0a movel %a2,%sp@- 597b0: 4eba fbc2 jsr %pc@(59374 <_Timer_server_Reset_interval_system_watchdog>) 597b4: 588f addql #4,%sp * critical section. We have to use the protected chain methods because * we may be interrupted by a higher priority interrupt. */ _Chain_Append( ts->insert_chain, &timer->Object.Node ); } } 597b6: 4cee 041c fff0 moveml %fp@(-16),%d2-%d4/%a2 597bc: 4e5e unlk %fp if ( !ts->active ) { _Timer_server_Reset_tod_system_watchdog( ts ); } } _Thread_Enable_dispatch(); 597be: 4ef9 0005 c2c0 jmp 5c2c0 <_Thread_Enable_dispatch> */ delta = snapshot - last_snapshot; delta_interval = first_watchdog->delta_interval; if (delta_interval > delta) { delta_interval -= delta; 597c4: 9484 subl %d4,%d2 } else { delta_interval = 0; } first_watchdog->delta_interval = delta_interval; 597c6: 2342 0010 movel %d2,%a1@(16) 597ca: 60c4 bras 59790 <_Timer_server_Schedule_operation_method+0x108> } } else { /* * Someone put us in the past. */ delta = last_snapshot - snapshot; 597cc: d283 addl %d3,%d1 delta_interval += delta; 597ce: 9280 subl %d0,%d1 } first_watchdog->delta_interval = delta_interval; 597d0: 2341 0010 movel %d1,%a1@(16) 597d4: 6000 ff50 braw 59726 <_Timer_server_Schedule_operation_method+0x9e> /* * We advanced in time. */ delta = snapshot - last_snapshot; if (delta_interval > delta) { delta_interval -= delta; 597d8: 9684 subl %d4,%d3 597da: 2203 movel %d3,%d1 * Someone put us in the past. */ delta = last_snapshot - snapshot; delta_interval += delta; } first_watchdog->delta_interval = delta_interval; 597dc: 2341 0010 movel %d1,%a1@(16) 597e0: 6000 ff44 braw 59726 <_Timer_server_Schedule_operation_method+0x9e> =============================================================================== 00048df2 <_User_extensions_Fatal>: void _User_extensions_Fatal ( Internal_errors_Source the_source, bool is_internal, Internal_errors_t the_error ) { 48df2: 4e56 fff0 linkw %fp,#-16 48df6: 48d7 041c moveml %d2-%d4/%a2,%sp@ 48dfa: 242e 0008 movel %fp@(8),%d2 48dfe: 262e 0010 movel %fp@(16),%d3 Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.last ; 48e02: 2479 0005 f114 moveal 5f114 <_User_extensions_List+0x8>,%a2 void _User_extensions_Fatal ( Internal_errors_Source the_source, bool is_internal, Internal_errors_t the_error ) { 48e08: 182e 000f moveb %fp@(15),%d4 Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.last ; 48e0c: b5fc 0005 f10c cmpal #389388,%a2 48e12: 6726 beqs 48e3a <_User_extensions_Fatal+0x48> <== NEVER TAKEN the_node = the_node->previous ) { the_extension = (User_extensions_Control *) the_node; if ( the_extension->Callouts.fatal != NULL ) (*the_extension->Callouts.fatal)( the_source, is_internal, the_error ); 48e14: 0284 0000 00ff andil #255,%d4 !_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 ) 48e1a: 206a 0030 moveal %a2@(48),%a0 48e1e: 4a88 tstl %a0 48e20: 670c beqs 48e2e <_User_extensions_Fatal+0x3c> (*the_extension->Callouts.fatal)( the_source, is_internal, the_error ); 48e22: 2f03 movel %d3,%sp@- 48e24: 2f04 movel %d4,%sp@- 48e26: 2f02 movel %d2,%sp@- 48e28: 4e90 jsr %a0@ 48e2a: 4fef 000c lea %sp@(12),%sp 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 ) { 48e2e: 246a 0004 moveal %a2@(4),%a2 ) { Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.last ; 48e32: b5fc 0005 f10c cmpal #389388,%a2 48e38: 66e0 bnes 48e1a <_User_extensions_Fatal+0x28> the_extension = (User_extensions_Control *) the_node; if ( the_extension->Callouts.fatal != NULL ) (*the_extension->Callouts.fatal)( the_source, is_internal, the_error ); } } 48e3a: 4cee 041c fff0 moveml %fp@(-16),%d2-%d4/%a2 48e40: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00048cb0 <_User_extensions_Handler_initialization>: #include #include #include void _User_extensions_Handler_initialization(void) { 48cb0: 4e56 ffec linkw %fp,#-20 */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 48cb4: 203c 0005 f110 movel #389392,%d0 48cba: 23c0 0005 f10c movel %d0,5f10c <_User_extensions_List> the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain); 48cc0: 203c 0005 f10c movel #389388,%d0 48cc6: 23c0 0005 f114 movel %d0,5f114 <_User_extensions_List+0x8> */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 48ccc: 203c 0005 ef80 movel #388992,%d0 48cd2: 23c0 0005 ef7c movel %d0,5ef7c <_User_extensions_Switches_list> the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain); 48cd8: 203c 0005 ef7c movel #388988,%d0 RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); the_chain->permanent_null = NULL; 48cde: 42b9 0005 f110 clrl 5f110 <_User_extensions_List+0x4> 48ce4: 48d7 0c1c moveml %d2-%d4/%a2-%a3,%sp@ User_extensions_Control *extension; uint32_t i; uint32_t number_of_extensions; User_extensions_Table *initial_extensions; number_of_extensions = Configuration.number_of_initial_extensions; 48ce8: 2439 0005 d7fa movel 5d7fa ,%d2 initial_extensions = Configuration.User_extension_table; 48cee: 2639 0005 d7fe movel 5d7fe ,%d3 48cf4: 42b9 0005 ef80 clrl 5ef80 <_User_extensions_Switches_list+0x4> the_chain->last = _Chain_Head(the_chain); 48cfa: 23c0 0005 ef84 movel %d0,5ef84 <_User_extensions_Switches_list+0x8> _Chain_Initialize_empty( &_User_extensions_List ); _Chain_Initialize_empty( &_User_extensions_Switches_list ); if ( initial_extensions ) { 48d00: 4a83 tstl %d3 48d02: 6764 beqs 48d68 <_User_extensions_Handler_initialization+0xb8> extension = (User_extensions_Control *) 48d04: 7834 moveq #52,%d4 48d06: 4c02 4800 mulsl %d2,%d4 48d0a: 2f04 movel %d4,%sp@- 48d0c: 4eb9 0004 91c0 jsr 491c0 <_Workspace_Allocate_or_fatal_error> 48d12: 2440 moveal %d0,%a2 _Workspace_Allocate_or_fatal_error( number_of_extensions * sizeof( User_extensions_Control ) ); memset ( 48d14: 2f04 movel %d4,%sp@- 48d16: 42a7 clrl %sp@- 48d18: 2f00 movel %d0,%sp@- 48d1a: 4eb9 0004 f484 jsr 4f484 extension, 0, number_of_extensions * sizeof( User_extensions_Control ) ); for ( i = 0 ; i < number_of_extensions ; i++ ) { 48d20: 4fef 0010 lea %sp@(16),%sp 48d24: 4a82 tstl %d2 48d26: 6740 beqs 48d68 <_User_extensions_Handler_initialization+0xb8><== NEVER TAKEN 48d28: 4284 clrl %d4 48d2a: 47f9 0004 c500 lea 4c500 <_User_extensions_Add_set>,%a3 RTEMS_INLINE_ROUTINE void _User_extensions_Add_set_with_table( User_extensions_Control *extension, const User_extensions_Table *extension_table ) { extension->Callouts = *extension_table; 48d30: 2043 moveal %d3,%a0 48d32: 5284 addql #1,%d4 48d34: 0683 0000 0020 addil #32,%d3 48d3a: 2558 0014 movel %a0@+,%a2@(20) 48d3e: 2558 0018 movel %a0@+,%a2@(24) 48d42: 2558 001c movel %a0@+,%a2@(28) 48d46: 2558 0020 movel %a0@+,%a2@(32) 48d4a: 2558 0024 movel %a0@+,%a2@(36) 48d4e: 2558 0028 movel %a0@+,%a2@(40) 48d52: 2558 002c movel %a0@+,%a2@(44) 48d56: 2550 0030 movel %a0@,%a2@(48) _User_extensions_Add_set( extension ); 48d5a: 2f0a movel %a2,%sp@- _User_extensions_Add_set_with_table (extension, &initial_extensions[i]); extension++; 48d5c: 45ea 0034 lea %a2@(52),%a2 48d60: 4e93 jsr %a3@ extension, 0, number_of_extensions * sizeof( User_extensions_Control ) ); for ( i = 0 ; i < number_of_extensions ; i++ ) { 48d62: 588f addql #4,%sp 48d64: b882 cmpl %d2,%d4 48d66: 65c8 bcss 48d30 <_User_extensions_Handler_initialization+0x80> _User_extensions_Add_set_with_table (extension, &initial_extensions[i]); extension++; } } } 48d68: 4cee 0c1c ffec moveml %fp@(-20),%d2-%d4/%a2-%a3 48d6e: 4e5e unlk %fp ... =============================================================================== 00048d74 <_User_extensions_Thread_begin>: #include void _User_extensions_Thread_begin ( Thread_Control *executing ) { 48d74: 4e56 0000 linkw %fp,#0 48d78: 2f0a movel %a2,%sp@- Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; 48d7a: 2479 0005 f10c moveal 5f10c <_User_extensions_List>,%a2 #include void _User_extensions_Thread_begin ( Thread_Control *executing ) { 48d80: 2f02 movel %d2,%sp@- 48d82: 242e 0008 movel %fp@(8),%d2 Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; 48d86: b5fc 0005 f110 cmpal #389392,%a2 48d8c: 6718 beqs 48da6 <_User_extensions_Thread_begin+0x32><== NEVER TAKEN !_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_begin != NULL ) 48d8e: 206a 0028 moveal %a2@(40),%a0 48d92: 4a88 tstl %a0 48d94: 6706 beqs 48d9c <_User_extensions_Thread_begin+0x28> (*the_extension->Callouts.thread_begin)( executing ); 48d96: 2f02 movel %d2,%sp@- 48d98: 4e90 jsr %a0@ 48d9a: 588f addql #4,%sp Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; !_Chain_Is_tail( &_User_extensions_List, the_node ) ; the_node = the_node->next ) { 48d9c: 2452 moveal %a2@,%a2 ) { Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; 48d9e: b5fc 0005 f110 cmpal #389392,%a2 48da4: 66e8 bnes 48d8e <_User_extensions_Thread_begin+0x1a> the_extension = (User_extensions_Control *) the_node; if ( the_extension->Callouts.thread_begin != NULL ) (*the_extension->Callouts.thread_begin)( executing ); } } 48da6: 242e fff8 movel %fp@(-8),%d2 48daa: 246e fffc moveal %fp@(-4),%a2 48dae: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00048e44 <_User_extensions_Thread_create>: #include bool _User_extensions_Thread_create ( Thread_Control *the_thread ) { 48e44: 4e56 0000 linkw %fp,#0 48e48: 2f0a movel %a2,%sp@- Chain_Node *the_node; User_extensions_Control *the_extension; bool status; for ( the_node = _User_extensions_List.first ; 48e4a: 2479 0005 f10c moveal 5f10c <_User_extensions_List>,%a2 #include bool _User_extensions_Thread_create ( Thread_Control *the_thread ) { 48e50: 2f02 movel %d2,%sp@- 48e52: 242e 0008 movel %fp@(8),%d2 Chain_Node *the_node; User_extensions_Control *the_extension; bool status; for ( the_node = _User_extensions_List.first ; 48e56: b5fc 0005 f110 cmpal #389392,%a2 48e5c: 6722 beqs 48e80 <_User_extensions_Thread_create+0x3c><== NEVER TAKEN !_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 ) { 48e5e: 206a 0014 moveal %a2@(20),%a0 48e62: 4a88 tstl %a0 48e64: 6710 beqs 48e76 <_User_extensions_Thread_create+0x32> status = (*the_extension->Callouts.thread_create)( 48e66: 2f02 movel %d2,%sp@- 48e68: 2f39 0005 f032 movel 5f032 <_Thread_Executing>,%sp@- 48e6e: 4e90 jsr %a0@ _Thread_Executing, the_thread ); if ( !status ) 48e70: 508f addql #8,%sp 48e72: 4a00 tstb %d0 48e74: 670c beqs 48e82 <_User_extensions_Thread_create+0x3e> 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 ) { 48e76: 2452 moveal %a2@,%a2 { Chain_Node *the_node; User_extensions_Control *the_extension; bool status; for ( the_node = _User_extensions_List.first ; 48e78: b5fc 0005 f110 cmpal #389392,%a2 48e7e: 66de bnes 48e5e <_User_extensions_Thread_create+0x1a> 48e80: 7001 moveq #1,%d0 return false; } } return true; } 48e82: 242e fff8 movel %fp@(-8),%d2 48e86: 246e fffc moveal %fp@(-4),%a2 48e8a: 4e5e unlk %fp ... =============================================================================== 00048e90 <_User_extensions_Thread_delete>: #include void _User_extensions_Thread_delete ( Thread_Control *the_thread ) { 48e90: 4e56 0000 linkw %fp,#0 48e94: 2f0a movel %a2,%sp@- Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.last ; 48e96: 2479 0005 f114 moveal 5f114 <_User_extensions_List+0x8>,%a2 #include void _User_extensions_Thread_delete ( Thread_Control *the_thread ) { 48e9c: 2f02 movel %d2,%sp@- 48e9e: 242e 0008 movel %fp@(8),%d2 Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.last ; 48ea2: b5fc 0005 f10c cmpal #389388,%a2 48ea8: 6720 beqs 48eca <_User_extensions_Thread_delete+0x3a><== NEVER TAKEN !_Chain_Is_head( &_User_extensions_List, the_node ) ; the_node = the_node->previous ) { the_extension = (User_extensions_Control *) the_node; if ( the_extension->Callouts.thread_delete != NULL ) 48eaa: 206a 0020 moveal %a2@(32),%a0 48eae: 4a88 tstl %a0 48eb0: 670c beqs 48ebe <_User_extensions_Thread_delete+0x2e> (*the_extension->Callouts.thread_delete)( 48eb2: 2f02 movel %d2,%sp@- 48eb4: 2f39 0005 f032 movel 5f032 <_Thread_Executing>,%sp@- 48eba: 4e90 jsr %a0@ 48ebc: 508f addql #8,%sp 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 ) { 48ebe: 246a 0004 moveal %a2@(4),%a2 ) { Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.last ; 48ec2: b5fc 0005 f10c cmpal #389388,%a2 48ec8: 66e0 bnes 48eaa <_User_extensions_Thread_delete+0x1a> (*the_extension->Callouts.thread_delete)( _Thread_Executing, the_thread ); } } 48eca: 242e fff8 movel %fp@(-8),%d2 48ece: 246e fffc moveal %fp@(-4),%a2 48ed2: 4e5e unlk %fp ... =============================================================================== 00048db2 <_User_extensions_Thread_exitted>: void _User_extensions_Thread_exitted ( Thread_Control *executing ) { 48db2: 4e56 0000 linkw %fp,#0 48db6: 2f0a movel %a2,%sp@- Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.last ; 48db8: 2479 0005 f114 moveal 5f114 <_User_extensions_List+0x8>,%a2 } void _User_extensions_Thread_exitted ( Thread_Control *executing ) { 48dbe: 2f02 movel %d2,%sp@- 48dc0: 242e 0008 movel %fp@(8),%d2 Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.last ; 48dc4: b5fc 0005 f10c cmpal #389388,%a2 48dca: 671a beqs 48de6 <_User_extensions_Thread_exitted+0x34><== NEVER TAKEN !_Chain_Is_head( &_User_extensions_List, the_node ) ; the_node = the_node->previous ) { the_extension = (User_extensions_Control *) the_node; if ( the_extension->Callouts.thread_exitted != NULL ) 48dcc: 206a 002c moveal %a2@(44),%a0 48dd0: 4a88 tstl %a0 48dd2: 6706 beqs 48dda <_User_extensions_Thread_exitted+0x28> (*the_extension->Callouts.thread_exitted)( executing ); 48dd4: 2f02 movel %d2,%sp@- 48dd6: 4e90 jsr %a0@ 48dd8: 588f addql #4,%sp 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 ) { 48dda: 246a 0004 moveal %a2@(4),%a2 ) { Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.last ; 48dde: b5fc 0005 f10c cmpal #389388,%a2 48de4: 66e6 bnes 48dcc <_User_extensions_Thread_exitted+0x1a> the_extension = (User_extensions_Control *) the_node; if ( the_extension->Callouts.thread_exitted != NULL ) (*the_extension->Callouts.thread_exitted)( executing ); } } 48de6: 242e fff8 movel %fp@(-8),%d2 48dea: 246e fffc moveal %fp@(-4),%a2 48dee: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00049b78 <_User_extensions_Thread_restart>: #include void _User_extensions_Thread_restart ( Thread_Control *the_thread ) { 49b78: 4e56 0000 linkw %fp,#0 49b7c: 2f0a movel %a2,%sp@- Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; 49b7e: 2479 0006 00a4 moveal 600a4 <_User_extensions_List>,%a2 #include void _User_extensions_Thread_restart ( Thread_Control *the_thread ) { 49b84: 2f02 movel %d2,%sp@- 49b86: 242e 0008 movel %fp@(8),%d2 Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; 49b8a: b5fc 0006 00a8 cmpal #393384,%a2 49b90: 671e beqs 49bb0 <_User_extensions_Thread_restart+0x38><== NEVER TAKEN !_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_restart != NULL ) 49b92: 206a 001c moveal %a2@(28),%a0 49b96: 4a88 tstl %a0 49b98: 670c beqs 49ba6 <_User_extensions_Thread_restart+0x2e> (*the_extension->Callouts.thread_restart)( 49b9a: 2f02 movel %d2,%sp@- 49b9c: 2f39 0005 ffca movel 5ffca <_Thread_Executing>,%sp@- 49ba2: 4e90 jsr %a0@ 49ba4: 508f addql #8,%sp Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; !_Chain_Is_tail( &_User_extensions_List, the_node ) ; the_node = the_node->next ) { 49ba6: 2452 moveal %a2@,%a2 ) { Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; 49ba8: b5fc 0006 00a8 cmpal #393384,%a2 49bae: 66e2 bnes 49b92 <_User_extensions_Thread_restart+0x1a> (*the_extension->Callouts.thread_restart)( _Thread_Executing, the_thread ); } } 49bb0: 242e fff8 movel %fp@(-8),%d2 49bb4: 246e fffc moveal %fp@(-4),%a2 49bb8: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00048ed8 <_User_extensions_Thread_start>: #include void _User_extensions_Thread_start ( Thread_Control *the_thread ) { 48ed8: 4e56 0000 linkw %fp,#0 48edc: 2f0a movel %a2,%sp@- Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; 48ede: 2479 0005 f10c moveal 5f10c <_User_extensions_List>,%a2 #include void _User_extensions_Thread_start ( Thread_Control *the_thread ) { 48ee4: 2f02 movel %d2,%sp@- 48ee6: 242e 0008 movel %fp@(8),%d2 Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; 48eea: b5fc 0005 f110 cmpal #389392,%a2 48ef0: 671e beqs 48f10 <_User_extensions_Thread_start+0x38><== NEVER TAKEN !_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_start != NULL ) 48ef2: 206a 0018 moveal %a2@(24),%a0 48ef6: 4a88 tstl %a0 48ef8: 670c beqs 48f06 <_User_extensions_Thread_start+0x2e> (*the_extension->Callouts.thread_start)( 48efa: 2f02 movel %d2,%sp@- 48efc: 2f39 0005 f032 movel 5f032 <_Thread_Executing>,%sp@- 48f02: 4e90 jsr %a0@ 48f04: 508f addql #8,%sp Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; !_Chain_Is_tail( &_User_extensions_List, the_node ) ; the_node = the_node->next ) { 48f06: 2452 moveal %a2@,%a2 ) { Chain_Node *the_node; User_extensions_Control *the_extension; for ( the_node = _User_extensions_List.first ; 48f08: b5fc 0005 f110 cmpal #389392,%a2 48f0e: 66e2 bnes 48ef2 <_User_extensions_Thread_start+0x1a> (*the_extension->Callouts.thread_start)( _Thread_Executing, the_thread ); } } 48f10: 242e fff8 movel %fp@(-8),%d2 48f14: 246e fffc moveal %fp@(-4),%a2 48f18: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00048f1c <_User_extensions_Thread_switch>: void _User_extensions_Thread_switch ( Thread_Control *executing, Thread_Control *heir ) { 48f1c: 4e56 fff4 linkw %fp,#-12 48f20: 48d7 040c moveml %d2-%d3/%a2,%sp@ 48f24: 262e 0008 movel %fp@(8),%d3 48f28: 242e 000c movel %fp@(12),%d2 Chain_Node *the_node; User_extensions_Switch_control *the_extension_switch; for ( the_node = _User_extensions_Switches_list.first ; 48f2c: 2479 0005 ef7c moveal 5ef7c <_User_extensions_Switches_list>,%a2 48f32: b5fc 0005 ef80 cmpal #388992,%a2 48f38: 6716 beqs 48f50 <_User_extensions_Thread_switch+0x34><== NEVER TAKEN !_Chain_Is_tail( &_User_extensions_Switches_list, the_node ) ; the_node = the_node->next ) { the_extension_switch = (User_extensions_Switch_control *) the_node; (*the_extension_switch->thread_switch)( executing, heir ); 48f3a: 2f02 movel %d2,%sp@- 48f3c: 2f03 movel %d3,%sp@- 48f3e: 206a 0008 moveal %a2@(8),%a0 48f42: 4e90 jsr %a0@ Chain_Node *the_node; User_extensions_Switch_control *the_extension_switch; for ( the_node = _User_extensions_Switches_list.first ; !_Chain_Is_tail( &_User_extensions_Switches_list, the_node ) ; the_node = the_node->next ) { 48f44: 2452 moveal %a2@,%a2 ) { Chain_Node *the_node; User_extensions_Switch_control *the_extension_switch; for ( the_node = _User_extensions_Switches_list.first ; 48f46: 508f addql #8,%sp 48f48: b5fc 0005 ef80 cmpal #388992,%a2 48f4e: 66ea bnes 48f3a <_User_extensions_Thread_switch+0x1e> the_extension_switch = (User_extensions_Switch_control *) the_node; (*the_extension_switch->thread_switch)( executing, heir ); } } 48f50: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 48f56: 4e5e unlk %fp ... =============================================================================== 0004acbc <_Watchdog_Adjust>: void _Watchdog_Adjust( Chain_Control *header, Watchdog_Adjust_directions direction, Watchdog_Interval units ) { 4acbc: 4e56 ffe8 linkw %fp,#-24 4acc0: 226e 000c moveal %fp@(12),%a1 4acc4: 48d7 1c1c moveml %d2-%d4/%a2-%a4,%sp@ ISR_Level level; _ISR_Disable( level ); 4acc8: 283c 0000 0700 movel #1792,%d4 4acce: 2004 movel %d4,%d0 void _Watchdog_Adjust( Chain_Control *header, Watchdog_Adjust_directions direction, Watchdog_Interval units ) { 4acd0: 266e 0008 moveal %fp@(8),%a3 4acd4: 242e 0010 movel %fp@(16),%d2 ISR_Level level; _ISR_Disable( level ); 4acd8: 40c1 movew %sr,%d1 4acda: 8081 orl %d1,%d0 4acdc: 46c0 movew %d0,%sr */ RTEMS_INLINE_ROUTINE bool _Chain_Is_empty( Chain_Control *the_chain ) { return (the_chain->first == _Chain_Tail(the_chain)); 4acde: 244b moveal %a3,%a2 4ace0: 205a moveal %a2@+,%a0 * hence the compiler must not assume *header to remain * unmodified across that call. * * Till Straumann, 7/2003 */ if ( !_Chain_Is_empty( header ) ) { 4ace2: b5c8 cmpal %a0,%a2 4ace4: 6748 beqs 4ad2e <_Watchdog_Adjust+0x72> switch ( direction ) { 4ace6: 4a89 tstl %a1 4ace8: 6650 bnes 4ad3a <_Watchdog_Adjust+0x7e> case WATCHDOG_BACKWARD: _Watchdog_First( header )->delta_interval += units; break; case WATCHDOG_FORWARD: while ( units ) { 4acea: 4a82 tstl %d2 4acec: 6740 beqs 4ad2e <_Watchdog_Adjust+0x72> <== NEVER TAKEN if ( units < _Watchdog_First( header )->delta_interval ) { 4acee: 2628 0010 movel %a0@(16),%d3 4acf2: 49f9 0004 af38 lea 4af38 <_Watchdog_Tickle>,%a4 4acf8: b682 cmpl %d2,%d3 4acfa: 622c bhis 4ad28 <_Watchdog_Adjust+0x6c> <== NEVER TAKEN _Watchdog_First( header )->delta_interval -= units; break; } else { units -= _Watchdog_First( header )->delta_interval; _Watchdog_First( header )->delta_interval = 1; 4acfc: 7001 moveq #1,%d0 4acfe: 2140 0010 movel %d0,%a0@(16) _ISR_Enable( level ); 4ad02: 46c1 movew %d1,%sr _Watchdog_Tickle( header ); 4ad04: 2f0b movel %a3,%sp@- 4ad06: 4e94 jsr %a4@ _ISR_Disable( level ); 4ad08: 2004 movel %d4,%d0 4ad0a: 40c1 movew %sr,%d1 4ad0c: 8081 orl %d1,%d0 4ad0e: 46c0 movew %d0,%sr while ( units ) { if ( units < _Watchdog_First( header )->delta_interval ) { _Watchdog_First( header )->delta_interval -= units; break; } else { units -= _Watchdog_First( header )->delta_interval; 4ad10: 9483 subl %d3,%d2 _Watchdog_Tickle( header ); _ISR_Disable( level ); if ( _Chain_Is_empty( header ) ) 4ad12: 588f addql #4,%sp 4ad14: 2013 movel %a3@,%d0 RTEMS_INLINE_ROUTINE Watchdog_Control *_Watchdog_First( Chain_Control *header ) { return ( (Watchdog_Control *) header->first ); 4ad16: 2040 moveal %d0,%a0 4ad18: b08a cmpl %a2,%d0 4ad1a: 6712 beqs 4ad2e <_Watchdog_Adjust+0x72> switch ( direction ) { case WATCHDOG_BACKWARD: _Watchdog_First( header )->delta_interval += units; break; case WATCHDOG_FORWARD: while ( units ) { 4ad1c: 4a82 tstl %d2 4ad1e: 670e beqs 4ad2e <_Watchdog_Adjust+0x72> <== NEVER TAKEN if ( units < _Watchdog_First( header )->delta_interval ) { 4ad20: 2628 0010 movel %a0@(16),%d3 4ad24: b483 cmpl %d3,%d2 4ad26: 64d4 bccs 4acfc <_Watchdog_Adjust+0x40> _Watchdog_First( header )->delta_interval -= units; 4ad28: 9682 subl %d2,%d3 4ad2a: 2143 0010 movel %d3,%a0@(16) } break; } } _ISR_Enable( level ); 4ad2e: 46c1 movew %d1,%sr } 4ad30: 4cee 1c1c ffe8 moveml %fp@(-24),%d2-%d4/%a2-%a4 4ad36: 4e5e unlk %fp 4ad38: 4e75 rts * unmodified across that call. * * Till Straumann, 7/2003 */ if ( !_Chain_Is_empty( header ) ) { switch ( direction ) { 4ad3a: 7001 moveq #1,%d0 4ad3c: b089 cmpl %a1,%d0 4ad3e: 66ee bnes 4ad2e <_Watchdog_Adjust+0x72> <== NEVER TAKEN case WATCHDOG_BACKWARD: _Watchdog_First( header )->delta_interval += units; 4ad40: d5a8 0010 addl %d2,%a0@(16) } break; } } _ISR_Enable( level ); 4ad44: 46c1 movew %d1,%sr } 4ad46: 4cee 1c1c ffe8 moveml %fp@(-24),%d2-%d4/%a2-%a4 4ad4c: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0005d70c <_Watchdog_Adjust_to_chain>: Chain_Control *header, Watchdog_Interval units_arg, Chain_Control *to_fire ) { 5d70c: 4e56 ffe4 linkw %fp,#-28 5d710: 48d7 3c1c moveml %d2-%d4/%a2-%a5,%sp@ 5d714: 2a6e 0008 moveal %fp@(8),%a5 5d718: 282e 000c movel %fp@(12),%d4 5d71c: 266e 0010 moveal %fp@(16),%a3 Watchdog_Interval units = units_arg; ISR_Level level; Watchdog_Control *first; if ( units <= 0 ) { 5d720: 675e beqs 5d780 <_Watchdog_Adjust_to_chain+0x74> return; } _ISR_Disable( level ); 5d722: 263c 0000 0700 movel #1792,%d3 5d728: 2003 movel %d3,%d0 5d72a: 40c1 movew %sr,%d1 5d72c: 8081 orl %d1,%d0 5d72e: 46c0 movew %d0,%sr 5d730: 284d moveal %a5,%a4 */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 5d732: 240b movel %a3,%d2 5d734: 5882 addql #4,%d2 5d736: 205c moveal %a4@+,%a0 while ( 1 ) { if ( units <= 0 ) { break; } if ( _Chain_Is_empty( header ) ) { 5d738: b1cc cmpal %a4,%a0 5d73a: 6742 beqs 5d77e <_Watchdog_Adjust_to_chain+0x72> /* * If it is longer than "units" until the first element on the chain * fires, then bump it and quit. */ if ( units < first->delta_interval ) { 5d73c: 2028 0010 movel %a0@(16),%d0 5d740: b880 cmpl %d0,%d4 5d742: 654c bcss 5d790 <_Watchdog_Adjust_to_chain+0x84> /* * The first set happens in less than units, so take all of them * off the chain and adjust units to reflect this. */ units -= first->delta_interval; 5d744: 9880 subl %d0,%d4 first->delta_interval = 0; 5d746: 42a8 0010 clrl %a0@(16) ) { Chain_Node *next; Chain_Node *previous; next = the_node->next; 5d74a: 2250 moveal %a0@,%a1 previous = the_node->previous; 5d74c: 2468 0004 moveal %a0@(4),%a2 next->previous = previous; previous->next = next; 5d750: 2489 movel %a1,%a2@ Chain_Node *next; Chain_Node *previous; next = the_node->next; previous = the_node->previous; next->previous = previous; 5d752: 234a 0004 movel %a2,%a1@(4) Chain_Node *the_node ) { Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); 5d756: 2082 movel %d2,%a0@ old_last_node = the_chain->last; 5d758: 226b 0008 moveal %a3@(8),%a1 the_chain->last = the_node; 5d75c: 2748 0008 movel %a0,%a3@(8) old_last_node->next = the_node; the_node->previous = old_last_node; 5d760: 2149 0004 movel %a1,%a0@(4) Chain_Node *old_last_node; the_node->next = _Chain_Tail(the_chain); old_last_node = the_chain->last; the_chain->last = the_node; old_last_node->next = the_node; 5d764: 2288 movel %a0,%a1@ while ( 1 ) { _Chain_Extract_unprotected( &first->Node ); _Chain_Append_unprotected( to_fire, &first->Node ); _ISR_Flash( level ); 5d766: 2003 movel %d3,%d0 5d768: 46c1 movew %d1,%sr 5d76a: 8081 orl %d1,%d0 5d76c: 46c0 movew %d0,%sr */ RTEMS_INLINE_ROUTINE bool _Chain_Is_empty( Chain_Control *the_chain ) { return (the_chain->first == _Chain_Tail(the_chain)); 5d76e: 2055 moveal %a5@,%a0 if ( _Chain_Is_empty( header ) ) 5d770: b1cc cmpal %a4,%a0 5d772: 6714 beqs 5d788 <_Watchdog_Adjust_to_chain+0x7c> break; first = _Watchdog_First( header ); if ( first->delta_interval != 0 ) 5d774: 4aa8 0010 tstl %a0@(16) 5d778: 67d0 beqs 5d74a <_Watchdog_Adjust_to_chain+0x3e> } _ISR_Disable( level ); while ( 1 ) { if ( units <= 0 ) { 5d77a: 4a84 tstl %d4 5d77c: 66ba bnes 5d738 <_Watchdog_Adjust_to_chain+0x2c> if ( first->delta_interval != 0 ) break; } } _ISR_Enable( level ); 5d77e: 46c1 movew %d1,%sr } 5d780: 4cd7 3c1c moveml %sp@,%d2-%d4/%a2-%a5 5d784: 4e5e unlk %fp 5d786: 4e75 rts */ RTEMS_INLINE_ROUTINE Chain_Node *_Chain_Tail( Chain_Control *the_chain ) { return (Chain_Node *) &the_chain->permanent_null; 5d788: 204c moveal %a4,%a0 } _ISR_Disable( level ); while ( 1 ) { if ( units <= 0 ) { 5d78a: 4a84 tstl %d4 5d78c: 66aa bnes 5d738 <_Watchdog_Adjust_to_chain+0x2c> 5d78e: 60ee bras 5d77e <_Watchdog_Adjust_to_chain+0x72> /* * If it is longer than "units" until the first element on the chain * fires, then bump it and quit. */ if ( units < first->delta_interval ) { first->delta_interval -= units; 5d790: 9084 subl %d4,%d0 5d792: 2140 0010 movel %d0,%a0@(16) if ( first->delta_interval != 0 ) break; } } _ISR_Enable( level ); 5d796: 46c1 movew %d1,%sr 5d798: 60e6 bras 5d780 <_Watchdog_Adjust_to_chain+0x74> ... =============================================================================== 00048f5c <_Watchdog_Insert>: void _Watchdog_Insert( Chain_Control *header, Watchdog_Control *the_watchdog ) { 48f5c: 4e56 ffec linkw %fp,#-20 48f60: 226e 000c moveal %fp@(12),%a1 48f64: 48d7 043c moveml %d2-%d5/%a2,%sp@ 48f68: 246e 0008 moveal %fp@(8),%a2 Watchdog_Interval delta_interval; insert_isr_nest_level = _ISR_Nest_level; _ISR_Disable( level ); 48f6c: 2a3c 0000 0700 movel #1792,%d5 48f72: 2005 movel %d5,%d0 Watchdog_Control *after; uint32_t insert_isr_nest_level; Watchdog_Interval delta_interval; insert_isr_nest_level = _ISR_Nest_level; 48f74: 2839 0005 f012 movel 5f012 <_ISR_Nest_level>,%d4 _ISR_Disable( level ); 48f7a: 40c3 movew %sr,%d3 48f7c: 8083 orl %d3,%d0 48f7e: 46c0 movew %d0,%sr /* * Check to see if the watchdog has just been inserted by a * higher priority interrupt. If so, abandon this insert. */ if ( the_watchdog->state != WATCHDOG_INACTIVE ) { 48f80: 4aa9 0008 tstl %a1@(8) 48f84: 6600 00c6 bnew 4904c <_Watchdog_Insert+0xf0> _ISR_Enable( level ); return; } the_watchdog->state = WATCHDOG_BEING_INSERTED; _Watchdog_Sync_count++; 48f88: 2039 0005 f0b8 movel 5f0b8 <_Watchdog_Sync_count>,%d0 48f8e: 5280 addql #1,%d0 48f90: 23c0 0005 f0b8 movel %d0,5f0b8 <_Watchdog_Sync_count> if ( the_watchdog->state != WATCHDOG_INACTIVE ) { _ISR_Enable( level ); return; } the_watchdog->state = WATCHDOG_BEING_INSERTED; 48f96: 7001 moveq #1,%d0 48f98: 2340 0008 movel %d0,%a1@(8) _Watchdog_Sync_count++; restart: delta_interval = the_watchdog->initial; 48f9c: 2029 000c movel %a1@(12),%d0 * cache *header!! * * Till Straumann, 7/2003 (gcc-3.2.2 -O4 on powerpc) * */ for ( after = (Watchdog_Control *) ((volatile Chain_Control *)header)->first ; 48fa0: 2052 moveal %a2@,%a0 ; after = _Watchdog_Next( after ) ) { if ( delta_interval == 0 || !_Watchdog_Next( after ) ) 48fa2: 6764 beqs 49008 <_Watchdog_Insert+0xac> 48fa4: 4a90 tstl %a0@ 48fa6: 6760 beqs 49008 <_Watchdog_Insert+0xac> break; if ( delta_interval < after->delta_interval ) { 48fa8: 2228 0010 movel %a0@(16),%d1 48fac: b280 cmpl %d0,%d1 48fae: 6252 bhis 49002 <_Watchdog_Insert+0xa6> * used around this flash point allowed interrupts to execute * which violated the design assumptions. The critical section * mechanism used here WAS redesigned to address this. */ _ISR_Flash( level ); 48fb0: 2405 movel %d5,%d2 48fb2: 46c3 movew %d3,%sr 48fb4: 8483 orl %d3,%d2 48fb6: 46c2 movew %d2,%sr if ( the_watchdog->state != WATCHDOG_BEING_INSERTED ) { 48fb8: 7401 moveq #1,%d2 48fba: b4a9 0008 cmpl %a1@(8),%d2 48fbe: 666e bnes 4902e <_Watchdog_Insert+0xd2> goto exit_insert; } if ( _Watchdog_Sync_level > insert_isr_nest_level ) { 48fc0: 2439 0005 f02e movel 5f02e <_Watchdog_Sync_level>,%d2 48fc6: b484 cmpl %d4,%d2 48fc8: 6230 bhis 48ffa <_Watchdog_Insert+0x9e> if ( delta_interval < after->delta_interval ) { after->delta_interval -= delta_interval; break; } delta_interval -= after->delta_interval; 48fca: 9081 subl %d1,%d0 RTEMS_INLINE_ROUTINE Watchdog_Control *_Watchdog_Next( Watchdog_Control *the_watchdog ) { return ( (Watchdog_Control *) the_watchdog->Node.next ); 48fcc: 2050 moveal %a0@,%a0 */ for ( after = (Watchdog_Control *) ((volatile Chain_Control *)header)->first ; ; after = _Watchdog_Next( after ) ) { if ( delta_interval == 0 || !_Watchdog_Next( after ) ) 48fce: 4a80 tstl %d0 48fd0: 6736 beqs 49008 <_Watchdog_Insert+0xac> 48fd2: 4a90 tstl %a0@ 48fd4: 6732 beqs 49008 <_Watchdog_Insert+0xac> break; if ( delta_interval < after->delta_interval ) { 48fd6: 2228 0010 movel %a0@(16),%d1 48fda: b081 cmpl %d1,%d0 48fdc: 6524 bcss 49002 <_Watchdog_Insert+0xa6> * used around this flash point allowed interrupts to execute * which violated the design assumptions. The critical section * mechanism used here WAS redesigned to address this. */ _ISR_Flash( level ); 48fde: 2405 movel %d5,%d2 48fe0: 46c3 movew %d3,%sr 48fe2: 8483 orl %d3,%d2 48fe4: 46c2 movew %d2,%sr if ( delta_interval < after->delta_interval ) { after->delta_interval -= delta_interval; break; } delta_interval -= after->delta_interval; 48fe6: 9081 subl %d1,%d0 * mechanism used here WAS redesigned to address this. */ _ISR_Flash( level ); if ( the_watchdog->state != WATCHDOG_BEING_INSERTED ) { 48fe8: 7201 moveq #1,%d1 48fea: b2a9 0008 cmpl %a1@(8),%d1 48fee: 663e bnes 4902e <_Watchdog_Insert+0xd2> <== NEVER TAKEN goto exit_insert; } if ( _Watchdog_Sync_level > insert_isr_nest_level ) { 48ff0: 2239 0005 f02e movel 5f02e <_Watchdog_Sync_level>,%d1 48ff6: b284 cmpl %d4,%d1 48ff8: 63d2 blss 48fcc <_Watchdog_Insert+0x70> _Watchdog_Sync_level = insert_isr_nest_level; 48ffa: 23c4 0005 f02e movel %d4,5f02e <_Watchdog_Sync_level> goto restart; 49000: 609a bras 48f9c <_Watchdog_Insert+0x40> if ( delta_interval == 0 || !_Watchdog_Next( after ) ) break; if ( delta_interval < after->delta_interval ) { after->delta_interval -= delta_interval; 49002: 9280 subl %d0,%d1 49004: 2141 0010 movel %d1,%a0@(16) _Watchdog_Activate( the_watchdog ); the_watchdog->delta_interval = delta_interval; _Chain_Insert_unprotected( after->Node.previous, &the_watchdog->Node ); 49008: 2068 0004 moveal %a0@(4),%a0 RTEMS_INLINE_ROUTINE void _Watchdog_Activate( Watchdog_Control *the_watchdog ) { the_watchdog->state = WATCHDOG_ACTIVE; 4900c: 7402 moveq #2,%d2 ) { Chain_Node *before_node; the_node->previous = after_node; before_node = after_node->next; 4900e: 2450 moveal %a0@,%a2 the_watchdog->start_time = _Watchdog_Ticks_since_boot; 49010: 2239 0005 f0bc movel 5f0bc <_Watchdog_Ticks_since_boot>,%d1 after_node->next = the_node; 49016: 2089 movel %a1,%a0@ Chain_Node *the_node ) { Chain_Node *before_node; the_node->previous = after_node; 49018: 2348 0004 movel %a0,%a1@(4) 4901c: 2341 0014 movel %d1,%a1@(20) } } _Watchdog_Activate( the_watchdog ); the_watchdog->delta_interval = delta_interval; 49020: 2340 0010 movel %d0,%a1@(16) before_node = after_node->next; after_node->next = the_node; the_node->next = before_node; before_node->previous = the_node; 49024: 2549 0004 movel %a1,%a2@(4) 49028: 2342 0008 movel %d2,%a1@(8) Chain_Node *before_node; the_node->previous = after_node; before_node = after_node->next; after_node->next = the_node; the_node->next = before_node; 4902c: 228a movel %a2,%a1@ _Chain_Insert_unprotected( after->Node.previous, &the_watchdog->Node ); the_watchdog->start_time = _Watchdog_Ticks_since_boot; exit_insert: _Watchdog_Sync_level = insert_isr_nest_level; 4902e: 23c4 0005 f02e movel %d4,5f02e <_Watchdog_Sync_level> _Watchdog_Sync_count--; 49034: 2039 0005 f0b8 movel 5f0b8 <_Watchdog_Sync_count>,%d0 4903a: 5380 subql #1,%d0 4903c: 23c0 0005 f0b8 movel %d0,5f0b8 <_Watchdog_Sync_count> _ISR_Enable( level ); 49042: 46c3 movew %d3,%sr } 49044: 4cd7 043c moveml %sp@,%d2-%d5/%a2 49048: 4e5e unlk %fp 4904a: 4e75 rts * Check to see if the watchdog has just been inserted by a * higher priority interrupt. If so, abandon this insert. */ if ( the_watchdog->state != WATCHDOG_INACTIVE ) { _ISR_Enable( level ); 4904c: 46c3 movew %d3,%sr exit_insert: _Watchdog_Sync_level = insert_isr_nest_level; _Watchdog_Sync_count--; _ISR_Enable( level ); } 4904e: 4cd7 043c moveml %sp@,%d2-%d5/%a2 49052: 4e5e unlk %fp ... =============================================================================== 000490a4 <_Watchdog_Remove>: { ISR_Level level; Watchdog_States previous_state; Watchdog_Control *next_watchdog; _ISR_Disable( level ); 490a4: 203c 0000 0700 movel #1792,%d0 */ Watchdog_States _Watchdog_Remove( Watchdog_Control *the_watchdog ) { 490aa: 4e56 0000 linkw %fp,#0 490ae: 206e 0008 moveal %fp@(8),%a0 490b2: 2f0a movel %a2,%sp@- 490b4: 2f02 movel %d2,%sp@- ISR_Level level; Watchdog_States previous_state; Watchdog_Control *next_watchdog; _ISR_Disable( level ); 490b6: 40c1 movew %sr,%d1 490b8: 8081 orl %d1,%d0 490ba: 46c0 movew %d0,%sr previous_state = the_watchdog->state; 490bc: 2028 0008 movel %a0@(8),%d0 switch ( previous_state ) { 490c0: 7401 moveq #1,%d2 490c2: b480 cmpl %d0,%d2 490c4: 6764 beqs 4912a <_Watchdog_Remove+0x86> 490c6: 6314 blss 490dc <_Watchdog_Remove+0x38> _Watchdog_Sync_level = _ISR_Nest_level; _Chain_Extract_unprotected( &the_watchdog->Node ); break; } the_watchdog->stop_time = _Watchdog_Ticks_since_boot; 490c8: 2279 0005 f0bc moveal 5f0bc <_Watchdog_Ticks_since_boot>,%a1 490ce: 2149 0018 movel %a1,%a0@(24) _ISR_Enable( level ); 490d2: 46c1 movew %d1,%sr return( previous_state ); } 490d4: 241f movel %sp@+,%d2 490d6: 245f moveal %sp@+,%a2 490d8: 4e5e unlk %fp 490da: 4e75 rts Watchdog_States previous_state; Watchdog_Control *next_watchdog; _ISR_Disable( level ); previous_state = the_watchdog->state; switch ( previous_state ) { 490dc: 143c 0003 moveb #3,%d2 490e0: b480 cmpl %d0,%d2 490e2: 65e4 bcss 490c8 <_Watchdog_Remove+0x24> <== NEVER TAKEN RTEMS_INLINE_ROUTINE Watchdog_Control *_Watchdog_Next( Watchdog_Control *the_watchdog ) { return ( (Watchdog_Control *) the_watchdog->Node.next ); 490e4: 2250 moveal %a0@,%a1 break; case WATCHDOG_ACTIVE: case WATCHDOG_REMOVE_IT: the_watchdog->state = WATCHDOG_INACTIVE; 490e6: 42a8 0008 clrl %a0@(8) next_watchdog = _Watchdog_Next( the_watchdog ); if ( _Watchdog_Next(next_watchdog) ) 490ea: 4a91 tstl %a1@ 490ec: 6708 beqs 490f6 <_Watchdog_Remove+0x52> next_watchdog->delta_interval += the_watchdog->delta_interval; 490ee: 2428 0010 movel %a0@(16),%d2 490f2: d5a9 0010 addl %d2,%a1@(16) if ( _Watchdog_Sync_count ) 490f6: 2479 0005 f0b8 moveal 5f0b8 <_Watchdog_Sync_count>,%a2 490fc: 4a8a tstl %a2 490fe: 670c beqs 4910c <_Watchdog_Remove+0x68> _Watchdog_Sync_level = _ISR_Nest_level; 49100: 2479 0005 f012 moveal 5f012 <_ISR_Nest_level>,%a2 49106: 23ca 0005 f02e movel %a2,5f02e <_Watchdog_Sync_level> { Chain_Node *next; Chain_Node *previous; next = the_node->next; previous = the_node->previous; 4910c: 2468 0004 moveal %a0@(4),%a2 next->previous = previous; previous->next = next; 49110: 2489 movel %a1,%a2@ Chain_Node *next; Chain_Node *previous; next = the_node->next; previous = the_node->previous; next->previous = previous; 49112: 234a 0004 movel %a2,%a1@(4) _Chain_Extract_unprotected( &the_watchdog->Node ); break; } the_watchdog->stop_time = _Watchdog_Ticks_since_boot; 49116: 2279 0005 f0bc moveal 5f0bc <_Watchdog_Ticks_since_boot>,%a1 4911c: 2149 0018 movel %a1,%a0@(24) _ISR_Enable( level ); 49120: 46c1 movew %d1,%sr return( previous_state ); } 49122: 241f movel %sp@+,%d2 49124: 245f moveal %sp@+,%a2 49126: 4e5e unlk %fp 49128: 4e75 rts _Watchdog_Sync_level = _ISR_Nest_level; _Chain_Extract_unprotected( &the_watchdog->Node ); break; } the_watchdog->stop_time = _Watchdog_Ticks_since_boot; 4912a: 2279 0005 f0bc moveal 5f0bc <_Watchdog_Ticks_since_boot>,%a1 /* * It is not actually on the chain so just change the state and * the Insert operation we interrupted will be aborted. */ the_watchdog->state = WATCHDOG_INACTIVE; 49130: 42a8 0008 clrl %a0@(8) _Watchdog_Sync_level = _ISR_Nest_level; _Chain_Extract_unprotected( &the_watchdog->Node ); break; } the_watchdog->stop_time = _Watchdog_Ticks_since_boot; 49134: 2149 0018 movel %a1,%a0@(24) _ISR_Enable( level ); 49138: 46c1 movew %d1,%sr return( previous_state ); } 4913a: 241f movel %sp@+,%d2 4913c: 245f moveal %sp@+,%a2 4913e: 4e5e unlk %fp ... =============================================================================== 0004a64c <_Watchdog_Report_chain>: ) { ISR_Level level; Chain_Node *node; _ISR_Disable( level ); 4a64c: 203c 0000 0700 movel #1792,%d0 void _Watchdog_Report_chain( const char *name, Chain_Control *header ) { 4a652: 4e56 ffe8 linkw %fp,#-24 4a656: 48d7 3c0c moveml %d2-%d3/%a2-%a5,%sp@ 4a65a: 242e 0008 movel %fp@(8),%d2 4a65e: 266e 000c moveal %fp@(12),%a3 ISR_Level level; Chain_Node *node; _ISR_Disable( level ); 4a662: 40c3 movew %sr,%d3 4a664: 8083 orl %d3,%d0 4a666: 46c0 movew %d0,%sr printk( "Watchdog Chain: %s %p\n", name, header ); 4a668: 2f0b movel %a3,%sp@- 4a66a: 4bf9 0004 4084 lea 44084 ,%a5 4a670: 2f02 movel %d2,%sp@- 4a672: 4879 0005 e7a2 pea 5e7a2 <_Status_Object_name_errors_to_status+0x14> 4a678: 4e95 jsr %a5@ */ RTEMS_INLINE_ROUTINE bool _Chain_Is_empty( Chain_Control *the_chain ) { return (the_chain->first == _Chain_Tail(the_chain)); 4a67a: 245b moveal %a3@+,%a2 if ( !_Chain_Is_empty( header ) ) { 4a67c: 4fef 000c lea %sp@(12),%sp 4a680: b7ca cmpal %a2,%a3 4a682: 672c beqs 4a6b0 <_Watchdog_Report_chain+0x64> 4a684: 49f9 0004 a6c8 lea 4a6c8 <_Watchdog_Report>,%a4 node != _Chain_Tail(header) ; node = node->next ) { Watchdog_Control *watch = (Watchdog_Control *) node; _Watchdog_Report( NULL, watch ); 4a68a: 2f0a movel %a2,%sp@- 4a68c: 42a7 clrl %sp@- 4a68e: 4e94 jsr %a4@ _ISR_Disable( level ); printk( "Watchdog Chain: %s %p\n", name, header ); if ( !_Chain_Is_empty( header ) ) { for ( node = header->first ; node != _Chain_Tail(header) ; node = node->next ) 4a690: 2452 moveal %a2@,%a2 Chain_Node *node; _ISR_Disable( level ); printk( "Watchdog Chain: %s %p\n", name, header ); if ( !_Chain_Is_empty( header ) ) { for ( node = header->first ; 4a692: 508f addql #8,%sp 4a694: b7ca cmpal %a2,%a3 4a696: 66f2 bnes 4a68a <_Watchdog_Report_chain+0x3e> <== NEVER TAKEN { Watchdog_Control *watch = (Watchdog_Control *) node; _Watchdog_Report( NULL, watch ); } printk( "== end of %s \n", name ); 4a698: 2f02 movel %d2,%sp@- 4a69a: 4879 0005 e7b9 pea 5e7b9 <_Status_Object_name_errors_to_status+0x2b> 4a6a0: 4e95 jsr %a5@ 4a6a2: 508f addql #8,%sp } else { printk( "Chain is empty\n" ); } _ISR_Enable( level ); 4a6a4: 46c3 movew %d3,%sr } 4a6a6: 4cee 3c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a5 4a6ac: 4e5e unlk %fp 4a6ae: 4e75 rts _Watchdog_Report( NULL, watch ); } printk( "== end of %s \n", name ); } else { printk( "Chain is empty\n" ); 4a6b0: 4879 0005 e7c8 pea 5e7c8 <_Status_Object_name_errors_to_status+0x3a> 4a6b6: 4e95 jsr %a5@ 4a6b8: 588f addql #4,%sp } _ISR_Enable( level ); 4a6ba: 46c3 movew %d3,%sr } 4a6bc: 4cee 3c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a5 4a6c2: 4e5e unlk %fp ... =============================================================================== 00049144 <_Watchdog_Tickle>: * See the comment in watchdoginsert.c and watchdogadjust.c * about why it's safe not to declare header a pointer to * volatile data - till, 2003/7 */ _ISR_Disable( level ); 49144: 203c 0000 0700 movel #1792,%d0 */ void _Watchdog_Tickle( Chain_Control *header ) { 4914a: 4e56 ffe8 linkw %fp,#-24 4914e: 48d7 3c0c moveml %d2-%d3/%a2-%a5,%sp@ 49152: 286e 0008 moveal %fp@(8),%a4 * See the comment in watchdoginsert.c and watchdogadjust.c * about why it's safe not to declare header a pointer to * volatile data - till, 2003/7 */ _ISR_Disable( level ); 49156: 40c2 movew %sr,%d2 49158: 8082 orl %d2,%d0 4915a: 46c0 movew %d0,%sr */ RTEMS_INLINE_ROUTINE bool _Chain_Is_empty( Chain_Control *the_chain ) { return (the_chain->first == _Chain_Tail(the_chain)); 4915c: 264c moveal %a4,%a3 4915e: 245b moveal %a3@+,%a2 if ( _Chain_Is_empty( header ) ) 49160: b7ca cmpal %a2,%a3 49162: 673e beqs 491a2 <_Watchdog_Tickle+0x5e> * to be inserted has already had its delta_interval adjusted to 0, and * so is added to the head of the chain with a delta_interval of 0. * * Steven Johnson - 12/2005 (gcc-3.2.3 -O3 on powerpc) */ if (the_watchdog->delta_interval != 0) { 49164: 202a 0010 movel %a2@(16),%d0 49168: 4bf9 0004 90a4 lea 490a4 <_Watchdog_Remove>,%a5 4916e: 6708 beqs 49178 <_Watchdog_Tickle+0x34> the_watchdog->delta_interval--; 49170: 5380 subql #1,%d0 49172: 2540 0010 movel %d0,%a2@(16) if ( the_watchdog->delta_interval != 0 ) 49176: 662a bnes 491a2 <_Watchdog_Tickle+0x5e> case WATCHDOG_REMOVE_IT: break; } _ISR_Disable( level ); 49178: 263c 0000 0700 movel #1792,%d3 if ( the_watchdog->delta_interval != 0 ) goto leave; } do { watchdog_state = _Watchdog_Remove( the_watchdog ); 4917e: 2f0a movel %a2,%sp@- 49180: 4e95 jsr %a5@ _ISR_Enable( level ); 49182: 46c2 movew %d2,%sr switch( watchdog_state ) { 49184: 7202 moveq #2,%d1 49186: 588f addql #4,%sp 49188: b280 cmpl %d0,%d1 4918a: 6722 beqs 491ae <_Watchdog_Tickle+0x6a> <== ALWAYS TAKEN case WATCHDOG_REMOVE_IT: break; } _ISR_Disable( level ); 4918c: 2003 movel %d3,%d0 4918e: 40c2 movew %sr,%d2 49190: 8082 orl %d2,%d0 49192: 46c0 movew %d0,%sr RTEMS_INLINE_ROUTINE Watchdog_Control *_Watchdog_First( Chain_Control *header ) { return ( (Watchdog_Control *) header->first ); 49194: 2014 movel %a4@,%d0 49196: 2440 moveal %d0,%a2 the_watchdog = _Watchdog_First( header ); } while ( !_Chain_Is_empty( header ) && (the_watchdog->delta_interval == 0) ); 49198: b08b cmpl %a3,%d0 4919a: 6706 beqs 491a2 <_Watchdog_Tickle+0x5e> 4919c: 4aaa 0010 tstl %a2@(16) 491a0: 67dc beqs 4917e <_Watchdog_Tickle+0x3a> leave: _ISR_Enable(level); 491a2: 46c2 movew %d2,%sr } 491a4: 4cee 3c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a5 491aa: 4e5e unlk %fp 491ac: 4e75 rts _ISR_Enable( level ); switch( watchdog_state ) { case WATCHDOG_ACTIVE: (*the_watchdog->routine)( 491ae: 2f2a 0024 movel %a2@(36),%sp@- 491b2: 2f2a 0020 movel %a2@(32),%sp@- 491b6: 206a 001c moveal %a2@(28),%a0 491ba: 4e90 jsr %a0@ 491bc: 508f addql #8,%sp 491be: 60cc bras 4918c <_Watchdog_Tickle+0x48> =============================================================================== 00049228 <_Workspace_Handler_initialization>: /* * _Workspace_Handler_initialization */ void _Workspace_Handler_initialization(void) { 49228: 4e56 0000 linkw %fp,#0 4922c: 2f03 movel %d3,%sp@- uintptr_t memory_available = 0; void *starting_address = Configuration.work_space_start; uintptr_t size = Configuration.work_space_size; 4922e: 2639 0005 d7c8 movel 5d7c8 ,%d3 /* * _Workspace_Handler_initialization */ void _Workspace_Handler_initialization(void) { 49234: 2f02 movel %d2,%sp@- uintptr_t memory_available = 0; void *starting_address = Configuration.work_space_start; 49236: 2439 0005 d7c4 movel 5d7c4 ,%d2 uintptr_t size = Configuration.work_space_size; if ( Configuration.do_zero_of_workspace ) 4923c: 4a39 0005 d7ec tstb 5d7ec 49242: 6628 bnes 4926c <_Workspace_Handler_initialization+0x44> memset( starting_address, 0, size ); memory_available = _Heap_Initialize( 49244: 4878 0004 pea 4 49248: 2f03 movel %d3,%sp@- 4924a: 2f02 movel %d2,%sp@- 4924c: 4879 0005 ef9a pea 5ef9a <_Workspace_Area> 49252: 4eb9 0004 6c60 jsr 46c60 <_Heap_Initialize> starting_address, size, CPU_HEAP_ALIGNMENT ); if ( memory_available == 0 ) 49258: 4fef 0010 lea %sp@(16),%sp 4925c: 4a80 tstl %d0 4925e: 671e beqs 4927e <_Workspace_Handler_initialization+0x56> _Internal_error_Occurred( INTERNAL_ERROR_CORE, true, INTERNAL_ERROR_TOO_LITTLE_WORKSPACE ); } 49260: 242e fff8 movel %fp@(-8),%d2 49264: 262e fffc movel %fp@(-4),%d3 49268: 4e5e unlk %fp 4926a: 4e75 rts uintptr_t memory_available = 0; void *starting_address = Configuration.work_space_start; uintptr_t size = Configuration.work_space_size; if ( Configuration.do_zero_of_workspace ) memset( starting_address, 0, size ); 4926c: 2f03 movel %d3,%sp@- 4926e: 42a7 clrl %sp@- 49270: 2f02 movel %d2,%sp@- 49272: 4eb9 0004 f484 jsr 4f484 49278: 4fef 000c lea %sp@(12),%sp 4927c: 60c6 bras 49244 <_Workspace_Handler_initialization+0x1c> size, CPU_HEAP_ALIGNMENT ); if ( memory_available == 0 ) _Internal_error_Occurred( 4927e: 4878 0003 pea 3 49282: 4878 0001 pea 1 49286: 42a7 clrl %sp@- 49288: 4eb9 0004 6fcc jsr 46fcc <_Internal_error_Occurred> ... =============================================================================== 00045cfc : int adjtime( struct timeval *delta, struct timeval *olddelta ) { 45cfc: 4e56 ffec linkw %fp,#-20 45d00: 48d7 0c04 moveml %d2/%a2-%a3,%sp@ 45d04: 246e 0008 moveal %fp@(8),%a2 45d08: 266e 000c moveal %fp@(12),%a3 long adjustment; /* * Simple validations */ if ( !delta ) 45d0c: 4a8a tstl %a2 45d0e: 6700 00ec beqw 45dfc rtems_set_errno_and_return_minus_one( EINVAL ); if ( delta->tv_usec >= TOD_MICROSECONDS_PER_SECOND ) 45d12: 202a 0004 movel %a2@(4),%d0 45d16: 0c80 000f 423f cmpil #999999,%d0 45d1c: 6200 00de bhiw 45dfc rtems_set_errno_and_return_minus_one( EINVAL ); if ( olddelta ) { 45d20: 4a8b tstl %a3 45d22: 670a beqs 45d2e olddelta->tv_sec = 0; olddelta->tv_usec = 0; 45d24: 42ab 0004 clrl %a3@(4) 45d28: 202a 0004 movel %a2@(4),%d0 if ( delta->tv_usec >= TOD_MICROSECONDS_PER_SECOND ) rtems_set_errno_and_return_minus_one( EINVAL ); if ( olddelta ) { olddelta->tv_sec = 0; 45d2c: 4293 clrl %a3@ olddelta->tv_usec = 0; } /* convert delta to microseconds */ adjustment = (delta->tv_sec * TOD_MICROSECONDS_PER_SECOND); 45d2e: 223c 000f 4240 movel #1000000,%d1 45d34: 4c12 1800 mulsl %a2@,%d1 adjustment += delta->tv_usec; /* too small to account for */ if ( adjustment < rtems_configuration_get_microseconds_per_tick() ) 45d38: d081 addl %d1,%d0 45d3a: b0b9 0005 ed10 cmpl 5ed10 ,%d0 45d40: 640c bccs 45d4e _Thread_Enable_dispatch(); /* set the user's output */ if ( olddelta ) *olddelta = *delta; 45d42: 4280 clrl %d0 return 0; } 45d44: 4cee 0c04 ffec moveml %fp@(-20),%d2/%a2-%a3 45d4a: 4e5e unlk %fp 45d4c: 4e75 rts rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 45d4e: 2039 0006 05f0 movel 605f0 <_Thread_Dispatch_disable_level>,%d0 45d54: 5280 addql #1,%d0 45d56: 23c0 0006 05f0 movel %d0,605f0 <_Thread_Dispatch_disable_level> * This prevents context switches while we are adjusting the TOD */ _Thread_Disable_dispatch(); _TOD_Get( &ts ); 45d5c: 240e movel %fp,%d2 45d5e: 5182 subql #8,%d2 45d60: 2f02 movel %d2,%sp@- 45d62: 4eb9 0004 7690 jsr 47690 <_TOD_Get> ts.tv_sec += delta->tv_sec; ts.tv_nsec += delta->tv_usec * TOD_NANOSECONDS_PER_MICROSECOND; 45d68: 202a 0004 movel %a2@(4),%d0 45d6c: 223c 0000 03e8 movel #1000,%d1 45d72: 4c01 0800 mulsl %d1,%d0 /* if adjustment is too much positive */ while ( ts.tv_nsec >= TOD_NANOSECONDS_PER_SECOND ) { 45d76: 588f addql #4,%sp _Thread_Disable_dispatch(); _TOD_Get( &ts ); ts.tv_sec += delta->tv_sec; 45d78: 2212 movel %a2@,%d1 ts.tv_nsec += delta->tv_usec * TOD_NANOSECONDS_PER_MICROSECOND; 45d7a: d0ae fffc addl %fp@(-4),%d0 _Thread_Disable_dispatch(); _TOD_Get( &ts ); ts.tv_sec += delta->tv_sec; 45d7e: d3ae fff8 addl %d1,%fp@(-8) ts.tv_nsec += delta->tv_usec * TOD_NANOSECONDS_PER_MICROSECOND; 45d82: 2d40 fffc movel %d0,%fp@(-4) /* if adjustment is too much positive */ while ( ts.tv_nsec >= TOD_NANOSECONDS_PER_SECOND ) { 45d86: 0c80 3b9a c9ff cmpil #999999999,%d0 45d8c: 631c blss 45daa 45d8e: 222e fff8 movel %fp@(-8),%d1 * At one point there was a static variable named adjustment * used by this implementation. I don't see any reason for it * to be here based upon the GNU/Linux documentation. */ int adjtime( 45d92: 5281 addql #1,%d1 ts.tv_sec += delta->tv_sec; ts.tv_nsec += delta->tv_usec * TOD_NANOSECONDS_PER_MICROSECOND; /* if adjustment is too much positive */ while ( ts.tv_nsec >= TOD_NANOSECONDS_PER_SECOND ) { ts.tv_nsec -= TOD_NANOSECONDS_PER_SECOND; 45d94: 0680 c465 3600 addil #-1000000000,%d0 ts.tv_sec += delta->tv_sec; ts.tv_nsec += delta->tv_usec * TOD_NANOSECONDS_PER_MICROSECOND; /* if adjustment is too much positive */ while ( ts.tv_nsec >= TOD_NANOSECONDS_PER_SECOND ) { 45d9a: 0c80 3b9a c9ff cmpil #999999999,%d0 45da0: 62f0 bhis 45d92 <== NEVER TAKEN 45da2: 2d41 fff8 movel %d1,%fp@(-8) 45da6: 2d40 fffc movel %d0,%fp@(-4) ts.tv_nsec -= TOD_NANOSECONDS_PER_SECOND; ts.tv_sec++; } /* if adjustment is too much negative */ while ( ts.tv_nsec <= (-1 * TOD_NANOSECONDS_PER_SECOND) ) { 45daa: 0c80 c465 3600 cmpil #-1000000000,%d0 45db0: 621c bhis 45dce <== NEVER TAKEN 45db2: 222e fff8 movel %fp@(-8),%d1 * At one point there was a static variable named adjustment * used by this implementation. I don't see any reason for it * to be here based upon the GNU/Linux documentation. */ int adjtime( 45db6: 5381 subql #1,%d1 ts.tv_sec++; } /* if adjustment is too much negative */ while ( ts.tv_nsec <= (-1 * TOD_NANOSECONDS_PER_SECOND) ) { ts.tv_nsec += TOD_NANOSECONDS_PER_SECOND; 45db8: 0680 3b9a ca00 addil #1000000000,%d0 ts.tv_nsec -= TOD_NANOSECONDS_PER_SECOND; ts.tv_sec++; } /* if adjustment is too much negative */ while ( ts.tv_nsec <= (-1 * TOD_NANOSECONDS_PER_SECOND) ) { 45dbe: 0c80 c465 3600 cmpil #-1000000000,%d0 45dc4: 63f0 blss 45db6 45dc6: 2d40 fffc movel %d0,%fp@(-4) 45dca: 2d41 fff8 movel %d1,%fp@(-8) ts.tv_nsec += TOD_NANOSECONDS_PER_SECOND; ts.tv_sec--; } _TOD_Set( &ts ); 45dce: 2f02 movel %d2,%sp@- 45dd0: 4eb9 0004 775c jsr 4775c <_TOD_Set> _Thread_Enable_dispatch(); 45dd6: 4eb9 0004 8944 jsr 48944 <_Thread_Enable_dispatch> /* set the user's output */ if ( olddelta ) 45ddc: 588f addql #4,%sp 45dde: 4a8b tstl %a3 45de0: 6700 ff60 beqw 45d42 *olddelta = *delta; 45de4: 4280 clrl %d0 45de6: 2212 movel %a2@,%d1 45de8: 242a 0004 movel %a2@(4),%d2 45dec: 2681 movel %d1,%a3@ 45dee: 2742 0004 movel %d2,%a3@(4) return 0; } 45df2: 4cee 0c04 ffec moveml %fp@(-20),%d2/%a2-%a3 45df8: 4e5e unlk %fp 45dfa: 4e75 rts */ if ( !delta ) rtems_set_errno_and_return_minus_one( EINVAL ); if ( delta->tv_usec >= TOD_MICROSECONDS_PER_SECOND ) rtems_set_errno_and_return_minus_one( EINVAL ); 45dfc: 4eb9 0004 f78c jsr 4f78c <__errno> 45e02: 7216 moveq #22,%d1 45e04: 2040 moveal %d0,%a0 45e06: 70ff moveq #-1,%d0 /* set the user's output */ if ( olddelta ) *olddelta = *delta; return 0; } 45e08: 4cee 0c04 ffec moveml %fp@(-20),%d2/%a2-%a3 */ if ( !delta ) rtems_set_errno_and_return_minus_one( EINVAL ); if ( delta->tv_usec >= TOD_MICROSECONDS_PER_SECOND ) rtems_set_errno_and_return_minus_one( EINVAL ); 45e0e: 2081 movel %d1,%a0@ /* set the user's output */ if ( olddelta ) *olddelta = *delta; return 0; } 45e10: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00047c80 : } unsigned int alarm( unsigned int seconds ) { 47c80: 4e56 fff4 linkw %fp,#-12 47c84: 48d7 001c moveml %d2-%d4,%sp@ 47c88: 242e 0008 movel %fp@(8),%d2 /* * Initialize the timer used to implement alarm(). */ if ( !the_timer->routine ) { 47c8c: 4ab9 0006 3e10 tstl 63e10 <_POSIX_signals_Alarm_timer+0x1c> 47c92: 674e beqs 47ce2 _Watchdog_Initialize( the_timer, _POSIX_signals_Alarm_TSR, 0, NULL ); } else { Watchdog_States state; state = _Watchdog_Remove( the_timer ); 47c94: 4879 0006 3df4 pea 63df4 <_POSIX_signals_Alarm_timer> 47c9a: 4eb9 0004 ca20 jsr 4ca20 <_Watchdog_Remove> if ( (state == WATCHDOG_ACTIVE) || (state == WATCHDOG_REMOVE_IT) ) { 47ca0: 588f addql #4,%sp 47ca2: 7201 moveq #1,%d1 47ca4: 5580 subql #2,%d0 47ca6: b280 cmpl %d0,%d1 47ca8: 645e bccs 47d08 47caa: 4283 clrl %d3 remaining = the_timer->initial - ((the_timer->stop_time - the_timer->start_time) / TOD_TICKS_PER_SECOND); } } if ( seconds ) 47cac: 4a82 tstl %d2 47cae: 660c bnes 47cbc <== NEVER TAKEN _Watchdog_Insert_seconds( the_timer, seconds ); return remaining; } 47cb0: 2003 movel %d3,%d0 47cb2: 4cee 001c fff4 moveml %fp@(-12),%d2-%d4 47cb8: 4e5e unlk %fp 47cba: 4e75 rts ) { the_watchdog->initial = units; _Watchdog_Insert( &_Watchdog_Seconds_chain, the_watchdog ); 47cbc: 4879 0006 3df4 pea 63df4 <_POSIX_signals_Alarm_timer> 47cc2: 4879 0006 415c pea 6415c <_Watchdog_Seconds_chain> Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 47cc8: 23c2 0006 3e00 movel %d2,63e00 <_POSIX_signals_Alarm_timer+0xc> _Watchdog_Insert( &_Watchdog_Seconds_chain, the_watchdog ); 47cce: 4eb9 0004 c8d8 jsr 4c8d8 <_Watchdog_Insert> 47cd4: 508f addql #8,%sp 47cd6: 2003 movel %d3,%d0 47cd8: 4cee 001c fff4 moveml %fp@(-12),%d2-%d4 47cde: 4e5e unlk %fp 47ce0: 4e75 rts Watchdog_Service_routine_entry routine, Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; 47ce2: 42b9 0006 3dfc clrl 63dfc <_POSIX_signals_Alarm_timer+0x8> the_watchdog->routine = routine; the_watchdog->id = id; the_watchdog->user_data = user_data; 47ce8: 4283 clrl %d3 Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; 47cea: 203c 0004 7d2c movel #294188,%d0 the_watchdog->id = id; 47cf0: 42b9 0006 3e14 clrl 63e14 <_POSIX_signals_Alarm_timer+0x20> Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; 47cf6: 23c0 0006 3e10 movel %d0,63e10 <_POSIX_signals_Alarm_timer+0x1c> the_watchdog->id = id; the_watchdog->user_data = user_data; 47cfc: 42b9 0006 3e18 clrl 63e18 <_POSIX_signals_Alarm_timer+0x24> remaining = the_timer->initial - ((the_timer->stop_time - the_timer->start_time) / TOD_TICKS_PER_SECOND); } } if ( seconds ) 47d02: 4a82 tstl %d2 47d04: 67aa beqs 47cb0 <== NEVER TAKEN 47d06: 60b4 bras 47cbc * boot. Since alarm() is dealing in seconds, we must account for * this. */ remaining = the_timer->initial - ((the_timer->stop_time - the_timer->start_time) / TOD_TICKS_PER_SECOND); 47d08: 2839 0006 3e0c movel 63e0c <_POSIX_signals_Alarm_timer+0x18>,%d4 47d0e: 98b9 0006 3e08 subl 63e08 <_POSIX_signals_Alarm_timer+0x14>,%d4 * The stop_time and start_time fields are snapshots of ticks since * boot. Since alarm() is dealing in seconds, we must account for * this. */ remaining = the_timer->initial - 47d14: 2639 0006 3e00 movel 63e00 <_POSIX_signals_Alarm_timer+0xc>,%d3 ((the_timer->stop_time - the_timer->start_time) / TOD_TICKS_PER_SECOND); 47d1a: 4eb9 0004 a4e0 jsr 4a4e0 * The stop_time and start_time fields are snapshots of ticks since * boot. Since alarm() is dealing in seconds, we must account for * this. */ remaining = the_timer->initial - 47d20: 4c40 4004 remul %d0,%d4,%d4 47d24: 9684 subl %d4,%d3 ((the_timer->stop_time - the_timer->start_time) / TOD_TICKS_PER_SECOND); } } if ( seconds ) 47d26: 4a82 tstl %d2 47d28: 6786 beqs 47cb0 <== NEVER TAKEN 47d2a: 6090 bras 47cbc =============================================================================== 00045c38 : int clock_gettime( clockid_t clock_id, struct timespec *tp ) { 45c38: 4e56 0000 linkw %fp,#0 45c3c: 202e 0008 movel %fp@(8),%d0 45c40: 222e 000c movel %fp@(12),%d1 45c44: 2f02 movel %d2,%sp@- if ( !tp ) 45c46: 4a81 tstl %d1 45c48: 6718 beqs 45c62 rtems_set_errno_and_return_minus_one( EINVAL ); if ( clock_id == CLOCK_REALTIME ) { 45c4a: 7401 moveq #1,%d2 45c4c: b480 cmpl %d0,%d2 45c4e: 6752 beqs 45ca2 _TOD_Get(tp); return 0; } #ifdef CLOCK_MONOTONIC if ( clock_id == CLOCK_MONOTONIC ) { 45c50: 7404 moveq #4,%d2 45c52: b480 cmpl %d0,%d2 45c54: 6738 beqs 45c8e <== NEVER TAKEN return 0; } #endif #ifdef _POSIX_CPUTIME if ( clock_id == CLOCK_PROCESS_CPUTIME ) { 45c56: 7402 moveq #2,%d2 45c58: b480 cmpl %d0,%d2 45c5a: 6732 beqs 45c8e return 0; } #endif #ifdef _POSIX_THREAD_CPUTIME if ( clock_id == CLOCK_THREAD_CPUTIME ) 45c5c: 7203 moveq #3,%d1 45c5e: b280 cmpl %d0,%d1 45c60: 6716 beqs 45c78 rtems_set_errno_and_return_minus_one( ENOSYS ); #endif rtems_set_errno_and_return_minus_one( EINVAL ); 45c62: 4eb9 0004 fc54 jsr 4fc54 <__errno> return 0; } 45c68: 242e fffc movel %fp@(-4),%d2 #ifdef _POSIX_THREAD_CPUTIME if ( clock_id == CLOCK_THREAD_CPUTIME ) rtems_set_errno_and_return_minus_one( ENOSYS ); #endif rtems_set_errno_and_return_minus_one( EINVAL ); 45c6c: 2040 moveal %d0,%a0 45c6e: 7216 moveq #22,%d1 45c70: 70ff moveq #-1,%d0 return 0; } 45c72: 4e5e unlk %fp #ifdef _POSIX_THREAD_CPUTIME if ( clock_id == CLOCK_THREAD_CPUTIME ) rtems_set_errno_and_return_minus_one( ENOSYS ); #endif rtems_set_errno_and_return_minus_one( EINVAL ); 45c74: 2081 movel %d1,%a0@ return 0; } 45c76: 4e75 rts } #endif #ifdef _POSIX_THREAD_CPUTIME if ( clock_id == CLOCK_THREAD_CPUTIME ) rtems_set_errno_and_return_minus_one( ENOSYS ); 45c78: 4eb9 0004 fc54 jsr 4fc54 <__errno> 45c7e: 7458 moveq #88,%d2 45c80: 2040 moveal %d0,%a0 45c82: 70ff moveq #-1,%d0 45c84: 2082 movel %d2,%a0@ #endif rtems_set_errno_and_return_minus_one( EINVAL ); return 0; } 45c86: 242e fffc movel %fp@(-4),%d2 45c8a: 4e5e unlk %fp 45c8c: 4e75 rts } #endif #ifdef _POSIX_CPUTIME if ( clock_id == CLOCK_PROCESS_CPUTIME ) { _TOD_Get_uptime_as_timespec( tp ); 45c8e: 2f01 movel %d1,%sp@- 45c90: 4eb9 0004 7d80 jsr 47d80 <_TOD_Get_uptime_as_timespec> #endif rtems_set_errno_and_return_minus_one( EINVAL ); return 0; } 45c96: 242e fffc movel %fp@(-4),%d2 #endif #ifdef _POSIX_CPUTIME if ( clock_id == CLOCK_PROCESS_CPUTIME ) { _TOD_Get_uptime_as_timespec( tp ); return 0; 45c9a: 588f addql #4,%sp } #endif #ifdef _POSIX_CPUTIME if ( clock_id == CLOCK_PROCESS_CPUTIME ) { _TOD_Get_uptime_as_timespec( tp ); 45c9c: 4280 clrl %d0 #endif rtems_set_errno_and_return_minus_one( EINVAL ); return 0; } 45c9e: 4e5e unlk %fp 45ca0: 4e75 rts { if ( !tp ) rtems_set_errno_and_return_minus_one( EINVAL ); if ( clock_id == CLOCK_REALTIME ) { _TOD_Get(tp); 45ca2: 2f01 movel %d1,%sp@- 45ca4: 4eb9 0004 7ce4 jsr 47ce4 <_TOD_Get> #endif rtems_set_errno_and_return_minus_one( EINVAL ); return 0; } 45caa: 242e fffc movel %fp@(-4),%d2 if ( !tp ) rtems_set_errno_and_return_minus_one( EINVAL ); if ( clock_id == CLOCK_REALTIME ) { _TOD_Get(tp); return 0; 45cae: 588f addql #4,%sp { if ( !tp ) rtems_set_errno_and_return_minus_one( EINVAL ); if ( clock_id == CLOCK_REALTIME ) { _TOD_Get(tp); 45cb0: 4280 clrl %d0 #endif rtems_set_errno_and_return_minus_one( EINVAL ); return 0; } 45cb2: 4e5e unlk %fp ... =============================================================================== 00045cb8 : int clock_settime( clockid_t clock_id, const struct timespec *tp ) { 45cb8: 4e56 0000 linkw %fp,#0 45cbc: 202e 0008 movel %fp@(8),%d0 45cc0: 206e 000c moveal %fp@(12),%a0 if ( !tp ) 45cc4: 4a88 tstl %a0 45cc6: 6712 beqs 45cda <== NEVER TAKEN rtems_set_errno_and_return_minus_one( EINVAL ); if ( clock_id == CLOCK_REALTIME ) { 45cc8: 7201 moveq #1,%d1 45cca: b280 cmpl %d0,%d1 45ccc: 6730 beqs 45cfe _Thread_Disable_dispatch(); _TOD_Set( tp ); _Thread_Enable_dispatch(); } #ifdef _POSIX_CPUTIME else if ( clock_id == CLOCK_PROCESS_CPUTIME ) 45cce: 7202 moveq #2,%d1 45cd0: b280 cmpl %d0,%d1 45cd2: 6718 beqs 45cec rtems_set_errno_and_return_minus_one( ENOSYS ); #endif #ifdef _POSIX_THREAD_CPUTIME else if ( clock_id == CLOCK_THREAD_CPUTIME ) 45cd4: 7203 moveq #3,%d1 45cd6: b280 cmpl %d0,%d1 45cd8: 6712 beqs 45cec rtems_set_errno_and_return_minus_one( ENOSYS ); #endif else rtems_set_errno_and_return_minus_one( EINVAL ); 45cda: 4eb9 0004 fc54 jsr 4fc54 <__errno> 45ce0: 7216 moveq #22,%d1 45ce2: 2040 moveal %d0,%a0 45ce4: 70ff moveq #-1,%d0 return 0; } 45ce6: 4e5e unlk %fp #ifdef _POSIX_THREAD_CPUTIME else if ( clock_id == CLOCK_THREAD_CPUTIME ) rtems_set_errno_and_return_minus_one( ENOSYS ); #endif else rtems_set_errno_and_return_minus_one( EINVAL ); 45ce8: 2081 movel %d1,%a0@ return 0; } 45cea: 4e75 rts else if ( clock_id == CLOCK_PROCESS_CPUTIME ) rtems_set_errno_and_return_minus_one( ENOSYS ); #endif #ifdef _POSIX_THREAD_CPUTIME else if ( clock_id == CLOCK_THREAD_CPUTIME ) rtems_set_errno_and_return_minus_one( ENOSYS ); 45cec: 4eb9 0004 fc54 jsr 4fc54 <__errno> 45cf2: 7258 moveq #88,%d1 45cf4: 2040 moveal %d0,%a0 45cf6: 70ff moveq #-1,%d0 #endif else rtems_set_errno_and_return_minus_one( EINVAL ); return 0; } 45cf8: 4e5e unlk %fp else if ( clock_id == CLOCK_PROCESS_CPUTIME ) rtems_set_errno_and_return_minus_one( ENOSYS ); #endif #ifdef _POSIX_THREAD_CPUTIME else if ( clock_id == CLOCK_THREAD_CPUTIME ) rtems_set_errno_and_return_minus_one( ENOSYS ); 45cfa: 2081 movel %d1,%a0@ #endif else rtems_set_errno_and_return_minus_one( EINVAL ); return 0; } 45cfc: 4e75 rts { if ( !tp ) rtems_set_errno_and_return_minus_one( EINVAL ); if ( clock_id == CLOCK_REALTIME ) { if ( tp->tv_sec < TOD_SECONDS_1970_THROUGH_1988 ) 45cfe: 203c 21da e4ff movel #567993599,%d0 45d04: b090 cmpl %a0@,%d0 45d06: 64d2 bccs 45cda rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 45d08: 2039 0006 0ed8 movel 60ed8 <_Thread_Dispatch_disable_level>,%d0 45d0e: 5280 addql #1,%d0 45d10: 23c0 0006 0ed8 movel %d0,60ed8 <_Thread_Dispatch_disable_level> rtems_set_errno_and_return_minus_one( EINVAL ); _Thread_Disable_dispatch(); _TOD_Set( tp ); 45d16: 2f08 movel %a0,%sp@- 45d18: 4eb9 0004 7dd8 jsr 47dd8 <_TOD_Set> _Thread_Enable_dispatch(); 45d1e: 4eb9 0004 8fc0 jsr 48fc0 <_Thread_Enable_dispatch> rtems_set_errno_and_return_minus_one( ENOSYS ); #endif else rtems_set_errno_and_return_minus_one( EINVAL ); return 0; 45d24: 588f addql #4,%sp if ( tp->tv_sec < TOD_SECONDS_1970_THROUGH_1988 ) rtems_set_errno_and_return_minus_one( EINVAL ); _Thread_Disable_dispatch(); _TOD_Set( tp ); _Thread_Enable_dispatch(); 45d26: 4280 clrl %d0 #endif else rtems_set_errno_and_return_minus_one( EINVAL ); return 0; } 45d28: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004e644 : int killinfo( pid_t pid, int sig, const union sigval *value ) { 4e644: 4e56 ffd0 linkw %fp,#-48 4e648: 48d7 1cfc moveml %d2-%d7/%a2-%a4,%sp@ 4e64c: 262e 000c movel %fp@(12),%d3 4e650: 246e 0010 moveal %fp@(16),%a2 POSIX_signals_Siginfo_node *psiginfo; /* * Only supported for the "calling process" (i.e. this node). */ if ( pid != getpid() ) 4e654: 4eb9 0004 d5a4 jsr 4d5a4 4e65a: b0ae 0008 cmpl %fp@(8),%d0 4e65e: 6600 022c bnew 4e88c rtems_set_errno_and_return_minus_one( ESRCH ); /* * Validate the signal passed. */ if ( !sig ) 4e662: 4a83 tstl %d3 4e664: 6700 023e beqw 4e8a4 static inline bool is_valid_signo( int signo ) { return ((signo) >= 1 && (signo) <= 32 ); 4e668: 2003 movel %d3,%d0 4e66a: 5380 subql #1,%d0 rtems_set_errno_and_return_minus_one( EINVAL ); if ( !is_valid_signo(sig) ) 4e66c: 721f moveq #31,%d1 4e66e: b280 cmpl %d0,%d1 4e670: 6500 0232 bcsw 4e8a4 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 ) 4e674: 2203 movel %d3,%d1 4e676: 2803 movel %d3,%d4 4e678: 7e01 moveq #1,%d7 4e67a: e589 lsll #2,%d1 4e67c: e98c lsll #4,%d4 4e67e: 9881 subl %d1,%d4 4e680: 2044 moveal %d4,%a0 4e682: d1fc 0005 f42e addal #390190,%a0 4e688: be90 cmpl %a0@,%d7 4e68a: 6700 00d4 beqw 4e760 /* * 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 ) ) 4e68e: 7208 moveq #8,%d1 4e690: b283 cmpl %d3,%d1 4e692: 6700 00d8 beqw 4e76c 4e696: 7e04 moveq #4,%d7 4e698: be83 cmpl %d3,%d7 4e69a: 6700 00d0 beqw 4e76c 4e69e: 123c 000b moveb #11,%d1 4e6a2: b283 cmpl %d3,%d1 4e6a4: 6700 00c6 beqw 4e76c static inline sigset_t signo_to_mask( uint32_t sig ) { return 1u << (sig - 1); 4e6a8: 7401 moveq #1,%d2 /* * Build up a siginfo structure */ siginfo = &siginfo_struct; siginfo->si_signo = sig; siginfo->si_code = SI_USER; 4e6aa: 7e01 moveq #1,%d7 4e6ac: e1aa lsll %d0,%d2 /* * Build up a siginfo structure */ siginfo = &siginfo_struct; siginfo->si_signo = sig; 4e6ae: 2d43 fff4 movel %d3,%fp@(-12) siginfo->si_code = SI_USER; 4e6b2: 2d47 fff8 movel %d7,%fp@(-8) if ( !value ) { 4e6b6: 4a8a tstl %a2 4e6b8: 6700 01ca beqw 4e884 siginfo->si_value.sival_int = 0; } else { siginfo->si_value = *value; 4e6bc: 2d52 fffc movel %a2@,%fp@(-4) 4e6c0: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 4e6c6: 5280 addql #1,%d0 4e6c8: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> /* * Is the currently executing thread interested? If so then it will * get it an execute it as soon as the dispatcher executes. */ the_thread = _Thread_Executing; 4e6ce: 2479 0005 f032 moveal 5f032 <_Thread_Executing>,%a2 api = the_thread->API_Extensions[ THREAD_API_POSIX ]; 4e6d4: 206a 010e moveal %a2@(270),%a0 4e6d8: 2028 00cc movel %a0@(204),%d0 4e6dc: 4680 notl %d0 4e6de: c082 andl %d2,%d0 4e6e0: 6642 bnes 4e724 /* XXX violation of visibility -- need to define thread queue support */ the_chain = &_POSIX_signals_Wait_queue.Queues.Fifo; for ( the_node = the_chain->first ; 4e6e2: 2079 0005 f5b2 moveal 5f5b2 <_POSIX_signals_Wait_queue>,%a0 4e6e8: b1fc 0005 f5b6 cmpal #390582,%a0 4e6ee: 6700 00ec beqw 4e7dc #endif /* * Is this thread is actually blocked waiting for the signal? */ if (the_thread->Wait.option & mask) 4e6f2: 2002 movel %d2,%d0 for ( the_node = the_chain->first ; !_Chain_Is_tail( the_chain, the_node ) ; the_node = the_node->next ) { the_thread = (Thread_Control *)the_node; 4e6f4: 2448 moveal %a0,%a2 #endif /* * Is this thread is actually blocked waiting for the signal? */ if (the_thread->Wait.option & mask) 4e6f6: c0a8 0030 andl %a0@(48),%d0 for ( the_node = the_chain->first ; !_Chain_Is_tail( the_chain, the_node ) ; the_node = the_node->next ) { the_thread = (Thread_Control *)the_node; api = the_thread->API_Extensions[ THREAD_API_POSIX ]; 4e6fa: 2268 010e moveal %a0@(270),%a1 #endif /* * Is this thread is actually blocked waiting for the signal? */ if (the_thread->Wait.option & mask) 4e6fe: 6624 bnes 4e724 /* * Is this thread is blocked waiting for another signal but has * not blocked this one? */ if (~api->signals_blocked & mask) 4e700: 2029 00cc movel %a1@(204),%d0 4e704: 4680 notl %d0 4e706: c082 andl %d2,%d0 4e708: 661a bnes 4e724 <== NEVER TAKEN 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 ) { 4e70a: 2050 moveal %a0@,%a0 the_thread = (Thread_Control *)the_node; 4e70c: 2448 moveal %a0,%a2 /* XXX violation of visibility -- need to define thread queue support */ the_chain = &_POSIX_signals_Wait_queue.Queues.Fifo; for ( the_node = the_chain->first ; 4e70e: b1fc 0005 f5b6 cmpal #390582,%a0 4e714: 6700 00c6 beqw 4e7dc #endif /* * Is this thread is actually blocked waiting for the signal? */ if (the_thread->Wait.option & mask) 4e718: 2002 movel %d2,%d0 <== NOT EXECUTED 4e71a: c0a8 0030 andl %a0@(48),%d0 <== 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 ]; 4e71e: 2268 010e moveal %a0@(270),%a1 <== NOT EXECUTED #endif /* * Is this thread is actually blocked waiting for the signal? */ if (the_thread->Wait.option & mask) 4e722: 67dc beqs 4e700 <== NOT EXECUTED * thread needs to do the post context switch extension so it can * evaluate the signals pending. */ process_it: the_thread->do_post_task_switch_extension = true; 4e724: 7001 moveq #1,%d0 4e726: 1540 0074 moveb %d0,%a2@(116) /* * 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 ) ) { 4e72a: 486e fff4 pea %fp@(-12) 4e72e: 2f03 movel %d3,%sp@- 4e730: 2f0a movel %a2,%sp@- 4e732: 4eb9 0004 e97c jsr 4e97c <_POSIX_signals_Unblock_thread> 4e738: 4fef 000c lea %sp@(12),%sp 4e73c: 4a00 tstb %d0 4e73e: 6600 008a bnew 4e7ca /* * 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 ); 4e742: 2f02 movel %d2,%sp@- 4e744: 4eb9 0004 e94c jsr 4e94c <_POSIX_signals_Set_process_signals> if ( _POSIX_signals_Vectors[ sig ].sa_flags == SA_SIGINFO ) { 4e74a: 588f addql #4,%sp 4e74c: 41f9 0005 f426 lea 5f426 <_POSIX_signals_Vectors>,%a0 4e752: 7202 moveq #2,%d1 4e754: b2b0 4800 cmpl %a0@(00000000,%d4:l),%d1 4e758: 672e beqs 4e788 _Chain_Append( &_POSIX_signals_Siginfo[ sig ], &psiginfo->Node ); } DEBUG_STEP("\n"); _Thread_Enable_dispatch(); 4e75a: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> 4e760: 4280 clrl %d0 return 0; } 4e762: 4cee 1cfc ffd0 moveml %fp@(-48),%d2-%d7/%a2-%a4 4e768: 4e5e unlk %fp 4e76a: 4e75 rts * 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 ); 4e76c: 4eb9 0004 eb98 jsr 4eb98 4e772: 2f03 movel %d3,%sp@- 4e774: 2f00 movel %d0,%sp@- 4e776: 4eb9 0004 eabc jsr 4eabc 4e77c: 508f addql #8,%sp } DEBUG_STEP("\n"); _Thread_Enable_dispatch(); return 0; } 4e77e: 4cee 1cfc ffd0 moveml %fp@(-48),%d2-%d7/%a2-%a4 4e784: 4e5e unlk %fp 4e786: 4e75 rts */ _POSIX_signals_Set_process_signals( mask ); if ( _POSIX_signals_Vectors[ sig ].sa_flags == SA_SIGINFO ) { psiginfo = (POSIX_signals_Siginfo_node *) 4e788: 4879 0005 f5a6 pea 5f5a6 <_POSIX_signals_Inactive_siginfo> 4e78e: 4eb9 0004 b9c0 jsr 4b9c0 <_Chain_Get> _Chain_Get( &_POSIX_signals_Inactive_siginfo ); if ( !psiginfo ) { 4e794: 588f addql #4,%sp */ _POSIX_signals_Set_process_signals( mask ); if ( _POSIX_signals_Vectors[ sig ].sa_flags == SA_SIGINFO ) { psiginfo = (POSIX_signals_Siginfo_node *) 4e796: 2040 moveal %d0,%a0 _Chain_Get( &_POSIX_signals_Inactive_siginfo ); if ( !psiginfo ) { 4e798: 4a80 tstl %d0 4e79a: 6700 0120 beqw 4e8bc _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one( EAGAIN ); } psiginfo->Info = *siginfo; 4e79e: 216e fff4 0008 movel %fp@(-12),%a0@(8) _Chain_Append( &_POSIX_signals_Siginfo[ sig ], &psiginfo->Node ); 4e7a4: 0684 0005 f61e addil #390686,%d4 if ( !psiginfo ) { _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one( EAGAIN ); } psiginfo->Info = *siginfo; 4e7aa: 216e fff8 000c movel %fp@(-8),%a0@(12) 4e7b0: 216e fffc 0010 movel %fp@(-4),%a0@(16) _Chain_Append( &_POSIX_signals_Siginfo[ sig ], &psiginfo->Node ); 4e7b6: 2f00 movel %d0,%sp@- 4e7b8: 2f04 movel %d4,%sp@- 4e7ba: 4eb9 0004 6798 jsr 46798 <_Chain_Append> 4e7c0: 508f addql #8,%sp } DEBUG_STEP("\n"); _Thread_Enable_dispatch(); 4e7c2: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> 4e7c8: 6096 bras 4e760 /* * 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 ) ) { _Thread_Enable_dispatch(); 4e7ca: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> 4e7d0: 4280 clrl %d0 } DEBUG_STEP("\n"); _Thread_Enable_dispatch(); return 0; } 4e7d2: 4cee 1cfc ffd0 moveml %fp@(-48),%d2-%d7/%a2-%a4 4e7d8: 4e5e unlk %fp 4e7da: 4e75 rts * NOTES: * * + rtems internal threads do not receive signals. */ interested = NULL; interested_priority = PRIORITY_MAXIMUM + 1; 4e7dc: 4285 clrl %d5 4e7de: 1a39 0005 d7c2 moveb 5d7c2 ,%d5 4e7e4: 49f9 0005 ef38 lea 5ef38 <_Objects_Information_table+0x8>,%a4 */ #define _POSIX_signals_Is_interested( _api, _mask ) \ ( ~(_api)->signals_blocked & (_mask) ) int killinfo( 4e7ea: 95ca subal %a2,%a2 * NOTES: * * + rtems internal threads do not receive signals. */ interested = NULL; interested_priority = PRIORITY_MAXIMUM + 1; 4e7ec: 5285 addql #1,%d5 for (the_api = OBJECTS_CLASSIC_API; the_api <= OBJECTS_APIS_LAST; the_api++) { /* * This can occur when no one is interested and ITRON is not configured. */ if ( !_Objects_Information_table[ the_api ] ) 4e7ee: 2054 moveal %a4@,%a0 4e7f0: 4a88 tstl %a0 4e7f2: 675e beqs 4e852 continue; the_info = _Objects_Information_table[ the_api ][ 1 ]; 4e7f4: 2068 0004 moveal %a0@(4),%a0 */ if ( !the_info ) continue; #endif maximum = the_info->maximum; 4e7f8: 4286 clrl %d6 4e7fa: 3c28 000e movew %a0@(14),%d6 object_table = the_info->local_table; 4e7fe: 2268 0018 moveal %a0@(24),%a1 for ( index = 1 ; index <= maximum ; index++ ) { 4e802: 4a86 tstl %d6 4e804: 674c beqs 4e852 4e806: 5889 addql #4,%a1 4e808: 7001 moveq #1,%d0 the_thread = (Thread_Control *) object_table[ index ]; 4e80a: 2051 moveal %a1@,%a0 #endif maximum = the_info->maximum; object_table = the_info->local_table; for ( index = 1 ; index <= maximum ; index++ ) { 4e80c: 5280 addql #1,%d0 4e80e: 5889 addql #4,%a1 the_thread = (Thread_Control *) object_table[ index ]; if ( !the_thread ) 4e810: 4a88 tstl %a0 4e812: 673a beqs 4e84e /* * If this thread is of lower priority than the interested thread, * go on to the next thread. */ if ( the_thread->current_priority > interested_priority ) 4e814: 2228 0014 movel %a0@(20),%d1 4e818: ba81 cmpl %d1,%d5 4e81a: 6532 bcss 4e84e DEBUG_STEP("2"); /* * If this thread is not interested, then go on to the next thread. */ api = the_thread->API_Extensions[ THREAD_API_POSIX ]; 4e81c: 2668 010e moveal %a0@(270),%a3 4e820: 2e2b 00cc movel %a3@(204),%d7 4e824: 4687 notl %d7 4e826: ce82 andl %d2,%d7 4e828: 6724 beqs 4e84e * * 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 ) { 4e82a: ba81 cmpl %d1,%d5 4e82c: 621c bhis 4e84a * and blocking interruptibutable by signal. * * If the interested thread is ready, don't think about changing. */ if ( !_States_Is_ready( interested->current_state ) ) { 4e82e: 2e2a 0010 movel %a2@(16),%d7 4e832: 671a beqs 4e84e <== NEVER TAKEN /* preferred ready over blocked */ DEBUG_STEP("5"); if ( _States_Is_ready( the_thread->current_state ) ) { 4e834: 2668 0010 moveal %a0@(16),%a3 4e838: 4a8b tstl %a3 4e83a: 670e beqs 4e84a continue; } DEBUG_STEP("6"); /* prefer blocked/interruptible over blocked/not interruptible */ if ( !_States_Is_interruptible_by_signal(interested->current_state) ) { 4e83c: 0807 001c btst #28,%d7 4e840: 660c bnes 4e84e DEBUG_STEP("7"); if ( _States_Is_interruptible_by_signal(the_thread->current_state) ) { 4e842: 2e0b movel %a3,%d7 4e844: 0807 001c btst #28,%d7 4e848: 6704 beqs 4e84e 4e84a: 2a01 movel %d1,%d5 4e84c: 2448 moveal %a0,%a2 #endif maximum = the_info->maximum; object_table = the_info->local_table; for ( index = 1 ; index <= maximum ; index++ ) { 4e84e: b086 cmpl %d6,%d0 4e850: 63b8 blss 4e80a 4e852: 588c addql #4,%a4 * + 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++) { 4e854: b9fc 0005 ef44 cmpal #388932,%a4 4e85a: 6692 bnes 4e7ee } } } } if ( interested ) { 4e85c: 4a8a tstl %a2 4e85e: 6700 fee2 beqw 4e742 * thread needs to do the post context switch extension so it can * evaluate the signals pending. */ process_it: the_thread->do_post_task_switch_extension = true; 4e862: 7001 moveq #1,%d0 4e864: 1540 0074 moveb %d0,%a2@(116) /* * 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 ) ) { 4e868: 486e fff4 pea %fp@(-12) 4e86c: 2f03 movel %d3,%sp@- 4e86e: 2f0a movel %a2,%sp@- 4e870: 4eb9 0004 e97c jsr 4e97c <_POSIX_signals_Unblock_thread> 4e876: 4fef 000c lea %sp@(12),%sp 4e87a: 4a00 tstb %d0 4e87c: 6700 fec4 beqw 4e742 4e880: 6000 ff48 braw 4e7ca <== NOT EXECUTED */ siginfo = &siginfo_struct; siginfo->si_signo = sig; siginfo->si_code = SI_USER; if ( !value ) { siginfo->si_value.sival_int = 0; 4e884: 42ae fffc clrl %fp@(-4) 4e888: 6000 fe36 braw 4e6c0 /* * Only supported for the "calling process" (i.e. this node). */ if ( pid != getpid() ) rtems_set_errno_and_return_minus_one( ESRCH ); 4e88c: 4eb9 0004 ebf4 jsr 4ebf4 <__errno> 4e892: 7603 moveq #3,%d3 4e894: 2040 moveal %d0,%a0 4e896: 70ff moveq #-1,%d0 4e898: 2083 movel %d3,%a0@ } DEBUG_STEP("\n"); _Thread_Enable_dispatch(); return 0; } 4e89a: 4cee 1cfc ffd0 moveml %fp@(-48),%d2-%d7/%a2-%a4 4e8a0: 4e5e unlk %fp 4e8a2: 4e75 rts */ if ( !sig ) rtems_set_errno_and_return_minus_one( EINVAL ); if ( !is_valid_signo(sig) ) rtems_set_errno_and_return_minus_one( EINVAL ); 4e8a4: 4eb9 0004 ebf4 jsr 4ebf4 <__errno> 4e8aa: 7416 moveq #22,%d2 4e8ac: 2040 moveal %d0,%a0 4e8ae: 70ff moveq #-1,%d0 4e8b0: 2082 movel %d2,%a0@ } DEBUG_STEP("\n"); _Thread_Enable_dispatch(); return 0; } 4e8b2: 4cee 1cfc ffd0 moveml %fp@(-48),%d2-%d7/%a2-%a4 4e8b8: 4e5e unlk %fp 4e8ba: 4e75 rts 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(); 4e8bc: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> rtems_set_errno_and_return_minus_one( EAGAIN ); 4e8c2: 4eb9 0004 ebf4 jsr 4ebf4 <__errno> 4e8c8: 720b moveq #11,%d1 4e8ca: 2040 moveal %d0,%a0 4e8cc: 70ff moveq #-1,%d0 } DEBUG_STEP("\n"); _Thread_Enable_dispatch(); return 0; } 4e8ce: 4cee 1cfc ffd0 moveml %fp@(-48),%d2-%d7/%a2-%a4 psiginfo = (POSIX_signals_Siginfo_node *) _Chain_Get( &_POSIX_signals_Inactive_siginfo ); if ( !psiginfo ) { _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one( EAGAIN ); 4e8d4: 2081 movel %d1,%a0@ } DEBUG_STEP("\n"); _Thread_Enable_dispatch(); return 0; } 4e8d6: 4e5e unlk %fp ... =============================================================================== 00049fe4 : int pthread_attr_getschedpolicy( const pthread_attr_t *attr, int *policy ) { 49fe4: 4e56 0000 linkw %fp,#0 49fe8: 206e 0008 moveal %fp@(8),%a0 49fec: 226e 000c moveal %fp@(12),%a1 if ( !attr || !attr->is_initialized || !policy ) 49ff0: 4a88 tstl %a0 49ff2: 6712 beqs 4a006 <== NEVER TAKEN 49ff4: 4a90 tstl %a0@ 49ff6: 670e beqs 4a006 <== NEVER TAKEN 49ff8: 4a89 tstl %a1 49ffa: 670a beqs 4a006 <== NEVER TAKEN return EINVAL; *policy = attr->schedpolicy; 49ffc: 22a8 0014 movel %a0@(20),%a1@ 4a000: 4280 clrl %d0 return 0; } 4a002: 4e5e unlk %fp 4a004: 4e75 rts { if ( !attr || !attr->is_initialized || !policy ) return EINVAL; *policy = attr->schedpolicy; return 0; 4a006: 7016 moveq #22,%d0 } 4a008: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004a160 : int pthread_attr_setschedpolicy( pthread_attr_t *attr, int policy ) { 4a160: 4e56 0000 linkw %fp,#0 4a164: 206e 0008 moveal %fp@(8),%a0 4a168: 202e 000c movel %fp@(12),%d0 4a16c: 2f02 movel %d2,%sp@- if ( !attr || !attr->is_initialized ) 4a16e: 4a88 tstl %a0 4a170: 672e beqs 4a1a0 4a172: 4a90 tstl %a0@ 4a174: 672a beqs 4a1a0 return EINVAL; switch ( policy ) { 4a176: 7204 moveq #4,%d1 4a178: b280 cmpl %d0,%d1 4a17a: 640c bccs 4a188 return 0; default: return ENOTSUP; } } 4a17c: 241f movel %sp@+,%d2 ) { if ( !attr || !attr->is_initialized ) return EINVAL; switch ( policy ) { 4a17e: 203c 0000 0086 movel #134,%d0 return 0; default: return ENOTSUP; } } 4a184: 4e5e unlk %fp 4a186: 4e75 rts ) { if ( !attr || !attr->is_initialized ) return EINVAL; switch ( policy ) { 4a188: 123c 0001 moveb #1,%d1 4a18c: 7417 moveq #23,%d2 4a18e: e1a9 lsll %d0,%d1 4a190: c282 andl %d2,%d1 4a192: 67e8 beqs 4a17c <== NEVER TAKEN return 0; default: return ENOTSUP; } } 4a194: 241f movel %sp@+,%d2 4a196: 4e5e unlk %fp switch ( policy ) { case SCHED_OTHER: case SCHED_FIFO: case SCHED_RR: case SCHED_SPORADIC: attr->schedpolicy = policy; 4a198: 2140 0014 movel %d0,%a0@(20) 4a19c: 4280 clrl %d0 return 0; default: return ENOTSUP; } } 4a19e: 4e75 rts 4a1a0: 241f movel %sp@+,%d2 case SCHED_OTHER: case SCHED_FIFO: case SCHED_RR: case SCHED_SPORADIC: attr->schedpolicy = policy; return 0; 4a1a2: 7016 moveq #22,%d0 default: return ENOTSUP; } } 4a1a4: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 000460fc : int pthread_barrier_init( pthread_barrier_t *barrier, const pthread_barrierattr_t *attr, unsigned int count ) { 460fc: 4e56 ffe0 linkw %fp,#-32 46100: 48d7 0c0c moveml %d2-%d3/%a2-%a3,%sp@ 46104: 246e 0008 moveal %fp@(8),%a2 46108: 262e 000c movel %fp@(12),%d3 4610c: 242e 0010 movel %fp@(16),%d2 const pthread_barrierattr_t *the_attr; /* * Error check parameters */ if ( !barrier ) 46110: 4a8a tstl %a2 46112: 677a beqs 4618e return EINVAL; if ( count == 0 ) 46114: 4a82 tstl %d2 46116: 6776 beqs 4618e return EINVAL; /* * If the user passed in NULL, use the default attributes */ if ( attr ) { 46118: 4a83 tstl %d3 4611a: 6700 0090 beqw 461ac 4611e: 2043 moveal %d3,%a0 } /* * Now start error checking the attributes that we are going to use */ if ( !the_attr->is_initialized ) 46120: 4a90 tstl %a0@ 46122: 676a beqs 4618e return EINVAL; switch ( the_attr->process_shared ) { 46124: 4aa8 0004 tstl %a0@(4) 46128: 6664 bnes 4618e <== NEVER TAKEN rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 4612a: 2039 0006 06fc movel 606fc <_Thread_Dispatch_disable_level>,%d0 46130: 5280 addql #1,%d0 /* * Convert from POSIX attributes to Core Barrier attributes */ the_attributes.discipline = CORE_BARRIER_AUTOMATIC_RELEASE; the_attributes.maximum_count = count; 46132: 2d42 fffc movel %d2,%fp@(-4) 46136: 23c0 0006 06fc movel %d0,606fc <_Thread_Dispatch_disable_level> } /* * Convert from POSIX attributes to Core Barrier attributes */ the_attributes.discipline = CORE_BARRIER_AUTOMATIC_RELEASE; 4613c: 42ae fff8 clrl %fp@(-8) * This function allocates a barrier control block from * the inactive chain of free barrier control blocks. */ RTEMS_INLINE_ROUTINE POSIX_Barrier_Control *_POSIX_Barrier_Allocate( void ) { return (POSIX_Barrier_Control *) 46140: 4879 0006 0a3e pea 60a3e <_POSIX_Barrier_Information> 46146: 4eb9 0004 83e0 jsr 483e0 <_Objects_Allocate> */ _Thread_Disable_dispatch(); /* prevents deletion */ the_barrier = _POSIX_Barrier_Allocate(); if ( !the_barrier ) { 4614c: 588f addql #4,%sp 4614e: 2640 moveal %d0,%a3 46150: 4a80 tstl %d0 46152: 6746 beqs 4619a _Thread_Enable_dispatch(); return EAGAIN; } _CORE_barrier_Initialize( &the_barrier->Barrier, &the_attributes ); 46154: 486e fff8 pea %fp@(-8) 46158: 486b 0010 pea %a3@(16) 4615c: 4eb9 0004 7a50 jsr 47a50 <_CORE_barrier_Initialize> #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 46162: 202b 0008 movel %a3@(8),%d0 46166: 4281 clrl %d1 46168: 2079 0006 0a56 moveal 60a56 <_POSIX_Barrier_Information+0x18>,%a0 4616e: 3200 movew %d0,%d1 46170: 218b 1c00 movel %a3,%a0@(00000000,%d1:l:4) _Objects_Get_index( the_object->id ), the_object ); /* ASSERT: information->is_string == false */ the_object->name.name_u32 = name; 46174: 42ab 000c clrl %a3@(12) ); /* * Exit the critical section and return the user an operational barrier */ *barrier = the_barrier->Object.id; 46178: 2480 movel %d0,%a2@ _Thread_Enable_dispatch(); 4617a: 4eb9 0004 908c jsr 4908c <_Thread_Enable_dispatch> return 0; 46180: 508f addql #8,%sp /* * Exit the critical section and return the user an operational barrier */ *barrier = the_barrier->Object.id; _Thread_Enable_dispatch(); 46182: 4280 clrl %d0 return 0; } 46184: 4cee 0c0c ffe0 moveml %fp@(-32),%d2-%d3/%a2-%a3 4618a: 4e5e unlk %fp 4618c: 4e75 rts /* * Exit the critical section and return the user an operational barrier */ *barrier = the_barrier->Object.id; _Thread_Enable_dispatch(); return 0; 4618e: 7016 moveq #22,%d0 } 46190: 4cee 0c0c ffe0 moveml %fp@(-32),%d2-%d3/%a2-%a3 46196: 4e5e unlk %fp 46198: 4e75 rts _Thread_Disable_dispatch(); /* prevents deletion */ the_barrier = _POSIX_Barrier_Allocate(); if ( !the_barrier ) { _Thread_Enable_dispatch(); 4619a: 4eb9 0004 908c jsr 4908c <_Thread_Enable_dispatch> 461a0: 700b moveq #11,%d0 * Exit the critical section and return the user an operational barrier */ *barrier = the_barrier->Object.id; _Thread_Enable_dispatch(); return 0; } 461a2: 4cee 0c0c ffe0 moveml %fp@(-32),%d2-%d3/%a2-%a3 461a8: 4e5e unlk %fp 461aa: 4e75 rts * If the user passed in NULL, use the default attributes */ if ( attr ) { the_attr = attr; } else { (void) pthread_barrierattr_init( &my_attr ); 461ac: 260e movel %fp,%d3 461ae: 0683 ffff fff0 addil #-16,%d3 461b4: 2f03 movel %d3,%sp@- 461b6: 4eb9 0004 6038 jsr 46038 461bc: 588f addql #4,%sp 461be: 2043 moveal %d3,%a0 } /* * Now start error checking the attributes that we are going to use */ if ( !the_attr->is_initialized ) 461c0: 4a90 tstl %a0@ 461c2: 6600 ff60 bnew 46124 461c6: 60c6 bras 4618e <== NOT EXECUTED =============================================================================== 00045b68 : void pthread_cleanup_push( void (*routine)( void * ), void *arg ) { 45b68: 4e56 0000 linkw %fp,#0 45b6c: 2f03 movel %d3,%sp@- 45b6e: 262e 000c movel %fp@(12),%d3 45b72: 2f02 movel %d2,%sp@- 45b74: 242e 0008 movel %fp@(8),%d2 /* * The POSIX standard does not address what to do when the routine * is NULL. It also does not address what happens when we cannot * allocate memory or anything else bad happens. */ if ( !routine ) 45b78: 6754 beqs 45bce rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 45b7a: 2039 0006 0194 movel 60194 <_Thread_Dispatch_disable_level>,%d0 45b80: 5280 addql #1,%d0 45b82: 23c0 0006 0194 movel %d0,60194 <_Thread_Dispatch_disable_level> return; _Thread_Disable_dispatch(); handler = _Workspace_Allocate( sizeof( POSIX_Cancel_Handler_control ) ); 45b88: 4878 0010 pea 10 45b8c: 4eb9 0004 a004 jsr 4a004 <_Workspace_Allocate> if ( handler ) { 45b92: 588f addql #4,%sp 45b94: 4a80 tstl %d0 45b96: 6726 beqs 45bbe <== NEVER TAKEN thread_support = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ]; handler_stack = &thread_support->Cancellation_Handlers; 45b98: 2079 0006 024e moveal 6024e <_Thread_Executing>,%a0 45b9e: 2228 010e movel %a0@(270),%d1 handler->routine = routine; 45ba2: 2040 moveal %d0,%a0 handler = _Workspace_Allocate( sizeof( POSIX_Cancel_Handler_control ) ); if ( handler ) { thread_support = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ]; handler_stack = &thread_support->Cancellation_Handlers; 45ba4: 0681 0000 00e0 addil #224,%d1 handler->routine = routine; 45baa: 2142 0008 movel %d2,%a0@(8) handler->arg = arg; 45bae: 2143 000c movel %d3,%a0@(12) _Chain_Append( handler_stack, &handler->Node ); 45bb2: 2f00 movel %d0,%sp@- 45bb4: 2f01 movel %d1,%sp@- 45bb6: 4eb9 0004 7584 jsr 47584 <_Chain_Append> 45bbc: 508f addql #8,%sp } _Thread_Enable_dispatch(); } 45bbe: 242e fff8 movel %fp@(-8),%d2 45bc2: 262e fffc movel %fp@(-4),%d3 45bc6: 4e5e unlk %fp handler->routine = routine; handler->arg = arg; _Chain_Append( handler_stack, &handler->Node ); } _Thread_Enable_dispatch(); 45bc8: 4ef9 0004 8b28 jmp 48b28 <_Thread_Enable_dispatch> } 45bce: 242e fff8 movel %fp@(-8),%d2 45bd2: 262e fffc movel %fp@(-4),%d3 45bd6: 4e5e unlk %fp ... =============================================================================== 00046a2c : int pthread_cond_init( pthread_cond_t *cond, const pthread_condattr_t *attr ) { 46a2c: 4e56 0000 linkw %fp,#0 46a30: 202e 000c movel %fp@(12),%d0 46a34: 2f0b movel %a3,%sp@- 46a36: 2f0a movel %a2,%sp@- POSIX_Condition_variables_Control *the_cond; const pthread_condattr_t *the_attr; if ( attr ) the_attr = attr; 46a38: 45f9 0005 f0bc lea 5f0bc <_POSIX_Condition_variables_Default_attributes>,%a2 46a3e: 4a80 tstl %d0 46a40: 6702 beqs 46a44 46a42: 2440 moveal %d0,%a2 /* * Be careful about attributes when global!!! */ if ( the_attr->process_shared == PTHREAD_PROCESS_SHARED ) 46a44: 7001 moveq #1,%d0 46a46: b0aa 0004 cmpl %a2@(4),%d0 46a4a: 6704 beqs 46a50 <== NEVER TAKEN return EINVAL; if ( !the_attr->is_initialized ) 46a4c: 4a92 tstl %a2@ 46a4e: 660e bnes 46a5e *cond = the_cond->Object.id; _Thread_Enable_dispatch(); return 0; } 46a50: 246e fff8 moveal %fp@(-8),%a2 *cond = the_cond->Object.id; _Thread_Enable_dispatch(); return 0; 46a54: 7016 moveq #22,%d0 } 46a56: 266e fffc moveal %fp@(-4),%a3 46a5a: 4e5e unlk %fp 46a5c: 4e75 rts rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 46a5e: 2039 0006 19d8 movel 619d8 <_Thread_Dispatch_disable_level>,%d0 46a64: 5280 addql #1,%d0 46a66: 23c0 0006 19d8 movel %d0,619d8 <_Thread_Dispatch_disable_level> */ RTEMS_INLINE_ROUTINE POSIX_Condition_variables_Control *_POSIX_Condition_variables_Allocate( void ) { return (POSIX_Condition_variables_Control *) 46a6c: 4879 0006 1da6 pea 61da6 <_POSIX_Condition_variables_Information> 46a72: 4eb9 0004 935c jsr 4935c <_Objects_Allocate> _Thread_Disable_dispatch(); the_cond = _POSIX_Condition_variables_Allocate(); if ( !the_cond ) { 46a78: 588f addql #4,%sp 46a7a: 2640 moveal %d0,%a3 46a7c: 4a80 tstl %d0 46a7e: 6752 beqs 46ad2 return ENOMEM; } the_cond->process_shared = the_attr->process_shared; the_cond->Mutex = POSIX_CONDITION_VARIABLES_NO_MUTEX; 46a80: 42ab 0014 clrl %a3@(20) if ( !the_cond ) { _Thread_Enable_dispatch(); return ENOMEM; } the_cond->process_shared = the_attr->process_shared; 46a84: 276a 0004 0010 movel %a2@(4),%a3@(16) the_cond->Mutex = POSIX_CONDITION_VARIABLES_NO_MUTEX; /* XXX some more initialization might need to go here */ _Thread_queue_Initialize( 46a8a: 4878 0074 pea 74 46a8e: 4878 0800 pea 800 46a92: 42a7 clrl %sp@- 46a94: 486b 0018 pea %a3@(24) 46a98: 4eb9 0004 a83c jsr 4a83c <_Thread_queue_Initialize> #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 46a9e: 202b 0008 movel %a3@(8),%d0 46aa2: 4281 clrl %d1 46aa4: 2079 0006 1dbe moveal 61dbe <_POSIX_Condition_variables_Information+0x18>,%a0 46aaa: 3200 movew %d0,%d1 46aac: 218b 1c00 movel %a3,%a0@(00000000,%d1:l:4) _Objects_Get_index( the_object->id ), the_object ); /* ASSERT: information->is_string == false */ the_object->name.name_u32 = name; 46ab0: 42ab 000c clrl %a3@(12) &_POSIX_Condition_variables_Information, &the_cond->Object, 0 ); *cond = the_cond->Object.id; 46ab4: 206e 0008 moveal %fp@(8),%a0 46ab8: 2080 movel %d0,%a0@ _Thread_Enable_dispatch(); 46aba: 4eb9 0004 a008 jsr 4a008 <_Thread_Enable_dispatch> return 0; } 46ac0: 246e fff8 moveal %fp@(-8),%a2 *cond = the_cond->Object.id; _Thread_Enable_dispatch(); return 0; 46ac4: 4fef 0010 lea %sp@(16),%sp 0 ); *cond = the_cond->Object.id; _Thread_Enable_dispatch(); 46ac8: 4280 clrl %d0 return 0; } 46aca: 266e fffc moveal %fp@(-4),%a3 46ace: 4e5e unlk %fp 46ad0: 4e75 rts _Thread_Disable_dispatch(); the_cond = _POSIX_Condition_variables_Allocate(); if ( !the_cond ) { _Thread_Enable_dispatch(); 46ad2: 4eb9 0004 a008 jsr 4a008 <_Thread_Enable_dispatch> *cond = the_cond->Object.id; _Thread_Enable_dispatch(); return 0; } 46ad8: 246e fff8 moveal %fp@(-8),%a2 _Thread_Disable_dispatch(); the_cond = _POSIX_Condition_variables_Allocate(); if ( !the_cond ) { _Thread_Enable_dispatch(); 46adc: 700c moveq #12,%d0 *cond = the_cond->Object.id; _Thread_Enable_dispatch(); return 0; } 46ade: 266e fffc moveal %fp@(-4),%a3 46ae2: 4e5e unlk %fp ... =============================================================================== 0004688c : */ int pthread_condattr_destroy( pthread_condattr_t *attr ) { 4688c: 4e56 0000 linkw %fp,#0 46890: 206e 0008 moveal %fp@(8),%a0 if ( !attr || attr->is_initialized == false ) 46894: 4a88 tstl %a0 46896: 670c beqs 468a4 46898: 4a90 tstl %a0@ 4689a: 6708 beqs 468a4 <== NEVER TAKEN return EINVAL; attr->is_initialized = false; 4689c: 4280 clrl %d0 return 0; } 4689e: 4e5e unlk %fp ) { if ( !attr || attr->is_initialized == false ) return EINVAL; attr->is_initialized = false; 468a0: 4290 clrl %a0@ return 0; } 468a2: 4e75 rts { if ( !attr || attr->is_initialized == false ) return EINVAL; attr->is_initialized = false; return 0; 468a4: 7016 moveq #22,%d0 } 468a6: 4e5e unlk %fp ... =============================================================================== 0004d8fc : } void pthread_exit( void *value_ptr ) { 4d8fc: 4e56 0000 linkw %fp,#0 _POSIX_Thread_Exit( _Thread_Executing, value_ptr ); 4d900: 2f2e 0008 movel %fp@(8),%sp@- 4d904: 2f39 0005 f032 movel 5f032 <_Thread_Executing>,%sp@- 4d90a: 4eb9 0004 d88c jsr 4d88c <_POSIX_Thread_Exit> 4d910: 508f addql #8,%sp <== NOT EXECUTED } 4d912: 4e5e unlk %fp <== NOT EXECUTED ... =============================================================================== 00045c74 : int pthread_key_create( pthread_key_t *key, void (*destructor)( void * ) ) { 45c74: 4e56 ffe4 linkw %fp,#-28 45c78: 2039 0006 0f08 movel 60f08 <_Thread_Dispatch_disable_level>,%d0 45c7e: 5280 addql #1,%d0 45c80: 23c0 0006 0f08 movel %d0,60f08 <_Thread_Dispatch_disable_level> 45c86: 48d7 3c1c moveml %d2-%d4/%a2-%a5,%sp@ * 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 ); 45c8a: 4879 0006 129c pea 6129c <_POSIX_Keys_Information> 45c90: 4eb9 0004 811c jsr 4811c <_Objects_Allocate> _Thread_Disable_dispatch(); the_key = _POSIX_Keys_Allocate(); if ( !the_key ) { 45c96: 588f addql #4,%sp 45c98: 2840 moveal %d0,%a4 45c9a: 4a80 tstl %d0 45c9c: 6700 0098 beqw 45d36 _Thread_Enable_dispatch(); return EAGAIN; } the_key->destructor = destructor; 45ca0: 45f9 0006 0ec4 lea 60ec4 <_Objects_Information_table+0x4>,%a2 45ca6: 47ec 0018 lea %a4@(24),%a3 45caa: 7601 moveq #1,%d3 INTERNAL_ERROR_IMPLEMENTATION_KEY_CREATE_INCONSISTENCY ); #endif bytes_to_allocate = sizeof( void * ) * (_Objects_Information_table[ the_api ][ 1 ]->maximum + 1); table = _Workspace_Allocate( bytes_to_allocate ); 45cac: 4bf9 0004 a338 lea 4a338 <_Workspace_Allocate>,%a5 _Thread_Enable_dispatch(); return ENOMEM; } the_key->Values[ the_api ] = table; memset( table, '\0', bytes_to_allocate ); 45cb2: 283c 0005 02ac movel #328364,%d4 if ( !the_key ) { _Thread_Enable_dispatch(); return EAGAIN; } the_key->destructor = destructor; 45cb8: 296e 000c 0010 movel %fp@(12),%a4@(16) for ( the_api = 1; the_api <= OBJECTS_APIS_LAST; the_api++ ) { if ( _Objects_Information_table[ the_api ] ) { 45cbe: 2052 moveal %a2@,%a0 45cc0: 4a88 tstl %a0 45cc2: 6762 beqs 45d26 INTERNAL_ERROR_CORE, true, INTERNAL_ERROR_IMPLEMENTATION_KEY_CREATE_INCONSISTENCY ); #endif bytes_to_allocate = sizeof( void * ) * 45cc4: 2068 0004 moveal %a0@(4),%a0 45cc8: 4282 clrl %d2 45cca: 3428 000e movew %a0@(14),%d2 45cce: 5282 addql #1,%d2 45cd0: e58a lsll #2,%d2 (_Objects_Information_table[ the_api ][ 1 ]->maximum + 1); table = _Workspace_Allocate( bytes_to_allocate ); 45cd2: 2f02 movel %d2,%sp@- 45cd4: 4e95 jsr %a5@ if ( !table ) { 45cd6: 588f addql #4,%sp 45cd8: 4a80 tstl %d0 45cda: 676c beqs 45d48 _POSIX_Keys_Free( the_key ); _Thread_Enable_dispatch(); return ENOMEM; } the_key->Values[ the_api ] = table; 45cdc: 2680 movel %d0,%a3@ memset( table, '\0', bytes_to_allocate ); 45cde: 2044 moveal %d4,%a0 * for. [NOTE: Currently RTEMS Classic API tasks are always enabled.] */ for ( the_api = 1; the_api <= OBJECTS_APIS_LAST; the_api++ ) { 45ce0: 5283 addql #1,%d3 45ce2: 588a addql #4,%a2 45ce4: 588b addql #4,%a3 _Thread_Enable_dispatch(); return ENOMEM; } the_key->Values[ the_api ] = table; memset( table, '\0', bytes_to_allocate ); 45ce6: 2f02 movel %d2,%sp@- 45ce8: 42a7 clrl %sp@- 45cea: 2f00 movel %d0,%sp@- 45cec: 4e90 jsr %a0@ 45cee: 4fef 000c lea %sp@(12),%sp * This is a bit more complex than one might initially expect because * APIs are optional. Thus there may be no ITRON tasks to have keys * for. [NOTE: Currently RTEMS Classic API tasks are always enabled.] */ for ( the_api = 1; 45cf2: 7005 moveq #5,%d0 45cf4: b083 cmpl %d3,%d0 45cf6: 66c6 bnes 45cbe <== ALWAYS TAKEN #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 45cf8: 202c 0008 movel %a4@(8),%d0 45cfc: 4281 clrl %d1 45cfe: 2079 0006 12b4 moveal 612b4 <_POSIX_Keys_Information+0x18>,%a0 45d04: 3200 movew %d0,%d1 45d06: 218c 1c00 movel %a4,%a0@(00000000,%d1:l:4) _Objects_Get_index( the_object->id ), the_object ); /* ASSERT: information->is_string == false */ the_object->name.name_u32 = name; 45d0a: 42ac 000c clrl %a4@(12) } _Objects_Open_u32( &_POSIX_Keys_Information, &the_key->Object, 0 ); *key = the_key->Object.id; 45d0e: 206e 0008 moveal %fp@(8),%a0 45d12: 2080 movel %d0,%a0@ _Thread_Enable_dispatch(); 45d14: 4eb9 0004 8dc8 jsr 48dc8 <_Thread_Enable_dispatch> return 0; } 45d1a: 4cee 3c1c ffe4 moveml %fp@(-28),%d2-%d4/%a2-%a5 _Objects_Open_u32( &_POSIX_Keys_Information, &the_key->Object, 0 ); *key = the_key->Object.id; _Thread_Enable_dispatch(); 45d20: 4280 clrl %d0 return 0; } 45d22: 4e5e unlk %fp 45d24: 4e75 rts } the_key->Values[ the_api ] = table; memset( table, '\0', bytes_to_allocate ); } else { the_key->Values[ the_api ] = NULL; 45d26: 4293 clrl %a3@ * for. [NOTE: Currently RTEMS Classic API tasks are always enabled.] */ for ( the_api = 1; the_api <= OBJECTS_APIS_LAST; the_api++ ) { 45d28: 5283 addql #1,%d3 45d2a: 588a addql #4,%a2 45d2c: 588b addql #4,%a3 * This is a bit more complex than one might initially expect because * APIs are optional. Thus there may be no ITRON tasks to have keys * for. [NOTE: Currently RTEMS Classic API tasks are always enabled.] */ for ( the_api = 1; 45d2e: 7005 moveq #5,%d0 45d30: b083 cmpl %d3,%d0 45d32: 668a bnes 45cbe <== NEVER TAKEN 45d34: 60c2 bras 45cf8 _Thread_Disable_dispatch(); the_key = _POSIX_Keys_Allocate(); if ( !the_key ) { _Thread_Enable_dispatch(); 45d36: 4eb9 0004 8dc8 jsr 48dc8 <_Thread_Enable_dispatch> 45d3c: 700b moveq #11,%d0 *key = the_key->Object.id; _Thread_Enable_dispatch(); return 0; } 45d3e: 4cee 3c1c ffe4 moveml %fp@(-28),%d2-%d4/%a2-%a5 45d44: 4e5e unlk %fp 45d46: 4e75 rts #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; 45d48: 2403 movel %d3,%d2 45d4a: 5382 subql #1,%d2 45d4c: 6718 beqs 45d66 45d4e: 47f9 0004 a354 lea 4a354 <_Workspace_Free>,%a3 45d54: 45f4 3c10 lea %a4@(00000010,%d3:l:4),%a2 the_api >= 1; the_api-- ) _Workspace_Free( the_key->Values[ the_api ] ); 45d58: 2f12 movel %a2@,%sp@- (_Objects_Information_table[ the_api ][ 1 ]->maximum + 1); table = _Workspace_Allocate( bytes_to_allocate ); if ( !table ) { for ( --the_api; the_api >= 1; the_api-- ) 45d5a: 5382 subql #1,%d2 45d5c: 598a subql #4,%a2 _Workspace_Free( the_key->Values[ the_api ] ); 45d5e: 4e93 jsr %a3@ #endif bytes_to_allocate = sizeof( void * ) * (_Objects_Information_table[ the_api ][ 1 ]->maximum + 1); table = _Workspace_Allocate( bytes_to_allocate ); if ( !table ) { for ( --the_api; 45d60: 588f addql #4,%sp 45d62: 4a82 tstl %d2 45d64: 66f2 bnes 45d58 */ RTEMS_INLINE_ROUTINE void _POSIX_Keys_Free ( POSIX_Keys_Control *the_key ) { _Objects_Free( &_POSIX_Keys_Information, &the_key->Object ); 45d66: 2f0c movel %a4,%sp@- 45d68: 4879 0006 129c pea 6129c <_POSIX_Keys_Information> 45d6e: 4eb9 0004 8454 jsr 48454 <_Objects_Free> the_api >= 1; the_api-- ) _Workspace_Free( the_key->Values[ the_api ] ); _POSIX_Keys_Free( the_key ); _Thread_Enable_dispatch(); 45d74: 4eb9 0004 8dc8 jsr 48dc8 <_Thread_Enable_dispatch> return ENOMEM; 45d7a: 508f addql #8,%sp the_api >= 1; the_api-- ) _Workspace_Free( the_key->Values[ the_api ] ); _POSIX_Keys_Free( the_key ); _Thread_Enable_dispatch(); 45d7c: 700c moveq #12,%d0 *key = the_key->Object.id; _Thread_Enable_dispatch(); return 0; } 45d7e: 4cee 3c1c ffe4 moveml %fp@(-28),%d2-%d4/%a2-%a5 45d84: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00045960 : #if defined(_UNIX98_THREAD_MUTEX_ATTRIBUTES) int pthread_mutexattr_gettype( const pthread_mutexattr_t *attr, int *type ) { 45960: 4e56 0000 linkw %fp,#0 45964: 206e 0008 moveal %fp@(8),%a0 45968: 226e 000c moveal %fp@(12),%a1 if ( !attr ) 4596c: 4a88 tstl %a0 4596e: 6712 beqs 45982 return EINVAL; if ( !attr->is_initialized ) 45970: 4a90 tstl %a0@ 45972: 670e beqs 45982 return EINVAL; if ( !type ) 45974: 4a89 tstl %a1 45976: 670a beqs 45982 <== NEVER TAKEN return EINVAL; *type = attr->type; 45978: 22a8 0010 movel %a0@(16),%a1@ 4597c: 4280 clrl %d0 return 0; } 4597e: 4e5e unlk %fp 45980: 4e75 rts if ( !type ) return EINVAL; *type = attr->type; return 0; 45982: 7016 moveq #22,%d0 } 45984: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00047b64 : int pthread_mutexattr_setpshared( pthread_mutexattr_t *attr, int pshared ) { 47b64: 4e56 0000 linkw %fp,#0 47b68: 206e 0008 moveal %fp@(8),%a0 47b6c: 202e 000c movel %fp@(12),%d0 if ( !attr || !attr->is_initialized ) 47b70: 4a88 tstl %a0 47b72: 670a beqs 47b7e 47b74: 4a90 tstl %a0@ 47b76: 6706 beqs 47b7e return EINVAL; switch ( pshared ) { 47b78: 7201 moveq #1,%d1 47b7a: b280 cmpl %d0,%d1 47b7c: 6406 bccs 47b84 <== ALWAYS TAKEN case PTHREAD_PROCESS_SHARED: case PTHREAD_PROCESS_PRIVATE: attr->process_shared = pshared; return 0; 47b7e: 7016 moveq #22,%d0 default: return EINVAL; } } 47b80: 4e5e unlk %fp 47b82: 4e75 rts return EINVAL; switch ( pshared ) { case PTHREAD_PROCESS_SHARED: case PTHREAD_PROCESS_PRIVATE: attr->process_shared = pshared; 47b84: 2140 0004 movel %d0,%a0@(4) 47b88: 4280 clrl %d0 return 0; default: return EINVAL; } } 47b8a: 4e5e unlk %fp ... =============================================================================== 000459c4 : #if defined(_UNIX98_THREAD_MUTEX_ATTRIBUTES) int pthread_mutexattr_settype( pthread_mutexattr_t *attr, int type ) { 459c4: 4e56 0000 linkw %fp,#0 459c8: 206e 0008 moveal %fp@(8),%a0 459cc: 202e 000c movel %fp@(12),%d0 if ( !attr || !attr->is_initialized ) 459d0: 4a88 tstl %a0 459d2: 670a beqs 459de 459d4: 4a90 tstl %a0@ 459d6: 6706 beqs 459de <== NEVER TAKEN return EINVAL; switch ( type ) { 459d8: 7203 moveq #3,%d1 459da: b280 cmpl %d0,%d1 459dc: 6406 bccs 459e4 case PTHREAD_MUTEX_NORMAL: case PTHREAD_MUTEX_RECURSIVE: case PTHREAD_MUTEX_ERRORCHECK: case PTHREAD_MUTEX_DEFAULT: attr->type = type; return 0; 459de: 7016 moveq #22,%d0 default: return EINVAL; } } 459e0: 4e5e unlk %fp 459e2: 4e75 rts switch ( type ) { case PTHREAD_MUTEX_NORMAL: case PTHREAD_MUTEX_RECURSIVE: case PTHREAD_MUTEX_ERRORCHECK: case PTHREAD_MUTEX_DEFAULT: attr->type = type; 459e4: 2140 0010 movel %d0,%a0@(16) 459e8: 4280 clrl %d0 return 0; default: return EINVAL; } } 459ea: 4e5e unlk %fp ... =============================================================================== 00046768 : int pthread_once( pthread_once_t *once_control, void (*init_routine)(void) ) { 46768: 4e56 ffec linkw %fp,#-20 4676c: 48d7 1c04 moveml %d2/%a2-%a4,%sp@ 46770: 246e 0008 moveal %fp@(8),%a2 46774: 266e 000c moveal %fp@(12),%a3 if ( !once_control || !init_routine ) 46778: 4a8a tstl %a2 4677a: 6766 beqs 467e2 4677c: 4a8b tstl %a3 4677e: 6762 beqs 467e2 return EINVAL; if ( !once_control->init_executed ) { 46780: 4aaa 0004 tstl %a2@(4) 46784: 670c beqs 46792 if ( !once_control->init_executed ) { once_control->is_initialized = true; once_control->init_executed = true; (*init_routine)(); } rtems_task_mode(saveMode, RTEMS_PREEMPT_MASK, &saveMode); 46786: 4280 clrl %d0 } return 0; } 46788: 4cee 1c04 ffec moveml %fp@(-20),%d2/%a2-%a4 4678e: 4e5e unlk %fp 46790: 4e75 rts if ( !once_control || !init_routine ) return EINVAL; if ( !once_control->init_executed ) { rtems_mode saveMode; rtems_task_mode(RTEMS_NO_PREEMPT, RTEMS_PREEMPT_MASK, &saveMode); 46792: 240e movel %fp,%d2 46794: 5982 subql #4,%d2 46796: 49f9 0004 7428 lea 47428 ,%a4 4679c: 2f02 movel %d2,%sp@- 4679e: 4878 0100 pea 100 467a2: 4878 0100 pea 100 467a6: 4e94 jsr %a4@ if ( !once_control->init_executed ) { 467a8: 4fef 000c lea %sp@(12),%sp 467ac: 4aaa 0004 tstl %a2@(4) 467b0: 6714 beqs 467c6 <== ALWAYS TAKEN once_control->is_initialized = true; once_control->init_executed = true; (*init_routine)(); } rtems_task_mode(saveMode, RTEMS_PREEMPT_MASK, &saveMode); 467b2: 2f02 movel %d2,%sp@- <== NOT EXECUTED 467b4: 4878 0100 pea 100 <== NOT EXECUTED 467b8: 2f2e fffc movel %fp@(-4),%sp@- <== NOT EXECUTED 467bc: 4e94 jsr %a4@ <== NOT EXECUTED 467be: 4fef 000c lea %sp@(12),%sp <== NOT EXECUTED 467c2: 4280 clrl %d0 467c4: 60c2 bras 46788 if ( !once_control->init_executed ) { rtems_mode saveMode; rtems_task_mode(RTEMS_NO_PREEMPT, RTEMS_PREEMPT_MASK, &saveMode); if ( !once_control->init_executed ) { once_control->is_initialized = true; once_control->init_executed = true; 467c6: 7001 moveq #1,%d0 467c8: 2540 0004 movel %d0,%a2@(4) if ( !once_control->init_executed ) { rtems_mode saveMode; rtems_task_mode(RTEMS_NO_PREEMPT, RTEMS_PREEMPT_MASK, &saveMode); if ( !once_control->init_executed ) { once_control->is_initialized = true; 467cc: 2480 movel %d0,%a2@ once_control->init_executed = true; (*init_routine)(); 467ce: 4e93 jsr %a3@ } rtems_task_mode(saveMode, RTEMS_PREEMPT_MASK, &saveMode); 467d0: 2f02 movel %d2,%sp@- 467d2: 4878 0100 pea 100 467d6: 2f2e fffc movel %fp@(-4),%sp@- 467da: 4e94 jsr %a4@ 467dc: 4fef 000c lea %sp@(12),%sp 467e0: 60e0 bras 467c2 467e2: 7016 moveq #22,%d0 } return 0; } 467e4: 4cee 1c04 ffec moveml %fp@(-20),%d2/%a2-%a4 467ea: 4e5e unlk %fp ... =============================================================================== 00046a80 : int pthread_rwlock_init( pthread_rwlock_t *rwlock, const pthread_rwlockattr_t *attr ) { 46a80: 4e56 ffe8 linkw %fp,#-24 46a84: 48d7 0c04 moveml %d2/%a2-%a3,%sp@ 46a88: 246e 0008 moveal %fp@(8),%a2 46a8c: 242e 000c movel %fp@(12),%d2 const pthread_rwlockattr_t *the_attr; /* * Error check parameters */ if ( !rwlock ) 46a90: 4a8a tstl %a2 46a92: 676e beqs 46b02 return EINVAL; /* * If the user passed in NULL, use the default attributes */ if ( attr ) { 46a94: 4a82 tstl %d2 46a96: 6700 0088 beqw 46b20 46a9a: 2042 moveal %d2,%a0 } /* * Now start error checking the attributes that we are going to use */ if ( !the_attr->is_initialized ) 46a9c: 4a90 tstl %a0@ 46a9e: 6762 beqs 46b02 <== NEVER TAKEN return EINVAL; switch ( the_attr->process_shared ) { 46aa0: 4aa8 0004 tstl %a0@(4) 46aa4: 665c bnes 46b02 <== NEVER TAKEN rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 46aa6: 2039 0006 1ccc movel 61ccc <_Thread_Dispatch_disable_level>,%d0 46aac: 5280 addql #1,%d0 46aae: 23c0 0006 1ccc movel %d0,61ccc <_Thread_Dispatch_disable_level> * This function allocates a RWLock control block from * the inactive chain of free RWLock control blocks. */ RTEMS_INLINE_ROUTINE POSIX_RWLock_Control *_POSIX_RWLock_Allocate( void ) { return (POSIX_RWLock_Control *) 46ab4: 4879 0006 1e78 pea 61e78 <_POSIX_RWLock_Information> 46aba: 4eb9 0004 93bc jsr 493bc <_Objects_Allocate> */ _Thread_Disable_dispatch(); /* prevents deletion */ the_rwlock = _POSIX_RWLock_Allocate(); if ( !the_rwlock ) { 46ac0: 588f addql #4,%sp 46ac2: 2640 moveal %d0,%a3 46ac4: 4a80 tstl %d0 46ac6: 6746 beqs 46b0e _Thread_Enable_dispatch(); return EAGAIN; } _CORE_RWLock_Initialize( &the_rwlock->RWLock, &the_attributes ); 46ac8: 486e fffc pea %fp@(-4) 46acc: 486b 0010 pea %a3@(16) 46ad0: 4eb9 0004 8ae8 jsr 48ae8 <_CORE_RWLock_Initialize> #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 46ad6: 202b 0008 movel %a3@(8),%d0 46ada: 4281 clrl %d1 46adc: 2079 0006 1e90 moveal 61e90 <_POSIX_RWLock_Information+0x18>,%a0 46ae2: 3200 movew %d0,%d1 46ae4: 218b 1c00 movel %a3,%a0@(00000000,%d1:l:4) _Objects_Get_index( the_object->id ), the_object ); /* ASSERT: information->is_string == false */ the_object->name.name_u32 = name; 46ae8: 42ab 000c clrl %a3@(12) &_POSIX_RWLock_Information, &the_rwlock->Object, 0 ); *rwlock = the_rwlock->Object.id; 46aec: 2480 movel %d0,%a2@ _Thread_Enable_dispatch(); 46aee: 4eb9 0004 a068 jsr 4a068 <_Thread_Enable_dispatch> return 0; 46af4: 508f addql #8,%sp 0 ); *rwlock = the_rwlock->Object.id; _Thread_Enable_dispatch(); 46af6: 4280 clrl %d0 return 0; } 46af8: 4cee 0c04 ffe8 moveml %fp@(-24),%d2/%a2-%a3 46afe: 4e5e unlk %fp 46b00: 4e75 rts ); *rwlock = the_rwlock->Object.id; _Thread_Enable_dispatch(); return 0; 46b02: 7016 moveq #22,%d0 } 46b04: 4cee 0c04 ffe8 moveml %fp@(-24),%d2/%a2-%a3 46b0a: 4e5e unlk %fp 46b0c: 4e75 rts _Thread_Disable_dispatch(); /* prevents deletion */ the_rwlock = _POSIX_RWLock_Allocate(); if ( !the_rwlock ) { _Thread_Enable_dispatch(); 46b0e: 4eb9 0004 a068 jsr 4a068 <_Thread_Enable_dispatch> 46b14: 700b moveq #11,%d0 *rwlock = the_rwlock->Object.id; _Thread_Enable_dispatch(); return 0; } 46b16: 4cee 0c04 ffe8 moveml %fp@(-24),%d2/%a2-%a3 46b1c: 4e5e unlk %fp 46b1e: 4e75 rts * If the user passed in NULL, use the default attributes */ if ( attr ) { the_attr = attr; } else { (void) pthread_rwlockattr_init( &default_attr ); 46b20: 240e movel %fp,%d2 46b22: 0682 ffff fff4 addil #-12,%d2 46b28: 2f02 movel %d2,%sp@- 46b2a: 4eb9 0004 75b8 jsr 475b8 46b30: 588f addql #4,%sp 46b32: 2042 moveal %d2,%a0 46b34: 6000 ff66 braw 46a9c =============================================================================== 00046ba4 : int pthread_rwlock_timedrdlock( pthread_rwlock_t *rwlock, const struct timespec *abstime ) { 46ba4: 4e56 ffec linkw %fp,#-20 46ba8: 48d7 040c moveml %d2-%d3/%a2,%sp@ 46bac: 246e 0008 moveal %fp@(8),%a2 Objects_Locations location; Watchdog_Interval ticks; bool do_wait = true; POSIX_Absolute_timeout_conversion_results_t status; if ( !rwlock ) 46bb0: 4a8a tstl %a2 46bb2: 6700 0082 beqw 46c36 * * 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 ); 46bb6: 486e fff8 pea %fp@(-8) 46bba: 2f2e 000c movel %fp@(12),%sp@- 46bbe: 4eb9 0004 d4c8 jsr 4d4c8 <_POSIX_Absolute_timeout_to_ticks> 46bc4: 486e fffc pea %fp@(-4) 46bc8: 2400 movel %d0,%d2 46bca: 2f12 movel %a2@,%sp@- 46bcc: 4879 0006 1e78 pea 61e78 <_POSIX_RWLock_Information> 46bd2: 4eb9 0004 9858 jsr 49858 <_Objects_Get> if ( status != POSIX_ABSOLUTE_TIMEOUT_IS_IN_FUTURE ) do_wait = false; the_rwlock = _POSIX_RWLock_Get( rwlock, &location ); switch ( location ) { 46bd8: 4fef 0014 lea %sp@(20),%sp 46bdc: 4aae fffc tstl %fp@(-4) 46be0: 6654 bnes 46c36 <== NEVER TAKEN int _EXFUN(pthread_rwlock_init, (pthread_rwlock_t *__rwlock, _CONST pthread_rwlockattr_t *__attr)); int _EXFUN(pthread_rwlock_destroy, (pthread_rwlock_t *__rwlock)); int _EXFUN(pthread_rwlock_rdlock,(pthread_rwlock_t *__rwlock)); int _EXFUN(pthread_rwlock_tryrdlock,(pthread_rwlock_t *__rwlock)); int _EXFUN(pthread_rwlock_timedrdlock, 46be2: 7203 moveq #3,%d1 46be4: b282 cmpl %d2,%d1 46be6: 57c3 seq %d3 case OBJECTS_LOCAL: _CORE_RWLock_Obtain_for_reading( 46be8: 42a7 clrl %sp@- 46bea: 2f2e fff8 movel %fp@(-8),%sp@- 46bee: 4483 negl %d3 46bf0: 4281 clrl %d1 46bf2: 1203 moveb %d3,%d1 46bf4: 2040 moveal %d0,%a0 46bf6: 2f01 movel %d1,%sp@- 46bf8: 2f12 movel %a2@,%sp@- 46bfa: 4868 0010 pea %a0@(16) 46bfe: 4eb9 0004 8b1c jsr 48b1c <_CORE_RWLock_Obtain_for_reading> do_wait, ticks, NULL ); _Thread_Enable_dispatch(); 46c04: 4eb9 0004 a068 jsr 4a068 <_Thread_Enable_dispatch> if ( !do_wait ) { 46c0a: 4fef 0014 lea %sp@(20),%sp 46c0e: 4a03 tstb %d3 46c10: 6644 bnes 46c56 if ( _Thread_Executing->Wait.return_code == CORE_RWLOCK_UNAVAILABLE ) { 46c12: 2079 0006 1d86 moveal 61d86 <_Thread_Executing>,%a0 46c18: 7202 moveq #2,%d1 46c1a: 2028 0034 movel %a0@(52),%d0 46c1e: b280 cmpl %d0,%d1 46c20: 6720 beqs 46c42 break; } } } return _POSIX_RWLock_Translate_core_RWLock_return_code( 46c22: 2f00 movel %d0,%sp@- 46c24: 4eb9 0004 6d34 jsr 46d34 <_POSIX_RWLock_Translate_core_RWLock_return_code> 46c2a: 588f addql #4,%sp case OBJECTS_ERROR: break; } return EINVAL; } 46c2c: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46c32: 4e5e unlk %fp 46c34: 4e75 rts break; } } } return _POSIX_RWLock_Translate_core_RWLock_return_code( 46c36: 7016 moveq #22,%d0 case OBJECTS_ERROR: break; } return EINVAL; } 46c38: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46c3e: 4e5e unlk %fp 46c40: 4e75 rts ); _Thread_Enable_dispatch(); if ( !do_wait ) { if ( _Thread_Executing->Wait.return_code == CORE_RWLOCK_UNAVAILABLE ) { switch (status) { 46c42: 4a82 tstl %d2 46c44: 67f0 beqs 46c36 <== NEVER TAKEN 46c46: b282 cmpl %d2,%d1 46c48: 65d8 bcss 46c22 <== NEVER TAKEN 46c4a: 7074 moveq #116,%d0 case OBJECTS_ERROR: break; } return EINVAL; } 46c4c: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46c52: 4e5e unlk %fp 46c54: 4e75 rts ); _Thread_Enable_dispatch(); if ( !do_wait ) { if ( _Thread_Executing->Wait.return_code == CORE_RWLOCK_UNAVAILABLE ) { switch (status) { 46c56: 2079 0006 1d86 moveal 61d86 <_Thread_Executing>,%a0 46c5c: 2028 0034 movel %a0@(52),%d0 break; } } } return _POSIX_RWLock_Translate_core_RWLock_return_code( 46c60: 2f00 movel %d0,%sp@- 46c62: 4eb9 0004 6d34 jsr 46d34 <_POSIX_RWLock_Translate_core_RWLock_return_code> 46c68: 588f addql #4,%sp 46c6a: 60c0 bras 46c2c =============================================================================== 00046c6c : int pthread_rwlock_timedwrlock( pthread_rwlock_t *rwlock, const struct timespec *abstime ) { 46c6c: 4e56 ffec linkw %fp,#-20 46c70: 48d7 040c moveml %d2-%d3/%a2,%sp@ 46c74: 246e 0008 moveal %fp@(8),%a2 Objects_Locations location; Watchdog_Interval ticks; bool do_wait = true; POSIX_Absolute_timeout_conversion_results_t status; if ( !rwlock ) 46c78: 4a8a tstl %a2 46c7a: 6700 0082 beqw 46cfe * * 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 ); 46c7e: 486e fff8 pea %fp@(-8) 46c82: 2f2e 000c movel %fp@(12),%sp@- 46c86: 4eb9 0004 d4c8 jsr 4d4c8 <_POSIX_Absolute_timeout_to_ticks> 46c8c: 486e fffc pea %fp@(-4) 46c90: 2400 movel %d0,%d2 46c92: 2f12 movel %a2@,%sp@- 46c94: 4879 0006 1e78 pea 61e78 <_POSIX_RWLock_Information> 46c9a: 4eb9 0004 9858 jsr 49858 <_Objects_Get> if ( status != POSIX_ABSOLUTE_TIMEOUT_IS_IN_FUTURE ) do_wait = false; the_rwlock = _POSIX_RWLock_Get( rwlock, &location ); switch ( location ) { 46ca0: 4fef 0014 lea %sp@(20),%sp 46ca4: 4aae fffc tstl %fp@(-4) 46ca8: 6654 bnes 46cfe (pthread_rwlock_t *__rwlock, _CONST struct timespec *__abstime)); int _EXFUN(pthread_rwlock_unlock,(pthread_rwlock_t *__rwlock)); int _EXFUN(pthread_rwlock_wrlock,(pthread_rwlock_t *__rwlock)); int _EXFUN(pthread_rwlock_trywrlock,(pthread_rwlock_t *__rwlock)); int _EXFUN(pthread_rwlock_timedwrlock, 46caa: 7203 moveq #3,%d1 46cac: b282 cmpl %d2,%d1 46cae: 57c3 seq %d3 case OBJECTS_LOCAL: _CORE_RWLock_Obtain_for_writing( 46cb0: 42a7 clrl %sp@- 46cb2: 2f2e fff8 movel %fp@(-8),%sp@- 46cb6: 4483 negl %d3 46cb8: 4281 clrl %d1 46cba: 1203 moveb %d3,%d1 46cbc: 2040 moveal %d0,%a0 46cbe: 2f01 movel %d1,%sp@- 46cc0: 2f12 movel %a2@,%sp@- 46cc2: 4868 0010 pea %a0@(16) 46cc6: 4eb9 0004 8bdc jsr 48bdc <_CORE_RWLock_Obtain_for_writing> do_wait, ticks, NULL ); _Thread_Enable_dispatch(); 46ccc: 4eb9 0004 a068 jsr 4a068 <_Thread_Enable_dispatch> if ( !do_wait && 46cd2: 4fef 0014 lea %sp@(20),%sp 46cd6: 4a03 tstb %d3 46cd8: 6644 bnes 46d1e (_Thread_Executing->Wait.return_code == CORE_RWLOCK_UNAVAILABLE) ) { 46cda: 2079 0006 1d86 moveal 61d86 <_Thread_Executing>,%a0 ticks, NULL ); _Thread_Enable_dispatch(); if ( !do_wait && 46ce0: 7202 moveq #2,%d1 (_Thread_Executing->Wait.return_code == CORE_RWLOCK_UNAVAILABLE) ) { 46ce2: 2028 0034 movel %a0@(52),%d0 ticks, NULL ); _Thread_Enable_dispatch(); if ( !do_wait && 46ce6: b280 cmpl %d0,%d1 46ce8: 6720 beqs 46d0a case POSIX_ABSOLUTE_TIMEOUT_IS_IN_FUTURE: break; } } return _POSIX_RWLock_Translate_core_RWLock_return_code( 46cea: 2f00 movel %d0,%sp@- 46cec: 4eb9 0004 6d34 jsr 46d34 <_POSIX_RWLock_Translate_core_RWLock_return_code> 46cf2: 588f addql #4,%sp case OBJECTS_ERROR: break; } return EINVAL; } 46cf4: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46cfa: 4e5e unlk %fp 46cfc: 4e75 rts case POSIX_ABSOLUTE_TIMEOUT_IS_IN_FUTURE: break; } } return _POSIX_RWLock_Translate_core_RWLock_return_code( 46cfe: 7016 moveq #22,%d0 case OBJECTS_ERROR: break; } return EINVAL; } 46d00: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46d06: 4e5e unlk %fp 46d08: 4e75 rts ); _Thread_Enable_dispatch(); if ( !do_wait && (_Thread_Executing->Wait.return_code == CORE_RWLOCK_UNAVAILABLE) ) { switch (status) { 46d0a: 4a82 tstl %d2 46d0c: 67f0 beqs 46cfe <== NEVER TAKEN 46d0e: b282 cmpl %d2,%d1 46d10: 65d8 bcss 46cea <== NEVER TAKEN 46d12: 7074 moveq #116,%d0 case OBJECTS_ERROR: break; } return EINVAL; } 46d14: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46d1a: 4e5e unlk %fp 46d1c: 4e75 rts ); _Thread_Enable_dispatch(); if ( !do_wait && (_Thread_Executing->Wait.return_code == CORE_RWLOCK_UNAVAILABLE) ) { switch (status) { 46d1e: 2079 0006 1d86 moveal 61d86 <_Thread_Executing>,%a0 46d24: 2028 0034 movel %a0@(52),%d0 case POSIX_ABSOLUTE_TIMEOUT_IS_IN_FUTURE: break; } } return _POSIX_RWLock_Translate_core_RWLock_return_code( 46d28: 2f00 movel %d0,%sp@- 46d2a: 4eb9 0004 6d34 jsr 46d34 <_POSIX_RWLock_Translate_core_RWLock_return_code> 46d30: 588f addql #4,%sp 46d32: 60c0 bras 46cf4 =============================================================================== 000475d8 : int pthread_rwlockattr_setpshared( pthread_rwlockattr_t *attr, int pshared ) { 475d8: 4e56 0000 linkw %fp,#0 475dc: 206e 0008 moveal %fp@(8),%a0 475e0: 202e 000c movel %fp@(12),%d0 if ( !attr ) 475e4: 4a88 tstl %a0 475e6: 670a beqs 475f2 return EINVAL; if ( !attr->is_initialized ) 475e8: 4a90 tstl %a0@ 475ea: 6706 beqs 475f2 return EINVAL; switch ( pshared ) { 475ec: 7201 moveq #1,%d1 475ee: b280 cmpl %d0,%d1 475f0: 6406 bccs 475f8 <== ALWAYS TAKEN case PTHREAD_PROCESS_SHARED: case PTHREAD_PROCESS_PRIVATE: attr->process_shared = pshared; return 0; 475f2: 7016 moveq #22,%d0 default: return EINVAL; } } 475f4: 4e5e unlk %fp 475f6: 4e75 rts return EINVAL; switch ( pshared ) { case PTHREAD_PROCESS_SHARED: case PTHREAD_PROCESS_PRIVATE: attr->process_shared = pshared; 475f8: 2140 0004 movel %d0,%a0@(4) 475fc: 4280 clrl %d0 return 0; default: return EINVAL; } } 475fe: 4e5e unlk %fp ... =============================================================================== 0004897c : int pthread_setschedparam( pthread_t thread, int policy, struct sched_param *param ) { 4897c: 4e56 ffe0 linkw %fp,#-32 48980: 48d7 0c1c moveml %d2-%d4/%a2-%a3,%sp@ 48984: 282e 000c movel %fp@(12),%d4 48988: 242e 0010 movel %fp@(16),%d2 int rc; /* * Check all the parameters */ if ( !param ) 4898c: 6700 00c4 beqw 48a52 return EINVAL; rc = _POSIX_Thread_Translate_sched_param( 48990: 486e fff8 pea %fp@(-8) 48994: 486e fffc pea %fp@(-4) 48998: 2f02 movel %d2,%sp@- 4899a: 2f04 movel %d4,%sp@- 4899c: 4eb9 0004 e804 jsr 4e804 <_POSIX_Thread_Translate_sched_param> policy, param, &budget_algorithm, &budget_callout ); if ( rc ) 489a2: 4fef 0010 lea %sp@(16),%sp * Check all the parameters */ if ( !param ) return EINVAL; rc = _POSIX_Thread_Translate_sched_param( 489a6: 2600 movel %d0,%d3 policy, param, &budget_algorithm, &budget_callout ); if ( rc ) 489a8: 670c beqs 489b6 case OBJECTS_ERROR: break; } return ESRCH; } 489aa: 2003 movel %d3,%d0 489ac: 4cee 0c1c ffe0 moveml %fp@(-32),%d2-%d4/%a2-%a3 489b2: 4e5e unlk %fp 489b4: 4e75 rts 489b6: 486e fff4 pea %fp@(-12) 489ba: 2f2e 0008 movel %fp@(8),%sp@- 489be: 4879 0006 442e pea 6442e <_POSIX_Threads_Information> 489c4: 4eb9 0004 aab8 jsr 4aab8 <_Objects_Get> /* * Actually change the scheduling policy and parameters */ the_thread = _POSIX_Threads_Get( thread, &location ); switch ( location ) { 489ca: 4fef 000c lea %sp@(12),%sp 489ce: 2440 moveal %d0,%a2 489d0: 4aae fff4 tstl %fp@(-12) 489d4: 6600 008a bnew 48a60 case OBJECTS_LOCAL: api = the_thread->API_Extensions[ THREAD_API_POSIX ]; 489d8: 266a 010e moveal %a2@(270),%a3 if ( api->schedpolicy == SCHED_SPORADIC ) 489dc: 7004 moveq #4,%d0 489de: b0ab 0080 cmpl %a3@(128),%d0 489e2: 6700 00ba beqw 48a9e (void) _Watchdog_Remove( &api->Sporadic_timer ); api->schedpolicy = policy; api->schedparam = *param; 489e6: 2242 moveal %d2,%a1 489e8: 41eb 0084 lea %a3@(132),%a0 api = the_thread->API_Extensions[ THREAD_API_POSIX ]; if ( api->schedpolicy == SCHED_SPORADIC ) (void) _Watchdog_Remove( &api->Sporadic_timer ); api->schedpolicy = policy; 489ec: 2744 0080 movel %d4,%a3@(128) api->schedparam = *param; 489f0: 20d9 movel %a1@+,%a0@+ 489f2: 20d9 movel %a1@+,%a0@+ 489f4: 20d9 movel %a1@+,%a0@+ 489f6: 20d9 movel %a1@+,%a0@+ 489f8: 20d9 movel %a1@+,%a0@+ 489fa: 20d9 movel %a1@+,%a0@+ the_thread->budget_algorithm = budget_algorithm; 489fc: 256e fffc 007a movel %fp@(-4),%a2@(122) if ( api->schedpolicy == SCHED_SPORADIC ) (void) _Watchdog_Remove( &api->Sporadic_timer ); api->schedpolicy = policy; api->schedparam = *param; 48a02: 2091 movel %a1@,%a0@ the_thread->budget_algorithm = budget_algorithm; the_thread->budget_callout = budget_callout; 48a04: 256e fff8 007e movel %fp@(-8),%a2@(126) switch ( api->schedpolicy ) { 48a0a: 4a84 tstl %d4 48a0c: 6d32 blts 48a40 <== NEVER TAKEN 48a0e: 7002 moveq #2,%d0 48a10: b084 cmpl %d4,%d0 48a12: 6d5c blts 48a70 <== NEVER TAKEN 48a14: 4280 clrl %d0 48a16: 1039 0006 2a56 moveb 62a56 ,%d0 case SCHED_OTHER: case SCHED_FIFO: case SCHED_RR: the_thread->cpu_time_budget = _Thread_Ticks_per_timeslice; 48a1c: 41f9 0006 41f8 lea 641f8 <_Thread_Ticks_per_timeslice>,%a0 48a22: 90ab 0084 subl %a3@(132),%d0 48a26: 2550 0076 movel %a0@,%a2@(118) the_thread->real_priority = 48a2a: 2540 0018 movel %d0,%a2@(24) _POSIX_Priority_To_core( api->schedparam.sched_priority ); _Thread_Change_priority( 48a2e: 4878 0001 pea 1 48a32: 2f00 movel %d0,%sp@- 48a34: 2f0a movel %a2,%sp@- 48a36: 4eb9 0004 ada8 jsr 4ada8 <_Thread_Change_priority> the_thread, the_thread->real_priority, true ); break; 48a3c: 4fef 000c lea %sp@(12),%sp _Watchdog_Remove( &api->Sporadic_timer ); _POSIX_Threads_Sporadic_budget_TSR( 0, the_thread ); break; } _Thread_Enable_dispatch(); 48a40: 4eb9 0004 b2c8 jsr 4b2c8 <_Thread_Enable_dispatch> case OBJECTS_ERROR: break; } return ESRCH; } 48a46: 2003 movel %d3,%d0 48a48: 4cee 0c1c ffe0 moveml %fp@(-32),%d2-%d4/%a2-%a3 48a4e: 4e5e unlk %fp 48a50: 4e75 rts int rc; /* * Check all the parameters */ if ( !param ) 48a52: 7616 moveq #22,%d3 case OBJECTS_ERROR: break; } return ESRCH; } 48a54: 2003 movel %d3,%d0 48a56: 4cee 0c1c ffe0 moveml %fp@(-32),%d2-%d4/%a2-%a3 48a5c: 4e5e unlk %fp 48a5e: 4e75 rts /* * Actually change the scheduling policy and parameters */ the_thread = _POSIX_Threads_Get( thread, &location ); switch ( location ) { 48a60: 163c 0003 moveb #3,%d3 case OBJECTS_ERROR: break; } return ESRCH; } 48a64: 2003 movel %d3,%d0 48a66: 4cee 0c1c ffe0 moveml %fp@(-32),%d2-%d4/%a2-%a3 48a6c: 4e5e unlk %fp 48a6e: 4e75 rts api->schedpolicy = policy; api->schedparam = *param; the_thread->budget_algorithm = budget_algorithm; the_thread->budget_callout = budget_callout; switch ( api->schedpolicy ) { 48a70: 103c 0004 moveb #4,%d0 48a74: b084 cmpl %d4,%d0 48a76: 66c8 bnes 48a40 <== NEVER TAKEN true ); break; case SCHED_SPORADIC: api->ss_high_priority = api->schedparam.sched_priority; 48a78: 276b 0084 00a0 movel %a3@(132),%a3@(160) _Watchdog_Remove( &api->Sporadic_timer ); 48a7e: 486b 00a4 pea %a3@(164) 48a82: 4eb9 0004 c748 jsr 4c748 <_Watchdog_Remove> _POSIX_Threads_Sporadic_budget_TSR( 0, the_thread ); 48a88: 2f0a movel %a2,%sp@- 48a8a: 42a7 clrl %sp@- 48a8c: 4eb9 0004 88c0 jsr 488c0 <_POSIX_Threads_Sporadic_budget_TSR> 48a92: 4fef 000c lea %sp@(12),%sp break; } _Thread_Enable_dispatch(); 48a96: 4eb9 0004 b2c8 jsr 4b2c8 <_Thread_Enable_dispatch> 48a9c: 60a8 bras 48a46 case OBJECTS_LOCAL: api = the_thread->API_Extensions[ THREAD_API_POSIX ]; if ( api->schedpolicy == SCHED_SPORADIC ) (void) _Watchdog_Remove( &api->Sporadic_timer ); 48a9e: 486b 00a4 pea %a3@(164) 48aa2: 4eb9 0004 c748 jsr 4c748 <_Watchdog_Remove> api->schedpolicy = policy; api->schedparam = *param; the_thread->budget_algorithm = budget_algorithm; 48aa8: 256e fffc 007a movel %fp@(-4),%a2@(122) if ( api->schedpolicy == SCHED_SPORADIC ) (void) _Watchdog_Remove( &api->Sporadic_timer ); api->schedpolicy = policy; api->schedparam = *param; 48aae: 2242 moveal %d2,%a1 48ab0: 41eb 0084 lea %a3@(132),%a0 case OBJECTS_LOCAL: api = the_thread->API_Extensions[ THREAD_API_POSIX ]; if ( api->schedpolicy == SCHED_SPORADIC ) (void) _Watchdog_Remove( &api->Sporadic_timer ); 48ab4: 588f addql #4,%sp api->schedpolicy = policy; 48ab6: 2744 0080 movel %d4,%a3@(128) api->schedparam = *param; 48aba: 20d9 movel %a1@+,%a0@+ 48abc: 20d9 movel %a1@+,%a0@+ 48abe: 20d9 movel %a1@+,%a0@+ 48ac0: 20d9 movel %a1@+,%a0@+ 48ac2: 20d9 movel %a1@+,%a0@+ 48ac4: 20d9 movel %a1@+,%a0@+ the_thread->budget_algorithm = budget_algorithm; the_thread->budget_callout = budget_callout; 48ac6: 256e fff8 007e movel %fp@(-8),%a2@(126) if ( api->schedpolicy == SCHED_SPORADIC ) (void) _Watchdog_Remove( &api->Sporadic_timer ); api->schedpolicy = policy; api->schedparam = *param; 48acc: 2091 movel %a1@,%a0@ the_thread->budget_algorithm = budget_algorithm; the_thread->budget_callout = budget_callout; switch ( api->schedpolicy ) { 48ace: 4a84 tstl %d4 48ad0: 6c00 ff3c bgew 48a0e 48ad4: 6000 ff6a braw 48a40 <== NOT EXECUTED =============================================================================== 0004c974 : int pthread_sigmask( int how, const sigset_t *set, sigset_t *oset ) { 4c974: 4e56 0000 linkw %fp,#0 4c978: 202e 0008 movel %fp@(8),%d0 4c97c: 2f0b movel %a3,%sp@- 4c97e: 226e 000c moveal %fp@(12),%a1 4c982: 2f0a movel %a2,%sp@- 4c984: 246e 0010 moveal %fp@(16),%a2 POSIX_API_Control *api; if ( !set && !oset ) 4c988: 4a89 tstl %a1 4c98a: 6700 0096 beqw 4ca22 rtems_set_errno_and_return_minus_one( EINVAL ); api = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ]; 4c98e: 2679 0006 0f92 moveal 60f92 <_Thread_Executing>,%a3 4c994: 206b 010e moveal %a3@(270),%a0 if ( oset ) 4c998: 4a8a tstl %a2 4c99a: 6708 beqs 4c9a4 *oset = api->signals_blocked; 4c99c: 24a8 00cc movel %a0@(204),%a2@ if ( !set ) 4c9a0: 4a89 tstl %a1 4c9a2: 6744 beqs 4c9e8 <== NEVER TAKEN return 0; switch ( how ) { 4c9a4: 7201 moveq #1,%d1 4c9a6: b280 cmpl %d0,%d1 4c9a8: 6770 beqs 4ca1a 4c9aa: 123c 0002 moveb #2,%d1 4c9ae: b280 cmpl %d0,%d1 4c9b0: 6744 beqs 4c9f6 4c9b2: 4a80 tstl %d0 4c9b4: 664a bnes 4ca00 break; case SIG_UNBLOCK: api->signals_blocked &= ~*set; break; case SIG_SETMASK: api->signals_blocked = *set; 4c9b6: 2151 00cc movel %a1@,%a0@(204) /* XXX are there critical section problems here? */ /* XXX evaluate the new set */ if ( ~api->signals_blocked & (api->signals_pending | _POSIX_signals_Pending) ) { 4c9ba: 2039 0006 157a movel 6157a <_POSIX_signals_Pending>,%d0 /* XXX are there critical section problems here? */ /* XXX evaluate the new set */ if ( ~api->signals_blocked & 4c9c0: 2228 00cc movel %a0@(204),%d1 4c9c4: 4681 notl %d1 (api->signals_pending | _POSIX_signals_Pending) ) { 4c9c6: 80a8 00d0 orl %a0@(208),%d0 /* XXX are there critical section problems here? */ /* XXX evaluate the new set */ if ( ~api->signals_blocked & 4c9ca: c081 andl %d1,%d0 4c9cc: 671a beqs 4c9e8 (api->signals_pending | _POSIX_signals_Pending) ) { _Thread_Executing->do_post_task_switch_extension = true; 4c9ce: 7201 moveq #1,%d1 4c9d0: 1741 0074 moveb %d1,%a3@(116) _Thread_Dispatch(); 4c9d4: 4eb9 0004 8e68 jsr 48e68 <_Thread_Dispatch> } return 0; } 4c9da: 246e fff8 moveal %fp@(-8),%a2 /* XXX evaluate the new set */ if ( ~api->signals_blocked & (api->signals_pending | _POSIX_signals_Pending) ) { _Thread_Executing->do_post_task_switch_extension = true; _Thread_Dispatch(); 4c9de: 4280 clrl %d0 } return 0; } 4c9e0: 266e fffc moveal %fp@(-4),%a3 4c9e4: 4e5e unlk %fp 4c9e6: 4e75 rts 4c9e8: 246e fff8 moveal %fp@(-8),%a2 /* XXX evaluate the new set */ if ( ~api->signals_blocked & (api->signals_pending | _POSIX_signals_Pending) ) { _Thread_Executing->do_post_task_switch_extension = true; _Thread_Dispatch(); 4c9ec: 4280 clrl %d0 } return 0; } 4c9ee: 266e fffc moveal %fp@(-4),%a3 4c9f2: 4e5e unlk %fp 4c9f4: 4e75 rts switch ( how ) { case SIG_BLOCK: api->signals_blocked |= *set; break; case SIG_UNBLOCK: api->signals_blocked &= ~*set; 4c9f6: 2011 movel %a1@,%d0 4c9f8: 4680 notl %d0 4c9fa: c1a8 00cc andl %d0,%a0@(204) break; 4c9fe: 60ba bras 4c9ba case SIG_SETMASK: api->signals_blocked = *set; break; default: rtems_set_errno_and_return_minus_one( EINVAL ); 4ca00: 4eb9 0004 fc54 jsr 4fc54 <__errno> _Thread_Executing->do_post_task_switch_extension = true; _Thread_Dispatch(); } return 0; } 4ca06: 246e fff8 moveal %fp@(-8),%a2 break; case SIG_SETMASK: api->signals_blocked = *set; break; default: rtems_set_errno_and_return_minus_one( EINVAL ); 4ca0a: 2040 moveal %d0,%a0 4ca0c: 7216 moveq #22,%d1 4ca0e: 70ff moveq #-1,%d0 _Thread_Executing->do_post_task_switch_extension = true; _Thread_Dispatch(); } return 0; } 4ca10: 266e fffc moveal %fp@(-4),%a3 4ca14: 4e5e unlk %fp break; case SIG_SETMASK: api->signals_blocked = *set; break; default: rtems_set_errno_and_return_minus_one( EINVAL ); 4ca16: 2081 movel %d1,%a0@ _Thread_Executing->do_post_task_switch_extension = true; _Thread_Dispatch(); } return 0; } 4ca18: 4e75 rts if ( !set ) return 0; switch ( how ) { case SIG_BLOCK: api->signals_blocked |= *set; 4ca1a: 2011 movel %a1@,%d0 4ca1c: 81a8 00cc orl %d0,%a0@(204) break; 4ca20: 6098 bras 4c9ba sigset_t *oset ) { POSIX_API_Control *api; if ( !set && !oset ) 4ca22: 4a8a tstl %a2 4ca24: 67da beqs 4ca00 rtems_set_errno_and_return_minus_one( EINVAL ); api = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ]; 4ca26: 2679 0006 0f92 moveal 60f92 <_Thread_Executing>,%a3 4ca2c: 206b 010e moveal %a3@(270),%a0 if ( oset ) *oset = api->signals_blocked; 4ca30: 24a8 00cc movel %a0@(204),%a2@ if ( !set ) 4ca34: 4a89 tstl %a1 4ca36: 6600 ff6c bnew 4c9a4 4ca3a: 60ac bras 4c9e8 =============================================================================== 00045fe8 : */ int pthread_spin_trylock( pthread_spinlock_t *spinlock ) { 45fe8: 4e56 fffc linkw %fp,#-4 45fec: 206e 0008 moveal %fp@(8),%a0 45ff0: 2f02 movel %d2,%sp@- POSIX_Spinlock_Control *the_spinlock = NULL; Objects_Locations location; CORE_spinlock_Status status; if ( !spinlock ) 45ff2: 4a88 tstl %a0 45ff4: 6748 beqs 4603e <== NEVER TAKEN 45ff6: 486e fffc pea %fp@(-4) 45ffa: 2f10 movel %a0@,%sp@- 45ffc: 4879 0006 0328 pea 60328 <_POSIX_Spinlock_Information> 46002: 4eb9 0004 80d4 jsr 480d4 <_Objects_Get> return EINVAL; the_spinlock = _POSIX_Spinlock_Get( spinlock, &location ); switch ( location ) { 46008: 4fef 000c lea %sp@(12),%sp 4600c: 4aae fffc tstl %fp@(-4) 46010: 662c bnes 4603e case OBJECTS_LOCAL: status = _CORE_spinlock_Wait( &the_spinlock->Spinlock, false, 0 ); 46012: 42a7 clrl %sp@- 46014: 2040 moveal %d0,%a0 46016: 42a7 clrl %sp@- 46018: 4868 0010 pea %a0@(16) 4601c: 4eb9 0004 76a4 jsr 476a4 <_CORE_spinlock_Wait> 46022: 2400 movel %d0,%d2 _Thread_Enable_dispatch(); 46024: 4eb9 0004 88e4 jsr 488e4 <_Thread_Enable_dispatch> return _POSIX_Spinlock_Translate_core_spinlock_return_code( status ); 4602a: 2f02 movel %d2,%sp@- 4602c: 4eb9 0004 5fd0 jsr 45fd0 <_POSIX_Spinlock_Translate_core_spinlock_return_code> case OBJECTS_ERROR: break; } return EINVAL; } 46032: 242e fff8 movel %fp@(-8),%d2 switch ( location ) { case OBJECTS_LOCAL: status = _CORE_spinlock_Wait( &the_spinlock->Spinlock, false, 0 ); _Thread_Enable_dispatch(); return _POSIX_Spinlock_Translate_core_spinlock_return_code( status ); 46036: 4fef 0010 lea %sp@(16),%sp case OBJECTS_ERROR: break; } return EINVAL; } 4603a: 4e5e unlk %fp 4603c: 4e75 rts 4603e: 242e fff8 movel %fp@(-8),%d2 switch ( location ) { case OBJECTS_LOCAL: status = _CORE_spinlock_Wait( &the_spinlock->Spinlock, false, 0 ); _Thread_Enable_dispatch(); return _POSIX_Spinlock_Translate_core_spinlock_return_code( status ); 46042: 7016 moveq #22,%d0 case OBJECTS_ERROR: break; } return EINVAL; } 46044: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00046454 : * * 18.2.2 Setting Cancelability State, P1003.1c/Draft 10, p. 183 */ void pthread_testcancel( void ) { 46454: 4e56 0000 linkw %fp,#0 * Don't even think about deleting a resource from an ISR. * Besides this request is supposed to be for _Thread_Executing * and the ISR context is not a thread. */ if ( _ISR_Is_in_progress() ) 46458: 2039 0006 022e movel 6022e <_ISR_Nest_level>,%d0 4645e: 663c bnes 4649c <== NEVER TAKEN return; thread_support = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ]; 46460: 2079 0006 024e moveal 6024e <_Thread_Executing>,%a0 46466: 2039 0006 0194 movel 60194 <_Thread_Dispatch_disable_level>,%d0 4646c: 5280 addql #1,%d0 4646e: 2068 010e moveal %a0@(270),%a0 46472: 23c0 0006 0194 movel %d0,60194 <_Thread_Dispatch_disable_level> _Thread_Disable_dispatch(); if ( thread_support->cancelability_state == PTHREAD_CANCEL_ENABLE && 46478: 4aa8 00d4 tstl %a0@(212) 4647c: 6622 bnes 464a0 <== NEVER TAKEN thread_support->cancelation_requested ) 4647e: 4aa8 00dc tstl %a0@(220) 46482: 671c beqs 464a0 cancel = true; _Thread_Enable_dispatch(); 46484: 4eb9 0004 8b28 jsr 48b28 <_Thread_Enable_dispatch> if ( cancel ) _POSIX_Thread_Exit( _Thread_Executing, PTHREAD_CANCELED ); 4648a: 4878 ffff pea ffffffff 4648e: 2f39 0006 024e movel 6024e <_Thread_Executing>,%sp@- 46494: 4eb9 0004 c1ec jsr 4c1ec <_POSIX_Thread_Exit> 4649a: 508f addql #8,%sp <== NOT EXECUTED } 4649c: 4e5e unlk %fp <== NOT EXECUTED 4649e: 4e75 rts <== NOT EXECUTED 464a0: 4e5e unlk %fp _Thread_Disable_dispatch(); if ( thread_support->cancelability_state == PTHREAD_CANCEL_ENABLE && thread_support->cancelation_requested ) cancel = true; _Thread_Enable_dispatch(); 464a2: 4ef9 0004 8b28 jmp 48b28 <_Thread_Enable_dispatch> =============================================================================== 0004d918 : rtems_name name, rtems_attribute attribute_set, uint32_t maximum_waiters, rtems_id *id ) { 4d918: 4e56 ffe8 linkw %fp,#-24 4d91c: 202e 0010 movel %fp@(16),%d0 4d920: 48d7 0c0c moveml %d2-%d3/%a2-%a3,%sp@ 4d924: 242e 0008 movel %fp@(8),%d2 4d928: 262e 000c movel %fp@(12),%d3 4d92c: 246e 0014 moveal %fp@(20),%a2 Barrier_Control *the_barrier; CORE_barrier_Attributes the_attributes; if ( !rtems_is_name_valid( name ) ) 4d930: 4a82 tstl %d2 4d932: 677a beqs 4d9ae return RTEMS_INVALID_NAME; if ( !id ) 4d934: 4a8a tstl %a2 4d936: 6700 00ce beqw 4da06 return RTEMS_INVALID_ADDRESS; /* Initialize core barrier attributes */ if ( _Attributes_Is_barrier_automatic( attribute_set ) ) { 4d93a: 0803 0004 btst #4,%d3 4d93e: 677a beqs 4d9ba the_attributes.discipline = CORE_BARRIER_AUTOMATIC_RELEASE; if ( maximum_waiters == 0 ) 4d940: 4a80 tstl %d0 4d942: 6700 00b4 beqw 4d9f8 4d946: 2239 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d1 4d94c: 5281 addql #1,%d1 if ( !id ) return RTEMS_INVALID_ADDRESS; /* Initialize core barrier attributes */ if ( _Attributes_Is_barrier_automatic( attribute_set ) ) { the_attributes.discipline = CORE_BARRIER_AUTOMATIC_RELEASE; 4d94e: 42ae fff8 clrl %fp@(-8) if ( maximum_waiters == 0 ) return RTEMS_INVALID_NUMBER; } else the_attributes.discipline = CORE_BARRIER_MANUAL_RELEASE; the_attributes.maximum_count = maximum_waiters; 4d952: 2d40 fffc movel %d0,%fp@(-4) 4d956: 23c1 0005 ef78 movel %d1,5ef78 <_Thread_Dispatch_disable_level> * This function allocates a barrier control block from * the inactive chain of free barrier control blocks. */ RTEMS_INLINE_ROUTINE Barrier_Control *_Barrier_Allocate( void ) { return (Barrier_Control *) _Objects_Allocate( &_Barrier_Information ); 4d95c: 4879 0005 f80c pea 5f80c <_Barrier_Information> 4d962: 4eb9 0004 7090 jsr 47090 <_Objects_Allocate> _Thread_Disable_dispatch(); /* prevents deletion */ the_barrier = _Barrier_Allocate(); if ( !the_barrier ) { 4d968: 588f addql #4,%sp 4d96a: 2640 moveal %d0,%a3 4d96c: 4a80 tstl %d0 4d96e: 6776 beqs 4d9e6 <== NEVER TAKEN _Thread_Enable_dispatch(); return RTEMS_TOO_MANY; } the_barrier->attribute_set = attribute_set; 4d970: 2743 0010 movel %d3,%a3@(16) _CORE_barrier_Initialize( &the_barrier->Barrier, &the_attributes ); 4d974: 486e fff8 pea %fp@(-8) 4d978: 486b 0014 pea %a3@(20) 4d97c: 4eb9 0004 deac jsr 4deac <_CORE_barrier_Initialize> 4d982: 202b 0008 movel %a3@(8),%d0 4d986: 4281 clrl %d1 4d988: 2079 0005 f824 moveal 5f824 <_Barrier_Information+0x18>,%a0 4d98e: 3200 movew %d0,%d1 information, _Objects_Get_index( the_object->id ), the_object ); the_object->name = name; 4d990: 2742 000c movel %d2,%a3@(12) #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 4d994: 218b 1c00 movel %a3,%a0@(00000000,%d1:l:4) &_Barrier_Information, &the_barrier->Object, (Objects_Name) name ); *id = the_barrier->Object.id; 4d998: 2480 movel %d0,%a2@ _Thread_Enable_dispatch(); 4d99a: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; 4d9a0: 508f addql #8,%sp (Objects_Name) name ); *id = the_barrier->Object.id; _Thread_Enable_dispatch(); 4d9a2: 4280 clrl %d0 return RTEMS_SUCCESSFUL; } 4d9a4: 4cee 0c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a3 4d9aa: 4e5e unlk %fp 4d9ac: 4e75 rts ) { Barrier_Control *the_barrier; CORE_barrier_Attributes the_attributes; if ( !rtems_is_name_valid( name ) ) 4d9ae: 7003 moveq #3,%d0 *id = the_barrier->Object.id; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 4d9b0: 4cee 0c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a3 4d9b6: 4e5e unlk %fp 4d9b8: 4e75 rts if ( _Attributes_Is_barrier_automatic( attribute_set ) ) { the_attributes.discipline = CORE_BARRIER_AUTOMATIC_RELEASE; if ( maximum_waiters == 0 ) return RTEMS_INVALID_NUMBER; } else the_attributes.discipline = CORE_BARRIER_MANUAL_RELEASE; 4d9ba: 7201 moveq #1,%d1 4d9bc: 2d41 fff8 movel %d1,%fp@(-8) 4d9c0: 2239 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d1 4d9c6: 5281 addql #1,%d1 the_attributes.maximum_count = maximum_waiters; 4d9c8: 2d40 fffc movel %d0,%fp@(-4) 4d9cc: 23c1 0005 ef78 movel %d1,5ef78 <_Thread_Dispatch_disable_level> 4d9d2: 4879 0005 f80c pea 5f80c <_Barrier_Information> 4d9d8: 4eb9 0004 7090 jsr 47090 <_Objects_Allocate> _Thread_Disable_dispatch(); /* prevents deletion */ the_barrier = _Barrier_Allocate(); if ( !the_barrier ) { 4d9de: 588f addql #4,%sp 4d9e0: 2640 moveal %d0,%a3 4d9e2: 4a80 tstl %d0 4d9e4: 668a bnes 4d970 _Thread_Enable_dispatch(); 4d9e6: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> 4d9ec: 7005 moveq #5,%d0 *id = the_barrier->Object.id; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 4d9ee: 4cee 0c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a3 4d9f4: 4e5e unlk %fp 4d9f6: 4e75 rts return RTEMS_INVALID_ADDRESS; /* Initialize core barrier attributes */ if ( _Attributes_Is_barrier_automatic( attribute_set ) ) { the_attributes.discipline = CORE_BARRIER_AUTOMATIC_RELEASE; if ( maximum_waiters == 0 ) 4d9f8: 103c 000a moveb #10,%d0 *id = the_barrier->Object.id; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 4d9fc: 4cee 0c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a3 4da02: 4e5e unlk %fp 4da04: 4e75 rts CORE_barrier_Attributes the_attributes; if ( !rtems_is_name_valid( name ) ) return RTEMS_INVALID_NAME; if ( !id ) 4da06: 7009 moveq #9,%d0 *id = the_barrier->Object.id; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 4da08: 4cee 0c0c ffe8 moveml %fp@(-24),%d2-%d3/%a2-%a3 4da0e: 4e5e unlk %fp ... =============================================================================== 00046a5c : */ rtems_status_code rtems_clock_set( rtems_time_of_day *time_buffer ) { 46a5c: 4e56 fff8 linkw %fp,#-8 46a60: 2f0a movel %a2,%sp@- 46a62: 246e 0008 moveal %fp@(8),%a2 46a66: 2f02 movel %d2,%sp@- struct timespec newtime; if ( !time_buffer ) 46a68: 4a8a tstl %a2 46a6a: 6772 beqs 46ade <== NEVER TAKEN return RTEMS_INVALID_ADDRESS; if ( _TOD_Validate( time_buffer ) ) { 46a6c: 2f0a movel %a2,%sp@- 46a6e: 4eb9 0004 6c3c jsr 46c3c <_TOD_Validate> 46a74: 588f addql #4,%sp 46a76: 4a00 tstb %d0 46a78: 660e bnes 46a88 _TOD_Set( &newtime ); _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } return RTEMS_INVALID_CLOCK; } 46a7a: 242e fff0 movel %fp@(-16),%d2 struct timespec newtime; if ( !time_buffer ) return RTEMS_INVALID_ADDRESS; if ( _TOD_Validate( time_buffer ) ) { 46a7e: 7014 moveq #20,%d0 _TOD_Set( &newtime ); _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } return RTEMS_INVALID_CLOCK; } 46a80: 246e fff4 moveal %fp@(-12),%a2 46a84: 4e5e unlk %fp 46a86: 4e75 rts if ( !time_buffer ) return RTEMS_INVALID_ADDRESS; if ( _TOD_Validate( time_buffer ) ) { newtime.tv_sec = _TOD_To_seconds( time_buffer ); 46a88: 2f0a movel %a2,%sp@- 46a8a: 4eb9 0004 6b2c jsr 46b2c <_TOD_To_seconds> newtime.tv_nsec = time_buffer->ticks * 46a90: 242a 0018 movel %a2@(24),%d2 46a94: 41f9 0006 0020 lea 60020 ,%a0 46a9a: 4c10 2800 mulsl %a0@,%d2 if ( !time_buffer ) return RTEMS_INVALID_ADDRESS; if ( _TOD_Validate( time_buffer ) ) { newtime.tv_sec = _TOD_To_seconds( time_buffer ); 46a9e: 2d40 fff8 movel %d0,%fp@(-8) newtime.tv_nsec = time_buffer->ticks * 46aa2: 203c 0000 03e8 movel #1000,%d0 46aa8: 4c02 0800 mulsl %d2,%d0 rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 46aac: 2239 0006 9598 movel 69598 <_Thread_Dispatch_disable_level>,%d1 46ab2: 5281 addql #1,%d1 46ab4: 2d40 fffc movel %d0,%fp@(-4) 46ab8: 23c1 0006 9598 movel %d1,69598 <_Thread_Dispatch_disable_level> rtems_configuration_get_nanoseconds_per_tick(); _Thread_Disable_dispatch(); _TOD_Set( &newtime ); 46abe: 486e fff8 pea %fp@(-8) 46ac2: 4eb9 0004 85c8 jsr 485c8 <_TOD_Set> _Thread_Enable_dispatch(); 46ac8: 4eb9 0004 9910 jsr 49910 <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; } return RTEMS_INVALID_CLOCK; } 46ace: 242e fff0 movel %fp@(-16),%d2 rtems_configuration_get_nanoseconds_per_tick(); _Thread_Disable_dispatch(); _TOD_Set( &newtime ); _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; 46ad2: 508f addql #8,%sp newtime.tv_nsec = time_buffer->ticks * rtems_configuration_get_nanoseconds_per_tick(); _Thread_Disable_dispatch(); _TOD_Set( &newtime ); _Thread_Enable_dispatch(); 46ad4: 4280 clrl %d0 return RTEMS_SUCCESSFUL; } return RTEMS_INVALID_CLOCK; } 46ad6: 246e fff4 moveal %fp@(-12),%a2 46ada: 4e5e unlk %fp 46adc: 4e75 rts 46ade: 242e fff0 movel %fp@(-16),%d2 rtems_time_of_day *time_buffer ) { struct timespec newtime; if ( !time_buffer ) 46ae2: 7009 moveq #9,%d0 _TOD_Set( &newtime ); _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } return RTEMS_INVALID_CLOCK; } 46ae4: 246e fff4 moveal %fp@(-12),%a2 46ae8: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004634e : #endif Objects_Information *_Internal_Objects[ OBJECTS_INTERNAL_CLASSES_LAST + 1 ]; void rtems_initialize_data_structures(void) { 4634e: 4e56 0000 linkw %fp,#0 46352: 42b9 0005 f100 clrl 5f100 <_System_state_Current> #endif /* * Initialize any target architecture specific support as early as possible */ _CPU_Initialize(); 46358: 4eb9 0004 9354 jsr 49354 <_CPU_Initialize> /* * Do this as early as possible to ensure no debugging output * is even attempted to be printed. */ _Debug_Manager_initialization(); 4635e: 4eb9 0004 b8f0 jsr 4b8f0 <_Debug_Manager_initialization> _API_extensions_Initialization(); 46364: 4eb9 0004 6604 jsr 46604 <_API_extensions_Initialization> * This routine initializes the thread dispatching subsystem. */ RTEMS_INLINE_ROUTINE void _Thread_Dispatch_initialization( void ) { _Thread_Dispatch_disable_level = 1; 4636a: 7001 moveq #1,%d0 4636c: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> /* * Before this is called, we are not allowed to allocate memory * from the Workspace because it is not initialized. */ _Workspace_Handler_initialization(); 46372: 4eb9 0004 9228 jsr 49228 <_Workspace_Handler_initialization> _User_extensions_Handler_initialization(); 46378: 4eb9 0004 8cb0 jsr 48cb0 <_User_extensions_Handler_initialization> _ISR_Handler_initialization(); 4637e: 4eb9 0004 7028 jsr 47028 <_ISR_Handler_initialization> /* * Initialize the internal support API and allocator Mutex */ _Objects_Information_table[OBJECTS_INTERNAL_API] = _Internal_Objects; _API_Mutex_Initialization( 1 ); 46384: 4878 0001 pea 1 _ISR_Handler_initialization(); /* * Initialize the internal support API and allocator Mutex */ _Objects_Information_table[OBJECTS_INTERNAL_API] = _Internal_Objects; 46388: 203c 0005 ef8e movel #389006,%d0 4638e: 23c0 0005 ef34 movel %d0,5ef34 <_Objects_Information_table+0x4> _API_Mutex_Initialization( 1 ); 46394: 4eb9 0004 6738 jsr 46738 <_API_Mutex_Initialization> _API_Mutex_Allocate( &_RTEMS_Allocator_Mutex ); 4639a: 4879 0005 f02a pea 5f02a <_RTEMS_Allocator_Mutex> 463a0: 4eb9 0004 66a0 jsr 466a0 <_API_Mutex_Allocate> #include #endif Objects_Information *_Internal_Objects[ OBJECTS_INTERNAL_CLASSES_LAST + 1 ]; void rtems_initialize_data_structures(void) 463a6: 508f addql #8,%sp RTEMS_INLINE_ROUTINE void _Priority_Handler_initialization( void ) { int index; _Priority_Major_bit_map = 0; 463a8: 41f9 0005 f098 lea 5f098 <_Priority_Bit_map>,%a0 463ae: 4240 clrw %d0 463b0: 33c0 0005 f028 movew %d0,5f028 <_Priority_Major_bit_map> for ( index=0 ; index <16 ; index++ ) _Priority_Bit_map[ index ] = 0; 463b6: 4258 clrw %a0@+ RTEMS_INLINE_ROUTINE void _Priority_Handler_initialization( void ) { int index; _Priority_Major_bit_map = 0; for ( index=0 ; index <16 ; index++ ) 463b8: b1fc 0005 f0b8 cmpal #389304,%a0 463be: 66f6 bnes 463b6 _API_Mutex_Initialization( 1 ); _API_Mutex_Allocate( &_RTEMS_Allocator_Mutex ); _Priority_Handler_initialization(); _Watchdog_Handler_initialization(); 463c0: 4eb9 0004 9058 jsr 49058 <_Watchdog_Handler_initialization> _TOD_Handler_initialization(); 463c6: 4eb9 0004 6bbc jsr 46bbc <_TOD_Handler_initialization> _Thread_Handler_initialization(); 463cc: 4eb9 0004 80d8 jsr 480d8 <_Thread_Handler_initialization> _MPCI_Handler_initialization( RTEMS_TIMEOUT ); #endif /* MANAGERS */ _RTEMS_API_Initialize(); 463d2: 4eb9 0004 65b0 jsr 465b0 <_RTEMS_API_Initialize> _Extension_Manager_initialization(); 463d8: 4eb9 0004 6428 jsr 46428 <_Extension_Manager_initialization> _IO_Manager_initialization(); 463de: 4eb9 0004 64a6 jsr 464a6 <_IO_Manager_initialization> #ifdef RTEMS_POSIX_API _POSIX_API_Initialize(); 463e4: 4eb9 0004 655c jsr 4655c <_POSIX_API_Initialize> _Thread_Create_idle(); /* * Scheduling can properly occur now as long as we avoid dispatching. */ } 463ea: 4e5e unlk %fp 463ec: 7001 moveq #1,%d0 463ee: 23c0 0005 f100 movel %d0,5f100 <_System_state_Current> * _Thread_Executing and _Thread_Heir are not set. * * At this point all API extensions are in place. After the call to * _Thread_Create_idle() _Thread_Executing and _Thread_Heir will be set. */ _Thread_Create_idle(); 463f4: 4ef9 0004 7b78 jmp 47b78 <_Thread_Create_idle> ... =============================================================================== 0004ddf4 : rtems_status_code rtems_io_read( rtems_device_major_number major, rtems_device_minor_number minor, void *argument ) { 4ddf4: 4e56 0000 linkw %fp,#0 4ddf8: 202e 0008 movel %fp@(8),%d0 4ddfc: 2f03 movel %d3,%sp@- 4ddfe: 222e 000c movel %fp@(12),%d1 4de02: 206e 0010 moveal %fp@(16),%a0 4de06: 2f02 movel %d2,%sp@- rtems_device_driver_entry callout; if ( major >= _IO_Number_of_drivers ) 4de08: b0b9 0005 f804 cmpl 5f804 <_IO_Number_of_drivers>,%d0 4de0e: 642c bccs 4de3c <== NEVER TAKEN return RTEMS_INVALID_NUMBER; callout = _IO_Driver_address_table[major].read_entry; 4de10: 2600 movel %d0,%d3 4de12: 2400 movel %d0,%d2 4de14: e78b lsll #3,%d3 4de16: eb8a lsll #5,%d2 4de18: 2279 0005 f808 moveal 5f808 <_IO_Driver_address_table>,%a1 4de1e: 9483 subl %d3,%d2 4de20: 2271 280c moveal %a1@(0000000c,%d2:l),%a1 return callout ? callout(major, minor, argument) : RTEMS_SUCCESSFUL; 4de24: 4a89 tstl %a1 4de26: 671e beqs 4de46 4de28: 2d48 0010 movel %a0,%fp@(16) 4de2c: 2d41 000c movel %d1,%fp@(12) 4de30: 2d40 0008 movel %d0,%fp@(8) } 4de34: 241f movel %sp@+,%d2 4de36: 261f movel %sp@+,%d3 4de38: 4e5e unlk %fp if ( major >= _IO_Number_of_drivers ) return RTEMS_INVALID_NUMBER; callout = _IO_Driver_address_table[major].read_entry; return callout ? callout(major, minor, argument) : RTEMS_SUCCESSFUL; 4de3a: 4ed1 jmp %a1@ } 4de3c: 241f movel %sp@+,%d2 void *argument ) { rtems_device_driver_entry callout; if ( major >= _IO_Number_of_drivers ) 4de3e: 700a moveq #10,%d0 return RTEMS_INVALID_NUMBER; callout = _IO_Driver_address_table[major].read_entry; return callout ? callout(major, minor, argument) : RTEMS_SUCCESSFUL; } 4de40: 261f movel %sp@+,%d3 4de42: 4e5e unlk %fp 4de44: 4e75 rts 4de46: 241f movel %sp@+,%d2 if ( major >= _IO_Number_of_drivers ) return RTEMS_INVALID_NUMBER; callout = _IO_Driver_address_table[major].read_entry; return callout ? callout(major, minor, argument) : RTEMS_SUCCESSFUL; 4de48: 4280 clrl %d0 } 4de4a: 261f movel %sp@+,%d3 4de4c: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004833c : 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 ) { 4833c: 4e56 fff4 linkw %fp,#-12 48340: 226e 000c moveal %fp@(12),%a1 48344: 48d7 040c moveml %d2-%d3/%a2,%sp@ 48348: 242e 0008 movel %fp@(8),%d2 4834c: 246e 0010 moveal %fp@(16),%a2 rtems_device_major_number major_limit = _IO_Number_of_drivers; 48350: 2039 0006 59ea movel 659ea <_IO_Number_of_drivers>,%d0 if ( rtems_interrupt_is_in_progress() ) 48356: 2239 0006 51ca movel 651ca <_ISR_Nest_level>,%d1 4835c: 6600 009c bnew 483fa return RTEMS_CALLED_FROM_ISR; if ( registered_major == NULL ) 48360: 4a8a tstl %a2 48362: 6700 00ea beqw 4844e return RTEMS_INVALID_ADDRESS; /* Set it to an invalid value */ *registered_major = major_limit; 48366: 2480 movel %d0,%a2@ if ( driver_table == NULL ) 48368: 4a89 tstl %a1 4836a: 6700 00e2 beqw 4844e static inline bool rtems_io_is_empty_table( const rtems_driver_address_table *table ) { return table->initialization_entry == NULL && table->open_entry == NULL; 4836e: 4a91 tstl %a1@ 48370: 6700 00d4 beqw 48446 return RTEMS_INVALID_ADDRESS; if ( rtems_io_is_empty_table( driver_table ) ) return RTEMS_INVALID_ADDRESS; if ( major >= major_limit ) 48374: b480 cmpl %d0,%d2 48376: 6476 bccs 483ee rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 48378: 2039 0006 5130 movel 65130 <_Thread_Dispatch_disable_level>,%d0 4837e: 5280 addql #1,%d0 48380: 23c0 0006 5130 movel %d0,65130 <_Thread_Dispatch_disable_level> return RTEMS_INVALID_NUMBER; _Thread_Disable_dispatch(); if ( major == 0 ) { 48386: 4a82 tstl %d2 48388: 667c bnes 48406 static rtems_status_code rtems_io_obtain_major_number( rtems_device_major_number *major ) { rtems_device_major_number n = _IO_Number_of_drivers; 4838a: 2039 0006 59ea movel 659ea <_IO_Number_of_drivers>,%d0 rtems_device_major_number m = 0; /* major is error checked by caller */ for ( m = 0; m < n; ++m ) { 48390: 6700 00fc beqw 4848e 48394: 2239 0006 59ee movel 659ee <_IO_Driver_address_table>,%d1 4839a: 2041 moveal %d1,%a0 static inline bool rtems_io_is_empty_table( const rtems_driver_address_table *table ) { return table->initialization_entry == NULL && table->open_entry == NULL; 4839c: 4a90 tstl %a0@ 4839e: 6700 008e beqw 4842e rtems_device_major_number n = _IO_Number_of_drivers; rtems_device_major_number m = 0; /* major is error checked by caller */ for ( m = 0; m < n; ++m ) { 483a2: 5282 addql #1,%d2 483a4: 41e8 0018 lea %a0@(24),%a0 483a8: b480 cmpl %d0,%d2 483aa: 65f0 bcss 4839c if ( rtems_io_is_empty_table( table ) ) break; } /* Assigns invalid value in case of failure */ *major = m; 483ac: 2482 movel %d2,%a2@ if ( m != n ) 483ae: b480 cmpl %d0,%d2 483b0: 6700 00de beqw 48490 483b4: 2602 movel %d2,%d3 483b6: 2002 movel %d2,%d0 483b8: 2041 moveal %d1,%a0 483ba: e78b lsll #3,%d3 483bc: eb88 lsll #5,%d0 483be: 9083 subl %d3,%d0 483c0: d1c0 addal %d0,%a0 } *registered_major = major; } _IO_Driver_address_table [major] = *driver_table; 483c2: 20d9 movel %a1@+,%a0@+ 483c4: 20d9 movel %a1@+,%a0@+ 483c6: 20d9 movel %a1@+,%a0@+ 483c8: 20d9 movel %a1@+,%a0@+ 483ca: 20d9 movel %a1@+,%a0@+ 483cc: 2091 movel %a1@,%a0@ _Thread_Enable_dispatch(); 483ce: 4eb9 0004 9ee0 jsr 49ee0 <_Thread_Enable_dispatch> return rtems_io_initialize( major, 0, NULL ); 483d4: 2d42 0008 movel %d2,%fp@(8) } 483d8: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 _IO_Driver_address_table [major] = *driver_table; _Thread_Enable_dispatch(); return rtems_io_initialize( major, 0, NULL ); 483de: 42ae 0010 clrl %fp@(16) 483e2: 42ae 000c clrl %fp@(12) } 483e6: 4e5e unlk %fp _IO_Driver_address_table [major] = *driver_table; _Thread_Enable_dispatch(); return rtems_io_initialize( major, 0, NULL ); 483e8: 4ef9 0005 1368 jmp 51368 return RTEMS_INVALID_ADDRESS; if ( rtems_io_is_empty_table( driver_table ) ) return RTEMS_INVALID_ADDRESS; if ( major >= major_limit ) 483ee: 700a moveq #10,%d0 _IO_Driver_address_table [major] = *driver_table; _Thread_Enable_dispatch(); return rtems_io_initialize( major, 0, NULL ); } 483f0: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 483f6: 4e5e unlk %fp 483f8: 4e75 rts rtems_device_major_number *registered_major ) { rtems_device_major_number major_limit = _IO_Number_of_drivers; if ( rtems_interrupt_is_in_progress() ) 483fa: 7012 moveq #18,%d0 _IO_Driver_address_table [major] = *driver_table; _Thread_Enable_dispatch(); return rtems_io_initialize( major, 0, NULL ); } 483fc: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 48402: 4e5e unlk %fp 48404: 4e75 rts _Thread_Enable_dispatch(); return sc; } major = *registered_major; } else { rtems_driver_address_table *const table = _IO_Driver_address_table + major; 48406: 2202 movel %d2,%d1 48408: 2002 movel %d2,%d0 4840a: e789 lsll #3,%d1 4840c: eb88 lsll #5,%d0 4840e: 2079 0006 59ee moveal 659ee <_IO_Driver_address_table>,%a0 48414: 9081 subl %d1,%d0 48416: d1c0 addal %d0,%a0 static inline bool rtems_io_is_empty_table( const rtems_driver_address_table *table ) { return table->initialization_entry == NULL && table->open_entry == NULL; 48418: 4a90 tstl %a0@ 4841a: 673e beqs 4845a 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(); 4841c: 4eb9 0004 9ee0 jsr 49ee0 <_Thread_Enable_dispatch> 48422: 700c moveq #12,%d0 _IO_Driver_address_table [major] = *driver_table; _Thread_Enable_dispatch(); return rtems_io_initialize( major, 0, NULL ); } 48424: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 4842a: 4e5e unlk %fp 4842c: 4e75 rts static inline bool rtems_io_is_empty_table( const rtems_driver_address_table *table ) { return table->initialization_entry == NULL && table->open_entry == NULL; 4842e: 4aa8 0004 tstl %a0@(4) 48432: 6700 ff78 beqw 483ac rtems_device_major_number n = _IO_Number_of_drivers; rtems_device_major_number m = 0; /* major is error checked by caller */ for ( m = 0; m < n; ++m ) { 48436: 5282 addql #1,%d2 48438: 41e8 0018 lea %a0@(24),%a0 4843c: b480 cmpl %d0,%d2 4843e: 6500 ff5c bcsw 4839c 48442: 6000 ff68 braw 483ac static inline bool rtems_io_is_empty_table( const rtems_driver_address_table *table ) { return table->initialization_entry == NULL && table->open_entry == NULL; 48446: 4aa9 0004 tstl %a1@(4) 4844a: 6600 ff28 bnew 48374 _IO_Driver_address_table [major] = *driver_table; _Thread_Enable_dispatch(); return rtems_io_initialize( major, 0, NULL ); 4844e: 7009 moveq #9,%d0 } 48450: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 48456: 4e5e unlk %fp 48458: 4e75 rts static inline bool rtems_io_is_empty_table( const rtems_driver_address_table *table ) { return table->initialization_entry == NULL && table->open_entry == NULL; 4845a: 4aa8 0004 tstl %a0@(4) 4845e: 66bc bnes 4841c } *registered_major = major; } _IO_Driver_address_table [major] = *driver_table; 48460: 20d9 movel %a1@+,%a0@+ 48462: 20d9 movel %a1@+,%a0@+ 48464: 20d9 movel %a1@+,%a0@+ 48466: 20d9 movel %a1@+,%a0@+ 48468: 20d9 movel %a1@+,%a0@+ 4846a: 2091 movel %a1@,%a0@ if ( !rtems_io_is_empty_table( table ) ) { _Thread_Enable_dispatch(); return RTEMS_RESOURCE_IN_USE; } *registered_major = major; 4846c: 2482 movel %d2,%a2@ } _IO_Driver_address_table [major] = *driver_table; _Thread_Enable_dispatch(); 4846e: 4eb9 0004 9ee0 jsr 49ee0 <_Thread_Enable_dispatch> return rtems_io_initialize( major, 0, NULL ); 48474: 2d42 0008 movel %d2,%fp@(8) } 48478: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 _IO_Driver_address_table [major] = *driver_table; _Thread_Enable_dispatch(); return rtems_io_initialize( major, 0, NULL ); 4847e: 42ae 0010 clrl %fp@(16) 48482: 42ae 000c clrl %fp@(12) } 48486: 4e5e unlk %fp _IO_Driver_address_table [major] = *driver_table; _Thread_Enable_dispatch(); return rtems_io_initialize( major, 0, NULL ); 48488: 4ef9 0005 1368 jmp 51368 if ( rtems_io_is_empty_table( table ) ) break; } /* Assigns invalid value in case of failure */ *major = m; 4848e: 4292 clrl %a2@ <== NOT EXECUTED if ( major == 0 ) { rtems_status_code sc = rtems_io_obtain_major_number( registered_major ); if ( sc != RTEMS_SUCCESSFUL ) { _Thread_Enable_dispatch(); 48490: 4eb9 0004 9ee0 jsr 49ee0 <_Thread_Enable_dispatch> 48496: 7005 moveq #5,%d0 _IO_Driver_address_table [major] = *driver_table; _Thread_Enable_dispatch(); return rtems_io_initialize( major, 0, NULL ); } 48498: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 4849e: 4e5e unlk %fp ... =============================================================================== 00048b04 : #include #include void rtems_iterate_over_all_threads(rtems_per_thread_routine routine) { 48b04: 4e56 fff0 linkw %fp,#-16 48b08: 48d7 1c04 moveml %d2/%a2-%a4,%sp@ 48b0c: 266e 0008 moveal %fp@(8),%a3 uint32_t i; uint32_t api_index; Thread_Control *the_thread; Objects_Information *information; if ( !routine ) 48b10: 4a8b tstl %a3 48b12: 6744 beqs 48b58 <== NEVER TAKEN 48b14: 49f9 0006 9554 lea 69554 <_Objects_Information_table+0x4>,%a4 return; for ( api_index = 1 ; api_index <= OBJECTS_APIS_LAST ; api_index++ ) { if ( !_Objects_Information_table[ api_index ] ) 48b1a: 2054 moveal %a4@,%a0 48b1c: 4a88 tstl %a0 48b1e: 672e beqs 48b4e continue; information = _Objects_Information_table[ api_index ][ 1 ]; 48b20: 2468 0004 moveal %a0@(4),%a2 if ( !information ) 48b24: 4a8a tstl %a2 48b26: 6726 beqs 48b4e continue; for ( i=1 ; i <= information->maximum ; i++ ) { 48b28: 4a6a 000e tstw %a2@(14) 48b2c: 6720 beqs 48b4e 48b2e: 7401 moveq #1,%d2 the_thread = (Thread_Control *)information->local_table[ i ]; 48b30: 206a 0018 moveal %a2@(24),%a0 48b34: 2030 2c00 movel %a0@(00000000,%d2:l:4),%d0 information = _Objects_Information_table[ api_index ][ 1 ]; if ( !information ) continue; for ( i=1 ; i <= information->maximum ; i++ ) { 48b38: 5282 addql #1,%d2 the_thread = (Thread_Control *)information->local_table[ i ]; if ( !the_thread ) 48b3a: 4a80 tstl %d0 48b3c: 6706 beqs 48b44 <== NEVER TAKEN continue; (*routine)(the_thread); 48b3e: 2f00 movel %d0,%sp@- 48b40: 4e93 jsr %a3@ 48b42: 588f addql #4,%sp information = _Objects_Information_table[ api_index ][ 1 ]; if ( !information ) continue; for ( i=1 ; i <= information->maximum ; i++ ) { 48b44: 4280 clrl %d0 48b46: 302a 000e movew %a2@(14),%d0 48b4a: b480 cmpl %d0,%d2 48b4c: 63e2 blss 48b30 48b4e: 588c addql #4,%a4 Objects_Information *information; if ( !routine ) return; for ( api_index = 1 ; api_index <= OBJECTS_APIS_LAST ; api_index++ ) { 48b50: b9fc 0006 9564 cmpal #431460,%a4 48b56: 66c2 bnes 48b1a (*routine)(the_thread); } } } 48b58: 4cee 1c04 fff0 moveml %fp@(-16),%d2/%a2-%a4 48b5e: 4e5e unlk %fp ... =============================================================================== 00047770 : rtems_status_code rtems_object_get_class_information( int the_api, int the_class, rtems_object_api_class_information *info ) { 47770: 4e56 0000 linkw %fp,#0 47774: 2f0a movel %a2,%sp@- 47776: 246e 0010 moveal %fp@(16),%a2 4777a: 2f02 movel %d2,%sp@- int i; /* * Validate parameters and look up information structure. */ if ( !info ) 4777c: 4a8a tstl %a2 4777e: 6766 beqs 477e6 return RTEMS_INVALID_ADDRESS; obj_info = _Objects_Get_information( the_api, the_class ); 47780: 2f2e 000c movel %fp@(12),%sp@- 47784: 2f2e 0008 movel %fp@(8),%sp@- 47788: 4eb9 0004 937c jsr 4937c <_Objects_Get_information> if ( !obj_info ) 4778e: 508f addql #8,%sp * Validate parameters and look up information structure. */ if ( !info ) return RTEMS_INVALID_ADDRESS; obj_info = _Objects_Get_information( the_api, the_class ); 47790: 2040 moveal %d0,%a0 if ( !obj_info ) 47792: 4a80 tstl %d0 47794: 675e beqs 477f4 return RTEMS_INVALID_NUMBER; /* * Return information about this object class to the user. */ info->minimum_id = obj_info->minimum_id; 47796: 24a8 0006 movel %a0@(6),%a2@ info->maximum_id = obj_info->maximum_id; info->auto_extend = obj_info->auto_extend; info->maximum = obj_info->maximum; 4779a: 4282 clrl %d2 /* * Return information about this object class to the user. */ info->minimum_id = obj_info->minimum_id; info->maximum_id = obj_info->maximum_id; 4779c: 2568 000a 0004 movel %a0@(10),%a2@(4) info->auto_extend = obj_info->auto_extend; info->maximum = obj_info->maximum; 477a2: 3428 000e movew %a0@(14),%d2 /* * Return information about this object class to the user. */ info->minimum_id = obj_info->minimum_id; info->maximum_id = obj_info->maximum_id; info->auto_extend = obj_info->auto_extend; 477a6: 1568 0010 000c moveb %a0@(16),%a2@(12) info->maximum = obj_info->maximum; 477ac: 2542 0008 movel %d2,%a2@(8) for ( unallocated=0, i=1 ; i <= info->maximum ; i++ ) 477b0: 6750 beqs 47802 <== NEVER TAKEN 477b2: 2068 0018 moveal %a0@(24),%a0 477b6: 7201 moveq #1,%d1 477b8: 7001 moveq #1,%d0 477ba: 93c9 subal %a1,%a1 477bc: 5280 addql #1,%d0 if ( !obj_info->local_table[i] ) 477be: 4ab0 1c00 tstl %a0@(00000000,%d1:l:4) 477c2: 6718 beqs 477dc info->minimum_id = obj_info->minimum_id; info->maximum_id = obj_info->maximum_id; info->auto_extend = obj_info->auto_extend; info->maximum = obj_info->maximum; for ( unallocated=0, i=1 ; i <= info->maximum ; i++ ) 477c4: 2200 movel %d0,%d1 477c6: b082 cmpl %d2,%d0 477c8: 63f2 blss 477bc <== ALWAYS TAKEN if ( !obj_info->local_table[i] ) unallocated++; info->unallocated = unallocated; 477ca: 2549 000e movel %a1,%a2@(14) 477ce: 4280 clrl %d0 return RTEMS_SUCCESSFUL; } 477d0: 242e fff8 movel %fp@(-8),%d2 477d4: 246e fffc moveal %fp@(-4),%a2 477d8: 4e5e unlk %fp 477da: 4e75 rts info->auto_extend = obj_info->auto_extend; info->maximum = obj_info->maximum; for ( unallocated=0, i=1 ; i <= info->maximum ; i++ ) if ( !obj_info->local_table[i] ) unallocated++; 477dc: 5289 addql #1,%a1 info->minimum_id = obj_info->minimum_id; info->maximum_id = obj_info->maximum_id; info->auto_extend = obj_info->auto_extend; info->maximum = obj_info->maximum; for ( unallocated=0, i=1 ; i <= info->maximum ; i++ ) 477de: 2200 movel %d0,%d1 477e0: b082 cmpl %d2,%d0 477e2: 63d8 blss 477bc <== NEVER TAKEN 477e4: 60e4 bras 477ca unallocated++; info->unallocated = unallocated; return RTEMS_SUCCESSFUL; } 477e6: 242e fff8 movel %fp@(-8),%d2 int i; /* * Validate parameters and look up information structure. */ if ( !info ) 477ea: 7009 moveq #9,%d0 unallocated++; info->unallocated = unallocated; return RTEMS_SUCCESSFUL; } 477ec: 246e fffc moveal %fp@(-4),%a2 477f0: 4e5e unlk %fp 477f2: 4e75 rts 477f4: 242e fff8 movel %fp@(-8),%d2 */ if ( !info ) return RTEMS_INVALID_ADDRESS; obj_info = _Objects_Get_information( the_api, the_class ); if ( !obj_info ) 477f8: 700a moveq #10,%d0 unallocated++; info->unallocated = unallocated; return RTEMS_SUCCESSFUL; } 477fa: 246e fffc moveal %fp@(-4),%a2 477fe: 4e5e unlk %fp 47800: 4e75 rts info->minimum_id = obj_info->minimum_id; info->maximum_id = obj_info->maximum_id; info->auto_extend = obj_info->auto_extend; info->maximum = obj_info->maximum; for ( unallocated=0, i=1 ; i <= info->maximum ; i++ ) 47802: 93c9 subal %a1,%a1 <== NOT EXECUTED if ( !obj_info->local_table[i] ) unallocated++; info->unallocated = unallocated; 47804: 4280 clrl %d0 <== NOT EXECUTED 47806: 2549 000e movel %a1,%a2@(14) <== NOT EXECUTED 4780a: 60c4 bras 477d0 <== NOT EXECUTED =============================================================================== 0005692c : uint32_t length, uint32_t buffer_size, rtems_attribute attribute_set, rtems_id *id ) { 5692c: 4e56 ffe8 linkw %fp,#-24 56930: 48d7 0c3c moveml %d2-%d5/%a2-%a3,%sp@ 56934: 242e 0008 movel %fp@(8),%d2 56938: 2a2e 000c movel %fp@(12),%d5 5693c: 282e 0010 movel %fp@(16),%d4 56940: 262e 0014 movel %fp@(20),%d3 56944: 246e 001c moveal %fp@(28),%a2 register Partition_Control *the_partition; if ( !rtems_is_name_valid( name ) ) 56948: 4a82 tstl %d2 5694a: 673a beqs 56986 return RTEMS_INVALID_NAME; if ( !starting_address ) 5694c: 4a85 tstl %d5 5694e: 671e beqs 5696e return RTEMS_INVALID_ADDRESS; if ( !id ) 56950: 4a8a tstl %a2 56952: 671a beqs 5696e <== NEVER TAKEN return RTEMS_INVALID_ADDRESS; if ( length == 0 || buffer_size == 0 || length < buffer_size || 56954: 4a84 tstl %d4 56956: 6722 beqs 5697a 56958: 4a83 tstl %d3 5695a: 671e beqs 5697a 5695c: b684 cmpl %d4,%d3 5695e: 621a bhis 5697a 56960: 7003 moveq #3,%d0 56962: c083 andl %d3,%d0 56964: 6614 bnes 5697a !_Partition_Is_buffer_size_aligned( buffer_size ) ) return RTEMS_INVALID_SIZE; if ( !_Addresses_Is_aligned( starting_address ) ) 56966: 103c 0003 moveb #3,%d0 5696a: c085 andl %d5,%d0 5696c: 6724 beqs 56992 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; 5696e: 7009 moveq #9,%d0 } 56970: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 56976: 4e5e unlk %fp 56978: 4e75 rts 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; 5697a: 7008 moveq #8,%d0 } 5697c: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 56982: 4e5e unlk %fp 56984: 4e75 rts rtems_id *id ) { register Partition_Control *the_partition; if ( !rtems_is_name_valid( name ) ) 56986: 7003 moveq #3,%d0 ); #endif _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 56988: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 5698e: 4e5e unlk %fp 56990: 4e75 rts 56992: 2039 0007 e7cc movel 7e7cc <_Thread_Dispatch_disable_level>,%d0 56998: 5280 addql #1,%d0 5699a: 23c0 0007 e7cc movel %d0,7e7cc <_Thread_Dispatch_disable_level> * This function allocates a partition control block from * the inactive chain of free partition control blocks. */ RTEMS_INLINE_ROUTINE Partition_Control *_Partition_Allocate ( void ) { return (Partition_Control *) _Objects_Allocate( &_Partition_Information ); 569a0: 4879 0007 e656 pea 7e656 <_Partition_Information> 569a6: 4eb9 0005 b4cc jsr 5b4cc <_Objects_Allocate> _Thread_Disable_dispatch(); /* prevents deletion */ the_partition = _Partition_Allocate(); if ( !the_partition ) { 569ac: 588f addql #4,%sp 569ae: 2640 moveal %d0,%a3 569b0: 4a80 tstl %d0 569b2: 675a beqs 56a0e _Thread_Enable_dispatch(); return RTEMS_TOO_MANY; } #endif the_partition->starting_address = starting_address; 569b4: 2745 0010 movel %d5,%a3@(16) the_partition->length = length; the_partition->buffer_size = buffer_size; the_partition->attribute_set = attribute_set; the_partition->number_of_used_blocks = 0; _Chain_Initialize( &the_partition->Memory, starting_address, 569b8: 2004 movel %d4,%d0 #endif the_partition->starting_address = starting_address; the_partition->length = length; the_partition->buffer_size = buffer_size; the_partition->attribute_set = attribute_set; 569ba: 276e 0018 001c movel %fp@(24),%a3@(28) the_partition->number_of_used_blocks = 0; _Chain_Initialize( &the_partition->Memory, starting_address, 569c0: 4c43 0000 remul %d3,%d0,%d0 return RTEMS_TOO_MANY; } #endif the_partition->starting_address = starting_address; the_partition->length = length; 569c4: 2744 0014 movel %d4,%a3@(20) the_partition->buffer_size = buffer_size; 569c8: 2743 0018 movel %d3,%a3@(24) the_partition->attribute_set = attribute_set; the_partition->number_of_used_blocks = 0; 569cc: 42ab 0020 clrl %a3@(32) _Chain_Initialize( &the_partition->Memory, starting_address, 569d0: 2f03 movel %d3,%sp@- 569d2: 2f00 movel %d0,%sp@- 569d4: 2f05 movel %d5,%sp@- 569d6: 486b 0024 pea %a3@(36) 569da: 4eb9 0005 9f44 jsr 59f44 <_Chain_Initialize> 569e0: 202b 0008 movel %a3@(8),%d0 569e4: 4281 clrl %d1 569e6: 2079 0007 e66e moveal 7e66e <_Partition_Information+0x18>,%a0 569ec: 3200 movew %d0,%d1 information, _Objects_Get_index( the_object->id ), the_object ); the_object->name = name; 569ee: 2742 000c movel %d2,%a3@(12) #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 569f2: 218b 1c00 movel %a3,%a0@(00000000,%d1:l:4) &_Partition_Information, &the_partition->Object, (Objects_Name) name ); *id = the_partition->Object.id; 569f6: 2480 movel %d0,%a2@ name, 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); 569f8: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; 569fe: 4fef 0010 lea %sp@(16),%sp name, 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); 56a02: 4280 clrl %d0 return RTEMS_SUCCESSFUL; } 56a04: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 56a0a: 4e5e unlk %fp 56a0c: 4e75 rts _Thread_Disable_dispatch(); /* prevents deletion */ the_partition = _Partition_Allocate(); if ( !the_partition ) { _Thread_Enable_dispatch(); 56a0e: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> 56a14: 7005 moveq #5,%d0 ); #endif _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 56a16: 4cee 0c3c ffe8 moveml %fp@(-24),%d2-%d5/%a2-%a3 56a1c: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00056b40 : rtems_status_code rtems_partition_return_buffer( rtems_id id, void *buffer ) { 56b40: 4e56 fffc linkw %fp,#-4 56b44: 2f0a movel %a2,%sp@- 56b46: 2f02 movel %d2,%sp@- RTEMS_INLINE_ROUTINE Partition_Control *_Partition_Get ( Objects_Id id, Objects_Locations *location ) { return (Partition_Control *) 56b48: 486e fffc pea %fp@(-4) 56b4c: 2f2e 0008 movel %fp@(8),%sp@- 56b50: 4879 0007 e656 pea 7e656 <_Partition_Information> 56b56: 242e 000c movel %fp@(12),%d2 56b5a: 4eb9 0005 b9a4 jsr 5b9a4 <_Objects_Get> register Partition_Control *the_partition; Objects_Locations location; the_partition = _Partition_Get( id, &location ); switch ( location ) { 56b60: 4fef 000c lea %sp@(12),%sp 56b64: 2440 moveal %d0,%a2 56b66: 4aae fffc tstl %fp@(-4) 56b6a: 670e beqs 56b7a case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 56b6c: 242e fff4 movel %fp@(-12),%d2 { register Partition_Control *the_partition; Objects_Locations location; the_partition = _Partition_Get( id, &location ); switch ( location ) { 56b70: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 56b72: 246e fff8 moveal %fp@(-8),%a2 56b76: 4e5e unlk %fp 56b78: 4e75 rts ) { void *starting; void *ending; starting = the_partition->starting_address; 56b7a: 202a 0010 movel %a2@(16),%d0 ending = _Addresses_Add_offset( starting, the_partition->length ); 56b7e: 222a 0014 movel %a2@(20),%d1 const void *address, const void *base, const void *limit ) { return (address >= base && address <= limit); 56b82: b082 cmpl %d2,%d0 56b84: 623c bhis 56bc2 56b86: d280 addl %d0,%d1 56b88: b282 cmpl %d2,%d1 56b8a: 6536 bcss 56bc2 <== NEVER TAKEN return ( 56b8c: 2202 movel %d2,%d1 56b8e: 9280 subl %d0,%d1 56b90: 2001 movel %d1,%d0 56b92: 4c6a 0001 0018 remul %a2@(24),%d1,%d0 56b98: 4a81 tstl %d1 56b9a: 6626 bnes 56bc2 RTEMS_INLINE_ROUTINE void _Partition_Free_buffer ( Partition_Control *the_partition, Chain_Node *the_buffer ) { _Chain_Append( &the_partition->Memory, the_buffer ); 56b9c: 2f02 movel %d2,%sp@- 56b9e: 486a 0024 pea %a2@(36) 56ba2: 4eb9 0005 9ed0 jsr 59ed0 <_Chain_Append> switch ( location ) { case OBJECTS_LOCAL: if ( _Partition_Is_buffer_valid( buffer, the_partition ) ) { _Partition_Free_buffer( the_partition, buffer ); the_partition->number_of_used_blocks -= 1; 56ba8: 53aa 0020 subql #1,%a2@(32) _Thread_Enable_dispatch(); 56bac: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 56bb2: 242e fff4 movel %fp@(-12),%d2 case OBJECTS_LOCAL: if ( _Partition_Is_buffer_valid( buffer, the_partition ) ) { _Partition_Free_buffer( the_partition, buffer ); the_partition->number_of_used_blocks -= 1; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; 56bb6: 508f addql #8,%sp case OBJECTS_LOCAL: if ( _Partition_Is_buffer_valid( buffer, the_partition ) ) { _Partition_Free_buffer( the_partition, buffer ); the_partition->number_of_used_blocks -= 1; _Thread_Enable_dispatch(); 56bb8: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 56bba: 246e fff8 moveal %fp@(-8),%a2 56bbe: 4e5e unlk %fp 56bc0: 4e75 rts _Partition_Free_buffer( the_partition, buffer ); the_partition->number_of_used_blocks -= 1; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } _Thread_Enable_dispatch(); 56bc2: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 56bc8: 242e fff4 movel %fp@(-12),%d2 _Partition_Free_buffer( the_partition, buffer ); the_partition->number_of_used_blocks -= 1; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } _Thread_Enable_dispatch(); 56bcc: 7009 moveq #9,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 56bce: 246e fff8 moveal %fp@(-8),%a2 56bd2: 4e5e unlk %fp ... =============================================================================== 00055fe0 : rtems_status_code rtems_port_internal_to_external( rtems_id id, void *internal, void **external ) { 55fe0: 4e56 fffc linkw %fp,#-4 55fe4: 2f0a movel %a2,%sp@- 55fe6: 246e 0010 moveal %fp@(16),%a2 55fea: 2f02 movel %d2,%sp@- 55fec: 242e 000c movel %fp@(12),%d2 register Dual_ported_memory_Control *the_port; Objects_Locations location; uint32_t ending; if ( !external ) 55ff0: 4a8a tstl %a2 55ff2: 6762 beqs 56056 <== NEVER TAKEN 55ff4: 486e fffc pea %fp@(-4) 55ff8: 2f2e 0008 movel %fp@(8),%sp@- 55ffc: 4879 0007 e61c pea 7e61c <_Dual_ported_memory_Information> 56002: 4eb9 0005 b9a4 jsr 5b9a4 <_Objects_Get> return RTEMS_INVALID_ADDRESS; the_port = _Dual_ported_memory_Get( id, &location ); switch ( location ) { 56008: 4fef 000c lea %sp@(12),%sp 5600c: 4aae fffc tstl %fp@(-4) 56010: 6624 bnes 56036 case OBJECTS_LOCAL: ending = _Addresses_Subtract( internal, the_port->internal_base ); 56012: 2202 movel %d2,%d1 56014: 2040 moveal %d0,%a0 56016: 92a8 0010 subl %a0@(16),%d1 if ( ending > the_port->length ) 5601a: b2a8 0018 cmpl %a0@(24),%d1 5601e: 6324 blss 56044 *external = internal; 56020: 2482 movel %d2,%a2@ else *external = _Addresses_Add_offset( the_port->external_base, ending ); _Thread_Enable_dispatch(); 56022: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> 56028: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 5602a: 242e fff4 movel %fp@(-12),%d2 5602e: 246e fff8 moveal %fp@(-8),%a2 56032: 4e5e unlk %fp 56034: 4e75 rts 56036: 242e fff4 movel %fp@(-12),%d2 if ( !external ) return RTEMS_INVALID_ADDRESS; the_port = _Dual_ported_memory_Get( id, &location ); switch ( location ) { 5603a: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 5603c: 246e fff8 moveal %fp@(-8),%a2 56040: 4e5e unlk %fp 56042: 4e75 rts case OBJECTS_LOCAL: ending = _Addresses_Subtract( internal, the_port->internal_base ); if ( ending > the_port->length ) *external = internal; else *external = _Addresses_Add_offset( the_port->external_base, 56044: 2040 moveal %d0,%a0 56046: d2a8 0014 addl %a0@(20),%d1 5604a: 2481 movel %d1,%a2@ ending ); _Thread_Enable_dispatch(); 5604c: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> 56052: 4280 clrl %d0 56054: 60d4 bras 5602a case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 56056: 242e fff4 movel %fp@(-12),%d2 { register Dual_ported_memory_Control *the_port; Objects_Locations location; uint32_t ending; if ( !external ) 5605a: 7009 moveq #9,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 5605c: 246e fff8 moveal %fp@(-8),%a2 56060: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00046dc0 : rtems_status_code rtems_rate_monotonic_period( rtems_id id, rtems_interval length ) { 46dc0: 4e56 ffec linkw %fp,#-20 46dc4: 48d7 040c moveml %d2-%d3/%a2,%sp@ RTEMS_INLINE_ROUTINE Rate_monotonic_Control *_Rate_monotonic_Get ( Objects_Id id, Objects_Locations *location ) { return (Rate_monotonic_Control *) 46dc8: 486e fffc pea %fp@(-4) 46dcc: 242e 0008 movel %fp@(8),%d2 46dd0: 2f02 movel %d2,%sp@- 46dd2: 4879 0006 0fc0 pea 60fc0 <_Rate_monotonic_Information> 46dd8: 4eb9 0004 9074 jsr 49074 <_Objects_Get> rtems_rate_monotonic_period_states local_state; ISR_Level level; the_period = _Rate_monotonic_Get( id, &location ); switch ( location ) { 46dde: 4fef 000c lea %sp@(12),%sp 46de2: 2440 moveal %d0,%a2 46de4: 4aae fffc tstl %fp@(-4) 46de8: 661e bnes 46e08 case OBJECTS_LOCAL: if ( !_Thread_Is_executing( the_period->owner ) ) { 46dea: 2039 0006 117e movel 6117e <_Thread_Executing>,%d0 46df0: b0aa 0040 cmpl %a2@(64),%d0 46df4: 671e beqs 46e14 _Thread_Enable_dispatch(); 46df6: 4eb9 0004 9904 jsr 49904 <_Thread_Enable_dispatch> 46dfc: 7017 moveq #23,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 46dfe: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46e04: 4e5e unlk %fp 46e06: 4e75 rts the_period->state = RATE_MONOTONIC_ACTIVE; the_period->next_length = length; _Watchdog_Insert_ticks( &the_period->Timer, length ); _Thread_Enable_dispatch(); return RTEMS_TIMEOUT; 46e08: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 46e0a: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46e10: 4e5e unlk %fp 46e12: 4e75 rts if ( !_Thread_Is_executing( the_period->owner ) ) { _Thread_Enable_dispatch(); return RTEMS_NOT_OWNER_OF_RESOURCE; } if ( length == RTEMS_PERIOD_STATUS ) { 46e14: 4aae 000c tstl %fp@(12) 46e18: 6700 00ce beqw 46ee8 } _Thread_Enable_dispatch(); return( return_value ); } _ISR_Disable( level ); 46e1c: 203c 0000 0700 movel #1792,%d0 46e22: 40c3 movew %sr,%d3 46e24: 8083 orl %d3,%d0 46e26: 46c0 movew %d0,%sr switch ( the_period->state ) { 46e28: 202a 0038 movel %a2@(56),%d0 46e2c: 7202 moveq #2,%d1 46e2e: b280 cmpl %d0,%d1 46e30: 6700 00dc beqw 46f0e 46e34: 123c 0004 moveb #4,%d1 46e38: b280 cmpl %d0,%d1 46e3a: 6762 beqs 46e9e 46e3c: 4a80 tstl %d0 46e3e: 66c8 bnes 46e08 <== NEVER TAKEN case RATE_MONOTONIC_INACTIVE: { _ISR_Enable( level ); 46e40: 46c3 movew %d3,%sr /* * Baseline statistics information for the beginning of a period. */ _Rate_monotonic_Initiate_statistics( the_period ); 46e42: 2f0a movel %a2,%sp@- 46e44: 2d40 fff8 movel %d0,%fp@(-8) 46e48: 4eb9 0004 6b78 jsr 46b78 <_Rate_monotonic_Initiate_statistics> Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; 46e4e: 223c 0004 7224 movel #291364,%d1 the_watchdog->id = id; 46e54: 2542 0030 movel %d2,%a2@(48) Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 46e58: 242e 000c movel %fp@(12),%d2 Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; 46e5c: 2541 002c movel %d1,%a2@(44) the_period->state = RATE_MONOTONIC_ACTIVE; 46e60: 7202 moveq #2,%d1 Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 46e62: 2542 001c movel %d2,%a2@(28) 46e66: 2541 0038 movel %d1,%a2@(56) Watchdog_Service_routine_entry routine, Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; 46e6a: 42aa 0018 clrl %a2@(24) the_watchdog->routine = routine; the_watchdog->id = id; the_watchdog->user_data = user_data; 46e6e: 42aa 0034 clrl %a2@(52) _Rate_monotonic_Timeout, id, NULL ); the_period->next_length = length; 46e72: 2542 003c movel %d2,%a2@(60) ) { the_watchdog->initial = units; _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 46e76: 486a 0010 pea %a2@(16) 46e7a: 4879 0006 119c pea 6119c <_Watchdog_Ticks_chain> 46e80: 4eb9 0004 abcc jsr 4abcc <_Watchdog_Insert> _Watchdog_Insert_ticks( &the_period->Timer, length ); _Thread_Enable_dispatch(); 46e86: 4eb9 0004 9904 jsr 49904 <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; 46e8c: 202e fff8 movel %fp@(-8),%d0 46e90: 4fef 000c lea %sp@(12),%sp case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 46e94: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46e9a: 4e5e unlk %fp 46e9c: 4e75 rts case RATE_MONOTONIC_EXPIRED: /* * Update statistics from the concluding period */ _Rate_monotonic_Update_statistics( the_period ); 46e9e: 2f0a movel %a2,%sp@- 46ea0: 4eb9 0004 6ca6 jsr 46ca6 <_Rate_monotonic_Update_statistics> _ISR_Enable( level ); 46ea6: 46c3 movew %d3,%sr the_period->state = RATE_MONOTONIC_ACTIVE; 46ea8: 7202 moveq #2,%d1 the_period->next_length = length; _Watchdog_Insert_ticks( &the_period->Timer, length ); _Thread_Enable_dispatch(); 46eaa: 7006 moveq #6,%d0 Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 46eac: 242e 000c movel %fp@(12),%d2 */ _Rate_monotonic_Update_statistics( the_period ); _ISR_Enable( level ); the_period->state = RATE_MONOTONIC_ACTIVE; 46eb0: 2541 0038 movel %d1,%a2@(56) 46eb4: 2542 001c movel %d2,%a2@(28) the_period->next_length = length; 46eb8: 2542 003c movel %d2,%a2@(60) _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 46ebc: 486a 0010 pea %a2@(16) 46ec0: 4879 0006 119c pea 6119c <_Watchdog_Ticks_chain> 46ec6: 2d40 fff8 movel %d0,%fp@(-8) 46eca: 4eb9 0004 abcc jsr 4abcc <_Watchdog_Insert> _Watchdog_Insert_ticks( &the_period->Timer, length ); _Thread_Enable_dispatch(); 46ed0: 4eb9 0004 9904 jsr 49904 <_Thread_Enable_dispatch> return RTEMS_TIMEOUT; 46ed6: 202e fff8 movel %fp@(-8),%d0 46eda: 4fef 000c lea %sp@(12),%sp case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 46ede: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46ee4: 4e5e unlk %fp 46ee6: 4e75 rts _Thread_Enable_dispatch(); return RTEMS_NOT_OWNER_OF_RESOURCE; } if ( length == RTEMS_PERIOD_STATUS ) { switch ( the_period->state ) { 46ee8: 202a 0038 movel %a2@(56),%d0 46eec: 7204 moveq #4,%d1 46eee: b280 cmpl %d0,%d1 46ef0: 6400 009c bccw 46f8e 46ef4: 4280 clrl %d0 <== NOT EXECUTED case RATE_MONOTONIC_ACTIVE: default: /* unreached -- only to remove warnings */ return_value = RTEMS_SUCCESSFUL; break; } _Thread_Enable_dispatch(); 46ef6: 2d40 fff8 movel %d0,%fp@(-8) <== NOT EXECUTED 46efa: 4eb9 0004 9904 jsr 49904 <_Thread_Enable_dispatch> <== NOT EXECUTED return( return_value ); 46f00: 202e fff8 movel %fp@(-8),%d0 <== NOT EXECUTED case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 46f04: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46f0a: 4e5e unlk %fp 46f0c: 4e75 rts case RATE_MONOTONIC_ACTIVE: /* * Update statistics from the concluding period. */ _Rate_monotonic_Update_statistics( the_period ); 46f0e: 2f0a movel %a2,%sp@- 46f10: 4eb9 0004 6ca6 jsr 46ca6 <_Rate_monotonic_Update_statistics> * This tells the _Rate_monotonic_Timeout that this task is * in the process of blocking on the period and that we * may be changing the length of the next period. */ the_period->state = RATE_MONOTONIC_OWNER_IS_BLOCKING; the_period->next_length = length; 46f16: 242e 000c movel %fp@(12),%d2 /* * This tells the _Rate_monotonic_Timeout that this task is * in the process of blocking on the period and that we * may be changing the length of the next period. */ the_period->state = RATE_MONOTONIC_OWNER_IS_BLOCKING; 46f1a: 7001 moveq #1,%d0 the_period->next_length = length; 46f1c: 2542 003c movel %d2,%a2@(60) /* * This tells the _Rate_monotonic_Timeout that this task is * in the process of blocking on the period and that we * may be changing the length of the next period. */ the_period->state = RATE_MONOTONIC_OWNER_IS_BLOCKING; 46f20: 2540 0038 movel %d0,%a2@(56) the_period->next_length = length; _ISR_Enable( level ); 46f24: 46c3 movew %d3,%sr _Thread_Executing->Wait.id = the_period->Object.id; 46f26: 2079 0006 117e moveal 6117e <_Thread_Executing>,%a0 46f2c: 216a 0008 0020 movel %a2@(8),%a0@(32) _Thread_Set_state( _Thread_Executing, STATES_WAITING_FOR_PERIOD ); 46f32: 4878 4000 pea 4000 46f36: 2f08 movel %a0,%sp@- 46f38: 4eb9 0004 a298 jsr 4a298 <_Thread_Set_state> /* * Did the watchdog timer expire while we were actually blocking * on it? */ _ISR_Disable( level ); 46f3e: 203c 0000 0700 movel #1792,%d0 46f44: 40c1 movew %sr,%d1 46f46: 8081 orl %d1,%d0 46f48: 46c0 movew %d0,%sr local_state = the_period->state; the_period->state = RATE_MONOTONIC_ACTIVE; 46f4a: 7402 moveq #2,%d2 /* * Did the watchdog timer expire while we were actually blocking * on it? */ _ISR_Disable( level ); local_state = the_period->state; 46f4c: 202a 0038 movel %a2@(56),%d0 the_period->state = RATE_MONOTONIC_ACTIVE; 46f50: 2542 0038 movel %d2,%a2@(56) _ISR_Enable( level ); 46f54: 46c1 movew %d1,%sr /* * If it did, then we want to unblock ourself and continue as * if nothing happen. The period was reset in the timeout routine. */ if ( local_state == RATE_MONOTONIC_EXPIRED_WHILE_BLOCKING ) 46f56: 7203 moveq #3,%d1 46f58: 4fef 000c lea %sp@(12),%sp 46f5c: b280 cmpl %d0,%d1 46f5e: 6712 beqs 46f72 _Thread_Clear_state( _Thread_Executing, STATES_WAITING_FOR_PERIOD ); _Thread_Enable_dispatch(); 46f60: 4eb9 0004 9904 jsr 49904 <_Thread_Enable_dispatch> 46f66: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 46f68: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 46f6e: 4e5e unlk %fp 46f70: 4e75 rts /* * If it did, then we want to unblock ourself and continue as * if nothing happen. The period was reset in the timeout routine. */ if ( local_state == RATE_MONOTONIC_EXPIRED_WHILE_BLOCKING ) _Thread_Clear_state( _Thread_Executing, STATES_WAITING_FOR_PERIOD ); 46f72: 4878 4000 pea 4000 46f76: 2f39 0006 117e movel 6117e <_Thread_Executing>,%sp@- 46f7c: 4eb9 0004 9530 jsr 49530 <_Thread_Clear_state> 46f82: 508f addql #8,%sp _Thread_Enable_dispatch(); 46f84: 4eb9 0004 9904 jsr 49904 <_Thread_Enable_dispatch> 46f8a: 4280 clrl %d0 46f8c: 60da bras 46f68 _Thread_Enable_dispatch(); return RTEMS_NOT_OWNER_OF_RESOURCE; } if ( length == RTEMS_PERIOD_STATUS ) { switch ( the_period->state ) { 46f8e: 41f9 0005 e592 lea 5e592 ,%a0 46f94: 2030 0c00 movel %a0@(00000000,%d0:l:4),%d0 case RATE_MONOTONIC_ACTIVE: default: /* unreached -- only to remove warnings */ return_value = RTEMS_SUCCESSFUL; break; } _Thread_Enable_dispatch(); 46f98: 2d40 fff8 movel %d0,%fp@(-8) 46f9c: 4eb9 0004 9904 jsr 49904 <_Thread_Enable_dispatch> return( return_value ); 46fa2: 202e fff8 movel %fp@(-8),%d0 46fa6: 6000 ff5c braw 46f04 ... =============================================================================== 00046fac : */ void rtems_rate_monotonic_report_statistics_with_plugin( void *context, rtems_printk_plugin_t print ) { 46fac: 4e56 ff78 linkw %fp,#-136 46fb0: 48d7 3cfc moveml %d2-%d7/%a2-%a5,%sp@ 46fb4: 262e 0008 movel %fp@(8),%d3 46fb8: 246e 000c moveal %fp@(12),%a2 rtems_id id; rtems_rate_monotonic_period_statistics the_stats; rtems_rate_monotonic_period_status the_status; char name[5]; if ( !print ) 46fbc: 4a8a tstl %a2 46fbe: 6700 0082 beqw 47042 return; (*print)( context, "Period information by period\n" ); 46fc2: 4879 0005 e5a6 pea 5e5a6 46fc8: 2f03 movel %d3,%sp@- 46fca: 4e92 jsr %a2@ #ifndef __RTEMS_USE_TICKS_FOR_STATISTICS__ (*print)( context, "--- CPU times are in seconds ---\n" ); 46fcc: 4879 0005 e5c4 pea 5e5c4 46fd2: 2f03 movel %d3,%sp@- 46fd4: 4e92 jsr %a2@ (*print)( context, "--- Wall times are in seconds ---\n" ); 46fd6: 4879 0005 e5e6 pea 5e5e6 46fdc: 2f03 movel %d3,%sp@- 46fde: 4e92 jsr %a2@ Be sure to test the various cases. (*print)( context,"\ 1234567890123456789012345678901234567890123456789012345678901234567890123456789\ \n"); */ (*print)( context, " ID OWNER COUNT MISSED " 46fe0: 4879 0005 e609 pea 5e609 46fe6: 2f03 movel %d3,%sp@- 46fe8: 4e92 jsr %a2@ #ifndef __RTEMS_USE_TICKS_FOR_STATISTICS__ " " #endif " WALL TIME\n" ); (*print)( context, " " 46fea: 4fef 001c lea %sp@(28),%sp 46fee: 2ebc 0005 e654 movel #386644,%sp@ 46ff4: 2f03 movel %d3,%sp@- 46ff6: 4e92 jsr %a2@ /* * Cycle through all possible ids and try to report on each one. If it * is a period that is inactive, we just get an error back. No big deal. */ for ( id=_Rate_monotonic_Information.minimum_id ; 46ff8: 2439 0006 0fc6 movel 60fc6 <_Rate_monotonic_Information+0x6>,%d2 46ffe: 508f addql #8,%sp 47000: b4b9 0006 0fca cmpl 60fca <_Rate_monotonic_Information+0xa>,%d2 47006: 623a bhis 47042 <== NEVER TAKEN 47008: 280e movel %fp,%d4 #if defined(RTEMS_DEBUG) if ( status != RTEMS_SUCCESSFUL ) continue; #endif rtems_object_get_name( the_status.owner, sizeof(name), name ); 4700a: 2a0e movel %fp,%d5 4700c: 0684 ffff ffa2 addil #-94,%d4 47012: 47f9 0004 d260 lea 4d260 ,%a3 status = rtems_rate_monotonic_get_statistics( id, &the_stats ); if ( status != RTEMS_SUCCESSFUL ) continue; /* If the above passed, so should this but check it anyway */ status = rtems_rate_monotonic_get_status( id, &the_status ); 47018: 4bf9 0004 d320 lea 4d320 ,%a5 #if defined(RTEMS_DEBUG) if ( status != RTEMS_SUCCESSFUL ) continue; #endif rtems_object_get_name( the_status.owner, sizeof(name), name ); 4701e: 5b85 subql #5,%d5 47020: 49f9 0004 7304 lea 47304 ,%a4 struct timespec cpu_average; struct timespec *min_cpu = &the_stats.min_cpu_time; struct timespec *max_cpu = &the_stats.max_cpu_time; struct timespec *total_cpu = &the_stats.total_cpu_time; _Timespec_Divide_by_integer( total_cpu, the_stats.count, &cpu_average ); 47026: 2e3c 0004 a7d4 movel #305108,%d7 * is a period that is inactive, we just get an error back. No big deal. */ for ( id=_Rate_monotonic_Information.minimum_id ; id <= _Rate_monotonic_Information.maximum_id ; id++ ) { status = rtems_rate_monotonic_get_statistics( id, &the_stats ); 4702c: 2f04 movel %d4,%sp@- 4702e: 2f02 movel %d2,%sp@- 47030: 4e93 jsr %a3@ if ( status != RTEMS_SUCCESSFUL ) 47032: 508f addql #8,%sp 47034: 4a80 tstl %d0 47036: 6714 beqs 4704c * Cycle through all possible ids and try to report on each one. If it * is a period that is inactive, we just get an error back. No big deal. */ for ( id=_Rate_monotonic_Information.minimum_id ; id <= _Rate_monotonic_Information.maximum_id ; id++ ) { 47038: 5282 addql #1,%d2 /* * Cycle through all possible ids and try to report on each one. If it * is a period that is inactive, we just get an error back. No big deal. */ for ( id=_Rate_monotonic_Information.minimum_id ; 4703a: b4b9 0006 0fca cmpl 60fca <_Rate_monotonic_Information+0xa>,%d2 47040: 63ea blss 4702c the_stats.min_wall_time, the_stats.max_wall_time, ival_wall, fval_wall ); #endif } } } 47042: 4cee 3cfc ff78 moveml %fp@(-136),%d2-%d7/%a2-%a5 47048: 4e5e unlk %fp 4704a: 4e75 rts status = rtems_rate_monotonic_get_statistics( id, &the_stats ); if ( status != RTEMS_SUCCESSFUL ) continue; /* If the above passed, so should this but check it anyway */ status = rtems_rate_monotonic_get_status( id, &the_status ); 4704c: 486e ffda pea %fp@(-38) 47050: 2f02 movel %d2,%sp@- 47052: 4e95 jsr %a5@ #if defined(RTEMS_DEBUG) if ( status != RTEMS_SUCCESSFUL ) continue; #endif rtems_object_get_name( the_status.owner, sizeof(name), name ); 47054: 2f05 movel %d5,%sp@- 47056: 4878 0005 pea 5 4705a: 2f2e ffda movel %fp@(-38),%sp@- 4705e: 4e94 jsr %a4@ /* * Print part of report line that is not dependent on granularity */ (*print)( context, 47060: 2f2e ffa6 movel %fp@(-90),%sp@- 47064: 2f2e ffa2 movel %fp@(-94),%sp@- 47068: 2f05 movel %d5,%sp@- 4706a: 2f02 movel %d2,%sp@- 4706c: 4879 0005 e6a0 pea 5e6a0 47072: 2f03 movel %d3,%sp@- 47074: 4e92 jsr %a2@ ); /* * If the count is zero, don't print statistics */ if (the_stats.count == 0) { 47076: 202e ffa2 movel %fp@(-94),%d0 4707a: 4fef 002c lea %sp@(44),%sp 4707e: 6618 bnes 47098 (*print)( context, "\n" ); 47080: 4879 0005 ea5e pea 5ea5e * Cycle through all possible ids and try to report on each one. If it * is a period that is inactive, we just get an error back. No big deal. */ for ( id=_Rate_monotonic_Information.minimum_id ; id <= _Rate_monotonic_Information.maximum_id ; id++ ) { 47086: 5282 addql #1,%d2 /* * If the count is zero, don't print statistics */ if (the_stats.count == 0) { (*print)( context, "\n" ); 47088: 2f03 movel %d3,%sp@- 4708a: 4e92 jsr %a2@ continue; 4708c: 508f addql #8,%sp /* * Cycle through all possible ids and try to report on each one. If it * is a period that is inactive, we just get an error back. No big deal. */ for ( id=_Rate_monotonic_Information.minimum_id ; 4708e: b4b9 0006 0fca cmpl 60fca <_Rate_monotonic_Information+0xa>,%d2 47094: 6396 blss 4702c <== ALWAYS TAKEN 47096: 60aa bras 47042 <== NOT EXECUTED struct timespec cpu_average; struct timespec *min_cpu = &the_stats.min_cpu_time; struct timespec *max_cpu = &the_stats.max_cpu_time; struct timespec *total_cpu = &the_stats.total_cpu_time; _Timespec_Divide_by_integer( total_cpu, the_stats.count, &cpu_average ); 47098: 486e fff2 pea %fp@(-14) 4709c: 2047 moveal %d7,%a0 * Cycle through all possible ids and try to report on each one. If it * is a period that is inactive, we just get an error back. No big deal. */ for ( id=_Rate_monotonic_Information.minimum_id ; id <= _Rate_monotonic_Information.maximum_id ; id++ ) { 4709e: 5282 addql #1,%d2 struct timespec cpu_average; struct timespec *min_cpu = &the_stats.min_cpu_time; struct timespec *max_cpu = &the_stats.max_cpu_time; struct timespec *total_cpu = &the_stats.total_cpu_time; _Timespec_Divide_by_integer( total_cpu, the_stats.count, &cpu_average ); 470a0: 2f00 movel %d0,%sp@- 470a2: 486e ffba pea %fp@(-70) 470a6: 4e90 jsr %a0@ (*print)( context, 470a8: 202e fff6 movel %fp@(-10),%d0 470ac: 223c 0000 03e8 movel #1000,%d1 470b2: 4c41 0800 remsl %d1,%d0,%d0 470b6: 2c2e ffb6 movel %fp@(-74),%d6 470ba: 2f00 movel %d0,%sp@- 470bc: 2001 movel %d1,%d0 470be: 2f2e fff2 movel %fp@(-14),%sp@- 470c2: 4c40 6806 remsl %d0,%d6,%d6 470c6: 202e ffae movel %fp@(-82),%d0 470ca: 2246 moveal %d6,%a1 470cc: 223c 0000 03e8 movel #1000,%d1 470d2: 2f09 movel %a1,%sp@- 470d4: 2f2e ffb2 movel %fp@(-78),%sp@- 470d8: 4c41 0800 remsl %d1,%d0,%d0 struct timespec *min_wall = &the_stats.min_wall_time; struct timespec *max_wall = &the_stats.max_wall_time; struct timespec *total_wall = &the_stats.total_wall_time; _Timespec_Divide_by_integer(total_wall, the_stats.count, &wall_average); (*print)( context, 470dc: 2c3c 0000 03e8 movel #1000,%d6 struct timespec *min_cpu = &the_stats.min_cpu_time; struct timespec *max_cpu = &the_stats.max_cpu_time; struct timespec *total_cpu = &the_stats.total_cpu_time; _Timespec_Divide_by_integer( total_cpu, the_stats.count, &cpu_average ); (*print)( context, 470e2: 2f00 movel %d0,%sp@- 470e4: 2f2e ffaa movel %fp@(-86),%sp@- 470e8: 4879 0005 e6b7 pea 5e6b7 470ee: 2f03 movel %d3,%sp@- 470f0: 4e92 jsr %a2@ struct timespec wall_average; struct timespec *min_wall = &the_stats.min_wall_time; struct timespec *max_wall = &the_stats.max_wall_time; struct timespec *total_wall = &the_stats.total_wall_time; _Timespec_Divide_by_integer(total_wall, the_stats.count, &wall_average); 470f2: 4fef 002c lea %sp@(44),%sp 470f6: 2047 moveal %d7,%a0 470f8: 486e fff2 pea %fp@(-14) 470fc: 2f2e ffa2 movel %fp@(-94),%sp@- 47100: 486e ffd2 pea %fp@(-46) 47104: 4e90 jsr %a0@ (*print)( context, 47106: 202e fff6 movel %fp@(-10),%d0 4710a: 4c46 0800 remsl %d6,%d0,%d0 4710e: 222e ffce movel %fp@(-50),%d1 47112: 2f00 movel %d0,%sp@- 47114: 2f2e fff2 movel %fp@(-14),%sp@- 47118: 4c46 1801 remsl %d6,%d1,%d1 4711c: 202e ffc6 movel %fp@(-58),%d0 47120: 2241 moveal %d1,%a1 47122: 2f09 movel %a1,%sp@- 47124: 2f2e ffca movel %fp@(-54),%sp@- 47128: 4c46 0800 remsl %d6,%d0,%d0 4712c: 2f00 movel %d0,%sp@- 4712e: 2f2e ffc2 movel %fp@(-62),%sp@- 47132: 4879 0005 e6d6 pea 5e6d6 47138: 2f03 movel %d3,%sp@- 4713a: 4e92 jsr %a2@ 4713c: 4fef 002c lea %sp@(44),%sp /* * Cycle through all possible ids and try to report on each one. If it * is a period that is inactive, we just get an error back. No big deal. */ for ( id=_Rate_monotonic_Information.minimum_id ; 47140: b4b9 0006 0fca cmpl 60fca <_Rate_monotonic_Information+0xa>,%d2 47146: 6300 fee4 blsw 4702c 4714a: 6000 fef6 braw 47042 <== NOT EXECUTED =============================================================================== 00047168 : /* * rtems_rate_monotonic_reset_all_statistics */ void rtems_rate_monotonic_reset_all_statistics( void ) { 47168: 4e56 0000 linkw %fp,#0 4716c: 2039 0006 10c4 movel 610c4 <_Thread_Dispatch_disable_level>,%d0 47172: 5280 addql #1,%d0 47174: 2f0a movel %a2,%sp@- 47176: 23c0 0006 10c4 movel %d0,610c4 <_Thread_Dispatch_disable_level> 4717c: 2f02 movel %d2,%sp@- /* * Cycle through all possible ids and try to reset each one. If it * is a period that is inactive, we just get an error back. No big deal. */ for ( id=_Rate_monotonic_Information.minimum_id ; 4717e: 2439 0006 0fc6 movel 60fc6 <_Rate_monotonic_Information+0x6>,%d2 47184: b4b9 0006 0fca cmpl 60fca <_Rate_monotonic_Information+0xa>,%d2 4718a: 6216 bhis 471a2 <== NEVER TAKEN 4718c: 45f9 0004 71b4 lea 471b4 ,%a2 id <= _Rate_monotonic_Information.maximum_id ; id++ ) { status = rtems_rate_monotonic_reset_statistics( id ); 47192: 2f02 movel %d2,%sp@- * Cycle through all possible ids and try to reset each one. If it * is a period that is inactive, we just get an error back. No big deal. */ for ( id=_Rate_monotonic_Information.minimum_id ; id <= _Rate_monotonic_Information.maximum_id ; id++ ) { 47194: 5282 addql #1,%d2 status = rtems_rate_monotonic_reset_statistics( id ); 47196: 4e92 jsr %a2@ /* * Cycle through all possible ids and try to reset each one. If it * is a period that is inactive, we just get an error back. No big deal. */ for ( id=_Rate_monotonic_Information.minimum_id ; 47198: 588f addql #4,%sp 4719a: b4b9 0006 0fca cmpl 60fca <_Rate_monotonic_Information+0xa>,%d2 471a0: 63f0 blss 47192 /* * Done so exit thread dispatching disabled critical section. */ _Thread_Enable_dispatch(); } 471a2: 242e fff8 movel %fp@(-8),%d2 471a6: 246e fffc moveal %fp@(-4),%a2 471aa: 4e5e unlk %fp } /* * Done so exit thread dispatching disabled critical section. */ _Thread_Enable_dispatch(); 471ac: 4ef9 0004 9904 jmp 49904 <_Thread_Enable_dispatch> ... =============================================================================== 00057468 : uintptr_t length, uintptr_t page_size, rtems_attribute attribute_set, rtems_id *id ) { 57468: 4e56 ffec linkw %fp,#-20 5746c: 48d7 0c0c moveml %d2-%d3/%a2-%a3,%sp@ 57470: 262e 0008 movel %fp@(8),%d3 57474: 242e 000c movel %fp@(12),%d2 57478: 246e 001c moveal %fp@(28),%a2 rtems_status_code return_status; Region_Control *the_region; if ( !rtems_is_name_valid( name ) ) 5747c: 4a83 tstl %d3 5747e: 6700 0096 beqw 57516 return RTEMS_INVALID_NAME; if ( !starting_address ) 57482: 4a82 tstl %d2 57484: 670a beqs 57490 return RTEMS_INVALID_ADDRESS; if ( !id ) 57486: 4a8a tstl %a2 57488: 6706 beqs 57490 return RTEMS_INVALID_ADDRESS; if ( !_Addresses_Is_aligned( starting_address ) ) 5748a: 7003 moveq #3,%d0 5748c: c082 andl %d2,%d0 5748e: 670c beqs 5749c return_status = RTEMS_SUCCESSFUL; } } _RTEMS_Unlock_allocator(); return return_status; 57490: 7009 moveq #9,%d0 } 57492: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 57498: 4e5e unlk %fp 5749a: 4e75 rts return RTEMS_INVALID_ADDRESS; if ( !_Addresses_Is_aligned( starting_address ) ) return RTEMS_INVALID_ADDRESS; _RTEMS_Lock_allocator(); /* to prevent deletion */ 5749c: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- 574a2: 4eb9 0005 9e3c jsr 59e3c <_API_Mutex_Lock> * This function allocates a region control block from * the inactive chain of free region control blocks. */ RTEMS_INLINE_ROUTINE Region_Control *_Region_Allocate( void ) { return (Region_Control *) _Objects_Allocate( &_Region_Information ); 574a8: 4879 0007 e6ca pea 7e6ca <_Region_Information> 574ae: 4eb9 0005 b4cc jsr 5b4cc <_Objects_Allocate> the_region = _Region_Allocate(); if ( !the_region ) 574b4: 508f addql #8,%sp 574b6: 2640 moveal %d0,%a3 574b8: 4a80 tstl %d0 574ba: 6766 beqs 57522 return_status = RTEMS_TOO_MANY; else { the_region->maximum_segment_size = _Heap_Initialize( 574bc: 2f2e 0014 movel %fp@(20),%sp@- 574c0: 2f2e 0010 movel %fp@(16),%sp@- 574c4: 2f02 movel %d2,%sp@- 574c6: 486b 0068 pea %a3@(104) 574ca: 4eb9 0005 af50 jsr 5af50 <_Heap_Initialize> &the_region->Memory, starting_address, length, page_size ); if ( !the_region->maximum_segment_size ) { 574d0: 4fef 0010 lea %sp@(16),%sp if ( !the_region ) return_status = RTEMS_TOO_MANY; else { the_region->maximum_segment_size = _Heap_Initialize( 574d4: 2740 005c movel %d0,%a3@(92) &the_region->Memory, starting_address, length, page_size ); if ( !the_region->maximum_segment_size ) { 574d8: 6662 bnes 5753c */ RTEMS_INLINE_ROUTINE void _Region_Free ( Region_Control *the_region ) { _Objects_Free( &_Region_Information, &the_region->Object ); 574da: 2f0b movel %a3,%sp@- 574dc: 4879 0007 e6ca pea 7e6ca <_Region_Information> 574e2: 103c 0008 moveb #8,%d0 574e6: 2d40 fffc movel %d0,%fp@(-4) 574ea: 4eb9 0005 b804 jsr 5b804 <_Objects_Free> 574f0: 202e fffc movel %fp@(-4),%d0 574f4: 508f addql #8,%sp *id = the_region->Object.id; return_status = RTEMS_SUCCESSFUL; } } _RTEMS_Unlock_allocator(); 574f6: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- 574fc: 2d40 fffc movel %d0,%fp@(-4) 57500: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> return return_status; 57506: 202e fffc movel %fp@(-4),%d0 5750a: 588f addql #4,%sp } 5750c: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 57512: 4e5e unlk %fp 57514: 4e75 rts ) { rtems_status_code return_status; Region_Control *the_region; if ( !rtems_is_name_valid( name ) ) 57516: 7003 moveq #3,%d0 } } _RTEMS_Unlock_allocator(); return return_status; } 57518: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 5751e: 4e5e unlk %fp 57520: 4e75 rts *id = the_region->Object.id; return_status = RTEMS_SUCCESSFUL; } } _RTEMS_Unlock_allocator(); 57522: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- _RTEMS_Lock_allocator(); /* to prevent deletion */ the_region = _Region_Allocate(); if ( !the_region ) 57528: 7005 moveq #5,%d0 *id = the_region->Object.id; return_status = RTEMS_SUCCESSFUL; } } _RTEMS_Unlock_allocator(); 5752a: 2d40 fffc movel %d0,%fp@(-4) 5752e: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> return return_status; 57534: 202e fffc movel %fp@(-4),%d0 57538: 588f addql #4,%sp 5753a: 60d0 bras 5750c return_status = RTEMS_INVALID_SIZE; } else { the_region->starting_address = starting_address; 5753c: 2742 0050 movel %d2,%a3@(80) the_region->length = length; the_region->page_size = page_size; the_region->attribute_set = attribute_set; the_region->number_of_used_blocks = 0; _Thread_queue_Initialize( 57540: 222e 0018 movel %fp@(24),%d1 } else { the_region->starting_address = starting_address; the_region->length = length; 57544: 202e 0010 movel %fp@(16),%d0 the_region->page_size = page_size; the_region->attribute_set = attribute_set; the_region->number_of_used_blocks = 0; _Thread_queue_Initialize( 57548: e489 lsrl #2,%d1 else { the_region->starting_address = starting_address; the_region->length = length; the_region->page_size = page_size; 5754a: 242e 0014 movel %fp@(20),%d2 the_region->attribute_set = attribute_set; 5754e: 206e 0018 moveal %fp@(24),%a0 } else { the_region->starting_address = starting_address; the_region->length = length; 57552: 2740 0054 movel %d0,%a3@(84) &_Region_Information, &the_region->Object, (Objects_Name) name ); *id = the_region->Object.id; 57556: 4280 clrl %d0 else { the_region->starting_address = starting_address; the_region->length = length; the_region->page_size = page_size; 57558: 2742 0058 movel %d2,%a3@(88) the_region->attribute_set = attribute_set; the_region->number_of_used_blocks = 0; _Thread_queue_Initialize( 5755c: 7401 moveq #1,%d2 else { the_region->starting_address = starting_address; the_region->length = length; the_region->page_size = page_size; the_region->attribute_set = attribute_set; 5755e: 2748 0060 movel %a0,%a3@(96) the_region->number_of_used_blocks = 0; _Thread_queue_Initialize( 57562: c481 andl %d1,%d2 the_region->starting_address = starting_address; the_region->length = length; the_region->page_size = page_size; the_region->attribute_set = attribute_set; the_region->number_of_used_blocks = 0; 57564: 42ab 0064 clrl %a3@(100) _Thread_queue_Initialize( 57568: 4878 0006 pea 6 5756c: 4878 0040 pea 40 57570: 2f02 movel %d2,%sp@- 57572: 486b 0010 pea %a3@(16) #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 57576: 4282 clrl %d2 57578: 2d40 fffc movel %d0,%fp@(-4) 5757c: 4eb9 0005 cac8 jsr 5cac8 <_Thread_queue_Initialize> 57582: 222b 0008 movel %a3@(8),%d1 &_Region_Information, &the_region->Object, (Objects_Name) name ); *id = the_region->Object.id; 57586: 4fef 0010 lea %sp@(16),%sp 5758a: 2079 0007 e6e2 moveal 7e6e2 <_Region_Information+0x18>,%a0 57590: 3401 movew %d1,%d2 information, _Objects_Get_index( the_object->id ), the_object ); the_object->name = name; 57592: 2743 000c movel %d3,%a3@(12) 57596: 202e fffc movel %fp@(-4),%d0 #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 5759a: 218b 2c00 movel %a3,%a0@(00000000,%d2:l:4) 5759e: 2481 movel %d1,%a2@ return_status = RTEMS_SUCCESSFUL; } } _RTEMS_Unlock_allocator(); 575a0: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- 575a6: 2d40 fffc movel %d0,%fp@(-4) 575aa: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> return return_status; 575b0: 202e fffc movel %fp@(-4),%d0 575b4: 588f addql #4,%sp 575b6: 6000 ff54 braw 5750c ... =============================================================================== 0005766c : rtems_status_code rtems_region_extend( rtems_id id, void *starting_address, uintptr_t length ) { 5766c: 4e56 fff8 linkw %fp,#-8 57670: 2f0a movel %a2,%sp@- 57672: 2f02 movel %d2,%sp@- 57674: 242e 000c movel %fp@(12),%d2 Heap_Extend_status heap_status; Objects_Locations location; rtems_status_code return_status; Region_Control *the_region; if ( !starting_address ) 57678: 677e beqs 576f8 return RTEMS_INVALID_ADDRESS; _RTEMS_Lock_allocator(); /* to prevent deletion */ 5767a: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- 57680: 4eb9 0005 9e3c jsr 59e3c <_API_Mutex_Lock> RTEMS_INLINE_ROUTINE Region_Control *_Region_Get ( Objects_Id id, Objects_Locations *location ) { return (Region_Control *) 57686: 486e fff8 pea %fp@(-8) 5768a: 2f2e 0008 movel %fp@(8),%sp@- 5768e: 4879 0007 e6ca pea 7e6ca <_Region_Information> 57694: 4eb9 0005 b968 jsr 5b968 <_Objects_Get_no_protection> the_region = _Region_Get( id, &location ); switch ( location ) { 5769a: 4fef 0010 lea %sp@(16),%sp 5769e: 2440 moveal %d0,%a2 576a0: 4aae fff8 tstl %fp@(-8) 576a4: 6640 bnes 576e6 case OBJECTS_LOCAL: heap_status = _Heap_Extend( 576a6: 486e fffc pea %fp@(-4) 576aa: 2f2e 0010 movel %fp@(16),%sp@- 576ae: 2f02 movel %d2,%sp@- 576b0: 486a 0068 pea %a2@(104) 576b4: 4eb9 0005 ac40 jsr 5ac40 <_Heap_Extend> starting_address, length, &amount_extended ); if ( heap_status == HEAP_EXTEND_SUCCESSFUL ) { 576ba: 4fef 0010 lea %sp@(16),%sp 576be: 4a80 tstl %d0 576c0: 6748 beqs 5770a the_region->length += amount_extended; the_region->maximum_segment_size += amount_extended; return_status = RTEMS_SUCCESSFUL; } else if ( heap_status == HEAP_EXTEND_ERROR ) { 576c2: 7201 moveq #1,%d1 576c4: b280 cmpl %d0,%d1 576c6: 6760 beqs 57728 default: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 576c8: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- if ( heap_status == HEAP_EXTEND_SUCCESSFUL ) { the_region->length += amount_extended; the_region->maximum_segment_size += amount_extended; return_status = RTEMS_SUCCESSFUL; } else if ( heap_status == HEAP_EXTEND_ERROR ) { 576ce: 7418 moveq #24,%d2 default: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 576d0: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> return return_status; 576d6: 588f addql #4,%sp } 576d8: 2002 movel %d2,%d0 576da: 242e fff0 movel %fp@(-16),%d2 576de: 246e fff4 moveal %fp@(-12),%a2 576e2: 4e5e unlk %fp 576e4: 4e75 rts default: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 576e6: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- return RTEMS_INVALID_ADDRESS; _RTEMS_Lock_allocator(); /* to prevent deletion */ the_region = _Region_Get( id, &location ); switch ( location ) { 576ec: 7404 moveq #4,%d2 default: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 576ee: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> return return_status; 576f4: 588f addql #4,%sp 576f6: 60e0 bras 576d8 Heap_Extend_status heap_status; Objects_Locations location; rtems_status_code return_status; Region_Control *the_region; if ( !starting_address ) 576f8: 143c 0009 moveb #9,%d2 break; } _RTEMS_Unlock_allocator(); return return_status; } 576fc: 2002 movel %d2,%d0 576fe: 242e fff0 movel %fp@(-16),%d2 57702: 246e fff4 moveal %fp@(-12),%a2 57706: 4e5e unlk %fp 57708: 4e75 rts length, &amount_extended ); if ( heap_status == HEAP_EXTEND_SUCCESSFUL ) { the_region->length += amount_extended; 5770a: 202e fffc movel %fp@(-4),%d0 the_region->maximum_segment_size += amount_extended; 5770e: d1aa 005c addl %d0,%a2@(92) 57712: 4282 clrl %d2 length, &amount_extended ); if ( heap_status == HEAP_EXTEND_SUCCESSFUL ) { the_region->length += amount_extended; 57714: d1aa 0054 addl %d0,%a2@(84) default: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 57718: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- 5771e: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> return return_status; 57724: 588f addql #4,%sp 57726: 60b0 bras 576d8 default: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 57728: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- if ( heap_status == HEAP_EXTEND_SUCCESSFUL ) { the_region->length += amount_extended; the_region->maximum_segment_size += amount_extended; return_status = RTEMS_SUCCESSFUL; } else if ( heap_status == HEAP_EXTEND_ERROR ) { 5772e: 7409 moveq #9,%d2 default: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 57730: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> return return_status; 57736: 588f addql #4,%sp 57738: 609e bras 576d8 ... =============================================================================== 000577d4 : rtems_status_code rtems_region_get_information( rtems_id id, Heap_Information_block *the_info ) { 577d4: 4e56 fffc linkw %fp,#-4 577d8: 2f02 movel %d2,%sp@- 577da: 242e 000c movel %fp@(12),%d2 Objects_Locations location; rtems_status_code return_status; register Region_Control *the_region; if ( !the_info ) 577de: 6766 beqs 57846 <== NEVER TAKEN return RTEMS_INVALID_ADDRESS; _RTEMS_Lock_allocator(); 577e0: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- 577e6: 4eb9 0005 9e3c jsr 59e3c <_API_Mutex_Lock> 577ec: 486e fffc pea %fp@(-4) 577f0: 2f2e 0008 movel %fp@(8),%sp@- 577f4: 4879 0007 e6ca pea 7e6ca <_Region_Information> 577fa: 4eb9 0005 b968 jsr 5b968 <_Objects_Get_no_protection> the_region = _Region_Get( id, &location ); switch ( location ) { 57800: 4fef 0010 lea %sp@(16),%sp 57804: 4aae fffc tstl %fp@(-4) 57808: 662a bnes 57834 case OBJECTS_LOCAL: _Heap_Get_information( &the_region->Memory, the_info ); 5780a: 2f02 movel %d2,%sp@- 5780c: 2040 moveal %d0,%a0 5780e: 4868 0068 pea %a0@(104) 57812: 4282 clrl %d2 57814: 4eb9 0005 aec8 jsr 5aec8 <_Heap_Get_information> return_status = RTEMS_SUCCESSFUL; break; 5781a: 508f addql #8,%sp default: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 5781c: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- 57822: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> return return_status; 57828: 588f addql #4,%sp } 5782a: 2002 movel %d2,%d0 5782c: 242e fff8 movel %fp@(-8),%d2 57830: 4e5e unlk %fp 57832: 4e75 rts default: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 57834: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- return RTEMS_INVALID_ADDRESS; _RTEMS_Lock_allocator(); the_region = _Region_Get( id, &location ); switch ( location ) { 5783a: 7404 moveq #4,%d2 default: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 5783c: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> return return_status; 57842: 588f addql #4,%sp 57844: 60e4 bras 5782a { Objects_Locations location; rtems_status_code return_status; register Region_Control *the_region; if ( !the_info ) 57846: 143c 0009 moveb #9,%d2 break; } _RTEMS_Unlock_allocator(); return return_status; } 5784a: 2002 movel %d2,%d0 5784c: 242e fff8 movel %fp@(-8),%d2 57850: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 000579c0 : rtems_status_code rtems_region_get_segment_size( rtems_id id, void *segment, uintptr_t *size ) { 579c0: 4e56 fffc linkw %fp,#-4 579c4: 2f03 movel %d3,%sp@- 579c6: 262e 0010 movel %fp@(16),%d3 579ca: 2f02 movel %d2,%sp@- 579cc: 242e 000c movel %fp@(12),%d2 Objects_Locations location; rtems_status_code return_status = RTEMS_SUCCESSFUL; register Region_Control *the_region; if ( !segment ) 579d0: 6700 0092 beqw 57a64 return RTEMS_INVALID_ADDRESS; if ( !size ) 579d4: 4a83 tstl %d3 579d6: 6700 008c beqw 57a64 return RTEMS_INVALID_ADDRESS; _RTEMS_Lock_allocator(); 579da: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- 579e0: 4eb9 0005 9e3c jsr 59e3c <_API_Mutex_Lock> 579e6: 486e fffc pea %fp@(-4) 579ea: 2f2e 0008 movel %fp@(8),%sp@- 579ee: 4879 0007 e6ca pea 7e6ca <_Region_Information> 579f4: 4eb9 0005 b968 jsr 5b968 <_Objects_Get_no_protection> the_region = _Region_Get( id, &location ); switch ( location ) { 579fa: 222e fffc movel %fp@(-4),%d1 579fe: 4fef 0010 lea %sp@(16),%sp 57a02: 6636 bnes 57a3a case OBJECTS_LOCAL: if ( !_Heap_Size_of_alloc_area( &the_region->Memory, segment, size ) ) 57a04: 2f03 movel %d3,%sp@- 57a06: 2040 moveal %d0,%a0 57a08: 2f02 movel %d2,%sp@- 57a0a: 4868 0068 pea %a0@(104) 57a0e: 4eb9 0005 b3a4 jsr 5b3a4 <_Heap_Size_of_alloc_area> 57a14: 4fef 000c lea %sp@(12),%sp 57a18: 4a00 tstb %d0 57a1a: 6624 bnes 57a40 <== ALWAYS TAKEN case OBJECTS_ERROR: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 57a1c: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- <== NOT EXECUTED the_region = _Region_Get( id, &location ); switch ( location ) { case OBJECTS_LOCAL: if ( !_Heap_Size_of_alloc_area( &the_region->Memory, segment, size ) ) 57a22: 7409 moveq #9,%d2 <== NOT EXECUTED case OBJECTS_ERROR: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 57a24: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> <== NOT EXECUTED return return_status; 57a2a: 588f addql #4,%sp <== NOT EXECUTED } 57a2c: 2002 movel %d2,%d0 57a2e: 242e fff4 movel %fp@(-12),%d2 57a32: 262e fff8 movel %fp@(-8),%d3 57a36: 4e5e unlk %fp 57a38: 4e75 rts return RTEMS_INVALID_ADDRESS; _RTEMS_Lock_allocator(); the_region = _Region_Get( id, &location ); switch ( location ) { 57a3a: 7001 moveq #1,%d0 57a3c: b081 cmpl %d1,%d0 57a3e: 6712 beqs 57a52 <== ALWAYS TAKEN case OBJECTS_ERROR: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 57a40: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- the_region = _Region_Get( id, &location ); switch ( location ) { case OBJECTS_LOCAL: if ( !_Heap_Size_of_alloc_area( &the_region->Memory, segment, size ) ) 57a46: 4282 clrl %d2 case OBJECTS_ERROR: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 57a48: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> return return_status; 57a4e: 588f addql #4,%sp 57a50: 60da bras 57a2c case OBJECTS_ERROR: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 57a52: 2f39 0007 e87e movel 7e87e <_RTEMS_Allocator_Mutex>,%sp@- return RTEMS_INVALID_ADDRESS; _RTEMS_Lock_allocator(); the_region = _Region_Get( id, &location ); switch ( location ) { 57a58: 7404 moveq #4,%d2 case OBJECTS_ERROR: return_status = RTEMS_INVALID_ID; break; } _RTEMS_Unlock_allocator(); 57a5a: 4eb9 0005 9e9c jsr 59e9c <_API_Mutex_Unlock> return return_status; 57a60: 588f addql #4,%sp 57a62: 60c8 bras 57a2c 57a64: 7409 moveq #9,%d2 } 57a66: 2002 movel %d2,%d0 57a68: 242e fff4 movel %fp@(-12),%d2 57a6c: 262e fff8 movel %fp@(-8),%d3 57a70: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00045a8c : uint32_t count, rtems_attribute attribute_set, rtems_task_priority priority_ceiling, rtems_id *id ) { 45a8c: 4e56 ffd4 linkw %fp,#-44 45a90: 48d7 0c1c moveml %d2-%d4/%a2-%a3,%sp@ 45a94: 262e 0008 movel %fp@(8),%d3 45a98: 242e 0010 movel %fp@(16),%d2 45a9c: 246e 0018 moveal %fp@(24),%a2 register Semaphore_Control *the_semaphore; CORE_mutex_Attributes the_mutex_attr; CORE_semaphore_Attributes the_semaphore_attr; CORE_mutex_Status mutex_status; if ( !rtems_is_name_valid( name ) ) 45aa0: 4a83 tstl %d3 45aa2: 6748 beqs 45aec return RTEMS_INVALID_NAME; if ( !id ) 45aa4: 4a8a tstl %a2 45aa6: 6700 00ea beqw 45b92 * id - semaphore id * RTEMS_SUCCESSFUL - if successful * error code - if unsuccessful */ rtems_status_code rtems_semaphore_create( 45aaa: 2002 movel %d2,%d0 45aac: 0280 0000 00c0 andil #192,%d0 return RTEMS_NOT_DEFINED; } else #endif if ( _Attributes_Is_inherit_priority( attribute_set ) || 45ab2: 6744 beqs 45af8 _Attributes_Is_priority_ceiling( attribute_set ) ) { if ( ! (_Attributes_Is_binary_semaphore( attribute_set ) && 45ab4: 7230 moveq #48,%d1 45ab6: 7810 moveq #16,%d4 45ab8: c282 andl %d2,%d1 45aba: b881 cmpl %d1,%d4 45abc: 670c beqs 45aca name, 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; 45abe: 700b moveq #11,%d0 } 45ac0: 4cee 0c1c ffd4 moveml %fp@(-44),%d2-%d4/%a2-%a3 45ac6: 4e5e unlk %fp 45ac8: 4e75 rts #endif if ( _Attributes_Is_inherit_priority( attribute_set ) || _Attributes_Is_priority_ceiling( attribute_set ) ) { if ( ! (_Attributes_Is_binary_semaphore( attribute_set ) && 45aca: 44c2 movew %d2,%ccr 45acc: 66f0 bnes 45abe _Attributes_Is_priority( attribute_set ) ) ) return RTEMS_NOT_DEFINED; } if ( _Attributes_Is_inherit_priority( attribute_set ) && 45ace: 0c80 0000 00c0 cmpil #192,%d0 45ad4: 67e8 beqs 45abe _Attributes_Is_priority_ceiling( attribute_set ) ) return RTEMS_NOT_DEFINED; if ( !_Attributes_Is_counting_semaphore( attribute_set ) && ( count > 1 ) ) 45ad6: 7001 moveq #1,%d0 45ad8: b0ae 000c cmpl %fp@(12),%d0 45adc: 6420 bccs 45afe 45ade: 103c 000a moveb #10,%d0 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 45ae2: 4cee 0c1c ffd4 moveml %fp@(-44),%d2-%d4/%a2-%a3 45ae8: 4e5e unlk %fp 45aea: 4e75 rts register Semaphore_Control *the_semaphore; CORE_mutex_Attributes the_mutex_attr; CORE_semaphore_Attributes the_semaphore_attr; CORE_mutex_Status mutex_status; if ( !rtems_is_name_valid( name ) ) 45aec: 7003 moveq #3,%d0 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 45aee: 4cee 0c1c ffd4 moveml %fp@(-44),%d2-%d4/%a2-%a3 45af4: 4e5e unlk %fp 45af6: 4e75 rts */ RTEMS_INLINE_ROUTINE bool _Attributes_Is_counting_semaphore( rtems_attribute attribute_set ) { return ((attribute_set & RTEMS_SEMAPHORE_CLASS) == RTEMS_COUNTING_SEMAPHORE); 45af8: 7830 moveq #48,%d4 45afa: c882 andl %d2,%d4 if ( _Attributes_Is_inherit_priority( attribute_set ) && _Attributes_Is_priority_ceiling( attribute_set ) ) return RTEMS_NOT_DEFINED; if ( !_Attributes_Is_counting_semaphore( attribute_set ) && ( count > 1 ) ) 45afc: 66d8 bnes 45ad6 rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 45afe: 2039 0005 ef78 movel 5ef78 <_Thread_Dispatch_disable_level>,%d0 45b04: 5280 addql #1,%d0 45b06: 23c0 0005 ef78 movel %d0,5ef78 <_Thread_Dispatch_disable_level> * This function allocates a semaphore control block from * the inactive chain of free semaphore control blocks. */ RTEMS_INLINE_ROUTINE Semaphore_Control *_Semaphore_Allocate( void ) { return (Semaphore_Control *) _Objects_Allocate( &_Semaphore_Information ); 45b0c: 4879 0005 eeb0 pea 5eeb0 <_Semaphore_Information> 45b12: 4eb9 0004 7090 jsr 47090 <_Objects_Allocate> _Thread_Disable_dispatch(); /* prevents deletion */ the_semaphore = _Semaphore_Allocate(); if ( !the_semaphore ) { 45b18: 588f addql #4,%sp 45b1a: 2640 moveal %d0,%a3 45b1c: 4a80 tstl %d0 45b1e: 6700 00d8 beqw 45bf8 _Thread_Enable_dispatch(); return RTEMS_TOO_MANY; } #endif the_semaphore->attribute_set = attribute_set; 45b22: 2742 0010 movel %d2,%a3@(16) /* * Initialize it as a counting semaphore. */ if ( _Attributes_Is_counting_semaphore( attribute_set ) ) { 45b26: 4a84 tstl %d4 45b28: 6774 beqs 45b9e /* * It is either simple binary semaphore or a more powerful mutex * style binary semaphore. This is the mutex style. */ if ( _Attributes_Is_priority( attribute_set ) ) the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_PRIORITY; 45b2a: 44c2 movew %d2,%ccr 45b2c: 56c0 sne %d0 45b2e: 49c0 extbl %d0 45b30: 5280 addql #1,%d0 45b32: 2d40 fff0 movel %d0,%fp@(-16) else the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_FIFO; if ( _Attributes_Is_binary_semaphore( attribute_set ) ) { 45b36: 7010 moveq #16,%d0 45b38: b084 cmpl %d4,%d0 45b3a: 6700 00ce beqw 45c0a the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_PRIORITY_CEILING; the_mutex_attr.only_owner_release = true; } } } else /* must be simple binary semaphore */ { the_mutex_attr.lock_nesting_behavior = CORE_MUTEX_NESTING_BLOCKS; 45b3e: 7202 moveq #2,%d1 the_mutex_attr.only_owner_release = false; 45b40: 4204 clrb %d4 the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_PRIORITY_CEILING; the_mutex_attr.only_owner_release = true; } } } else /* must be simple binary semaphore */ { the_mutex_attr.lock_nesting_behavior = CORE_MUTEX_NESTING_BLOCKS; 45b42: 2d41 ffea movel %d1,%fp@(-22) the_mutex_attr.only_owner_release = false; 45b46: 1d44 ffee moveb %d4,%fp@(-18) } mutex_status = _CORE_mutex_Initialize( 45b4a: 7001 moveq #1,%d0 45b4c: b0ae 000c cmpl %fp@(12),%d0 45b50: 57c0 seq %d0 45b52: 49c0 extbl %d0 45b54: 4480 negl %d0 45b56: 2f00 movel %d0,%sp@- 45b58: 486e ffea pea %fp@(-22) 45b5c: 486b 0014 pea %a3@(20) 45b60: 4eb9 0004 67dc jsr 467dc <_CORE_mutex_Initialize> &the_semaphore->Core_control.mutex, &the_mutex_attr, (count == 1) ? CORE_MUTEX_UNLOCKED : CORE_MUTEX_LOCKED ); if ( mutex_status == CORE_MUTEX_STATUS_CEILING_VIOLATED ) { 45b66: 4fef 000c lea %sp@(12),%sp 45b6a: 7206 moveq #6,%d1 45b6c: b280 cmpl %d0,%d1 45b6e: 665e bnes 45bce */ RTEMS_INLINE_ROUTINE void _Semaphore_Free ( Semaphore_Control *the_semaphore ) { _Objects_Free( &_Semaphore_Information, &the_semaphore->Object ); 45b70: 2f0b movel %a3,%sp@- 45b72: 4879 0005 eeb0 pea 5eeb0 <_Semaphore_Information> 45b78: 4eb9 0004 73c8 jsr 473c8 <_Objects_Free> _Semaphore_Free( the_semaphore ); _Thread_Enable_dispatch(); 45b7e: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> return RTEMS_INVALID_PRIORITY; 45b84: 508f addql #8,%sp (count == 1) ? CORE_MUTEX_UNLOCKED : CORE_MUTEX_LOCKED ); if ( mutex_status == CORE_MUTEX_STATUS_CEILING_VIOLATED ) { _Semaphore_Free( the_semaphore ); _Thread_Enable_dispatch(); 45b86: 7013 moveq #19,%d0 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 45b88: 4cee 0c1c ffd4 moveml %fp@(-44),%d2-%d4/%a2-%a3 45b8e: 4e5e unlk %fp 45b90: 4e75 rts CORE_mutex_Status mutex_status; if ( !rtems_is_name_valid( name ) ) return RTEMS_INVALID_NAME; if ( !id ) 45b92: 7009 moveq #9,%d0 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 45b94: 4cee 0c1c ffd4 moveml %fp@(-44),%d2-%d4/%a2-%a3 45b9a: 4e5e unlk %fp 45b9c: 4e75 rts * The following are just to make Purify happy. */ the_mutex_attr.lock_nesting_behavior = CORE_MUTEX_NESTING_ACQUIRES; the_mutex_attr.priority_ceiling = PRIORITY_MINIMUM; _CORE_semaphore_Initialize( 45b9e: 2f2e 000c movel %fp@(12),%sp@- */ if ( _Attributes_Is_counting_semaphore( attribute_set ) ) { /* * This effectively disables limit checking. */ the_semaphore_attr.maximum_count = 0xFFFFFFFF; 45ba2: 72ff moveq #-1,%d1 * The following are just to make Purify happy. */ the_mutex_attr.lock_nesting_behavior = CORE_MUTEX_NESTING_ACQUIRES; the_mutex_attr.priority_ceiling = PRIORITY_MINIMUM; _CORE_semaphore_Initialize( 45ba4: 486e fff8 pea %fp@(-8) 45ba8: 486b 0014 pea %a3@(20) * This effectively disables limit checking. */ the_semaphore_attr.maximum_count = 0xFFFFFFFF; if ( _Attributes_Is_priority( attribute_set ) ) the_semaphore_attr.discipline = CORE_SEMAPHORE_DISCIPLINES_PRIORITY; 45bac: 44c2 movew %d2,%ccr 45bae: 56c0 sne %d0 */ if ( _Attributes_Is_counting_semaphore( attribute_set ) ) { /* * This effectively disables limit checking. */ the_semaphore_attr.maximum_count = 0xFFFFFFFF; 45bb0: 2d41 fff8 movel %d1,%fp@(-8) if ( _Attributes_Is_priority( attribute_set ) ) the_semaphore_attr.discipline = CORE_SEMAPHORE_DISCIPLINES_PRIORITY; 45bb4: 49c0 extbl %d0 45bb6: 5280 addql #1,%d0 the_semaphore_attr.discipline = CORE_SEMAPHORE_DISCIPLINES_FIFO; /* * The following are just to make Purify happy. */ the_mutex_attr.lock_nesting_behavior = CORE_MUTEX_NESTING_ACQUIRES; 45bb8: 42ae ffea clrl %fp@(-22) * This effectively disables limit checking. */ the_semaphore_attr.maximum_count = 0xFFFFFFFF; if ( _Attributes_Is_priority( attribute_set ) ) the_semaphore_attr.discipline = CORE_SEMAPHORE_DISCIPLINES_PRIORITY; 45bbc: 2d40 fffc movel %d0,%fp@(-4) /* * The following are just to make Purify happy. */ the_mutex_attr.lock_nesting_behavior = CORE_MUTEX_NESTING_ACQUIRES; the_mutex_attr.priority_ceiling = PRIORITY_MINIMUM; 45bc0: 42ae fff4 clrl %fp@(-12) _CORE_semaphore_Initialize( 45bc4: 4eb9 0004 6b24 jsr 46b24 <_CORE_semaphore_Initialize> 45bca: 4fef 000c lea %sp@(12),%sp #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 45bce: 202b 0008 movel %a3@(8),%d0 45bd2: 4281 clrl %d1 45bd4: 2079 0005 eec8 moveal 5eec8 <_Semaphore_Information+0x18>,%a0 45bda: 3200 movew %d0,%d1 information, _Objects_Get_index( the_object->id ), the_object ); the_object->name = name; 45bdc: 2743 000c movel %d3,%a3@(12) #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 45be0: 218b 1c00 movel %a3,%a0@(00000000,%d1:l:4) &_Semaphore_Information, &the_semaphore->Object, (Objects_Name) name ); *id = the_semaphore->Object.id; 45be4: 2480 movel %d0,%a2@ the_semaphore->Object.id, name, 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); 45be6: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; } 45bec: 4cee 0c1c ffd4 moveml %fp@(-44),%d2-%d4/%a2-%a3 the_semaphore->Object.id, name, 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); 45bf2: 4280 clrl %d0 return RTEMS_SUCCESSFUL; } 45bf4: 4e5e unlk %fp 45bf6: 4e75 rts _Thread_Disable_dispatch(); /* prevents deletion */ the_semaphore = _Semaphore_Allocate(); if ( !the_semaphore ) { _Thread_Enable_dispatch(); 45bf8: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> 45bfe: 7005 moveq #5,%d0 0 /* Not used */ ); #endif _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 45c00: 4cee 0c1c ffd4 moveml %fp@(-44),%d2-%d4/%a2-%a3 45c06: 4e5e unlk %fp 45c08: 4e75 rts else the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_FIFO; if ( _Attributes_Is_binary_semaphore( attribute_set ) ) { the_mutex_attr.priority_ceiling = priority_ceiling; the_mutex_attr.lock_nesting_behavior = CORE_MUTEX_NESTING_ACQUIRES; 45c0a: 42ae ffea clrl %fp@(-22) the_mutex_attr.only_owner_release = false; if ( the_mutex_attr.discipline == CORE_MUTEX_DISCIPLINES_PRIORITY ) { 45c0e: 7801 moveq #1,%d4 the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_FIFO; if ( _Attributes_Is_binary_semaphore( attribute_set ) ) { the_mutex_attr.priority_ceiling = priority_ceiling; the_mutex_attr.lock_nesting_behavior = CORE_MUTEX_NESTING_ACQUIRES; the_mutex_attr.only_owner_release = false; 45c10: 4201 clrb %d1 the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_PRIORITY; else the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_FIFO; if ( _Attributes_Is_binary_semaphore( attribute_set ) ) { the_mutex_attr.priority_ceiling = priority_ceiling; 45c12: 2d6e 0014 fff4 movel %fp@(20),%fp@(-12) the_mutex_attr.lock_nesting_behavior = CORE_MUTEX_NESTING_ACQUIRES; the_mutex_attr.only_owner_release = false; 45c18: 1d41 ffee moveb %d1,%fp@(-18) if ( the_mutex_attr.discipline == CORE_MUTEX_DISCIPLINES_PRIORITY ) { 45c1c: b8ae fff0 cmpl %fp@(-16),%d4 45c20: 6600 ff28 bnew 45b4a if ( _Attributes_Is_inherit_priority( attribute_set ) ) { 45c24: 0802 0006 btst #6,%d2 45c28: 6712 beqs 45c3c the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_PRIORITY_INHERIT; 45c2a: 103c 0002 moveb #2,%d0 the_mutex_attr.only_owner_release = true; 45c2e: 7201 moveq #1,%d1 the_mutex_attr.lock_nesting_behavior = CORE_MUTEX_NESTING_ACQUIRES; the_mutex_attr.only_owner_release = false; if ( the_mutex_attr.discipline == CORE_MUTEX_DISCIPLINES_PRIORITY ) { if ( _Attributes_Is_inherit_priority( attribute_set ) ) { the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_PRIORITY_INHERIT; 45c30: 2d40 fff0 movel %d0,%fp@(-16) the_mutex_attr.only_owner_release = true; 45c34: 1d41 ffee moveb %d1,%fp@(-18) 45c38: 6000 ff10 braw 45b4a } else if ( _Attributes_Is_priority_ceiling( attribute_set ) ) { 45c3c: 4a02 tstb %d2 45c3e: 6c00 ff0a bgew 45b4a the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_PRIORITY_CEILING; 45c42: 7803 moveq #3,%d4 the_mutex_attr.only_owner_release = true; 45c44: 7001 moveq #1,%d0 if ( the_mutex_attr.discipline == CORE_MUTEX_DISCIPLINES_PRIORITY ) { if ( _Attributes_Is_inherit_priority( attribute_set ) ) { the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_PRIORITY_INHERIT; the_mutex_attr.only_owner_release = true; } else if ( _Attributes_Is_priority_ceiling( attribute_set ) ) { the_mutex_attr.discipline = CORE_MUTEX_DISCIPLINES_PRIORITY_CEILING; 45c46: 2d44 fff0 movel %d4,%fp@(-16) the_mutex_attr.only_owner_release = true; 45c4a: 1d40 ffee moveb %d0,%fp@(-18) 45c4e: 6000 fefa braw 45b4a ... =============================================================================== 00045c54 : #endif rtems_status_code rtems_semaphore_delete( rtems_id id ) { 45c54: 4e56 fffc linkw %fp,#-4 45c58: 2f0a movel %a2,%sp@- RTEMS_INLINE_ROUTINE Semaphore_Control *_Semaphore_Get ( Objects_Id id, Objects_Locations *location ) { return (Semaphore_Control *) 45c5a: 486e fffc pea %fp@(-4) 45c5e: 2f2e 0008 movel %fp@(8),%sp@- 45c62: 4879 0005 eeb0 pea 5eeb0 <_Semaphore_Information> 45c68: 4eb9 0004 752c jsr 4752c <_Objects_Get> register Semaphore_Control *the_semaphore; Objects_Locations location; the_semaphore = _Semaphore_Get( id, &location ); switch ( location ) { 45c6e: 4fef 000c lea %sp@(12),%sp 45c72: 2440 moveal %d0,%a2 45c74: 4aae fffc tstl %fp@(-4) 45c78: 670a beqs 45c84 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 45c7a: 246e fff8 moveal %fp@(-8),%a2 { register Semaphore_Control *the_semaphore; Objects_Locations location; the_semaphore = _Semaphore_Get( id, &location ); switch ( location ) { 45c7e: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 45c80: 4e5e unlk %fp 45c82: 4e75 rts 45c84: 7030 moveq #48,%d0 45c86: c0aa 0010 andl %a2@(16),%d0 the_semaphore = _Semaphore_Get( id, &location ); switch ( location ) { case OBJECTS_LOCAL: if ( !_Attributes_Is_counting_semaphore(the_semaphore->attribute_set) ) { 45c8a: 6760 beqs 45cec if ( _CORE_mutex_Is_locked( &the_semaphore->Core_control.mutex ) && 45c8c: 4aaa 0062 tstl %a2@(98) 45c90: 6616 bnes 45ca8 45c92: 7220 moveq #32,%d1 45c94: b280 cmpl %d0,%d1 45c96: 6710 beqs 45ca8 !_Attributes_Is_simple_binary_semaphore( the_semaphore->attribute_set ) ) { _Thread_Enable_dispatch(); 45c98: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 45c9e: 246e fff8 moveal %fp@(-8),%a2 case OBJECTS_LOCAL: if ( !_Attributes_Is_counting_semaphore(the_semaphore->attribute_set) ) { if ( _CORE_mutex_Is_locked( &the_semaphore->Core_control.mutex ) && !_Attributes_Is_simple_binary_semaphore( the_semaphore->attribute_set ) ) { _Thread_Enable_dispatch(); 45ca2: 700c moveq #12,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 45ca4: 4e5e unlk %fp 45ca6: 4e75 rts !_Attributes_Is_simple_binary_semaphore( the_semaphore->attribute_set ) ) { _Thread_Enable_dispatch(); return RTEMS_RESOURCE_IN_USE; } _CORE_mutex_Flush( 45ca8: 4878 0004 pea 4 45cac: 42a7 clrl %sp@- 45cae: 486a 0014 pea %a2@(20) 45cb2: 4eb9 0004 67d0 jsr 467d0 <_CORE_mutex_Flush> 45cb8: 4fef 000c lea %sp@(12),%sp SEMAPHORE_MP_OBJECT_WAS_DELETED, CORE_SEMAPHORE_WAS_DELETED ); } _Objects_Close( &_Semaphore_Information, &the_semaphore->Object ); 45cbc: 2f0a movel %a2,%sp@- 45cbe: 4879 0005 eeb0 pea 5eeb0 <_Semaphore_Information> 45cc4: 4eb9 0004 7120 jsr 47120 <_Objects_Close> */ RTEMS_INLINE_ROUTINE void _Semaphore_Free ( Semaphore_Control *the_semaphore ) { _Objects_Free( &_Semaphore_Information, &the_semaphore->Object ); 45cca: 2f0a movel %a2,%sp@- 45ccc: 4879 0005 eeb0 pea 5eeb0 <_Semaphore_Information> 45cd2: 4eb9 0004 73c8 jsr 473c8 <_Objects_Free> 0, /* Not used */ 0 /* Not used */ ); } #endif _Thread_Enable_dispatch(); 45cd8: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; 45cde: 4fef 0010 lea %sp@(16),%sp 0, /* Not used */ 0 /* Not used */ ); } #endif _Thread_Enable_dispatch(); 45ce2: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 45ce4: 246e fff8 moveal %fp@(-8),%a2 45ce8: 4e5e unlk %fp 45cea: 4e75 rts &the_semaphore->Core_control.mutex, SEMAPHORE_MP_OBJECT_WAS_DELETED, CORE_MUTEX_WAS_DELETED ); } else { _CORE_semaphore_Flush( 45cec: 4878 0002 pea 2 45cf0: 42a7 clrl %sp@- 45cf2: 486a 0014 pea %a2@(20) 45cf6: 4eb9 0004 6b18 jsr 46b18 <_CORE_semaphore_Flush> 45cfc: 4fef 000c lea %sp@(12),%sp SEMAPHORE_MP_OBJECT_WAS_DELETED, CORE_SEMAPHORE_WAS_DELETED ); } _Objects_Close( &_Semaphore_Information, &the_semaphore->Object ); 45d00: 2f0a movel %a2,%sp@- 45d02: 4879 0005 eeb0 pea 5eeb0 <_Semaphore_Information> 45d08: 4eb9 0004 7120 jsr 47120 <_Objects_Close> 45d0e: 2f0a movel %a2,%sp@- 45d10: 4879 0005 eeb0 pea 5eeb0 <_Semaphore_Information> 45d16: 4eb9 0004 73c8 jsr 473c8 <_Objects_Free> 0, /* Not used */ 0 /* Not used */ ); } #endif _Thread_Enable_dispatch(); 45d1c: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; 45d22: 4fef 0010 lea %sp@(16),%sp 0, /* Not used */ 0 /* Not used */ ); } #endif _Thread_Enable_dispatch(); 45d26: 4280 clrl %d0 45d28: 60ba bras 45ce4 ... =============================================================================== 00050e9c : #endif rtems_status_code rtems_semaphore_flush( rtems_id id ) { 50e9c: 4e56 fffc linkw %fp,#-4 50ea0: 486e fffc pea %fp@(-4) 50ea4: 2f2e 0008 movel %fp@(8),%sp@- 50ea8: 4879 0006 5068 pea 65068 <_Semaphore_Information> 50eae: 4eb9 0004 95d0 jsr 495d0 <_Objects_Get> register Semaphore_Control *the_semaphore; Objects_Locations location; the_semaphore = _Semaphore_Get( id, &location ); switch ( location ) { 50eb4: 4fef 000c lea %sp@(12),%sp 50eb8: 4aae fffc tstl %fp@(-4) 50ebc: 6706 beqs 50ec4 50ebe: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 50ec0: 4e5e unlk %fp 50ec2: 4e75 rts the_semaphore = _Semaphore_Get( id, &location ); switch ( location ) { case OBJECTS_LOCAL: if ( !_Attributes_Is_counting_semaphore(the_semaphore->attribute_set) ) { 50ec4: 7230 moveq #48,%d1 50ec6: 2040 moveal %d0,%a0 50ec8: c2a8 0010 andl %a0@(16),%d1 50ecc: 6720 beqs 50eee _CORE_mutex_Flush( 50ece: 4878 0001 pea 1 50ed2: 42a7 clrl %sp@- 50ed4: 4868 0014 pea %a0@(20) 50ed8: 4eb9 0004 87d8 jsr 487d8 <_CORE_mutex_Flush> 50ede: 4fef 000c lea %sp@(12),%sp &the_semaphore->Core_control.semaphore, SEND_OBJECT_WAS_DELETED, CORE_SEMAPHORE_STATUS_UNSATISFIED_NOWAIT ); } _Thread_Enable_dispatch(); 50ee2: 4eb9 0004 9ee0 jsr 49ee0 <_Thread_Enable_dispatch> 50ee8: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 50eea: 4e5e unlk %fp 50eec: 4e75 rts &the_semaphore->Core_control.mutex, SEND_OBJECT_WAS_DELETED, CORE_MUTEX_STATUS_UNSATISFIED_NOWAIT ); } else { _CORE_semaphore_Flush( 50eee: 4878 0001 pea 1 50ef2: 2040 moveal %d0,%a0 50ef4: 42a7 clrl %sp@- 50ef6: 4868 0014 pea %a0@(20) 50efa: 4eb9 0004 8b20 jsr 48b20 <_CORE_semaphore_Flush> 50f00: 4fef 000c lea %sp@(12),%sp &the_semaphore->Core_control.semaphore, SEND_OBJECT_WAS_DELETED, CORE_SEMAPHORE_STATUS_UNSATISFIED_NOWAIT ); } _Thread_Enable_dispatch(); 50f04: 4eb9 0004 9ee0 jsr 49ee0 <_Thread_Enable_dispatch> 50f0a: 4280 clrl %d0 50f0c: 60dc bras 50eea ... =============================================================================== 00058180 : rtems_status_code rtems_signal_send( rtems_id id, rtems_signal_set signal_set ) { 58180: 4e56 fffc linkw %fp,#-4 58184: 2f03 movel %d3,%sp@- 58186: 2f02 movel %d2,%sp@- 58188: 242e 000c movel %fp@(12),%d2 register Thread_Control *the_thread; Objects_Locations location; RTEMS_API_Control *api; ASR_Information *asr; if ( !signal_set ) 5818c: 660e bnes 5819c case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 5818e: 242e fff4 movel %fp@(-12),%d2 register Thread_Control *the_thread; Objects_Locations location; RTEMS_API_Control *api; ASR_Information *asr; if ( !signal_set ) 58192: 700a moveq #10,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 58194: 262e fff8 movel %fp@(-8),%d3 58198: 4e5e unlk %fp 5819a: 4e75 rts ASR_Information *asr; if ( !signal_set ) return RTEMS_INVALID_NUMBER; the_thread = _Thread_Get( id, &location ); 5819c: 486e fffc pea %fp@(-4) 581a0: 2f2e 0008 movel %fp@(8),%sp@- 581a4: 4eb9 0005 c318 jsr 5c318 <_Thread_Get> switch ( location ) { 581aa: 508f addql #8,%sp 581ac: 4aae fffc tstl %fp@(-4) 581b0: 670e beqs 581c0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 581b2: 242e fff4 movel %fp@(-12),%d2 if ( !signal_set ) return RTEMS_INVALID_NUMBER; the_thread = _Thread_Get( id, &location ); switch ( location ) { 581b6: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 581b8: 262e fff8 movel %fp@(-8),%d3 581bc: 4e5e unlk %fp 581be: 4e75 rts the_thread = _Thread_Get( id, &location ); switch ( location ) { case OBJECTS_LOCAL: api = the_thread->API_Extensions[ THREAD_API_RTEMS ]; 581c0: 2240 moveal %d0,%a1 581c2: 2069 010a moveal %a1@(266),%a0 asr = &api->Signal; 581c6: 4aa8 000a tstl %a0@(10) 581ca: 6770 beqs 5823c if ( ! _ASR_Is_null_handler( asr->handler ) ) { if ( asr->is_enabled ) { 581cc: 4a28 0008 tstb %a0@(8) 581d0: 673e beqs 58210 rtems_signal_set *signal_set ) { ISR_Level _level; _ISR_Disable( _level ); 581d2: 223c 0000 0700 movel #1792,%d1 581d8: 40c3 movew %sr,%d3 581da: 8283 orl %d3,%d1 581dc: 46c1 movew %d1,%sr *signal_set |= signals; 581de: 85a8 0012 orl %d2,%a0@(18) _ISR_Enable( _level ); 581e2: 46c3 movew %d3,%sr _ASR_Post_signals( signal_set, &asr->signals_posted ); the_thread->do_post_task_switch_extension = true; if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) ) 581e4: 2239 0007 e866 movel 7e866 <_ISR_Nest_level>,%d1 if ( ! _ASR_Is_null_handler( asr->handler ) ) { if ( asr->is_enabled ) { _ASR_Post_signals( signal_set, &asr->signals_posted ); the_thread->do_post_task_switch_extension = true; 581ea: 7401 moveq #1,%d2 581ec: 1342 0074 moveb %d2,%a1@(116) if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) ) 581f0: 4a81 tstl %d1 581f2: 6708 beqs 581fc 581f4: b0b9 0007 e886 cmpl 7e886 <_Thread_Executing>,%d0 581fa: 6730 beqs 5822c <== ALWAYS TAKEN _ISR_Signals_to_thread_executing = true; } else { _ASR_Post_signals( signal_set, &asr->signals_pending ); } _Thread_Enable_dispatch(); 581fc: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> 58202: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 58204: 242e fff4 movel %fp@(-12),%d2 58208: 262e fff8 movel %fp@(-8),%d3 5820c: 4e5e unlk %fp 5820e: 4e75 rts rtems_signal_set *signal_set ) { ISR_Level _level; _ISR_Disable( _level ); 58210: 203c 0000 0700 movel #1792,%d0 58216: 40c1 movew %sr,%d1 58218: 8081 orl %d1,%d0 5821a: 46c0 movew %d0,%sr *signal_set |= signals; 5821c: 85a8 0016 orl %d2,%a0@(22) _ISR_Enable( _level ); 58220: 46c1 movew %d1,%sr if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) ) _ISR_Signals_to_thread_executing = true; } else { _ASR_Post_signals( signal_set, &asr->signals_pending ); } _Thread_Enable_dispatch(); 58222: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> 58228: 4280 clrl %d0 5822a: 60d8 bras 58204 _ASR_Post_signals( signal_set, &asr->signals_posted ); the_thread->do_post_task_switch_extension = true; if ( _ISR_Is_in_progress() && _Thread_Is_executing( the_thread ) ) _ISR_Signals_to_thread_executing = true; 5822c: 13c2 0007 e914 moveb %d2,7e914 <_ISR_Signals_to_thread_executing> } else { _ASR_Post_signals( signal_set, &asr->signals_pending ); } _Thread_Enable_dispatch(); 58232: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> 58238: 4280 clrl %d0 5823a: 60c8 bras 58204 return RTEMS_SUCCESSFUL; } _Thread_Enable_dispatch(); 5823c: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 58242: 242e fff4 movel %fp@(-12),%d2 _ASR_Post_signals( signal_set, &asr->signals_pending ); } _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } _Thread_Enable_dispatch(); 58246: 700b moveq #11,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 58248: 262e fff8 movel %fp@(-8),%d3 5824c: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004606c : */ rtems_status_code rtems_task_delete( rtems_id id ) { 4606c: 4e56 fffc linkw %fp,#-4 46070: 2f0b movel %a3,%sp@- 46072: 2f0a movel %a2,%sp@- register Thread_Control *the_thread; Objects_Locations location; Objects_Information *the_information; _RTEMS_Lock_allocator(); 46074: 2f39 0005 f02a movel 5f02a <_RTEMS_Allocator_Mutex>,%sp@- 4607a: 4eb9 0004 6704 jsr 46704 <_API_Mutex_Lock> the_thread = _Thread_Get( id, &location ); 46080: 486e fffc pea %fp@(-4) 46084: 2f2e 0008 movel %fp@(8),%sp@- 46088: 4eb9 0004 7de4 jsr 47de4 <_Thread_Get> switch ( location ) { 4608e: 4fef 000c lea %sp@(12),%sp Objects_Locations location; Objects_Information *the_information; _RTEMS_Lock_allocator(); the_thread = _Thread_Get( id, &location ); 46092: 2440 moveal %d0,%a2 switch ( location ) { 46094: 4aae fffc tstl %fp@(-4) 46098: 664a bnes 460e4 <== NEVER TAKEN case OBJECTS_LOCAL: the_information = _Objects_Get_information_id( the_thread->Object.id ); 4609a: 2f2a 0008 movel %a2@(8),%sp@- 4609e: 47f9 0004 744c lea 4744c <_Objects_Get_information_id>,%a3 460a4: 4e93 jsr %a3@ 0 /* Not used */ ); } #endif _Thread_Close( the_information, the_thread ); 460a6: 2f0a movel %a2,%sp@- 460a8: 2f00 movel %d0,%sp@- 460aa: 4eb9 0004 7a9c jsr 47a9c <_Thread_Close> 460b0: 2f2a 0008 movel %a2@(8),%sp@- 460b4: 4e93 jsr %a3@ 460b6: 2f0a movel %a2,%sp@- 460b8: 2f00 movel %d0,%sp@- 460ba: 4eb9 0004 73c8 jsr 473c8 <_Objects_Free> _RTEMS_tasks_Free( the_thread ); _RTEMS_Unlock_allocator(); 460c0: 2f39 0005 f02a movel 5f02a <_RTEMS_Allocator_Mutex>,%sp@- 460c6: 4eb9 0004 6764 jsr 46764 <_API_Mutex_Unlock> _Thread_Enable_dispatch(); 460cc: 4eb9 0004 7dbc jsr 47dbc <_Thread_Enable_dispatch> break; } _RTEMS_Unlock_allocator(); return RTEMS_INVALID_ID; } 460d2: 246e fff4 moveal %fp@(-12),%a2 _RTEMS_tasks_Free( the_thread ); _RTEMS_Unlock_allocator(); _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; 460d6: 4fef 001c lea %sp@(28),%sp _Thread_Close( the_information, the_thread ); _RTEMS_tasks_Free( the_thread ); _RTEMS_Unlock_allocator(); _Thread_Enable_dispatch(); 460da: 4280 clrl %d0 break; } _RTEMS_Unlock_allocator(); return RTEMS_INVALID_ID; } 460dc: 266e fff8 moveal %fp@(-8),%a3 460e0: 4e5e unlk %fp 460e2: 4e75 rts case OBJECTS_ERROR: break; } _RTEMS_Unlock_allocator(); 460e4: 2f39 0005 f02a movel 5f02a <_RTEMS_Allocator_Mutex>,%sp@- 460ea: 4eb9 0004 6764 jsr 46764 <_API_Mutex_Unlock> return RTEMS_INVALID_ID; } 460f0: 246e fff4 moveal %fp@(-12),%a2 case OBJECTS_ERROR: break; } _RTEMS_Unlock_allocator(); return RTEMS_INVALID_ID; 460f4: 588f addql #4,%sp case OBJECTS_ERROR: break; } _RTEMS_Unlock_allocator(); 460f6: 7004 moveq #4,%d0 return RTEMS_INVALID_ID; } 460f8: 266e fff8 moveal %fp@(-8),%a3 460fc: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004db68 : rtems_status_code rtems_task_mode( rtems_mode mode_set, rtems_mode mask, rtems_mode *previous_mode_set ) { 4db68: 4e56 ffe4 linkw %fp,#-28 4db6c: 48d7 1c3c moveml %d2-%d5/%a2-%a4,%sp@ 4db70: 2a2e 0008 movel %fp@(8),%d5 4db74: 242e 000c movel %fp@(12),%d2 4db78: 286e 0010 moveal %fp@(16),%a4 ASR_Information *asr; bool is_asr_enabled = false; bool needs_asr_dispatching = false; rtems_mode old_mode; if ( !previous_mode_set ) 4db7c: 4a8c tstl %a4 4db7e: 6700 0154 beqw 4dcd4 return RTEMS_INVALID_ADDRESS; executing = _Thread_Executing; 4db82: 2479 0005 f032 moveal 5f032 <_Thread_Executing>,%a2 api = executing->API_Extensions[ THREAD_API_RTEMS ]; asr = &api->Signal; old_mode = (executing->is_preemptible) ? RTEMS_PREEMPT : RTEMS_NO_PREEMPT; 4db88: 4a2a 0075 tstb %a2@(117) 4db8c: 57c0 seq %d0 4db8e: 263c 0000 0100 movel #256,%d3 4db94: 49c0 extbl %d0 if ( !previous_mode_set ) return RTEMS_INVALID_ADDRESS; executing = _Thread_Executing; api = executing->API_Extensions[ THREAD_API_RTEMS ]; 4db96: 266a 010a moveal %a2@(266),%a3 asr = &api->Signal; old_mode = (executing->is_preemptible) ? RTEMS_PREEMPT : RTEMS_NO_PREEMPT; 4db9a: c680 andl %d0,%d3 if ( executing->budget_algorithm == THREAD_CPU_BUDGET_ALGORITHM_NONE ) 4db9c: 4aaa 007a tstl %a2@(122) 4dba0: 6600 00d4 bnew 4dc76 if ( !previous_mode_set ) return RTEMS_INVALID_ADDRESS; executing = _Thread_Executing; api = executing->API_Extensions[ THREAD_API_RTEMS ]; asr = &api->Signal; 4dba4: 4a2b 0008 tstb %a3@(8) 4dba8: 57c0 seq %d0 4dbaa: 283c 0000 0400 movel #1024,%d4 4dbb0: 49c0 extbl %d0 4dbb2: c880 andl %d0,%d4 old_mode |= RTEMS_NO_TIMESLICE; else old_mode |= RTEMS_TIMESLICE; old_mode |= (asr->is_enabled) ? RTEMS_ASR : RTEMS_NO_ASR; old_mode |= _ISR_Get_level(); 4dbb4: 4eb9 0004 935c jsr 4935c <_CPU_ISR_Get_level> if ( executing->budget_algorithm == THREAD_CPU_BUDGET_ALGORITHM_NONE ) old_mode |= RTEMS_NO_TIMESLICE; else old_mode |= RTEMS_TIMESLICE; old_mode |= (asr->is_enabled) ? RTEMS_ASR : RTEMS_NO_ASR; 4dbba: 8084 orl %d4,%d0 old_mode |= _ISR_Get_level(); *previous_mode_set = old_mode; 4dbbc: 8083 orl %d3,%d0 4dbbe: 2880 movel %d0,%a4@ /* * These are generic thread scheduling characteristics. */ if ( mask & RTEMS_PREEMPT_MASK ) 4dbc0: 0802 0008 btst #8,%d2 4dbc4: 670e beqs 4dbd4 executing->is_preemptible = _Modes_Is_preempt(mode_set) ? true : false; 4dbc6: 2005 movel %d5,%d0 4dbc8: 7201 moveq #1,%d1 4dbca: e088 lsrl #8,%d0 4dbcc: b380 eorl %d1,%d0 4dbce: c081 andl %d1,%d0 4dbd0: 1540 0075 moveb %d0,%a2@(117) if ( mask & RTEMS_TIMESLICE_MASK ) { 4dbd4: 0802 0009 btst #9,%d2 4dbd8: 6718 beqs 4dbf2 if ( _Modes_Is_timeslice(mode_set) ) { 4dbda: 0805 0009 btst #9,%d5 4dbde: 6700 00c2 beqw 4dca2 executing->budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE; 4dbe2: 7001 moveq #1,%d0 executing->cpu_time_budget = _Thread_Ticks_per_timeslice; 4dbe4: 41f9 0005 ef28 lea 5ef28 <_Thread_Ticks_per_timeslice>,%a0 if ( mask & RTEMS_PREEMPT_MASK ) executing->is_preemptible = _Modes_Is_preempt(mode_set) ? true : false; if ( mask & RTEMS_TIMESLICE_MASK ) { if ( _Modes_Is_timeslice(mode_set) ) { executing->budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE; 4dbea: 2540 007a movel %d0,%a2@(122) executing->cpu_time_budget = _Thread_Ticks_per_timeslice; 4dbee: 2550 0076 movel %a0@,%a2@(118) /* * Set the new interrupt level */ if ( mask & RTEMS_INTERRUPT_MASK ) 4dbf2: 7007 moveq #7,%d0 4dbf4: c082 andl %d2,%d0 4dbf6: 6712 beqs 4dc0a */ RTEMS_INLINE_ROUTINE void _Modes_Set_interrupt_level ( Modes_Control mode_set ) { _ISR_Set_level( _Modes_Get_interrupt_level( mode_set ) ); 4dbf8: 40c0 movew %sr,%d0 4dbfa: 7207 moveq #7,%d1 4dbfc: c285 andl %d5,%d1 4dbfe: 0280 0000 f8ff andil #63743,%d0 4dc04: e189 lsll #8,%d1 4dc06: 8081 orl %d1,%d0 4dc08: 46c0 movew %d0,%sr */ is_asr_enabled = false; needs_asr_dispatching = false; if ( mask & RTEMS_ASR_MASK ) { 4dc0a: 0802 000a btst #10,%d2 4dc0e: 6758 beqs 4dc68 * Output: * *previous_mode_set - previous mode set * always return RTEMS_SUCCESSFUL; */ rtems_status_code rtems_task_mode( 4dc10: 700a moveq #10,%d0 4dc12: e0ad lsrl %d0,%d5 4dc14: 7201 moveq #1,%d1 if ( !previous_mode_set ) return RTEMS_INVALID_ADDRESS; executing = _Thread_Executing; api = executing->API_Extensions[ THREAD_API_RTEMS ]; asr = &api->Signal; 4dc16: 4280 clrl %d0 4dc18: 102b 0008 moveb %a3@(8),%d0 * Output: * *previous_mode_set - previous mode set * always return RTEMS_SUCCESSFUL; */ rtems_status_code rtems_task_mode( 4dc1c: b385 eorl %d1,%d5 4dc1e: ca81 andl %d1,%d5 if ( !previous_mode_set ) return RTEMS_INVALID_ADDRESS; executing = _Thread_Executing; api = executing->API_Extensions[ THREAD_API_RTEMS ]; asr = &api->Signal; 4dc20: ba80 cmpl %d0,%d5 4dc22: 6744 beqs 4dc68 ) { rtems_signal_set _signals; ISR_Level _level; _ISR_Disable( _level ); 4dc24: 203c 0000 0700 movel #1792,%d0 needs_asr_dispatching = false; if ( mask & RTEMS_ASR_MASK ) { is_asr_enabled = _Modes_Is_asr_disabled( mode_set ) ? false : true; if ( is_asr_enabled != asr->is_enabled ) { asr->is_enabled = is_asr_enabled; 4dc2a: 1745 0008 moveb %d5,%a3@(8) 4dc2e: 40c1 movew %sr,%d1 4dc30: 8081 orl %d1,%d0 4dc32: 46c0 movew %d0,%sr _signals = information->signals_pending; 4dc34: 202b 0016 movel %a3@(22),%d0 information->signals_pending = information->signals_posted; 4dc38: 276b 0012 0016 movel %a3@(18),%a3@(22) information->signals_posted = _signals; 4dc3e: 2740 0012 movel %d0,%a3@(18) _ISR_Enable( _level ); 4dc42: 46c1 movew %d1,%sr if ( !previous_mode_set ) return RTEMS_INVALID_ADDRESS; executing = _Thread_Executing; api = executing->API_Extensions[ THREAD_API_RTEMS ]; asr = &api->Signal; 4dc44: 4aab 0012 tstl %a3@(18) 4dc48: 671e beqs 4dc68 executing->do_post_task_switch_extension = true; } } } if ( _System_state_Is_up( _System_state_Get() ) ) 4dc4a: 7203 moveq #3,%d1 if ( is_asr_enabled != asr->is_enabled ) { asr->is_enabled = is_asr_enabled; _ASR_Swap_signals( asr ); if ( _ASR_Are_signals_pending( asr ) ) { needs_asr_dispatching = true; executing->do_post_task_switch_extension = true; 4dc4c: 7001 moveq #1,%d0 4dc4e: 7401 moveq #1,%d2 4dc50: 1540 0074 moveb %d0,%a2@(116) } } } if ( _System_state_Is_up( _System_state_Get() ) ) 4dc54: b2b9 0005 f100 cmpl 5f100 <_System_state_Current>,%d1 4dc5a: 6758 beqs 4dcb4 <== ALWAYS TAKEN if ( _Thread_Evaluate_mode() || needs_asr_dispatching ) _Thread_Dispatch(); 4dc5c: 4280 clrl %d0 return RTEMS_SUCCESSFUL; } 4dc5e: 4cee 1c3c ffe4 moveml %fp@(-28),%d2-%d5/%a2-%a4 4dc64: 4e5e unlk %fp 4dc66: 4e75 rts executing->do_post_task_switch_extension = true; } } } if ( _System_state_Is_up( _System_state_Get() ) ) 4dc68: 7203 moveq #3,%d1 if ( is_asr_enabled != asr->is_enabled ) { asr->is_enabled = is_asr_enabled; _ASR_Swap_signals( asr ); if ( _ASR_Are_signals_pending( asr ) ) { needs_asr_dispatching = true; executing->do_post_task_switch_extension = true; 4dc6a: 4202 clrb %d2 } } } if ( _System_state_Is_up( _System_state_Get() ) ) 4dc6c: b2b9 0005 f100 cmpl 5f100 <_System_state_Current>,%d1 4dc72: 66e8 bnes 4dc5c <== NEVER TAKEN 4dc74: 603e bras 4dcb4 if ( !previous_mode_set ) return RTEMS_INVALID_ADDRESS; executing = _Thread_Executing; api = executing->API_Extensions[ THREAD_API_RTEMS ]; asr = &api->Signal; 4dc76: 4a2b 0008 tstb %a3@(8) 4dc7a: 57c0 seq %d0 4dc7c: 283c 0000 0400 movel #1024,%d4 4dc82: 49c0 extbl %d0 4dc84: c880 andl %d0,%d4 old_mode |= RTEMS_NO_TIMESLICE; else old_mode |= RTEMS_TIMESLICE; old_mode |= (asr->is_enabled) ? RTEMS_ASR : RTEMS_NO_ASR; old_mode |= _ISR_Get_level(); 4dc86: 4eb9 0004 935c jsr 4935c <_CPU_ISR_Get_level> old_mode = (executing->is_preemptible) ? RTEMS_PREEMPT : RTEMS_NO_PREEMPT; if ( executing->budget_algorithm == THREAD_CPU_BUDGET_ALGORITHM_NONE ) old_mode |= RTEMS_NO_TIMESLICE; else old_mode |= RTEMS_TIMESLICE; 4dc8c: 08c3 0009 bset #9,%d3 old_mode |= (asr->is_enabled) ? RTEMS_ASR : RTEMS_NO_ASR; 4dc90: 8084 orl %d4,%d0 old_mode |= _ISR_Get_level(); *previous_mode_set = old_mode; 4dc92: 8083 orl %d3,%d0 4dc94: 2880 movel %d0,%a4@ /* * These are generic thread scheduling characteristics. */ if ( mask & RTEMS_PREEMPT_MASK ) 4dc96: 0802 0008 btst #8,%d2 4dc9a: 6700 ff38 beqw 4dbd4 4dc9e: 6000 ff26 braw 4dbc6 /* * Set the new interrupt level */ if ( mask & RTEMS_INTERRUPT_MASK ) 4dca2: 7007 moveq #7,%d0 4dca4: c082 andl %d2,%d0 if ( mask & RTEMS_TIMESLICE_MASK ) { if ( _Modes_Is_timeslice(mode_set) ) { executing->budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE; executing->cpu_time_budget = _Thread_Ticks_per_timeslice; } else executing->budget_algorithm = THREAD_CPU_BUDGET_ALGORITHM_NONE; 4dca6: 42aa 007a clrl %a2@(122) /* * Set the new interrupt level */ if ( mask & RTEMS_INTERRUPT_MASK ) 4dcaa: 4a80 tstl %d0 4dcac: 6700 ff5c beqw 4dc0a 4dcb0: 6000 ff46 braw 4dbf8 } } } if ( _System_state_Is_up( _System_state_Get() ) ) if ( _Thread_Evaluate_mode() || needs_asr_dispatching ) 4dcb4: 4eb9 0004 dfd0 jsr 4dfd0 <_Thread_Evaluate_mode> 4dcba: 4a00 tstb %d0 4dcbc: 6604 bnes 4dcc2 4dcbe: 4a02 tstb %d2 4dcc0: 679a beqs 4dc5c _Thread_Dispatch(); 4dcc2: 4eb9 0004 7c64 jsr 47c64 <_Thread_Dispatch> 4dcc8: 4280 clrl %d0 return RTEMS_SUCCESSFUL; } 4dcca: 4cee 1c3c ffe4 moveml %fp@(-28),%d2-%d5/%a2-%a4 4dcd0: 4e5e unlk %fp 4dcd2: 4e75 rts ASR_Information *asr; bool is_asr_enabled = false; bool needs_asr_dispatching = false; rtems_mode old_mode; if ( !previous_mode_set ) 4dcd4: 7009 moveq #9,%d0 if ( _System_state_Is_up( _System_state_Get() ) ) if ( _Thread_Evaluate_mode() || needs_asr_dispatching ) _Thread_Dispatch(); return RTEMS_SUCCESSFUL; } 4dcd6: 4cee 1c3c ffe4 moveml %fp@(-28),%d2-%d5/%a2-%a4 4dcdc: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00048734 : rtems_status_code rtems_task_set_note( rtems_id id, uint32_t notepad, uint32_t note ) { 48734: 4e56 fffc linkw %fp,#-4 48738: 202e 0008 movel %fp@(8),%d0 4873c: 2f02 movel %d2,%sp@- 4873e: 242e 000c movel %fp@(12),%d2 register Thread_Control *the_thread; Objects_Locations location; RTEMS_API_Control *api; if ( !rtems_configuration_get_notepads_enabled() ) 48742: 4a39 0006 0c64 tstb 60c64 48748: 676e beqs 487b8 <== NEVER TAKEN /* * NOTE: There is no check for < RTEMS_NOTEPAD_FIRST because that would * be checking an unsigned number for being negative. */ if ( notepad > RTEMS_NOTEPAD_LAST ) 4874a: 720f moveq #15,%d1 4874c: b282 cmpl %d2,%d1 4874e: 6542 bcss 48792 /* * Optimize the most likely case to avoid the Thread_Dispatch. */ if ( _Objects_Are_ids_equal( id, OBJECTS_ID_OF_SELF ) || 48750: 4a80 tstl %d0 48752: 6748 beqs 4879c _Objects_Are_ids_equal( id, _Thread_Executing->Object.id ) ) { 48754: 2079 0006 2772 moveal 62772 <_Thread_Executing>,%a0 /* * Optimize the most likely case to avoid the Thread_Dispatch. */ if ( _Objects_Are_ids_equal( id, OBJECTS_ID_OF_SELF ) || 4875a: b0a8 0008 cmpl %a0@(8),%d0 4875e: 6742 beqs 487a2 api = _Thread_Executing->API_Extensions[ THREAD_API_RTEMS ]; api->Notepads[ notepad ] = note; return RTEMS_SUCCESSFUL; } the_thread = _Thread_Get( id, &location ); 48760: 486e fffc pea %fp@(-4) 48764: 2f00 movel %d0,%sp@- 48766: 4eb9 0004 a5d0 jsr 4a5d0 <_Thread_Get> switch ( location ) { 4876c: 508f addql #8,%sp 4876e: 4aae fffc tstl %fp@(-4) 48772: 664e bnes 487c2 case OBJECTS_LOCAL: api = the_thread->API_Extensions[ THREAD_API_RTEMS ]; api->Notepads[ notepad ] = note; 48774: 2240 moveal %d0,%a1 48776: 202e 0010 movel %fp@(16),%d0 4877a: 2069 010a moveal %a1@(266),%a0 4877e: 2180 2c1e movel %d0,%a0@(0000001e,%d2:l:4) _Thread_Enable_dispatch(); 48782: 4eb9 0004 a5a8 jsr 4a5a8 <_Thread_Enable_dispatch> case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 48788: 242e fff8 movel %fp@(-8),%d2 switch ( location ) { case OBJECTS_LOCAL: api = the_thread->API_Extensions[ THREAD_API_RTEMS ]; api->Notepads[ notepad ] = note; _Thread_Enable_dispatch(); 4878c: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 4878e: 4e5e unlk %fp 48790: 4e75 rts 48792: 242e fff8 movel %fp@(-8),%d2 /* * NOTE: There is no check for < RTEMS_NOTEPAD_FIRST because that would * be checking an unsigned number for being negative. */ if ( notepad > RTEMS_NOTEPAD_LAST ) 48796: 700a moveq #10,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 48798: 4e5e unlk %fp 4879a: 4e75 rts /* * Optimize the most likely case to avoid the Thread_Dispatch. */ if ( _Objects_Are_ids_equal( id, OBJECTS_ID_OF_SELF ) || 4879c: 2079 0006 2772 moveal 62772 <_Thread_Executing>,%a0 _Objects_Are_ids_equal( id, _Thread_Executing->Object.id ) ) { api = _Thread_Executing->API_Extensions[ THREAD_API_RTEMS ]; api->Notepads[ notepad ] = note; 487a2: 226e 0010 moveal %fp@(16),%a1 487a6: 4280 clrl %d0 487a8: 2068 010a moveal %a0@(266),%a0 487ac: 2189 2c1e movel %a1,%a0@(0000001e,%d2:l:4) case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 487b0: 242e fff8 movel %fp@(-8),%d2 487b4: 4e5e unlk %fp 487b6: 4e75 rts 487b8: 242e fff8 movel %fp@(-8),%d2 { register Thread_Control *the_thread; Objects_Locations location; RTEMS_API_Control *api; if ( !rtems_configuration_get_notepads_enabled() ) 487bc: 7016 moveq #22,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 487be: 4e5e unlk %fp 487c0: 4e75 rts 487c2: 242e fff8 movel %fp@(-8),%d2 api->Notepads[ notepad ] = note; return RTEMS_SUCCESSFUL; } the_thread = _Thread_Get( id, &location ); switch ( location ) { 487c6: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 487c8: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 0004af04 : rtems_status_code rtems_task_set_priority( rtems_id id, rtems_task_priority new_priority, rtems_task_priority *old_priority ) { 4af04: 4e56 fffc linkw %fp,#-4 4af08: 2f0a movel %a2,%sp@- 4af0a: 246e 0010 moveal %fp@(16),%a2 4af0e: 2f02 movel %d2,%sp@- 4af10: 242e 000c movel %fp@(12),%d2 register Thread_Control *the_thread; Objects_Locations location; if ( new_priority != RTEMS_CURRENT_PRIORITY && 4af14: 670c beqs 4af22 */ RTEMS_INLINE_ROUTINE bool _RTEMS_tasks_Priority_is_valid ( rtems_task_priority the_priority ) { return ( ( the_priority >= RTEMS_MINIMUM_PRIORITY ) && 4af16: 4280 clrl %d0 4af18: 1039 0006 3ba2 moveb 63ba2 ,%d0 4af1e: b082 cmpl %d2,%d0 4af20: 6566 bcss 4af88 !_RTEMS_tasks_Priority_is_valid( new_priority ) ) return RTEMS_INVALID_PRIORITY; if ( !old_priority ) 4af22: 4a8a tstl %a2 4af24: 6770 beqs 4af96 return RTEMS_INVALID_ADDRESS; the_thread = _Thread_Get( id, &location ); 4af26: 486e fffc pea %fp@(-4) 4af2a: 2f2e 0008 movel %fp@(8),%sp@- 4af2e: 4eb9 0004 cef8 jsr 4cef8 <_Thread_Get> switch ( location ) { 4af34: 508f addql #8,%sp 4af36: 4aae fffc tstl %fp@(-4) 4af3a: 663e bnes 4af7a case OBJECTS_LOCAL: /* XXX need helper to "convert" from core priority */ *old_priority = the_thread->current_priority; 4af3c: 2040 moveal %d0,%a0 4af3e: 24a8 0014 movel %a0@(20),%a2@ if ( new_priority != RTEMS_CURRENT_PRIORITY ) { 4af42: 4a82 tstl %d2 4af44: 6720 beqs 4af66 the_thread->real_priority = new_priority; 4af46: 2142 0018 movel %d2,%a0@(24) if ( the_thread->resource_count == 0 || 4af4a: 4aa8 001c tstl %a0@(28) 4af4e: 6706 beqs 4af56 the_thread->current_priority > new_priority ) 4af50: b4a8 0014 cmpl %a0@(20),%d2 4af54: 6410 bccs 4af66 <== ALWAYS TAKEN _Thread_Change_priority( the_thread, new_priority, false ); 4af56: 42a7 clrl %sp@- 4af58: 2f02 movel %d2,%sp@- 4af5a: 2f00 movel %d0,%sp@- 4af5c: 4eb9 0004 c980 jsr 4c980 <_Thread_Change_priority> 4af62: 4fef 000c lea %sp@(12),%sp } _Thread_Enable_dispatch(); 4af66: 4eb9 0004 cea0 jsr 4cea0 <_Thread_Enable_dispatch> case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 4af6c: 242e fff4 movel %fp@(-12),%d2 the_thread->real_priority = new_priority; if ( the_thread->resource_count == 0 || the_thread->current_priority > new_priority ) _Thread_Change_priority( the_thread, new_priority, false ); } _Thread_Enable_dispatch(); 4af70: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 4af72: 246e fff8 moveal %fp@(-8),%a2 4af76: 4e5e unlk %fp 4af78: 4e75 rts 4af7a: 242e fff4 movel %fp@(-12),%d2 if ( !old_priority ) return RTEMS_INVALID_ADDRESS; the_thread = _Thread_Get( id, &location ); switch ( location ) { 4af7e: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 4af80: 246e fff8 moveal %fp@(-8),%a2 4af84: 4e5e unlk %fp 4af86: 4e75 rts 4af88: 242e fff4 movel %fp@(-12),%d2 4af8c: 7013 moveq #19,%d0 4af8e: 246e fff8 moveal %fp@(-8),%a2 4af92: 4e5e unlk %fp 4af94: 4e75 rts 4af96: 242e fff4 movel %fp@(-12),%d2 if ( new_priority != RTEMS_CURRENT_PRIORITY && !_RTEMS_tasks_Priority_is_valid( new_priority ) ) return RTEMS_INVALID_PRIORITY; if ( !old_priority ) 4af9a: 7009 moveq #9,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 4af9c: 246e fff8 moveal %fp@(-8),%a2 4afa0: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 000477f8 : rtems_status_code rtems_task_variable_delete( rtems_id tid, void **ptr ) { 477f8: 4e56 fffc linkw %fp,#-4 477fc: 2f02 movel %d2,%sp@- 477fe: 242e 000c movel %fp@(12),%d2 Thread_Control *the_thread; Objects_Locations location; rtems_task_variable_t *tvp, *prev; if ( !ptr ) 47802: 6762 beqs 47866 return RTEMS_INVALID_ADDRESS; prev = NULL; the_thread = _Thread_Get (tid, &location); 47804: 486e fffc pea %fp@(-4) 47808: 2f2e 0008 movel %fp@(8),%sp@- 4780c: 4eb9 0004 9624 jsr 49624 <_Thread_Get> switch (location) { 47812: 508f addql #8,%sp 47814: 4aae fffc tstl %fp@(-4) 47818: 663c bnes 47856 case OBJECTS_LOCAL: tvp = the_thread->task_variables; 4781a: 2240 moveal %d0,%a1 4781c: 2069 011a moveal %a1@(282),%a0 while (tvp) { 47820: 4a88 tstl %a0 47822: 673c beqs 47860 if (tvp->ptr == ptr) { 47824: b4a8 0004 cmpl %a0@(4),%d2 47828: 6746 beqs 47870 else the_thread->task_variables = (rtems_task_variable_t *)tvp->next; _RTEMS_Tasks_Invoke_task_variable_dtor( the_thread, tvp ); _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; 4782a: 2248 moveal %a0,%a1 } prev = tvp; tvp = (rtems_task_variable_t *)tvp->next; 4782c: 2050 moveal %a0@,%a0 the_thread = _Thread_Get (tid, &location); switch (location) { case OBJECTS_LOCAL: tvp = the_thread->task_variables; while (tvp) { 4782e: 4a88 tstl %a0 47830: 672e beqs 47860 <== NEVER TAKEN if (tvp->ptr == ptr) { 47832: b4a8 0004 cmpl %a0@(4),%d2 47836: 66f2 bnes 4782a if (prev) prev->next = tvp->next; 47838: 2290 movel %a0@,%a1@ else the_thread->task_variables = (rtems_task_variable_t *)tvp->next; _RTEMS_Tasks_Invoke_task_variable_dtor( the_thread, tvp ); 4783a: 2f08 movel %a0,%sp@- 4783c: 2f00 movel %d0,%sp@- 4783e: 4eb9 0004 7918 jsr 47918 <_RTEMS_Tasks_Invoke_task_variable_dtor> _Thread_Enable_dispatch(); 47844: 4eb9 0004 95fc jsr 495fc <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; 4784a: 508f addql #8,%sp prev->next = tvp->next; else the_thread->task_variables = (rtems_task_variable_t *)tvp->next; _RTEMS_Tasks_Invoke_task_variable_dtor( the_thread, tvp ); _Thread_Enable_dispatch(); 4784c: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 4784e: 242e fff8 movel %fp@(-8),%d2 47852: 4e5e unlk %fp 47854: 4e75 rts 47856: 242e fff8 movel %fp@(-8),%d2 return RTEMS_INVALID_ADDRESS; prev = NULL; the_thread = _Thread_Get (tid, &location); switch (location) { 4785a: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 4785c: 4e5e unlk %fp 4785e: 4e75 rts return RTEMS_SUCCESSFUL; } prev = tvp; tvp = (rtems_task_variable_t *)tvp->next; } _Thread_Enable_dispatch(); 47860: 4eb9 0004 95fc jsr 495fc <_Thread_Enable_dispatch> case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 47866: 242e fff8 movel %fp@(-8),%d2 return RTEMS_SUCCESSFUL; } prev = tvp; tvp = (rtems_task_variable_t *)tvp->next; } _Thread_Enable_dispatch(); 4786a: 7009 moveq #9,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 4786c: 4e5e unlk %fp 4786e: 4e75 rts while (tvp) { if (tvp->ptr == ptr) { if (prev) prev->next = tvp->next; else the_thread->task_variables = (rtems_task_variable_t *)tvp->next; 47870: 2240 moveal %d0,%a1 47872: 2350 011a movel %a0@,%a1@(282) _RTEMS_Tasks_Invoke_task_variable_dtor( the_thread, tvp ); 47876: 2f08 movel %a0,%sp@- 47878: 2f00 movel %d0,%sp@- 4787a: 4eb9 0004 7918 jsr 47918 <_RTEMS_Tasks_Invoke_task_variable_dtor> _Thread_Enable_dispatch(); 47880: 4eb9 0004 95fc jsr 495fc <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; 47886: 508f addql #8,%sp prev->next = tvp->next; else the_thread->task_variables = (rtems_task_variable_t *)tvp->next; _RTEMS_Tasks_Invoke_task_variable_dtor( the_thread, tvp ); _Thread_Enable_dispatch(); 47888: 4280 clrl %d0 4788a: 60c2 bras 4784e =============================================================================== 0004788c : rtems_status_code rtems_task_variable_get( rtems_id tid, void **ptr, void **result ) { 4788c: 4e56 fffc linkw %fp,#-4 47890: 2f0a movel %a2,%sp@- 47892: 246e 0010 moveal %fp@(16),%a2 47896: 2f02 movel %d2,%sp@- 47898: 242e 000c movel %fp@(12),%d2 Thread_Control *the_thread; Objects_Locations location; rtems_task_variable_t *tvp; if ( !ptr ) 4789c: 6752 beqs 478f0 return RTEMS_INVALID_ADDRESS; if ( !result ) 4789e: 4a8a tstl %a2 478a0: 674e beqs 478f0 return RTEMS_INVALID_ADDRESS; the_thread = _Thread_Get (tid, &location); 478a2: 486e fffc pea %fp@(-4) 478a6: 2f2e 0008 movel %fp@(8),%sp@- 478aa: 4eb9 0004 9624 jsr 49624 <_Thread_Get> switch (location) { 478b0: 508f addql #8,%sp 478b2: 4aae fffc tstl %fp@(-4) 478b6: 662a bnes 478e2 case OBJECTS_LOCAL: /* * Figure out if the variable is in this task's list. */ tvp = the_thread->task_variables; 478b8: 2240 moveal %d0,%a1 478ba: 2069 011a moveal %a1@(282),%a0 while (tvp) { 478be: 4a88 tstl %a0 478c0: 670c beqs 478ce if (tvp->ptr == ptr) { 478c2: b4a8 0004 cmpl %a0@(4),%d2 478c6: 6736 beqs 478fe */ *result = tvp->tval; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } tvp = (rtems_task_variable_t *)tvp->next; 478c8: 2050 moveal %a0@,%a0 case OBJECTS_LOCAL: /* * Figure out if the variable is in this task's list. */ tvp = the_thread->task_variables; while (tvp) { 478ca: 4a88 tstl %a0 478cc: 66f4 bnes 478c2 <== ALWAYS TAKEN _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } tvp = (rtems_task_variable_t *)tvp->next; } _Thread_Enable_dispatch(); 478ce: 4eb9 0004 95fc jsr 495fc <_Thread_Enable_dispatch> case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 478d4: 242e fff4 movel %fp@(-12),%d2 _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } tvp = (rtems_task_variable_t *)tvp->next; } _Thread_Enable_dispatch(); 478d8: 7009 moveq #9,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 478da: 246e fff8 moveal %fp@(-8),%a2 478de: 4e5e unlk %fp 478e0: 4e75 rts 478e2: 242e fff4 movel %fp@(-12),%d2 if ( !result ) return RTEMS_INVALID_ADDRESS; the_thread = _Thread_Get (tid, &location); switch (location) { 478e6: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 478e8: 246e fff8 moveal %fp@(-8),%a2 478ec: 4e5e unlk %fp 478ee: 4e75 rts 478f0: 242e fff4 movel %fp@(-12),%d2 return RTEMS_SUCCESSFUL; } tvp = (rtems_task_variable_t *)tvp->next; } _Thread_Enable_dispatch(); return RTEMS_INVALID_ADDRESS; 478f4: 7009 moveq #9,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 478f6: 246e fff8 moveal %fp@(-8),%a2 478fa: 4e5e unlk %fp 478fc: 4e75 rts if (tvp->ptr == ptr) { /* * Should this return the current (i.e not the * saved) value if `tid' is the current task? */ *result = tvp->tval; 478fe: 24a8 000c movel %a0@(12),%a2@ _Thread_Enable_dispatch(); 47902: 4eb9 0004 95fc jsr 495fc <_Thread_Enable_dispatch> case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 47908: 242e fff4 movel %fp@(-12),%d2 /* * Should this return the current (i.e not the * saved) value if `tid' is the current task? */ *result = tvp->tval; _Thread_Enable_dispatch(); 4790c: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 4790e: 246e fff8 moveal %fp@(-8),%a2 47912: 4e5e unlk %fp ... =============================================================================== 00058b70 : */ rtems_status_code rtems_timer_cancel( rtems_id id ) { 58b70: 4e56 fffc linkw %fp,#-4 RTEMS_INLINE_ROUTINE Timer_Control *_Timer_Get ( Objects_Id id, Objects_Locations *location ) { return (Timer_Control *) 58b74: 486e fffc pea %fp@(-4) 58b78: 2f2e 0008 movel %fp@(8),%sp@- 58b7c: 4879 0007 f060 pea 7f060 <_Timer_Information> 58b82: 4eb9 0005 b9a4 jsr 5b9a4 <_Objects_Get> Timer_Control *the_timer; Objects_Locations location; the_timer = _Timer_Get( id, &location ); switch ( location ) { 58b88: 4fef 000c lea %sp@(12),%sp 58b8c: 4aae fffc tstl %fp@(-4) 58b90: 6706 beqs 58b98 58b92: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 58b94: 4e5e unlk %fp 58b96: 4e75 rts the_timer = _Timer_Get( id, &location ); switch ( location ) { case OBJECTS_LOCAL: if ( !_Timer_Is_dormant_class( the_timer->the_class ) ) 58b98: 7204 moveq #4,%d1 58b9a: 2040 moveal %d0,%a0 58b9c: b2a8 0038 cmpl %a0@(56),%d1 58ba0: 670c beqs 58bae <== NEVER TAKEN (void) _Watchdog_Remove( &the_timer->Ticker ); 58ba2: 4868 0010 pea %a0@(16) 58ba6: 4eb9 0005 d8e4 jsr 5d8e4 <_Watchdog_Remove> 58bac: 588f addql #4,%sp _Thread_Enable_dispatch(); 58bae: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> 58bb4: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 58bb6: 4e5e unlk %fp ... =============================================================================== 00046588 : rtems_status_code rtems_timer_create( rtems_name name, rtems_id *id ) { 46588: 4e56 0000 linkw %fp,#0 4658c: 2f0a movel %a2,%sp@- 4658e: 246e 000c moveal %fp@(12),%a2 46592: 2f02 movel %d2,%sp@- 46594: 242e 0008 movel %fp@(8),%d2 Timer_Control *the_timer; if ( !rtems_is_name_valid( name ) ) 46598: 676a beqs 46604 <== NEVER TAKEN return RTEMS_INVALID_NAME; if ( !id ) 4659a: 4a8a tstl %a2 4659c: 6700 0088 beqw 46626 465a0: 2039 0005 f78c movel 5f78c <_Thread_Dispatch_disable_level>,%d0 465a6: 5280 addql #1,%d0 465a8: 23c0 0005 f78c movel %d0,5f78c <_Thread_Dispatch_disable_level> * This function allocates a timer control block from * the inactive chain of free timer control blocks. */ RTEMS_INLINE_ROUTINE Timer_Control *_Timer_Allocate( void ) { return (Timer_Control *) _Objects_Allocate( &_Timer_Information ); 465ae: 4879 0005 ffde pea 5ffde <_Timer_Information> 465b4: 4eb9 0004 747c jsr 4747c <_Objects_Allocate> _Thread_Disable_dispatch(); /* to prevent deletion */ the_timer = _Timer_Allocate(); if ( !the_timer ) { 465ba: 588f addql #4,%sp 465bc: 2040 moveal %d0,%a0 465be: 4a80 tstl %d0 465c0: 6750 beqs 46612 <== NEVER TAKEN 465c2: 2028 0008 movel %a0@(8),%d0 465c6: 4281 clrl %d1 information, _Objects_Get_index( the_object->id ), the_object ); the_object->name = name; 465c8: 2142 000c movel %d2,%a0@(12) #if defined(RTEMS_DEBUG) if ( index > information->maximum ) return; #endif information->local_table[ index ] = the_object; 465cc: 2279 0005 fff6 moveal 5fff6 <_Timer_Information+0x18>,%a1 void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; the_watchdog->id = id; 465d2: 42a8 0030 clrl %a0@(48) 465d6: 3200 movew %d0,%d1 &_Timer_Information, &the_timer->Object, (Objects_Name) name ); *id = the_timer->Object.id; 465d8: 2480 movel %d0,%a2@ if ( !the_timer ) { _Thread_Enable_dispatch(); return RTEMS_TOO_MANY; } the_timer->the_class = TIMER_DORMANT; 465da: 7004 moveq #4,%d0 465dc: 2388 1c00 movel %a0,%a1@(00000000,%d1:l:4) 465e0: 2140 0038 movel %d0,%a0@(56) Watchdog_Service_routine_entry routine, Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; 465e4: 42a8 0018 clrl %a0@(24) the_watchdog->routine = routine; 465e8: 42a8 002c clrl %a0@(44) the_watchdog->id = id; the_watchdog->user_data = user_data; 465ec: 42a8 0034 clrl %a0@(52) &the_timer->Object, (Objects_Name) name ); *id = the_timer->Object.id; _Thread_Enable_dispatch(); 465f0: 4eb9 0004 8128 jsr 48128 <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; } 465f6: 242e fff8 movel %fp@(-8),%d2 &the_timer->Object, (Objects_Name) name ); *id = the_timer->Object.id; _Thread_Enable_dispatch(); 465fa: 4280 clrl %d0 return RTEMS_SUCCESSFUL; } 465fc: 246e fffc moveal %fp@(-4),%a2 46600: 4e5e unlk %fp 46602: 4e75 rts 46604: 242e fff8 movel %fp@(-8),%d2 rtems_id *id ) { Timer_Control *the_timer; if ( !rtems_is_name_valid( name ) ) 46608: 7003 moveq #3,%d0 ); *id = the_timer->Object.id; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 4660a: 246e fffc moveal %fp@(-4),%a2 4660e: 4e5e unlk %fp 46610: 4e75 rts _Thread_Disable_dispatch(); /* to prevent deletion */ the_timer = _Timer_Allocate(); if ( !the_timer ) { _Thread_Enable_dispatch(); 46612: 4eb9 0004 8128 jsr 48128 <_Thread_Enable_dispatch> ); *id = the_timer->Object.id; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 46618: 242e fff8 movel %fp@(-8),%d2 _Thread_Disable_dispatch(); /* to prevent deletion */ the_timer = _Timer_Allocate(); if ( !the_timer ) { _Thread_Enable_dispatch(); 4661c: 7005 moveq #5,%d0 ); *id = the_timer->Object.id; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 4661e: 246e fffc moveal %fp@(-4),%a2 46622: 4e5e unlk %fp 46624: 4e75 rts 46626: 242e fff8 movel %fp@(-8),%d2 Timer_Control *the_timer; if ( !rtems_is_name_valid( name ) ) return RTEMS_INVALID_NAME; if ( !id ) 4662a: 7009 moveq #9,%d0 ); *id = the_timer->Object.id; _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; } 4662c: 246e fffc moveal %fp@(-4),%a2 46630: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00046634 : rtems_id id, rtems_interval ticks, rtems_timer_service_routine_entry routine, void *user_data ) { 46634: 4e56 ffe8 linkw %fp,#-24 46638: 48d7 043c moveml %d2-%d5/%a2,%sp@ 4663c: 282e 0008 movel %fp@(8),%d4 46640: 242e 000c movel %fp@(12),%d2 46644: 262e 0010 movel %fp@(16),%d3 Timer_Control *the_timer; Objects_Locations location; ISR_Level level; if ( ticks == 0 ) 46648: 4a82 tstl %d2 4664a: 6700 0094 beqw 466e0 return RTEMS_INVALID_NUMBER; if ( !routine ) 4664e: 4a83 tstl %d3 46650: 6700 00ae beqw 46700 RTEMS_INLINE_ROUTINE Timer_Control *_Timer_Get ( Objects_Id id, Objects_Locations *location ) { return (Timer_Control *) 46654: 486e fffc pea %fp@(-4) 46658: 2f04 movel %d4,%sp@- 4665a: 4879 0005 ffde pea 5ffde <_Timer_Information> 46660: 4eb9 0004 7918 jsr 47918 <_Objects_Get> return RTEMS_INVALID_ADDRESS; the_timer = _Timer_Get( id, &location ); switch ( location ) { 46666: 4fef 000c lea %sp@(12),%sp 4666a: 2440 moveal %d0,%a2 4666c: 4aae fffc tstl %fp@(-4) 46670: 6662 bnes 466d4 case OBJECTS_LOCAL: (void) _Watchdog_Remove( &the_timer->Ticker ); 46672: 2a00 movel %d0,%d5 46674: 0685 0000 0010 addil #16,%d5 4667a: 2f05 movel %d5,%sp@- 4667c: 4eb9 0004 9410 jsr 49410 <_Watchdog_Remove> _ISR_Disable( level ); 46682: 203c 0000 0700 movel #1792,%d0 46688: 40c1 movew %sr,%d1 4668a: 8081 orl %d1,%d0 4668c: 46c0 movew %d0,%sr /* * Check to see if the watchdog has just been inserted by a * higher priority interrupt. If so, abandon this insert. */ if ( the_timer->Ticker.state != WATCHDOG_INACTIVE ) { 4668e: 588f addql #4,%sp 46690: 4aaa 0018 tstl %a2@(24) 46694: 6656 bnes 466ec <== NEVER TAKEN Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; 46696: 2543 002c movel %d3,%a2@(44) the_watchdog->id = id; the_watchdog->user_data = user_data; 4669a: 256e 0014 0034 movel %fp@(20),%a2@(52) void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; the_watchdog->id = id; 466a0: 2544 0030 movel %d4,%a2@(48) /* * OK. Now we now the timer was not rescheduled by an interrupt * so we can atomically initialize it as in use. */ the_timer->the_class = TIMER_INTERVAL; 466a4: 42aa 0038 clrl %a2@(56) Watchdog_Service_routine_entry routine, Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; 466a8: 42aa 0018 clrl %a2@(24) _Watchdog_Initialize( &the_timer->Ticker, routine, id, user_data ); _ISR_Enable( level ); 466ac: 46c1 movew %d1,%sr Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 466ae: 2542 001c movel %d2,%a2@(28) _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 466b2: 2f05 movel %d5,%sp@- 466b4: 4879 0005 f864 pea 5f864 <_Watchdog_Ticks_chain> 466ba: 4eb9 0004 92c8 jsr 492c8 <_Watchdog_Insert> _Watchdog_Insert_ticks( &the_timer->Ticker, ticks ); _Thread_Enable_dispatch(); 466c0: 4eb9 0004 8128 jsr 48128 <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; 466c6: 508f addql #8,%sp _Watchdog_Initialize( &the_timer->Ticker, routine, id, user_data ); _ISR_Enable( level ); _Watchdog_Insert_ticks( &the_timer->Ticker, ticks ); _Thread_Enable_dispatch(); 466c8: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 466ca: 4cee 043c ffe8 moveml %fp@(-24),%d2-%d5/%a2 466d0: 4e5e unlk %fp 466d2: 4e75 rts if ( !routine ) return RTEMS_INVALID_ADDRESS; the_timer = _Timer_Get( id, &location ); switch ( location ) { 466d4: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 466d6: 4cee 043c ffe8 moveml %fp@(-24),%d2-%d5/%a2 466dc: 4e5e unlk %fp 466de: 4e75 rts { Timer_Control *the_timer; Objects_Locations location; ISR_Level level; if ( ticks == 0 ) 466e0: 700a moveq #10,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 466e2: 4cee 043c ffe8 moveml %fp@(-24),%d2-%d5/%a2 466e8: 4e5e unlk %fp 466ea: 4e75 rts * Check to see if the watchdog has just been inserted by a * higher priority interrupt. If so, abandon this insert. */ if ( the_timer->Ticker.state != WATCHDOG_INACTIVE ) { _ISR_Enable( level ); 466ec: 46c1 movew %d1,%sr _Thread_Enable_dispatch(); 466ee: 4eb9 0004 8128 jsr 48128 <_Thread_Enable_dispatch> 466f4: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 466f6: 4cee 043c ffe8 moveml %fp@(-24),%d2-%d5/%a2 466fc: 4e5e unlk %fp 466fe: 4e75 rts ISR_Level level; if ( ticks == 0 ) return RTEMS_INVALID_NUMBER; if ( !routine ) 46700: 7009 moveq #9,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 46702: 4cee 043c ffe8 moveml %fp@(-24),%d2-%d5/%a2 46708: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 000591bc : rtems_status_code rtems_timer_initiate_server( uint32_t priority, uint32_t stack_size, rtems_attribute attribute_set ) { 591bc: 4e56 fffc linkw %fp,#-4 591c0: 202e 0008 movel %fp@(8),%d0 591c4: 2f03 movel %d3,%sp@- 591c6: 2f02 movel %d2,%sp@- 591c8: 4a80 tstl %d0 591ca: 6748 beqs 59214 591cc: 4281 clrl %d1 591ce: 1239 0007 8c62 moveb 78c62 ,%d1 591d4: b280 cmpl %d0,%d1 591d6: 644a bccs 59222 * structured so we check it is invalid before looking for * a specific invalid value as the default. */ _priority = priority; if ( !_RTEMS_tasks_Priority_is_valid( priority ) ) { if ( priority != RTEMS_TIMER_SERVER_DEFAULT_PRIORITY ) 591d8: 72ff moveq #-1,%d1 591da: b280 cmpl %d0,%d1 591dc: 6636 bnes 59214 591de: 2239 0007 e7cc movel 7e7cc <_Thread_Dispatch_disable_level>,%d1 591e4: 5281 addql #1,%d1 591e6: 4283 clrl %d3 591e8: 23c1 0007 e7cc movel %d1,7e7cc <_Thread_Dispatch_disable_level> /* * Just to make sure this is only called once. */ _Thread_Disable_dispatch(); tmpInitialized = initialized; initialized = true; 591ee: 7001 moveq #1,%d0 /* * Just to make sure this is only called once. */ _Thread_Disable_dispatch(); tmpInitialized = initialized; 591f0: 1439 0007 9c14 moveb 79c14 ,%d2 initialized = true; 591f6: 13c0 0007 9c14 moveb %d0,79c14 _Thread_Enable_dispatch(); 591fc: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> if ( tmpInitialized ) 59202: 4a02 tstb %d2 59204: 6744 beqs 5924a initialized = false; } #endif return status; } 59206: 242e fff4 movel %fp@(-12),%d2 _Thread_Disable_dispatch(); tmpInitialized = initialized; initialized = true; _Thread_Enable_dispatch(); if ( tmpInitialized ) 5920a: 700e moveq #14,%d0 initialized = false; } #endif return status; } 5920c: 262e fff8 movel %fp@(-8),%d3 59210: 4e5e unlk %fp 59212: 4e75 rts 59214: 242e fff4 movel %fp@(-12),%d2 if (status) { initialized = false; } #endif return status; 59218: 7013 moveq #19,%d0 } 5921a: 262e fff8 movel %fp@(-8),%d3 5921e: 4e5e unlk %fp 59220: 4e75 rts 59222: 2239 0007 e7cc movel 7e7cc <_Thread_Dispatch_disable_level>,%d1 59228: 5281 addql #1,%d1 5922a: 2600 movel %d0,%d3 5922c: 23c1 0007 e7cc movel %d1,7e7cc <_Thread_Dispatch_disable_level> /* * Just to make sure this is only called once. */ _Thread_Disable_dispatch(); tmpInitialized = initialized; initialized = true; 59232: 7001 moveq #1,%d0 /* * Just to make sure this is only called once. */ _Thread_Disable_dispatch(); tmpInitialized = initialized; 59234: 1439 0007 9c14 moveb 79c14 ,%d2 initialized = true; 5923a: 13c0 0007 9c14 moveb %d0,79c14 _Thread_Enable_dispatch(); 59240: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> if ( tmpInitialized ) 59246: 4a02 tstb %d2 59248: 66bc bnes 59206 <== NEVER TAKEN * other library rules. For example, if using a TSR written in Ada the * Server should run at the same priority as the priority Ada task. * Otherwise, the priority ceiling for the mutex used to protect the * GNAT run-time is violated. */ status = rtems_task_create( 5924a: 486e fffc pea %fp@(-4) 5924e: 222e 0010 movel %fp@(16),%d1 59252: 08c1 000f bset #15,%d1 59256: 2f01 movel %d1,%sp@- 59258: 4878 0100 pea 100 5925c: 2f2e 000c movel %fp@(12),%sp@- 59260: 2f03 movel %d3,%sp@- 59262: 2f3c 5449 4d45 movel #1414090053,%sp@- 59268: 4eb9 0005 8250 jsr 58250 /* user may want floating point but we need */ /* system task specified for 0 priority */ attribute_set | RTEMS_SYSTEM_TASK, &id /* get the id back */ ); if (status) { 5926e: 4fef 0018 lea %sp@(24),%sp 59272: 4a80 tstl %d0 59274: 6714 beqs 5928a initialized = false; } #endif return status; } 59276: 242e fff4 movel %fp@(-12),%d2 /* system task specified for 0 priority */ attribute_set | RTEMS_SYSTEM_TASK, &id /* get the id back */ ); if (status) { initialized = false; 5927a: 4201 clrb %d1 initialized = false; } #endif return status; } 5927c: 262e fff8 movel %fp@(-8),%d3 59280: 4e5e unlk %fp /* system task specified for 0 priority */ attribute_set | RTEMS_SYSTEM_TASK, &id /* get the id back */ ); if (status) { initialized = false; 59282: 13c1 0007 9c14 moveb %d1,79c14 initialized = false; } #endif return status; } 59288: 4e75 rts */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 5928a: 41f9 0007 9c4a lea 79c4a <_Timer_server_Default+0x34>,%a0 /* * We work with the TCB pointer, not the ID, so we need to convert * to a TCB pointer from here out. */ ts->thread = (Thread_Control *)_Objects_Get_local_object( 59290: 4282 clrl %d2 the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain); 59292: 223c 0007 9c46 movel #498758,%d1 */ RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); 59298: 23c8 0007 9c46 movel %a0,79c46 <_Timer_server_Default+0x30> &_RTEMS_tasks_Information, _Objects_Get_index(id) 5929e: 202e fffc movel %fp@(-4),%d0 592a2: 41f9 0007 9c82 lea 79c82 <_Timer_server_Default+0x6c>,%a0 592a8: 23c8 0007 9c7e movel %a0,79c7e <_Timer_server_Default+0x68> /* * We work with the TCB pointer, not the ID, so we need to convert * to a TCB pointer from here out. */ ts->thread = (Thread_Control *)_Objects_Get_local_object( 592ae: 2079 0007 e756 moveal 7e756 <_RTEMS_tasks_Information+0x18>,%a0 592b4: 3400 movew %d0,%d2 the_chain->permanent_null = NULL; the_chain->last = _Chain_Head(the_chain); 592b6: 23c1 0007 9c4e movel %d1,79c4e <_Timer_server_Default+0x38> * Initialize the pointer to the timer schedule method so applications that * do not use the Timer Server do not have to pull it in. */ ts->schedule_operation = _Timer_server_Schedule_operation_method; ts->Interval_watchdogs.last_snapshot = _Watchdog_Ticks_since_boot; 592bc: 2239 0007 e910 movel 7e910 <_Watchdog_Ticks_since_boot>,%d1 /* * We work with the TCB pointer, not the ID, so we need to convert * to a TCB pointer from here out. */ ts->thread = (Thread_Control *)_Objects_Get_local_object( 592c2: 41f0 2c00 lea %a0@(00000000,%d2:l:4),%a0 592c6: 23d0 0007 9c16 movel %a0@,79c16 <_Timer_server_Default> 592cc: 41f9 0007 9c7e lea 79c7e <_Timer_server_Default+0x68>,%a0 592d2: 23c8 0007 9c86 movel %a0,79c86 <_Timer_server_Default+0x70> _Timer_server = ts; /* * Start the timer server */ status = rtems_task_start( 592d8: 4879 0007 9c16 pea 79c16 <_Timer_server_Default> the_watchdog->routine = routine; 592de: 41f9 0005 c12c lea 5c12c <_Thread_Delay_ended>,%a0 592e4: 23c8 0007 9c3a movel %a0,79c3a <_Timer_server_Default+0x24> 592ea: 487a 0160 pea %pc@(5944c <_Timer_server_Body>) 592ee: 23c8 0007 9c72 movel %a0,79c72 <_Timer_server_Default+0x5c> * do not use the Timer Server do not have to pull it in. */ ts->schedule_operation = _Timer_server_Schedule_operation_method; ts->Interval_watchdogs.last_snapshot = _Watchdog_Ticks_since_boot; ts->TOD_watchdogs.last_snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch(); 592f4: 41f9 0007 e85e lea 7e85e <_TOD_Now>,%a0 * Initialize the pointer to the timer schedule method so applications that * do not use the Timer Server do not have to pull it in. */ ts->schedule_operation = _Timer_server_Schedule_operation_method; ts->Interval_watchdogs.last_snapshot = _Watchdog_Ticks_since_boot; 592fa: 23c1 0007 9c52 movel %d1,79c52 <_Timer_server_Default+0x3c> ts->TOD_watchdogs.last_snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch(); 59300: 23d0 0007 9c8a movel %a0@,79c8a <_Timer_server_Default+0x74> /* * Initialize the pointer to the timer schedule method so applications that * do not use the Timer Server do not have to pull it in. */ ts->schedule_operation = _Timer_server_Schedule_operation_method; 59306: 223c 0005 9688 movel #366216,%d1 ts->active = false; /* * The default timer server is now available. */ _Timer_server = ts; 5930c: 41f9 0007 9c16 lea 79c16 <_Timer_server_Default>,%a0 /* * Initialize the pointer to the timer schedule method so applications that * do not use the Timer Server do not have to pull it in. */ ts->schedule_operation = _Timer_server_Schedule_operation_method; 59312: 23c1 0007 9c1a movel %d1,79c1a <_Timer_server_Default+0x4> ts->Interval_watchdogs.last_snapshot = _Watchdog_Ticks_since_boot; ts->TOD_watchdogs.last_snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch(); ts->insert_chain = NULL; ts->active = false; 59318: 4201 clrb %d1 ts->schedule_operation = _Timer_server_Schedule_operation_method; ts->Interval_watchdogs.last_snapshot = _Watchdog_Ticks_since_boot; ts->TOD_watchdogs.last_snapshot = (Watchdog_Interval) _TOD_Seconds_since_epoch(); ts->insert_chain = NULL; 5931a: 42b9 0007 9c8e clrl 79c8e <_Timer_server_Default+0x78> ts->active = false; 59320: 13c1 0007 9c92 moveb %d1,79c92 <_Timer_server_Default+0x7c> _Timer_server = ts; /* * Start the timer server */ status = rtems_task_start( 59326: 2f00 movel %d0,%sp@- ts->active = false; /* * The default timer server is now available. */ _Timer_server = ts; 59328: 23c8 0007 f09a movel %a0,7f09a <_Timer_server> RTEMS_INLINE_ROUTINE void _Chain_Initialize_empty( Chain_Control *the_chain ) { the_chain->first = _Chain_Tail(the_chain); the_chain->permanent_null = NULL; 5932e: 42b9 0007 9c4a clrl 79c4a <_Timer_server_Default+0x34> 59334: 42b9 0007 9c82 clrl 79c82 <_Timer_server_Default+0x6c> Watchdog_Service_routine_entry routine, Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; 5933a: 42b9 0007 9c26 clrl 79c26 <_Timer_server_Default+0x10> the_watchdog->routine = routine; the_watchdog->id = id; 59340: 23c0 0007 9c3e movel %d0,79c3e <_Timer_server_Default+0x28> the_watchdog->user_data = user_data; 59346: 42b9 0007 9c42 clrl 79c42 <_Timer_server_Default+0x2c> Watchdog_Service_routine_entry routine, Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; 5934c: 42b9 0007 9c5e clrl 79c5e <_Timer_server_Default+0x48> the_watchdog->routine = routine; the_watchdog->id = id; 59352: 23c0 0007 9c76 movel %d0,79c76 <_Timer_server_Default+0x60> the_watchdog->user_data = user_data; 59358: 42b9 0007 9c7a clrl 79c7a <_Timer_server_Default+0x64> /* * Start the timer server */ status = rtems_task_start( 5935e: 4eb9 0005 8958 jsr 58958 initialized = false; } #endif return status; } 59364: 242e fff4 movel %fp@(-12),%d2 if (status) { initialized = false; } #endif return status; 59368: 4fef 000c lea %sp@(12),%sp } 5936c: 262e fff8 movel %fp@(-8),%d3 59370: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00058f30 : */ rtems_status_code rtems_timer_reset( rtems_id id ) { 58f30: 4e56 fff0 linkw %fp,#-16 58f34: 48d7 0c04 moveml %d2/%a2-%a3,%sp@ 58f38: 486e fffc pea %fp@(-4) 58f3c: 2f2e 0008 movel %fp@(8),%sp@- 58f40: 4879 0007 f060 pea 7f060 <_Timer_Information> 58f46: 4eb9 0005 b9a4 jsr 5b9a4 <_Objects_Get> Timer_Control *the_timer; Objects_Locations location; rtems_status_code status = RTEMS_SUCCESSFUL; the_timer = _Timer_Get( id, &location ); switch ( location ) { 58f4c: 4fef 000c lea %sp@(12),%sp 58f50: 2440 moveal %d0,%a2 58f52: 4aae fffc tstl %fp@(-4) 58f56: 670e beqs 58f66 58f58: 7404 moveq #4,%d2 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 58f5a: 2002 movel %d2,%d0 58f5c: 4cee 0c04 fff0 moveml %fp@(-16),%d2/%a2-%a3 58f62: 4e5e unlk %fp 58f64: 4e75 rts the_timer = _Timer_Get( id, &location ); switch ( location ) { case OBJECTS_LOCAL: if ( the_timer->the_class == TIMER_INTERVAL ) { 58f66: 202a 0038 movel %a2@(56),%d0 58f6a: 671a beqs 58f86 _Watchdog_Remove( &the_timer->Ticker ); _Watchdog_Insert( &_Watchdog_Ticks_chain, &the_timer->Ticker ); } else if ( the_timer->the_class == TIMER_INTERVAL_ON_TASK ) { 58f6c: 7201 moveq #1,%d1 58f6e: b280 cmpl %d0,%d1 58f70: 673c beqs 58fae 58f72: 740b moveq #11,%d2 * TIMER_TIME_OF_DAY, or TIMER_TIME_OF_DAY_ON_TASK). We * can only reset active interval timers. */ status = RTEMS_NOT_DEFINED; } _Thread_Enable_dispatch(); 58f74: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 58f7a: 2002 movel %d2,%d0 58f7c: 4cee 0c04 fff0 moveml %fp@(-16),%d2/%a2-%a3 58f82: 4e5e unlk %fp 58f84: 4e75 rts the_timer = _Timer_Get( id, &location ); switch ( location ) { case OBJECTS_LOCAL: if ( the_timer->the_class == TIMER_INTERVAL ) { _Watchdog_Remove( &the_timer->Ticker ); 58f86: 45ea 0010 lea %a2@(16),%a2 _Watchdog_Insert( &_Watchdog_Ticks_chain, &the_timer->Ticker ); 58f8a: 4282 clrl %d2 the_timer = _Timer_Get( id, &location ); switch ( location ) { case OBJECTS_LOCAL: if ( the_timer->the_class == TIMER_INTERVAL ) { _Watchdog_Remove( &the_timer->Ticker ); 58f8c: 2f0a movel %a2,%sp@- 58f8e: 4eb9 0005 d8e4 jsr 5d8e4 <_Watchdog_Remove> _Watchdog_Insert( &_Watchdog_Ticks_chain, &the_timer->Ticker ); 58f94: 2f0a movel %a2,%sp@- 58f96: 4879 0007 e8a4 pea 7e8a4 <_Watchdog_Ticks_chain> 58f9c: 4eb9 0005 d79c jsr 5d79c <_Watchdog_Insert> 58fa2: 4fef 000c lea %sp@(12),%sp * TIMER_TIME_OF_DAY, or TIMER_TIME_OF_DAY_ON_TASK). We * can only reset active interval timers. */ status = RTEMS_NOT_DEFINED; } _Thread_Enable_dispatch(); 58fa6: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> 58fac: 60cc bras 58f7a if ( !timer_server ) { _Thread_Enable_dispatch(); return RTEMS_INCORRECT_STATE; } #endif _Watchdog_Remove( &the_timer->Ticker ); 58fae: 486a 0010 pea %a2@(16) (*timer_server->schedule_operation)( timer_server, the_timer ); 58fb2: 4282 clrl %d2 case OBJECTS_LOCAL: if ( the_timer->the_class == TIMER_INTERVAL ) { _Watchdog_Remove( &the_timer->Ticker ); _Watchdog_Insert( &_Watchdog_Ticks_chain, &the_timer->Ticker ); } else if ( the_timer->the_class == TIMER_INTERVAL_ON_TASK ) { Timer_server_Control *timer_server = _Timer_server; 58fb4: 2679 0007 f09a moveal 7f09a <_Timer_server>,%a3 if ( !timer_server ) { _Thread_Enable_dispatch(); return RTEMS_INCORRECT_STATE; } #endif _Watchdog_Remove( &the_timer->Ticker ); 58fba: 4eb9 0005 d8e4 jsr 5d8e4 <_Watchdog_Remove> (*timer_server->schedule_operation)( timer_server, the_timer ); 58fc0: 2f0a movel %a2,%sp@- 58fc2: 2f0b movel %a3,%sp@- 58fc4: 206b 0004 moveal %a3@(4),%a0 58fc8: 4e90 jsr %a0@ 58fca: 4fef 000c lea %sp@(12),%sp * TIMER_TIME_OF_DAY, or TIMER_TIME_OF_DAY_ON_TASK). We * can only reset active interval timers. */ status = RTEMS_NOT_DEFINED; } _Thread_Enable_dispatch(); 58fce: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> 58fd4: 60a4 bras 58f7a ... =============================================================================== 000590c0 : rtems_id id, rtems_time_of_day *wall_time, rtems_timer_service_routine_entry routine, void *user_data ) { 590c0: 4e56 ffec linkw %fp,#-20 590c4: 48d7 0c0c moveml %d2-%d3/%a2-%a3,%sp@ 590c8: 242e 000c movel %fp@(12),%d2 590cc: 262e 0010 movel %fp@(16),%d3 Timer_Control *the_timer; Objects_Locations location; rtems_interval seconds; Timer_server_Control *timer_server = _Timer_server; 590d0: 2479 0007 f09a moveal 7f09a <_Timer_server>,%a2 if ( !timer_server ) 590d6: 4a8a tstl %a2 590d8: 6700 00c8 beqw 591a2 return RTEMS_INCORRECT_STATE; if ( !_TOD_Is_set ) 590dc: 4a39 0007 e7e0 tstb 7e7e0 <_TOD_Is_set> 590e2: 6700 00a6 beqw 5918a return RTEMS_NOT_DEFINED; if ( !routine ) 590e6: 4a83 tstl %d3 590e8: 6700 00ac beqw 59196 return RTEMS_INVALID_ADDRESS; if ( !_TOD_Validate( wall_time ) ) 590ec: 2f02 movel %d2,%sp@- 590ee: 4eb9 0005 5d94 jsr 55d94 <_TOD_Validate> 590f4: 588f addql #4,%sp 590f6: 4a00 tstb %d0 590f8: 660c bnes 59106 the_timer->Ticker.initial = seconds - _TOD_Seconds_since_epoch(); (*timer_server->schedule_operation)( timer_server, the_timer ); _Thread_Enable_dispatch(); return RTEMS_SUCCESSFUL; 590fa: 7014 moveq #20,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 590fc: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 59102: 4e5e unlk %fp 59104: 4e75 rts return RTEMS_INVALID_ADDRESS; if ( !_TOD_Validate( wall_time ) ) return RTEMS_INVALID_CLOCK; seconds = _TOD_To_seconds( wall_time ); 59106: 2f02 movel %d2,%sp@- 59108: 4eb9 0005 5c84 jsr 55c84 <_TOD_To_seconds> if ( seconds <= _TOD_Seconds_since_epoch() ) 5910e: 588f addql #4,%sp return RTEMS_INVALID_ADDRESS; if ( !_TOD_Validate( wall_time ) ) return RTEMS_INVALID_CLOCK; seconds = _TOD_To_seconds( wall_time ); 59110: 2400 movel %d0,%d2 if ( seconds <= _TOD_Seconds_since_epoch() ) 59112: b0b9 0007 e85e cmpl 7e85e <_TOD_Now>,%d0 59118: 63e0 blss 590fa 5911a: 486e fffc pea %fp@(-4) 5911e: 2f2e 0008 movel %fp@(8),%sp@- 59122: 4879 0007 f060 pea 7f060 <_Timer_Information> 59128: 4eb9 0005 b9a4 jsr 5b9a4 <_Objects_Get> return RTEMS_INVALID_CLOCK; the_timer = _Timer_Get( id, &location ); switch ( location ) { 5912e: 4fef 000c lea %sp@(12),%sp 59132: 2640 moveal %d0,%a3 59134: 4aae fffc tstl %fp@(-4) 59138: 6674 bnes 591ae case OBJECTS_LOCAL: (void) _Watchdog_Remove( &the_timer->Ticker ); 5913a: 486b 0010 pea %a3@(16) 5913e: 4eb9 0005 d8e4 jsr 5d8e4 <_Watchdog_Remove> the_watchdog->routine = routine; the_watchdog->id = id; 59144: 202e 0008 movel %fp@(8),%d0 59148: 2740 0030 movel %d0,%a3@(48) the_timer->the_class = TIMER_TIME_OF_DAY_ON_TASK; _Watchdog_Initialize( &the_timer->Ticker, routine, id, user_data ); the_timer->Ticker.initial = seconds - _TOD_Seconds_since_epoch(); 5914c: 94b9 0007 e85e subl 7e85e <_TOD_Now>,%d2 the_timer = _Timer_Get( id, &location ); switch ( location ) { case OBJECTS_LOCAL: (void) _Watchdog_Remove( &the_timer->Ticker ); the_timer->the_class = TIMER_TIME_OF_DAY_ON_TASK; 59152: 7003 moveq #3,%d0 the_watchdog->user_data = user_data; 59154: 276e 0014 0034 movel %fp@(20),%a3@(52) 5915a: 2740 0038 movel %d0,%a3@(56) _Watchdog_Initialize( &the_timer->Ticker, routine, id, user_data ); the_timer->Ticker.initial = seconds - _TOD_Seconds_since_epoch(); 5915e: 2742 001c movel %d2,%a3@(28) Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; 59162: 2743 002c movel %d3,%a3@(44) Watchdog_Service_routine_entry routine, Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; 59166: 42ab 0018 clrl %a3@(24) (*timer_server->schedule_operation)( timer_server, the_timer ); 5916a: 2f0b movel %a3,%sp@- 5916c: 2f0a movel %a2,%sp@- 5916e: 206a 0004 moveal %a2@(4),%a0 59172: 4e90 jsr %a0@ _Thread_Enable_dispatch(); 59174: 4eb9 0005 c2c0 jsr 5c2c0 <_Thread_Enable_dispatch> return RTEMS_SUCCESSFUL; 5917a: 4fef 000c lea %sp@(12),%sp _Watchdog_Initialize( &the_timer->Ticker, routine, id, user_data ); the_timer->Ticker.initial = seconds - _TOD_Seconds_since_epoch(); (*timer_server->schedule_operation)( timer_server, the_timer ); _Thread_Enable_dispatch(); 5917e: 4280 clrl %d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 59180: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 59186: 4e5e unlk %fp 59188: 4e75 rts Timer_server_Control *timer_server = _Timer_server; if ( !timer_server ) return RTEMS_INCORRECT_STATE; if ( !_TOD_Is_set ) 5918a: 700b moveq #11,%d0 <== NOT EXECUTED case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 5918c: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 <== NOT EXECUTED 59192: 4e5e unlk %fp <== NOT EXECUTED 59194: 4e75 rts <== NOT EXECUTED return RTEMS_INCORRECT_STATE; if ( !_TOD_Is_set ) return RTEMS_NOT_DEFINED; if ( !routine ) 59196: 7009 moveq #9,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 59198: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 5919e: 4e5e unlk %fp 591a0: 4e75 rts Timer_Control *the_timer; Objects_Locations location; rtems_interval seconds; Timer_server_Control *timer_server = _Timer_server; if ( !timer_server ) 591a2: 700e moveq #14,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 591a4: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 591aa: 4e5e unlk %fp 591ac: 4e75 rts seconds = _TOD_To_seconds( wall_time ); if ( seconds <= _TOD_Seconds_since_epoch() ) return RTEMS_INVALID_CLOCK; the_timer = _Timer_Get( id, &location ); switch ( location ) { 591ae: 7004 moveq #4,%d0 case OBJECTS_ERROR: break; } return RTEMS_INVALID_ID; } 591b0: 4cee 0c0c ffec moveml %fp@(-20),%d2-%d3/%a2-%a3 591b6: 4e5e unlk %fp ... =============================================================================== 00046804 : int sched_get_priority_max( int policy ) { switch ( policy ) { 46804: 7004 moveq #4,%d0 #include int sched_get_priority_max( int policy ) { 46806: 4e56 0000 linkw %fp,#0 4680a: 222e 0008 movel %fp@(8),%d1 switch ( policy ) { 4680e: b081 cmpl %d1,%d0 46810: 6412 bccs 46824 case SCHED_RR: case SCHED_SPORADIC: break; default: rtems_set_errno_and_return_minus_one( EINVAL ); 46812: 4eb9 0004 fb74 jsr 4fb74 <__errno> 46818: 7216 moveq #22,%d1 4681a: 2040 moveal %d0,%a0 4681c: 70ff moveq #-1,%d0 } return POSIX_SCHEDULER_MAXIMUM_PRIORITY; } 4681e: 4e5e unlk %fp case SCHED_RR: case SCHED_SPORADIC: break; default: rtems_set_errno_and_return_minus_one( EINVAL ); 46820: 2081 movel %d1,%a0@ } return POSIX_SCHEDULER_MAXIMUM_PRIORITY; } 46822: 4e75 rts int sched_get_priority_max( int policy ) { switch ( policy ) { 46824: 103c 0001 moveb #1,%d0 46828: e3a8 lsll %d1,%d0 4682a: 7217 moveq #23,%d1 4682c: c081 andl %d1,%d0 4682e: 67e2 beqs 46812 <== NEVER TAKEN default: rtems_set_errno_and_return_minus_one( EINVAL ); } return POSIX_SCHEDULER_MAXIMUM_PRIORITY; 46830: 4280 clrl %d0 46832: 1039 0005 ebf6 moveb 5ebf6 ,%d0 } 46838: 4e5e unlk %fp default: rtems_set_errno_and_return_minus_one( EINVAL ); } return POSIX_SCHEDULER_MAXIMUM_PRIORITY; 4683a: 5380 subql #1,%d0 } ... =============================================================================== 00046840 : int sched_get_priority_min( int policy ) { switch ( policy ) { 46840: 7004 moveq #4,%d0 #include int sched_get_priority_min( int policy ) { 46842: 4e56 0000 linkw %fp,#0 46846: 222e 0008 movel %fp@(8),%d1 switch ( policy ) { 4684a: b081 cmpl %d1,%d0 4684c: 6412 bccs 46860 case SCHED_RR: case SCHED_SPORADIC: break; default: rtems_set_errno_and_return_minus_one( EINVAL ); 4684e: 4eb9 0004 fb74 jsr 4fb74 <__errno> 46854: 7216 moveq #22,%d1 46856: 2040 moveal %d0,%a0 46858: 70ff moveq #-1,%d0 } return POSIX_SCHEDULER_MINIMUM_PRIORITY; } 4685a: 4e5e unlk %fp case SCHED_RR: case SCHED_SPORADIC: break; default: rtems_set_errno_and_return_minus_one( EINVAL ); 4685c: 2081 movel %d1,%a0@ } return POSIX_SCHEDULER_MINIMUM_PRIORITY; } 4685e: 4e75 rts int sched_get_priority_min( int policy ) { switch ( policy ) { 46860: 103c 0001 moveb #1,%d0 46864: e3a8 lsll %d1,%d0 46866: 7217 moveq #23,%d1 46868: c081 andl %d1,%d0 4686a: 67e2 beqs 4684e <== NEVER TAKEN 4686c: 7001 moveq #1,%d0 default: rtems_set_errno_and_return_minus_one( EINVAL ); } return POSIX_SCHEDULER_MINIMUM_PRIORITY; } 4686e: 4e5e unlk %fp ... =============================================================================== 00046874 : int sched_rr_get_interval( pid_t pid, struct timespec *interval ) { 46874: 4e56 0000 linkw %fp,#0 46878: 2f03 movel %d3,%sp@- 4687a: 262e 0008 movel %fp@(8),%d3 4687e: 2f02 movel %d2,%sp@- 46880: 242e 000c movel %fp@(12),%d2 /* * Only supported for the "calling process" (i.e. this node). */ if ( pid && pid != getpid() ) 46884: 4a83 tstl %d3 46886: 6622 bnes 468aa <== ALWAYS TAKEN rtems_set_errno_and_return_minus_one( ESRCH ); if ( !interval ) 46888: 4a82 tstl %d2 4688a: 6742 beqs 468ce rtems_set_errno_and_return_minus_one( EINVAL ); _Timespec_From_ticks( _Thread_Ticks_per_timeslice, interval ); 4688c: 2f02 movel %d2,%sp@- 4688e: 2f39 0006 0338 movel 60338 <_Thread_Ticks_per_timeslice>,%sp@- 46894: 4eb9 0004 9fd4 jsr 49fd4 <_Timespec_From_ticks> return 0; } 4689a: 242e fff8 movel %fp@(-8),%d2 if ( !interval ) rtems_set_errno_and_return_minus_one( EINVAL ); _Timespec_From_ticks( _Thread_Ticks_per_timeslice, interval ); return 0; 4689e: 508f addql #8,%sp rtems_set_errno_and_return_minus_one( ESRCH ); if ( !interval ) rtems_set_errno_and_return_minus_one( EINVAL ); _Timespec_From_ticks( _Thread_Ticks_per_timeslice, interval ); 468a0: 4280 clrl %d0 return 0; } 468a2: 262e fffc movel %fp@(-4),%d3 468a6: 4e5e unlk %fp 468a8: 4e75 rts { /* * Only supported for the "calling process" (i.e. this node). */ if ( pid && pid != getpid() ) 468aa: 4eb9 0004 3134 jsr 43134 468b0: b680 cmpl %d0,%d3 468b2: 67d4 beqs 46888 rtems_set_errno_and_return_minus_one( ESRCH ); 468b4: 4eb9 0004 fb74 jsr 4fb74 <__errno> 468ba: 7403 moveq #3,%d2 468bc: 2040 moveal %d0,%a0 468be: 70ff moveq #-1,%d0 468c0: 2082 movel %d2,%a0@ if ( !interval ) rtems_set_errno_and_return_minus_one( EINVAL ); _Timespec_From_ticks( _Thread_Ticks_per_timeslice, interval ); return 0; } 468c2: 242e fff8 movel %fp@(-8),%d2 468c6: 262e fffc movel %fp@(-4),%d3 468ca: 4e5e unlk %fp 468cc: 4e75 rts if ( pid && pid != getpid() ) rtems_set_errno_and_return_minus_one( ESRCH ); if ( !interval ) rtems_set_errno_and_return_minus_one( EINVAL ); 468ce: 4eb9 0004 fb74 jsr 4fb74 <__errno> _Timespec_From_ticks( _Thread_Ticks_per_timeslice, interval ); return 0; } 468d4: 242e fff8 movel %fp@(-8),%d2 if ( pid && pid != getpid() ) rtems_set_errno_and_return_minus_one( ESRCH ); if ( !interval ) rtems_set_errno_and_return_minus_one( EINVAL ); 468d8: 2040 moveal %d0,%a0 468da: 7216 moveq #22,%d1 468dc: 70ff moveq #-1,%d0 _Timespec_From_ticks( _Thread_Ticks_per_timeslice, interval ); return 0; } 468de: 262e fffc movel %fp@(-4),%d3 468e2: 4e5e unlk %fp if ( pid && pid != getpid() ) rtems_set_errno_and_return_minus_one( ESRCH ); if ( !interval ) rtems_set_errno_and_return_minus_one( EINVAL ); 468e4: 2081 movel %d1,%a0@ <== NOT EXECUTED _Timespec_From_ticks( _Thread_Ticks_per_timeslice, interval ); return 0; } =============================================================================== 00048a2c : int oflag, ... /* mode_t mode, */ /* unsigned int value */ ) { 48a2c: 4e56 ffe0 linkw %fp,#-32 rtems_fatal_error_occurred( 99 ); } } #endif _Thread_Dispatch_disable_level += 1; 48a30: 2039 0006 4024 movel 64024 <_Thread_Dispatch_disable_level>,%d0 48a36: 5280 addql #1,%d0 48a38: 48d7 043c moveml %d2-%d5/%a2,%sp@ 48a3c: 23c0 0006 4024 movel %d0,64024 <_Thread_Dispatch_disable_level> 48a42: 2a2e 0008 movel %fp@(8),%d5 48a46: 262e 000c movel %fp@(12),%d3 POSIX_Semaphore_Control *the_semaphore; Objects_Locations location; _Thread_Disable_dispatch(); if ( oflag & O_CREAT ) { 48a4a: 2803 movel %d3,%d4 48a4c: 0284 0000 0200 andil #512,%d4 48a52: 6600 0086 bnew 48ada 48a56: 95ca subal %a2,%a2 mode = (mode_t) va_arg( arg, unsigned int ); value = va_arg( arg, unsigned int ); va_end(arg); } status = _POSIX_Semaphore_Name_to_id( name, &the_semaphore_id ); 48a58: 486e fffc pea %fp@(-4) 48a5c: 2f05 movel %d5,%sp@- 48a5e: 4eb9 0004 f14c jsr 4f14c <_POSIX_Semaphore_Name_to_id> * and we can just return a pointer to the id. Otherwise we may * need to check to see if this is a "semaphore does not exist" * or some other miscellaneous error on the name. */ if ( status ) { 48a64: 508f addql #8,%sp mode = (mode_t) va_arg( arg, unsigned int ); value = va_arg( arg, unsigned int ); va_end(arg); } status = _POSIX_Semaphore_Name_to_id( name, &the_semaphore_id ); 48a66: 2400 movel %d0,%d2 * and we can just return a pointer to the id. Otherwise we may * need to check to see if this is a "semaphore does not exist" * or some other miscellaneous error on the name. */ if ( status ) { 48a68: 6726 beqs 48a90 /* * Unless provided a valid name that did not already exist * and we are willing to create then it is an error. */ if ( !( status == ENOENT && (oflag & O_CREAT) ) ) { 48a6a: 7002 moveq #2,%d0 48a6c: b082 cmpl %d2,%d0 48a6e: 6604 bnes 48a74 <== NEVER TAKEN 48a70: 4a84 tstl %d4 48a72: 666e bnes 48ae2 _Thread_Enable_dispatch(); 48a74: 4eb9 0004 b464 jsr 4b464 <_Thread_Enable_dispatch> rtems_set_errno_and_return_minus_one_cast( status, sem_t * ); 48a7a: 4eb9 0005 2c24 jsr 52c24 <__errno> 48a80: 2040 moveal %d0,%a0 48a82: 70ff moveq #-1,%d0 48a84: 2082 movel %d2,%a0@ id = &the_semaphore->Semaphore_id; #else id = (sem_t *)&the_semaphore->Object.id; #endif return id; } 48a86: 4cee 043c ffe0 moveml %fp@(-32),%d2-%d5/%a2 48a8c: 4e5e unlk %fp 48a8e: 4e75 rts /* * Check for existence with creation. */ if ( (oflag & (O_CREAT | O_EXCL)) == (O_CREAT | O_EXCL) ) { 48a90: 0283 0000 0a00 andil #2560,%d3 48a96: 0c83 0000 0a00 cmpil #2560,%d3 48a9c: 676e beqs 48b0c 48a9e: 486e fff4 pea %fp@(-12) rtems_set_errno_and_return_minus_one_cast( EEXIST, sem_t * ); } the_semaphore = _POSIX_Semaphore_Get( &the_semaphore_id, &location ); the_semaphore->open_count += 1; _Thread_Enable_dispatch(); 48aa2: 45f9 0004 b464 lea 4b464 <_Thread_Enable_dispatch>,%a2 48aa8: 2f2e fffc movel %fp@(-4),%sp@- 48aac: 4879 0006 427e pea 6427e <_POSIX_Semaphore_Information> 48ab2: 4eb9 0004 ab84 jsr 4ab84 <_Objects_Get> _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one_cast( EEXIST, sem_t * ); } the_semaphore = _POSIX_Semaphore_Get( &the_semaphore_id, &location ); the_semaphore->open_count += 1; 48ab8: 2040 moveal %d0,%a0 48aba: 52a8 0016 addql #1,%a0@(22) if ( (oflag & (O_CREAT | O_EXCL)) == (O_CREAT | O_EXCL) ) { _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one_cast( EEXIST, sem_t * ); } the_semaphore = _POSIX_Semaphore_Get( &the_semaphore_id, &location ); 48abe: 2d40 fff8 movel %d0,%fp@(-8) the_semaphore->open_count += 1; _Thread_Enable_dispatch(); 48ac2: 4e92 jsr %a2@ _Thread_Enable_dispatch(); 48ac4: 4e92 jsr %a2@ return_id: #if defined(RTEMS_USE_16_BIT_OBJECT) the_semaphore->Semaphore_id = the_semaphore->Object.id; id = &the_semaphore->Semaphore_id; #else id = (sem_t *)&the_semaphore->Object.id; 48ac6: 202e fff8 movel %fp@(-8),%d0 the_semaphore = _POSIX_Semaphore_Get( &the_semaphore_id, &location ); the_semaphore->open_count += 1; _Thread_Enable_dispatch(); _Thread_Enable_dispatch(); goto return_id; 48aca: 4fef 000c lea %sp@(12),%sp return_id: #if defined(RTEMS_USE_16_BIT_OBJECT) the_semaphore->Semaphore_id = the_semaphore->Object.id; id = &the_semaphore->Semaphore_id; #else id = (sem_t *)&the_semaphore->Object.id; 48ace: 5080 addql #8,%d0 #endif return id; } 48ad0: 4cee 043c ffe0 moveml %fp@(-32),%d2-%d5/%a2 48ad6: 4e5e unlk %fp 48ad8: 4e75 rts _Thread_Disable_dispatch(); if ( oflag & O_CREAT ) { va_start(arg, oflag); mode = (mode_t) va_arg( arg, unsigned int ); value = va_arg( arg, unsigned int ); 48ada: 246e 0014 moveal %fp@(20),%a2 48ade: 6000 ff78 braw 48a58 /* * At this point, the semaphore does not exist and everything has been * checked. We should go ahead and create a semaphore. */ status =_POSIX_Semaphore_Create_support( 48ae2: 486e fff8 pea %fp@(-8) 48ae6: 2f0a movel %a2,%sp@- 48ae8: 42a7 clrl %sp@- 48aea: 2f05 movel %d5,%sp@- 48aec: 4eb9 0004 ef94 jsr 4ef94 <_POSIX_Semaphore_Create_support> 48af2: 2400 movel %d0,%d2 /* * errno was set by Create_support, so don't set it again. */ _Thread_Enable_dispatch(); 48af4: 4eb9 0004 b464 jsr 4b464 <_Thread_Enable_dispatch> if ( status == -1 ) 48afa: 4fef 0010 lea %sp@(16),%sp 48afe: 70ff moveq #-1,%d0 48b00: b082 cmpl %d2,%d0 48b02: 6782 beqs 48a86 return_id: #if defined(RTEMS_USE_16_BIT_OBJECT) the_semaphore->Semaphore_id = the_semaphore->Object.id; id = &the_semaphore->Semaphore_id; #else id = (sem_t *)&the_semaphore->Object.id; 48b04: 202e fff8 movel %fp@(-8),%d0 48b08: 5080 addql #8,%d0 48b0a: 60c4 bras 48ad0 /* * Check for existence with creation. */ if ( (oflag & (O_CREAT | O_EXCL)) == (O_CREAT | O_EXCL) ) { _Thread_Enable_dispatch(); 48b0c: 4eb9 0004 b464 jsr 4b464 <_Thread_Enable_dispatch> rtems_set_errno_and_return_minus_one_cast( EEXIST, sem_t * ); 48b12: 4eb9 0005 2c24 jsr 52c24 <__errno> 48b18: 7211 moveq #17,%d1 48b1a: 2040 moveal %d0,%a0 48b1c: 70ff moveq #-1,%d0 id = &the_semaphore->Semaphore_id; #else id = (sem_t *)&the_semaphore->Object.id; #endif return id; } 48b1e: 4cee 043c ffe0 moveml %fp@(-32),%d2-%d5/%a2 * Check for existence with creation. */ if ( (oflag & (O_CREAT | O_EXCL)) == (O_CREAT | O_EXCL) ) { _Thread_Enable_dispatch(); rtems_set_errno_and_return_minus_one_cast( EEXIST, sem_t * ); 48b24: 2081 movel %d1,%a0@ id = &the_semaphore->Semaphore_id; #else id = (sem_t *)&the_semaphore->Object.id; #endif return id; } 48b26: 4e5e unlk %fp ... =============================================================================== 00048b84 : int sem_timedwait( sem_t *sem, const struct timespec *abstime ) { 48b84: 4e56 fffc linkw %fp,#-4 48b88: 2f02 movel %d2,%sp@- * * 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 ); 48b8a: 486e fffc pea %fp@(-4) 48b8e: 2f2e 000c movel %fp@(12),%sp@- int sem_timedwait( sem_t *sem, const struct timespec *abstime ) { 48b92: 242e 0008 movel %fp@(8),%d2 * * 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 ); 48b96: 4eb9 0004 e560 jsr 4e560 <_POSIX_Absolute_timeout_to_ticks> if ( status != POSIX_ABSOLUTE_TIMEOUT_IS_IN_FUTURE ) 48b9c: 508f addql #8,%sp 48b9e: 7203 moveq #3,%d1 48ba0: b280 cmpl %d0,%d1 48ba2: 671a beqs 48bbe <== ALWAYS TAKEN do_wait = false; lock_status = _POSIX_Semaphore_Wait_support( sem, do_wait, ticks ); 48ba4: 2f2e fffc movel %fp@(-4),%sp@- <== NOT EXECUTED 48ba8: 42a7 clrl %sp@- <== NOT EXECUTED 48baa: 2f02 movel %d2,%sp@- <== NOT EXECUTED 48bac: 4eb9 0004 f1c4 jsr 4f1c4 <_POSIX_Semaphore_Wait_support> <== NOT EXECUTED break; } } return lock_status; } 48bb2: 242e fff8 movel %fp@(-8),%d2 <== NOT EXECUTED */ 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 ); 48bb6: 4fef 000c lea %sp@(12),%sp <== NOT EXECUTED break; } } return lock_status; } 48bba: 4e5e unlk %fp <== NOT EXECUTED 48bbc: 4e75 rts <== NOT EXECUTED */ 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 ); 48bbe: 2f2e fffc movel %fp@(-4),%sp@- 48bc2: 4878 0001 pea 1 48bc6: 2f02 movel %d2,%sp@- 48bc8: 4eb9 0004 f1c4 jsr 4f1c4 <_POSIX_Semaphore_Wait_support> break; } } return lock_status; } 48bce: 242e fff8 movel %fp@(-8),%d2 */ 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 ); 48bd2: 4fef 000c lea %sp@(12),%sp break; } } return lock_status; } 48bd6: 4e5e unlk %fp ... =============================================================================== 00046668 : int sigaction( int sig, const struct sigaction *act, struct sigaction *oact ) { 46668: 4e56 fff4 linkw %fp,#-12 4666c: 226e 0010 moveal %fp@(16),%a1 46670: 48d7 040c moveml %d2-%d3/%a2,%sp@ 46674: 242e 0008 movel %fp@(8),%d2 46678: 246e 000c moveal %fp@(12),%a2 ISR_Level level; if ( oact ) 4667c: 4a89 tstl %a1 4667e: 6718 beqs 46698 *oact = _POSIX_signals_Vectors[ sig ]; 46680: 2202 movel %d2,%d1 46682: 2002 movel %d2,%d0 46684: e989 lsll #4,%d1 46686: e588 lsll #2,%d0 46688: 2041 moveal %d1,%a0 4668a: 91c0 subal %d0,%a0 4668c: d1fc 0006 1386 addal #398214,%a0 46692: 22d8 movel %a0@+,%a1@+ 46694: 22d8 movel %a0@+,%a1@+ 46696: 2290 movel %a0@,%a1@ if ( !sig ) 46698: 4a82 tstl %d2 4669a: 6778 beqs 46714 rtems_set_errno_and_return_minus_one( EINVAL ); if ( !is_valid_signo(sig) ) 4669c: 2002 movel %d2,%d0 4669e: 5380 subql #1,%d0 466a0: 721f moveq #31,%d1 466a2: b280 cmpl %d0,%d1 466a4: 656e bcss 46714 * * NOTE: Solaris documentation claims to "silently enforce" this which * contradicts the POSIX specification. */ if ( sig == SIGKILL ) 466a6: 7009 moveq #9,%d0 466a8: b082 cmpl %d2,%d0 466aa: 6768 beqs 46714 /* * Evaluate the new action structure and set the global signal vector * appropriately. */ if ( act ) { 466ac: 4a8a tstl %a2 466ae: 6736 beqs 466e6 <== NEVER TAKEN /* * Unless the user is installing the default signal actions, then * we can just copy the provided sigaction structure into the vectors. */ _ISR_Disable( level ); 466b0: 203c 0000 0700 movel #1792,%d0 466b6: 40c3 movew %sr,%d3 466b8: 8083 orl %d3,%d0 466ba: 46c0 movew %d0,%sr if ( act->sa_handler == SIG_DFL ) { 466bc: 4aaa 0008 tstl %a2@(8) 466c0: 6730 beqs 466f2 _POSIX_signals_Vectors[ sig ] = _POSIX_signals_Default_vectors[ sig ]; } else { _POSIX_signals_Clear_process_signals( sig ); 466c2: 2f02 movel %d2,%sp@- 466c4: 4eb9 0004 c384 jsr 4c384 <_POSIX_signals_Clear_process_signals> _POSIX_signals_Vectors[ sig ] = *act; 466ca: 588f addql #4,%sp 466cc: 2202 movel %d2,%d1 466ce: 224a moveal %a2,%a1 466d0: e989 lsll #4,%d1 466d2: e58a lsll #2,%d2 466d4: 2041 moveal %d1,%a0 466d6: 91c2 subal %d2,%a0 466d8: d1fc 0006 1386 addal #398214,%a0 466de: 20d9 movel %a1@+,%a0@+ 466e0: 20d9 movel %a1@+,%a0@+ 466e2: 2091 movel %a1@,%a0@ } _ISR_Enable( level ); 466e4: 46c3 movew %d3,%sr 466e6: 4280 clrl %d0 * + If we are now ignoring a signal that was previously pending, * we clear the pending signal indicator. */ return 0; } 466e8: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 466ee: 4e5e unlk %fp 466f0: 4e75 rts * 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 ]; 466f2: 2002 movel %d2,%d0 466f4: e58a lsll #2,%d2 466f6: e988 lsll #4,%d0 466f8: 9082 subl %d2,%d0 466fa: 2040 moveal %d0,%a0 466fc: 2240 moveal %d0,%a1 466fe: d1fc 0006 1386 addal #398214,%a0 46704: d3fc 0005 e8e6 addal #387302,%a1 4670a: 20d9 movel %a1@+,%a0@+ 4670c: 20d9 movel %a1@+,%a0@+ 4670e: 2091 movel %a1@,%a0@ } else { _POSIX_signals_Clear_process_signals( sig ); _POSIX_signals_Vectors[ sig ] = *act; } _ISR_Enable( level ); 46710: 46c3 movew %d3,%sr 46712: 60d2 bras 466e6 * NOTE: Solaris documentation claims to "silently enforce" this which * contradicts the POSIX specification. */ if ( sig == SIGKILL ) rtems_set_errno_and_return_minus_one( EINVAL ); 46714: 4eb9 0004 fc54 jsr 4fc54 <__errno> 4671a: 7216 moveq #22,%d1 4671c: 2040 moveal %d0,%a0 4671e: 70ff moveq #-1,%d0 * + If we are now ignoring a signal that was previously pending, * we clear the pending signal indicator. */ return 0; } 46720: 4cee 040c fff4 moveml %fp@(-12),%d2-%d3/%a2 * NOTE: Solaris documentation claims to "silently enforce" this which * contradicts the POSIX specification. */ if ( sig == SIGKILL ) rtems_set_errno_and_return_minus_one( EINVAL ); 46726: 2081 movel %d1,%a0@ * + If we are now ignoring a signal that was previously pending, * we clear the pending signal indicator. */ return 0; } 46728: 4e5e unlk %fp <== NOT EXECUTED =============================================================================== 00048b74 : #include int sigsuspend( const sigset_t *sigmask ) { 48b74: 4e56 ffec linkw %fp,#-20 48b78: 48d7 040c moveml %d2-%d3/%a2,%sp@ int status; POSIX_API_Control *api; api = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ]; status = sigprocmask( SIG_BLOCK, sigmask, &saved_signals_blocked ); 48b7c: 240e movel %fp,%d2 48b7e: 5982 subql #4,%d2 48b80: 45f9 0004 8b4c lea 48b4c ,%a2 (void) sigfillset( &all_signals ); 48b86: 260e movel %fp,%d3 48b88: 5183 subql #8,%d3 int status; POSIX_API_Control *api; api = _Thread_Executing->API_Extensions[ THREAD_API_POSIX ]; status = sigprocmask( SIG_BLOCK, sigmask, &saved_signals_blocked ); 48b8a: 2f02 movel %d2,%sp@- 48b8c: 2f2e 0008 movel %fp@(8),%sp@- 48b90: 4878 0001 pea 1 48b94: 4e92 jsr %a2@ (void) sigfillset( &all_signals ); 48b96: 2f03 movel %d3,%sp@- 48b98: 4eb9 0004 8aa8 jsr 48aa8 status = sigtimedwait( &all_signals, NULL, NULL ); 48b9e: 42a7 clrl %sp@- 48ba0: 42a7 clrl %sp@- 48ba2: 2f03 movel %d3,%sp@- 48ba4: 4eb9 0004 8c30 jsr 48c30 48baa: 2600 movel %d0,%d3 (void) sigprocmask( SIG_SETMASK, &saved_signals_blocked, NULL ); 48bac: 42a7 clrl %sp@- 48bae: 2f02 movel %d2,%sp@- 48bb0: 42a7 clrl %sp@- 48bb2: 4e92 jsr %a2@ /* * sigtimedwait() returns the signal number while sigsuspend() * is supposed to return -1 and EINTR when a signal is caught. */ if ( status != -1 ) 48bb4: 4fef 0028 lea %sp@(40),%sp 48bb8: 70ff moveq #-1,%d0 48bba: b083 cmpl %d3,%d0 48bbc: 660c bnes 48bca <== ALWAYS TAKEN rtems_set_errno_and_return_minus_one( EINTR ); return status; } 48bbe: 70ff moveq #-1,%d0 <== NOT EXECUTED 48bc0: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 <== NOT EXECUTED 48bc6: 4e5e unlk %fp <== NOT EXECUTED 48bc8: 4e75 rts <== NOT EXECUTED /* * sigtimedwait() returns the signal number while sigsuspend() * is supposed to return -1 and EINTR when a signal is caught. */ if ( status != -1 ) rtems_set_errno_and_return_minus_one( EINTR ); 48bca: 4eb9 0005 1eec jsr 51eec <__errno> 48bd0: 2040 moveal %d0,%a0 48bd2: 7004 moveq #4,%d0 return status; } 48bd4: 4cee 040c ffec moveml %fp@(-20),%d2-%d3/%a2 /* * sigtimedwait() returns the signal number while sigsuspend() * is supposed to return -1 and EINTR when a signal is caught. */ if ( status != -1 ) rtems_set_errno_and_return_minus_one( EINTR ); 48bda: 2080 movel %d0,%a0@ return status; } 48bdc: 70ff moveq #-1,%d0 48bde: 4e5e unlk %fp ... =============================================================================== 00048e18 : int sigwait( const sigset_t *set, int *sig ) { 48e18: 4e56 0000 linkw %fp,#0 48e1c: 2f0a movel %a2,%sp@- int status; status = sigtimedwait( set, NULL, NULL ); 48e1e: 42a7 clrl %sp@- int sigwait( const sigset_t *set, int *sig ) { 48e20: 246e 000c moveal %fp@(12),%a2 int status; status = sigtimedwait( set, NULL, NULL ); 48e24: 42a7 clrl %sp@- 48e26: 2f2e 0008 movel %fp@(8),%sp@- 48e2a: 4eb9 0004 8c30 jsr 48c30 if ( status != -1 ) { 48e30: 4fef 000c lea %sp@(12),%sp 48e34: 72ff moveq #-1,%d1 48e36: b280 cmpl %d0,%d1 48e38: 6710 beqs 48e4a if ( sig ) 48e3a: 4a8a tstl %a2 48e3c: 6702 beqs 48e40 <== NEVER TAKEN *sig = status; 48e3e: 2480 movel %d0,%a2@ return 0; } return errno; } 48e40: 246e fffc moveal %fp@(-4),%a2 status = sigtimedwait( set, NULL, NULL ); if ( status != -1 ) { if ( sig ) *sig = status; 48e44: 4280 clrl %d0 return 0; } return errno; } 48e46: 4e5e unlk %fp 48e48: 4e75 rts if ( sig ) *sig = status; return 0; } return errno; 48e4a: 4eb9 0005 1eec jsr 51eec <__errno> } 48e50: 246e fffc moveal %fp@(-4),%a2 if ( sig ) *sig = status; return 0; } return errno; 48e54: 2040 moveal %d0,%a0 } 48e56: 4e5e unlk %fp if ( sig ) *sig = status; return 0; } return errno; 48e58: 2010 movel %a0@,%d0 <== NOT EXECUTED } =============================================================================== 000459f4 : timer_t timerid, int flags, const struct itimerspec *value, struct itimerspec *ovalue ) { 459f4: 4e56 ffc8 linkw %fp,#-56 459f8: 202e 000c movel %fp@(12),%d0 459fc: 48d7 3c1c moveml %d2-%d4/%a2-%a5,%sp@ 45a00: 266e 0010 moveal %fp@(16),%a3 45a04: 282e 0014 movel %fp@(20),%d4 Objects_Locations location; bool activated; uint32_t initial_period; struct itimerspec normalize; if ( !value ) 45a08: 4a8b tstl %a3 45a0a: 6700 0194 beqw 45ba0 rtems_set_errno_and_return_minus_one( EINVAL ); /* First, it verifies if the structure "value" is correct */ if ( ( value->it_value.tv_nsec >= TOD_NANOSECONDS_PER_SECOND ) || 45a0e: 223c 3b9a c9ff movel #999999999,%d1 45a14: b2ab 000c cmpl %a3@(12),%d1 45a18: 6500 0186 bcsw 45ba0 ( value->it_value.tv_nsec < 0 ) || ( value->it_interval.tv_nsec >= TOD_NANOSECONDS_PER_SECOND) || 45a1c: b2ab 0004 cmpl %a3@(4),%d1 45a20: 6500 017e bcsw 45ba0 ( value->it_interval.tv_nsec < 0 )) { /* The number of nanoseconds is not correct */ rtems_set_errno_and_return_minus_one( EINVAL ); } if ( flags != TIMER_ABSTIME && flags != POSIX_TIMER_RELATIVE ) { 45a24: 7204 moveq #4,%d1 45a26: b280 cmpl %d0,%d1 45a28: 6700 00fa beqw 45b24 45a2c: 4a80 tstl %d0 45a2e: 6600 0170 bnew 45ba0 rtems_set_errno_and_return_minus_one( EINVAL ); } normalize = *value; 45a32: 260e movel %fp,%d3 45a34: 0683 ffff ffe4 addil #-28,%d3 45a3a: 204b moveal %a3,%a0 45a3c: 2243 moveal %d3,%a1 45a3e: 240e movel %fp,%d2 45a40: 0682 ffff ffe8 addil #-24,%d2 45a46: 49ee ffec lea %fp@(-20),%a4 45a4a: 4bee fff0 lea %fp@(-16),%a5 45a4e: 2298 movel %a0@+,%a1@ 45a50: 2242 moveal %d2,%a1 45a52: 2298 movel %a0@+,%a1@ 45a54: 2898 movel %a0@+,%a4@ 45a56: 2a90 movel %a0@,%a5@ RTEMS_INLINE_ROUTINE POSIX_Timer_Control *_POSIX_Timer_Get ( timer_t id, Objects_Locations *location ) { return (POSIX_Timer_Control *) 45a58: 486e fffc pea %fp@(-4) 45a5c: 2f2e 0008 movel %fp@(8),%sp@- 45a60: 4879 0005 ff4c pea 5ff4c <_POSIX_Timer_Information> 45a66: 4eb9 0004 7e7c jsr 47e7c <_Objects_Get> * something with the structure of times of the timer: to stop, start * or start it again */ ptimer = _POSIX_Timer_Get( timerid, &location ); switch ( location ) { 45a6c: 4fef 000c lea %sp@(12),%sp 45a70: 2440 moveal %d0,%a2 45a72: 4aae fffc tstl %fp@(-4) 45a76: 6600 0128 bnew 45ba0 case OBJECTS_LOCAL: /* First, it verifies if the timer must be stopped */ if ( normalize.it_value.tv_sec == 0 && normalize.it_value.tv_nsec == 0 ) { 45a7a: 4aae ffec tstl %fp@(-20) 45a7e: 6608 bnes 45a88 45a80: 4aae fff0 tstl %fp@(-16) 45a84: 6700 0132 beqw 45bb8 _Thread_Enable_dispatch(); return 0; } /* Convert from seconds and nanoseconds to ticks */ ptimer->ticks = _Timespec_To_ticks( &value->it_interval ); 45a88: 2f0b movel %a3,%sp@- 45a8a: 47f9 0004 95b4 lea 495b4 <_Timespec_To_ticks>,%a3 45a90: 4e93 jsr %a3@ 45a92: 2540 0062 movel %d0,%a2@(98) initial_period = _Timespec_To_ticks( &normalize.it_value ); 45a96: 2f0c movel %a4,%sp@- 45a98: 4e93 jsr %a3@ activated = _POSIX_Timer_Insert_helper( 45a9a: 2f0a movel %a2,%sp@- 45a9c: 4879 0004 5cc0 pea 45cc0 <_POSIX_Timer_TSR> 45aa2: 2f2a 0008 movel %a2@(8),%sp@- 45aa6: 2f00 movel %d0,%sp@- 45aa8: 486a 0010 pea %a2@(16) 45aac: 4eb9 0004 bf48 jsr 4bf48 <_POSIX_Timer_Insert_helper> initial_period, ptimer->Object.id, _POSIX_Timer_TSR, ptimer ); if ( !activated ) { 45ab2: 4fef 001c lea %sp@(28),%sp 45ab6: 4a00 tstb %d0 45ab8: 6700 0166 beqw 45c20 /* * The timer has been started and is running. So we return the * old ones in "ovalue" */ if ( ovalue ) 45abc: 4a84 tstl %d4 45abe: 6700 0172 beqw 45c32 *ovalue = ptimer->timer_data; 45ac2: 220a movel %a2,%d1 45ac4: 0681 0000 0052 addil #82,%d1 45aca: 2044 moveal %d4,%a0 45acc: 2241 moveal %d1,%a1 45ace: 200a movel %a2,%d0 45ad0: 0680 0000 0056 addil #86,%d0 45ad6: 47ea 005a lea %a2@(90),%a3 45ada: 280a movel %a2,%d4 45adc: 0684 0000 005e addil #94,%d4 45ae2: 20d1 movel %a1@,%a0@+ 45ae4: 2240 moveal %d0,%a1 45ae6: 20d1 movel %a1@,%a0@+ 45ae8: 2244 moveal %d4,%a1 45aea: 20d3 movel %a3@,%a0@+ 45aec: 2091 movel %a1@,%a0@ ptimer->timer_data = normalize; 45aee: 2041 moveal %d1,%a0 45af0: 2243 moveal %d3,%a1 45af2: 2091 movel %a1@,%a0@ 45af4: 2040 moveal %d0,%a0 45af6: 2242 moveal %d2,%a1 45af8: 2091 movel %a1@,%a0@ 45afa: 2044 moveal %d4,%a0 45afc: 2694 movel %a4@,%a3@ 45afe: 2095 movel %a5@,%a0@ /* Indicate that the time is running */ ptimer->state = POSIX_TIMER_STATE_CREATE_RUN; 45b00: 7003 moveq #3,%d0 45b02: 1540 003c moveb %d0,%a2@(60) _TOD_Get( &ptimer->time ); 45b06: 486a 006a pea %a2@(106) 45b0a: 4eb9 0004 7470 jsr 47470 <_TOD_Get> _Thread_Enable_dispatch(); 45b10: 4eb9 0004 868c jsr 4868c <_Thread_Enable_dispatch> return 0; 45b16: 588f addql #4,%sp ptimer->timer_data = normalize; /* Indicate that the time is running */ ptimer->state = POSIX_TIMER_STATE_CREATE_RUN; _TOD_Get( &ptimer->time ); _Thread_Enable_dispatch(); 45b18: 4280 clrl %d0 case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EINVAL ); } 45b1a: 4cee 3c1c ffc8 moveml %fp@(-56),%d2-%d4/%a2-%a5 45b20: 4e5e unlk %fp 45b22: 4e75 rts if ( flags != TIMER_ABSTIME && flags != POSIX_TIMER_RELATIVE ) { rtems_set_errno_and_return_minus_one( EINVAL ); } normalize = *value; 45b24: 260e movel %fp,%d3 45b26: 0683 ffff ffe4 addil #-28,%d3 45b2c: 204b moveal %a3,%a0 45b2e: 2243 moveal %d3,%a1 45b30: 240e movel %fp,%d2 45b32: 0682 ffff ffe8 addil #-24,%d2 45b38: 200e movel %fp,%d0 45b3a: 0680 ffff ffec addil #-20,%d0 /* Convert absolute to relative time */ if (flags == TIMER_ABSTIME) { struct timespec now; _TOD_Get( &now ); /* Check for seconds in the past */ if ( _Timespec_Greater_than( &now, &normalize.it_value ) ) 45b40: 2840 moveal %d0,%a4 if ( flags != TIMER_ABSTIME && flags != POSIX_TIMER_RELATIVE ) { rtems_set_errno_and_return_minus_one( EINVAL ); } normalize = *value; 45b42: 4bee fff0 lea %fp@(-16),%a5 /* Convert absolute to relative time */ if (flags == TIMER_ABSTIME) { struct timespec now; _TOD_Get( &now ); 45b46: 45ee fff4 lea %fp@(-12),%a2 if ( flags != TIMER_ABSTIME && flags != POSIX_TIMER_RELATIVE ) { rtems_set_errno_and_return_minus_one( EINVAL ); } normalize = *value; 45b4a: 2298 movel %a0@+,%a1@ 45b4c: 2242 moveal %d2,%a1 45b4e: 2298 movel %a0@+,%a1@ 45b50: 2898 movel %a0@+,%a4@ 45b52: 2a90 movel %a0@,%a5@ /* Convert absolute to relative time */ if (flags == TIMER_ABSTIME) { struct timespec now; _TOD_Get( &now ); 45b54: 2f0a movel %a2,%sp@- 45b56: 4eb9 0004 7470 jsr 47470 <_TOD_Get> /* Check for seconds in the past */ if ( _Timespec_Greater_than( &now, &normalize.it_value ) ) 45b5c: 2f0c movel %a4,%sp@- 45b5e: 2f0a movel %a2,%sp@- 45b60: 4eb9 0004 952c jsr 4952c <_Timespec_Greater_than> 45b66: 4fef 000c lea %sp@(12),%sp 45b6a: 4a00 tstb %d0 45b6c: 6632 bnes 45ba0 rtems_set_errno_and_return_minus_one( EINVAL ); _Timespec_Subtract( &now, &normalize.it_value, &normalize.it_value ); 45b6e: 2f0c movel %a4,%sp@- 45b70: 2f0c movel %a4,%sp@- 45b72: 2f0a movel %a2,%sp@- 45b74: 4eb9 0004 9560 jsr 49560 <_Timespec_Subtract> 45b7a: 4fef 000c lea %sp@(12),%sp 45b7e: 486e fffc pea %fp@(-4) 45b82: 2f2e 0008 movel %fp@(8),%sp@- 45b86: 4879 0005 ff4c pea 5ff4c <_POSIX_Timer_Information> 45b8c: 4eb9 0004 7e7c jsr 47e7c <_Objects_Get> * something with the structure of times of the timer: to stop, start * or start it again */ ptimer = _POSIX_Timer_Get( timerid, &location ); switch ( location ) { 45b92: 4fef 000c lea %sp@(12),%sp 45b96: 2440 moveal %d0,%a2 45b98: 4aae fffc tstl %fp@(-4) 45b9c: 6700 fedc beqw 45a7a #endif case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EINVAL ); 45ba0: 4eb9 0004 f4d0 jsr 4f4d0 <__errno> 45ba6: 7216 moveq #22,%d1 45ba8: 2040 moveal %d0,%a0 45baa: 70ff moveq #-1,%d0 } 45bac: 4cee 3c1c ffc8 moveml %fp@(-56),%d2-%d4/%a2-%a5 #endif case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EINVAL ); 45bb2: 2081 movel %d1,%a0@ } 45bb4: 4e5e unlk %fp 45bb6: 4e75 rts case OBJECTS_LOCAL: /* First, it verifies if the timer must be stopped */ if ( normalize.it_value.tv_sec == 0 && normalize.it_value.tv_nsec == 0 ) { /* Stop the timer */ (void) _Watchdog_Remove( &ptimer->Timer ); 45bb8: 486a 0010 pea %a2@(16) 45bbc: 4eb9 0004 9a08 jsr 49a08 <_Watchdog_Remove> /* The old data of the timer are returned */ if ( ovalue ) 45bc2: 588f addql #4,%sp 45bc4: 4a84 tstl %d4 45bc6: 6700 00b6 beqw 45c7e *ovalue = ptimer->timer_data; 45bca: 220a movel %a2,%d1 45bcc: 0681 0000 0052 addil #82,%d1 45bd2: 2244 moveal %d4,%a1 45bd4: 2041 moveal %d1,%a0 45bd6: 200a movel %a2,%d0 45bd8: 0680 0000 0056 addil #86,%d0 45bde: 47ea 005a lea %a2@(90),%a3 45be2: 280a movel %a2,%d4 45be4: 0684 0000 005e addil #94,%d4 45bea: 22d0 movel %a0@,%a1@+ 45bec: 2040 moveal %d0,%a0 45bee: 22d0 movel %a0@,%a1@+ 45bf0: 2044 moveal %d4,%a0 45bf2: 22d3 movel %a3@,%a1@+ 45bf4: 2290 movel %a0@,%a1@ /* The new data are set */ ptimer->timer_data = normalize; 45bf6: 2241 moveal %d1,%a1 45bf8: 2043 moveal %d3,%a0 45bfa: 2290 movel %a0@,%a1@ 45bfc: 2240 moveal %d0,%a1 45bfe: 2042 moveal %d2,%a0 45c00: 2290 movel %a0@,%a1@ 45c02: 2244 moveal %d4,%a1 45c04: 2694 movel %a4@,%a3@ 45c06: 2295 movel %a5@,%a1@ /* Indicates that the timer is created and stopped */ ptimer->state = POSIX_TIMER_STATE_CREATE_STOP; 45c08: 7004 moveq #4,%d0 45c0a: 1540 003c moveb %d0,%a2@(60) /* Returns with success */ _Thread_Enable_dispatch(); 45c0e: 4eb9 0004 868c jsr 4868c <_Thread_Enable_dispatch> 45c14: 4280 clrl %d0 case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EINVAL ); } 45c16: 4cee 3c1c ffc8 moveml %fp@(-56),%d2-%d4/%a2-%a5 45c1c: 4e5e unlk %fp 45c1e: 4e75 rts ptimer->Object.id, _POSIX_Timer_TSR, ptimer ); if ( !activated ) { _Thread_Enable_dispatch(); 45c20: 4eb9 0004 868c jsr 4868c <_Thread_Enable_dispatch> 45c26: 4280 clrl %d0 case OBJECTS_ERROR: break; } rtems_set_errno_and_return_minus_one( EINVAL ); } 45c28: 4cee 3c1c ffc8 moveml %fp@(-56),%d2-%d4/%a2-%a5 45c2e: 4e5e unlk %fp 45c30: 4e75 rts 45c32: 220a movel %a2,%d1 45c34: 0681 0000 0052 addil #82,%d1 * The timer has been started and is running. So we return the * old ones in "ovalue" */ if ( ovalue ) *ovalue = ptimer->timer_data; ptimer->timer_data = normalize; 45c3a: 2041 moveal %d1,%a0 45c3c: 2243 moveal %d3,%a1 45c3e: 200a movel %a2,%d0 45c40: 0680 0000 0056 addil #86,%d0 45c46: 47ea 005a lea %a2@(90),%a3 45c4a: 280a movel %a2,%d4 45c4c: 0684 0000 005e addil #94,%d4 45c52: 2091 movel %a1@,%a0@ 45c54: 2040 moveal %d0,%a0 45c56: 2242 moveal %d2,%a1 45c58: 2091 movel %a1@,%a0@ 45c5a: 2044 moveal %d4,%a0 45c5c: 2694 movel %a4@,%a3@ 45c5e: 2095 movel %a5@,%a0@ /* Indicate that the time is running */ ptimer->state = POSIX_TIMER_STATE_CREATE_RUN; 45c60: 7003 moveq #3,%d0 45c62: 1540 003c moveb %d0,%a2@(60) _TOD_Get( &ptimer->time ); 45c66: 486a 006a pea %a2@(106) 45c6a: 4eb9 0004 7470 jsr 47470 <_TOD_Get> _Thread_Enable_dispatch(); 45c70: 4eb9 0004 868c jsr 4868c <_Thread_Enable_dispatch> return 0; 45c76: 588f addql #4,%sp ptimer->timer_data = normalize; /* Indicate that the time is running */ ptimer->state = POSIX_TIMER_STATE_CREATE_RUN; _TOD_Get( &ptimer->time ); _Thread_Enable_dispatch(); 45c78: 4280 clrl %d0 45c7a: 6000 fe9e braw 45b1a 45c7e: 220a movel %a2,%d1 45c80: 0681 0000 0052 addil #82,%d1 (void) _Watchdog_Remove( &ptimer->Timer ); /* The old data of the timer are returned */ if ( ovalue ) *ovalue = ptimer->timer_data; /* The new data are set */ ptimer->timer_data = normalize; 45c86: 2241 moveal %d1,%a1 45c88: 2043 moveal %d3,%a0 45c8a: 200a movel %a2,%d0 45c8c: 0680 0000 0056 addil #86,%d0 45c92: 47ea 005a lea %a2@(90),%a3 45c96: 280a movel %a2,%d4 45c98: 0684 0000 005e addil #94,%d4 45c9e: 2290 movel %a0@,%a1@ 45ca0: 2240 moveal %d0,%a1 45ca2: 2042 moveal %d2,%a0 45ca4: 2290 movel %a0@,%a1@ 45ca6: 2244 moveal %d4,%a1 45ca8: 2694 movel %a4@,%a3@ 45caa: 2295 movel %a5@,%a1@ /* Indicates that the timer is created and stopped */ ptimer->state = POSIX_TIMER_STATE_CREATE_STOP; 45cac: 7004 moveq #4,%d0 45cae: 1540 003c moveb %d0,%a2@(60) /* Returns with success */ _Thread_Enable_dispatch(); 45cb2: 4eb9 0004 868c jsr 4868c <_Thread_Enable_dispatch> 45cb8: 4280 clrl %d0 45cba: 6000 ff5a braw 45c16 ... =============================================================================== 00045a7c : useconds_t ualarm( useconds_t useconds, useconds_t interval ) { 45a7c: 4e56 ffe8 linkw %fp,#-24 45a80: 48d7 041c moveml %d2-%d4/%a2,%sp@ 45a84: 242e 0008 movel %fp@(8),%d2 /* * Initialize the timer used to implement alarm(). */ if ( !the_timer->routine ) { 45a88: 4ab9 0006 116a tstl 6116a <_POSIX_signals_Ualarm_timer+0x1c> 45a8e: 6700 0086 beqw 45b16 _Watchdog_Initialize( the_timer, _POSIX_signals_Ualarm_TSR, 0, NULL ); } else { Watchdog_States state; state = _Watchdog_Remove( the_timer ); 45a92: 4879 0006 114e pea 6114e <_POSIX_signals_Ualarm_timer> 45a98: 4eb9 0004 96fc jsr 496fc <_Watchdog_Remove> if ( (state == WATCHDOG_ACTIVE) || (state == WATCHDOG_REMOVE_IT) ) { 45a9e: 588f addql #4,%sp 45aa0: 7201 moveq #1,%d1 45aa2: 5580 subql #2,%d0 45aa4: b280 cmpl %d0,%d1 45aa6: 6400 0098 bccw 45b40 45aaa: 4283 clrl %d3 <== NOT EXECUTED /* * If useconds is non-zero, then the caller wants to schedule * the alarm repeatedly at that interval. If the interval is * less than a single clock tick, then fudge it to a clock tick. */ if ( useconds ) { 45aac: 4a82 tstl %d2 <== NOT EXECUTED 45aae: 660c bnes 45abc <== NOT EXECUTED _Watchdog_Insert_ticks( the_timer, _Timespec_To_ticks( &tp ) ); } return remaining; } 45ab0: 2003 movel %d3,%d0 45ab2: 4cee 041c ffe8 moveml %fp@(-24),%d2-%d4/%a2 45ab8: 4e5e unlk %fp 45aba: 4e75 rts if ( useconds ) { Watchdog_Interval ticks; tp.tv_sec = useconds / TOD_MICROSECONDS_PER_SECOND; tp.tv_nsec = (useconds % TOD_MICROSECONDS_PER_SECOND) * 1000; ticks = _Timespec_To_ticks( &tp ); 45abc: 280e movel %fp,%d4 * less than a single clock tick, then fudge it to a clock tick. */ if ( useconds ) { Watchdog_Interval ticks; tp.tv_sec = useconds / TOD_MICROSECONDS_PER_SECOND; 45abe: 223c 000f 4240 movel #1000000,%d1 tp.tv_nsec = (useconds % TOD_MICROSECONDS_PER_SECOND) * 1000; ticks = _Timespec_To_ticks( &tp ); 45ac4: 5184 subql #8,%d4 45ac6: 45f9 0004 9214 lea 49214 <_Timespec_To_ticks>,%a2 * less than a single clock tick, then fudge it to a clock tick. */ if ( useconds ) { Watchdog_Interval ticks; tp.tv_sec = useconds / TOD_MICROSECONDS_PER_SECOND; 45acc: 4c41 2000 remul %d1,%d0,%d2 45ad0: 4c41 2002 remul %d1,%d2,%d2 tp.tv_nsec = (useconds % TOD_MICROSECONDS_PER_SECOND) * 1000; 45ad4: 223c 0000 03e8 movel #1000,%d1 * less than a single clock tick, then fudge it to a clock tick. */ if ( useconds ) { Watchdog_Interval ticks; tp.tv_sec = useconds / TOD_MICROSECONDS_PER_SECOND; 45ada: 2d42 fff8 movel %d2,%fp@(-8) tp.tv_nsec = (useconds % TOD_MICROSECONDS_PER_SECOND) * 1000; 45ade: 4c00 1800 mulsl %d0,%d1 ticks = _Timespec_To_ticks( &tp ); 45ae2: 2f04 movel %d4,%sp@- */ if ( useconds ) { Watchdog_Interval ticks; tp.tv_sec = useconds / TOD_MICROSECONDS_PER_SECOND; tp.tv_nsec = (useconds % TOD_MICROSECONDS_PER_SECOND) * 1000; 45ae4: 2d41 fffc movel %d1,%fp@(-4) ticks = _Timespec_To_ticks( &tp ); 45ae8: 4e92 jsr %a2@ if ( ticks == 0 ) ticks = 1; _Watchdog_Insert_ticks( the_timer, _Timespec_To_ticks( &tp ) ); 45aea: 2f04 movel %d4,%sp@- 45aec: 4e92 jsr %a2@ ) { the_watchdog->initial = units; _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 45aee: 4879 0006 114e pea 6114e <_POSIX_signals_Ualarm_timer> 45af4: 4879 0006 0a00 pea 60a00 <_Watchdog_Ticks_chain> Watchdog_Control *the_watchdog, Watchdog_Interval units ) { the_watchdog->initial = units; 45afa: 23c0 0006 115a movel %d0,6115a <_POSIX_signals_Ualarm_timer+0xc> _Watchdog_Insert( &_Watchdog_Ticks_chain, the_watchdog ); 45b00: 4eb9 0004 95b4 jsr 495b4 <_Watchdog_Insert> 45b06: 4fef 0010 lea %sp@(16),%sp } return remaining; } 45b0a: 2003 movel %d3,%d0 45b0c: 4cee 041c ffe8 moveml %fp@(-24),%d2-%d4/%a2 45b12: 4e5e unlk %fp 45b14: 4e75 rts Watchdog_Service_routine_entry routine, Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; 45b16: 42b9 0006 1156 clrl 61156 <_POSIX_signals_Ualarm_timer+0x8> the_watchdog->routine = routine; the_watchdog->id = id; the_watchdog->user_data = user_data; 45b1c: 4283 clrl %d3 Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; 45b1e: 203c 0004 5b88 movel #285576,%d0 the_watchdog->id = id; 45b24: 42b9 0006 116e clrl 6116e <_POSIX_signals_Ualarm_timer+0x20> Objects_Id id, void *user_data ) { the_watchdog->state = WATCHDOG_INACTIVE; the_watchdog->routine = routine; 45b2a: 23c0 0006 116a movel %d0,6116a <_POSIX_signals_Ualarm_timer+0x1c> the_watchdog->id = id; the_watchdog->user_data = user_data; 45b30: 42b9 0006 1172 clrl 61172 <_POSIX_signals_Ualarm_timer+0x24> /* * If useconds is non-zero, then the caller wants to schedule * the alarm repeatedly at that interval. If the interval is * less than a single clock tick, then fudge it to a clock tick. */ if ( useconds ) { 45b36: 4a82 tstl %d2 45b38: 6700 ff76 beqw 45ab0 45b3c: 6000 ff7e braw 45abc * boot. Since alarm() is dealing in seconds, we must account for * this. */ ticks = the_timer->initial; ticks -= (the_timer->stop_time - the_timer->start_time); 45b40: 2039 0006 1162 movel 61162 <_POSIX_signals_Ualarm_timer+0x14>,%d0 45b46: d0b9 0006 115a addl 6115a <_POSIX_signals_Ualarm_timer+0xc>,%d0 /* remaining is now in ticks */ _Timespec_From_ticks( ticks, &tp ); 45b4c: 486e fff8 pea %fp@(-8) 45b50: 90b9 0006 1166 subl 61166 <_POSIX_signals_Ualarm_timer+0x18>,%d0 remaining = tp.tv_sec * TOD_MICROSECONDS_PER_SECOND; 45b56: 283c 000f 4240 movel #1000000,%d4 ticks = the_timer->initial; ticks -= (the_timer->stop_time - the_timer->start_time); /* remaining is now in ticks */ _Timespec_From_ticks( ticks, &tp ); 45b5c: 2f00 movel %d0,%sp@- 45b5e: 4eb9 0004 9184 jsr 49184 <_Timespec_From_ticks> remaining = tp.tv_sec * TOD_MICROSECONDS_PER_SECOND; 45b64: 202e fff8 movel %fp@(-8),%d0 45b68: 4c04 0800 mulsl %d4,%d0 remaining += tp.tv_nsec / 1000; 45b6c: 283c 0000 03e8 movel #1000,%d4 45b72: 508f addql #8,%sp 45b74: 262e fffc movel %fp@(-4),%d3 45b78: 4c44 3803 remsl %d4,%d3,%d3 45b7c: d680 addl %d0,%d3 /* * If useconds is non-zero, then the caller wants to schedule * the alarm repeatedly at that interval. If the interval is * less than a single clock tick, then fudge it to a clock tick. */ if ( useconds ) { 45b7e: 4a82 tstl %d2 45b80: 6700 ff2e beqw 45ab0 45b84: 6000 ff36 braw 45abc <== NOT EXECUTED