OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [ecos-3.0/] [packages/] [hal/] [sh/] [cq7708/] [current/] [src/] [hal_diag.c] - Blame information for rev 786

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 786 skrzyp
//=============================================================================
2
//
3
//      hal_diag.c
4
//
5
//      HAL diagnostic output code
6
//
7
//=============================================================================
8
// ####ECOSGPLCOPYRIGHTBEGIN####                                            
9
// -------------------------------------------                              
10
// This file is part of eCos, the Embedded Configurable Operating System.   
11
// Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
12
//
13
// eCos is free software; you can redistribute it and/or modify it under    
14
// the terms of the GNU General Public License as published by the Free     
15
// Software Foundation; either version 2 or (at your option) any later      
16
// version.                                                                 
17
//
18
// eCos is distributed in the hope that it will be useful, but WITHOUT      
19
// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or    
20
// FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License    
21
// for more details.                                                        
22
//
23
// You should have received a copy of the GNU General Public License        
24
// along with eCos; if not, write to the Free Software Foundation, Inc.,    
25
// 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.            
26
//
27
// As a special exception, if other files instantiate templates or use      
28
// macros or inline functions from this file, or you compile this file      
29
// and link it with other works to produce a work based on this file,       
30
// this file does not by itself cause the resulting work to be covered by   
31
// the GNU General Public License. However the source code for this file    
32
// must still be made available in accordance with section (3) of the GNU   
33
// General Public License v2.                                               
34
//
35
// This exception does not invalidate any other reasons why a work based    
36
// on this file might be covered by the GNU General Public License.         
37
// -------------------------------------------                              
38
// ####ECOSGPLCOPYRIGHTEND####                                              
39
//=============================================================================
40
//#####DESCRIPTIONBEGIN####
41
//
42
// Author(s):    nickg, jskov
43
// Contributors: nickg, jskov
44
// Date:         1999-03-23
45
// Purpose:      HAL diagnostic output
46
// Description:  Implementations of HAL diagnostic output support.
47
//
48
//####DESCRIPTIONEND####
49
//
50
//=============================================================================
51
 
52
#include <pkgconf/hal.h>
53
 
54
#include <cyg/hal/hal_diag.h>           // our header.
55
 
56
#include <cyg/infra/cyg_type.h>         // base types, externC
57
#include <cyg/hal/hal_io.h>             // IO macros
58
#include <cyg/hal/hal_if.h>             // calling interface API
59
#include <cyg/hal/hal_intr.h>           // Interrupt macros
60
#include <cyg/hal/sh3_sci.h>            // driver API
61
#include <cyg/hal/hal_misc.h>           // Helper functions
62
 
63
#define SCI_BASE ((cyg_uint8*)0xfffffe80)
64
 
65
//-----------------------------------------------------------------------------
66
 
67
void
68
cyg_hal_plf_comms_init(void)
69
{
70
    static int initialized = 0;
71
 
72
    if (initialized)
73
        return;
74
 
75
    initialized = 1;
76
 
77
    cyg_hal_plf_sci_init(0, 0, CYGNUM_HAL_INTERRUPT_SCI_RXI, SCI_BASE);
78
}
79
 
80
//=============================================================================
81
// Led control
82
//=============================================================================
83
#define LED   0xa8000000
84
 
85
void
86
hal_diag_led_on( void )
87
{
88
    HAL_WRITE_UINT8(LED, 0x18);
89
}
90
 
91
void
92
hal_diag_led_off( void )
93
{
94
    HAL_WRITE_UINT8(LED, 0);
95
}
96
 
97
//=============================================================================
98
// Compatibility with older stubs
99
//=============================================================================
100
 
101
#ifndef CYGSEM_HAL_VIRTUAL_VECTOR_DIAG
102
 
103
#define CYGPRI_HAL_SH_SH3_SCI_PRIVATE
104
#include <cyg/hal/sh3_sci.h>            // driver API
105
 
106
static channel_data_t channel = { (cyg_uint8*)SCI_BASE, 0, 0};
107
 
108
#if defined(CYGDBG_HAL_DEBUG_GDB_INCLUDE_STUBS)
109
#include <cyg/hal/hal_stub.h>           // hal_output_gdb_string
110
#endif
111
 
112
#if defined(CYGSEM_HAL_USE_ROM_MONITOR_GDB_stubs)
113
 
114
#define CYG_HAL_DIAG_GDB
115
 
116
#elif defined(CYGDBG_HAL_DEBUG_GDB_INCLUDE_STUBS)
117
 
118
#define CYG_HAL_DIAG_GDB
119
 
120
#endif
121
 
122
//-----------------------------------------------------------------------------
123
 
124
void hal_diag_init(void)
125
{
126
    cyg_hal_plf_sci_init_channel(&channel);
127
}
128
 
129
void
130
hal_diag_write_char_serial( char c )
131
{
132
    cyg_hal_plf_sci_putc(&channel, c);
133
}
134
 
135
void
136
hal_diag_read_char(char *c)
137
{
138
    *c = (char) cyg_hal_plf_sci_getc(&channel);
139
}
140
 
141
// Packet function
142
void
143
hal_diag_write_char(char c)
144
{
145
#ifdef CYG_HAL_DIAG_GDB
146
    static char line[100];
147
    static int pos = 0;
148
 
149
    // No need to send CRs
150
    if( c == '\r' ) return;
151
 
152
    line[pos++] = c;
153
 
154
    if( c == '\n' || pos == sizeof(line) )
155
    {
156
        CYG_INTERRUPT_STATE old;
157
 
158
        // Disable interrupts. This prevents GDB trying to interrupt us
159
        // while we are in the middle of sending a packet. The serial
160
        // receive interrupt will be seen when we re-enable interrupts
161
        // later.
162
 
163
#ifdef CYGDBG_HAL_DEBUG_GDB_INCLUDE_STUBS
164
        CYG_HAL_GDB_ENTER_CRITICAL_IO_REGION(old);
165
#else
166
        HAL_DISABLE_INTERRUPTS(old);
167
#endif
168
 
169
        while(1)
170
        {
171
            char c1;
172
            static char hex[] = "0123456789ABCDEF";
173
            cyg_uint8 csum = 0;
174
            int i;
175
 
176
            cyg_hal_plf_sci_putc(&channel, '$');
177
            cyg_hal_plf_sci_putc(&channel, 'O');
178
            csum += 'O';
179
            for( i = 0; i < pos; i++ )
180
            {
181
                char ch = line[i];
182
                char h = hex[(ch>>4)&0xF];
183
                char l = hex[ch&0xF];
184
                cyg_hal_plf_sci_putc(&channel, h);
185
                cyg_hal_plf_sci_putc(&channel, l);
186
                csum += h;
187
                csum += l;
188
            }
189
            cyg_hal_plf_sci_putc(&channel, '#');
190
            cyg_hal_plf_sci_putc(&channel, hex[(csum>>4)&0xF]);
191
            cyg_hal_plf_sci_putc(&channel, hex[csum&0xF]);
192
 
193
            // Wait for the ACK character '+' from GDB here and handle
194
            // receiving a ^C instead.
195
            c1 = (char) cyg_hal_plf_sci_getc(&channel);
196
 
197
            if( c1 == '+' )
198
                break;              // a good acknowledge
199
 
200
            // Check for user break.
201
            if( cyg_hal_is_break( &c1, 1 ) )
202
                cyg_hal_user_break( NULL );
203
 
204
            // otherwise, loop round again
205
        }
206
 
207
        pos = 0;
208
 
209
        // And re-enable interrupts
210
#ifdef CYGDBG_HAL_DEBUG_GDB_INCLUDE_STUBS
211
        CYG_HAL_GDB_LEAVE_CRITICAL_IO_REGION(old);
212
#else
213
        HAL_RESTORE_INTERRUPTS(old);
214
#endif
215
    }
216
#else // CYG_HAL_DIAG_GDB
217
    cyg_hal_plf_sci_putc(&channel, c);
218
#endif
219
}
220
 
221
#endif // CYGSEM_HAL_VIRTUAL_VECTOR_DIAG
222
 
223
//-----------------------------------------------------------------------------
224
// End of hal_diag.c

powered by: WebSVN 2.1.0

© copyright 1999-2025 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.