OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [rtos/] [ecos-2.0/] [packages/] [hal/] [sh/] [edk7708/] [v2_0/] [src/] [hal_diag.c] - Blame information for rev 174

Details | Compare with Previous | View Log

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