- fixed line endings with commands.tcl

- added svn props for newly added files

git-svn-id: svn://svn.berlios.de/openocd/trunk@749 b42882b7-edfa-0310-969c-e2dbd0fdcd60

diff --git a/src/target/target/at91eb40a.tcl b/src/target/target/at91eb40a.tcl
index 13ed0f824c3f214c3c05bbb65d0f831e618135fa..de57995c4a32ed18955b21f54f7a6b516e2301f7 100644 (file)
--- a/src/target/target/at91eb40a.tcl
+++ b/src/target/target/at91eb40a.tcl
@@ -1,55 +1,55 @@
-#Script for AT91EB40a\r
-\r
-#Atmel ties SRST & TRST together, at which point it makes\r
-#no sense to use TRST, but use TMS instead.\r
-#\r
-#The annoying thing with tying SRST & TRST together is that\r
-#there is no way to halt the CPU *before and during* the\r
-#SRST reset, which means that the CPU will run a number\r
-#of cycles before it can be halted(as much as milliseconds).\r
-openocd {reset_config srst_only srst_pulls_trst}\r
- \r
-#jtag scan chain\r
-#format L IRC IRCM IDCODE (Length, IR Capture, IR Capture Mask, IDCODE)\r
-openocd {jtag_device 4 0x1 0xf 0xe}\r
-\r
-#target configuration\r
-openocd {target arm7tdmi little 0 arm7tdmi-s_r4}\r
-\r
-# speed up memory downloads\r
-openocd {arm7 fast_memory_access enable}\r
-openocd {arm7_9 dcc_downloads enable}\r
-\r
-#flash driver\r
-openocd {flash bank ecosflash 0x01000000 0x200000 2 2 0 ecos/at91eb40a.elf}\r
-\r
-# required for usable performance. Used for lots of\r
-# other things than flash programming.\r
-openocd {working_area 0 0x00000000 0x20000 nobackup}\r
-\r
-#force hardware values - we're running out of flash more\r
-#often than not. The user can disable this in his\r
-#subsequent config script.\r
-openocd {arm7_9 force_hw_bkpts enable}\r
-\r
-set reset_count 0\r
-\r
-proc target_reset_0 {} {\r
-       global reset_count\r
-       # Reset script for AT91EB40a\r
-       openocd {reg cpsr 0x000000D3}           \r
-       openocd {mww 0xFFE00020 0x1}\r
-       openocd {mww 0xFFE00024 0x00000000}  \r
-       openocd {mww 0xFFE00000 0x01002539} \r
-       openocd {mww 0xFFFFF124 0xFFFFFFFF}  \r
-       openocd {mww 0xffff0010 0x100}\r
-       openocd {mww 0xffff0034 0x100}\r
-       set reset_count [expr $reset_count+1]\r
-       echo "Testing reset $reset_count !"\r
-}\r
-\r
-proc target_pre_reset_0 {} {\r
-       global reset_count\r
-       set reset_count [expr $reset_count+1]\r
-       echo "Testing pre_reset $reset_count !"\r
-}\r
+#Script for AT91EB40a
+
+#Atmel ties SRST & TRST together, at which point it makes
+#no sense to use TRST, but use TMS instead.
+#
+#The annoying thing with tying SRST & TRST together is that
+#there is no way to halt the CPU *before and during* the
+#SRST reset, which means that the CPU will run a number
+#of cycles before it can be halted(as much as milliseconds).
+openocd {reset_config srst_only srst_pulls_trst}
+ 
+#jtag scan chain
+#format L IRC IRCM IDCODE (Length, IR Capture, IR Capture Mask, IDCODE)
+openocd {jtag_device 4 0x1 0xf 0xe}
+
+#target configuration
+openocd {target arm7tdmi little 0 arm7tdmi-s_r4}
+
+# speed up memory downloads
+openocd {arm7 fast_memory_access enable}
+openocd {arm7_9 dcc_downloads enable}
+
+#flash driver
+openocd {flash bank ecosflash 0x01000000 0x200000 2 2 0 ecos/at91eb40a.elf}
+
+# required for usable performance. Used for lots of
+# other things than flash programming.
+openocd {working_area 0 0x00000000 0x20000 nobackup}
+
+#force hardware values - we're running out of flash more
+#often than not. The user can disable this in his
+#subsequent config script.
+openocd {arm7_9 force_hw_bkpts enable}
+
+set reset_count 0
+
+proc target_reset_0 {} {
+       global reset_count
+       # Reset script for AT91EB40a
+       openocd {reg cpsr 0x000000D3}           
+       openocd {mww 0xFFE00020 0x1}
+       openocd {mww 0xFFE00024 0x00000000}  
+       openocd {mww 0xFFE00000 0x01002539} 
+       openocd {mww 0xFFFFF124 0xFFFFFFFF}  
+       openocd {mww 0xffff0010 0x100}
+       openocd {mww 0xffff0034 0x100}
+       set reset_count [expr $reset_count+1]
+       echo "Testing reset $reset_count !"
+}
+
+proc target_pre_reset_0 {} {
+       global reset_count
+       set reset_count [expr $reset_count+1]
+       echo "Testing pre_reset $reset_count !"
+}

diff --git a/src/tcl/commands.tcl b/src/tcl/commands.tcl
index 81f7b6f10d7a865e246dcdaf5b330f11263047c0..7d90f36c2bf026ae0f2376285a71eaa5aa42db78 100644 (file)
--- a/src/tcl/commands.tcl
+++ b/src/tcl/commands.tcl
@@ -1,18 +1,18 @@
-# implements Tcl procedures/functions\r
-proc peek {address} {\r
+# implements Tcl procedures/functions
+proc peek {address} {
        return [openocd_throw "mdw $address"]
-}\r
-\r
-# Production command\r
-# FIX!!! need to figure out how to feed back relevant output\r
-# from e.g. "flash banks" command...\r
-proc board_produce {filename serialnumber} {\r
-       openocd "reset init"\r
-       openocd "flash write_image erase $filename [flash] bin"]]\r
-       openocd "verify_image $filename [flash] bin"]]\r
-       echo "Successfully ran production procedure"\r
-}\r
-\r
-proc board_test {} {\r
+}
+
+# Production command
+# FIX!!! need to figure out how to feed back relevant output
+# from e.g. "flash banks" command...
+proc board_produce {filename serialnumber} {
+       openocd "reset init"
+       openocd "flash write_image erase $filename [flash] bin"]]
+       openocd "verify_image $filename [flash] bin"]]
+       echo "Successfully ran production procedure"
+}
+
+proc board_test {} {
        echo "Production test not implemented"
-}\r
+}