Remove annoying end-of-line whitespace from tcl/* files
[fw/openocd] / tcl / board / zy1000.cfg
1 #Script for ZY1000
2
3 #Atmel ties SRST & TRST together, at which point it makes
4 #no sense to use TRST, but use TMS instead.
5 #
6 #The annoying thing with tying SRST & TRST together is that
7 #there is no way to halt the CPU *before and during* the
8 #SRST reset, which means that the CPU will run a number
9 #of cycles before it can be halted(as much as milliseconds).
10 reset_config srst_only srst_pulls_trst
11
12
13 if { [info exists CHIPNAME] } {
14    set  _CHIPNAME $CHIPNAME
15 } else {
16    set  _CHIPNAME zy1000
17 }
18
19 if { [info exists ENDIAN] } {
20    set  _ENDIAN $ENDIAN
21 } else {
22    set  _ENDIAN little
23 }
24
25
26 #jtag scan chain
27 if { [info exists CPUTAPID ] } {
28    set _CPUTAPID $CPUTAPID
29 } else {
30    set _CPUTAPID 0x1f0f0f0f
31 }
32 jtag newtap $_CHIPNAME cpu -irlen 4 -ircapture 0x1 -irmask 0xf -expected-id $_CPUTAPID
33
34 set _TARGETNAME [format "%s.cpu" $_CHIPNAME]
35 target create $_TARGETNAME arm7tdmi -endian $_ENDIAN -chain-position $_TARGETNAME -variant arm7tdmi-s_r4
36
37 # at CPU CLK <32kHz this must be disabled
38 arm7_9 fast_memory_access enable
39 arm7_9 dcc_downloads enable
40
41 flash bank ecosflash 0x01000000 0x200000 2 2 0 ecos/at91eb40a.elf
42 $_TARGETNAME configure -event reset-init {
43         # Set up chip selects & timings
44         mww 0xFFE00000 0x0100273D
45         mww 0xFFE00004 0x08002125
46         mww 0xFFEe0008 0x02002125
47         mww 0xFFE0000c 0x03002125
48         mww 0xFFE00010 0x40000000
49         mww 0xFFE00014 0x50000000
50         mww 0xFFE00018 0x60000000
51         mww 0xFFE0001c 0x70000000
52         mww 0xFFE00020 0x00000001
53         mww 0xFFE00024 0x00000000
54
55         # remap
56         mww 0xFFFFF124 0xFFFFFFFF
57         mww 0xffff0010 0x100
58         mww 0xffff0034 0x100
59
60         #disable 16x5x UART interrupts
61         mww 0x08020004 0
62 }
63
64 # required for usable performance. Used for lots of
65 # other things than flash programming.
66 $_TARGETNAME configure -work-area-virt 0 -work-area-phys 0x00020000 -work-area-size 0x20000 -work-area-backup 0
67
68 jtag_khz 16000
69
70
71 proc production_info {} {
72         return "Serial number is official MAC number. Format XXXXXXXXXXXX"
73 }
74
75 # There is no return value from this procedure. If it is
76 # successful it does not throw an exception
77 #
78 # Progress messages are output via puts
79 proc production {firmwarefile serialnumber} {
80         if {[string length $serialnumber]!=12} {
81                 puts "Invalid serial number"
82                 return
83         }
84
85         puts "Power cycling target"
86         power off
87         sleep 3000
88         power on
89         sleep 1000
90         reset init
91         flash write_image erase $firmwarefile 0x1000000 bin
92         verify_image $firmwarefile 0x1000000 bin
93
94         # Big endian... weee!!!!
95         puts "Setting MAC number to $serialnumber"
96         flash fillw [expr 0x1030000-0x8] "0x[string range $serialnumber 2 3][string range $serialnumber 0 1]0000" 1
97         flash fillw [expr 0x1030000-0x4] "0x[string range $serialnumber 10 11][string range $serialnumber 8 9][string range $serialnumber 6 7][string range $serialnumber 4 5]" 1
98         puts "Production successful"
99 }
100
101
102 proc production_test {} {
103         power on
104         sleep 1000
105         target_request debugmsgs enable
106         reset run
107         sleep 25000
108         target_request debugmsgs disable
109         return "See IP address above..."
110 }