stm32 0.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 069d773b51764deb1d1f3e16dfc7c44efa9c42f0
+  data.tar.gz: 715b55b8a41a363284ceca662418f4c43c9c7b86
+SHA512:
+  metadata.gz: 97b5432c8983db33acdcc1c87e26c5906b4865bac5d97d24b6ad021031a65877ff4d136e54f063dd39f9aa3c4999e82c9b6aeba544e0bc0a0f166beff9d83a0d
+  data.tar.gz: 342295cacada68c8f24a3bf707e89928e8c41c4924aa3991579a5fc14e0d93c43aa8cf7d594b9abffdf23badea8751be2d1e3be2fcbee3318ad5924bf5ab4c84

data/bin/stm32_cli.rb

@@ -0,0 +1,177 @@
+#!/usr/bin/env ruby
+#encoding: UTF-8
+
+require 'optparse'
+require 'yaml'
+require 'pp'
+
+require 'io/wait'
+
+local=false
+require 'srec'
+
+if File.file? './lib/stm32.rb'
+  require './lib/stm32.rb'
+  puts "using local lib"
+  local=true
+else
+  require 'stm32'
+end
+
+def isprint(c)
+  /[[:print:]]/ === c.chr
+end
+
+
+options = {}
+CONF_FILE='/etc/stm32.conf'
+
+options=options.merge YAML::load_file(CONF_FILE) if File.exist?(CONF_FILE)
+options=options.inject({}){|memo,(k,v)| memo[k.to_sym] = v; memo}
+
+options[:dev] =  "/dev/ttyUSB0" if not options[:dev]
+OptionParser.new do |opts|
+  opts.banner = "Usage: #{$PROGRAM_NAME} [options]"
+
+  opts.on("-v", "--[no-]verbose", "Run verbosely; creates protocol log on console (false)") do |v|
+    options[:verbose] = v
+  end
+  opts.on("-d", "--[no-]debug", "Produce Debug dump on verbose log (false)") do |v|
+    options[:debug] = v
+  end
+
+  opts.on("--dev dev", "serial device to use (/dev/ttyUSB0)") do |v|
+    options[:dev] = v
+  end
+end.parse!
+
+#pp options
+
+stm=Stm32.new options
+
+stm.get_port()
+if stm.boot
+  stm.get_info
+  printf "BOOTED OK!\r\n>"
+else
+  puts "Error: Boot failed! retry!\r\n"
+end
+
+#pp stm.run
+port=stm.get_port
+$stdout.sync = true
+oldstate=:unknown
+oldaddr=0x08000000
+begin
+  state = `stty -g`
+  loop do
+    curstate=stm.get_state
+    if oldstate!=curstate
+      if curstate==:running
+        system("stty raw -echo -icanon isig") # turn raw input on
+      else
+        system "stty #{state}" # turn raw input off
+      end
+      oldstate=curstate
+    end
+    if port.ready_for_read?
+      ch = port.readbyte
+      if ch==0x0a and stm.get_state==:running
+        printf "\n\r"
+      elsif ch==0x0d and stm.get_state==:running
+
+      elsif ch>0x1f and stm.get_state==:running
+        printf "%c",ch
+      else
+        printf "[%02x]",ch
+      end
+    elsif $stdin.ready?
+      if curstate==:running  #terminal mode
+        c = $stdin.getc
+        if c.ord==0x02
+          system "stty #{state}" # turn raw input off
+          if stm.boot
+            printf "BOOTED OK!\r\n>"
+          else
+            puts "Error: Boot failed! retry!\r\n"
+          end
+          #system("stty raw -echo -icanon isig") # turn raw input on
+        else
+          port.write c
+        end
+      else #debugger
+        c = $stdin.gets.chop
+        a=c.split " "
+        if a[0]=="g"
+          if stm.run
+            puts "RUN OK!\r\n"
+          else
+            puts "Error: Run failed! retry!\r\n"
+          end
+          #system("stty raw -echo -icanon isig") # turn raw input on
+        elsif a[0]=="i"
+          stm.get_info
+        elsif a[0]=="e"
+          if a[1]
+            b=a[1].hex
+          else
+            b=0
+          end
+          stm.erase [b]
+        elsif a[0]=="w" or a[0]=="wf"
+          if a[1]
+            addr=a[1].hex
+          else
+            addr=oldaddr
+          end
+          if a[2]
+            data=[a[2].to_i,0x11,0x22,0x33]
+          else
+            data=[1,2,3,4]
+          end
+          addr |= 0x08000000 if a[0]=="wf"
+          stm.write addr,data
+          oldaddr=addr
+        elsif a[0]=="f"
+          stm.flash("/home/arisi/projects/mygit/arisi/ctex/bin/sol_STM32L_mg11.srec")
+        elsif a[0]=="q"
+          break
+        elsif a[0]=="r" or a[0]=="rf"
+          if a[1]
+            addr=a[1].hex
+          else
+            addr=oldaddr
+          end
+          addr |= 0x08000000 if a[0]=="rf"
+          if a[2]
+            len=a[2].hex
+          else
+            len=0x100
+          end
+          buf=stm.read addr,len
+          #printf "0x%08X:",addr
+          if not buf
+            puts "Illegal address!"
+          else
+            buf.each_with_index do |b,i|
+              if i&0xf==0x0
+                printf "\n0x%08X:  ",addr+i
+              end
+              printf "%02X ",b
+            end
+            printf "\n";
+            oldaddr=addr
+          end
+          #system("stty raw -echo -icanon isig") # turn raw input on
+        else
+          puts "Commands: g(o), i(d), w(rite), r(ead), e(rase), q(uit)"
+        end
+        printf "\r\n>"
+      end
+    else
+      sleep 0.01
+    end
+  end
+ensure
+  system "stty #{state}" # turn raw input off
+end

data/lib/stm32.rb

@@ -0,0 +1,417 @@
+#!/usr/bin/env ruby
+#encoding: UTF-8
+
+require 'json'
+require 'serialport'
+#require 'srec'
+
+class IO
+  def ready_for_read?
+    result = IO.select([self], nil, nil, 0)
+    result && (result.first.first == self)
+  end
+end
+
+
+class Stm32
+  @port=nil
+  @dev=nil
+  @state=nil
+  @cpu_info={}
+  @debug=true
+  @@Clist_def=[0x00,0x01,0x02,0x11,0x21,0x31,0x44,0x63,0x73,0x82,0x92]
+  @@Commands={
+    get:    {index:0},
+    getver: {index:1},
+    getid:  {index:2},
+    read:   {index:3},
+    go:     {index:4},
+    write:  {index:5},
+    erase:  {index:6},
+  }
+  @@Cpu_ids={
+    0x416 => {
+      family: :L1,
+      ram_s:0x20000800,
+      ram_e:0x20004000,
+      flash_s:0x8000000,
+      flash_e:0x08020000,
+      flash_bsize:0x100,
+      serno:0x1ff80050,
+      flash_initial:0
+      },
+    0x413 => {family: :F4,ram_s:0x20002000,ram_e:0x20020000,flash_s:0x8000000,flash_e:0x08100000,flash_blk:16384,serno:0x1fff7a10,flash_initial:0xff},
+    }
+
+  def initialize(hash={})
+    @clist=@@Clist_def
+    @debug=hash[:debug]
+    if not hash[:dev]
+      puts "Error: No serial Device??"
+      return nil
+    end
+    if not File.chardev? hash[:dev]
+      puts "Error: '#{hash[:dev]}'' is not serial Device??"
+      return nil
+    end
+    begin
+      @port = SerialPort.new hash[:dev],115200,8,1,SerialPort::NONE
+      #$sp.read_timeout = 100
+      @port.flow_control= SerialPort::NONE
+      @port.binmode
+      @port.sync = true
+    rescue => e
+      puts "Error: Cannot open serial device: #{e}"
+      pp e.backtrace
+      return nil
+    end
+    @dev=hash[:dev]
+    puts "Open Serial OK!" if @debug
+  end
+  def get_port()
+    @port
+  end
+  def get_dev()
+    @dev
+  end
+  def get_state()
+    @state
+  end
+  def get_cpu(k)
+    @cpu_info[k]
+  end
+
+  def flush_chars tout=0.1
+    while ch=wait_char(tout) do
+      puts "\nWarning: Flushed #{ch.to_s(16)}\n"
+    end
+  end
+
+  def send_cmd cmd,ack=true
+    if not @@Commands[cmd] or not @@Commands[cmd][:index]
+      puts "Error: Unknown command #{cmd}"
+    end
+    if not c=@clist[@@Commands[cmd][:index]]
+      puts "Error: Unsupported command #{cmd}"
+    end
+    retries=0
+    flush_chars 0.001
+    while retries<2 do
+      ch=send_buf [c,0xff-c],ack
+      if ack
+        if not ch
+          return :tout
+        elsif ch== :nack
+          printf("SYNC\r\n") if @debug
+          send_buf [32],false #synch!
+          flush_chars 0.1
+        else
+          return ch
+        end
+      else
+        return :ack
+      end
+    end
+    :nack
+  end
+
+  def send_addr a,ack=true
+    buf=[0,0,0,0]
+    check=0
+    4.times do |i|
+      c=a&0xff
+      a>>=8
+      buf[3-i] = c
+      check ^=c
+    end
+    buf << check
+    send_buf buf,ack
+  end
+
+  def send_buf_with_check buf,tout=0.1
+    check=0
+    buf.each do |b|
+      check ^=b
+    end
+    buf << check
+    send_buf buf,true,tout
+  end
+
+  def send_buf buf,ack=false,tout=0.1
+    bytes=buf.pack("c*")
+    printf "> "  if @debug
+    bytes.split("").each do |ch|
+      @port.write ch
+      printf("%02X ",ch.ord)  if @debug
+      sleep 0.0001
+    end
+    puts ""  if @debug
+    if ack
+      ch=wait_char tout
+      if ch
+        if ch==0x1f
+          printf("< NACK: %02X\n",ch)   if @debug
+          return nil
+        else
+          printf("< ACK: %02X\n",ch)  if @debug
+          return :ack
+        end
+        return ch
+      else
+        puts "< TOUT"
+        return nil
+      end
+    end
+    return true
+  end
+
+  def wait_char tout=1
+    cnt=0
+    while cnt<tout*100
+      if @port.ready_for_read?
+        return @port.readbyte
+      end
+      sleep 0.01
+      cnt+=1
+    end
+    return nil
+  end
+
+  def boot
+    retries=0
+    delay=0.001
+    while retries<10
+      #$sp.rts=1 #if retries>5 #power off --really cold boot
+      #sleep 0.5
+      @port.rts=0 #if retries>5 #power off --really cold boot
+      @port.dtr=0
+      sleep delay
+      @port.flush_input
+      @port.flush_output
+      @port.rts=0 #power on
+      sleep delay
+      @port.dtr=1 #reset up -> start to run
+      ch=wait_char delay
+
+      if ch and ch==0
+        printf("OK: [%02x]", ch )  if @debug
+        sleep delay
+      end
+      send_buf [0x7f]
+      if ch=wait_char
+        if ch==0x79
+          puts "Booted OK, retries=#{retries}\n"   if @debug
+          @state=:booted
+          return true
+        else
+          printf "Error:got strange ack: %02X '%c'\n",ch,ch
+        end
+      else
+        puts "Error: no cmd ack"
+      end
+      retries+=1
+      delay*=2
+    end
+    puts "Error:not booted, gave up\n"
+    return false
+  end
+
+  def wait_chars len,tout=0.1
+    ret=[]
+    len.times do
+      if ch=wait_char(tout)
+        ret << ch
+      else
+        puts "Warning: Short Data! #{ret}"
+        return nil
+      end
+    end
+    return ret
+  end
+
+  def cmd c
+    boot if @state!=:booted
+    puts "cmd: #{c}"  if @debug
+    send_cmd c
+    if c==:write #no reply expected
+      return
+    end
+    if len=wait_char
+      len+=1
+      if buf=wait_chars(len)
+        if @debug
+          printf "len=#{len}:"
+          buf.each do |b|
+            printf "%02X ",b
+          end
+          printf "\n"
+        end
+        if ack=wait_char
+          if ack==0x79
+            return buf
+          else
+            puts "Error: no ack for cmd #{c} #{ack}"
+          end
+        else
+          puts "Error: tout at ack for #{c}"
+        end
+      else
+        puts "Error: timeout for #{c}"
+      end
+    end
+  end
+
+
+  def get_info
+    if buf=cmd(:get)
+      puts "BL ver: #{buf[0].to_s(16)}"
+      @clist=buf[1..-1]
+      #puts "Command list updated to #{@clist}"
+    end
+    if buf=cmd(:getid)
+      @cpu=buf[0]*0x100 + buf[1]
+      puts "Cpu ID: #{@cpu.to_s(16)}"
+      if @@Cpu_ids[@cpu]
+        @cpu_info=@@Cpu_ids[@cpu]
+        printf "Family: %s\n",  @cpu_info[:family]
+        printf "Ram:    %08X .. %08X %5.1fk\n",  @cpu_info[:ram_s],@cpu_info[:ram_e],(@cpu_info[:ram_e]-@cpu_info[:ram_s])/1024.0
+        printf "Flash:  %08X .. %08X %5.1fk\n",  @cpu_info[:flash_s],@cpu_info[:flash_e],(@cpu_info[:flash_e]-@cpu_info[:flash_s])/1024.0
+        addr=@cpu_info[:serno]
+        base=addr&(0xffffff00)
+        oset=addr&(0xff)
+        buf=read base,oset+0x10
+        serno=""
+        10.times do |i|
+          serno += sprintf("%02X",buf[oset+i])
+        end
+        @serno=serno
+        puts "Serno:  '#{serno}'."
+      end
+    end
+  end
+
+  def read addr,len
+    if send_cmd(:read)
+      if send_addr addr
+        ch=send_buf [(len-1),0xff - (len-1)],true
+        if buf=wait_chars(len,0.1)
+          if @debug
+            printf "len=#{len}:"
+            buf.each do |b|
+              printf "%02X ",b
+            end
+            printf "\n"
+          end
+          return buf
+        end
+      end
+    end
+    return nil
+  end
+
+  def write addr,data
+    return(nil) if not data or data==[]
+    len=data.length
+    if len>0x100
+      puts "Too big block to write #{len}"
+      return nil
+    end
+    if send_cmd(:write)
+      if send_addr addr
+        list=[data.length-1]
+        list+=data
+        if ack=send_buf_with_check(list,3)
+          #puts "Write Result: #{ack}"
+          return ack
+        end
+      end
+    end
+    puts "Error: Write fails!"
+    flush_chars # failed write may have produced some nacks
+    return nil
+  end
+
+  def erase blocks
+    return if not blocks or blocks==[]
+    list=[blocks.length-1].pack("n").unpack("cc")
+    blocks.each do |b|
+      list+=[b].pack("n").unpack("cc")
+    end
+    if send_cmd(:erase)
+      if ack=send_buf_with_check(list,3)
+        #puts "Erase #{list.size} Pages Result: #{ack}"
+        return ack
+      end
+    end
+    return nil
+  end
+
+  def run addr=0x08000000
+    printf "try to Run @ %x",addr
+    if @state!=:booted
+      if not boot
+        puts "Error: Cannot run, as cannot get booted"
+        return nil
+      end
+    end
+    retries=0
+    while retries<4 do
+      if send_cmd :go
+        if send_addr addr
+          if ch=wait_char
+            puts "Started Running, retries: #{retries} got #{ch}\n"  if @debug
+            if ch==0
+              @state=:running
+              return true
+            end
+          else
+            puts "Started Running???, retries: #{retries} -- no start char\n"
+          end
+        end
+      end
+      puts "run failed, retry boot and run"
+      if not boot
+        puts "Error: Cannot run, as cannot get booted"
+        return nil
+      end
+      retries+=1
+    end
+    boot #return to bootstrap mode
+    return false
+  end
+
+  def flash fn
+    s=Srec.new file: fn
+    bsize=get_cpu(:flash_bsize)
+    fs=get_cpu(:flash_s)
+    fe=get_cpu(:flash_e)
+    b= s.to_blocks fs,fe,bsize
+    puts "#{b.size} blocks of #{bsize} bytes"
+    list=[]
+    b.each do |blk,data|
+      list << blk
+    end
+    start=Time.now.to_i
+    if erase list
+      dur=Time.now.to_i-start
+      puts "Erased in #{dur}s"
+      cnt=0
+      start=Time.now.to_i
+      b.each do |blk,data|
+        addr=blk*bsize+fs
+        if write addr,data
+          printf("\r#{cnt}/#{b.length} %.0f%%",100.0*cnt/b.length) if cnt%10==0
+        else
+          puts "Error: Write fails at #{addr}"
+          break
+        end
+        cnt+=1
+      end
+      dur=Time.now.to_i-start
+      puts "\nFlashed in #{dur}s"
+    else
+      puts "Error: Erase failed"
+    end
+  end
+
+end

metadata

@@ -0,0 +1,86 @@
+--- !ruby/object:Gem::Specification
+name: stm32
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- Ari Siitonen
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-12-29 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: srec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.0'
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: 0.0.1
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.0'
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: 0.0.1
+- !ruby/object:Gem::Dependency
+  name: minimal-http-ruby
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.0'
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: 0.0.3
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.0'
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: 0.0.3
+description: Pure Ruby Driver and Flash programmer for stm32 bootstrap -- cli included
+email: jalopuuverstas@gmail.com
+executables:
+- stm32_cli.rb
+extensions: []
+extra_rdoc_files: []
+files:
+- bin/stm32_cli.rb
+- lib/stm32.rb
+homepage: https://github.com/arisi/stm32
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.2.2
+signing_key: 
+specification_version: 4
+summary: Pure Ruby Driver and Flash programmer for stm32 bootstrap
+test_files: []