git.gag.com Git - fw/altos/blob - lib/ccdbg-command.c

   1 /*
   2  * Copyright © 2008 Keith Packard <keithp@keithp.com>
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along
  15  * with this program; if not, write to the Free Software Foundation, Inc.,
  16  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  17  */
  18
  19 #include "ccdbg.h"
  20
  21 void
  22 ccdbg_debug_mode(struct ccdbg *dbg)
  23 {
  24         /* force two rising clocks while holding RESET_N low */
  25         ccdbg_debug(CC_DEBUG_COMMAND, "#\n");
  26         ccdbg_debug(CC_DEBUG_COMMAND, "# Debug mode\n");
  27         ccdbg_debug(CC_DEBUG_COMMAND, "#\n");
  28         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA|CC_RESET_N);
  29         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N,          CC_DATA           );
  30         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA           );
  31         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N,          CC_DATA           );
  32         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA           );
  33         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N,          CC_DATA|CC_RESET_N);
  34         ccdbg_sync_io(dbg);
  35 }
  36
  37 void
  38 ccdbg_reset(struct ccdbg *dbg)
  39 {
  40         ccdbg_debug(CC_DEBUG_COMMAND, "#\n");
  41         ccdbg_debug(CC_DEBUG_COMMAND, "# Reset\n");
  42         ccdbg_debug(CC_DEBUG_COMMAND, "#\n");
  43         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA|CC_RESET_N);
  44         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA           );
  45         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA           );
  46         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA           );
  47         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA           );
  48         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA|CC_RESET_N);
  49         ccdbg_sync_io(dbg);
  50 }
  51
  52 uint8_t
  53 ccdbg_chip_erase(struct ccdbg *dbg)
  54 {
  55         return ccdbg_cmd_write_read8(dbg, CC_CHIP_ERASE, NULL, 0);
  56 }
  57
  58 uint8_t
  59 ccdbg_wr_config(struct ccdbg *dbg, uint8_t config)
  60 {
  61         return ccdbg_cmd_write_read8(dbg, CC_WR_CONFIG, &config, 1);
  62 }
  63
  64 uint8_t
  65 ccdbg_rd_config(struct ccdbg *dbg)
  66 {
  67         return ccdbg_cmd_write_read8(dbg, CC_RD_CONFIG, NULL, 0);
  68 }
  69
  70 uint16_t
  71 ccdbg_get_pc(struct ccdbg *dbg)
  72 {
  73         uint16_t        pc1, pc2;
  74
  75         pc1 = ccdbg_cmd_write_read16(dbg, CC_GET_PC, NULL, 0);
  76         pc2 = ccdbg_cmd_write_read16(dbg, CC_GET_PC, NULL, 0);
  77         if (pc1 != pc2)
  78                 fprintf (stderr, "Invalid pc %04x != %04x\n",
  79                          pc1, pc2);
  80         return pc2;
  81 }
  82
  83 uint8_t
  84 ccdbg_read_status(struct ccdbg *dbg)
  85 {
  86         return ccdbg_cmd_write_read8(dbg, CC_READ_STATUS, NULL, 0);
  87 }
  88
  89 uint8_t
  90 ccdbg_set_hw_brkpnt(struct ccdbg *dbg, uint8_t number, uint8_t enable, uint16_t addr)
  91 {
  92         uint8_t data[3];
  93
  94         data[0] = (number << 3) | (enable << 2);
  95         data[1] = (addr >> 8);
  96         data[2] = addr;
  97         return ccdbg_cmd_write_read8(dbg, CC_SET_HW_BRKPNT, data, 3);
  98 }
  99
 100 uint8_t
 101 ccdbg_halt(struct ccdbg *dbg)
 102 {
 103         return ccdbg_cmd_write_read8(dbg, CC_HALT, NULL, 0);
 104 }
 105
 106 uint8_t
 107 ccdbg_resume(struct ccdbg *dbg)
 108 {
 109         return ccdbg_cmd_write_read8(dbg, CC_RESUME, NULL, 0);
 110 }
 111
 112 uint8_t
 113 ccdbg_debug_instr(struct ccdbg *dbg, uint8_t *instr, int nbytes)
 114 {
 115         return ccdbg_cmd_write_read8(dbg, CC_DEBUG_INSTR(nbytes), instr, nbytes);
 116 }
 117
 118 uint8_t
 119 ccdbg_step_instr(struct ccdbg *dbg)
 120 {
 121         return ccdbg_cmd_write_read8(dbg, CC_STEP_INSTR, NULL, 0);
 122 }
 123
 124 uint8_t
 125 ccdbg_step_replace(struct ccdbg *dbg, uint8_t *instr, int nbytes)
 126 {
 127         return ccdbg_cmd_write_read8(dbg, CC_STEP_REPLACE(nbytes), instr, nbytes);
 128 }
 129
 130 uint16_t
 131 ccdbg_get_chip_id(struct ccdbg *dbg)
 132 {
 133         return ccdbg_cmd_write_read16(dbg, CC_GET_CHIP_ID, NULL, 0);
 134 }
 135
 136 /*
 137  * Execute a sequence of instructions
 138  */
 139 uint8_t
 140 ccdbg_execute(struct ccdbg *dbg, uint8_t *inst)
 141 {
 142         uint8_t status = 0;
 143         while(inst[0] != 0) {
 144                 uint8_t len = inst[0];
 145                 int i;
 146                 ccdbg_debug(CC_DEBUG_INSTRUCTIONS, "\t%02x", inst[1]);
 147                 for (i = 0; i < len - 1; i++)
 148                         ccdbg_debug(CC_DEBUG_INSTRUCTIONS, " %02x", inst[i+2]);
 149                 status = ccdbg_debug_instr(dbg, inst+1, len);
 150                 for (; i < 3; i++)
 151                         ccdbg_debug(CC_DEBUG_INSTRUCTIONS, "   ");
 152                 ccdbg_debug(CC_DEBUG_INSTRUCTIONS, " -> %02x\n", status);
 153                 inst += len + 1;
 154         }
 155         return status;
 156 }
 157
 158 static uint8_t jump_mem[] = {
 159         3, LJMP, 0xf0, 0x00,
 160 #define PC_HIGH 2
 161 #define PC_LOW  3
 162         0
 163 };
 164
 165 uint8_t
 166 ccdbg_set_pc(struct ccdbg *dbg, uint16_t pc)
 167 {
 168         jump_mem[PC_HIGH] = pc >> 8;
 169         jump_mem[PC_LOW] = pc & 0xff;
 170         return ccdbg_execute(dbg, jump_mem);
 171 }
 172
 173 uint8_t
 174 ccdbg_execute_hex_image(struct ccdbg *dbg, struct hex_image *image)
 175 {
 176         uint16_t pc;
 177         uint8_t status;
 178
 179         if (image->address < 0xf000) {
 180                 fprintf(stderr, "Cannot execute program starting at 0x%04x\n", image->address);
 181                 return -1;
 182         }
 183         ccdbg_write_hex_image(dbg, image, 0);
 184         ccdbg_set_pc(dbg, image->address);
 185         pc = ccdbg_get_pc(dbg);
 186         ccdbg_debug(CC_DEBUG_EXECUTE, "pc starts at 0x%04x\n", pc);
 187         status = ccdbg_resume(dbg);
 188         ccdbg_debug(CC_DEBUG_EXECUTE, "resume status: 0x%02x\n", status);
 189         return 0;
 190 }
 191