File: 451

package info (click to toggle)
pcp 7.1.0-1
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 252,748 kB
  • sloc: ansic: 1,483,656; sh: 182,366; xml: 160,462; cpp: 83,813; python: 24,980; perl: 18,327; yacc: 6,877; lex: 2,864; makefile: 2,738; awk: 165; fortran: 60; java: 52
file content (86 lines) | stat: -rwxr-xr-x 2,172 bytes parent folder | download
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
#!/bin/sh
# PCP QA Test No. 451
# Exercise basic global locking
#
# Copyright (c) 2011 Ken McDonell.  All Rights Reserved.
#

seq=`basename $0`
echo "QA output created by $seq"

# get standard environment, filters and checks
. ./common.product
. ./common.filter
. ./common.check

_get_libpcp_config
$multi_threaded || _notrun "No libpcp threading support"

status=0	# success is the default!
trap "rm -f $tmp.*; exit \$status" 0 1 2 3 15

eval `$PCP_BINADM_DIR/pmconfig -L lock_asserts`
echo "lock_asserts=$lock_asserts" >>$seq_full

rm -f $seq.out
if $lock_asserts
then
    ln $seq.out.2 $seq.out
else
    ln $seq.out.1 $seq.out
fi

_filter()
{
    if $lock_asserts
    then
	sed \
	    -e '/^exerlock: lock.c:[0-9]*: __pmUnlock: Assertion .* failed/d' \
	    -e '/^exerlock.c:[0-9][0-9]*:/s/:[0-9][0-9]*:/:N:/' \
	    -e 's/ __pmUnlock([^)]*)/ unlock/' \
	    -e 's/ __pmLock([^)]*)/ lock/' \
	    -e '/^Aborted (core dumped)/d' \
	    -e '/^Aborted$/d' \
	| $PCP_AWK_PROG '
$1 == "backtrace:"	{ exit }
$3 == "traceback"	{ exit }
			{ print }'
    else
	sed \
	    -e '/^exerlock.c:[0-9][0-9]*:/s/:[0-9][0-9]*:/:N:/' \
	    -e 's/ __pmUnlock([^)]*)/ unlock/' \
	    -e 's/ __pmLock([^)]*)/ lock/' \
	# end
    fi \
    | sed \
	-e 's;Deadlock situation detected/avoided;Resource deadlock avoided;' \
	-e 's/Not owner/Operation not permitted/' \
    # end
}

# real QA test starts here
#
# This test used to assume the big libpcp mutex is recursive ...
# but this is no longer the case (as of Jan 2019), so the nested lock
# tests now fail with "Resource deadlock avoided" (lock-lock) or
# "Operation not permitted" (unlock-unlock) rather than succeeding.
# The test cases with nested unlock or lock operations will return an
# error and the filter is required if libpcp is built with
# BUILD_LOCK_ASSERTS defined.
#
for arg in ilu ilululu illluluuluu ll iluu
do
    echo | tee -a $seq_full
    echo "=== $arg ===" | tee -a $seq_full
    ( sh -c "src/exerlock $arg" 2>&1 ) \
    | tee -a $seq_full \
    | _filter
done

# this calls abort() on the error paths, so we may have core files ...
# this is not cause for failing the test
#
rm -f core

# success, all done
exit