48b2f033da
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
157 lines
4.3 KiB
Bash
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
|
|
}
|