Merge branch 'upstream' into debian
[fw/stlink] / flash / main.c
index c8b15e0b9631d62c846c740ae93ba90c6f7f7d26..2679bbbce930d0f508fa5d664b4cd48289da233a 100644 (file)
 /* simple wrapper around the stlink_flash_write function */
 
+// TODO - this should be done as just a simple flag to the st-util command line...
+
 
 #include <stdio.h>
 #include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
 #include "stlink-common.h"
 
+#define DEBUG_LOG_LEVEL 100
+#define STND_LOG_LEVEL  50
+
+enum st_cmds {DO_WRITE = 0, DO_READ = 1, DO_ERASE = 2};
+struct opts
+{
+    enum st_cmds cmd;
+    const char* devname;
+    const char* filename;
+    stm32_addr_t addr;
+    size_t size;
+    int reset;
+    int log_level;
+};
+
+static void usage(void)
+{
+    puts("stlinkv1 command line: ./st-flash [--debug] [--reset] {read|write} /dev/sgX path addr <size>");
+    puts("stlinkv1 command line: ./st-flash [--debug] /dev/sgX erase");
+    puts("stlinkv2 command line: ./st-flash [--debug] [--reset] {read|write} path addr <size>");
+    puts("stlinkv2 command line: ./st-flash [--debug] erase");
+    puts("                       use hex format for addr and <size>");
+}
+
+static int get_opts(struct opts* o, int ac, char** av)
+{
+    /* stlinkv1 command line: ./st-flash {read|write} /dev/sgX path addr <size> */
+    /* stlinkv2 command line: ./st-flash {read|write} path addr <size> */
+
+    unsigned int i = 0;
+
+    if (ac < 1) return -1;
+
+    if (strcmp(av[0], "--debug") == 0)
+    {
+        o->log_level = DEBUG_LOG_LEVEL;
+        ac--;
+        av++;
+    }
+    else
+    {
+        o->log_level = STND_LOG_LEVEL;
+    }
+
+    if (strcmp(av[0], "--reset") == 0)
+    {
+        o->reset = 1;
+        ac--;
+        av++;
+    }
+    else
+    {
+        o->reset = 0;
+    }
+
+    if (ac < 1) return -1;
+
+    /* stlinkv2 */
+    o->devname = NULL;
+
+    if (strcmp(av[0], "erase") == 0)
+    {
+        o->cmd = DO_ERASE;
+
+        /* stlinkv1 mode */
+        if (ac == 2)
+        {
+            o->devname = av[1];
+            i = 1;
+        }
+    }
+    else {
+        if (ac < 3) return -1;
+        if (strcmp(av[0], "read") == 0)
+        {
+            o->cmd = DO_READ;
+
+            /* stlinkv1 mode */
+            if (ac == 5)
+            {
+                o->devname = av[1];
+                i = 1;
+            }
+            if (ac > 3)
+                o->size = strtoul(av[i + 3], NULL, 16);
+        }
+        else if (strcmp(av[0], "write") == 0)
+        {
+            o->cmd = DO_WRITE;
+
+            /* stlinkv1 mode */
+            if (ac == 4)
+            {
+                o->devname = av[1];
+                i = 1;
+            }
+        }
+        else
+        {
+            return -1;
+        }
+    }
+
+    o->filename = av[i + 1];
+    o->addr = strtoul(av[i + 2], NULL, 16);
+
+    return 0;
+}
+
 
 int main(int ac, char** av)
 {
-  /* stlinkv1 command line: ./flash /dev/sgX path addr */
-  /* stlinkv2 command line: ./flash path addr */
-
-  stlink_t* sl = NULL;
-  stm32_addr_t addr;
-  const char* path;
-  int err;
-
-  if (ac == 4) /* stlinkv1 */
-  {
-    static const int scsi_verbose = 2;
-    sl = stlink_quirk_open(av[1], scsi_verbose);
-    path = av[2];
-    addr = strtoul(av[3], NULL, 16);
-  }
-  else if (ac == 3) /* stlinkv2 */
-  {
-    sl = stlink_open_usb(NULL, 10);
-    path = av[1];
-    addr = strtoul(av[2], NULL, 16);
-  }
-  else /* invalid */
-  {
-    printf("invalid command line\n");
-    goto on_error;
-  }
-
-  if (sl == NULL) goto on_error;
-
-  err = stlink_fwrite_flash(sl, path, addr);
-  if (err == -1)
-  {
-    printf("stlink_fwrite_flash() == -1\n");
-    goto on_error;
-  }
-
- on_error:
-  if (sl != NULL) stlink_close(sl);
-
-  return err;
+    stlink_t* sl = NULL;
+    struct opts o;
+    int err = -1;
+
+    o.size = 0;
+    if (get_opts(&o, ac - 1, av + 1) == -1)
+    {
+        printf("invalid command line\n");
+        usage();
+        goto on_error;
+    }
+
+    if (o.devname != NULL) /* stlinkv1 */
+    {
+        sl = stlink_v1_open(o.log_level, 1);
+        if (sl == NULL) goto on_error;
+        sl->verbose = o.log_level;
+    }
+    else /* stlinkv2 */
+    {
+        sl = stlink_open_usb(o.log_level, 1);
+        if (sl == NULL) goto on_error;
+        sl->verbose = o.log_level;
+    }
+
+    if (stlink_current_mode(sl) == STLINK_DEV_DFU_MODE)
+        stlink_exit_dfu_mode(sl);
+
+    if (stlink_current_mode(sl) != STLINK_DEV_DEBUG_MODE)
+        stlink_enter_swd_mode(sl);
+
+    if (o.reset){
+        stlink_jtag_reset(sl,2);
+        stlink_reset(sl);
+    }
+
+    // Disable DMA - Set All DMA CCR Registers to zero. - AKS 1/7/2013
+    if (sl->chip_id == STM32_CHIPID_F4)
+    {
+        memset(sl->q_buf,0,4);
+        for (int i=0;i<8;i++) {
+            stlink_write_mem32(sl,0x40026000+0x10+0x18*i,4);
+            stlink_write_mem32(sl,0x40026400+0x10+0x18*i,4);
+            stlink_write_mem32(sl,0x40026000+0x24+0x18*i,4);
+            stlink_write_mem32(sl,0x40026400+0x24+0x18*i,4);
+        }
+    }
+
+    // Core must be halted to use RAM based flashloaders
+    stlink_force_debug(sl);
+    stlink_status(sl);
+
+    if (o.cmd == DO_WRITE) /* write */
+    {
+        if ((o.addr >= sl->flash_base) &&
+                (o.addr < sl->flash_base + sl->flash_size)) {
+            err = stlink_fwrite_flash(sl, o.filename, o.addr);
+            if (err == -1)
+            {
+                printf("stlink_fwrite_flash() == -1\n");
+                goto on_error;
+            }
+        }
+        else if ((o.addr >= sl->sram_base) &&
+                (o.addr < sl->sram_base + sl->sram_size)) {
+            err = stlink_fwrite_sram(sl, o.filename, o.addr);
+            if (err == -1)
+            {
+                printf("stlink_sram_flash() == -1\n");
+                goto on_error;
+            }
+        }
+    } else if (o.cmd == DO_ERASE)
+    {
+        err = stlink_erase_flash_mass(sl);
+        if (err == -1)
+        {
+            printf("stlink_fwrite_flash() == -1\n");
+            goto on_error;
+        }
+    }
+    else /* read */
+    {
+        if ((o.addr >= sl->flash_base) && (o.size == 0) &&
+                (o.addr < sl->flash_base + sl->flash_size))
+            o.size = sl->flash_size;
+        else if ((o.addr >= sl->sram_base) && (o.size == 0) &&
+                (o.addr < sl->sram_base + sl->sram_size))
+            o.size = sl->sram_size;
+        err = stlink_fread(sl, o.filename, o.addr, o.size);
+        if (err == -1)
+        {
+            printf("stlink_fread() == -1\n");
+            goto on_error;
+        }
+    }
+
+    if (o.reset){
+        stlink_jtag_reset(sl,2);
+        stlink_reset(sl);
+    }
+
+    /* success */
+    err = 0;
+
+on_error:
+    if (sl != NULL)
+    {
+        stlink_exit_debug_mode(sl);
+        stlink_close(sl);
+    }
+
+    return err;
 }