ecos: packages/hal/common/current/src/hal

annotate packages/hal/common/current/src/hal_stub.c @ 138:289bf90c6a9b

Merge from eCos master repository on 2000-11-24-06:43:05-GMT

author	jlarmour
date	Fri, 24 Nov 2000 07:49:02 +0000
parents	a9ac27ec7abc
children	6b5f480c6929

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)
115 6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	35 // Contributors:jskov, dmoseley
2 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
112 02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	66 #ifdef USE_LONG_NAMES_FOR_ENUM_REGNAMES
115 6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	67 #ifndef PC
112 02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	68 #define PC REG_PC
115 6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	69 #endif
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	70 #ifndef SP
112 02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	71 #define SP REG_SP
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	72 #endif
115 6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	73 #endif
112 02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	74
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	75 //-----------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	76 // Extra eCos data.
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 // Saved registers.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	79 HAL_SavedRegisters *_hal_registers;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	80 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	81 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	82 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	83
136 a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	84 #if defined(HAL_STUB_HW_WATCHPOINT) \|\| defined(HAL_STUB_HW_BREAKPOINT)
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	85 static int _hw_stop_reason; // Reason we were stopped by hw.
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	86
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	87 // strings indexed by hw stop reasons defined in hal_stub.h
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	88 static const char * const _hw_stop_str[] = {
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	89 "",
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	90 "hbreak",
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	91 "watch",
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	92 "rwatch",
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	93 "awatch"
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	94 };
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	95
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	96 static void *_watch_data_addr; // The data address if stopped by watchpoint
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	97 #endif
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	98
115 6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	99 // Register validity checking
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	100 #ifdef CYGHWR_REGISTER_VALIDITY_CHECKING
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	101 int registers_valid[NUMREGS];
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	102 int *_registers_valid = registers_valid;
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	103 #endif
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	104
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	105 #ifndef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT // this should go away
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	106 // Interrupt control.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	107 static volatile __PFI __interruptible_control;
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	108 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	109
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	110 //-----------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	111 // Register access
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	112
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	113 // Return the currently-saved value corresponding to register REG of
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	114 // the exception context.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	115 target_register_t
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	116 get_register (regnames_t reg)
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 return _registers[reg];
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	119 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	120
115 6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	121 #ifdef CYGHWR_REGISTER_VALIDITY_CHECKING
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	122 // Return the validity of register REG.
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	123 int
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	124 get_register_valid (regnames_t reg)
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	125 {
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	126 return _registers_valid[reg];
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	127 }
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	128 #endif
6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	129
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	130 // Store VALUE in the register corresponding to WHICH in the exception
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	131 // context.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	132 void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	133 put_register (regnames_t which, target_register_t value)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	134 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	135 _registers[which] = value;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	136 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	137
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	138 //-----------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	139 // 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	140 #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	141 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	142 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	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 // Write C to the current serial port.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	146 void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	147 putDebugChar (int c)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	148 {
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	149 #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	150 __call_if_debug_procs_t __debug_procs = CYGACC_CALL_IF_DEBUG_PROCS();
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	151 CYGACC_COMM_IF_PUTC(*__debug_procs, c);
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	152 #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	153 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	154 #else
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	155 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	156 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	157 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	158
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	159 // Read one character from the current serial port.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	160 int
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	161 getDebugChar (void)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	162 {
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	163 #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	164 __call_if_debug_procs_t __debug_procs = CYGACC_CALL_IF_DEBUG_PROCS();
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	165 return CYGACC_COMM_IF_GETC(*__debug_procs);
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	166 #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	167 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	168 #else
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	169 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	170 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	171 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	172
138 289bf90c6a9b Merge from eCos master repository on 2000-11-24-06:43:05-GMT jlarmour parents: 136 diff changeset	173 // Flush output channel
289bf90c6a9b Merge from eCos master repository on 2000-11-24-06:43:05-GMT jlarmour parents: 136 diff changeset	174 void
289bf90c6a9b Merge from eCos master repository on 2000-11-24-06:43:05-GMT jlarmour parents: 136 diff changeset	175 hal_flush_output(void)
289bf90c6a9b Merge from eCos master repository on 2000-11-24-06:43:05-GMT jlarmour parents: 136 diff changeset	176 {
289bf90c6a9b Merge from eCos master repository on 2000-11-24-06:43:05-GMT jlarmour parents: 136 diff changeset	177 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT
289bf90c6a9b Merge from eCos master repository on 2000-11-24-06:43:05-GMT jlarmour parents: 136 diff changeset	178 __call_if_debug_procs_t __debug_procs = CYGACC_CALL_IF_DEBUG_PROCS();
289bf90c6a9b Merge from eCos master repository on 2000-11-24-06:43:05-GMT jlarmour parents: 136 diff changeset	179 CYGACC_COMM_IF_CONTROL(*__debug_procs, __COMMCTL_FLUSH_OUTPUT);
289bf90c6a9b Merge from eCos master repository on 2000-11-24-06:43:05-GMT jlarmour parents: 136 diff changeset	180 #endif
289bf90c6a9b Merge from eCos master repository on 2000-11-24-06:43:05-GMT jlarmour parents: 136 diff changeset	181 }
289bf90c6a9b Merge from eCos master repository on 2000-11-24-06:43:05-GMT jlarmour parents: 136 diff changeset	182
289bf90c6a9b Merge from eCos master repository on 2000-11-24-06:43:05-GMT jlarmour parents: 136 diff changeset	183
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	184 // Set the baud rate for the current serial port.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	185 void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	186 __set_baud_rate (int baud)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	187 {
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	188 #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	189 __call_if_debug_procs_t __debug_procs = CYGACC_CALL_IF_DEBUG_PROCS();
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	190 CYGACC_COMM_IF_CONTROL(*__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	191 #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	192 // FIXME!
435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 70 diff changeset	193 #else
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	194 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	195 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	196 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	197
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	198 //-----------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	199 // GDB interrupt (BREAK) support.
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 #ifdef CYGDBG_HAL_DEBUG_GDB_BREAK_SUPPORT
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	202
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 70 diff changeset	203 #ifndef CYGPKG_HAL_ARM
38 e7ba79f6d3a8 Merge from eCos master repository on 1999-09-23-20:10:25-BST jlarmour parents: 34 diff changeset	204
30 641b639be825 Merge from eCos master repository on 1999-08-16-22:01:37-BST jlarmour parents: 14 diff changeset	205 #if (HAL_BREAKINST_SIZE == 1)
641b639be825 Merge from eCos master repository on 1999-08-16-22:01:37-BST jlarmour parents: 14 diff changeset	206 typedef cyg_uint8 t_inst;
641b639be825 Merge from eCos master repository on 1999-08-16-22:01:37-BST jlarmour parents: 14 diff changeset	207 #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	208 typedef cyg_uint16 t_inst;
4cc3eff958ab Merge from eCos master repository on 1999-06-04-22:24:56-BST jlarmour parents: 10 diff changeset	209 #elif (HAL_BREAKINST_SIZE == 4)
4cc3eff958ab Merge from eCos master repository on 1999-06-04-22:24:56-BST jlarmour parents: 10 diff changeset	210 typedef cyg_uint32 t_inst;
4cc3eff958ab Merge from eCos master repository on 1999-06-04-22:24:56-BST jlarmour parents: 10 diff changeset	211 #else
4cc3eff958ab Merge from eCos master repository on 1999-06-04-22:24:56-BST jlarmour parents: 10 diff changeset	212 #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	213 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	214
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	215 typedef struct
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	216 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	217 t_inst *targetAddr;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	218 t_inst savedInstr;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	219 } instrBuffer;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	220
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	221 static instrBuffer break_buffer;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	222
48 1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	223 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	224
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	225 void
50 a0774359f013 Merge from eCos master repository on 1999-11-02-17:02:15-GMT jlarmour parents: 48 diff changeset	226 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	227 {
a0774359f013 Merge from eCos master repository on 1999-11-02-17:02:15-GMT jlarmour parents: 48 diff changeset	228 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	229 }
a0774359f013 Merge from eCos master repository on 1999-11-02-17:02:15-GMT jlarmour parents: 48 diff changeset	230
a0774359f013 Merge from eCos master repository on 1999-11-02-17:02:15-GMT jlarmour parents: 48 diff changeset	231 void
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	232 cyg_hal_gdb_interrupt (target_register_t pc)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	233 {
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	234 CYGARC_HAL_SAVE_GP();
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	235
50 a0774359f013 Merge from eCos master repository on 1999-11-02-17:02:15-GMT jlarmour parents: 48 diff changeset	236 // 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	237 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	238 // 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	239 if (NULL != break_buffer.targetAddr)
a0774359f013 Merge from eCos master repository on 1999-11-02-17:02:15-GMT jlarmour parents: 48 diff changeset	240 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	241
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	242 if (NULL == break_buffer.targetAddr) {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	243 break_buffer.targetAddr = (t_inst*) pc;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	244 break_buffer.savedInstr = (t_inst)pc;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	245 (t_inst)pc = (t_inst)HAL_BREAKINST;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	246
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	247 __data_cache(CACHE_FLUSH);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	248 __instruction_cache(CACHE_FLUSH);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	249 }
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	250
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	251 CYGARC_HAL_RESTORE_GP();
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	252 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	253
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	254 int
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	255 cyg_hal_gdb_remove_break (target_register_t pc)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	256 {
48 1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	257 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	258 return 0;
1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	259
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	260 if ((t_inst*)pc == break_buffer.targetAddr) {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	261 (t_inst)pc = break_buffer.savedInstr;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	262 break_buffer.targetAddr = NULL;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	263
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	264 __data_cache(CACHE_FLUSH);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	265 __instruction_cache(CACHE_FLUSH);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	266 return 1;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	267 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	268 return 0;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	269 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	270
48 1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	271 int
1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	272 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	273 {
1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	274 if (NULL != break_buffer.targetAddr) {
1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	275 return 1;
1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	276 }
1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	277 return 0;
1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	278 }
1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	279
76 435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST jlarmour parents: 70 diff changeset	280 #endif // CYGPKG_HAL_ARM
38 e7ba79f6d3a8 Merge from eCos master repository on 1999-09-23-20:10:25-BST jlarmour parents: 34 diff changeset	281
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	282 #endif // CYGDBG_HAL_DEBUG_GDB_BREAK_SUPPORT
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	283
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	284 // Use this function to disable serial interrupts whenever reply
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	285 // characters are expected from GDB. The reason we want to control
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	286 // 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	287 // the host will be sending acknowledge characters/commands while the
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	288 // stub is running - if serial interrupts were still active, the
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	289 // characters would never reach the (polling) getDebugChar.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	290 static void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	291 interruptible(int state)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	292 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	293 static int __interrupts_suspended = 0;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	294
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	295 if (state) {
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	296 __interrupts_suspended--;
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	297 if (0 >= __interrupts_suspended) {
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	298 __interrupts_suspended = 0;
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	299 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT // this _check_ should go away
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	300 {
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	301 hal_virtual_comm_table_t* __chan;
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	302 __chan = CYGACC_CALL_IF_DEBUG_PROCS();
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	303 CYGACC_COMM_IF_CONTROL(*__chan, __COMMCTL_IRQ_ENABLE);
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	304 }
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	305 #else
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	306 if (__interruptible_control)
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	307 __interruptible_control(1);
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	308 #endif
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	309 }
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	310 } else {
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	311 __interrupts_suspended++;
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	312 if (1 == __interrupts_suspended)
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	313 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT // this _check_ should go away
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	314 {
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	315 hal_virtual_comm_table_t* __chan;
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	316 __chan = CYGACC_CALL_IF_DEBUG_PROCS();
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	317 CYGACC_COMM_IF_CONTROL(*__chan, __COMMCTL_IRQ_DISABLE);
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	318 }
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	319 #else
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	320 if (__interruptible_control)
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	321 __interruptible_control(0);
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	322 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	323 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	324 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	325
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	326 #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	327 //-----------------------------------------------------------------------------
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	328 // GDB O-packetizer function.
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 // 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	331 // 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	332 // actual device IO.
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	333
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	334 static cyg_uint8
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	335 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	336 {
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	337 cyg_uint8 __ch;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	338 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	339 CYGARC_HAL_SAVE_GP();
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	340
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	341 __ch = CYGACC_COMM_IF_GETC(*__chan);
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	342
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	343 CYGARC_HAL_RESTORE_GP();
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 return __ch;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	346 }
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	347
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 static void
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	350 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	351 {
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	352 static char line[100];
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	353 static int pos = 0;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	354 CYGARC_HAL_SAVE_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 // No need to send CRs
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	357 if( c == '\r' ) return;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	358
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	359 line[pos++] = c;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	360
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	361 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	362 {
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	363 CYG_INTERRUPT_STATE old;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	364 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	365
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	366 // 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	367 // 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	368 // 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	369 // later.
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	370 #ifdef CYG_HAL_STARTUP_ROM
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	371 HAL_DISABLE_INTERRUPTS(old);
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	372 #else
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	373 CYG_HAL_GDB_ENTER_CRITICAL_IO_REGION(old);
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	374 #endif
101 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 while(1)
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	377 {
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	378 static const char hex[] = "0123456789ABCDEF";
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	379 cyg_uint8 csum = 0, c1;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	380 int i;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	381
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	382 CYGACC_COMM_IF_PUTC(*__chan, '$');
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	383 CYGACC_COMM_IF_PUTC(*__chan, 'O');
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	384 csum += 'O';
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	385 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	386 {
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	387 char ch = line[i];
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	388 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	389 char l = hex[ch&0xF];
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	390 CYGACC_COMM_IF_PUTC(*__chan, h);
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	391 CYGACC_COMM_IF_PUTC(*__chan, l);
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	392 csum += h;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	393 csum += l;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	394 }
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	395 CYGACC_COMM_IF_PUTC(*__chan, '#');
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	396 CYGACC_COMM_IF_PUTC(*__chan, hex[(csum>>4)&0xF]);
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	397 CYGACC_COMM_IF_PUTC(*__chan, hex[csum&0xF]);
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	398
115 6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	399 nak:
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	400 c1 = CYGACC_COMM_IF_GETC(*__chan);
115 6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	401
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	402 if( c1 == '+' ) break;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	403
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	404 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	405 // 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	406 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	407 break;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	408 }
115 6ed91473a1cd Merge from eCos master repository on 2000-08-21-22:40:54-BST jlarmour parents: 112 diff changeset	409 if( c1 != '-' ) goto nak;
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	410 }
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	411
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	412 pos = 0;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	413 // And re-enable interrupts
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	414 #ifdef CYG_HAL_STARTUP_ROM
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	415 HAL_RESTORE_INTERRUPTS(old);
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	416 #else
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	417 CYG_HAL_GDB_LEAVE_CRITICAL_IO_REGION(old);
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	418 #endif
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	419 }
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	420
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	421 CYGARC_HAL_RESTORE_GP();
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	422 }
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	423
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	424 static void
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	425 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	426 cyg_uint32 __len)
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	427 {
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	428 CYGARC_HAL_SAVE_GP();
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	429
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	430 while(__len-- > 0)
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	431 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	432
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	433 CYGARC_HAL_RESTORE_GP();
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	434 }
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	435
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	436 static void
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	437 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	438 {
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	439 CYGARC_HAL_SAVE_GP();
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	440
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	441 while(__len-- > 0)
103 95f3e12a6327 Merge from eCos master repository on 2000-06-23-16:41:10-BST jlarmour parents: 101 diff changeset	442 *__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	443
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	444 CYGARC_HAL_RESTORE_GP();
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	445 }
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	446
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	447 static int
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	448 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	449 {
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	450 // Do nothing (yet).
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	451 return 0;
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	452 }
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	453 #endif
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	454
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	455
2 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 // eCos stub entry and exit magic.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	458
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	459 #ifdef CYGDBG_HAL_DEBUG_GDB_BREAK_SUPPORT
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	460 int cyg_hal_gdb_break;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	461 #endif
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	462
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	463 // Called at stub entry
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	464 static void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	465 handle_exception_cleanup( void )
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	466 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	467 interruptible(0);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	468
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	469 // Expand the HAL_SavedRegisters structure into the GDB register
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	470 // array format.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	471 HAL_GET_GDB_REGISTERS(&registers[0], _hal_registers);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	472 _registers = &registers[0];
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	473
8 ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST jlarmour parents: 6 diff changeset	474 #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	475 // 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	476 // 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	477 // 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	478 //
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST jlarmour parents: 6 diff changeset	479 // 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	480 // 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	481 // special.
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST jlarmour parents: 6 diff changeset	482 HAL_STUB_PLATFORM_STUBS_FIXUP();
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST jlarmour parents: 6 diff changeset	483 #endif
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST jlarmour parents: 6 diff changeset	484
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	485 #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	486 // 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	487 // 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	488 // 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	489 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	490 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	491 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	492 }
1370c5e55234 Merge from eCos master repository on 1999-10-25-21:18:27-BST jlarmour parents: 38 diff changeset	493
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	494 // FIXME: (there may be a better way to do this)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	495 // 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	496 // 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	497 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	498 #endif
136 a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	499
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	500 #if defined(HAL_STUB_HW_WATCHPOINT) \|\| defined(HAL_STUB_HW_BREAKPOINT)
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	501 // For HW watchpoint/breakpoint support, we need to know if we
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	502 // stopped because of watchpoint or hw break. We do that here
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	503 // before GDB has a chance to remove the watchpoints and save
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	504 // the information for later use in building response packets.
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	505 _hw_stop_reason = HAL_STUB_IS_STOPPED_BY_HARDWARE(_watch_data_addr);
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	506 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	507 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	508
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	509 // Called at stub exit
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	510 static void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	511 handle_exception_init( void )
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	512 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	513 // Compact register array again.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	514 HAL_SET_GDB_REGISTERS(_hal_registers, &registers[0]);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	515
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	516 interruptible(1);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	517 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	518
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	519
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 // Initialization.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	522
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	523 // Signal handler.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	524 int
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	525 cyg_hal_process_signal (int signal)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	526 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	527 // We don't care about the signal (atm).
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	528 return 0;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	529 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	530
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	531 // Install the standard set of trap handlers for the stub.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	532 void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	533 __install_traps (void)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	534 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	535 // 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	536 __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	537 // 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	538 // some platforms.
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST jlarmour parents: 6 diff changeset	539 __process_exit_vec = &__reset;
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	540
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	541 __cleanup_vec = &handle_exception_cleanup;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	542 __init_vec = &handle_exception_init;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	543
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	544 #ifndef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT // this should go away
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	545 #ifdef CYGDBG_HAL_DEBUG_GDB_BREAK_SUPPORT
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	546 // Control of GDB interrupts.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	547 __interruptible_control = HAL_STUB_PLATFORM_INTERRUPTIBLE;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	548 #endif
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	549 #endif
2 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 // Nothing further to do, handle_exception will be called when an
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	552 // exception occurs.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	553 }
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 // Initialize the hardware.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	556 void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	557 initHardware (void)
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 static int initialized = 0;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	560
103 95f3e12a6327 Merge from eCos master repository on 2000-06-23-16:41:10-BST jlarmour parents: 101 diff changeset	561 if (initialized)
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	562 return;
103 95f3e12a6327 Merge from eCos master repository on 2000-06-23-16:41:10-BST jlarmour parents: 101 diff changeset	563 initialized = 1;
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	564
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	565 // Get serial port initialized.
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	566 HAL_STUB_PLATFORM_INIT_SERIAL();
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	567
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	568 #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	569 {
95f3e12a6327 Merge from eCos master repository on 2000-06-23-16:41:10-BST jlarmour parents: 101 diff changeset	570 hal_virtual_comm_table_t* comm;
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	571 int cur = CYGACC_CALL_IF_SET_CONSOLE_COMM(CYGNUM_CALL_IF_SET_COMM_ID_QUERY_CURRENT);
103 95f3e12a6327 Merge from eCos master repository on 2000-06-23-16:41:10-BST jlarmour parents: 101 diff changeset	572
95f3e12a6327 Merge from eCos master repository on 2000-06-23-16:41:10-BST jlarmour parents: 101 diff changeset	573 // Initialize mangler procs
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	574 CYGACC_CALL_IF_SET_CONSOLE_COMM(CYGNUM_CALL_IF_SET_COMM_ID_MANGLER);
103 95f3e12a6327 Merge from eCos master repository on 2000-06-23-16:41:10-BST jlarmour parents: 101 diff changeset	575 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	576 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	577 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	578 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	579 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	580 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	581
95f3e12a6327 Merge from eCos master repository on 2000-06-23-16:41:10-BST jlarmour parents: 101 diff changeset	582 // 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	583 // 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	584 // 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	585 // 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	586 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	587 && CYGNUM_HAL_VIRTUAL_VECTOR_DEBUG_CHANNEL != cur)
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	588 CYGACC_CALL_IF_SET_CONSOLE_COMM(cur);
103 95f3e12a6327 Merge from eCos master repository on 2000-06-23-16:41:10-BST jlarmour parents: 101 diff changeset	589
95f3e12a6327 Merge from eCos master repository on 2000-06-23-16:41:10-BST jlarmour parents: 101 diff changeset	590 // Set the debug channel.
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	591 CYGACC_CALL_IF_SET_DEBUG_COMM(CYGNUM_HAL_VIRTUAL_VECTOR_DEBUG_CHANNEL);
103 95f3e12a6327 Merge from eCos master repository on 2000-06-23-16:41:10-BST jlarmour parents: 101 diff changeset	592 }
110 84e4bde58b26 Merge from eCos master repository on 2000-07-14-22:00:02-BST jlarmour parents: 107 diff changeset	593 #endif // CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT
105 5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	594
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	595 #ifdef HAL_STUB_PLATFORM_INIT
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	596 // If the platform defines any initialization code, call it here.
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	597 HAL_STUB_PLATFORM_INIT();
5a0cc6c243a9 Merge from eCos master repository on 2000-06-30-08:18:49-BST jlarmour parents: 103 diff changeset	598 #endif
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	599
110 84e4bde58b26 Merge from eCos master repository on 2000-07-14-22:00:02-BST jlarmour parents: 107 diff changeset	600 #ifndef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT // this should go away
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	601 #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	602 // Get interrupt handler initialized.
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	603 HAL_STUB_PLATFORM_INIT_BREAK_IRQ();
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	604 #endif
110 84e4bde58b26 Merge from eCos master repository on 2000-07-14-22:00:02-BST jlarmour parents: 107 diff changeset	605 #endif // !CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	606 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	607
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	608 // Reset the board.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	609 void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	610 __reset (void)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	611 {
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	612 #ifdef CYGSEM_HAL_VIRTUAL_VECTOR_SUPPORT
107 7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST jlarmour parents: 105 diff changeset	613 __call_if_reset_t __rom_reset = CYGACC_CALL_IF_RESET_GET();
101 c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	614 if (__rom_reset)
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	615 __rom_reset();
c37d3a9e1b28 Merge from eCos master repository on 2000-06-16-07:47:03-BST jlarmour parents: 76 diff changeset	616 #else
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	617 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	618 #endif
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	619 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	620
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	621 //-----------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	622 // Breakpoint support.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	623
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	624 #ifndef CYGPKG_HAL_ARM
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	625 // This function will generate a breakpoint exception. It is used at
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	626 // 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	627 // used otherwise as a quick means to stop program execution and
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	628 // "break" into the debugger.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	629 void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	630 breakpoint()
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 HAL_BREAKPOINT(_breakinst);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	633 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	634
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	635 // This function returns the opcode for a 'trap' instruction.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	636 unsigned long
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	637 __break_opcode ()
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 return HAL_BREAKINST;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	640 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	641 #endif
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	642
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	643 //-----------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	644 // 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	645 void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	646 __build_t_packet (int sigval, char *buf)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	647 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	648 target_register_t addr;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	649 char *ptr = buf;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	650
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	651 *ptr++ = 'T';
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	652 *ptr++ = __tohex (sigval >> 4);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	653 *ptr++ = __tohex (sigval);
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 #ifdef CYGDBG_HAL_DEBUG_GDB_THREAD_SUPPORT
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	656 // Include thread ID if thread manipulation is required.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	657 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	658 int id;
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 *ptr++ = 't';
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	661 *ptr++ = 'h';
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	662 *ptr++ = 'r';
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	663 *ptr++ = 'e';
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	664 *ptr++ = 'a';
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	665 *ptr++ = 'd';
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	666 *ptr++ = ':';
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 #if (CYG_BYTEORDER == CYG_MSBFIRST)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	669 id = dbg_currthread_id ();
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	670 #else
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	671 // FIXME: Temporary workaround for PR 18903. Thread ID must be
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	672 // big-endian in the T packet.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	673 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	674 unsigned char* bep = (unsigned char*)&id;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	675 int be_id;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	676
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	677 be_id = dbg_currthread_id ();
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	678 *bep++ = (be_id >> 24) & 0xff ;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	679 *bep++ = (be_id >> 16) & 0xff ;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	680 *bep++ = (be_id >> 8) & 0xff ;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	681 *bep++ = (be_id & 0xff) ;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	682 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	683 #endif
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	684 ptr = __mem2hex((char *)&id, ptr, sizeof(id), 0);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	685 *ptr++ = ';';
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	686 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	687 #endif
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	688
136 a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	689 #ifdef HAL_STUB_HW_WATCHPOINT
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	690 switch(_hw_stop_reason) {
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	691 case HAL_STUB_HW_STOP_WATCH:
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	692 case HAL_STUB_HW_STOP_RWATCH:
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	693 case HAL_STUB_HW_STOP_AWATCH:
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	694 strcpy(ptr, _hw_stop_str[_hw_stop_reason]);
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	695 ptr += strlen(_hw_stop_str[_hw_stop_reason]);
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	696 *ptr++ = ':';
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	697 // Send address MSB first
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	698 ptr += __intToHex(ptr, (target_register_t)_watch_data_addr,
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	699 sizeof(_watch_data_addr) * 8);
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	700 *ptr++ = ';';
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	701 break;
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	702 default:
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	703 break;
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	704 }
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	705 #endif
a9ac27ec7abc Merge from eCos master repository on 2000-11-17-18:24:25-GMT jlarmour parents: 130 diff changeset	706
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	707 *ptr++ = __tohex (PC >> 4);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	708 *ptr++ = __tohex (PC);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	709 *ptr++ = ':';
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	710 addr = get_register (PC);
112 02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	711 if (sizeof(addr) < REGSIZE(PC))
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	712 {
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	713 // GDB is expecting REGSIZE(PC) number of bytes.
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	714 // We only have sizeof(addr) number. Let's fill
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	715 // the appropriate number of bytes intelligently.
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	716 target_register_t extend_val = 0;
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	717 #ifdef CYGARC_SIGN_EXTEND_REGISTERS
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	718 {
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	719 unsigned long bits_in_addr = (sizeof(addr) << 3); // ie Size in bytes * 8
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	720 target_register_t sign_bit_mask = (1 << (bits_in_addr - 1));
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	721 if ((addr & sign_bit_mask) == sign_bit_mask)
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	722 extend_val = ~0;
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	723 }
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	724 #endif
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	725 ptr = __mem2hex((char *)&extend_val, ptr, REGSIZE(PC) - sizeof(addr), 0);
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	726 }
121 6bd9d475ed4b Merge from eCos master repository on 2000-09-04-20:50:20-BST jlarmour parents: 115 diff changeset	727 ptr = __mem2hex((char *)&addr, ptr, sizeof(addr), 0);
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	728 *ptr++ = ';';
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	729
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	730 *ptr++ = __tohex (SP >> 4);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	731 *ptr++ = __tohex (SP);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	732 *ptr++ = ':';
112 02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	733 addr = (target_register_t) get_register (SP);
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	734 if (sizeof(addr) < REGSIZE(SP))
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	735 {
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	736 // GDB is expecting REGSIZE(SP) number of bytes.
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	737 // We only have sizeof(addr) number. Let's fill
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	738 // the appropriate number of bytes intelligently.
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	739 target_register_t extend_val = 0;
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	740 #ifdef CYGARC_SIGN_EXTEND_REGISTERS
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	741 {
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	742 unsigned long bits_in_addr = (sizeof(addr) << 3); // ie Size in bytes * 8
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	743 target_register_t sign_bit_mask = (1 << (bits_in_addr - 1));
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	744 if ((addr & sign_bit_mask) == sign_bit_mask)
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	745 extend_val = ~0;
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	746 }
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	747 #endif
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	748 ptr = __mem2hex((char *)&extend_val, ptr, REGSIZE(SP) - sizeof(addr), 0);
02ea4320376c Merge from eCos master repository on 2000-07-21-21:01:39-BST jlarmour parents: 110 diff changeset	749 }
121 6bd9d475ed4b Merge from eCos master repository on 2000-09-04-20:50:20-BST jlarmour parents: 115 diff changeset	750 ptr = __mem2hex((char *)&addr, ptr, sizeof(addr), 0);
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	751 *ptr++ = ';';
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 *ptr++ = 0;
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
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	756
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 // Cache functions.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	759
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	760 // Perform the specified operation on the instruction cache.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	761 // Returns 1 if the cache is enabled, 0 otherwise.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	762 int
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	763 __instruction_cache (cache_control_t request)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	764 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	765 int state = 1;
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 switch (request) {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	768 case CACHE_ENABLE:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	769 HAL_ICACHE_ENABLE();
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	770 break;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	771 case CACHE_DISABLE:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	772 HAL_ICACHE_DISABLE();
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	773 state = 0;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	774 break;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	775 case CACHE_FLUSH:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	776 HAL_ICACHE_SYNC();
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	777 break;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	778 case CACHE_NOOP:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	779 /* fall through */
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	780 default:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	781 break;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	782 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	783
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	784 #ifdef HAL_ICACHE_IS_ENABLED
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	785 HAL_ICACHE_IS_ENABLED(state);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	786 #endif
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	787
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	788 return state;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	789 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	790
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	791 // Perform the specified operation on the data cache.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	792 // Returns 1 if the cache is enabled, 0 otherwise.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	793 int
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	794 __data_cache (cache_control_t request)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	795 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	796 int state = 1;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	797
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	798 switch (request) {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	799 case CACHE_ENABLE:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	800 HAL_DCACHE_ENABLE();
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	801 break;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	802 case CACHE_DISABLE:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	803 HAL_DCACHE_DISABLE();
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	804 state = 0;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	805 break;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	806 case CACHE_FLUSH:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	807 HAL_DCACHE_SYNC();
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	808 break;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	809 case CACHE_NOOP:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	810 /* fall through */
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	811 default:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	812 break;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	813 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	814 #ifdef HAL_DCACHE_IS_ENABLED
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	815 HAL_DCACHE_IS_ENABLED(state);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	816 #endif
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	817
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	818 return state;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	819 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	820
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	821 //-----------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	822 // Memory accessor functions.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	823
130 eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST jlarmour parents: 121 diff changeset	824 // The __mem_fault_handler pointer is volatile since it is only
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST jlarmour parents: 121 diff changeset	825 // set/cleared by the function below - which does not rely on any
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST jlarmour parents: 121 diff changeset	826 // other functions, so the compiler may decide to not bother updating
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST jlarmour parents: 121 diff changeset	827 // the pointer at all. If any of the memory accesses cause an
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST jlarmour parents: 121 diff changeset	828 // exception, the pointer must be set to ensure the exception handler
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST jlarmour parents: 121 diff changeset	829 // can make use of it.
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST jlarmour parents: 121 diff changeset	830
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST jlarmour parents: 121 diff changeset	831 void* volatile __mem_fault_handler = (void *)0;
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	832
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	833 /* 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	834 which are passed as globals to avoid squeezing them thru
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	835 __set_mem_fault_trap. */
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	836
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	837 static volatile target_register_t memCount;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	838
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	839 static void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	840 __do_copy_mem (unsigned char* src, unsigned char* dst)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	841 {
34 29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	842 unsigned long *long_dst;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	843 unsigned long *long_src;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	844 unsigned short *short_dst;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	845 unsigned short *short_src;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	846
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	847 __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	848 /* when the copy loop completes. */
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	849 __mem_fault_handler = &&err;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	850
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	851 // 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	852 while (memCount) {
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	853 if ((memCount >= sizeof(long)) &&
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	854 (((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	855 (((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	856
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	857 long_dst = (unsigned long *)dst;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	858 long_src = (unsigned long *)src;
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	859
34 29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	860 long_dst++ = long_src++;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	861 memCount -= sizeof(long);
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	862
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	863 dst = (unsigned char *)long_dst;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	864 src = (unsigned char *)long_src;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	865 } else if ((memCount >= sizeof(short)) &&
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	866 (((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	867 (((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	868
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	869 short_dst = (unsigned short *)dst;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	870 short_src = (unsigned short *)src;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	871
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	872 short_dst++ = short_src++;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	873 memCount -= sizeof(short);
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	874
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	875 dst = (unsigned char *)short_dst;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	876 src = (unsigned char *)short_src;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	877 } else {
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	878 dst++ = src++;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	879 memCount--;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	880 }
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	881 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	882
34 29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	883 __mem_fault = 0;
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	884
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	885 err:
34 29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	886 __mem_fault_handler = (void *)0;
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	887 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	888
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	889 /*
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	890 * __read_mem_safe:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	891 * Get contents of target memory, abort on error.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	892 */
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	893
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	894 int
34 29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	895 __read_mem_safe (void dst, void src, int count)
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	896 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	897 memCount = count;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	898 __do_copy_mem((unsigned char) src, (unsigned char) dst);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	899 return count - memCount; // return number of bytes successfully read
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	900 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	901
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	902 /*
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	903 * __write_mem_safe:
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	904 * Set contents of target memory, abort on error.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	905 */
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	906
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	907 int
34 29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST jlarmour parents: 30 diff changeset	908 __write_mem_safe (void src, void dst, int count)
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	909 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	910 memCount = count;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	911 __do_copy_mem((unsigned char) src, (unsigned char) dst);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	912 return count - memCount; // return number of bytes successfully written
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	913 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	914
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	915 //-----------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	916 // Target extras?!
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	917 int
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	918 __process_target_query(char * pkt, char * out, int maxOut)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	919 { return 0 ; }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	920 int
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	921 __process_target_set(char * pkt, char * out, int maxout)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	922 { return 0 ; }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	923 int
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	924 __process_target_packet(char * pkt, char * out, int maxout)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	925 { return 0 ; }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	926
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	927 // GDB string output, making sure interrupts are disabled.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	928 // This function gets used by some diag output functions.
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	929 void
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	930 hal_output_gdb_string(target_register_t str, int string_len)
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	931 {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	932 unsigned long __state;
8 ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST jlarmour parents: 6 diff changeset	933 HAL_DISABLE_INTERRUPTS(__state);
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	934 __output_gdb_string(str, string_len);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	935 HAL_RESTORE_INTERRUPTS(__state);
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	936 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	937
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: diff changeset	938 #endif // CYGDBG_HAL_DEBUG_GDB_INCLUDE_STUBS

Mercurial > ecos

annotate packages/hal/common/current/src/hal_stub.c @ 138:289bf90c6a9b