blob: c1b9d5dbb4fb89c825d7360a8faa7cce2814f79f (
plain)
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
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
|
#!/usr/bin/env bash
temps="./check_const_list.sh"
if [ "$1" == "clean" ] ; then
echo Removing $temps
rm -f $temps
exit
fi
if [ "$1" == "verbose" ] ; then
verbose=1
shift
else
verbose=0
fi
os=`uname -s`
if [ "$os" == "NetBSD" ] ; then
needgsed=1
else
needgsed=0
fi
SED=sed
if [ $needgsed -eq 1 ] ; then
SED=
SED=`which gsed`
if [ "$SED" == "" ] ; then
echo "GNU sed not found, this script might not work optimally"
SED=sed
fi
fi
for file in $@ ; do
echo "Looking for constants in \"$file\""
$SED -n -e "s:.*[[:space:]]\([a-zA-Z_][a-zA-Z_0-9]*\)[[:space:]]*=[[:space:]]*\([&%$]*\)\([-+]*[0-9][xX]*[-0-9+[:space:]]*\)[[:space:]]*;.*:test_const \1 \"\3\" \"\2\" :p" $file > check_const_list.sh
test_const ()
{
name=$1
value="$2"
prefix="$3"
if [[ "x$prefix" = "x\$" ]] ; then
if [ $verbose -eq 1 ]; then
echo "Hexadecimal value"
fi
value=0x$value
fi
if [[ "x$prefix" = "x&" ]] ; then
if [ $verbose -eq 1 ]; then
echo "Octal value"
fi
if ! [ "${value:0:1}" == "0" ] ; then
value=0$value
fi
fi
if [[ "x$prefix" = "x%" ]] ; then
if [ $verbose -eq 1 ]; then
echo "Binary value"
fi
value=0b$value
fi
if [ $verbose -eq 1 ]; then
echo "Looking for $name, should be $value"
fi
ok=0
matchvalue=
source=
namelist=`grep -i -n -r "#[[:space:]]*define[[:space:]]*$name[[:space:]]" /usr/include`
# Remove comments
namelist=${namelist//\/\**/}
# Remove trailing spaces
namelist=${namelist%%[[:space:]]}
if [ -n "$namelist" ]; then
source=${namelist//#define*/}
if [ $verbose -eq 1 ] ; then
echo "Exact match found: \"$namelist\""
fi
matchvalue=`echo ${namelist} |$SED "s|.*#[[:space:]]*define[[:space:]]*$name[[:space:]]*||I" `
if [ $verbose -eq 1 ] ; then
echo "matchvalue=\"$matchvalue\""
fi
matchvalue="${matchvalue#"${matchvalue%%[![:space:]]*}"}"
else
if [ $verbose -eq 1 ] ; then
echo "$name not found"
fi
namelist2=`grep -i $name -r -n /usr/include`
if [ -n "$namelist2" ]; then
echo "Match found: \"$namelist2\""
source=${namelist2//:*/}
matchvalue=${namelist//#define*$name2/}
fi
fi
if [ "$matchvalue" == "$value" ] ; then
echo "OK: Constant \"$name\" value OK: \"$value\" location \"$source\""
else
if [ "$source" != "" ] ; then
echo "Warning: Constant \"$name\" has value \"$value\" inside \"$file\" but \"$matchvalue\" location \"$source\""
else
echo "Warning: Constant \"$name\" has value \"$value\" inside \"$file\" but \"$matchvalue\" in system headers"
fi
fi
}
set -f
. ./check_const_list.sh
done
|
