tr-tests

实战Linux编程的原代码,希望对学驱动的人能有所帮助

    1) $echo "Test a(|) failed: files a.O and $srcdir/a.X differ" 1>&2
       (diff -c a.O $srcdir/a.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test a(|) may have failed." 1>&2
       $echo The command "cmp a.O $srcdir/a.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s a.E || rm -f a.E
$xx -s '[a-z]' < $srcdir/a.I > a.O 2> a.E
code=$?
if test $code != 0; then
  $echo "Test a(<) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp a.O $srcdir/a.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed a(<)"; fi;;
    1) $echo "Test a(<) failed: files a.O and $srcdir/a.X differ" 1>&2
       (diff -c a.O $srcdir/a.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test a(<) may have failed." 1>&2
       $echo The command "cmp a.O $srcdir/a.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s a.E || rm -f a.E
cat $srcdir/b.I | $xx -s '[a-c]' > b.O 2> b.E
code=$?
if test $code != 0; then
  $echo "Test b(|) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp b.O $srcdir/b.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed b(|)"; fi;;
    1) $echo "Test b(|) failed: files b.O and $srcdir/b.X differ" 1>&2
       (diff -c b.O $srcdir/b.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test b(|) may have failed." 1>&2
       $echo The command "cmp b.O $srcdir/b.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s b.E || rm -f b.E
$xx -s '[a-c]' < $srcdir/b.I > b.O 2> b.E
code=$?
if test $code != 0; then
  $echo "Test b(<) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp b.O $srcdir/b.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed b(<)"; fi;;
    1) $echo "Test b(<) failed: files b.O and $srcdir/b.X differ" 1>&2
       (diff -c b.O $srcdir/b.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test b(<) may have failed." 1>&2
       $echo The command "cmp b.O $srcdir/b.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s b.E || rm -f b.E
cat $srcdir/c.I | $xx -s '[a-b]' > c.O 2> c.E
code=$?
if test $code != 0; then
  $echo "Test c(|) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp c.O $srcdir/c.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed c(|)"; fi;;
    1) $echo "Test c(|) failed: files c.O and $srcdir/c.X differ" 1>&2
       (diff -c c.O $srcdir/c.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test c(|) may have failed." 1>&2
       $echo The command "cmp c.O $srcdir/c.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s c.E || rm -f c.E
$xx -s '[a-b]' < $srcdir/c.I > c.O 2> c.E
code=$?
if test $code != 0; then
  $echo "Test c(<) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp c.O $srcdir/c.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed c(<)"; fi;;
    1) $echo "Test c(<) failed: files c.O and $srcdir/c.X differ" 1>&2
       (diff -c c.O $srcdir/c.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test c(<) may have failed." 1>&2
       $echo The command "cmp c.O $srcdir/c.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s c.E || rm -f c.E
cat $srcdir/d.I | $xx -s '[b-c]' > d.O 2> d.E
code=$?
if test $code != 0; then
  $echo "Test d(|) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp d.O $srcdir/d.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed d(|)"; fi;;
    1) $echo "Test d(|) failed: files d.O and $srcdir/d.X differ" 1>&2
       (diff -c d.O $srcdir/d.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test d(|) may have failed." 1>&2
       $echo The command "cmp d.O $srcdir/d.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s d.E || rm -f d.E
$xx -s '[b-c]' < $srcdir/d.I > d.O 2> d.E
code=$?
if test $code != 0; then
  $echo "Test d(<) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp d.O $srcdir/d.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed d(<)"; fi;;
    1) $echo "Test d(<) failed: files d.O and $srcdir/d.X differ" 1>&2
       (diff -c d.O $srcdir/d.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test d(<) may have failed." 1>&2
       $echo The command "cmp d.O $srcdir/d.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s d.E || rm -f d.E
cat $srcdir/e.I | $xx -s '[\0-\5]' > e.O 2> e.E
code=$?
if test $code != 0; then
  $echo "Test e(|) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp e.O $srcdir/e.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed e(|)"; fi;;
    1) $echo "Test e(|) failed: files e.O and $srcdir/e.X differ" 1>&2
       (diff -c e.O $srcdir/e.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test e(|) may have failed." 1>&2
       $echo The command "cmp e.O $srcdir/e.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s e.E || rm -f e.E
$xx -s '[\0-\5]' < $srcdir/e.I > e.O 2> e.E
code=$?
if test $code != 0; then
  $echo "Test e(<) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp e.O $srcdir/e.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed e(<)"; fi;;
    1) $echo "Test e(<) failed: files e.O and $srcdir/e.X differ" 1>&2
       (diff -c e.O $srcdir/e.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test e(<) may have failed." 1>&2
       $echo The command "cmp e.O $srcdir/e.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s e.E || rm -f e.E
cat $srcdir/f.I | $xx -d '[=[=]' > f.O 2> f.E
code=$?
if test $code != 0; then
  $echo "Test f(|) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp f.O $srcdir/f.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed f(|)"; fi;;
    1) $echo "Test f(|) failed: files f.O and $srcdir/f.X differ" 1>&2
       (diff -c f.O $srcdir/f.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test f(|) may have failed." 1>&2
       $echo The command "cmp f.O $srcdir/f.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s f.E || rm -f f.E
$xx -d '[=[=]' < $srcdir/f.I > f.O 2> f.E
code=$?
if test $code != 0; then
  $echo "Test f(<) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp f.O $srcdir/f.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed f(<)"; fi;;
    1) $echo "Test f(<) failed: files f.O and $srcdir/f.X differ" 1>&2
       (diff -c f.O $srcdir/f.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test f(<) may have failed." 1>&2
       $echo The command "cmp f.O $srcdir/f.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s f.E || rm -f f.E
cat $srcdir/g.I | $xx -d '[=]=]' > g.O 2> g.E
code=$?
if test $code != 0; then
  $echo "Test g(|) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp g.O $srcdir/g.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed g(|)"; fi;;
    1) $echo "Test g(|) failed: files g.O and $srcdir/g.X differ" 1>&2
       (diff -c g.O $srcdir/g.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test g(|) may have failed." 1>&2
       $echo The command "cmp g.O $srcdir/g.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s g.E || rm -f g.E
$xx -d '[=]=]' < $srcdir/g.I > g.O 2> g.E
code=$?
if test $code != 0; then
  $echo "Test g(<) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp g.O $srcdir/g.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed g(<)"; fi;;
    1) $echo "Test g(<) failed: files g.O and $srcdir/g.X differ" 1>&2
       (diff -c g.O $srcdir/g.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test g(<) may have failed." 1>&2
       $echo The command "cmp g.O $srcdir/g.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s g.E || rm -f g.E
cat $srcdir/h.I | $xx -d '[:xdigit:]' > h.O 2> h.E
code=$?
if test $code != 0; then
  $echo "Test h(|) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp h.O $srcdir/h.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed h(|)"; fi;;
    1) $echo "Test h(|) failed: files h.O and $srcdir/h.X differ" 1>&2
       (diff -c h.O $srcdir/h.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test h(|) may have failed." 1>&2
       $echo The command "cmp h.O $srcdir/h.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s h.E || rm -f h.E
$xx -d '[:xdigit:]' < $srcdir/h.I > h.O 2> h.E
code=$?
if test $code != 0; then
  $echo "Test h(<) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp h.O $srcdir/h.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed h(<)"; fi;;
    1) $echo "Test h(<) failed: files h.O and $srcdir/h.X differ" 1>&2
       (diff -c h.O $srcdir/h.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test h(<) may have failed." 1>&2
       $echo The command "cmp h.O $srcdir/h.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s h.E || rm -f h.E
cat $srcdir/i.I | $xx -d '[:xdigit:]' > i.O 2> i.E
code=$?
if test $code != 0; then
  $echo "Test i(|) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp i.O $srcdir/i.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed i(|)"; fi;;
    1) $echo "Test i(|) failed: files i.O and $srcdir/i.X differ" 1>&2
       (diff -c i.O $srcdir/i.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test i(|) may have failed." 1>&2
       $echo The command "cmp i.O $srcdir/i.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s i.E || rm -f i.E
$xx -d '[:xdigit:]' < $srcdir/i.I > i.O 2> i.E
code=$?
if test $code != 0; then
  $echo "Test i(<) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp i.O $srcdir/i.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed i(<)"; fi;;
    1) $echo "Test i(<) failed: files i.O and $srcdir/i.X differ" 1>&2
       (diff -c i.O $srcdir/i.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test i(<) may have failed." 1>&2
       $echo The command "cmp i.O $srcdir/i.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s i.E || rm -f i.E
cat $srcdir/j.I | $xx -d '[:digit:]' > j.O 2> j.E
code=$?
if test $code != 0; then
  $echo "Test j(|) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp j.O $srcdir/j.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed j(|)"; fi;;
    1) $echo "Test j(|) failed: files j.O and $srcdir/j.X differ" 1>&2
       (diff -c j.O $srcdir/j.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test j(|) may have failed." 1>&2
       $echo The command "cmp j.O $srcdir/j.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s j.E || rm -f j.E
$xx -d '[:digit:]' < $srcdir/j.I > j.O 2> j.E
code=$?
if test $code != 0; then
  $echo "Test j(<) failed: ../../src/tr return code $code differs from expected value 0" 1>&2
  errors=`expr $errors + 1`
else
  cmp j.O $srcdir/j.X > /dev/null 2>&1
  case $? in
    0) if test "$VERBOSE"; then $echo "passed j(<)"; fi;;
    1) $echo "Test j(<) failed: files j.O and $srcdir/j.X differ" 1>&2
       (diff -c j.O $srcdir/j.X) 2> /dev/null
       errors=`expr $errors + 1`;;
    2) $echo "Test j(<) may have failed." 1>&2
       $echo The command "cmp j.O $srcdir/j.X" failed. 1>&2
       errors=`expr $errors + 1`;;
  esac
fi
test -s j.E || rm -f j.E
cat $srcdir/k.I | $xx -d '[:digit:]' > k.O 2> k.E
code=$?