slitaz-dev-tools annotate tazdev/tazdev @ rev 1
Import tazdev from wok
| author | Christophe Lincoln <pankso@slitaz.org> |
|---|---|
| date | Thu Feb 24 04:02:55 2011 +0100 (2011-02-24) |
| parents | |
| children | 2f52d47889b0 |
| rev | line source |
|---|---|
| pankso@1 | 1 #!/bin/sh |
| pankso@1 | 2 # Tazdev - SliTaz developers and build host tool. |
| pankso@1 | 3 # System wide config file: /etc/slitaz/tazdev.conf |
| pankso@1 | 4 # |
| pankso@1 | 5 # (c) 2009 SliTaz GNU/Linux - GNU gpl v3 |
| pankso@1 | 6 # |
| pankso@1 | 7 # Authors : Christophe Lincoln (Pankso) <pankso@slitaz.org> |
| pankso@1 | 8 # |
| pankso@1 | 9 |
| pankso@1 | 10 if [ -f /etc/slitaz/tazdev.conf ]; then |
| pankso@1 | 11 . /etc/slitaz/tazdev.conf |
| pankso@1 | 12 if [ -f $PWD/tazdev.conf ]; then |
| pankso@1 | 13 . $PWD/tazdev.conf |
| pankso@1 | 14 fi |
| pankso@1 | 15 else |
| pankso@1 | 16 echo -e "\nNo config file found in /etc/slitaz or the current dir...\n" |
| pankso@1 | 17 exit 0 |
| pankso@1 | 18 fi |
| pankso@1 | 19 |
| pankso@1 | 20 usage() |
| pankso@1 | 21 { |
| pankso@1 | 22 echo -e "\nSliTaz developers and build host tool\n |
| pankso@1 | 23 \033[1mUsage: \033[0m `basename $0` [command] [user] [stable|cooking|experimental|path] |
| pankso@1 | 24 \033[1mCommands: \033[0m\n |
| pankso@1 | 25 usage Print this short usage and command list. |
| pankso@1 | 26 projects-stats Display statistics about your projects (-ps). |
| pankso@1 | 27 cmplog Log 'tazwok cmp' result (or use tazbb). |
| pankso@1 | 28 update-wok Update Hg wok and copy it to the chroot wok. |
| pankso@1 | 29 update-www Update SliTaz Website repo from Hg. |
| pankso@1 | 30 chroot Mount virtual fs if needed and chroot into the build env. |
| pankso@1 | 31 gen-chroot Generate a chroot using the last cooking base rootfs. |
| pankso@1 | 32 clean-chroot Clean a chroot environment (skip root/ and home/). |
| pankso@1 | 33 purge Remove obsolete packages and obsolete source tarballs. |
| pankso@1 | 34 dry-purge Show obsolete packages and obsolete source tarballs. |
| pankso@1 | 35 push Upload new packages to the main mirror (-p). |
| pankso@1 | 36 dry-push Show what will be uploaded to the mirror. Does nothing (-dp). |
| pankso@1 | 37 pull Download new packages from the main mirror. |
| pankso@1 | 38 dry-pull Show what will be downloaded from the mirror. Does nothing. |
| pankso@1 | 39 relpkg Archive and upload new package/project version.\n" |
| pankso@1 | 40 } |
| pankso@1 | 41 |
| pankso@1 | 42 # Exit if user is not root. |
| pankso@1 | 43 check_root() |
| pankso@1 | 44 { |
| pankso@1 | 45 if test $(id -u) != 0 ; then |
| pankso@1 | 46 echo -e "\nThis program requires being run as root.\n" |
| pankso@1 | 47 exit 0 |
| pankso@1 | 48 fi |
| pankso@1 | 49 } |
| pankso@1 | 50 |
| pankso@1 | 51 status() |
| pankso@1 | 52 { |
| pankso@1 | 53 local CHECK=$? |
| pankso@1 | 54 echo -en "\033[70G" |
| pankso@1 | 55 if [ $CHECK = 0 ]; then |
| pankso@1 | 56 echo "Done" |
| pankso@1 | 57 else |
| pankso@1 | 58 echo "Failed" |
| pankso@1 | 59 fi |
| pankso@1 | 60 return $CHECK |
| pankso@1 | 61 } |
| pankso@1 | 62 |
| pankso@1 | 63 get_version() |
| pankso@1 | 64 { |
| pankso@1 | 65 if [ "$2" = "stable" ]; then |
| pankso@1 | 66 VERSION=stable |
| pankso@1 | 67 SLITAZ=$STABLE |
| pankso@1 | 68 elif [ -n "$2" ]; then |
| pankso@1 | 69 # Undigest - custom ? |
| pankso@1 | 70 VERSION=$2 |
| pankso@1 | 71 SLITAZ=/home/slitaz/$2 |
| pankso@1 | 72 else |
| pankso@1 | 73 VERSION=cooking |
| pankso@1 | 74 SLITAZ=$COOKING |
| pankso@1 | 75 fi |
| pankso@1 | 76 ROOTFS=$SLITAZ/chroot |
| pankso@1 | 77 HG_WOK=$SLITAZ/wok |
| pankso@1 | 78 BUILD_WOK=$SLITAZ/chroot/home/slitaz/wok |
| pankso@1 | 79 } |
| pankso@1 | 80 |
| pankso@1 | 81 check_mirror() |
| pankso@1 | 82 { |
| pankso@1 | 83 # ping -c 1 $MIRROR |
| pankso@1 | 84 if [ -n "$2" ]; then |
| pankso@1 | 85 USER=$2 |
| pankso@1 | 86 else |
| pankso@1 | 87 USER=$USER |
| pankso@1 | 88 fi |
| pankso@1 | 89 if [ "$2" = "stable" ] || [ "$3" = "stable" ]; then |
| pankso@1 | 90 REMOTE_DIR=$MIRROR_PKGS/stable/ |
| pankso@1 | 91 LOCAL_DIR=$STABLE/packages/ |
| pankso@1 | 92 elif [ "$2" = "experimental" ] || [ "$3" = "experimental" ]; then |
| pankso@1 | 93 REMOTE_DIR=$MIRROR_PKGS/experimental/ |
| pankso@1 | 94 LOCAL_DIR=$EXPERIMENTAL/packages/ |
| pankso@1 | 95 else |
| pankso@1 | 96 REMOTE_DIR=$MIRROR_PKGS/cooking/ |
| pankso@1 | 97 LOCAL_DIR=$COOKING/packages/ |
| pankso@1 | 98 fi |
| pankso@1 | 99 } |
| pankso@1 | 100 |
| pankso@1 | 101 # Mount virtual Kernel file systems and chroot but check that nobody |
| pankso@1 | 102 # else has done mounts |
| pankso@1 | 103 mount_chroot() |
| pankso@1 | 104 { |
| pankso@1 | 105 if [ ! -d $ROOTFS/proc/1 ]; then |
| pankso@1 | 106 echo -n "Mounting virtual filesystems..." |
| pankso@1 | 107 mount -t proc proc $ROOTFS/proc |
| pankso@1 | 108 mount -t sysfs sysfs $ROOTFS/sys |
| pankso@1 | 109 mount -t devpts devpts $ROOTFS/dev/pts |
| pankso@1 | 110 mount -t tmpfs shm $ROOTFS/dev/shm |
| pankso@1 | 111 status |
| pankso@1 | 112 fi |
| pankso@1 | 113 } |
| pankso@1 | 114 |
| pankso@1 | 115 # Unmount virtual Kernel file systems on exit and ensure we are the last |
| pankso@1 | 116 # user before unmounting ! |
| pankso@1 | 117 umount_chroot() |
| pankso@1 | 118 { |
| pankso@1 | 119 # Not working. Buggy ps ? |
| pankso@1 | 120 #sleep 6 |
| pankso@1 | 121 ps=$(ps | grep `basename $0` | grep -v grep | wc -l) |
| pankso@1 | 122 if [ "$ps" == "1" ]; then |
| pankso@1 | 123 echo -ne "\Unmounting virtual filesystems..." |
| pankso@1 | 124 umount $ROOTFS/dev/shm |
| pankso@1 | 125 umount $ROOTFS/dev/pts |
| pankso@1 | 126 umount $ROOTFS/sys |
| pankso@1 | 127 umount $ROOTFS/proc |
| pankso@1 | 128 status |
| pankso@1 | 129 else |
| pankso@1 | 130 echo -e "\nProcess: $ps\n" |
| pankso@1 | 131 ps | grep `basename $0` | grep -v grep |
| pankso@1 | 132 echo -e "\nLeaving virtual filesystems unmounted (`pidof tazdev`)...\n" |
| pankso@1 | 133 fi |
| pankso@1 | 134 } |
| pankso@1 | 135 |
| pankso@1 | 136 # Get the last cooking base rootfs, extract and configure. |
| pankso@1 | 137 gen_new_chroot() |
| pankso@1 | 138 { |
| pankso@1 | 139 echo -e "\nGenerating new chroot in : $ROOTFS" |
| pankso@1 | 140 echo "================================================================================" |
| pankso@1 | 141 mkdir -p $ROOTFS && cd $ROOTFS |
| pankso@1 | 142 wget $DL_URL/boot/cooking/rootfs-base.gz |
| pankso@1 | 143 echo -n "Extracting the rootfs..." |
| pankso@1 | 144 lzma d rootfs-base.gz -so | cpio -id |
| pankso@1 | 145 rm rootfs-base.gz |
| pankso@1 | 146 echo -n "Creating resolv.conf..." |
| pankso@1 | 147 cat /etc/resolv.conf > etc/resolv.conf |
| pankso@1 | 148 status |
| pankso@1 | 149 echo "================================================================================" |
| pankso@1 | 150 echo -e "Ready to chroot. Use 'tazdev chroot [version|path]'" |
| pankso@1 | 151 echo -e "Example: tazdev chroot $ROOTFS\n" |
| pankso@1 | 152 } |
| pankso@1 | 153 |
| pankso@1 | 154 # Remove obsolate slitaz packages |
| pankso@1 | 155 purge_packages() |
| pankso@1 | 156 { |
| pankso@1 | 157 arg=$1 |
| pankso@1 | 158 TMP_FILE=/tmp/tazdev.$$ |
| pankso@1 | 159 ls $BUILD_WOK | while read pkg; do |
| pankso@1 | 160 [ -f $BUILD_WOK/$pkg/taz/*/receipt ] || continue |
| pankso@1 | 161 EXTRAVERSION="" |
| pankso@1 | 162 . $BUILD_WOK/$pkg/taz/*/receipt |
| pankso@1 | 163 echo $PACKAGE-$VERSION$EXTRAVERSION.tazpkg |
| pankso@1 | 164 done > $TMP_FILE |
| pankso@1 | 165 ls $SLITAZ/chroot/home/slitaz/packages | while read pkg; do |
| pankso@1 | 166 case "$pkg" in |
| pankso@1 | 167 *.tazpkg) |
| pankso@1 | 168 grep -q ^$pkg$ $TMP_FILE && continue |
| pankso@1 | 169 echo Remove $pkg |
| pankso@1 | 170 [ "$arg" == "purge" ] && |
| pankso@1 | 171 rm -f $SLITAZ/chroot/home/slitaz/packages/$pkg ;; |
| pankso@1 | 172 esac |
| pankso@1 | 173 done |
| pankso@1 | 174 rm -f $TMP_FILE |
| pankso@1 | 175 } |
| pankso@1 | 176 |
| pankso@1 | 177 # Remove obsolate source tarballs |
| pankso@1 | 178 purge_sources() |
| pankso@1 | 179 { |
| pankso@1 | 180 arg=$1 |
| pankso@1 | 181 TMP_FILE=/tmp/tazdev.$$ |
| pankso@1 | 182 ls $BUILD_WOK | while read pkg; do |
| pankso@1 | 183 [ -f $BUILD_WOK/$pkg/receipt ] || continue |
| pankso@1 | 184 TARBALL="" |
| pankso@1 | 185 . $BUILD_WOK/$pkg/receipt |
| pankso@1 | 186 [ -n "$TARBALL" ] && echo $TARBALL |
| pankso@1 | 187 grep SOURCES_REPOSITORY/ $BUILD_WOK/$pkg/receipt | sed \ |
| pankso@1 | 188 -e 's|.*SOURCES_REPOSITORY/\([^ ]*\)\( .*\)$|\1|' \ |
| pankso@1 | 189 -e 's|.*SOURCES_REPOSITORY/\([^ ]*\)$|\1|' | sort | uniq | \ |
| pankso@1 | 190 sed "s|['\"/]||g" | while read file ; do |
| pankso@1 | 191 eval echo $file 2> /dev/null |
| pankso@1 | 192 done |
| pankso@1 | 193 done > $TMP_FILE |
| pankso@1 | 194 ls $SLITAZ/chroot/home/slitaz/src | while read pkg; do |
| pankso@1 | 195 grep -q ^$pkg$ $TMP_FILE && continue |
| pankso@1 | 196 echo Remove $pkg |
| pankso@1 | 197 [ "$arg" == "purge" ] && |
| pankso@1 | 198 rm -f $SLITAZ/chroot/home/slitaz/src/$pkg |
| pankso@1 | 199 done |
| pankso@1 | 200 rm -f $TMP_FILE |
| pankso@1 | 201 } |
| pankso@1 | 202 |
| pankso@1 | 203 case "$1" in |
| pankso@1 | 204 cmplog) |
| pankso@1 | 205 # Log 'tazwok cmp' for the web interface (can be used via a cron job). |
| pankso@1 | 206 check_root |
| pankso@1 | 207 echo -e "Starting 'tazwok cmp' (can be long)...\n" |
| pankso@1 | 208 tazwok cmp | grep ^[A-Z] | tee $CMP_LOG |
| pankso@1 | 209 echo "Date: `date`" >> $CMP_LOG ;; |
| pankso@1 | 210 '-ps'|projects-stats) |
| pankso@1 | 211 echo -e "\nStatistics for: $PROJECTS\n" |
| pankso@1 | 212 echo -n "Project" && echo -ne "\033[24G Size" && echo -ne "\033[38G Revision" |
| pankso@1 | 213 echo -ne "\033[48G Version" && echo -e "\033[64G Files" |
| pankso@1 | 214 echo "================================================================================" |
| pankso@1 | 215 cd $PROJECTS |
| pankso@1 | 216 for proj in * |
| pankso@1 | 217 do |
| pankso@1 | 218 rev="" |
| pankso@1 | 219 echo -n "$proj" |
| pankso@1 | 220 size=`du -sh $proj | awk '{ print $1 }'` |
| pankso@1 | 221 echo -ne "\033[24G $size" |
| pankso@1 | 222 if [ -d $proj/.hg ]; then |
| pankso@1 | 223 cd $proj |
| pankso@1 | 224 rev=`hg head --template '{rev}\n'` |
| pankso@1 | 225 vers=`hg tags | head -n 2 | tail -n 1 | cut -d " " -f 1` |
| pankso@1 | 226 echo -ne "\033[38G $rev" |
| pankso@1 | 227 echo -ne "\033[48G $vers" && cd .. |
| pankso@1 | 228 fi |
| pankso@1 | 229 files=`find $proj -type f | wc -l` |
| pankso@1 | 230 echo -e "\033[64G $files" |
| pankso@1 | 231 done |
| pankso@1 | 232 echo "================================================================================" |
| pankso@1 | 233 echo "" ;; |
| pankso@1 | 234 update-wok) |
| pankso@1 | 235 # Update the Hg wok and copy it to the chroot env. Hg wok is |
| pankso@1 | 236 # copied to the chroot wok to avoid messing with build result |
| pankso@1 | 237 # file and so we can also modify receipt directly without affecting |
| pankso@1 | 238 # the Hg wok. |
| pankso@1 | 239 check_root |
| pankso@1 | 240 get_version $@ |
| pankso@1 | 241 echo "" |
| pankso@1 | 242 echo "Hg wok : $HG_WOK" |
| pankso@1 | 243 echo "Build wok : $BUILD_WOK" |
| pankso@1 | 244 cd $HG_WOK |
| pankso@1 | 245 hg pull && hg update |
| pankso@1 | 246 echo -n "Copying Hg wok to the build wok... " |
| pankso@1 | 247 cp -a $HG_WOK/* $BUILD_WOK |
| pankso@1 | 248 cp -a $HG_WOK/.hg $BUILD_WOK |
| pankso@1 | 249 status && echo "" ;; |
| pankso@1 | 250 update-www) |
| pankso@1 | 251 # Update website from repo. |
| pankso@1 | 252 echo "" |
| pankso@1 | 253 cd $WEBSITE && hg pull && hg update |
| pankso@1 | 254 echo "" ;; |
| pankso@1 | 255 chroot) |
| pankso@1 | 256 # Chroot into a build env. Default to cooking configured in |
| pankso@1 | 257 # tazdev.conf |
| pankso@1 | 258 check_root |
| pankso@1 | 259 get_version $@ |
| pankso@1 | 260 mount_chroot |
| pankso@1 | 261 echo -e "\nChrooting in $ROOTFS...\n" |
| pankso@1 | 262 chroot $ROOTFS /bin/sh --login |
| pankso@1 | 263 umount_chroot |
| pankso@1 | 264 echo -e "Exiting $ROOTFS chroot environment...\n" ;; |
| pankso@1 | 265 gen-chroot) |
| pankso@1 | 266 check_root |
| pankso@1 | 267 get_version $@ |
| pankso@1 | 268 # Dont break another env. |
| pankso@1 | 269 if [ -d $ROOTFS/bin ]; then |
| pankso@1 | 270 echo -e "\nA chroot environment already exists in : $ROOTFS\n" |
| pankso@1 | 271 exit 1 |
| pankso@1 | 272 fi |
| pankso@1 | 273 gen_new_chroot ;; |
| pankso@1 | 274 clean-chroot) |
| pankso@1 | 275 # Keep root/ and /home they may have a build wok, custom scripts, etc. |
| pankso@1 | 276 check_root |
| pankso@1 | 277 if [ -z "$2" ]; then |
| pankso@1 | 278 echo -e "\nPlease specify the path to the chroot environment to clean.\n" |
| pankso@1 | 279 exit 0 |
| pankso@1 | 280 else |
| pankso@1 | 281 ROOTFS=$2 |
| pankso@1 | 282 if [ ! -d "$ROOTFS" ]; then |
| pankso@1 | 283 echo -e "\nWarning : $ROOTFS doesn't exist!\n" |
| pankso@1 | 284 exit 1 |
| pankso@1 | 285 fi |
| pankso@1 | 286 fi |
| pankso@1 | 287 if [ -d $ROOTFS/proc/1 ]; then |
| pankso@1 | 288 echo -e "\nWarning : $ROOTFS/proc mounted!\n" |
| pankso@1 | 289 exit 1 |
| pankso@1 | 290 fi |
| pankso@1 | 291 cd $ROOTFS || exit 1 |
| pankso@1 | 292 echo -e "\nCleaning chroot in: $ROOTFS" |
| pankso@1 | 293 echo "================================================================================" |
| pankso@1 | 294 for i in bin dev etc init lib media mnt proc sbin sys tmp usr var |
| pankso@1 | 295 do |
| pankso@1 | 296 echo -n "Removing: $i (`du -sh $i | awk '{ print $1 }'`)... " |
| pankso@1 | 297 rm -rf $i |
| pankso@1 | 298 status |
| pankso@1 | 299 done |
| pankso@1 | 300 echo "================================================================================" |
| pankso@1 | 301 echo "" ;; |
| pankso@1 | 302 '-p'|push) |
| pankso@1 | 303 check_mirror $@ |
| pankso@1 | 304 rsync -r -t -l -v -z --delete \ |
| pankso@1 | 305 $LOCAL_DIR -e ssh $USER@$MIRROR:$REMOTE_DIR ;; |
| pankso@1 | 306 '-dp'|dry-push) |
| pankso@1 | 307 check_mirror $@ |
| pankso@1 | 308 rsync -r -t -l -v -z --delete --dry-run \ |
| pankso@1 | 309 $LOCAL_DIR -e ssh $USER@$MIRROR:$REMOTE_DIR ;; |
| pankso@1 | 310 pull) |
| pankso@1 | 311 check_mirror $@ |
| pankso@1 | 312 rsync -r -t -l -v -z --delete \ |
| pankso@1 | 313 -e ssh $USER@$MIRROR:$REMOTE_DIR $LOCAL_DIR ;; |
| pankso@1 | 314 dry-pull) |
| pankso@1 | 315 check_mirror $@ |
| pankso@1 | 316 rsync -r -t -l -v -z --delete --dry-run \ |
| pankso@1 | 317 -e ssh $USER@$MIRROR:$REMOTE_DIR $LOCAL_DIR ;; |
| pankso@1 | 318 purge|dry-purge) |
| pankso@1 | 319 check_root |
| pankso@1 | 320 get_version $@ |
| pankso@1 | 321 purge_packages $1 |
| pankso@1 | 322 purge_sources $1 ;; |
| pankso@1 | 323 relpkg) |
| pankso@1 | 324 [ -z "$MIRROR_SOURCES" ] && MIRROR_SOURCES="/var/www/slitaz/mirror/sources" |
| pankso@1 | 325 if [ -z $2 ] || [ -z $3 ]; then |
| pankso@1 | 326 echo -e "\nUsage: $0 relpkg package version\n" |
| pankso@1 | 327 exit 0 |
| pankso@1 | 328 fi |
| pankso@1 | 329 PACKAGE=$2 |
| pankso@1 | 330 VERSION=$3 |
| pankso@1 | 331 echo "" |
| pankso@1 | 332 cd $PROJECTS/$PACKAGE |
| pankso@1 | 333 # Sanity check |
| pankso@1 | 334 if ! grep -q $VERSION$ .hgtags; then |
| pankso@1 | 335 echo "Missing Hg tag for version: $VERSION" |
| pankso@1 | 336 echo -e "You may want to: hg tag $VERSION && hg push\n" |
| pankso@1 | 337 exit 0 |
| pankso@1 | 338 fi |
| pankso@1 | 339 # Archive |
| pankso@1 | 340 echo -n "Creating tarball and md5sum for: $PACKAGE-$VERSION... " |
| pankso@1 | 341 hg archive -t tgz $PACKAGE-$VERSION.tar.gz |
| pankso@1 | 342 md5sum $PACKAGE-$VERSION.tar.gz > $PACKAGE-$VERSION.md5 |
| pankso@1 | 343 echo "Done" |
| pankso@1 | 344 # Upload |
| pankso@1 | 345 echo -n "Do you wish to upload tarball to the mirror [N/y] ? " |
| pankso@1 | 346 read upload |
| pankso@1 | 347 if [ "$upload" = "y" ]; then |
| pankso@1 | 348 echo "Uploading to: $MIRROR/sources/${PACKAGE#slitaz-}" |
| pankso@1 | 349 scp $PACKAGE-$VERSION.tar.gz $PACKAGE-$VERSION.md5 \ |
| pankso@1 | 350 $USER@$MIRROR:$MIRROR_SOURCES/${PACKAGE#slitaz-} |
| pankso@1 | 351 fi ;; |
| pankso@1 | 352 usage|*) |
| pankso@1 | 353 usage ;; |
| pankso@1 | 354 esac |
| pankso@1 | 355 |
| pankso@1 | 356 exit 0 |