summaryrefslogtreecommitdiffstats
path: root/tests/setenv.u-boot-v1.kermit
diff options
context:
space:
mode:
Diffstat (limited to 'tests/setenv.u-boot-v1.kermit')
-rw-r--r--tests/setenv.u-boot-v1.kermit48
1 files changed, 0 insertions, 48 deletions
diff --git a/tests/setenv.u-boot-v1.kermit b/tests/setenv.u-boot-v1.kermit
deleted file mode 100644
index c13435bf4..000000000
--- a/tests/setenv.u-boot-v1.kermit
+++ /dev/null
@@ -1,48 +0,0 @@
-
-clear input
-lineout "printenv"
-
-declare \&c[1000]
-# array with entries to skip
-declare \&s = ethaddr stdin stdout stderr baudrate
-.\%i = 0
-
-while true {
- # wait for newline or u-boot-prompt
- minput 5 {\10} \m(PTXCONF_BOARDSETUP_UBOOTPROMPT)
- if fail {
- writeln ERROR "FAILED! Did not get old environment"
- exit 1
- }
- # quit on u-boot-prompt
- if = \v(minput) 2 break
- # if no '=' then continue
- if not match \v(input) *=* goto out
- # extract part before '=' (from \v(input) the first word, allow '_')
- assign envvar \fword(\v(input),1,,_)
- # skip special keywords
- if not = \farraylook(\m(envvar),&s) -1 goto out
- # put setenv-command into array
- assign \&c[\%i] setenv \m(envvar)
- incr \%i
-:out
- clear input
-}
-
-# clear old vars
-for \%j 0 \%i-1 1 {
- ptx_uboot_exec 5 "\&c[\%j]"
-}
-
-# set new ones from file
-while true {
- read \%l
- if fail break
- ptx_uboot_exec 5 "\%l"
-}
-
-close read
-
-ptx_uboot_exec 5 "printenv"
-ptx_uboot_exec 10 "saveenv"
-ptx_test_end