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