blob: f008cc26cf7ff7bf0a6a2298b218a055b43e2715 (
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
|
#!/bin/sh
# $Id$
# Public domain. Originally written 2004, Karl Berry.
# Do TPM sanity checks.
mydir=`dirname $0`
master=`cd $mydir/.. && pwd`
tools=$master/Tools
# if get an XML syntax error, set to --debug to see which .tpm it comes from.
verbose=${OVERRIDE_VERBOSE-}
if test "x$1" = x--type; then
shift
type=$1
shift
else
type=all
fi
test $# -eq 0 && set - dep cov
for check in "$@"; do # around 1300 dup's, so don't bother with that one
printf "\f\n"
echo "$0: checking $check..."
perl $tools/tpm-factory.pl $verbose \
--master_dir=$master --ftp_dir=/tmp/ \
--check=$check --arch=all --type=$type
done
# Without --clean, buildPatternsPackage (for example) doesn't get called.
# With --clean, all tpm's need to be rw.
# Therefore, the procedure is: change code,
# run update-tpm TLCore (or whatever),
# run tpm-check cov (or whatever).
# Painful.
|
