Mercurial > ecos

annotate packages/hal/common/current/src/hal_stub.c @ 103:95f3e12a6327 ecos-sw-2000-06-23

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