vp-build/utils/sh/binpkg-genindex.sh
Juan RP 48b2f033da A bit of reorganization in C/shell code.
With these changes:
 - Added 'sanitize-plist' action to xbps-pkgdb. It takes a plist
   file as argument and writes another one "sanitized" by proplib.
   Use it to sanitize the pkgindex plist file.
 - Split xbps-pkgdb functions to be shared by other files.
 - Split xbps-digest functions to be shared by other files.
 - Rename the plist file to register/unregister installed pkgs to
   regpkgdb.plist, and related stuff in shell scripts.

--HG--
extra : convert_revision : 37731b04c6b41aebac629dfa06106175b9b5e59c
2008-12-19 04:18:49 +01:00

157 lines
4.3 KiB
Bash

#-
# Copyright (c) 2008 Juan Romero Pardines.
# All rights reserved.
#
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions
# are met:
# 1. Redistributions of source code must retain the above copyright
# notice, this list of conditions and the following disclaimer.
# 2. Redistributions in binary form must reproduce the above copyright
# notice, this list of conditions and the following disclaimer in the
# documentation and/or other materials provided with the distribution.
#
# THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
# IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
# OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
# IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
# INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
# NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
# DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
# THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
# THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
#-
#
# These functions write a package index for a repository, with details about
# all available binary packages.
#
write_repo_pkgindex()
{
local propsf=
local pkgname=
local pkgsum=
local pkgindexf=
local tmppkgdir=
local i=
local found=
[ ! -d $XBPS_PACKAGESDIR ] && exit 1
found="$(echo $XBPS_PACKAGESDIR/*)"
if $(echo $found|grep -vq .xbps); then
msg_error "couldn't find binary packages on $XBPS_PACKAGESDIR."
fi
pkgindexf=$(mktemp -t pkgidx.XXXXXXXXXX) || exit 1
tmppkgdir=$(mktemp -d -t pkgdir.XXXXXXXX) || exit 1
# Write the header.
msg_normal "Creating package index for $XBPS_PACKAGESDIR..."
write_repo_pkgindex_header $pkgindexf
#
# Write pkg dictionaries from all packages currently available at
# XBPS_PACKAGESDIR.
#
for i in $(echo $XBPS_PACKAGESDIR/*.xbps); do
pkgname="$(basename ${i%%-[0-9]*.*.$xbps_machine.xbps})"
propsf="./var/cache/xbps/metadata/$pkgname/props.plist"
cd $tmppkgdir && tar xfjp $i $propsf
if [ $? -ne 0 ]; then
msg_warn "Couldn't extract $i metadata file!"
continue
fi
write_repo_pkgindex_dict $propsf $pkgindexf $(basename $i)
if [ $? -ne 0 ]; then
msg_warn "Couldn't write $i metadata to index file!"
continue
fi
echo "$(basename $i) added."
pkgsum=$(($pkgsum + 1))
done
write_repo_pkgindex_footer $pkgindexf
if [ $? -eq 0 ]; then
$XBPS_REGPKGDB_CMD sanitize-plist $pkgindexf
[ $? -ne 0 ] && rm -f $pkgindexf && rm -rf $tmppkgdir && exit 1
msg_normal "Package index created (total pkgs: $pkgsum)."
cp -f $pkgindexf $XBPS_PACKAGESDIR/pkg-index.plist
fi
rm -f $pkgindexf
rm -rf $tmppkgdir
}
write_repo_pkgindex_header()
{
local file="$1"
[ -z "$file" ] && return 1
cat > $file <<_EOF
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<key>xbps_available_packages</key>
<array>
_EOF
}
write_repo_pkgindex_footer()
{
local file="$1"
[ -z "$file" ] && return 1
cat >> $file <<_EOF
</array>
</dict>
</plist>
_EOF
}
#
# Function that writes the package's metadata dictionary into the
# package index file for a repository. Proper indentation is done
# as well, thanks to the shell scripting magic :-)
#
write_repo_pkgindex_dict()
{
local pkgf="$1"
local indexf="$2"
local binpkgf="$3"
local first_dict=
local tmpdictf=
[ -z "$pkgf" -o -z "$indexf" -o -z "$binpkgf" ] && return 1
tmpdictf=$(mktemp -t pkgdict.XXXXXXXXXX) || exit 1
cat $pkgf | while read line; do
# Find the first dictionary.
if $(echo $line|grep -q "<dict>"); then
first_dict=yes
echo "$line" >> $tmpdictf
# Write the binary pkg filename before.
echo "<key>filename</key>" >> $tmpdictf
echo "<string>$binpkgf</string>" >> $tmpdictf
continue
# Continue until found.
elif [ -z "$first_dict" ]; then
continue
# Is this line the end of dictionary?
elif $(echo $line|grep -q "</dict>"); then
# It is.
echo "$line" >> $tmpdictf
break
else
echo "$line" >> $tmpdictf
fi
done
cat $tmpdictf >> $indexf
rm -f $tmpdictf
}