#! /bin/csh -ef

set prog = `/usr/bin/basename $0`

set usage = "Usage: $prog [-f] root-dir info-file [tiff-file] [-d dest-dir] [-r resource-dir] [-traditional | -gnutar]"

set noglob

if (-x /usr/bin/mkbom) then

set mkbom=/usr/bin/mkbom

set lsbom=/usr/bin/lsbom

else

set mkbom=/usr/etc/mkbom

set lsbom=/usr/etc/lsbom

endif

if (-x /usr/bin/awk) then

set awk=/usr/bin/awk

else

set awk=/bin/awk

endif

set gnutar=/usr/bin/gnutar

set tar=/usr/bin/tar

set pax=/bin/pax

# gather parameters

if ($#argv == 0) then

echo $usage

exit(1)

endif

while ( $#argv > 0 )

switch ( $argv[1] )

case -d:

if ( $?destDir ) then

echo ${prog}: dest-dir parameter already set to ${destDir}.

echo $usage

exit(1)

else if ( $#argv < 2 ) then

echo ${prog}: -d option requires destination directory.

echo $usage

exit(1)

else

set destDir = $argv[2]

shift; shift

breaksw

endif

case -f:

if ( $?rootDir ) then

echo ${prog}: root-dir parameter already set to ${rootDir}.

echo $usage

exit(1)

else if ( $#argv < 2 ) then

echo ${prog}: -f option requires package root directory.

echo $usage

exit(1)

else

set rootDir = $argv[2]

set fflag

shift; shift

breaksw

endif

case -r:

if ( $?resDir ) then

echo ${prog}: resource-dir parameter already set to ${resDir}.

echo $usage

exit(1)

else if ( $#argv < 2 ) then

echo ${prog}: -r option requires package resource directory.

echo $usage

exit(1)

else

set resDir = $argv[2]

shift; shift

breaksw

endif

case -traditional:

set usetar

unset usegnutar

unset usepax

breaksw

case -gnutar:

set usegnutar

unset usepax

unset usetar

case -B:

# We got long file names, better use bigtar instead

#set archiver = /NextAdmin/Installer.app/Resources/installer_bigtar

echo 2>&1 ${prog}: -B flag is no longer relevant.

shift

breaksw

case -*:

echo ${prog}: Unknown option: $argv[1]

echo $usage

exit(1)

case *.info:

if ( $?info ) then

echo ${prog}: info-file parameter already set to ${info}.

echo $usage

exit(1)

else

set info = "$argv[1]"

shift

breaksw

endif

case *.tiff:

if ( $?tiff ) then

echo ${prog}: tiff-file parameter already set to ${tiff}.

echo $usage

exit(1)

else

set tiff = "$argv[1]"

shift

breaksw

endif

default:

if ( $?rootDir ) then

echo ${prog}: unrecognized parameter: $argv[1]

echo $usage

exit(1)

else

set rootDir = "$argv[1]"

shift

breaksw

endif

endsw

end

# check for mandatory parameters

if ( ! $?rootDir ) then

echo ${prog}: missing root-dir parameter.

echo $usage

exit(1)

else if ( ! $?info) then

echo ${prog}: missing info-file parameter.

echo $usage

exit(1)

endif

# destDir gets default value if unset on command line

if ( $?destDir ) then

/bin/mkdir -p $destDir

else

set destDir = .

endif

# derive the root name for the package from the root name of the info file

set root = `/usr/bin/basename $info .info`

# create package directory

set pkg = ${destDir}/${root}.pkg

echo Generating Installer package $pkg ...

if ( -e $pkg ) /bin/rm -rf $pkg

/bin/mkdir -p -m 755 $pkg

# (gnu)tar/pax and compress root directory to package archive

echo -n " creating package archive ... "

if ( $?fflag ) then

set pkgTop = ${rootDir:t}

set parent = ${rootDir:h}

if ( "$parent" == "$pkgTop" ) set parent = "."

else

set parent = $rootDir

set pkgTop = .

endif

if ( $?usetar ) then

set pkgArchive = $pkg/$root.tar.Z

(cd $parent; $tar -w $pkgTop) | /usr/bin/compress -f -c > $pkgArchive

else if ( $?usegnutar ) then

set pkgArchive = $pkg/$root.tar.gz

(cd $parent; $gnutar zcf $pkgArchive $pkgTop)

else

set pkgArchive = $pkg/$root.pax.gz

(cd $parent; $pax -w -z -x cpio $pkgTop) > $pkgArchive

endif

/bin/chmod 444 $pkgArchive

echo done.

# copy info file to package

set pkgInfo = $pkg/$root.info

echo -n " copying ${info:t} ... "

/bin/cp $info $pkgInfo

/bin/chmod 444 $pkgInfo

echo done.

# copy tiff file to package

if ( $?tiff ) then

set pkgTiff = $pkg/$root.tiff

echo -n " copying ${tiff:t} ... "

/bin/cp $tiff $pkgTiff

/bin/chmod 444 $pkgTiff

echo done.

endif

# copy resources to package

if ( $?resDir ) then

echo -n " copying ${resDir:t} ... "

# don't want to see push/pop output

pushd $resDir > /dev/null

# get lists of resources. We'll want to change

# permissions on just these things later.

set directoriesInResDir = `find . -type d`

set filesInResDir = `find . -type f`

popd > /dev/null

# copy the resource directory contents into the package directory

foreach resFile (`ls $resDir`)

cp -r $resDir/$resFile $pkg

end

pushd $pkg > /dev/null

# Change all directories to +r+x, except the package

# directory itself

foreach resFileItem ($directoriesInResDir)

if ( $resFileItem != "." ) then

chmod 555 $resFileItem

endif

end

# change all flat files to read only

foreach resFileItem ($filesInResDir)

chmod 444 $resFileItem

end

popd > /dev/null

echo done.

endif

# generate bom file

set pkgBom = $pkg/$root.bom

echo -n " generating bom file ... "

/bin/rm -f $pkgBom

if ( $?fflag ) then

$mkbom $parent $pkgBom >& /dev/null

else

$mkbom $rootDir $pkgBom >& /dev/null

endif

/bin/chmod 444 $pkgArchive

echo done.

# generate sizes file

set pkgSizes = $pkg/$root.sizes

echo -n " generating sizes file ... "

# compute number of files in package

set numFiles = `$lsbom -s $pkgBom | /usr/bin/wc -l`

# compute package size when compressed

@ compressedSize = `/usr/bin/du -k -s $pkg | $awk '{print $1}'`

@ compressedSize += 3 # add 1KB each for sizes, location, status files

@ infoSize = `/bin/ls -s $pkgInfo | $awk '{print $1}'`

@ bomSize = `/bin/ls -s $pkgBom | $awk '{print $1}'`

if ( $?tiff ) then

@ tiffSize = `/bin/ls -s $pkgTiff | $awk '{print $1}'`

else

@ tiffSize = 0

endif

@ installedSize = `/usr/bin/du -k -s $rootDir | $awk '{print $1}'`

@ installedSize += $infoSize + $bomSize + $tiffSize + 3

# echo size parameters to sizes file

echo NumFiles $numFiles > $pkgSizes

echo InstalledSize $installedSize >> $pkgSizes

echo CompressedSize $compressedSize >> $pkgSizes

echo done.

echo " ... finished generating $pkg."

exit(0)

# end package