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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [ecos-3.0/] [packages/] [hal/] [sh/] [edk7708/] [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
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
 
68
void
69
cyg_hal_plf_comms_init(void)
70
{
71
    static int initialized = 0;
72
 
73
    if (initialized)
74
        return;
75
 
76
    initialized = 1;
77
 
78
    cyg_hal_plf_sci_init(0, 0, CYGNUM_HAL_INTERRUPT_SCI_RXI, SCI_BASE);
79
}
80
 
81
//=============================================================================
82
// Led control
83
//=============================================================================
84
#define LED_ON   0x04000000
85
#define LED_OFF  0x18000000
86
 
87
void
88
hal_diag_led_on( void )
89
{
90
    HAL_WRITE_UINT8(LED_ON, 0);
91
}
92
 
93
void
94
hal_diag_led_off( void )
95
{
96
    HAL_WRITE_UINT8(LED_OFF, 0);
97
}
98
 
99
 
100
//=============================================================================
101
// Compatibility with older stubs
102
//=============================================================================
103
 
104
#ifndef CYGSEM_HAL_VIRTUAL_VECTOR_DIAG
105
 
106
#define CYGPRI_HAL_SH_SH3_SCI_PRIVATE
107
#include <cyg/hal/sh3_sci.h>            // driver API
108
 
109
static channel_data_t channel = { (cyg_uint8*)SCI_BASE, 0, 0};
110
 
111
#if defined(CYGDBG_HAL_DEBUG_GDB_INCLUDE_STUBS)
112
#include <cyg/hal/hal_stub.h>           // hal_output_gdb_string
113
#endif
114
 
115
#if defined(CYGSEM_HAL_USE_ROM_MONITOR_GDB_stubs)
116
 
117
#define CYG_HAL_DIAG_GDB
118
 
119
#elif defined(CYGDBG_HAL_DEBUG_GDB_INCLUDE_STUBS)
120
 
121
#define CYG_HAL_DIAG_GDB
122
 
123
#endif
124
 
125
//-----------------------------------------------------------------------------
126
 
127
void hal_diag_init(void)
128
{
129
    cyg_hal_plf_sci_init_channel(&channel);
130
}
131
 
132
void
133
hal_diag_write_char_serial( char c )
134
{
135
    cyg_hal_plf_sci_putc(&channel, c);
136
}
137
 
138
void
139
hal_diag_read_char(char *c)
140
{
141
    *c = (char) cyg_hal_plf_sci_getc(&channel);
142
}
143
 
144
// Packet function
145
void
146
hal_diag_write_char(char c)
147
{
148
#ifdef CYG_HAL_DIAG_GDB
149
    static char line[100];
150
    static int pos = 0;
151
 
152
    // No need to send CRs
153
    if( c == '\r' ) return;
154
 
155
    line[pos++] = c;
156
 
157
    if( c == '\n' || pos == sizeof(line) )
158
    {
159
        CYG_INTERRUPT_STATE old;
160
 
161
        // Disable interrupts. This prevents GDB trying to interrupt us
162
        // while we are in the middle of sending a packet. The serial
163
        // receive interrupt will be seen when we re-enable interrupts
164
        // later.
165
 
166
#ifdef CYGDBG_HAL_DEBUG_GDB_INCLUDE_STUBS
167
        CYG_HAL_GDB_ENTER_CRITICAL_IO_REGION(old);
168
#else
169
        HAL_DISABLE_INTERRUPTS(old);
170
#endif
171
 
172
        while(1)
173
        {
174
            char c1;
175
            static char hex[] = "0123456789ABCDEF";
176
            cyg_uint8 csum = 0;
177
            int i;
178
 
179
            cyg_hal_plf_sci_putc(&channel, '$');
180
            cyg_hal_plf_sci_putc(&channel, 'O');
181
            csum += 'O';
182
            for( i = 0; i < pos; i++ )
183
            {
184
                char ch = line[i];
185
                char h = hex[(ch>>4)&0xF];
186
                char l = hex[ch&0xF];
187
                cyg_hal_plf_sci_putc(&channel, h);
188
                cyg_hal_plf_sci_putc(&channel, l);
189
                csum += h;
190
                csum += l;
191
            }
192
            cyg_hal_plf_sci_putc(&channel, '#');
193
            cyg_hal_plf_sci_putc(&channel, hex[(csum>>4)&0xF]);
194
            cyg_hal_plf_sci_putc(&channel, hex[csum&0xF]);
195
 
196
            // Wait for the ACK character '+' from GDB here and handle
197
            // receiving a ^C instead.
198
            c1 = (char) cyg_hal_plf_sci_getc(&channel);
199
 
200
            if( c1 == '+' )
201
                break;              // a good acknowledge
202
 
203
            // Check for user break.
204
            if( cyg_hal_is_break( &c1, 1 ) )
205
                cyg_hal_user_break( NULL );
206
 
207
            // otherwise, loop round again
208
        }
209
 
210
        pos = 0;
211
 
212
        // And re-enable interrupts
213
#ifdef CYGDBG_HAL_DEBUG_GDB_INCLUDE_STUBS
214
        CYG_HAL_GDB_LEAVE_CRITICAL_IO_REGION(old);
215
#else
216
        HAL_RESTORE_INTERRUPTS(old);
217
#endif
218
    }
219
#else // CYG_HAL_DIAG_GDB
220
    cyg_hal_plf_sci_putc(&channel, c);
221
#endif
222
}
223
#endif // CYGSEM_HAL_VIRTUAL_VECTOR_DIAG
224
 
225
//-----------------------------------------------------------------------------
226
// End of hal_diag.c

powered by: WebSVN 2.1.0

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