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

Subversion Repositories openrisc

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

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