.cfg files are now executed as Jim Tcl. Commands that terminate script w/error message.

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

1 files changed, 22 insertions, 3 deletions

diff --git a/src/target/target/at91eb40a.cfg b/src/target/target/at91eb40a.cfg
index 4fee88d8..2ca15d91 100644
--- a/src/target/target/at91eb40a.cfg
+++ b/src/target/target/at91eb40a.cfg
@@ -20,9 +20,6 @@ target arm7tdmi little 0 arm7tdmi-s_r4
 arm7 fast_memory_access enable
 arm7_9 dcc_downloads enable
 
-# OpenOCD does not have a flash driver for for AT91FR40162S 
-target_script 0 reset event/at91eb40a_reset.script
-
 #flash driver
 flash bank ecosflash 0x01000000 0x200000 2 2 0 ecos/at91eb40a.elf
 
@@ -34,3 +31,25 @@ working_area 0 0x00000000 0x20000 nobackup
 #often than not. The user can disable this in his
 #subsequent config script.
 arm7_9 force_hw_bkpts enable
+
+set reset_count 0
+
+proc target_reset_0 {} {
+	global reset_count
+	# Reset script for AT91EB40a
+	reg cpsr 0x000000D3
+	mww 0xFFE00020 0x1
+	mww 0xFFE00024 0x00000000  
+	mww 0xFFE00000 0x01002539 
+	mww 0xFFFFF124 0xFFFFFFFF  
+	mww 0xffff0010 0x100
+	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 !"
+}