mspdebug/main.c

500 lines
10 KiB
C

/* MSPDebug - debugging tool for MSP430 MCUs
* Copyright (C) 2009, 2010 Daniel Beer
*
* 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.
*
* 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, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
*/
#include <stdio.h>
#include <ctype.h>
#include <stdlib.h>
#include <string.h>
#include <errno.h>
#include <unistd.h>
#include <getopt.h>
#include "dis.h"
#include "device.h"
#include "binfile.h"
#include "stab.h"
#include "util.h"
#include "usbutil.h"
#include "gdb.h"
#include "rtools.h"
#include "sym.h"
#include "devcmd.h"
#include "expr.h"
#include "opdb.h"
#include "reader.h"
#include "output.h"
#include "sim.h"
#include "bsl.h"
#include "fet.h"
#include "vector.h"
#include "fet_db.h"
#include "uif.h"
#include "olimex.h"
#include "rf2500.h"
static void io_prefix(const char *prefix, uint16_t pc,
uint16_t addr, int is_byte)
{
char name[64];
address_t offset;
if (!stab_nearest(stab_default, pc, name, sizeof(name), &offset)) {
printf("%s", name);
if (offset)
printf("+0x%x", offset);
} else {
printf("0x%04x", pc);
}
printf(": IO %s.%c: 0x%04x", prefix, is_byte ? 'B' : 'W', addr);
if (!stab_nearest(stab_default, addr, name, sizeof(name), &offset)) {
printf(" (%s", name);
if (offset)
printf("+0x%x", offset);
printf(")");
}
}
static int fetch_io(void *user_data, uint16_t pc,
uint16_t addr, int is_byte, uint16_t *data_ret)
{
io_prefix("READ", pc, addr, is_byte);
for (;;) {
char text[128];
int len;
address_t data;
printf("? ");
fflush(stdout);
if (!fgets(text, sizeof(text), stdin)) {
printf("\nAborted IO request\n");
return -1;
}
len = strlen(text);
while (len && isspace(text[len - 1]))
len--;
text[len] = 0;
if (!len)
return 0;
if (!expr_eval(stab_default, text, &data)) {
if (data_ret)
*data_ret = data;
return 0;
}
}
return 0;
}
static void store_io(void *user_data, uint16_t pc,
uint16_t addr, int is_byte, uint16_t data)
{
io_prefix("WRITE", pc, addr, is_byte);
if (is_byte)
printf(" => 0x%02x\n", data & 0xff);
else
printf(" => 0x%04x\n", data);
}
struct cmdline_args {
const char *driver_name;
const char *serial_device;
const char *usb_device;
const char *fet_force_id;
int want_jtag;
int no_rc;
int vcc_mv;
};
struct driver {
const char *name;
const char *help;
device_t (*func)(const struct cmdline_args *args);
};
static device_t driver_open_fet(const struct cmdline_args *args,
int flags, transport_t trans)
{
device_t dev;
if (!args->want_jtag)
flags |= FET_PROTO_SPYBIWIRE;
dev = fet_open(trans, flags, args->vcc_mv, args->fet_force_id);
if (!dev) {
trans->destroy(trans);
return NULL;
}
return dev;
}
static device_t driver_open_rf2500(const struct cmdline_args *args)
{
transport_t trans;
if (args->serial_device) {
printc_err("This driver does not support tty devices.\n");
return NULL;
}
trans = rf2500_open(args->usb_device);
if (!trans)
return NULL;
return driver_open_fet(args, FET_PROTO_RF2500, trans);
}
static device_t driver_open_olimex(const struct cmdline_args *args)
{
transport_t trans;
if (args->serial_device)
trans = uif_open(args->serial_device, 1);
else
trans = olimex_open(args->usb_device);
if (!trans)
return NULL;
return driver_open_fet(args, FET_PROTO_OLIMEX, trans);
}
static device_t driver_open_sim(const struct cmdline_args *args)
{
return sim_open(fetch_io, store_io, NULL);
}
static device_t driver_open_uif(const struct cmdline_args *args)
{
transport_t trans;
if (!args->serial_device) {
printc_err("This driver does not support USB access. "
"Specify a tty device using -d.\n");
return NULL;
}
trans = uif_open(args->serial_device, 0);
if (!trans)
return NULL;
return driver_open_fet(args, 0, trans);
}
static device_t driver_open_uif_bsl(const struct cmdline_args *args)
{
if (!args->serial_device) {
printc_err("This driver does not support USB access. "
"Specify a tty device using -d.\n");
return NULL;
}
return bsl_open(args->serial_device);
}
static const struct driver driver_table[] = {
{
.name = "rf2500",
.help = "eZ430-RF2500 devices. Only USB connection is "
"supported.",
driver_open_rf2500
},
{ .name = "olimex",
.help = "Olimex MSP-JTAG-TINY.",
.func = driver_open_olimex
},
{
.name = "sim",
.help = "Simulation mode.",
.func = driver_open_sim
},
{
.name = "uif",
.help = "TI FET430UIF and compatible devices (e.g. eZ430).",
.func = driver_open_uif
},
{
.name = "uif-bsl",
.help = "TI FET430UIF bootloader.",
.func = driver_open_uif_bsl
}
};
static void version(void)
{
printc(
"MSPDebug version 0.10 - debugging tool for MSP430 MCUs\n"
"Copyright (C) 2009, 2010 Daniel Beer <daniel@tortek.co.nz>\n"
"This is free software; see the source for copying conditions. There is NO\n"
"warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR "
"PURPOSE.\n");
}
static void usage(const char *progname)
{
int i;
printc_err("Usage: %s [options] <driver> [command ...]\n"
"\n"
" -q\n"
" Start in quiet mode.\n"
" -d device\n"
" Connect via the given tty device, rather than USB.\n"
" -U bus:dev\n"
" Specify a particular USB device to connect to.\n"
" -j\n"
" Use JTAG, rather than Spy-Bi-Wire (UIF devices only).\n"
" -v voltage\n"
" Set the supply voltage, in millivolts.\n"
" -n\n"
" Do not read ~/.mspdebug on startup.\n"
" --help\n"
" Show this help text.\n"
" --fet-list\n"
" Show a list of devices supported by the FET driver.\n"
" --fet-force-id string\n"
" Override the device ID returned by the FET.\n"
" --usb-list\n"
" Show a list of available USB devices.\n"
" --version\n"
" Show copyright and version information.\n"
"\n"
"Most drivers connect by default via USB, unless told otherwise via the\n"
"-d option. By default, the first USB device found is opened.\n"
"\n"
"If commands are given, they will be executed. Otherwise, an interactive\n"
"command reader is started.\n\n",
progname);
printc("Available drivers are:\n");
for (i = 0; i < ARRAY_LEN(driver_table); i++) {
const struct driver *drv = &driver_table[i];
printc(" %s\n %s\n", drv->name, drv->help);
}
}
static void process_rc_file(void)
{
const char *home = getenv("HOME");
char text[256];
if (!home)
return;
snprintf(text, sizeof(text), "%s/.mspdebug", home);
if (!access(text, F_OK))
process_file(text);
}
static int add_fet_device(void *user_data, const struct fet_db_record *r)
{
struct vector *v = (struct vector *)user_data;
return vector_push(v, &r->name, 1);
}
static int cmp_char_ptr(const void *a, const void *b)
{
return strcmp(*(const char **)a, *(const char **)b);
}
static int list_devices(void)
{
struct vector v;
int i;
vector_init(&v, sizeof(const char *));
if (fet_db_enum(add_fet_device, &v) < 0) {
pr_error("couldn't allocate memory");
vector_destroy(&v);
return -1;
}
qsort(v.ptr, v.size, v.elemsize, cmp_char_ptr);
printc("Devices supported by FET driver:\n");
for (i = 0; i < v.size; i++)
printc(" %s\n", VECTOR_AT(v, i, const char *));
vector_destroy(&v);
return 0;
}
static int parse_cmdline_args(int argc, char **argv,
struct cmdline_args *args)
{
int opt;
const static struct option longopts[] = {
{"help", 0, 0, 'H'},
{"fet-list", 0, 0, 'L'},
{"fet-force-id", 1, 0, 'F'},
{"usb-list", 0, 0, 'I'},
{"version", 0, 0, 'V'},
{NULL, 0, 0, 0}
};
while ((opt = getopt_long(argc, argv, "d:jv:nU:q",
longopts, NULL)) >= 0)
switch (opt) {
case 'q':
{
const static union opdb_value v = {
.boolean = 1
};
opdb_set("quiet", &v);
}
break;
case 'I':
usb_init();
usb_find_busses();
usb_find_devices();
usbutil_list();
exit(0);
case 'd':
args->serial_device = optarg;
break;
case 'U':
args->usb_device = optarg;
break;
case 'L':
exit(list_devices());
case 'F':
args->fet_force_id = optarg;
break;
case 'H':
usage(argv[0]);
exit(0);
case 'V':
version();
exit(0);
case 'v':
args->vcc_mv = atoi(optarg);
break;
case 'j':
args->want_jtag = 1;
break;
case 'n':
args->no_rc = 1;
break;
case '?':
printc_err("Try --help for usage information.\n");
return -1;
}
if (args->usb_device && args->serial_device) {
printc_err("You can't simultaneously specify a serial and "
"a USB device.\n");
return -1;
}
if (optind >= argc) {
printc_err("You need to specify a driver. Try --help for "
"a list.\n");
return -1;
}
args->driver_name = argv[optind];
optind++;
return 0;
}
int setup_driver(struct cmdline_args *args)
{
int i;
i = 0;
while (i < ARRAY_LEN(driver_table) &&
strcasecmp(driver_table[i].name, args->driver_name))
i++;
if (i >= ARRAY_LEN(driver_table)) {
printc_err("Unknown driver: %s. Try --help for a list.\n",
args->driver_name);
return -1;
}
stab_default = stab_new();
if (!stab_default)
return -1;
device_default = driver_table[i].func(args);
if (!device_default) {
stab_destroy(stab_default);
return -1;
}
return 0;
}
int main(int argc, char **argv)
{
struct cmdline_args args = {0};
int ret = 0;
opdb_reset();
args.vcc_mv = 3000;
if (parse_cmdline_args(argc, argv, &args) < 0)
return -1;
if (setup_driver(&args) < 0)
return -1;
if (!args.no_rc)
process_rc_file();
/* Process commands */
if (optind < argc) {
while (optind < argc) {
if (process_command(argv[optind++]) < 0) {
ret = -1;
break;
}
}
} else {
ctrlc_init();
reader_loop();
}
stab_destroy(stab_default);
device_default->destroy(device_default);
return ret;
}