slitaz-dev-tools annotate tazdev/tazdev @ rev 191

tazdev: change relpkg behavior. retrieve the last version from .hgtags. Put archive in /src
author Eric Joseph-Alexandre <erjo@slitaz.org>
date Thu Jan 17 12:07:53 2013 +0100 (2013-01-17)
parents 9da0e2756a59
children 4e046585acc6
rev   line source
pankso@1 1 #!/bin/sh
pankso@70 2 #
pankso@70 3 # Tazdev - SliTaz developers and build host tool. System wide config
pankso@81 4 # file is located at: /etc/slitaz/tazdev.conf. Keep the code clear and
samuel_trassare@144 5 # well commented please, also: configuration variables are $UPPERCASE
samuel_trassare@144 6 # and variables initialized by tazdev itself are $lowerspace
pankso@1 7 #
pankso@17 8 # (c) 2011 SliTaz GNU/Linux - GNU gpl v3
pankso@1 9 #
pankso@70 10 # AUTHORS
pankso@70 11 # Christophe Lincoln <pankso@slitaz.org>
pankso@70 12 # Pascal Bellard <bellard@slitaz.org>
pankso@1 13 #
erjo@190 14
erjo@191 15 VERSION=1.9
erjo@190 16
pankso@174 17 . /lib/libtaz.sh
pankso@1 18
pankso@77 19 [ -f /etc/slitaz/tazdev.conf ] && . /etc/slitaz/tazdev.conf
pankso@81 20 [ -f tazdev.conf ] && . ./tazdev.conf
pankso@77 21
pankso@183 22 if [ ! "$SLITAZ_HOME" ]; then
pankso@77 23 echo -e "\nNo config file found\n" && exit 1
pankso@1 24 fi
pankso@1 25
pankso@180 26 usage() {
pankso@183 27 cat << EOT
pankso@183 28
pankso@183 29 $(boldify "Usage:") $(basename $0) [command] [vers|user|tool] [vers|--opts]
pankso@183 30
erjo@190 31 SliTaz developers and build host tool v$VERSION
pankso@183 32
pankso@174 33 $(boldify "Commands:")
pankso@183 34 usage Print this short usage and command list
pankso@183 35 help Give help on a SliTaz tool or library.
pankso@183 36 stats|-s Display statistics about your projects
pankso@183 37 chroot|-c Mount virtual fs and chroot into the build env
pankso@183 38 gen-chroot|-gc Generate a chroot using packages from config file
pankso@183 39 umount-chroot|-uc Unmount chroot specified on cmdline
pankso@183 40 clean-chroot|-cc Clean a chroot environment (skip root/ and home/)
pankso@183 41 !purge Remove obsolete packages and obsolete source tarballs
pankso@183 42 !dry-purge Show obsolete packages and obsolete source tarballs
pankso@183 43 push|-p Upload new packages to the main mirror
pankso@183 44 dry-push|-dp Show what will be uploaded to the mirror. Does nothing
pankso@183 45 pull Download new packages from the main mirror
pankso@183 46 dry-pull Show what will be downloaded from the mirror. Does nothing
pankso@183 47 relpkg|-rp Archive and upload new package/project version
pankso@183 48
pankso@183 49 $(boldify "Options:")
pankso@183 50 --rootfs= Path to the chroot to generate or clean
pankso@189 51 --arch= Specify the architecture type for cross-chroot, push/pull
pankso@183 52 --clean Clean chroot before generation a new one
pankso@183 53
pankso@183 54 $(boldify "Options:")
pankso@183 55 $(basename $0) gen-chroot undigest --clean
pankso@183 56 $(basename $0) chroot stable
pankso@183 57 $(basename $0) -c --arch=arm
pankso@183 58
pankso@183 59 EOT
pankso@1 60 }
pankso@1 61
pankso@180 62 get_version() {
pankso@180 63 # Stable, undigest or custom.
pankso@180 64 if [ "$2" ] && [ ! $(echo $2 | grep "\--*") ]; then
pankso@81 65 version=$2
pankso@174 66 slitaz=$SLITAZ_HOME/$2
pankso@1 67 else
pankso@81 68 version=cooking
pankso@183 69 slitaz=$SLITAZ_HOME/cooking
pankso@1 70 fi
pankso@180 71 if [ "$arch" ]; then
pankso@180 72 rootfs=$slitaz/$arch/chroot
pankso@180 73 else
pankso@180 74 rootfs=$slitaz/chroot
pankso@180 75 fi
pankso@1 76 }
pankso@1 77
pankso@180 78 check_mirror() {
pankso@1 79 # ping -c 1 $MIRROR
pankso@1 80 if [ -n "$2" ]; then
pankso@81 81 user=$2
pankso@1 82 else
pankso@81 83 user=$user
pankso@1 84 fi
pankso@1 85 if [ "$2" = "stable" ] || [ "$3" = "stable" ]; then
pankso@82 86 remote=$MIRROR_PKGS/stable/
pankso@183 87 local=$SLITAZ_HOME/stable/packages/
pankso@3 88 elif [ "$2" = "undigest" ] || [ "$3" = "undigest" ]; then
pankso@82 89 remote=$MIRROR_PKGS/undigest/
pankso@183 90 local=$SLITAZ_HOME/undigest/packages/
pankso@1 91 else
pankso@82 92 remote=$MIRROR_PKGS/cooking/
pankso@183 93 local=$SLITAZ_HOME/cooking/packages/
pankso@1 94 fi
pankso@189 95 if [ "$arch" ]; then
pankso@189 96 remote=${remote}$arch/
pankso@189 97 local=${local}$arch/
pankso@189 98 fi
pankso@1 99 }
pankso@1 100
pascal@142 101 # Bind a directory into the chroot
pascal@142 102 bind_chroot_dir()
pascal@142 103 {
pascal@142 104 mkdir -p $1 $2
pascal@142 105 mount -o bind $1 $2
pascal@142 106 }
pascal@142 107
pankso@1 108 # Mount virtual Kernel file systems and chroot but check that nobody
pankso@1 109 # else has done mounts
pankso@1 110 mount_chroot()
pankso@1 111 {
pankso@81 112 if [ ! -d $rootfs/proc/1 ]; then
pankso@82 113 echo -ne "\nMounting virtual filesystems..."
pankso@81 114 mount -t proc proc $rootfs/proc
pankso@81 115 mount -t sysfs sysfs $rootfs/sys
pankso@81 116 mount -t devpts devpts $rootfs/dev/pts
pankso@81 117 mount -t tmpfs shm $rootfs/dev/shm
pankso@1 118 status
pankso@1 119 fi
pankso@80 120 # Mount source so they can be shared between cooking/stable/undigest.
pankso@80 121 # But do it only if it's a slitaz developement chroot.
pankso@81 122 fs=$rootfs/home/slitaz
pankso@81 123 if [ -d "$slitaz" ]; then
pankso@174 124 bind_chroot_dir $SLITAZ_HOME/src $fs/src
pankso@81 125 # Now mount package dir so they are in /home/slitaz/$version
pankso@80 126 # We may not mount cache wok or others it has no point and if
paul@167 127 # one wants to use a shared wok he can bind it manually.
pankso@181 128 if [ "$arch" ]; then
pankso@181 129 slitaz=$slitaz/$arch
pankso@181 130 fi
pankso@181 131 [ -d "$fs/packages" ] || mkdir -p $fs/packages
pankso@181 132 [ -d "$slitaz/packages" ] || mkdir -p $fs/packages
pascal@142 133 bind_chroot_dir $slitaz/packages $fs/packages
pankso@80 134 fi
pankso@1 135 }
pankso@1 136
pankso@180 137 # Unmount virtual Kernel file systems.
pankso@180 138 umount_chroot() {
pankso@180 139 [ "$1" ] && rootfs=$1
pankso@81 140 fs=$rootfs/home/slitaz
pankso@82 141 echo -ne "\nUnmounting virtual filesystems..."
pankso@81 142 umount $rootfs/dev/shm
pankso@81 143 umount $rootfs/dev/pts
pankso@81 144 umount $rootfs/sys
pankso@81 145 umount $rootfs/proc
pankso@180 146 if mount | fgrep -q $fs/src; then
pankso@180 147 umount $fs/src
pankso@180 148 umount $fs/packages
pankso@180 149 fi
pankso@82 150 status && echo ""
pankso@1 151 }
pankso@1 152
pankso@1 153 # Get the last cooking base rootfs, extract and configure.
pankso@180 154 gen_chroot() {
pankso@180 155 echo -e "\nGenerating new chroot in: $rootfs"
pankso@177 156 separator
slaxemulator@85 157 mkdir -p $rootfs
pankso@183 158 # We my gen cooking chroot from a stable version or invers
pankso@183 159 case "$version" in
pankso@183 160 cooking|undigest) url="http://$MIRROR/packages/cooking/" ;;
pankso@183 161 stable|4.0) url="http://$MIRROR/packages/stable/" ;;
pankso@183 162 esac
pankso@183 163 # --mirror=
pankso@183 164 [ "$mirror" ] && url="$mirror"
pankso@183 165 mpath=/var/lib/tazpkg/mirror
pankso@183 166 cp $mpath ${mpath}.tazdev
pankso@183 167 echo "$url" > $mpath
pankso@183 168 echo -n "Mirror URL: ${url#http://}"
pankso@183 169 tazpkg recharge 2>/dev/null 1>/dev/null
pankso@183 170 status
pankso@180 171 for pkg in $CHROOT_PKGS
pankso@180 172 do
pankso@183 173 echo -n "Installing: $pkg $vers"
pankso@183 174 tazpkg -gi $pkg --root=$rootfs 2>/dev/null 1>/dev/null
pankso@183 175 status
pankso@180 176 done
pankso@1 177 echo -n "Creating resolv.conf..."
pankso@81 178 cat /etc/resolv.conf > $rootfs/etc/resolv.conf
pankso@1 179 status
pankso@183 180 echo -n "Restoring host packages list..."
pankso@183 181 mv -f ${mpath}.tazdev $mpath
pankso@183 182 tazpkg recharge 2>/dev/null 1>/dev/null >/dev/null
pankso@183 183 status
pankso@82 184 separator
pankso@183 185 case "$version" in
pankso@183 186 cooking) version="" ;;
pankso@183 187 esac
pankso@183 188 [ "$arch" ] && version="$version --arch=$arch"
pankso@183 189 echo -n "Ready to chroot with:"; colorize 34 " tazdev -c $version"
pankso@183 190 newline
pankso@1 191 }
pankso@1 192
pankso@183 193 # Remove obsolate slitaz packages --> in cooker ???
pankso@180 194 purge_packages() {
pankso@1 195 arg=$1
pankso@81 196 tmp=/tmp/tazdev.$$
pankso@180 197 ls $wok| while read pkg; do
pankso@180 198 [ -f $wok/$pkg/taz/*/receipt ] || continue
pankso@180 199 unset VERSION EXTRAVERSION
pankso@180 200 . $wok/$pkg/taz/*/receipt
pankso@180 201 echo $pkg-${VERSION}$EXTRAVERSION.tazpkg
pankso@81 202 done > $tmp
pankso@81 203 ls $slitaz/chroot/home/slitaz/packages | while read pkg; do
pankso@1 204 case "$pkg" in
pankso@180 205 *.tazpkg)
pankso@180 206 grep -q ^$pkg$ $tmp && continue
pankso@180 207 echo "Removing pkg: $pkg"
pankso@180 208 [ "$arg" == "purge" ] &&
pankso@180 209 rm -f $slitaz/chroot/home/slitaz/packages/$pkg ;;
pankso@1 210 esac
pankso@1 211 done
pankso@81 212 rm -f $tmp
pankso@1 213 }
pankso@1 214
pankso@183 215 # Remove obsolete source tarballs --> in cooker ??? but we share $src
pankso@183 216 # between cooking and stable to we must scan all versions, all arch
pankso@180 217 purge_sources() {
pankso@1 218 arg=$1
pankso@180 219 wok=$slitaz/chroot/home/slitaz/wok
pankso@81 220 tmp=/tmp/tazdev.$$
pankso@180 221 ls $wok| while read pkg; do
pankso@180 222 [ -f $wok/$pkg/receipt ] || continue
pankso@1 223 TARBALL=""
pankso@180 224 . $wok/$pkg/receipt
pankso@1 225 [ -n "$TARBALL" ] && echo $TARBALL
pankso@180 226 grep SOURCES_REPOSITORY/ $wok/$pkg/receipt | sed \
pankso@1 227 -e 's|.*SOURCES_REPOSITORY/\([^ ]*\)\( .*\)$|\1|' \
pankso@1 228 -e 's|.*SOURCES_REPOSITORY/\([^ ]*\)$|\1|' | sort | uniq | \
pankso@1 229 sed "s|['\"/]||g" | while read file ; do
pankso@1 230 eval echo $file 2> /dev/null
pankso@1 231 done
pankso@81 232 done > $tmp
pankso@81 233 ls $slitaz/chroot/home/slitaz/src | while read pkg; do
pankso@81 234 grep -q ^$pkg$ $tmp && continue
pankso@180 235 echo "Removing src: $pkg"
pankso@1 236 [ "$arg" == "purge" ] &&
pankso@180 237 rm -f $slitaz/chroot/home/slitaz/src/$pkg
pankso@1 238 done
pankso@81 239 rm -f $tmp
pankso@1 240 }
pankso@1 241
pankso@1 242 case "$1" in
pankso@183 243 stats|-s)
pankso@1 244 echo -e "\nStatistics for: $PROJECTS\n"
pankso@1 245 echo -n "Project" && echo -ne "\033[24G Size" && echo -ne "\033[38G Revision"
pankso@1 246 echo -ne "\033[48G Version" && echo -e "\033[64G Files"
pankso@82 247 separator
pankso@1 248 cd $PROJECTS
pankso@1 249 for proj in *
pankso@1 250 do
pankso@1 251 rev=""
pankso@1 252 echo -n "$proj"
pankso@1 253 size=`du -sh $proj | awk '{ print $1 }'`
pankso@1 254 echo -ne "\033[24G $size"
pankso@1 255 if [ -d $proj/.hg ]; then
pankso@1 256 cd $proj
pankso@1 257 rev=`hg head --template '{rev}\n'`
pankso@1 258 vers=`hg tags | head -n 2 | tail -n 1 | cut -d " " -f 1`
pankso@1 259 echo -ne "\033[38G $rev"
pankso@1 260 echo -ne "\033[48G $vers" && cd ..
pankso@1 261 fi
pankso@1 262 files=`find $proj -type f | wc -l`
pankso@1 263 echo -e "\033[64G $files"
pankso@1 264 done
pankso@82 265 separator
pankso@1 266 echo "" ;;
pankso@180 267 chroot|-c)
pankso@82 268 # Chroot into a build env. Default to cooking configured in tazdev.conf
pankso@1 269 check_root
pankso@1 270 get_version $@
pankso@81 271 [ -d "$2" ] && rootfs=$2
pankso@1 272 mount_chroot
pankso@82 273 echo -e "Chrooting to: $rootfs\n"
pankso@81 274 chroot $rootfs /bin/sh --login
pankso@80 275 umount_chroot ;;
pankso@77 276 umount-chroot|-uc)
pankso@1 277 check_root
pankso@80 278 get_version $@
pankso@183 279 [ -d "$2" ] && rootfs=$2
pankso@81 280 umount_chroot $rootfs ;;
pankso@77 281 gen-chroot|-gc)
pankso@77 282 check_root
pankso@180 283 # We can use: --rootfs=/path/to/chroot
pankso@183 284 if [ ! "$rootfs" ]; then
pankso@180 285 get_version $@
pankso@180 286 fi
pankso@183 287 if [ "$clean" ] || [ "$forced" ]; then
pankso@183 288 $0 -cc --rootfs=$rootfs --noline
pankso@183 289 fi
pankso@1 290 # Dont break another env.
pankso@81 291 if [ -d $rootfs/bin ]; then
pankso@81 292 echo -e "\nA chroot environment already exists in : $rootfs\n"
pankso@1 293 exit 1
pankso@1 294 fi
pankso@180 295 gen_chroot ;;
pankso@183 296 clean-chroot|-cc)
pankso@1 297 check_root
pankso@183 298 # We can use: --rootfs=/path/to/chroot
pankso@183 299 if [ ! "$rootfs" ]; then
pankso@183 300 get_version $@
pankso@183 301 fi
pankso@183 302 if [ ! -d "$rootfs" ]; then
pankso@183 303 echo -e "\nChroot doesn't exist: $rootfs\n"
pankso@183 304 exit 1
pankso@1 305 fi
pankso@81 306 if [ -d $rootfs/proc/1 ]; then
pankso@183 307 echo -e "\nWARNING: $rootfs/proc mounted!\n"
pankso@1 308 exit 1
pankso@1 309 fi
pankso@81 310 cd $rootfs || exit 1
pankso@180 311 echo ""
pankso@180 312 boldify "Cleaning chroot: $rootfs"
pankso@82 313 separator
pankso@183 314 # Keep root/ and /home they may have a build wok, custom scripts, etc.
pankso@181 315 for i in boot bin dev etc lib media mnt proc sbin sys tmp usr var run
pankso@1 316 do
pankso@181 317 if [ -d "$i" ]; then
pankso@181 318 echo -n "Removing: $i ($(du -sh $i | awk '{ print $1 }'))... "
pankso@181 319 rm -rf $i && status
pankso@181 320 fi
pankso@1 321 done
pankso@181 322 rm -f init
pankso@183 323 separator
pankso@183 324 [ "$noline" ] || newline ;;
pankso@70 325 push|-p)
pankso@1 326 check_mirror $@
pankso@113 327 rsync -r -t -O -l -v -z --delete \
pankso@82 328 $local -e ssh $user@$MIRROR:$remote ;;
pankso@70 329 dry-push|-dp)
pankso@1 330 check_mirror $@
pankso@113 331 rsync -r -t -O -l -v -z --delete --dry-run \
pankso@82 332 $local -e ssh $user@$MIRROR:$remote ;;
pankso@1 333 pull)
pankso@1 334 check_mirror $@
pankso@1 335 rsync -r -t -l -v -z --delete \
pankso@82 336 -e ssh $user@$MIRROR:$remote $local ;;
pankso@1 337 dry-pull)
pankso@1 338 check_mirror $@
pankso@1 339 rsync -r -t -l -v -z --delete --dry-run \
pankso@82 340 -e ssh $user@$MIRROR:$remote $local ;;
pankso@1 341 purge|dry-purge)
pankso@1 342 check_root
pankso@1 343 get_version $@
pankso@1 344 purge_packages $1
pankso@1 345 purge_sources $1 ;;
pankso@70 346 relpkg|-rp)
pankso@82 347 # Release a slitaz sub-project and upload tarball to mirror
pankso@1 348 [ -z "$MIRROR_SOURCES" ] && MIRROR_SOURCES="/var/www/slitaz/mirror/sources"
erjo@191 349 if [ -z $2 ]; then
erjo@191 350 echo -e "\nUsage: $0 relpkg package [version]\n"
pankso@1 351 exit 0
pankso@1 352 fi
pankso@81 353 pkg=$2
erjo@191 354
erjo@191 355 # We can get the last found version in .hgtags
erjo@191 356 if [ -z $3 ]; then
erjo@191 357 version=$(tail -n 1 $PROJECTS/$pkg/.hgtags | awk '{print $2'})
erjo@191 358 else
erjo@191 359 version=$3
erjo@191 360 fi
erjo@191 361
pankso@81 362 echo "" && cd $PROJECTS/$pkg
pankso@177 363
pankso@1 364 # Sanity check
pankso@81 365 if ! grep -q $version$ .hgtags; then
pankso@81 366 echo "Missing Hg tag for version: $version"
pankso@81 367 echo -e "You may want to: hg tag $version && hg push\n"
pankso@1 368 exit 0
pankso@1 369 fi
pankso@177 370
pankso@1 371 # Archive
pankso@81 372 echo -n "Creating tarball and md5sum for: $pkg-$version... "
erjo@191 373 hg archive -t tgz $SOURCE/$pkg-$version.tar.gz
erjo@191 374 ( cd $SOURCE; md5sum $pkg-$version.tar.gz > $pkg-$version.md5 )
pankso@1 375 echo "Done"
pankso@177 376
pankso@1 377 # Upload
pankso@1 378 echo -n "Do you wish to upload tarball to the mirror [N/y] ? "
pankso@1 379 read upload
pankso@1 380 if [ "$upload" = "y" ]; then
pankso@81 381 echo "Uploading to: $MIRROR/sources/${pkg#slitaz-}"
pankso@81 382 scp $pkg-$version.tar.gz $pkg-$version.md5 \
erjo@191 383 $MIRROR:$MIRROR_SOURCES/${pkg#slitaz-}
pankso@177 384 fi
pankso@177 385
pankso@147 386 # Update pkg in wok
pankso@147 387 echo -n "Do you wish to update $pkg in wok [N/y] ? "
pankso@147 388 read update
pankso@147 389 if [ "$update" = "y" ]; then
pankso@176 390 echo -n "Updating $pkg: $version"
pankso@147 391 cd $PROJECTS/wok
pankso@147 392 sed -i s"/VERSION=.*/VERSION=\"$version\"/" $pkg*/receipt
pankso@174 393 status
pankso@1 394 fi ;;
pankso@174 395 help)
pankso@174 396 [ ! "$2" ] && echo "Missing tool/library name" && exit 0
pankso@174 397 echo ""
pankso@174 398 boldify "Help for: $2"
pankso@174 399 separator
pankso@175 400 if [ -f "/usr/share/doc/slitaz/$2.txt" ]; then
pankso@175 401 less -M /usr/share/doc/slitaz/$2.txt
pankso@175 402 else
pankso@175 403 echo "No help found"
pankso@175 404 fi
pankso@174 405 separator && echo "" ;;
pankso@1 406 usage|*)
pankso@1 407 usage ;;
pankso@1 408 esac
pankso@1 409
pankso@1 410 exit 0