Mercurial > ecos
annotate packages/hal/common/current/src/hal_stub.c @ 105:5a0cc6c243a9 ecos-sw-2000-06-30
Merge from eCos master repository on 2000-06-30-08:18:49-BST
| author | jlarmour |
|---|---|
| date | Fri, 30 Jun 2000 16:27:35 +0000 |
| parents | 95f3e12a6327 |
| children | 7f461c3a372c |
| rev | line source |
|---|---|
| 2 | 1 //============================================================================= |
| 2 // | |
| 3 // hal_stub.c | |
| 4 // | |
| 5 // Helper functions for stub, specific to eCos HAL | |
| 6 // | |
| 7 //============================================================================= | |
| 8 //####COPYRIGHTBEGIN#### | |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
50
diff
changeset
|
9 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
50
diff
changeset
|
10 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
50
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:
50
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:
50
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:
50
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:
50
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:
50
diff
changeset
|
19 // the License. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
50
diff
changeset
|
20 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
50
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:
50
diff
changeset
|
22 // released September 30, 1998. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
50
diff
changeset
|
23 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
50
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:
50
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:
50
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:
50
diff
changeset
|
27 // All Rights Reserved. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
50
diff
changeset
|
28 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
50
diff
changeset
|
29 // |
| 2 | 30 //####COPYRIGHTEND#### |
| 31 //============================================================================= | |
| 32 //#####DESCRIPTIONBEGIN#### | |
| 33 // | |
| 34 // Author(s): jskov (based on powerpc/cogent hal_stub.c) | |
| 35 // Contributors:jskov | |
| 36 // Date: 1999-02-12 | |
| 37 // Purpose: Helper functions for stub, specific to eCos HAL | |
| 38 // Description: Parts of the GDB stub requirements are provided by | |
| 39 // the eCos HAL, rather than target and/or board specific | |
| 40 // code. | |
| 41 // | |
| 42 //####DESCRIPTIONEND#### | |
| 43 // | |
| 44 //============================================================================= | |
| 45 | |
| 46 #include <pkgconf/hal.h> | |
|
50
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
47 #ifdef CYGPKG_CYGMON |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
48 #include <pkgconf/cygmon.h> |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
49 #endif |
| 2 | 50 |
| 51 #ifdef CYGDBG_HAL_DEBUG_GDB_INCLUDE_STUBS | |
| 52 | |
| 53 #include <cyg/hal/hal_stub.h> // Our header | |
| 54 | |
| 55 #include <cyg/hal/hal_arch.h> // HAL_BREAKINST | |
| 56 #include <cyg/hal/hal_cache.h> // HAL_xCACHE_x | |
| 57 #include <cyg/hal/hal_intr.h> // interrupt disable/restore | |
| 58 | |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
59 #include <cyg/hal/hal_if.h> // ROM calling interface |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
60 #include <cyg/hal/hal_misc.h> // Helper functions |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
61 |
| 2 | 62 #ifdef CYGDBG_HAL_DEBUG_GDB_THREAD_SUPPORT |
| 63 #include <cyg/hal/dbg-threads-api.h> // dbg_currthread_id | |
| 64 #endif | |
| 65 | |
| 66 //----------------------------------------------------------------------------- | |
| 67 // Extra eCos data. | |
| 68 | |
| 69 // Saved registers. | |
| 70 HAL_SavedRegisters *_hal_registers; | |
| 71 target_register_t registers[NUMREGS]; | |
|
14
01ce82f3e11a
Merge from eCos master repository on 1999-06-11-17:05:41-BST
jlarmour
parents:
12
diff
changeset
|
72 target_register_t alt_registers[NUMREGS] ; // Thread or saved process state |
|
01ce82f3e11a
Merge from eCos master repository on 1999-06-11-17:05:41-BST
jlarmour
parents:
12
diff
changeset
|
73 target_register_t * _registers = registers; // Pointer to current set of registers |
| 2 | 74 |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
75 #ifndef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT // this should go away |
| 2 | 76 // Interrupt control. |
| 77 static volatile __PFI __interruptible_control; | |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
78 #endif |
| 2 | 79 |
| 80 //----------------------------------------------------------------------------- | |
| 81 // Register access | |
| 82 | |
| 83 // Return the currently-saved value corresponding to register REG of | |
| 84 // the exception context. | |
| 85 target_register_t | |
| 86 get_register (regnames_t reg) | |
| 87 { | |
| 88 return _registers[reg]; | |
| 89 } | |
| 90 | |
| 91 // Store VALUE in the register corresponding to WHICH in the exception | |
| 92 // context. | |
| 93 void | |
| 94 put_register (regnames_t which, target_register_t value) | |
| 95 { | |
| 96 _registers[which] = value; | |
| 97 } | |
| 98 | |
| 99 //----------------------------------------------------------------------------- | |
| 100 // Serial stuff | |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
101 #ifdef CYGPKG_CYGMON |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
102 extern void ecos_bsp_console_putc(char); |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
103 extern char ecos_bsp_console_getc(void); |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
104 #endif |
| 2 | 105 |
| 106 // Write C to the current serial port. | |
| 107 void | |
| 108 putDebugChar (int c) | |
| 109 { | |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
110 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
111 __call_if_debug_procs_t __debug_procs = CYGACC_CALL_IF_DEBUG_PROCS(); |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
112 CYGACC_COMM_IF_PUTC(*__debug_procs)(CYGACC_COMM_IF_CH_DATA(*__debug_procs), c); |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
113 #elif defined(CYGPKG_CYGMON) |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
114 ecos_bsp_console_putc(c); |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
115 #else |
| 2 | 116 HAL_STUB_PLATFORM_PUT_CHAR(c); |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
117 #endif |
| 2 | 118 } |
| 119 | |
| 120 // Read one character from the current serial port. | |
| 121 int | |
| 122 getDebugChar (void) | |
| 123 { | |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
124 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
125 __call_if_debug_procs_t __debug_procs = CYGACC_CALL_IF_DEBUG_PROCS(); |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
126 return CYGACC_COMM_IF_GETC(*__debug_procs)(CYGACC_COMM_IF_CH_DATA(*__debug_procs)); |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
127 #elif defined(CYGPKG_CYGMON) |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
128 return ecos_bsp_console_getc(); |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
129 #else |
| 2 | 130 return HAL_STUB_PLATFORM_GET_CHAR(); |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
131 #endif |
| 2 | 132 } |
| 133 | |
| 134 // Set the baud rate for the current serial port. | |
| 135 void | |
| 136 __set_baud_rate (int baud) | |
| 137 { | |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
138 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
139 __call_if_debug_procs_t __debug_procs = CYGACC_CALL_IF_DEBUG_PROCS(); |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
140 CYGACC_COMM_IF_CONTROL(*__debug_procs)(CYGACC_COMM_IF_CH_DATA(*__debug_procs), __COMMCTL_SETBAUD, baud); |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
141 #elif defined(CYGPKG_CYGMON) |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
142 // FIXME! |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
143 #else |
| 2 | 144 HAL_STUB_PLATFORM_SET_BAUD_RATE(baud); |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
145 #endif |
| 2 | 146 } |
| 147 | |
| 148 //----------------------------------------------------------------------------- | |
| 149 // GDB interrupt (BREAK) support. | |
| 150 | |
| 151 #ifdef CYGDBG_HAL_DEBUG_GDB_BREAK_SUPPORT | |
| 152 | |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
153 #ifndef CYGPKG_HAL_ARM |
|
38
e7ba79f6d3a8
Merge from eCos master repository on 1999-09-23-20:10:25-BST
jlarmour
parents:
34
diff
changeset
|
154 |
|
30
641b639be825
Merge from eCos master repository on 1999-08-16-22:01:37-BST
jlarmour
parents:
14
diff
changeset
|
155 #if (HAL_BREAKINST_SIZE == 1) |
|
641b639be825
Merge from eCos master repository on 1999-08-16-22:01:37-BST
jlarmour
parents:
14
diff
changeset
|
156 typedef cyg_uint8 t_inst; |
|
641b639be825
Merge from eCos master repository on 1999-08-16-22:01:37-BST
jlarmour
parents:
14
diff
changeset
|
157 #elif (HAL_BREAKINST_SIZE == 2) |
|
12
4cc3eff958ab
Merge from eCos master repository on 1999-06-04-22:24:56-BST
jlarmour
parents:
10
diff
changeset
|
158 typedef cyg_uint16 t_inst; |
|
4cc3eff958ab
Merge from eCos master repository on 1999-06-04-22:24:56-BST
jlarmour
parents:
10
diff
changeset
|
159 #elif (HAL_BREAKINST_SIZE == 4) |
|
4cc3eff958ab
Merge from eCos master repository on 1999-06-04-22:24:56-BST
jlarmour
parents:
10
diff
changeset
|
160 typedef cyg_uint32 t_inst; |
|
4cc3eff958ab
Merge from eCos master repository on 1999-06-04-22:24:56-BST
jlarmour
parents:
10
diff
changeset
|
161 #else |
|
4cc3eff958ab
Merge from eCos master repository on 1999-06-04-22:24:56-BST
jlarmour
parents:
10
diff
changeset
|
162 #error "Don't know how to handle that size" |
|
4cc3eff958ab
Merge from eCos master repository on 1999-06-04-22:24:56-BST
jlarmour
parents:
10
diff
changeset
|
163 #endif |
| 2 | 164 |
| 165 typedef struct | |
| 166 { | |
| 167 t_inst *targetAddr; | |
| 168 t_inst savedInstr; | |
| 169 } instrBuffer; | |
| 170 | |
| 171 static instrBuffer break_buffer; | |
| 172 | |
|
48
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
173 volatile int cyg_hal_gdb_running_step = 0; |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
174 |
| 2 | 175 void |
|
50
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
176 cyg_hal_gdb_place_break (target_register_t pc) |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
177 { |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
178 cyg_hal_gdb_interrupt( pc ); // Let's hope this becomes a drop-through: |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
179 } |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
180 |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
181 void |
| 2 | 182 cyg_hal_gdb_interrupt (target_register_t pc) |
| 183 { | |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
184 CYGARC_HAL_SAVE_GP(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
185 |
|
50
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
186 // Clear flag that we Continued instead of Stepping |
|
48
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
187 cyg_hal_gdb_running_step = 0; |
|
50
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
188 // and override existing break? So that a ^C takes effect... |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
189 if (NULL != break_buffer.targetAddr) |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
190 cyg_hal_gdb_remove_break( (target_register_t)break_buffer.targetAddr ); |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
48
diff
changeset
|
191 |
| 2 | 192 if (NULL == break_buffer.targetAddr) { |
| 193 break_buffer.targetAddr = (t_inst*) pc; | |
| 194 break_buffer.savedInstr = *(t_inst*)pc; | |
| 195 *(t_inst*)pc = (t_inst)HAL_BREAKINST; | |
| 196 | |
| 197 __data_cache(CACHE_FLUSH); | |
| 198 __instruction_cache(CACHE_FLUSH); | |
| 199 } | |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
200 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
201 CYGARC_HAL_RESTORE_GP(); |
| 2 | 202 } |
| 203 | |
| 204 int | |
| 205 cyg_hal_gdb_remove_break (target_register_t pc) | |
| 206 { | |
|
48
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
207 if ( cyg_hal_gdb_running_step ) |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
208 return 0; |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
209 |
| 2 | 210 if ((t_inst*)pc == break_buffer.targetAddr) { |
| 211 *(t_inst*)pc = break_buffer.savedInstr; | |
| 212 break_buffer.targetAddr = NULL; | |
| 213 | |
| 214 __data_cache(CACHE_FLUSH); | |
| 215 __instruction_cache(CACHE_FLUSH); | |
| 216 return 1; | |
| 217 } | |
| 218 return 0; | |
| 219 } | |
| 220 | |
|
48
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
221 int |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
222 cyg_hal_gdb_break_is_set (void) |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
223 { |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
224 if (NULL != break_buffer.targetAddr) { |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
225 return 1; |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
226 } |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
227 return 0; |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
228 } |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
229 |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
230 #endif // CYGPKG_HAL_ARM |
|
38
e7ba79f6d3a8
Merge from eCos master repository on 1999-09-23-20:10:25-BST
jlarmour
parents:
34
diff
changeset
|
231 |
| 2 | 232 #endif // CYGDBG_HAL_DEBUG_GDB_BREAK_SUPPORT |
| 233 | |
| 234 // Use this function to disable serial interrupts whenever reply | |
| 235 // characters are expected from GDB. The reason we want to control | |
| 236 // whether the target can be interrupted or not is simply that GDB on | |
| 237 // the host will be sending acknowledge characters/commands while the | |
| 238 // stub is running - if serial interrupts were still active, the | |
| 239 // characters would never reach the (polling) getDebugChar. | |
| 240 static void | |
| 241 interruptible(int state) | |
| 242 { | |
| 243 static int __interrupts_suspended = 0; | |
| 244 | |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
245 if (state) { |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
246 __interrupts_suspended--; |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
247 if (0 >= __interrupts_suspended) { |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
248 __interrupts_suspended = 0; |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
249 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT // this _check_ should go away |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
250 { |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
251 hal_virtual_comm_table_t* __chan; |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
252 __chan = CYGACC_CALL_IF_DEBUG_PROCS(); |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
253 CYGACC_COMM_IF_CONTROL(*__chan)(CYGACC_COMM_IF_CH_DATA(*__chan), __COMMCTL_IRQ_ENABLE); |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
254 } |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
255 #else |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
256 if (__interruptible_control) |
| 2 | 257 __interruptible_control(1); |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
258 #endif |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
259 } |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
260 } else { |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
261 __interrupts_suspended++; |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
262 if (1 == __interrupts_suspended) |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
263 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT // this _check_ should go away |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
264 { |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
265 hal_virtual_comm_table_t* __chan; |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
266 __chan = CYGACC_CALL_IF_DEBUG_PROCS(); |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
267 CYGACC_COMM_IF_CONTROL(*__chan)(CYGACC_COMM_IF_CH_DATA(*__chan), __COMMCTL_IRQ_DISABLE); |
| 2 | 268 } |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
269 #else |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
270 if (__interruptible_control) |
| 2 | 271 __interruptible_control(0); |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
272 #endif |
| 2 | 273 } |
| 274 } | |
| 275 | |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
276 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
277 //----------------------------------------------------------------------------- |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
278 // GDB O-packetizer function. |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
279 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
280 // This gets called via the virtual vector debug comms entry and |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
281 // handles O-packetization. The debug comms entries are used for the |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
282 // actual device IO. |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
283 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
284 static cyg_uint8 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
285 cyg_hal_gdb_diag_getc(void* __ch_data) |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
286 { |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
287 cyg_uint8 __ch; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
288 hal_virtual_comm_table_t* __chan = CYGACC_CALL_IF_DEBUG_PROCS(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
289 CYGARC_HAL_SAVE_GP(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
290 |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
291 __ch = CYGACC_COMM_IF_GETC(*__chan)(CYGACC_COMM_IF_CH_DATA(*__chan)); |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
292 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
293 CYGARC_HAL_RESTORE_GP(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
294 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
295 return __ch; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
296 } |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
297 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
298 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
299 static void |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
300 cyg_hal_gdb_diag_putc(void* __ch_data, cyg_uint8 c) |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
301 { |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
302 static char line[100]; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
303 static int pos = 0; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
304 CYGARC_HAL_SAVE_GP(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
305 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
306 // No need to send CRs |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
307 if( c == '\r' ) return; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
308 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
309 line[pos++] = c; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
310 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
311 if( c == '\n' || pos == sizeof(line) ) |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
312 { |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
313 CYG_INTERRUPT_STATE old; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
314 hal_virtual_comm_table_t* __chan = CYGACC_CALL_IF_DEBUG_PROCS(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
315 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
316 // Disable interrupts. This prevents GDB trying to interrupt us |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
317 // while we are in the middle of sending a packet. The serial |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
318 // receive interrupt will be seen when we re-enable interrupts |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
319 // later. |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
320 #ifdef CYG_HAL_STARTUP_ROM |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
321 HAL_DISABLE_INTERRUPTS(old); |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
322 #else |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
323 CYG_HAL_GDB_ENTER_CRITICAL_IO_REGION(old); |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
324 #endif |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
325 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
326 while(1) |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
327 { |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
328 static const char hex[] = "0123456789ABCDEF"; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
329 cyg_uint8 csum = 0, c1; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
330 int i; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
331 |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
332 CYGACC_COMM_IF_PUTC(*__chan)(CYGACC_COMM_IF_CH_DATA(*__chan), '$'); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
333 CYGACC_COMM_IF_PUTC(*__chan)(CYGACC_COMM_IF_CH_DATA(*__chan), 'O'); |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
334 csum += 'O'; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
335 for( i = 0; i < pos; i++ ) |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
336 { |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
337 char ch = line[i]; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
338 char h = hex[(ch>>4)&0xF]; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
339 char l = hex[ch&0xF]; |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
340 CYGACC_COMM_IF_PUTC(*__chan)(CYGACC_COMM_IF_CH_DATA(*__chan), h); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
341 CYGACC_COMM_IF_PUTC(*__chan)(CYGACC_COMM_IF_CH_DATA(*__chan), l); |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
342 csum += h; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
343 csum += l; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
344 } |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
345 CYGACC_COMM_IF_PUTC(*__chan)(CYGACC_COMM_IF_CH_DATA(*__chan), '#'); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
346 CYGACC_COMM_IF_PUTC(*__chan)(CYGACC_COMM_IF_CH_DATA(*__chan), hex[(csum>>4)&0xF]); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
347 CYGACC_COMM_IF_PUTC(*__chan)(CYGACC_COMM_IF_CH_DATA(*__chan), hex[csum&0xF]); |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
348 |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
349 c1 = CYGACC_COMM_IF_GETC(*__chan)(CYGACC_COMM_IF_CH_DATA(*__chan)); |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
350 if( c1 == '+' ) break; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
351 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
352 if( cyg_hal_is_break( &c1 , 1 ) ) { |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
353 // Caller's responsibility to react on this. |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
354 CYGACC_CALL_IF_CONSOLE_INTERRUPT_FLAG_SET(1); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
355 break; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
356 } |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
357 } |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
358 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
359 pos = 0; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
360 // And re-enable interrupts |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
361 #ifdef CYG_HAL_STARTUP_ROM |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
362 HAL_RESTORE_INTERRUPTS(old); |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
363 #else |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
364 CYG_HAL_GDB_LEAVE_CRITICAL_IO_REGION(old); |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
365 #endif |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
366 } |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
367 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
368 CYGARC_HAL_RESTORE_GP(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
369 } |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
370 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
371 static void |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
372 cyg_hal_gdb_diag_write(void* __ch_data, const cyg_uint8* __buf, |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
373 cyg_uint32 __len) |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
374 { |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
375 CYGARC_HAL_SAVE_GP(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
376 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
377 while(__len-- > 0) |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
378 cyg_hal_gdb_diag_putc(__ch_data, *__buf++); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
379 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
380 CYGARC_HAL_RESTORE_GP(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
381 } |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
382 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
383 static void |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
384 cyg_hal_gdb_diag_read(void* __ch_data, cyg_uint8* __buf, cyg_uint32 __len) |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
385 { |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
386 CYGARC_HAL_SAVE_GP(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
387 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
388 while(__len-- > 0) |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
389 *__buf++ = cyg_hal_gdb_diag_getc(__ch_data); |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
390 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
391 CYGARC_HAL_RESTORE_GP(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
392 } |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
393 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
394 static int |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
395 cyg_hal_gdb_diag_control(void *__ch_data, __comm_control_cmd_t __func, ...) |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
396 { |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
397 // Do nothing (yet). |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
398 return 0; |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
399 } |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
400 #endif |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
401 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
402 |
| 2 | 403 //----------------------------------------------------------------------------- |
| 404 // eCos stub entry and exit magic. | |
| 405 | |
| 406 #ifdef CYGDBG_HAL_DEBUG_GDB_BREAK_SUPPORT | |
| 407 int cyg_hal_gdb_break; | |
| 408 #endif | |
| 409 | |
| 410 // Called at stub *entry* | |
| 411 static void | |
| 412 handle_exception_cleanup( void ) | |
| 413 { | |
| 414 interruptible(0); | |
| 415 | |
| 416 // Expand the HAL_SavedRegisters structure into the GDB register | |
| 417 // array format. | |
| 418 HAL_GET_GDB_REGISTERS(®isters[0], _hal_registers); | |
| 419 _registers = ®isters[0]; | |
| 420 | |
|
8
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
421 #ifdef HAL_STUB_PLATFORM_STUBS_FIXUP |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
422 // Some architectures may need to fix the PC in case of a partial |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
423 // or fully executed trap instruction. GDB only takes correct action |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
424 // when the PC is pointing to the breakpoint instruction it set. |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
425 // |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
426 // Most architectures would leave PC pointing at the trap |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
427 // instruction itself though, and so do not need to do anything |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
428 // special. |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
429 HAL_STUB_PLATFORM_STUBS_FIXUP(); |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
430 #endif |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
431 |
| 2 | 432 #ifdef CYGDBG_HAL_DEBUG_GDB_BREAK_SUPPORT |
|
48
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
433 // If we continued instead of stepping, when there was a break set |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
434 // ie. we were stepping within a critical region, clear the break, and |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
435 // that flag. If we stopped for some other reason, this has no effect. |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
436 if ( cyg_hal_gdb_running_step ) { |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
437 cyg_hal_gdb_running_step = 0; |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
438 cyg_hal_gdb_remove_break(get_register (PC)); |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
439 } |
|
1370c5e55234
Merge from eCos master repository on 1999-10-25-21:18:27-BST
jlarmour
parents:
38
diff
changeset
|
440 |
| 2 | 441 // FIXME: (there may be a better way to do this) |
| 442 // If we hit a breakpoint set by the gdb interrupt stub, make it | |
| 443 // seem like an interrupt rather than having hit a breakpoint. | |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
444 cyg_hal_gdb_break = cyg_hal_gdb_remove_break(get_register (PC)); |
| 2 | 445 #endif |
| 446 } | |
| 447 | |
| 448 // Called at stub *exit* | |
| 449 static void | |
| 450 handle_exception_init( void ) | |
| 451 { | |
| 452 // Compact register array again. | |
| 453 HAL_SET_GDB_REGISTERS(_hal_registers, ®isters[0]); | |
| 454 | |
| 455 interruptible(1); | |
| 456 } | |
| 457 | |
| 458 | |
| 459 //----------------------------------------------------------------------------- | |
| 460 // Initialization. | |
| 461 | |
| 462 // Signal handler. | |
| 463 int | |
| 464 cyg_hal_process_signal (int signal) | |
| 465 { | |
| 466 // We don't care about the signal (atm). | |
| 467 return 0; | |
| 468 } | |
| 469 | |
| 470 // Install the standard set of trap handlers for the stub. | |
| 471 void | |
| 472 __install_traps (void) | |
| 473 { | |
| 474 // Set signal handling vector so we can treat 'C<signum>' as 'c'. | |
| 475 __process_signal_vec = &cyg_hal_process_signal; | |
|
8
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
476 // Set exit vector to reset vector. This will allow automatic reset on |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
477 // some platforms. |
|
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
478 __process_exit_vec = &__reset; |
| 2 | 479 |
| 480 __cleanup_vec = &handle_exception_cleanup; | |
| 481 __init_vec = &handle_exception_init; | |
| 482 | |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
483 #ifndef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT // this should go away |
| 2 | 484 #ifdef CYGDBG_HAL_DEBUG_GDB_BREAK_SUPPORT |
| 485 // Control of GDB interrupts. | |
| 486 __interruptible_control = HAL_STUB_PLATFORM_INTERRUPTIBLE; | |
| 487 #endif | |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
488 #endif |
| 2 | 489 |
| 490 // Nothing further to do, handle_exception will be called when an | |
| 491 // exception occurs. | |
| 492 } | |
| 493 | |
| 494 // Initialize the hardware. | |
| 495 void | |
| 496 initHardware (void) | |
| 497 { | |
| 498 static int initialized = 0; | |
| 499 | |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
500 if (initialized) |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
501 return; |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
502 initialized = 1; |
| 2 | 503 |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
504 #if !defined(CYGPKG_CYGMON) |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
505 // Get serial port initialized. |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
506 HAL_STUB_PLATFORM_INIT_SERIAL(); |
| 2 | 507 |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
508 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT |
|
103
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
509 { |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
510 hal_virtual_comm_table_t* comm; |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
511 int cur = CYGACC_CALL_IF_SET_CONSOLE_COMM()(CYGNUM_CALL_IF_SET_COMM_ID_QUERY_CURRENT); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
512 |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
513 // Initialize mangler procs |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
514 CYGACC_CALL_IF_SET_CONSOLE_COMM()(CYGNUM_CALL_IF_SET_COMM_ID_MANGLER); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
515 comm = CYGACC_CALL_IF_CONSOLE_PROCS(); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
516 CYGACC_COMM_IF_WRITE_SET(*comm, cyg_hal_gdb_diag_write); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
517 CYGACC_COMM_IF_READ_SET(*comm, cyg_hal_gdb_diag_read); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
518 CYGACC_COMM_IF_PUTC_SET(*comm, cyg_hal_gdb_diag_putc); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
519 CYGACC_COMM_IF_GETC_SET(*comm, cyg_hal_gdb_diag_getc); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
520 CYGACC_COMM_IF_CONTROL_SET(*comm, cyg_hal_gdb_diag_control); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
521 |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
522 // Now either restore the previous console channel, or let the |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
523 // mangler stay in its place. The latter happens if the |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
524 // console channel was previously unspecified, or if the |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
525 // previous channel matches the used for GDB communication. |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
526 if (CYGNUM_CALL_IF_SET_COMM_ID_EMPTY != cur |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
527 && CYGNUM_HAL_VIRTUAL_VECTOR_DEBUG_CHANNEL != cur) |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
528 CYGACC_CALL_IF_SET_CONSOLE_COMM()(cur); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
529 |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
530 // Set the debug channel. |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
531 CYGACC_CALL_IF_SET_DEBUG_COMM()(CYGNUM_HAL_VIRTUAL_VECTOR_DEBUG_CHANNEL); |
|
95f3e12a6327
Merge from eCos master repository on 2000-06-23-16:41:10-BST
jlarmour
parents:
101
diff
changeset
|
532 } |
|
105
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
533 |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
534 #ifdef HAL_STUB_PLATFORM_INIT |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
535 // If the platform defines any initialization code, call it here. |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
536 HAL_STUB_PLATFORM_INIT(); |
|
5a0cc6c243a9
Merge from eCos master repository on 2000-06-30-08:18:49-BST
jlarmour
parents:
103
diff
changeset
|
537 #endif |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
538 #endif |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
539 |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
540 #ifndef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT |
| 2 | 541 #ifdef CYGDBG_HAL_DEBUG_GDB_BREAK_SUPPORT |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
542 // Get interrupt handler initialized. |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
543 HAL_STUB_PLATFORM_INIT_BREAK_IRQ(); |
| 2 | 544 #endif |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
545 #endif // CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
546 #endif // CYGPKG_CYGMON |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
547 |
| 2 | 548 } |
| 549 | |
| 550 // Reset the board. | |
| 551 void | |
| 552 __reset (void) | |
| 553 { | |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
554 #if !defined(CYGPKG_CYGMON) |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
555 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
556 __call_if_reset_t __rom_reset = CYGACC_CALL_IF_RESET(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
557 if (__rom_reset) |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
558 __rom_reset(); |
|
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
559 #else |
| 2 | 560 HAL_STUB_PLATFORM_RESET(); |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
70
diff
changeset
|
561 #endif |
|
101
c37d3a9e1b28
Merge from eCos master repository on 2000-06-16-07:47:03-BST
jlarmour
parents:
76
diff
changeset
|
562 #endif |
| 2 | 563 } |
| 564 | |
| 565 //----------------------------------------------------------------------------- | |
| 566 // Breakpoint support. | |
| 567 | |
| 568 #ifndef CYGPKG_HAL_ARM | |
| 569 // This function will generate a breakpoint exception. It is used at | |
| 570 // the beginning of a program to sync up with a debugger and can be | |
| 571 // used otherwise as a quick means to stop program execution and | |
| 572 // "break" into the debugger. | |
| 573 void | |
| 574 breakpoint() | |
| 575 { | |
| 576 HAL_BREAKPOINT(_breakinst); | |
| 577 } | |
| 578 | |
| 579 // This function returns the opcode for a 'trap' instruction. | |
| 580 unsigned long | |
| 581 __break_opcode () | |
| 582 { | |
| 583 return HAL_BREAKINST; | |
| 584 } | |
| 585 #endif | |
| 586 | |
| 587 // FIXME: Add support for multiple breakpoints (libstub/bplist-dynamic.c) | |
| 588 int __set_breakpoint (target_register_t addr) { return 0; } | |
| 589 int __remove_breakpoint (target_register_t addr) { return 0; } | |
| 590 | |
| 591 //----------------------------------------------------------------------------- | |
| 592 // Write the 'T' packet in BUFFER. SIGVAL is the signal the program received. | |
| 593 void | |
| 594 __build_t_packet (int sigval, char *buf) | |
| 595 { | |
| 596 target_register_t addr; | |
| 597 char *ptr = buf; | |
|
6
d376b777e2ce
Merge from eCos master repository on 1999-05-14-19:27:43-BST
jlarmour
parents:
2
diff
changeset
|
598 target_register_t sp; |
| 2 | 599 |
|
6
d376b777e2ce
Merge from eCos master repository on 1999-05-14-19:27:43-BST
jlarmour
parents:
2
diff
changeset
|
600 sp = (target_register_t) get_register (SP); |
| 2 | 601 |
| 602 *ptr++ = 'T'; | |
| 603 *ptr++ = __tohex (sigval >> 4); | |
| 604 *ptr++ = __tohex (sigval); | |
| 605 | |
| 606 #ifdef CYGDBG_HAL_DEBUG_GDB_THREAD_SUPPORT | |
| 607 // Include thread ID if thread manipulation is required. | |
| 608 { | |
| 609 int id; | |
| 610 | |
| 611 *ptr++ = 't'; | |
| 612 *ptr++ = 'h'; | |
| 613 *ptr++ = 'r'; | |
| 614 *ptr++ = 'e'; | |
| 615 *ptr++ = 'a'; | |
| 616 *ptr++ = 'd'; | |
| 617 *ptr++ = ':'; | |
| 618 | |
| 619 #if (CYG_BYTEORDER == CYG_MSBFIRST) | |
| 620 id = dbg_currthread_id (); | |
| 621 #else | |
| 622 // FIXME: Temporary workaround for PR 18903. Thread ID must be | |
| 623 // big-endian in the T packet. | |
| 624 { | |
| 625 unsigned char* bep = (unsigned char*)&id; | |
| 626 int be_id; | |
| 627 | |
| 628 be_id = dbg_currthread_id (); | |
| 629 *bep++ = (be_id >> 24) & 0xff ; | |
| 630 *bep++ = (be_id >> 16) & 0xff ; | |
| 631 *bep++ = (be_id >> 8) & 0xff ; | |
| 632 *bep++ = (be_id & 0xff) ; | |
| 633 } | |
| 634 #endif | |
| 635 ptr = __mem2hex((char *)&id, ptr, sizeof(id), 0); | |
| 636 *ptr++ = ';'; | |
| 637 } | |
| 638 #endif | |
| 639 | |
| 640 *ptr++ = __tohex (PC >> 4); | |
| 641 *ptr++ = __tohex (PC); | |
| 642 *ptr++ = ':'; | |
| 643 addr = get_register (PC); | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
644 ptr = __mem2hex((char *)&addr, ptr, REGSIZE(PC), 0); |
| 2 | 645 *ptr++ = ';'; |
| 646 | |
| 647 *ptr++ = __tohex (SP >> 4); | |
| 648 *ptr++ = __tohex (SP); | |
| 649 *ptr++ = ':'; | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
650 ptr = __mem2hex((char *)&sp, ptr, REGSIZE(SP), 0); |
| 2 | 651 *ptr++ = ';'; |
| 652 | |
| 653 *ptr++ = 0; | |
| 654 } | |
| 655 | |
| 656 | |
| 657 //----------------------------------------------------------------------------- | |
| 658 // Cache functions. | |
| 659 | |
| 660 // Perform the specified operation on the instruction cache. | |
| 661 // Returns 1 if the cache is enabled, 0 otherwise. | |
| 662 int | |
| 663 __instruction_cache (cache_control_t request) | |
| 664 { | |
| 665 int state = 1; | |
| 666 | |
| 667 switch (request) { | |
| 668 case CACHE_ENABLE: | |
| 669 HAL_ICACHE_ENABLE(); | |
| 670 break; | |
| 671 case CACHE_DISABLE: | |
| 672 HAL_ICACHE_DISABLE(); | |
| 673 state = 0; | |
| 674 break; | |
| 675 case CACHE_FLUSH: | |
| 676 HAL_ICACHE_SYNC(); | |
| 677 break; | |
| 678 case CACHE_NOOP: | |
| 679 /* fall through */ | |
| 680 default: | |
| 681 break; | |
| 682 } | |
| 683 | |
| 684 #ifdef HAL_ICACHE_IS_ENABLED | |
| 685 HAL_ICACHE_IS_ENABLED(state); | |
| 686 #endif | |
| 687 | |
| 688 return state; | |
| 689 } | |
| 690 | |
| 691 // Perform the specified operation on the data cache. | |
| 692 // Returns 1 if the cache is enabled, 0 otherwise. | |
| 693 int | |
| 694 __data_cache (cache_control_t request) | |
| 695 { | |
| 696 int state = 1; | |
| 697 | |
| 698 switch (request) { | |
| 699 case CACHE_ENABLE: | |
| 700 HAL_DCACHE_ENABLE(); | |
| 701 break; | |
| 702 case CACHE_DISABLE: | |
| 703 HAL_DCACHE_DISABLE(); | |
| 704 state = 0; | |
| 705 break; | |
| 706 case CACHE_FLUSH: | |
| 707 HAL_DCACHE_SYNC(); | |
| 708 break; | |
| 709 case CACHE_NOOP: | |
| 710 /* fall through */ | |
| 711 default: | |
| 712 break; | |
| 713 } | |
| 714 #ifdef HAL_DCACHE_IS_ENABLED | |
| 715 HAL_DCACHE_IS_ENABLED(state); | |
| 716 #endif | |
| 717 | |
| 718 return state; | |
| 719 } | |
| 720 | |
| 721 //----------------------------------------------------------------------------- | |
| 722 // Memory accessor functions. | |
| 723 | |
| 724 void *__mem_fault_handler = (void *)0; | |
| 725 | |
| 726 /* These are the "arguments" to __do_read_mem and __do_write_mem, | |
| 727 which are passed as globals to avoid squeezing them thru | |
| 728 __set_mem_fault_trap. */ | |
| 729 | |
| 730 static volatile target_register_t memCount; | |
| 731 | |
| 732 static void | |
| 733 __do_copy_mem (unsigned char* src, unsigned char* dst) | |
| 734 { | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
735 unsigned long *long_dst; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
736 unsigned long *long_src; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
737 unsigned short *short_dst; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
738 unsigned short *short_src; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
739 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
740 __mem_fault = 1; /* Defaults to 'fail'. Is cleared */ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
741 /* when the copy loop completes. */ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
742 __mem_fault_handler = &&err; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
743 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
744 // See if it's safe to do multi-byte, aligned operations |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
745 while (memCount) { |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
746 if ((memCount >= sizeof(long)) && |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
747 (((target_register_t)dst & (sizeof(long)-1)) == 0) && |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
748 (((target_register_t)src & (sizeof(long)-1)) == 0)) { |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
749 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
750 long_dst = (unsigned long *)dst; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
751 long_src = (unsigned long *)src; |
| 2 | 752 |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
753 *long_dst++ = *long_src++; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
754 memCount -= sizeof(long); |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
755 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
756 dst = (unsigned char *)long_dst; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
757 src = (unsigned char *)long_src; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
758 } else if ((memCount >= sizeof(short)) && |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
759 (((target_register_t)dst & (sizeof(short)-1)) == 0) && |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
760 (((target_register_t)src & (sizeof(short)-1)) == 0)) { |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
761 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
762 short_dst = (unsigned short *)dst; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
763 short_src = (unsigned short *)src; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
764 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
765 *short_dst++ = *short_src++; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
766 memCount -= sizeof(short); |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
767 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
768 dst = (unsigned char *)short_dst; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
769 src = (unsigned char *)short_src; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
770 } else { |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
771 *dst++ = *src++; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
772 memCount--; |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
773 } |
| 2 | 774 } |
| 775 | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
776 __mem_fault = 0; |
| 2 | 777 |
| 778 err: | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
779 __mem_fault_handler = (void *)0; |
| 2 | 780 } |
| 781 | |
| 782 /* | |
| 783 * __read_mem_safe: | |
| 784 * Get contents of target memory, abort on error. | |
| 785 */ | |
| 786 | |
| 787 int | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
788 __read_mem_safe (void *dst, void *src, int count) |
| 2 | 789 { |
| 790 memCount = count; | |
| 791 __do_copy_mem((unsigned char*) src, (unsigned char*) dst); | |
| 792 return count - memCount; // return number of bytes successfully read | |
| 793 } | |
| 794 | |
| 795 /* | |
| 796 * __write_mem_safe: | |
| 797 * Set contents of target memory, abort on error. | |
| 798 */ | |
| 799 | |
| 800 int | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
30
diff
changeset
|
801 __write_mem_safe (void *src, void *dst, int count) |
| 2 | 802 { |
| 803 memCount = count; | |
| 804 __do_copy_mem((unsigned char*) src, (unsigned char*) dst); | |
| 805 return count - memCount; // return number of bytes successfully written | |
| 806 } | |
| 807 | |
| 808 //----------------------------------------------------------------------------- | |
| 809 // Target extras?! | |
| 810 int | |
| 811 __process_target_query(char * pkt, char * out, int maxOut) | |
| 812 { return 0 ; } | |
| 813 int | |
| 814 __process_target_set(char * pkt, char * out, int maxout) | |
| 815 { return 0 ; } | |
| 816 int | |
| 817 __process_target_packet(char * pkt, char * out, int maxout) | |
| 818 { return 0 ; } | |
| 819 | |
| 820 // GDB string output, making sure interrupts are disabled. | |
| 821 // This function gets used by some diag output functions. | |
| 822 void | |
| 823 hal_output_gdb_string(target_register_t str, int string_len) | |
| 824 { | |
| 825 unsigned long __state; | |
|
8
ece80412419a
Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents:
6
diff
changeset
|
826 HAL_DISABLE_INTERRUPTS(__state); |
| 2 | 827 __output_gdb_string(str, string_len); |
| 828 HAL_RESTORE_INTERRUPTS(__state); | |
| 829 } | |
| 830 | |
| 831 #endif // CYGDBG_HAL_DEBUG_GDB_INCLUDE_STUBS |
