flash_v2: packages/hal/arm/arch/current/src/context.S annotate

annotate packages/hal/arm/arch/current/src/context.S @ 112:02ea4320376c ecos-sw-2000-07-21

Merge from eCos master repository on 2000-07-21-21:01:39-BST

author	jlarmour
date	Fri, 21 Jul 2000 21:34:11 +0000
parents	2085233a121a
children	e0c0827131d1

rev	line source
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	1 // #===========================================================================
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	2 // #
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	3 // # context.S
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	4 // #
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	5 // # ARM context switch code
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	6 // #
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	7 // #===========================================================================
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	8 // ####COPYRIGHTBEGIN####
64 c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	9 //
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	10 // -------------------------------------------
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	11 // The contents of this file are subject to the Red Hat eCos Public License
66 bf00f99aec69 Merge from eCos master repository on 2000-02-02-19:16:44-GMT jlarmour parents: 64 diff changeset	12 // Version 1.1 (the "License"); you may not use this file except in
64 c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	13 // compliance with the License. You may obtain a copy of the License at
66 bf00f99aec69 Merge from eCos master repository on 2000-02-02-19:16:44-GMT jlarmour parents: 64 diff changeset	14 // http://www.redhat.com/
64 c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	15 //
66 bf00f99aec69 Merge from eCos master repository on 2000-02-02-19:16:44-GMT jlarmour parents: 64 diff changeset	16 // Software distributed under the License is distributed on an "AS IS"
64 c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	17 // basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	18 // License for the specific language governing rights and limitations under
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	19 // the License.
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	20 //
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	21 // The Original Code is eCos - Embedded Configurable Operating System,
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	22 // released September 30, 1998.
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	23 //
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	24 // The Initial Developer of the Original Code is Red Hat.
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	25 // Portions created by Red Hat are
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	26 // Copyright (C) 1998, 1999, 2000 Red Hat, Inc.
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	27 // All Rights Reserved.
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	28 // -------------------------------------------
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT jlarmour parents: 38 diff changeset	29 //
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	30 // ####COPYRIGHTEND####
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	31 // #===========================================================================
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	32 // ######DESCRIPTIONBEGIN####
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	33 // #
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	34 // # Author(s): nickg, gthomas
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	35 // # Contributors: nickg, gthomas
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	36 // # Date: 1998-09-15
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	37 // # Purpose: ARM context switch code
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	38 // # Description: This file contains implementations of the thread context
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	39 // # switch routines. It also contains the longjmp() and setjmp()
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	40 // # routines.
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	41 // #
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	42 // #####DESCRIPTIONEND####
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	43 // #
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	44 // #===========================================================================
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	45
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	46 #include <pkgconf/hal.h>
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	47
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	48 #include "arm.inc"
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	49
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	50 .text
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	51
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	52 // ----------------------------------------------------------------------------
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	53 // function declaration macro (start body in ARM mode)
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	54
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	55 #ifdef __thumb__
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	56 #define FUNC_START_ARM(_name_, _r_) \
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	57 .code 16 ;\
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	58 .thumb_func ;\
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	59 .globl _name_ ;\
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	60 _name_: ;\
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	61 ldr _r_,=_name_ ## _ARM ;\
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	62 bx _r_ ;\
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	63 .code 32 ;\
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	64 _name_ ## _ARM:
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	65
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	66 #else
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	67
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	68 #define FUNC_START_ARM(_name_, _r_) \
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	69 .globl _name_; \
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	70 _name_:
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	71
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	72 #endif
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	73
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	74 // ----------------------------------------------------------------------------
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	75 // hal_thread_switch_context
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	76 // Switch thread contexts
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	77 // R0 = address of sp of next thread to execute
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	78 // R1 = address of sp save location of current thread
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	79
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	80 // Need to save/restore R4..R12, R13 (sp), R14 (lr)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	81
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	82 // Note: this is a little wasteful since r0..r3 don't need to be saved.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	83 // They are saved here though so that the information can match the HAL_SavedRegisters
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	84
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	85 FUNC_START_ARM(hal_thread_switch_context, r2)
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	86 mov ip,sp // saved stack pointer
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	87 stmfd sp!,{fp,ip,lr,pc} // filler
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	88 stmfd sp!,{r0-r10,fp,ip,lr,pc}
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	89 mrs r2,cpsr
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	90 str r2,[sp,#armreg_cpsr]
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	91 str sp,[r1] // return new stack pointer
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	92 #ifdef __thumb__
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	93 b hal_thread_load_context_ARM // skip mode switch stuff
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	94 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	95
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	96 # Now load the destination thread by dropping through
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	97 # to hal_thread_load_context
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	98
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	99 // ----------------------------------------------------------------------------
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	100 // hal_thread_load_context
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	101 // Load thread context
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	102 // R0 = address of sp of next thread to execute
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	103 // Note that this function is also the second half of
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	104 // hal_thread_switch_context and is simply dropped into from it.
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	105
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	106 FUNC_START_ARM(hal_thread_load_context, r2)
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	107 ldr fp,[r0] // get context to restore
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	108 mrs r0,cpsr // disable IRQ's
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	109 orr r0,r0,#CPSR_IRQ_DISABLE\|CPSR_FIQ_DISABLE
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	110 msr cpsr,r0
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	111 ldr r0,[fp,#armreg_cpsr]
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	112 msr spsr,r0
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	113 ldmfd fp,{r0-r10,fp,sp,lr}
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	114 #ifdef __thumb__
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	115 mrs r1,spsr // r1 is scratch
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	116 // [r0 holds initial thread arg]
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	117 msr cpsr,r1 // hopefully no mode switch here!
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	118 bx lr
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	119 #else
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	120 movs pc,lr // also restores saved PSR
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	121 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	122
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	123 // ----------------------------------------------------------------------------
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	124 // HAL longjmp, setjmp implementations
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	125 // hal_setjmp saves only to callee save registers 4-14
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	126 // and lr into buffer supplied in r0[arg0]
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	127
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	128 FUNC_START_ARM(hal_setjmp, r2)
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	129 stmea r0,{r4-r14}
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	130 mov r0,#0
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	131 #ifdef __thumb__
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	132 bx lr
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	133 #else
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	134 mov pc,lr; # return
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	135 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	136
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	137 // hal_longjmp loads state from r0[arg0] and returns
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	138
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	139 FUNC_START_ARM(hal_longjmp, r2)
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	140 ldmfd r0,{r4-r14}
2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	141 mov r0,r1; # return [arg1]
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	142 #ifdef __thumb__
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	143 bx lr
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	144 #else
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	145 mov pc,lr
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 66 diff changeset	146 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	147
80 2085233a121a Merge from eCos master repository on 2000-04-07-07:52:29-BST jlarmour parents: 76 diff changeset	148 // ----------------------------------------------------------------------------
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	149 // end of context.S

Mercurial > flash_v2

annotate packages/hal/arm/arch/current/src/context.S @ 112:02ea4320376c ecos-sw-2000-07-21