summaryrefslogtreecommitdiffstats
path: root/tests/libptxdisttest.kermit
diff options
context:
space:
mode:
authorWolfram Sang <w.sang@pengutronix.de>2008-11-14 14:37:52 +0000
committerWolfram Sang <w.sang@pengutronix.de>2008-11-14 14:37:52 +0000
commit30ef1620c1b1924f17a5d7b8e32a42a70fd81464 (patch)
tree35578ac9f7dab8488af53def0904297787a503aa /tests/libptxdisttest.kermit
parent79444d3f75a2aae28d01d250819c9568f3792b41 (diff)
downloadptxdist-30ef1620c1b1924f17a5d7b8e32a42a70fd81464.tar.gz
ptxdist-30ef1620c1b1924f17a5d7b8e32a42a70fd81464.tar.xz
* tests: show console output if invoked with --debug
* tests: add colors to output git-svn-id: https://svn.pengutronix.de/svn/ptxdist/trunks/ptxdist-trunk@9116 33e552b5-05e3-0310-8538-816dae2090ed
Diffstat (limited to 'tests/libptxdisttest.kermit')
-rw-r--r--tests/libptxdisttest.kermit30
1 files changed, 20 insertions, 10 deletions
diff --git a/tests/libptxdisttest.kermit b/tests/libptxdisttest.kermit
index f432ca424..15ec22349 100644
--- a/tests/libptxdisttest.kermit
+++ b/tests/libptxdisttest.kermit
@@ -1,18 +1,28 @@
#!/usr/bin/kermit
+# FIXME: Sync with libptxdisttest.sh
+.red := "\27[31m"
+.green := "\27[32m"
+.blue := "\27[34m"
+.nocolor := "\27[30m"
+
define ptx_check_fail {
if failure {
- writeln ERROR "FAILED! (\%1)"
+ writeln ERROR "\m(red)FAILED! (\%1)\m(nocolor)"
exit 1
}
}
+define ptx_print {
+ writeln ERROR "\m(blue)\%1\m(nocolor)"
+}
+
define ptx_init {
# get boardsetup variables
take \%1
- writeln ERROR "Communicating via \m(PTXCONF_BOARDSETUP_SERIALPORT) at \m(PTXCONF_BOARDSETUP_SERIALBAUDRATE) bps."
- writeln ERROR
+ ptx_print "Communicating via \m(PTXCONF_BOARDSETUP_SERIALPORT) at \m(PTXCONF_BOARDSETUP_SERIALBAUDRATE) bps."
+ ptx_print
# ':' distinguishes between serial line and telnet port
if not match \m(PTXCONF_BOARDSETUP_SERIALPORT) *:* {
@@ -34,27 +44,27 @@ define ptx_init {
set input case observe
set input buffer-length 16384
- writeln ERROR "==============================="
- writeln ERROR "Please power on your board now!"
- writeln ERROR "==============================="
- writeln ERROR
+ ptx_print "==============================="
+ ptx_print "Please power on your board now!"
+ ptx_print "==============================="
+ ptx_print
}
define ptx_exit {
- writeln ERROR "All OK!"
+ writeln ERROR "\m(green)All OK!\m(nocolor)"
exit 0
}
define ptx_test_start {
# do padding with '.'
- write ERROR "\frpad(\%1,40,.)"
+ write ERROR "\m(blue)\frpad(\%1,40,.)\m(nocolor)"
}
define ptx_test_end {
- writeln ERROR "OK"
+ writeln ERROR "\m(green)OK\m(nocolor)"
}
define ptx_wait_string {