1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
|
#!/bin/sh
# PCP QA Test No. 1346
# Some basic pmcpp sanity checks
# non-valgrind variant, see qa/1348 for the valgrind variant
#
# Copyright (c) 2021 Ken McDonell. All Rights Reserved.
#
if [ $# -eq 0 ]
then
seq=`basename $0`
echo "QA output created by $seq"
else
# use $seq from caller, unless not set
[ -n "$seq" ] || seq=`basename $0`
echo "QA output created by `basename $0` $*"
fi
# get standard environment, filters and checks
. ./common.product
. ./common.filter
. ./common.check
do_valgrind=false
if [ "$1" = "--valgrind" ]
then
_check_valgrind
do_valgrind=true
elif which valgrind >/dev/null 2>&1
then
: note we want to run both variants for this test, as the
: valgrind variant filters away the functional checks and
: only reports memory issues
fi
_cleanup()
{
cd $here
$sudo rm -rf $tmp $tmp.*
}
status=0 # success is the default!
trap "_cleanup; exit \$status" 0 1 2 3 15
# real QA test starts here
cat <<'End-of-File' >$tmp.inc
# comment
#define four 4
End-of-File
cat <<End-of-File >$tmp.in
expect the next non-control line to contain just "3"
#shell "echo one two three | wc -w | sed -e 's/ //g'"
#include "$tmp.inc"
expect the next line to contain just "4"
four
expect the next non-blank line to contain just "5"
#ifdef five
bozo
#else
5
#endif
expect the next non-blank line to contain just "6"
#ifndef five
6
#endif
End-of-File
if $do_valgrind
then
_run_valgrind pmcpp $tmp.in \
| sed -e "s@$tmp@TMP@g"
else
echo "Usage test ..."
pmcpp one two three
echo
echo "Do some work and check [outfile] logic ..."
pmcpp $tmp.in | sed -e "s@$tmp@TMP@g" >$tmp.out
pmcpp $tmp.in $tmp.tmp
if sed -e "s@$tmp@TMP@g" $tmp.tmp | diff $tmp.out -
then
echo "... all good"
cat $tmp.out
else
echo "Arrgh ... see $seq.full"
echo "tmp.out ..." >>$seq_full
cat $tmp.out >>$seq_full
echo "tmp.tmp ..." >>$seq_full
cat $tmp.tmp >>$seq_full
fi
fi
# success, all done
exit
|
