Subversion Repositories openrisc_2011-10-31

/* Remote debugging interface for PPCbug (PowerPC) Rom monitor

   for GDB, the GNU debugger.

   Copyright (C) 1995, 1998, 1999, 2000, 2001, 2007, 2008

   Free Software Foundation, Inc.

   Written by Stu Grossman of Cygnus Support

   This file is part of GDB.

   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 3 of the License, or

   (at your option) any later version.

   This program is distributed in the hope that it will be useful,

   but WITHOUT ANY WARRANTY; without even the implied warranty of

   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License

   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */

#include "defs.h"

#include "gdbcore.h"

#include "target.h"

#include "monitor.h"

#include "serial.h"

#include "regcache.h"

static void

ppcbug_supply_register (struct regcache *regcache, char *regname,

                        int regnamelen, char *val, int vallen)

{

  int regno = 0;

  if (regnamelen < 2 || regnamelen > 4)

    return;

  switch (regname[0])

    {

    case 'R':

      if (regname[1] < '0' || regname[1] > '9')

        return;

      if (regnamelen == 2)

        regno = regname[1] - '0';

      else if (regnamelen == 3 && regname[2] >= '0' && regname[2] <= '9')

        regno = (regname[1] - '0') * 10 + (regname[2] - '0');

      else

        return;

      break;

    case 'F':

      if (regname[1] != 'R' || regname[2] < '0' || regname[2] > '9')

        return;

      if (regnamelen == 3)

        regno = 32 + regname[2] - '0';

      else if (regnamelen == 4 && regname[3] >= '0' && regname[3] <= '9')

        regno = 32 + (regname[2] - '0') * 10 + (regname[3] - '0');

      else

        return;

      break;

    case 'I':

      if (regnamelen != 2 || regname[1] != 'P')

        return;

      regno = 64;

      break;

    case 'M':

      if (regnamelen != 3 || regname[1] != 'S' || regname[2] != 'R')

        return;

      regno = 65;

      break;

    case 'C':

      if (regnamelen != 2 || regname[1] != 'R')

        return;

      regno = 66;

      break;

    case 'S':

      if (regnamelen != 4 || regname[1] != 'P' || regname[2] != 'R')

        return;

      else if (regname[3] == '8')

        regno = 67;

      else if (regname[3] == '9')

        regno = 68;

      else if (regname[3] == '1')

        regno = 69;

      else if (regname[3] == '0')

        regno = 70;

      else

        return;

      break;

    default:

      return;

    }

  monitor_supply_register (regcache, regno, val);

}

/*

 * This array of registers needs to match the indexes used by GDB. The

 * whole reason this exists is because the various ROM monitors use

 * different names than GDB does, and don't support all the

 * registers either. So, typing "info reg sp" becomes an "A7".

 */

static char *ppcbug_regnames[] =

{

  "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7",

  "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15",

  "r16", "r17", "r18", "r19", "r20", "r21", "r22", "r23",

  "r24", "r25", "r26", "r27", "r28", "r29", "r30", "r31",

  "fr0", "fr1", "fr2", "fr3", "fr4", "fr5", "fr6", "fr7",

  "fr8", "fr9", "fr10", "fr11", "fr12", "fr13", "fr14", "fr15",

  "fr16", "fr17", "fr18", "fr19", "fr20", "fr21", "fr22", "fr23",

  "fr24", "fr25", "fr26", "fr27", "fr28", "fr29", "fr30", "fr31",

/* pc      ps      cnd     lr      cnt     xer     mq */

  "ip", "msr", "cr", "spr8", "spr9", "spr1", "spr0"

};

/*

 * Define the monitor command strings. Since these are passed directly

 * through to a printf style function, we need can include formatting

 * strings. We also need a CR or LF on the end.

 */

static struct target_ops ppcbug_ops0;

static struct target_ops ppcbug_ops1;

static char *ppcbug_inits[] =

{"\r", NULL};

static void

init_ppc_cmds (char *LOAD_CMD,

               struct monitor_ops *OPS,

               struct target_ops *targops)

{

  OPS->flags = MO_CLR_BREAK_USES_ADDR | MO_HANDLE_NL;

  OPS->init = ppcbug_inits;     /* Init strings */

  OPS->cont = "g\r";            /* continue command */

  OPS->step = "t\r";            /* single step */

  OPS->stop = NULL;             /* interrupt command */

  OPS->set_break = "br %x\r";   /* set a breakpoint */

  OPS->clr_break = "nobr %x\r"; /* clear a breakpoint */

  OPS->clr_all_break = "nobr\r";        /* clear all breakpoints */

  OPS->fill = "bf %x:%x %x;b\r";        /* fill (start count val) */

  OPS->setmem.cmdb = "ms %x %02x\r";    /* setmem.cmdb (addr, value) */

  OPS->setmem.cmdw = "ms %x %04x\r";    /* setmem.cmdw (addr, value) */

  OPS->setmem.cmdl = "ms %x %08x\r";    /* setmem.cmdl (addr, value) */

  OPS->setmem.cmdll = NULL;     /* setmem.cmdll (addr, value) */

  OPS->setmem.resp_delim = NULL;        /* setreg.resp_delim */

  OPS->setmem.term = NULL;      /* setreg.term */

  OPS->setmem.term_cmd = NULL;  /* setreg.term_cmd */

  OPS->getmem.cmdb = "md %x:%x;b\r";    /* getmem.cmdb (addr, len) */

  OPS->getmem.cmdw = "md %x:%x;b\r";    /* getmem.cmdw (addr, len) */

  OPS->getmem.cmdl = "md %x:%x;b\r";    /* getmem.cmdl (addr, len) */

  OPS->getmem.cmdll = NULL;     /* getmem.cmdll (addr, len) */

  OPS->getmem.resp_delim = " "; /* getmem.resp_delim */

  OPS->getmem.term = NULL;      /* getmem.term */

  OPS->getmem.term_cmd = NULL;  /* getmem.term_cmd */

  OPS->setreg.cmd = "rs %s %x\r";       /* setreg.cmd (name, value) */

  OPS->setreg.resp_delim = NULL;        /* setreg.resp_delim */

  OPS->setreg.term = NULL;      /* setreg.term */

  OPS->setreg.term_cmd = NULL;  /* setreg.term_cmd */

  OPS->getreg.cmd = "rs %s\r";  /* getreg.cmd (name) */

  OPS->getreg.resp_delim = "="; /* getreg.resp_delim */

  OPS->getreg.term = NULL;      /* getreg.term */

  OPS->getreg.term_cmd = NULL;  /* getreg.term_cmd */

  OPS->register_pattern = "\\(\\w+\\) +=\\([0-9a-fA-F]+\\b\\)";         /* register_pattern */

  OPS->supply_register = ppcbug_supply_register;

  OPS->dump_registers = "rd\r"; /* dump all registers */

  OPS->load_routine = NULL;     /* load_routine (defaults to SRECs) */

  OPS->load = LOAD_CMD;         /* download command */

  OPS->loadresp = NULL;         /* load response */

  OPS->prompt = "PPC1-Bug>";    /* monitor command prompt */

  OPS->line_term = "\r";        /* end-of-line terminator */

  OPS->cmd_end = NULL;          /* optional command terminator */

  OPS->target = targops;        /* target operations */

  OPS->stopbits = SERIAL_1_STOPBITS;    /* number of stop bits */

  OPS->regnames = ppcbug_regnames;      /* registers names */

  OPS->magic = MONITOR_OPS_MAGIC;       /* magic */

}

static struct monitor_ops ppcbug_cmds0;

static struct monitor_ops ppcbug_cmds1;

static void

ppcbug_open0 (char *args, int from_tty)

{

  monitor_open (args, &ppcbug_cmds0, from_tty);

}

static void

ppcbug_open1 (char *args, int from_tty)

{

  monitor_open (args, &ppcbug_cmds1, from_tty);

}

extern initialize_file_ftype _initialize_ppcbug_rom; /* -Wmissing-prototypes */

void

_initialize_ppcbug_rom (void)

{

  init_ppc_cmds ("lo 0\r", &ppcbug_cmds0, &ppcbug_ops0);

  init_ppc_cmds ("lo 1\r", &ppcbug_cmds1, &ppcbug_ops1);

  init_monitor_ops (&ppcbug_ops0);

  ppcbug_ops0.to_shortname = "ppcbug";

  ppcbug_ops0.to_longname = "PowerPC PPCBug monitor on port 0";

  ppcbug_ops0.to_doc = "Debug via the PowerPC PPCBug monitor using port 0.\n\

Specify the serial device it is connected to (e.g. /dev/ttya).";

  ppcbug_ops0.to_open = ppcbug_open0;

  add_target (&ppcbug_ops0);

  init_monitor_ops (&ppcbug_ops1);

  ppcbug_ops1.to_shortname = "ppcbug1";

  ppcbug_ops1.to_longname = "PowerPC PPCBug monitor on port 1";

  ppcbug_ops1.to_doc = "Debug via the PowerPC PPCBug monitor using port 1.\n\

Specify the serial device it is connected to (e.g. /dev/ttya).";

  ppcbug_ops1.to_open = ppcbug_open1;

  add_target (&ppcbug_ops1);

}