summaryrefslogtreecommitdiff
path: root/Build/tools/tpm-check
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.