| #!/bin/sh |
| # |
| # Basic testing of ScriptToken parser. |
| # |
| # script-token-test.sh | diff - script-token-test-results.txt |
| # |
| ./script-token-test script-token-test-data.txt |
| echo "" |
| |
| echo -n "\"Next token bad quotes\" \"unfinished quotes ->" |\ |
| ./script-token-test |
| echo "" |
| |
| perl -e 'print "\"Binary input follows\"\n", "abc\006xyz\n"' |\ |
| ./script-token-test |
| echo "" |
| |
| ( echo '"Very BIG Token Tests"' |
| dd if=/dev/zero bs=80 count=1 2>/dev/null | tr '\0' 'a'; echo "" |
| dd if=/dev/zero bs=500 count=1 2>/dev/null | tr '\0' 'b'; echo "" |
| dd if=/dev/zero bs=4000 count=1 2>/dev/null | tr '\0' 'c'; echo "" |
| dd if=/dev/zero bs=5000 count=1 2>/dev/null | tr '\0' 'd'; echo "" |
| dd if=/dev/zero bs=10k count=1 2>/dev/null | tr '\0' 'e'; echo "" |
| dd if=/dev/zero bs=13k count=1 2>/dev/null | tr '\0' 'f'; echo "" |
| dd if=/dev/zero bs=8k count=1024 2>/dev/null | tr '\0' 'e'; echo "" |
| echo '"and all is well!"' |
| ) | ./script-token-test |
| echo "" |
| |