mkpkghier revision 97900 
1#! /bin/sh
2#
3# $FreeBSD: head/release/scripts/mkpkghier 97900 2002-06-06 00:18:49Z brian $
4
5usage()
6{
7	echo "$*" >&2
8	echo "This script must be run from the top level package directory" >&2
9	exit 1
10}
11
12[ $# -ge 1 ] && usage "usage: mkpkghier"
13[ -f INDEX ] || usage "INDEX file not found"
14[ -d All ] || usage "All directory not found"
15
16old=$(ls | egrep -v "^INDEX$|^All$|^Latest$")
17
18[ -n "$old" ] && { echo Removing old hierarchy; rm -fr $old; }
19
20echo Creating new hierarchy
21awk -F'|' '{ print $1 " " $7; }' INDEX | while read pkg dirs
22do
23	[ -f All/$pkg.tgz ] || {
24		echo "All/$pkg.tgz: Non-existent" >&2
25		continue
26	}
27	for dir in $dirs
28	do
29		mkdir -p $dir
30		[ -e $dir/$pkg.tgz ] && continue
31		ln -s ../All/$pkg.tgz $dir/$pkg.tgz
32	done
33done
34