260 lines
6.0 KiB
C
260 lines
6.0 KiB
C
|
/* debug-stub.c: debug-mode stub
|
||
|
*
|
||
|
* Copyright (C) 2004 Red Hat, Inc. All Rights Reserved.
|
||
|
* Written by David Howells (dhowells@redhat.com)
|
||
|
*
|
||
|
* This program is free software; you can redistribute it and/or
|
||
|
* modify it under the terms of the GNU General Public License
|
||
|
* as published by the Free Software Foundation; either version
|
||
|
* 2 of the License, or (at your option) any later version.
|
||
|
*/
|
||
|
|
||
|
#include <linux/string.h>
|
||
|
#include <linux/kernel.h>
|
||
|
#include <linux/signal.h>
|
||
|
#include <linux/sched.h>
|
||
|
#include <linux/init.h>
|
||
|
#include <linux/serial_reg.h>
|
||
|
#include <linux/start_kernel.h>
|
||
|
|
||
|
#include <asm/system.h>
|
||
|
#include <asm/serial-regs.h>
|
||
|
#include <asm/timer-regs.h>
|
||
|
#include <asm/irc-regs.h>
|
||
|
#include <asm/gdb-stub.h>
|
||
|
#include "gdb-io.h"
|
||
|
|
||
|
/* CPU board CON5 */
|
||
|
#define __UART0(X) (*(volatile uint8_t *)(UART0_BASE + (UART_##X)))
|
||
|
|
||
|
#define LSR_WAIT_FOR0(STATE) \
|
||
|
do { \
|
||
|
} while (!(__UART0(LSR) & UART_LSR_##STATE))
|
||
|
|
||
|
#define FLOWCTL_QUERY0(LINE) ({ __UART0(MSR) & UART_MSR_##LINE; })
|
||
|
#define FLOWCTL_CLEAR0(LINE) do { __UART0(MCR) &= ~UART_MCR_##LINE; } while (0)
|
||
|
#define FLOWCTL_SET0(LINE) do { __UART0(MCR) |= UART_MCR_##LINE; } while (0)
|
||
|
|
||
|
#define FLOWCTL_WAIT_FOR0(LINE) \
|
||
|
do { \
|
||
|
gdbstub_do_rx(); \
|
||
|
} while(!FLOWCTL_QUERY(LINE))
|
||
|
|
||
|
struct frv_debug_status __debug_status;
|
||
|
|
||
|
static void __init debug_stub_init(void);
|
||
|
|
||
|
/*****************************************************************************/
|
||
|
/*
|
||
|
* debug mode handler stub
|
||
|
* - we come here with the CPU in debug mode and with exceptions disabled
|
||
|
* - handle debugging services for userspace
|
||
|
*/
|
||
|
asmlinkage void debug_stub(void)
|
||
|
{
|
||
|
unsigned long hsr0;
|
||
|
int type = 0;
|
||
|
|
||
|
static u8 inited = 0;
|
||
|
if (!inited) {
|
||
|
debug_stub_init();
|
||
|
type = -1;
|
||
|
inited = 1;
|
||
|
}
|
||
|
|
||
|
hsr0 = __get_HSR(0);
|
||
|
if (hsr0 & HSR0_ETMD)
|
||
|
__set_HSR(0, hsr0 & ~HSR0_ETMD);
|
||
|
|
||
|
/* disable single stepping */
|
||
|
__debug_status.dcr &= ~DCR_SE;
|
||
|
|
||
|
/* kernel mode can propose an exception be handled in debug mode by jumping to a special
|
||
|
* location */
|
||
|
if (__debug_frame->pc == (unsigned long) __break_hijack_kernel_event_breaks_here) {
|
||
|
/* replace the debug frame with the kernel frame and discard
|
||
|
* the top kernel context */
|
||
|
*__debug_frame = *__frame;
|
||
|
__frame = __debug_frame->next_frame;
|
||
|
__debug_status.brr = (__debug_frame->tbr & TBR_TT) << 12;
|
||
|
__debug_status.brr |= BRR_EB;
|
||
|
}
|
||
|
|
||
|
if (__debug_frame->pc == (unsigned long) __debug_bug_trap + 4) {
|
||
|
__debug_frame->pc = __debug_frame->lr;
|
||
|
type = __debug_frame->gr8;
|
||
|
}
|
||
|
|
||
|
#ifdef CONFIG_GDBSTUB
|
||
|
gdbstub(type);
|
||
|
#endif
|
||
|
|
||
|
if (hsr0 & HSR0_ETMD)
|
||
|
__set_HSR(0, __get_HSR(0) | HSR0_ETMD);
|
||
|
|
||
|
} /* end debug_stub() */
|
||
|
|
||
|
/*****************************************************************************/
|
||
|
/*
|
||
|
* debug stub initialisation
|
||
|
*/
|
||
|
static void __init debug_stub_init(void)
|
||
|
{
|
||
|
__set_IRR(6, 0xff000000); /* map ERRs to NMI */
|
||
|
__set_IITMR(1, 0x20000000); /* ERR0/1, UART0/1 IRQ detect levels */
|
||
|
|
||
|
asm volatile(" movgs gr0,ibar0 \n"
|
||
|
" movgs gr0,ibar1 \n"
|
||
|
" movgs gr0,ibar2 \n"
|
||
|
" movgs gr0,ibar3 \n"
|
||
|
" movgs gr0,dbar0 \n"
|
||
|
" movgs gr0,dbmr00 \n"
|
||
|
" movgs gr0,dbmr01 \n"
|
||
|
" movgs gr0,dbdr00 \n"
|
||
|
" movgs gr0,dbdr01 \n"
|
||
|
" movgs gr0,dbar1 \n"
|
||
|
" movgs gr0,dbmr10 \n"
|
||
|
" movgs gr0,dbmr11 \n"
|
||
|
" movgs gr0,dbdr10 \n"
|
||
|
" movgs gr0,dbdr11 \n"
|
||
|
);
|
||
|
|
||
|
/* deal with debugging stub initialisation and initial pause */
|
||
|
if (__debug_frame->pc == (unsigned long) __debug_stub_init_break)
|
||
|
__debug_frame->pc = (unsigned long) start_kernel;
|
||
|
|
||
|
/* enable the debug events we want to trap */
|
||
|
__debug_status.dcr = DCR_EBE;
|
||
|
|
||
|
#ifdef CONFIG_GDBSTUB
|
||
|
gdbstub_init();
|
||
|
#endif
|
||
|
|
||
|
__clr_MASK_all();
|
||
|
__clr_MASK(15);
|
||
|
__clr_RC(15);
|
||
|
|
||
|
} /* end debug_stub_init() */
|
||
|
|
||
|
/*****************************************************************************/
|
||
|
/*
|
||
|
* kernel "exit" trap for gdb stub
|
||
|
*/
|
||
|
void debug_stub_exit(int status)
|
||
|
{
|
||
|
|
||
|
#ifdef CONFIG_GDBSTUB
|
||
|
gdbstub_exit(status);
|
||
|
#endif
|
||
|
|
||
|
} /* end debug_stub_exit() */
|
||
|
|
||
|
/*****************************************************************************/
|
||
|
/*
|
||
|
* send string to serial port
|
||
|
*/
|
||
|
void debug_to_serial(const char *p, int n)
|
||
|
{
|
||
|
char ch;
|
||
|
|
||
|
for (; n > 0; n--) {
|
||
|
ch = *p++;
|
||
|
FLOWCTL_SET0(DTR);
|
||
|
LSR_WAIT_FOR0(THRE);
|
||
|
// FLOWCTL_WAIT_FOR(CTS);
|
||
|
|
||
|
if (ch == 0x0a) {
|
||
|
__UART0(TX) = 0x0d;
|
||
|
mb();
|
||
|
LSR_WAIT_FOR0(THRE);
|
||
|
// FLOWCTL_WAIT_FOR(CTS);
|
||
|
}
|
||
|
__UART0(TX) = ch;
|
||
|
mb();
|
||
|
|
||
|
FLOWCTL_CLEAR0(DTR);
|
||
|
}
|
||
|
|
||
|
} /* end debug_to_serial() */
|
||
|
|
||
|
/*****************************************************************************/
|
||
|
/*
|
||
|
* send string to serial port
|
||
|
*/
|
||
|
void debug_to_serial2(const char *fmt, ...)
|
||
|
{
|
||
|
va_list va;
|
||
|
char buf[64];
|
||
|
int n;
|
||
|
|
||
|
va_start(va, fmt);
|
||
|
n = vsprintf(buf, fmt, va);
|
||
|
va_end(va);
|
||
|
|
||
|
debug_to_serial(buf, n);
|
||
|
|
||
|
} /* end debug_to_serial2() */
|
||
|
|
||
|
/*****************************************************************************/
|
||
|
/*
|
||
|
* set up the ttyS0 serial port baud rate timers
|
||
|
*/
|
||
|
void __init console_set_baud(unsigned baud)
|
||
|
{
|
||
|
unsigned value, high, low;
|
||
|
u8 lcr;
|
||
|
|
||
|
/* work out the divisor to give us the nearest higher baud rate */
|
||
|
value = __serial_clock_speed_HZ / 16 / baud;
|
||
|
|
||
|
/* determine the baud rate range */
|
||
|
high = __serial_clock_speed_HZ / 16 / value;
|
||
|
low = __serial_clock_speed_HZ / 16 / (value + 1);
|
||
|
|
||
|
/* pick the nearest bound */
|
||
|
if (low + (high - low) / 2 > baud)
|
||
|
value++;
|
||
|
|
||
|
lcr = __UART0(LCR);
|
||
|
__UART0(LCR) |= UART_LCR_DLAB;
|
||
|
mb();
|
||
|
__UART0(DLL) = value & 0xff;
|
||
|
__UART0(DLM) = (value >> 8) & 0xff;
|
||
|
mb();
|
||
|
__UART0(LCR) = lcr;
|
||
|
mb();
|
||
|
|
||
|
} /* end console_set_baud() */
|
||
|
|
||
|
/*****************************************************************************/
|
||
|
/*
|
||
|
*
|
||
|
*/
|
||
|
int __init console_get_baud(void)
|
||
|
{
|
||
|
unsigned value;
|
||
|
u8 lcr;
|
||
|
|
||
|
lcr = __UART0(LCR);
|
||
|
__UART0(LCR) |= UART_LCR_DLAB;
|
||
|
mb();
|
||
|
value = __UART0(DLM) << 8;
|
||
|
value |= __UART0(DLL);
|
||
|
__UART0(LCR) = lcr;
|
||
|
mb();
|
||
|
|
||
|
return value;
|
||
|
} /* end console_get_baud() */
|
||
|
|
||
|
/*****************************************************************************/
|
||
|
/*
|
||
|
* display BUG() info
|
||
|
*/
|
||
|
#ifndef CONFIG_NO_KERNEL_MSG
|
||
|
void __debug_bug_printk(const char *file, unsigned line)
|
||
|
{
|
||
|
printk("kernel BUG at %s:%d!\n", file, line);
|
||
|
|
||
|
} /* end __debug_bug_printk() */
|
||
|
#endif
|