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         return ccdbg_cmd_write_read16(dbg, CC_GET_PC, NULL, 0);
  74 }
  75
  76 uint8_t
  77 ccdbg_read_status(struct ccdbg *dbg)
  78 {
  79         return ccdbg_cmd_write_read8(dbg, CC_READ_STATUS, NULL, 0);
  80 }
  81
  82 uint8_t
  83 ccdbg_set_hw_brkpnt(struct ccdbg *dbg, uint8_t number, uint8_t enable, uint16_t addr)
  84 {
  85         uint8_t data[3];
  86
  87         data[0] = (number << 3) | (enable << 2);
  88         data[1] = (addr >> 8);
  89         data[2] = addr;
  90         return ccdbg_cmd_write_read8(dbg, CC_SET_HW_BRKPNT, data, 3);
  91 }
  92
  93 uint8_t
  94 ccdbg_halt(struct ccdbg *dbg)
  95 {
  96         return ccdbg_cmd_write_read8(dbg, CC_HALT, NULL, 0);
  97 }
  98
  99 uint8_t
 100 ccdbg_resume(struct ccdbg *dbg)
 101 {
 102         return ccdbg_cmd_write_read8(dbg, CC_RESUME, NULL, 0);
 103 }
 104
 105 uint8_t
 106 ccdbg_debug_instr(struct ccdbg *dbg, uint8_t *instr, int nbytes)
 107 {
 108         return ccdbg_cmd_write_read8(dbg, CC_DEBUG_INSTR(nbytes), instr, nbytes);
 109 }
 110
 111 uint8_t
 112 ccdbg_step_instr(struct ccdbg *dbg)
 113 {
 114         return ccdbg_cmd_write_read8(dbg, CC_STEP_INSTR, NULL, 0);
 115 }
 116
 117 uint8_t
 118 ccdbg_step_replace(struct ccdbg *dbg, uint8_t *instr, int nbytes)
 119 {
 120         return ccdbg_cmd_write_read8(dbg, CC_STEP_REPLACE(nbytes), instr, nbytes);
 121 }
 122
 123 uint16_t
 124 ccdbg_get_chip_id(struct ccdbg *dbg)
 125 {
 126         return ccdbg_cmd_write_read16(dbg, CC_GET_CHIP_ID, NULL, 0);
 127 }
 128
 129 /*
 130  * Execute a sequence of instructions
 131  */
 132 uint8_t
 133 ccdbg_execute(struct ccdbg *dbg, uint8_t *inst)
 134 {
 135         uint8_t status = 0;
 136         while(inst[0] != 0) {
 137                 uint8_t len = inst[0];
 138                 int i;
 139                 ccdbg_debug(CC_DEBUG_INSTRUCTIONS, "\t%02x", inst[1]);
 140                 for (i = 0; i < len - 1; i++)
 141                         ccdbg_debug(CC_DEBUG_INSTRUCTIONS, " %02x", inst[i+2]);
 142                 status = ccdbg_debug_instr(dbg, inst+1, len);
 143                 for (; i < 3; i++)
 144                         ccdbg_debug(CC_DEBUG_INSTRUCTIONS, "   ");
 145                 ccdbg_debug(CC_DEBUG_INSTRUCTIONS, " -> %02x\n", status);
 146                 inst += len + 1;
 147         }
 148         return status;
 149 }
 150
 151 static uint8_t jump_mem[] = {
 152         3, LJMP, 0xf0, 0x00,
 153 #define PC_HIGH 2
 154 #define PC_LOW  3
 155         0
 156 };
 157
 158 uint8_t
 159 ccdbg_set_pc(struct ccdbg *dbg, uint16_t pc)
 160 {
 161         jump_mem[PC_HIGH] = pc >> 8;
 162         jump_mem[PC_LOW] = pc & 0xff;
 163         return ccdbg_execute(dbg, jump_mem);
 164 }
 165
 166 uint8_t
 167 ccdbg_execute_hex_image(struct ccdbg *dbg, struct hex_image *image)
 168 {
 169         uint16_t pc;
 170         uint8_t status;
 171
 172         if (image->address < 0xf000) {
 173                 fprintf(stderr, "Cannot execute program starting at 0x%04x\n", image->address);
 174                 return -1;
 175         }
 176         ccdbg_write_hex_image(dbg, image, 0);
 177         ccdbg_set_pc(dbg, image->address);
 178         pc = ccdbg_get_pc(dbg);
 179         ccdbg_debug(CC_DEBUG_EXECUTE, "pc starts at 0x%04x\n", pc);
 180         status = ccdbg_resume(dbg);
 181         ccdbg_debug(CC_DEBUG_EXECUTE, "resume status: 0x%02x\n", status);
 182         return 0;
 183 }
 184