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_wait_reset(dbg);
  31         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA           );
  32         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N,          CC_DATA           );
  33         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA           );
  34         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N,          CC_DATA|CC_RESET_N);
  35         ccdbg_wait_reset(dbg);
  36 }
  37
  38 void
  39 ccdbg_reset(struct ccdbg *dbg)
  40 {
  41         ccdbg_debug(CC_DEBUG_COMMAND, "#\n");
  42         ccdbg_debug(CC_DEBUG_COMMAND, "# Reset\n");
  43         ccdbg_debug(CC_DEBUG_COMMAND, "#\n");
  44         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA|CC_RESET_N);
  45         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA           );
  46         ccdbg_wait_reset(dbg);
  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           );
  49         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA           );
  50         ccdbg_send(dbg, CC_CLOCK|CC_DATA|CC_RESET_N, CC_CLOCK|CC_DATA|CC_RESET_N);
  51         ccdbg_wait_reset(dbg);
  52 }
  53
  54 uint8_t
  55 ccdbg_chip_erase(struct ccdbg *dbg)
  56 {
  57         return ccdbg_cmd_write_read8(dbg, CC_CHIP_ERASE, NULL, 0);
  58 }
  59
  60 uint8_t
  61 ccdbg_wr_config(struct ccdbg *dbg, uint8_t config)
  62 {
  63         return ccdbg_cmd_write_read8(dbg, CC_WR_CONFIG, &config, 1);
  64 }
  65
  66 uint8_t
  67 ccdbg_rd_config(struct ccdbg *dbg)
  68 {
  69         return ccdbg_cmd_write_read8(dbg, CC_RD_CONFIG, NULL, 0);
  70 }
  71
  72 uint16_t
  73 ccdbg_get_pc(struct ccdbg *dbg)
  74 {
  75         uint16_t        pc1, pc2;
  76
  77         pc1 = ccdbg_cmd_write_read16(dbg, CC_GET_PC, NULL, 0);
  78         pc2 = ccdbg_cmd_write_read16(dbg, CC_GET_PC, NULL, 0);
  79         if (pc1 != pc2)
  80                 fprintf (stderr, "Invalid pc %04x != %04x\n",
  81                          pc1, pc2);
  82         return pc2;
  83 }
  84
  85 uint8_t
  86 ccdbg_read_status(struct ccdbg *dbg)
  87 {
  88         return ccdbg_cmd_write_read8(dbg, CC_READ_STATUS, NULL, 0);
  89 }
  90
  91 uint8_t
  92 ccdbg_set_hw_brkpnt(struct ccdbg *dbg, uint8_t number, uint8_t enable, uint16_t addr)
  93 {
  94         uint8_t data[3];
  95
  96         data[0] = (number << 3) | (enable << 2);
  97         data[1] = (addr >> 8);
  98         data[2] = addr;
  99         return ccdbg_cmd_write_read8(dbg, CC_SET_HW_BRKPNT, data, 3);
 100 }
 101
 102 uint8_t
 103 ccdbg_halt(struct ccdbg *dbg)
 104 {
 105         return ccdbg_cmd_write_read8(dbg, CC_HALT, NULL, 0);
 106 }
 107
 108 uint8_t
 109 ccdbg_resume(struct ccdbg *dbg)
 110 {
 111         return ccdbg_cmd_write_read8(dbg, CC_RESUME, NULL, 0);
 112 }
 113
 114 uint8_t
 115 ccdbg_debug_instr(struct ccdbg *dbg, uint8_t *instr, int nbytes)
 116 {
 117         return ccdbg_cmd_write_read8(dbg, CC_DEBUG_INSTR(nbytes), instr, nbytes);
 118 }
 119
 120 uint8_t
 121 ccdbg_step_instr(struct ccdbg *dbg)
 122 {
 123         return ccdbg_cmd_write_read8(dbg, CC_STEP_INSTR, NULL, 0);
 124 }
 125
 126 uint8_t
 127 ccdbg_step_replace(struct ccdbg *dbg, uint8_t *instr, int nbytes)
 128 {
 129         return ccdbg_cmd_write_read8(dbg, CC_STEP_REPLACE(nbytes), instr, nbytes);
 130 }
 131
 132 uint16_t
 133 ccdbg_get_chip_id(struct ccdbg *dbg)
 134 {
 135         return ccdbg_cmd_write_read16(dbg, CC_GET_CHIP_ID, NULL, 0);
 136 }
 137
 138 /*
 139  * Execute a sequence of instructions
 140  */
 141 uint8_t
 142 ccdbg_execute(struct ccdbg *dbg, uint8_t *inst)
 143 {
 144         uint8_t status = 0;
 145         while(inst[0] != 0) {
 146                 uint8_t len = inst[0];
 147                 int i;
 148                 ccdbg_debug(CC_DEBUG_INSTRUCTIONS, "\t%02x", inst[1]);
 149                 for (i = 0; i < len - 1; i++)
 150                         ccdbg_debug(CC_DEBUG_INSTRUCTIONS, " %02x", inst[i+2]);
 151                 status = ccdbg_debug_instr(dbg, inst+1, len);
 152                 for (; i < 3; i++)
 153                         ccdbg_debug(CC_DEBUG_INSTRUCTIONS, "   ");
 154                 ccdbg_debug(CC_DEBUG_INSTRUCTIONS, " -> %02x\n", status);
 155                 inst += len + 1;
 156         }
 157         return status;
 158 }
 159
 160 static uint8_t jump_mem[] = {
 161         3, LJMP, 0xf0, 0x00,
 162 #define PC_HIGH 2
 163 #define PC_LOW  3
 164         0
 165 };
 166
 167 uint8_t
 168 ccdbg_set_pc(struct ccdbg *dbg, uint16_t pc)
 169 {
 170         jump_mem[PC_HIGH] = pc >> 8;
 171         jump_mem[PC_LOW] = pc & 0xff;
 172         return ccdbg_execute(dbg, jump_mem);
 173 }
 174
 175 uint8_t
 176 ccdbg_execute_hex_image(struct ccdbg *dbg, struct hex_image *image)
 177 {
 178         uint16_t pc;
 179         uint8_t status;
 180
 181         if (image->address < 0xf000) {
 182                 fprintf(stderr, "Cannot execute program starting at 0x%04x\n", image->address);
 183                 return -1;
 184         }
 185         ccdbg_write_hex_image(dbg, image, 0);
 186         ccdbg_set_pc(dbg, image->address);
 187         pc = ccdbg_get_pc(dbg);
 188         ccdbg_debug(CC_DEBUG_EXECUTE, "pc starts at 0x%04x\n", pc);
 189         status = ccdbg_resume(dbg);
 190         ccdbg_debug(CC_DEBUG_EXECUTE, "resume status: 0x%02x\n", status);
 191         return 0;
 192 }
 193