blob: 65bb9cf761d75c7b7c11ec547be018843ea53648 (
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`
tools=`cd $mydir && pwd`
master=`cd $mydir/../../Master && pwd`
# 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.
# Therefore, the debugging procedure is:
# change code,
# run update-tpm TLCore (or whatever; this does the --clean update),
# run tpm-check cov (or whatever).
# Painful.
|