Build on amd64 architecture.
[fw/stlink] / src / gdb-server.c
index 67ab0a5802911fef821df4f22add6f2acbb72fbf..d44f20f18cb6cab1b7b77543ea6dda357a24781f 100644 (file)
 
 static const char hex[] = "0123456789abcdef";
 
-// configured for STM32F100RB
-static const char* const c_memory_map =
-  "<?xml version=\"1.0\"?>"
-  "<!DOCTYPE memory-map PUBLIC \"+//IDN gnu.org//DTD GDB Memory Map V1.0//EN\""
-  "     \"http://sourceware.org/gdb/gdb-memory-map.dtd\">"
-  "<memory-map>"
-  "  <memory type=\"rom\" start=\"0x00000000\" length=\"0x20000\"/>"    // code = sram or flash
-  "  <memory type=\"ram\" start=\"0x20000000\" length=\"0x2000\"/>"     // sram 8k
-  "  <memory type=\"flash\" start=\"0x08000000\" length=\"0x20000\">"   // flash 128k
-  "    <property name=\"blocksize\">0x400</property>"                   // 1k pages
-  "  </memory>"
-  "  <memory type=\"ram\" start=\"0x40000000\" length=\"0x1fffffff\"/>" // peripheral regs
-  "  <memory type=\"ram\" start=\"0xe0000000\" length=\"0x1fffffff\"/>" // cortex regs
-  "</memory-map>";
+static const char* current_memory_map = NULL;
+
+struct chip_params {
+       uint32_t chip_id;
+       char* description;
+       uint32_t max_flash_size, flash_pagesize;
+       uint32_t sram_size;
+       uint32_t bootrom_base, bootrom_size;
+} const devices[] = {
+       { 0x412, "Low-density device",
+         0x8000,   0x400, 0x2800,  0x1ffff000, 0x800  },
+       { 0x410, "Medium-density device",
+         0x20000,  0x400, 0x5000,  0x1ffff000, 0x800  },
+       { 0x414, "High-density device",
+         0x80000,  0x800, 0x10000, 0x1ffff000, 0x800  },
+       { 0x418, "Connectivity line device",
+         0x40000,  0x800, 0x10000, 0x1fffb000, 0x4800 },
+       { 0x420, "Medium-density value line device",
+         0x20000,  0x400, 0x2000,  0x1ffff000, 0x800  },
+       { 0x428, "High-density value line device",
+         0x80000,  0x800, 0x8000,  0x1ffff000, 0x800  },
+       { 0x430, "XL-density device",
+         0x100000, 0x800, 0x18000, 0x1fffe000, 0x1800 },
+       { 0 }
+};
 
 int serve(struct stlink* sl, int port);
+char* make_memory_map(const struct chip_params *params, uint32_t flash_size);
 
 int main(int argc, char** argv) {
        if(argc != 3) {
@@ -49,8 +61,40 @@ int main(int argc, char** argv) {
        if(stlink_current_mode(sl) != STLINK_DEV_DEBUG_MODE)
                stlink_enter_swd_mode(sl);
 
-       stlink_core_id(sl);
-       printf("Debugging ARM core %08x.\n", sl->core_id);
+       uint32_t chip_id;
+
+       stlink_read_mem32(sl, 0xE0042000, 4);
+       chip_id = sl->q_buf[0] | (sl->q_buf[1] << 8) | (sl->q_buf[2] << 16) |
+               (sl->q_buf[3] << 24);
+
+       printf("Chip ID is %08x.\n", chip_id);
+
+       const struct chip_params* params = NULL;
+
+       for(int i = 0; i < sizeof(devices) / sizeof(devices[0]); i++) {
+               if(devices[i].chip_id == (chip_id & 0xFFF)) {
+                       params = &devices[i];
+                       break;
+               }
+       }
+
+       if(params == NULL) {
+               fprintf(stderr, "Cannot recognize the connected device!\n");
+               return 0;
+       }
+
+       printf("Device connected: %s\n", params->description);
+       printf("Device parameters: SRAM: 0x%x bytes, Flash: up to 0x%x bytes in pages of 0x%x bytes\n",
+               params->sram_size, params->max_flash_size, params->flash_pagesize);
+
+       uint32_t flash_size;
+
+       stlink_read_mem32(sl, 0x1FFFF7E0, 4);
+       flash_size = sl->q_buf[0] | (sl->q_buf[1] << 8);
+
+       printf("Flash size is %d KiB.\n", flash_size);
+
+       current_memory_map = make_memory_map(params, flash_size * 0x400);
 
        int port = atoi(argv[1]);
 
@@ -61,6 +105,36 @@ int main(int argc, char** argv) {
        return 0;
 }
 
+static const char* const memory_map_template =
+  "<?xml version=\"1.0\"?>"
+  "<!DOCTYPE memory-map PUBLIC \"+//IDN gnu.org//DTD GDB Memory Map V1.0//EN\""
+  "     \"http://sourceware.org/gdb/gdb-memory-map.dtd\">"
+  "<memory-map>"
+  "  <memory type=\"rom\" start=\"0x00000000\" length=\"0x%x\"/>"       // code = sram, bootrom or flash; flash is bigger
+  "  <memory type=\"ram\" start=\"0x20000000\" length=\"0x%x\"/>"       // sram 8k
+  "  <memory type=\"flash\" start=\"0x08000000\" length=\"0x%x\">"
+  "    <property name=\"blocksize\">0x%x</property>"
+  "  </memory>"
+  "  <memory type=\"ram\" start=\"0x40000000\" length=\"0x1fffffff\"/>" // peripheral regs
+  "  <memory type=\"ram\" start=\"0xe0000000\" length=\"0x1fffffff\"/>" // cortex regs
+  "  <memory type=\"rom\" start=\"0x%08x\" length=\"0x%x\"/>"           // bootrom
+  "  <memory type=\"rom\" start=\"0x1ffff800\" length=\"0x8\"/>"        // option byte area
+  "</memory-map>";
+
+char* make_memory_map(const struct chip_params *params, uint32_t flash_size) {
+       /* This will be freed in serve() */
+       char* map = malloc(4096);
+       map[0] = '\0';
+
+       snprintf(map, 4096, memory_map_template,
+                       flash_size,
+                       params->sram_size,
+                       flash_size, params->flash_pagesize,
+                       params->bootrom_base, params->bootrom_size);
+
+       return map;
+}
+
 #define CODE_BREAK_NUM 6
 
 #define CODE_BREAK_LOW 0x01
@@ -223,19 +297,31 @@ static int flash_populate(stm32_addr_t addr, uint8_t* data, unsigned length) {
 static int flash_go(struct stlink* sl) {
        int error = -1;
 
+       // Some kinds of clock settings do not allow writing to flash.
+       stlink_reset(sl);
+
        for(struct flash_block* fb = flash_root; fb; fb = fb->next) {
                #ifdef DEBUG
                printf("flash_do: block %08x -> %04x\n", fb->addr, fb->length);
                #endif
 
-               stlink_erase_flash_page(sl, fb->addr);
+               unsigned length = fb->length;
+               for(stm32_addr_t page = fb->addr; page < fb->addr + fb->length; page += 0x400) {
+                       #ifdef DEBUG
+                       printf("flash_do: page %08x\n", page);
+                       #endif
 
-               if(!stlink_write_flash(sl, fb->addr, fb->data, fb->length) < 0) {
-                       fprintf(stderr, "Flash writing failed.\n");
-                       goto error;
+                       stlink_erase_flash_page(sl, page);
+
+                       if(stlink_write_flash(sl, page, fb->data + (page - fb->addr),
+                                       length > 0x400 ? 0x400 : length) < 0)
+                               goto error;
                }
+
        }
 
+       stlink_reset(sl);
+
        error = 0;
 
 error:
@@ -291,6 +377,12 @@ int serve(struct stlink* sl, int port) {
 
        printf("GDB connected.\n");
 
+       /*
+        * To allow resetting the chip from GDB it is required to
+        * emulate attaching and detaching to target.
+        */
+       unsigned int attached = 1;
+
        while(1) {
                char* packet;
 
@@ -351,7 +443,7 @@ int serve(struct stlink* sl, int port) {
                                const char* data = NULL;
 
                                if(!strcmp(type, "memory-map") && !strcmp(op, "read"))
-                                       data = c_memory_map;
+                                       data = current_memory_map;
 
                                if(data) {
                                        unsigned data_length = strlen(data);
@@ -377,16 +469,10 @@ int serve(struct stlink* sl, int port) {
                }
 
                case 'v': {
-                       char *separator = strstr(packet, ":"), *params = "";
-                       if(separator == NULL) {
-                               separator = packet + strlen(packet);
-                       } else {
-                               params = separator + 1;
-                       }
+                       char *params = NULL;
+                       char *cmdName = strtok_r(packet, ":;", &params);
 
-                       unsigned cmdNameLength = (separator - &packet[1]);
-                       char* cmdName = calloc(cmdNameLength + 1, 1);
-                       strncpy(cmdName, &packet[1], cmdNameLength);
+                       cmdName++; // vCommand -> Command
 
                        if(!strcmp(cmdName, "FlashErase")) {
                                char *s_addr, *s_length;
@@ -451,23 +537,21 @@ int serve(struct stlink* sl, int port) {
                                } else {
                                        reply = strdup("OK");
                                }
+                       } else if(!strcmp(cmdName, "Kill")) {
+                               attached = 0;
 
-                               stlink_reset(sl);
+                               reply = strdup("OK");
                        }
 
                        if(reply == NULL)
                                reply = strdup("");
 
-                       free(cmdName);
-
                        break;
                }
 
                case 'c':
                        stlink_run(sl);
 
-                       printf("Core running, waiting for interrupt (either in chip or GDB).\n");
-
                        while(1) {
                                int status = gdb_check_for_interrupt(client);
                                if(status < 0) {
@@ -485,7 +569,7 @@ int serve(struct stlink* sl, int port) {
                                        break;
                                }
 
-                               usleep(200000);
+                               usleep(100000);
                        }
 
                        reply = strdup("S05"); // TRAP
@@ -498,7 +582,12 @@ int serve(struct stlink* sl, int port) {
                        break;
 
                case '?':
-                       reply = strdup("S05"); // TRAP
+                       if(attached) {
+                               reply = strdup("S05"); // TRAP
+                       } else {
+                               /* Stub shall reply OK if not attached. */
+                               reply = strdup("OK");
+                       }
                        break;
 
                case 'g':
@@ -636,12 +725,28 @@ int serve(struct stlink* sl, int port) {
                        break;
                }
 
-               case 'k': {
-                       // After this function will be entered afterwards, the
-                       // chip will be reset anyway. So this is a no-op.
+               case '!': {
+                       /*
+                        * Enter extended mode which allows restarting.
+                        * We do support that always.
+                        */
+
+                       reply = strdup("OK");
 
-                       close(client);
-                       return 0;
+                       break;
+               }
+
+               case 'R': {
+                       /* Reset the core. */
+
+                       stlink_reset(sl);
+                       init_code_breakpoints(sl);
+
+                       attached = 1;
+
+                       reply = strdup("OK");
+
+                       break;
                }
 
                default: