From dbbc9c41f7db210b0a4e226540a28e0a8a5019bf Mon Sep 17 00:00:00 2001
From: zwelch <zwelch@b42882b7-edfa-0310-969c-e2dbd0fdcd60>
Date: Wed, 27 May 2009 06:49:24 +0000
Subject: Move TCL script files -- Step 2 of 2: - Move src/tcl to tcl/. -
 Update top Makefile.am to use new path name.

git-svn-id: svn://svn.berlios.de/openocd/trunk@1919 b42882b7-edfa-0310-969c-e2dbd0fdcd60
---
 tcl/test/selftest.cfg | 17 +++++++++++++++++
 tcl/test/syntax1.cfg  | 29 +++++++++++++++++++++++++++++
 2 files changed, 46 insertions(+)
 create mode 100644 tcl/test/selftest.cfg
 create mode 100644 tcl/test/syntax1.cfg

(limited to 'tcl/test')

diff --git a/tcl/test/selftest.cfg b/tcl/test/selftest.cfg
new file mode 100644
index 00000000..d1a00aed
--- /dev/null
+++ b/tcl/test/selftest.cfg
@@ -0,0 +1,17 @@
+
+add_help_text selftest "run selftest using working ram <tmpfile> <address> <size>"
+
+proc selftest {tmpfile address size} {
+
+   for {set i 0} {$i < $size } {set i [expr $i+4]} {
+       mww [expr $address+$i] $i
+   }
+
+   for {set i 0} {$i < 10 } {set i [expr $i+1]} {
+    puts "Test iteration $i"
+    dump_image $tmpfile $address $size
+	verify_image $tmpfile $address bin
+	load_image $tmpfile $address bin
+   }
+
+}
\ No newline at end of file
diff --git a/tcl/test/syntax1.cfg b/tcl/test/syntax1.cfg
new file mode 100644
index 00000000..fb88d5ae
--- /dev/null
+++ b/tcl/test/syntax1.cfg
@@ -0,0 +1,29 @@
+jtag_nsrst_delay 200
+jtag_ntrst_delay 200
+
+#use combined on interfaces or targets that can't set TRST/SRST separately
+reset_config trst_and_srst srst_pulls_trst
+
+#LPCs need reset pulled while RTCK is low. 0 to activate JTAG, power-on reset is not enough
+jtag_reset 1 1
+jtag_reset 0 0
+
+#jtag scan chain
+#format L IRC IRCM IDCODE (Length, IR Capture, IR Capture Mask, IDCODE)
+jtag newtap lpc2148 one -irlen 4 -ircapture 0x1 -irmask 0xf -expected-id 0x4f1f0f0f
+
+#target configuration
+#daemon_startup reset
+
+set _TARGETNAME [format "%s.cpu" lpc2148]
+target create lpc2148.cpu arm7tdmi -endian little -work-area-size 0x4000 -work-area-phys 0x40000000 -work-area-virt 0 -work-area-backup 0
+
+$_TARGETNAME configure -event reset-init { 
+soft_reset_halt 
+mvb 0xE01FC040 0x01 
+}
+
+
+
+flash bank lpc2000 0x0 0x7d000 0 0 0 lpc2000_v2 14765
+
-- 
cgit v1.2.3