pjs/webtools/tinderbox/copydata

99 строки
1.8 KiB
Bash
Executable File

#! /bin/sh
#
# Bad hack to hack on tinderbox. Needs to be re-written in perl.
# Started by slamm@netscape.com, hacked a little by mcafee@netscape.com.
#
# usage: ./copydata <treeName>
#
tinderbox_link="http://cvs-mirror.mozilla.org/webtools/tinderbox"
bonsai_link="http://cvs-mirror.mozilla.org/webtools/bonsai"
if [ $# -lt 1 ]
then
# Set $tree variable here..
set -- SeaMonkey
fi
tinderbox_dir=`pwd`
tree="SeaMonkey"
# Create new directories if they don't exist.
echo "Tree = " $tree
# tinderbox/$tree
if [ ! -d "$tree" ]
then
echo "mkdir" $tree
mkdir $tree
fi
# tinderbox/$tree/data
if [ ! -d "$tree/data" ]
then
echo "mkdir" $tree/data
mkdir $tree/data
fi
# tinderbox/data
if [ ! -d "data" ]
then
echo "mkdir data"
mkdir data
fi
# ../bonsai/data/$tree
if [ ! -d "../bonsai" ]
then
echo "Need to pull ../bonsai from cvs."
exit 1
fi
# ../bonsai/data
if [ ! -d "../bonsai/data" ]
then
echo "mkdir -p ../bonsai/data"
mkdir -p "../bonsai/data"
fi
# ../bonsai/data/$tree
if [ ! -d "../bonsai/data/$tree" ]
then
echo "mkdir -p ../bonsai/data/"$tree
mkdir -p ../bonsai/data/$tree
fi
# Copy tree data
for tree
do
# Remove trailing slash
tree=`expr $tree : "\([^/]*\)"`
cd $tinderbox_dir/$tree
for file in build.dat mod.pl notes.txt treedata.pl who.dat ignorebuilds.pl bloat.dat warn.pl
do
rm -f $file
wget $tinderbox_link/$tree/$file
done
# Copy bonsai checkin batch data
cd $tinderbox_dir/../bonsai/data/$tree
if [ -f batchid.pl ]
then
rm -f batchid.pl batch-*.pl
fi
wget $bonsai_link/data/$tree/batchid.pl
id=`cat batchid.pl | perl -pe 's/^.*?(\d+).*/$1/'` # stupid hack
wget $bonsai_link/data/$tree/batch-$id.pl
done
cd $tinderbox_dir/data
rm -f imagelog.txt
wget $tinderbox_link/data/imagelog.txt
cd $tinderbox_dir
copylogs