2007-11-28 16:10:41 +01:00
|
|
|
#!/bin/bash
|
2007-10-22 04:08:55 +02:00
|
|
|
# This program is free software; you can redistribute it and/or modify
|
|
|
|
# it under the terms of the GNU General Public License as published by
|
|
|
|
# the Free Software Foundation; version 2 of the License.
|
|
|
|
#
|
|
|
|
# This program is distributed in the hope that it will be useful,
|
|
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
# GNU General Public License for more details.
|
2007-10-04 06:24:29 +02:00
|
|
|
|
2011-11-01 15:33:08 +01:00
|
|
|
m4_include(lib/common.sh)
|
|
|
|
|
2011-09-17 15:14:08 +02:00
|
|
|
shopt -s nullglob
|
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
makepkg_args='-s --noconfirm -L --holdver'
|
2011-09-17 14:46:10 +02:00
|
|
|
repack=false
|
|
|
|
update_first=false
|
|
|
|
clean_first=false
|
|
|
|
install_pkg=
|
2011-09-17 15:59:57 +02:00
|
|
|
run_namcap=false
|
2013-03-14 03:55:40 +01:00
|
|
|
temp_chroot=false
|
2011-09-17 14:46:10 +02:00
|
|
|
chrootdir=
|
2012-01-02 03:38:20 +01:00
|
|
|
passeddir=
|
2013-03-02 05:21:08 +01:00
|
|
|
declare -a install_pkgs
|
2013-03-02 05:21:12 +01:00
|
|
|
declare -i ret=0
|
2007-10-04 06:24:29 +02:00
|
|
|
|
2013-03-14 03:55:40 +01:00
|
|
|
copy=$USER
|
|
|
|
[[ -n $SUDO_USER ]] && copy=$SUDO_USER
|
|
|
|
[[ -z "$copy" || $copy = root ]] && copy=copy
|
2012-08-11 12:17:56 +02:00
|
|
|
src_owner=${SUDO_USER:-$USER}
|
2011-03-13 19:07:04 +01:00
|
|
|
|
2010-02-13 19:47:16 +01:00
|
|
|
usage() {
|
2012-11-15 15:22:50 +01:00
|
|
|
echo "Usage: ${0##*/} [options] -r <chrootdir> [--] [makepkg args]"
|
2010-02-13 19:47:16 +01:00
|
|
|
echo ' Run this script in a PKGBUILD dir to build a package inside a'
|
|
|
|
echo ' clean chroot. All unrecognized arguments passed to this script'
|
|
|
|
echo ' will be passed to makepkg.'
|
|
|
|
echo ''
|
|
|
|
echo ' The chroot dir consists of the following directories:'
|
|
|
|
echo ' <chrootdir>/{root, copy} but only "root" is required'
|
|
|
|
echo ' by default. The working copy will be created as needed'
|
|
|
|
echo ''
|
|
|
|
echo 'The chroot "root" directory must be created via the following'
|
|
|
|
echo 'command:'
|
2013-03-14 03:55:39 +01:00
|
|
|
echo ' mkarchroot <chrootdir>/root base-devel'
|
2010-02-13 19:47:16 +01:00
|
|
|
echo ''
|
2011-09-17 14:46:10 +02:00
|
|
|
echo "Default makepkg args: $makepkg_args"
|
2010-02-13 19:47:16 +01:00
|
|
|
echo ''
|
|
|
|
echo 'Flags:'
|
|
|
|
echo '-h This help'
|
|
|
|
echo '-c Clean the chroot before building'
|
|
|
|
echo '-u Update the working copy of the chroot before building'
|
|
|
|
echo ' This is useful for rebuilds without dirtying the pristine'
|
|
|
|
echo ' chroot'
|
|
|
|
echo '-r <dir> The chroot dir to use'
|
|
|
|
echo '-I <pkg> Install a package into the working copy of the chroot'
|
|
|
|
echo '-l <copy> The directory to use as the working copy of the chroot'
|
2013-03-14 03:55:40 +01:00
|
|
|
echo ' Useful for maintaining multiple copies'
|
|
|
|
echo " Default: $copy"
|
2011-12-30 16:26:08 +01:00
|
|
|
echo '-n Run namcap on the package'
|
2013-03-14 03:55:40 +01:00
|
|
|
echo '-T Build in a temporary directory'
|
2010-02-13 19:47:16 +01:00
|
|
|
exit 1
|
2007-10-04 06:24:29 +02:00
|
|
|
}
|
|
|
|
|
2013-05-02 07:22:58 +02:00
|
|
|
while getopts 'hcur:I:l:nT' arg; do
|
2011-09-17 14:46:10 +02:00
|
|
|
case "$arg" in
|
2010-02-13 19:47:16 +01:00
|
|
|
h) usage ;;
|
2011-09-17 14:46:10 +02:00
|
|
|
c) clean_first=true ;;
|
|
|
|
u) update_first=true ;;
|
2012-01-02 03:38:20 +01:00
|
|
|
r) passeddir="$OPTARG" ;;
|
2013-03-02 05:21:08 +01:00
|
|
|
I) install_pkgs+=("$OPTARG") ;;
|
2011-03-13 19:07:04 +01:00
|
|
|
l) copy="$OPTARG" ;;
|
2012-03-05 16:28:09 +01:00
|
|
|
n) run_namcap=true; makepkg_args="$makepkg_args -i" ;;
|
2013-05-02 08:29:21 +02:00
|
|
|
T) temp_chroot=true; copy+="-$$" ;;
|
2011-09-17 14:46:10 +02:00
|
|
|
*) makepkg_args="$makepkg_args -$arg $OPTARG" ;;
|
2010-02-13 19:47:16 +01:00
|
|
|
esac
|
2007-10-04 06:24:29 +02:00
|
|
|
done
|
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
(( EUID != 0 )) && die 'This script must be run as root.'
|
|
|
|
|
|
|
|
[[ ! -f PKGBUILD && -z "${install_pkgs[*]}" ]] && die 'This must be run in a directory containing a PKGBUILD.'
|
|
|
|
|
2011-03-13 17:57:28 +01:00
|
|
|
# Canonicalize chrootdir, getting rid of trailing /
|
2012-01-02 03:38:20 +01:00
|
|
|
chrootdir=$(readlink -e "$passeddir")
|
2013-05-02 08:29:21 +02:00
|
|
|
[[ ! -d $chrootdir ]] && die "No chroot dir defined, or invalid path '$passeddir'"
|
|
|
|
[[ ! -d $chrootdir/root ]] && die "Missing chroot dir root directory. Try using: mkarchroot $chrootdir/root base-devel"
|
|
|
|
|
|
|
|
# Detect chrootdir filesystem type
|
|
|
|
chroottype=$(stat -f -c %T "$chrootdir")
|
2011-03-13 17:57:28 +01:00
|
|
|
|
2011-09-17 14:46:10 +02:00
|
|
|
if [[ ${copy:0:1} = / ]]; then
|
2011-07-25 20:28:31 +02:00
|
|
|
copydir=$copy
|
|
|
|
else
|
|
|
|
copydir="$chrootdir/$copy"
|
|
|
|
fi
|
2007-12-16 02:57:39 +01:00
|
|
|
|
2007-11-05 00:01:22 +01:00
|
|
|
# Pass all arguments after -- right to makepkg
|
2011-09-17 14:46:10 +02:00
|
|
|
makepkg_args="$makepkg_args ${*:$OPTIND}"
|
2007-11-05 00:01:22 +01:00
|
|
|
|
2008-01-16 14:12:38 +01:00
|
|
|
# See if -R was passed to makepkg
|
|
|
|
for arg in ${*:$OPTIND}; do
|
2011-09-17 14:46:10 +02:00
|
|
|
if [[ $arg = -R ]]; then
|
2011-11-08 21:50:08 +01:00
|
|
|
repack=true
|
2011-09-17 14:46:10 +02:00
|
|
|
break
|
2010-02-13 19:47:16 +01:00
|
|
|
fi
|
2008-01-16 14:12:38 +01:00
|
|
|
done
|
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
if [[ -n $SUDO_USER ]]; then
|
|
|
|
USER_HOME=$(eval echo ~$SUDO_USER)
|
|
|
|
else
|
|
|
|
USER_HOME=$HOME
|
2007-11-28 00:54:58 +01:00
|
|
|
fi
|
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
# {{{ functions
|
|
|
|
load_vars() {
|
|
|
|
local makepkg_conf="$1" var
|
2007-10-04 06:24:29 +02:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
[[ -f $makepkg_conf ]] || return 1
|
2007-10-04 06:24:29 +02:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
for var in {SRC,PKG,LOG}DEST MAKEFLAGS PACKAGER; do
|
|
|
|
[[ -z ${!var} ]] && eval $(grep "^${var}=" "$makepkg_conf")
|
|
|
|
done
|
2011-03-13 19:06:27 +01:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
return 0
|
|
|
|
}
|
2013-03-14 03:55:41 +01:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
create_chroot() {
|
|
|
|
# Lock the chroot we want to use. We'll keep this lock until we exit.
|
|
|
|
lock 9 "$copydir.lock" "Locking chroot copy [$copy]"
|
|
|
|
|
|
|
|
if [[ ! -d $copydir ]] || $clean_first; then
|
|
|
|
# Get a read lock on the root chroot to make
|
|
|
|
# sure we don't clone a half-updated chroot
|
|
|
|
slock 8 "$chrootdir/root.lock" "Locking clean chroot"
|
|
|
|
|
|
|
|
stat_busy "Creating clean working copy [$copy]"
|
|
|
|
if [[ "$chroottype" == btrfs ]]; then
|
|
|
|
if [[ -d $copydir ]]; then
|
|
|
|
btrfs subvolume delete "$copydir" >/dev/null ||
|
|
|
|
die "Unable to delete subvolume $copydir"
|
|
|
|
fi
|
|
|
|
btrfs subvolume snapshot "$chrootdir/root" "$copydir" >/dev/null ||
|
|
|
|
die "Unable to create subvolume $copydir"
|
|
|
|
else
|
|
|
|
mkdir -p "$copydir"
|
|
|
|
rsync -a --delete -q -W -x "$chrootdir/root/" "$copydir"
|
|
|
|
fi
|
|
|
|
stat_done
|
2011-03-13 19:06:27 +01:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
# Drop the read lock again
|
|
|
|
exec 8>&-
|
|
|
|
fi
|
|
|
|
}
|
2011-03-13 19:06:27 +01:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
clean_temporary() {
|
|
|
|
stat_busy "Removing temporary copy [$copy]"
|
2013-03-02 05:21:10 +01:00
|
|
|
if [[ "$chroottype" == btrfs ]]; then
|
2013-05-02 08:29:21 +02:00
|
|
|
btrfs subvolume delete "$copydir" >/dev/null ||
|
|
|
|
die "Unable to delete subvolume $copydir"
|
2011-03-13 15:19:20 +01:00
|
|
|
else
|
2013-05-02 08:29:21 +02:00
|
|
|
# avoid change of filesystem in case of an umount failure
|
|
|
|
rm --recursive --force --one-file-system "$copydir" ||
|
|
|
|
die "Unable to delete $copydir"
|
2011-03-13 15:19:20 +01:00
|
|
|
fi
|
2013-05-02 08:29:21 +02:00
|
|
|
|
|
|
|
# remove lock file
|
|
|
|
rm -f "$copydir.lock"
|
2011-11-01 15:33:08 +01:00
|
|
|
stat_done
|
2013-05-02 08:29:21 +02:00
|
|
|
}
|
2011-03-13 19:06:27 +01:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
install_packages() {
|
|
|
|
local pkgname
|
2007-10-04 06:24:29 +02:00
|
|
|
|
2013-03-02 05:21:08 +01:00
|
|
|
for install_pkg in "${install_pkgs[@]}"; do
|
|
|
|
pkgname="${install_pkg##*/}"
|
|
|
|
cp "$install_pkg" "$copydir/$pkgname"
|
2011-09-17 14:46:10 +02:00
|
|
|
|
2013-05-02 05:24:28 +02:00
|
|
|
arch-nspawn "$copydir" pacman -U /$pkgname --noconfirm
|
2013-03-02 05:21:08 +01:00
|
|
|
(( ret += !! $? ))
|
2011-09-17 14:46:10 +02:00
|
|
|
|
2013-03-02 05:21:08 +01:00
|
|
|
rm "$copydir/$pkgname"
|
|
|
|
done
|
2011-09-17 14:46:10 +02:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
# If there is no PKGBUILD we are done
|
2013-01-02 01:42:45 +01:00
|
|
|
[[ -f PKGBUILD ]] || exit $ret
|
2013-05-02 08:29:21 +02:00
|
|
|
}
|
2007-12-16 02:57:39 +01:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
prepare_chroot() {
|
|
|
|
$repack || rm -rf "$copydir/build"
|
2008-01-16 14:12:38 +01:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
mkdir -p "$copydir/build"
|
|
|
|
if ! grep -q 'BUILDDIR="/build"' "$copydir/etc/makepkg.conf"; then
|
|
|
|
echo 'BUILDDIR="/build"' >> "$copydir/etc/makepkg.conf"
|
2011-10-29 20:37:28 +02:00
|
|
|
fi
|
2010-08-18 21:43:27 +02:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
# Read .makepkg.conf and .gnupg/pubring.gpg even if called via sudo
|
|
|
|
if [[ -r "$USER_HOME/.gnupg/pubring.gpg" ]]; then
|
|
|
|
install -D "$USER_HOME/.gnupg/pubring.gpg" \
|
|
|
|
"$copydir/build/.gnupg/pubring.gpg"
|
|
|
|
fi
|
2007-12-16 02:57:39 +01:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
mkdir -p "$copydir/pkgdest"
|
|
|
|
if ! grep -q 'PKGDEST="/pkgdest"' "$copydir/etc/makepkg.conf"; then
|
|
|
|
echo 'PKGDEST="/pkgdest"' >> "$copydir/etc/makepkg.conf"
|
|
|
|
fi
|
2011-09-17 14:46:10 +02:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
mkdir -p "$copydir/logdest"
|
|
|
|
if ! grep -q 'LOGDEST="/logdest"' "$copydir/etc/makepkg.conf"; then
|
|
|
|
echo 'LOGDEST="/logdest"' >> "$copydir/etc/makepkg.conf"
|
|
|
|
fi
|
2011-09-17 14:46:10 +02:00
|
|
|
|
2013-05-09 02:31:35 +02:00
|
|
|
# These two get bind-mounted read-only
|
|
|
|
# XXX: makepkg dislikes having these dirs read-only, so separate them
|
2013-05-02 08:29:21 +02:00
|
|
|
mkdir -p "$copydir/startdir" "$copydir/startdir_host"
|
|
|
|
mkdir -p "$copydir/srcdest" "$copydir/srcdest_host"
|
|
|
|
if ! grep -q 'SRCDEST="/srcdest"' "$copydir/etc/makepkg.conf"; then
|
|
|
|
echo 'SRCDEST="/srcdest"' >> "$copydir/etc/makepkg.conf"
|
|
|
|
fi
|
2007-12-16 02:57:39 +01:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
chown -R nobody "$copydir"/{build,pkgdest,logdest,srcdest,startdir}
|
2011-09-17 15:50:30 +02:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
if [[ -n $MAKEFLAGS ]]; then
|
|
|
|
sed -i '/^MAKEFLAGS=/d' "$copydir/etc/makepkg.conf"
|
|
|
|
echo "MAKEFLAGS='${MAKEFLAGS}'" >> "$copydir/etc/makepkg.conf"
|
|
|
|
fi
|
2008-04-14 18:19:33 +02:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
if [[ -n $PACKAGER ]]; then
|
|
|
|
sed -i '/^PACKAGER=/d' "$copydir/etc/makepkg.conf"
|
|
|
|
echo "PACKAGER='${PACKAGER}'" >> "$copydir/etc/makepkg.conf"
|
|
|
|
fi
|
2009-12-27 11:42:11 +01:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
if [[ ! -f $copydir/etc/sudoers.d/nobody-pacman ]]; then
|
|
|
|
cat > "$copydir/etc/sudoers.d/nobody-pacman" <<EOF
|
2011-10-29 20:37:28 +02:00
|
|
|
Defaults env_keep += "HOME"
|
|
|
|
nobody ALL = NOPASSWD: /usr/bin/pacman
|
|
|
|
EOF
|
2013-05-02 08:29:21 +02:00
|
|
|
chmod 440 "$copydir/etc/sudoers.d/nobody-pacman"
|
|
|
|
fi
|
2007-10-07 19:31:22 +02:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
# This is a little gross, but this way the script is recreated every time in the
|
|
|
|
# working copy
|
2013-05-03 20:01:32 +02:00
|
|
|
printf $'#!/bin/bash\n%s\n_chrootbuild %q %q' "$(declare -f _chrootbuild)" \
|
|
|
|
"$makepkg_args" "$run_namcap" >"$copydir/chrootbuild"
|
2013-05-02 08:29:21 +02:00
|
|
|
chmod +x "$copydir/chrootbuild"
|
|
|
|
}
|
|
|
|
|
|
|
|
download_sources() {
|
|
|
|
local builddir="$(mktemp -d)"
|
|
|
|
chmod 1777 "$builddir"
|
|
|
|
|
|
|
|
# Ensure sources are downloaded
|
|
|
|
if [[ -n $SUDO_USER ]]; then
|
|
|
|
sudo -u $SUDO_USER env SRCDEST="$SRCDEST" BUILDDIR="$builddir" \
|
|
|
|
makepkg --config="$copydir/etc/makepkg.conf" --verifysource -o
|
|
|
|
else
|
|
|
|
( export SRCDEST BUILDDIR="$builddir"
|
|
|
|
makepkg --asroot --config="$copydir/etc/makepkg.conf" --verifysource -o
|
|
|
|
)
|
|
|
|
fi
|
|
|
|
(( $? != 0 )) && die "Could not download sources."
|
|
|
|
|
|
|
|
# Clean up garbage from verifysource
|
|
|
|
rm -rf $builddir
|
|
|
|
}
|
2007-10-04 06:24:29 +02:00
|
|
|
|
2013-05-03 20:01:32 +02:00
|
|
|
_chrootbuild() {
|
|
|
|
# This function isn't run in makechrootpkg,
|
|
|
|
# so no global variables
|
|
|
|
local makepkg_args="$1"
|
|
|
|
local run_namcap="$2"
|
|
|
|
|
|
|
|
. /etc/profile
|
|
|
|
export HOME=/build
|
|
|
|
shopt -s nullglob
|
|
|
|
|
2013-05-09 02:31:35 +02:00
|
|
|
# XXX: Workaround makepkg disliking read-only dirs
|
2013-05-03 20:01:32 +02:00
|
|
|
ln -sft /srcdest /srcdest_host/*
|
|
|
|
ln -sft /startdir /startdir_host/*
|
|
|
|
|
|
|
|
cd /startdir
|
|
|
|
|
2013-05-09 02:31:35 +02:00
|
|
|
# XXX: Keep PKGBUILD writable for pkgver()
|
2013-05-03 20:01:32 +02:00
|
|
|
rm PKGBUILD*
|
|
|
|
cp /startdir_host/PKGBUILD* .
|
|
|
|
chown nobody PKGBUILD*
|
|
|
|
|
|
|
|
# Safety check
|
|
|
|
if [[ ! -w PKGBUILD ]]; then
|
|
|
|
echo "Can't write to PKGBUILD!"
|
|
|
|
exit 1
|
|
|
|
fi
|
|
|
|
|
|
|
|
sudo -u nobody makepkg $makepkg_args || exit 1
|
|
|
|
|
|
|
|
if $run_namcap; then
|
|
|
|
pacman -S --needed --noconfirm namcap
|
|
|
|
for pkgfile in /startdir/PKGBUILD /pkgdest/*; do
|
|
|
|
echo "Checking ${pkgfile##*/}"
|
|
|
|
sudo -u nobody namcap "$pkgfile" 2>&1 | tee "/logdest/${pkgfile##*/}-namcap.log"
|
|
|
|
done
|
|
|
|
fi
|
|
|
|
|
|
|
|
exit 0
|
|
|
|
}
|
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
move_products() {
|
|
|
|
for pkgfile in "$copydir"/pkgdest/*; do
|
2012-08-11 12:17:56 +02:00
|
|
|
chown "$src_owner" "$pkgfile"
|
2011-09-17 15:05:35 +02:00
|
|
|
mv "$pkgfile" "$PKGDEST"
|
2010-02-13 19:47:16 +01:00
|
|
|
done
|
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
for l in "$copydir"/logdest/*; do
|
2012-08-11 12:17:56 +02:00
|
|
|
chown "$src_owner" "$l"
|
2013-05-02 08:29:21 +02:00
|
|
|
mv "$l" "$LOGDEST"
|
2010-02-13 19:47:16 +01:00
|
|
|
done
|
2013-05-02 08:29:21 +02:00
|
|
|
}
|
|
|
|
# }}}
|
|
|
|
|
|
|
|
umask 0022
|
|
|
|
|
|
|
|
load_vars "$USER_HOME/.makepkg.conf"
|
|
|
|
load_vars /etc/makepkg.conf
|
|
|
|
|
|
|
|
# Use PKGBUILD directory if these don't exist
|
|
|
|
[[ -d $PKGDEST ]] || PKGDEST=$PWD
|
|
|
|
[[ -d $SRCDEST ]] || SRCDEST=$PWD
|
|
|
|
[[ -d $LOGDEST ]] || LOGDEST=$PWD
|
|
|
|
|
|
|
|
create_chroot
|
|
|
|
|
|
|
|
$update_first && arch-nspawn "$copydir" pacman -Syu --noconfirm
|
|
|
|
|
|
|
|
[[ -n ${install_pkgs[*]} ]] && install_packages
|
|
|
|
|
|
|
|
prepare_chroot
|
|
|
|
|
|
|
|
download_sources
|
|
|
|
|
|
|
|
if arch-nspawn "$copydir" \
|
|
|
|
--bind-ro="$PWD:/startdir_host" \
|
|
|
|
--bind-ro="$SRCDEST:/srcdest_host" \
|
|
|
|
/chrootbuild
|
|
|
|
then
|
|
|
|
move_products
|
2009-02-25 19:11:39 +01:00
|
|
|
else
|
2013-05-02 08:29:21 +02:00
|
|
|
(( ret += 1 ))
|
2008-04-22 05:56:58 +02:00
|
|
|
fi
|
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
$temp_chroot && clean_temporary
|
2010-03-03 21:49:22 +01:00
|
|
|
|
2013-05-02 08:29:21 +02:00
|
|
|
if (( ret != 0 )); then
|
|
|
|
if $temp_chroot; then
|
|
|
|
die "Build failed"
|
2013-03-14 03:55:40 +01:00
|
|
|
else
|
2013-05-02 08:29:21 +02:00
|
|
|
die "Build failed, check $copydir/build"
|
2013-03-14 03:55:40 +01:00
|
|
|
fi
|
|
|
|
else
|
|
|
|
true
|
2010-02-13 19:47:16 +01:00
|
|
|
fi
|