diff options
| -rwxr-xr-x | localcowbuilder-fork | 157 | ||||
| -rwxr-xr-x | localqemubuilder-create | 192 |
2 files changed, 349 insertions, 0 deletions
diff --git a/localcowbuilder-fork b/localcowbuilder-fork new file mode 100755 index 0000000..d513548 --- /dev/null +++ b/localcowbuilder-fork @@ -0,0 +1,157 @@ +#!/bin/sh +set -x +# +# Copyright © 2006-2008 Jonas Smedegaard <dr@jones.dk> +# Description: Update Copy-On-Write environment +# +# 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; either version 2, or (at your option) +# any later version. +# +# 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. +# +# You should have received a copy of the GNU General Public License +# along with this program; if not, write to the Free Software +# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA +# 02111-1307 USA. +# +# Depends: cowdancer, sudo + +set -e + +PRG=$(basename "$0") +LOCALMIRROR="deb http://127.0.0.1:9999/jones @@DIST@@ @@TOPIC@@" + +showhelp() { + cat <<EOF +Usage: $PRG OLDPOOL POOL DISTRIBUTION [ OTHERMIRROR | LOCALTOPIC ] + +Examples: + $PRG sid sid-copy sid + $PRG sid sid+mm sid 'deb http://debian-multimedia.org/ sid main' + $PRG sid-ia32 sid-ia32+tweaks sid tweaks + +OTHERMIRROR is a full APT line, LOCALTOPIC is expanded using the +following skeleton: + + $LOCALMIRROR + +All APT sources are replaced: all original sources must be redeclared. +EOF +} + +exit1() { + echo "ERROR: $1" + exit 1 +} + +ask() { + echo -n "$1 (y/N)? " + read response + case "$response" in + y|Y) + : + ;; + *) + return 1 + ;; + esac + return +} + +if [ $# -lt 3 ]; then + showhelp + exit1 "not enough parameters" +fi + +oldpool= +pool= +distro= +while [ $# -gt 0 ]; do + case $1 in + -h|--help) + showhelp + exit 0 + ;; + --) + shift + break + ;; + --*|-*) +# opts="$opts $1" +# shift + exit1 "options are curently unsupported" + ;; + *) + if [ -z "$oldpool" ]; then + oldpool="$1" + elif [ -z "$pool" ]; then + pool="$1" + elif [ -z "$distro" ]; then + distro="$1" + else + if echo "$1" | egrep -vq '[^[:blank:]][[:blank:]]+[^[:blank:]]'; then + mirror="$(echo "$LOCALMIRROR" | sed "s/@@DIST@@/$distro/g;s/@@TOPIC@@/$1/g")" + else + mirror="$1" + fi + othermirrors="${othermirrors:+$othermirrors|}""$mirror" + fi + shift + ;; + esac +done + +if [ -z "$oldpool" ]; then + exit1 "no oldpool provided" +fi + +if [ -z "$pool" ]; then + exit1 "no pool provided" +fi + +if [ -z "$distro" ]; then + exit1 "no distribution provided" +fi + +oldbasepath="/var/cache/pbuilder/cow-$oldpool" +basepath="/var/cache/pbuilder/cow-$pool" +aptcache="" +buildresult="$HOME/src/pbuild-$pool/" + +[ -d "$oldbasepath" ] || \ + exit1 "oldpool \"$oldbasepath\" does not exist" + +makepaths='' +for path in "$buildresult"; do + if [ ! -d "$path" ]; then + echo "W: Needed path \"$path\" does not exist" + makepaths='yes' + fi +done +if [ "$makepaths" = 'yes' ]; then + [ "$force" = 'yes' ] \ + || ask 'Create the missing path(s)' \ + || exit1 "Cannot continue without those missing paths" +fi + +if [ -d "$basepath" ]; then + echo "W: Needed path \"$path\" already exists" + [ "$force" = 'yes' ] \ + || ask 'Remove the path' \ + || exit1 "Cannot continue with that path already there" +fi + +mkdir -p "$buildresult" +sudo rm -rf "$basepath" +sudo cp -al "$oldbasepath" "$basepath" + +export DEBIAN_FRONTEND="noninteractive" +export LANG=C + +echo "$othermirrors" | perl -e "while (<>) {chomp; /\w/ and unshift @m, '--othermirror', \$_};"\ +"exec 'sudo', 'cowbuilder', '--update', '--distribution', '$distro', '--basepath', '$basepath', '--aptcache', '$aptcache', '--override-config', @m" diff --git a/localqemubuilder-create b/localqemubuilder-create new file mode 100755 index 0000000..4ed389b --- /dev/null +++ b/localqemubuilder-create @@ -0,0 +1,192 @@ +#!/bin/sh +# +# Copyright © 2006-2009 Jonas Smedegaard <dr@jones.dk> +# Description: Create QEMU environment +# +# 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; either version 2, or (at your option) +# any later version. +# +# 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. +# +# You should have received a copy of the GNU General Public License +# along with this program; if not, write to the Free Software +# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA +# 02111-1307 USA. +# +# Depends: qemu, sudo + +set -e + +PRG=$(basename "$0") + +showhelp() { + cat <<EOF +Usage: $PRG POOL [ DISTRIBUTION [ OTHERMIRROR] ] + +Examples: + $PRG sid + $PRG sid+mm sid 'deb http://debian-multimedia.org/ sid main' + $PRG sid-ia32 sid --arch i386 +EOF +} + +exit1() { + echo "ERROR: $1" + exit 1 +} + +ask() { + echo -n "$1 (y/N)? " + read response + case "$response" in + y|Y) + : + ;; + *) + return 1 + ;; + esac + return +} + +if [ $# -eq 0 ]; then + showhelp + exit1 "not enough parameters" +fi + +pool= +distro= +arch= +newline=' +' +while [ $# -gt 0 ]; do + case $1 in + -h|--help) + showhelp + exit 0 + ;; + --arch|-a) + arch="$2" + shift 2 || exit1 "option \"--arg\" requires an argument" + ;; + --) + shift + break + ;; + --*|-*) +# opts="$opts $1" +# shift + exit1 "options (apart from --arch) are curently unsupported" + ;; + *) + if [ -z "$pool" ]; then + pool="$1" + elif [ -z "$distro" ]; then + distro="$1" + else + othermirrors="${othermirrors:+$othermirrors$newline}$1" + fi + shift + ;; + esac +done + +if [ -z "$pool" ]; then + exit1 "no pool provided" +fi +if [ -z "$distro" ]; then + distro="$pool" +fi + +case $arch in + armel) +# kernelurl="http://yoush.homelinux.org:8079/nikita/armel-qemubuilder/vmlinuz-2.6.26-versatile-qemu" +# kernelref="http://yoush.homelinux.org:8079/tech/setting-up-armel-qemubuilder" + kernelurl="http://people.debian.org/~aurel32/qemu/armel/vmlinuz-2.6.26-1-versatile" + initrdurl="http://people.debian.org/~aurel32/qemu/armel/initrd.img-2.6.26-1-versatile" + kernelref="http://people.debian.org/~aurel32/qemu/armel/" + ;; + mipsel) + kernelurl="http://people.debian.org/~aurel32/qemu/mipsel/vmlinux-2.6.26-1-4kc-malta" + kernelref="http://people.debian.org/~aurel32/qemu/mipsel/" + ;; + *) + exit1 "unsupported architecture: \"$arch\"" + ;; +esac + +basepath="/var/cache/pbuilder/base-$pool.qemu" +aptcache="" +buildresult="$HOME/src/pbuild-$pool/" +qemudir="/var/cache/pbuilder/qemu-$pool/" + +makepaths='' +for path in "$buildresult" "$qemudir"; do + if [ ! -d "$path" ]; then + echo "W: Needed path \"$path\" does not exist" + makepaths='yes' + fi +done +if [ "$makepaths" = 'yes' ]; then + [ "$force" = 'yes' ] \ + || ask 'Create the missing path(s)' \ + || exit1 "Cannot continue without those missing paths" + mkdir -p "$buildresult" + sudo mkdir -p "$qemudir" +fi + +if [ -f "$basepath" ]; then + echo "W: Needed path \"$basepath\" already exists" + [ "$force" = 'yes' ] \ + || ask 'Remove the path' \ + || exit1 "Cannot continue with that path already there" + sudo rm "$basepath" +fi + +for url in $kernelurl $initrdurl; do + file="$qemudir/$(basename $url)" + if [ -f "$file" ]; then + echo "W: file \"$file\" already exists" + if [ "$force" = 'yes' ] || ask 'Replace old file'; then + sudo rm "$file" + fi + fi +done +for url in $kernelurl $initrdurl; do + file="$qemudir/$(basename $url)" + if ! [ -f "$qemudir/$kernel" ]; then + sudo wget -O "$file" "$kernelurl" + fi +done + +if [ -f "$qemudir/cfg" ]; then + echo "W: Configfile \"$qemydir/cfg\" already exists" + if [ "$force" = 'yes' ] || ask 'Overwrite old config'; then + sudo rm "$qemudir/cfg" + fi +fi + +if ! [ -f "$qemudir/cfg" ]; then + sudo sh -c "cat >\"$qemudir/cfg\"" <<EOF +# kernel origin: $kernelurl +# more info: $kernelref +ARCH=$arch +MEMORY_MEGS=256 +${kernelurl:+KERNEL_IMAGE=$qemudir/$(basename $kernelurl)} +${initrdurl:+INITRD=$qemudir/$(basename $initrdurl)} +MIRRORSITE=http://auryn:9999/debian +#ARCH_DISKDEVICE=sd +EOF +fi + +if [ -n "$othermirrors" ]; then +echo "$othermirrors" | perl -e "while (<>) {/\w/ and unshift @m, '--othermirror', \$_};"\ +"exec 'sudo', 'qemubuilder', '--create', '--buildresult', '$buildresult', '--distribution', '$distro', '--basepath', '$basepath', '--aptcache', '$aptcache', '--configfile', '$qemudir/cfg', @m" +else +perl -e "exec 'sudo', 'qemubuilder', '--create', '--buildresult', '$buildresult', '--distribution', '$distro', '--basepath', '$basepath', '--aptcache', '$aptcache', '--configfile', '$qemudir/cfg'" +fi |