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