diff options
Diffstat (limited to 'tests/setenv.u-boot-v1.kermit')
-rw-r--r-- | tests/setenv.u-boot-v1.kermit | 48 |
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 |