build.common

   1 # -*-Shell-script-*-
   2 #
   3 # Common functions for build scripts used by various packages
   4 # incorporated (e.g., build, myplc, myplc-devel, vserver-reference)
   5 #
   6 # Marc E. Fiuczynski <mef@cs.princeton.edu>
   7 # Copyright (C) 2007 The Trustees of Princeton University
   8 #
   9 # $Id$
  10 #
  11
  12 function pl_getDefaultDistro() {
  13     # FC4 is currently the default release
  14     echo "Fedora"
  15     return 0
  16 }
  17
  18 function pl_getDefaultRelease() {
  19     # FC4 is currently the default release
  20     echo "4"
  21     return 0
  22 }
  23
  24 function pl_getDistro() {
  25     defaultDistro=$(pl_getDefaultDistro)
  26     if [ -f "/etc/redhat-release" ] ; then
  27         distro=$(awk ' { print $1 } ' /etc/redhat-release)
  28     else
  29         distro=$defaultDistro
  30     fi
  31     echo "$distro"
  32     return 0
  33 }
  34
  35 function pl_getRelease() {
  36     defaultRelease=$(pl_getDefaultRelease)
  37     if [ -f "/etc/redhat-release" ] ; then
  38         release=$(awk ' { if ($1=="Fedora" && $2=="Core") print $4 ; if (($1=="Fedora" && $2!="Core")||$1=="CentOS") print $3 } ' /etc/redhat-release)
  39         [ $release -lt $defaultRelease ] && release=$defaultRelease
  40     else
  41         release=$defaultRelease
  42     fi
  43     echo "$release"
  44     return 0
  45 }
  46
  47 # vserver expects something like fc4 or f7
  48 # for fedora and centos only for now
  49 function pl_getReleaseName () {
  50     distro=$1; shift
  51     release=$1; shift
  52     case $distro in
  53         [Ff]edora*)
  54             if [ "$release" -le 6 ] ; then
  55                 releasename=fc$release
  56             else
  57                 releasename=f$release
  58             fi ;;
  59         [Cc]entOS*)
  60             old_IFS="$IFS"
  61             IFS="."
  62             set -- $release
  63             IFS="$old_IFS"
  64             releasename=centos$1
  65             ;;
  66         *)
  67             releasename="unknown-name-for-${pl_DISTRO}-please-edit-build.common"
  68             echo 1>&2 "build.common: WARNING - releasename not set for distro=$distro"
  69             return 1
  70             ;;
  71     esac
  72     echo "$releasename"
  73     return 0
  74 }
  75
  76 # figure out which redhat distro we are using (fedora, centos, redhat)
  77 pl_DISTRO=$(pl_getDistro)
  78
  79 # select basearch of the host devel environment - protected for macos for local tests
  80 pl_DISTRO_ARCH=$(uname -i 2>/dev/null|| echo unknownarch)
  81
  82 # the release number (plain number)
  83 pl_DISTRO_RELEASE=$(pl_getRelease)
  84
  85 # the release name - for vserver build - like fc4, f8 or centos4
  86 pl_DISTRO_NAME=$(pl_getReleaseName $pl_DISTRO $pl_DISTRO_RELEASE)
  87
  88 # get path to appropriate yumgroups.xml file
  89 # Thierry: quick & dirty improvement
  90 # this file is updated by the toplevel build, from groups/<pldistro>.xml
  91 pl_DISTRO_YUMGROUPS="../../../RPMS/yumgroups.xml"
  92
  93 function pl_process_fedora_options () {
  94     # Get options
  95     shiftcount=0
  96     while getopts "l:r:a:h" opt ; do
  97         case $opt in
  98             l)
  99                 pl_DISTRO_URL=$OPTARG
 100                 let shiftcount=$shiftcount+2
 101                 ;;
 102             r)
 103                 pl_DISTRO_RELEASE=$OPTARG
 104                 let shiftcount=$shiftcount+2
 105                 ;;
 106             a)
 107                 pl_DISTRO_ARCH=$OPTARG
 108                 let shiftcount=$shiftcount+2
 109                 ;;
 110             h|*)
 111                 echo "Usage: $0 [OPTION]..."
 112                 echo "  -l url          distro mirror location (default: $pl_DISTRO_URL)"
 113                 echo "  -r release      distro release number (default: $pl_DISTRO_RELEASE)"
 114                 echo "  -a arch         distro architecture (default: $pl_DISTRO_ARCH)"
 115                 echo "where distro can be either fedora, centos, or redhat"
 116                 echo "  -h              This message"
 117                 exit 1
 118                 ;;
 119         esac
 120     done
 121     return $shiftcount
 122 }
 123
 124 ######################################## handling a root image
 125 function pl_root_rpm_macros () {
 126     cat <<EOF
 127 %_install_langs C:en_US:en
 128 %_netsharedpath /proc:/dev/pts:/usr/share/info
 129 %_excludedocs 1
 130 %__file_context_path /dev/null
 131 EOF
 132 }
 133
 134 function pl_root_makedevs() {
 135     vroot=$1
 136     # Clean ${vroot}/dev, but only when ${vroot}!=""
 137     [ -n $vroot ] && rm -rf $vroot/dev
 138
 139     mkdir -p $vroot/dev
 140     mknod -m 666 $vroot/dev/null c 1 3
 141     mknod -m 666 $vroot/dev/zero c 1 5
 142     mknod -m 666 $vroot/dev/full c 1 7
 143     mknod -m 644 $vroot/dev/random c 1 8
 144     mknod -m 644 $vroot/dev/urandom c 1 9
 145     mknod -m 666 $vroot/dev/tty c 5 0
 146     mknod -m 666 $vroot/dev/ptmx c 5 2
 147     # For bash command substitution
 148     ln -nsf ../proc/self/fd $vroot/dev/fd
 149
 150     # For df and linuxconf
 151     touch $vroot/dev/hdv1
 152
 153     # For pseudo ttys
 154     mkdir -p $vroot/dev/pts
 155
 156     # (Might have to remove the following for vserver-reference.)
 157
 158     # for tmpfs mount
 159     mkdir -p $vroot/dev/shm
 160
 161     # For TUN/TAP
 162     mkdir -p $vroot/dev/net
 163     mknod -m 600 $vroot/dev/net/tun c 10 200
 164
 165     # For mkinitrd (in case a kernel is being installed)
 166     # As well for loop back mounting within a vserver.
 167     for i in $(seq 0 255) ; do
 168         mknod -m 640 $vroot/dev/loop$i b 7 $i
 169     done
 170 }
 171
 172 function mkfedora_usage() {
 173     echo "Usage: pl_root_mkfedora [OPTION]... basedir pldistro pkgsfile(s)"
 174     echo "      -l url          Fedora mirror location."
 175     echo "                      Defaults are searched in <pldistro>.mirrors"
 176     echo "      -v              Be verbose"
 177     echo "      -h              This message"
 178     echo " target selection (defaults based on current build vserver)"
 179     echo "      -r release      Fedora release number (default: $releasever)"
 180     echo "      -a arch         Fedora architecture (default: $basearch)"
 181     exit 1
 182 }
 183
 184 function pl_root_mkfedora () {
 185
 186     echo "* Entering pl_root_mkfedora" "$@"
 187
 188     if [ $UID -ne 0 ] ; then
 189         echo "Error: You must run this script as root."
 190         exit 1
 191     fi
 192
 193 # Verbosity
 194     verbose=0
 195
 196 # Release and architecture to install : defaults to current vserver's settings or previously parsed fedora_options
 197     releasever=$pl_DISTRO_RELEASE
 198     basearch=$pl_DISTRO_ARCH
 199
 200 # Get options
 201     mirrors=""
 202     while getopts "l:r:a:vh" opt ; do
 203         case $opt in
 204             l)
 205                 mirrors="$mirrors $OPTARG"
 206                 ;;
 207             r)
 208                 releasever=$OPTARG
 209                 ;;
 210             a)
 211                 basearch=$OPTARG
 212                 ;;
 213             v)
 214                 verbose=1
 215                 set -x
 216                 ;;
 217             h|*)
 218                 mkfedora_usage
 219                 ;;
 220         esac
 221     done
 222
 223     shift $(($OPTIND - 1))
 224     [[ "$#" -lt 3 ]] && mkfedora_usage
 225     vroot=$1 ; shift
 226     pldistro=$1 ; shift
 227     pkgsfile="$@"
 228     vroot=$(cd $vroot && pwd -P)
 229     [ -d $vroot ] || mkfedora_usage
 230
 231
 232     # parse pkgsfile and add to local vars
 233     fcdistro=${pl_DISTRO_NAME}
 234     pkgs_packages=$(pl_parsePkgs package $fcdistro $pldistro $pkgsfile)
 235     pkgs_groups=$(pl_parsePkgs group $fcdistro $pldistro $pkgsfile)
 236     # packages to exclude - obsolete, was maybe useful when installing a group
 237     pkgs_excludes=$(pl_parsePkgs exclude $fcdistro $pldistro $pkgsfile)
 238     pkgs_junk=$(pl_parsePkgs junk $fcdistro $pldistro $pkgsfile)
 239     pkgs_precious=$(pl_parsePkgs precious $fcdistro $pldistro $pkgsfile)
 240     # formerly related to mkfedora -k
 241     pkgs_kexcludes=$(pl_parsePkgs kexclude $fcdistro $pldistro $pkgsfile)
 242     # get mirrors if not specified with -l
 243     if [ -z "$mirrors" ] ; then
 244         mirrorsfile=$(pl_locateDistroFile ../build/ $pldistro "$pldistro.mirrors")
 245         mirrors=$(pl_parsePkgs mirror $fcdistro $pldistro $mirrorsfile)
 246     fi
 247
 248     exclude_kernel=""
 249     # add them manually as the output of pl_parsePkgs is line-separated
 250     if [ -n "$pkgs_kexcludes" ] ; then
 251         exclude_kernel="exclude="
 252         for kexclude in $pkgs_kexcludes ; do
 253             exclude_kernel="$exclude_kernel $kexclude"
 254         done
 255     fi
 256
 257     function mkfedora_fetch ()
 258     {
 259         curl --fail --silent --max-time 60 "$1"
 260     }
 261
 262     # set list of attempted locations according to target distro
 263     # xxx all this should go into mirroring/ somehow
 264     case $pl_DISTRO in
 265         Fedora)
 266             if [ $releasever -ge 7 ] ; then
 267                 public_gpg_key=RPM-GPG-KEY-fedora
 268                 # Plain Fedora comes with a new layout
 269                 attempts_base="
 270 fedora/releases/$releasever/Everything/$basearch/os
 271 linux/releases/$releasever/Everything/$basearch/os
 272 "
 273                 optionals="updates"
 274                 attempts_optional="
 275 fedora/@optional@/$releasever/$basearch
 276 "
 277             else
 278                 # Fedora Core
 279                 public_gpg_key=RPM-GPG-KEY-fedora
 280                 attempts_base="
 281 fedora/core/$releasever/$basearch/os
 282 linux/core/$releasever/$basearch/os
 283 core/$releasever/$basearch/os
 284 $releasever/$basearch/os
 285 "
 286                 optionals="updates extras"
 287                 attempts_optional="
 288 linux/core/@optional@/$releasever/$basearch \
 289 core/@optional@/$releasever/$basearch \
 290 linux/@optional@/$releasever/$basearch \
 291 @optional@/$releasever/$basearch \
 292 "
 293             fi
 294             ;;
 295         CentOS)
 296             # xxx hacky for now
 297             # you can use vbuild-fedora-mirror with -f centos5.1
 298             # which is hard-coded in mirroring/centos as well
 299             # for now I do the mapping here, mmhh
 300             public_gpg_key=RPM-GPG-KEY-CentOS-$releasever
 301             case $releasever in
 302                 4) actual=4.6 ;;
 303                 5) actual=5.1 ;;
 304                 *) actual=$releasever ;;
 305             esac
 306             attempts_base="
 307 centos/$actual/os/$basearch
 308 "
 309             optionals="updates extras"
 310             attempts_optional="
 311 linux/core/@optional@/$releasever/$basearch \
 312 core/@optional@/$releasever/$basearch \
 313 linux/@optional@/$releasever/$basearch \
 314 @optional@/$releasever/$basearch \
 315 "
 316             ;;
 317         *)
 318             echo "distro $pl_DISTRO not supported in build.common / mkfedora" ; exit 1
 319     esac
 320
 321     echo "$0: candidate mirrors"
 322     for mirror in $mirrors ; do
 323         echo "* candidate mirror $mirror"
 324     done
 325     baseurl=""
 326     for mirror in $mirrors ; do
 327         for attempt in $attempts_base; do
 328             attempturl=$mirror/$attempt
 329             if mkfedora_fetch $attempturl/repodata/repomd.xml >/dev/null ; then
 330                 baseurl=$attempturl
 331                 break 2
 332             fi
 333         done
 334     done
 335
 336     if [ -z "$baseurl" ] ; then
 337         echo "Error: $releasever/$basearch/os/repodata/repomd.xml"
 338         echo "       could not be found in any of the following locations:"
 339         echo
 340         for mirror in $mirrors ; do
 341             for attempt in $attempts_base ; do
 342                 echo $mirror/$attempt
 343             done
 344         done
 345         echo
 346         mkfedora_usage
 347     else
 348         echo "* selecting mirror with baseurl=$baseurl"
 349     fi
 350
 351     # Do not tolerate errors
 352     set -e
 353
 354     ## make rpms ignore installing stuff to special fs entries like /proc
 355     # Because of https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=52725
 356     # you have to use at least one language beside 'C'
 357     # Prevent all locales from being installed in reference image
 358     mkdir -p $vroot/etc/rpm
 359     pl_root_rpm_macros > $vroot/etc/rpm/macros
 360
 361     # Trick rpm and yum, who read the real root /etc/rpm/macros file
 362     # rather than the one installed in the reference image, despite what
 363     # you might expect the --root and --installroot options to mean. Both
 364     # programs always read $HOME/.rpmmacros.
 365     export HOME=$vroot/tmp
 366     mkdir -p $vroot/tmp
 367     pl_root_rpm_macros > $vroot/tmp/.rpmmacros
 368
 369     function mkfedora_cleanup () {
 370         umount -l $vroot/proc
 371         umount -l $vroot/dev/shm
 372         umount -l $vroot/dev/pts
 373     }
 374
 375     # Clean up before exiting if anything goes wrong
 376     trap "mkfedora_cleanup" ERR INT
 377
 378     # Mount in reference image
 379     mount -t devpts none $vroot/dev/pts
 380     mount -t tmpfs none $vroot/dev/shm
 381     mkdir -p $vroot/proc
 382     mount -t proc none $vroot/proc
 383
 384     # Create a /var/lib dirs for yum & rpm
 385     mkdir -p $vroot/var/lib/yum
 386     mkdir -p $vroot/var/lib/rpm
 387     mkdir -p $vroot/usr/share/info
 388
 389     # Create a dummy /etc/fstab in reference image
 390     mkdir -p $vroot/etc
 391     cat >$vroot/etc/fstab <<EOF
 392 # This fake fstab exists only to please df and linuxconf.
 393 /dev/hdv1       /       ext2    defaults        1 1
 394 EOF
 395     cp $vroot/etc/fstab $vroot/etc/mtab
 396
 397     # Necessary for some scripts
 398     mkdir -p $vroot/etc/sysconfig
 399     echo "NETWORKING=yes" > $vroot/etc/sysconfig/network
 400
 401     # Initialize RPM database in reference image
 402     mkdir -p $vroot/var/lib/rpm
 403     rpm --root $vroot --initdb
 404     rpm --root $vroot --import $baseurl/$public_gpg_key
 405
 406     # Initialize yum in reference image
 407     mkdir -p $vroot/var/cache/yum $vroot/var/log
 408     if [ $releasever -lt 7 ] ; then
 409         corename="Core "
 410     else
 411         corename=""
 412     fi
 413
 414 # yum.conf is for building only - store in different location than /etc/yum.conf
 415     yum_conf=$vroot/etc/mkfedora-yum.conf
 416     cat > $yum_conf <<EOF
 417 [main]
 418 cachedir=/var/cache/yum
 419 debuglevel=2
 420 logfile=/var/log/yum.log
 421 pkgpolicy=newest
 422 distroverpkg=redhat-release
 423 tolerant=1
 424 exactarch=1
 425 retries=20
 426 obsoletes=1
 427 gpgcheck=0
 428 # Prevent yum-2.4 from loading additional repository definitions
 429 # (e.g., from /etc/yum.repos.d/)
 430 reposdir=/dev/null
 431
 432 [base]
 433 name=Fedora ${corename}${releasever} - $basearch - base
 434 baseurl=$baseurl/
 435 $exclude_kernel
 436 EOF
 437
 438     for optional in $optionals ; do
 439         found=""
 440         # locating updates/extras
 441         attempts=$(echo $attempts_optional | sed -e s,@optional@,$optional,g)
 442         for attempt in $attemps; do
 443             optionalurl=$mirror/$attempt
 444             echo "* $optional : Trying to fetch $optionalurl"
 445             if mkfedora_fetch $optionalurl/repodata/repomd.xml ; then
 446                 echo "* FOUND!"
 447                 cat >> $yum_conf <<EOF
 448
 449 [$(basename $optional)]
 450 name=Fedora ${corename}${releasever} - $basearch - $(basename $optional)
 451 baseurl=$optionalurl/
 452 $exclude_kernel
 453 EOF
 454                 found=true
 455                 break
 456             fi
 457         done
 458         if [ -z "$found" ] ; then
 459             echo "pl_root_mkfedora cannot find repository for $optional"
 460             exit 1
 461         fi
 462     done
 463
 464     # If we are being built as part of an automated RPM build, solve the
 465     # bootstrap problem by including any just built packages in the yum
 466     # configuration. This cooperates with the PlanetLab build system.
 467     if [ -n "$RPM_BUILD_DIR" ] ; then
 468         RPM_RPMS_DIR=$(cd $(dirname $RPM_BUILD_DIR)/RPMS && pwd -P)
 469         # If run under sudo, allow user to delete the headers/ and
 470         # repodata/ directories.
 471         if [ -n "$SUDO_USER" ] ; then
 472             chown -R $SUDO_USER $RPM_RPMS_DIR
 473         fi
 474         cat >> $yum_conf <<EOF
 475
 476 [bootstrap]
 477 name=Bootstrap - $basearch - $RPM_RPMS_DIR/
 478 baseurl=file://$RPM_RPMS_DIR/
 479 EOF
 480 fi
 481
 482     echo "========== Dumping $yum_conf"
 483     cat $yum_conf
 484     echo "========== EndDump $yum_conf"
 485
 486     yum_options=""
 487     yum --help | grep verbose &> /dev/null && yum_options="$yum_options --verbose"
 488     yum_options="$yum_options -y"
 489     yum_options="$yum_options -c $yum_conf"
 490     yum_options="$yum_options --installroot=$vroot"
 491
 492     exclude_arg=""
 493     for exclude in $pkgs_excludes; do
 494         exclude_arg="$exclude_arg --exclude $exclude"
 495     done
 496
 497     # glibc must be specified explicitly for the correct arch to be
 498     # chosen.
 499     echo "* Installing glibc"
 500     yum $yum_options $exclude_arg install glibc
 501
 502     # Go, baby, go
 503     if [ -n "$pkgs_packages" ] ; then
 504         echo "* Installing optional packages" $pkgs_packages
 505         yum $yum_options $exclude_arg install $pkgs_packages
 506         if ! rpm --root $vroot -q $pkgs_packages >/dev/null ; then
 507             echo "* Warning: Missing packages"
 508             rpm --root $vroot -q $pkgs_packages | grep "not installed"
 509         fi
 510     fi
 511
 512     if [ -n "$pkgs_groups" ] ; then
 513        ## call yum sequentially to get finer-grained info on dependencies
 514         for grp in $pkgs_groups ; do
 515             echo "* Installing optional group $grp"
 516             yum $yum_options $exclude_arg groupinstall "$grp"
 517         done
 518     fi
 519
 520     # formerly in bootcd/prep.sh : to optimize footprint
 521     if [ -n "$pkgs_junk" ] ; then
 522         echo "* Removing unnecessary junk"
 523         pushd $vroot
 524         # Save precious files
 525         [ -n "$pkgs_precious" ] && tar --ignore-failed-read -cpf precious.tar $pkgs_precious
 526         # Remove unnecessary junk
 527         [ -n "$pkgs_junk" ] && rm -rf $pkgs_junk
 528         # Restore precious files
 529         [ -n "$pkgs_precious" ] && tar -xpf precious.tar && rm -f precious.tar
 530         popd
 531     fi
 532
 533     # Clean yum cache
 534     echo "* Cleaning up"
 535     yum $yum_options clean all
 536
 537     # Clean RPM state
 538     rm -f $vroot/var/lib/rpm/__db*
 539
 540     # Set time zone to UTC
 541     if [ -f $vroot/usr/share/zoneinfo/UTC -a -f $vroot/etc/localtime ] ; then
 542         rm -f $vroot/etc/localtime
 543         ln -s /usr/share/zoneinfo/UTC $vroot/etc/localtime
 544     fi
 545
 546     echo "Dumping current list of rpms in /etc/mkfedora-rpms.txt"
 547     chroot $vroot rpm -aq | sort > $vroot/etc/mkfedora-rpms.txt
 548
 549     # remove trap handler, as we are about to call it directly.
 550     trap - ERR INT
 551
 552     # Clean up
 553     mkfedora_cleanup
 554
 555     return 0
 556 }
 557
 558 function pl_root_tune_image () {
 559     root=$1; shift
 560
 561     # Disable all services in reference image
 562     chroot $root sh -c "/sbin/chkconfig --list | awk '{ print \$1 }' | xargs -i /sbin/chkconfig {} off"
 563
 564     # FC2 minilogd starts up during shutdown and makes unmounting
 565     # impossible. Just get rid of it.
 566     rm -f $root/sbin/minilogd
 567     ln -nsf /bin/true $root/sbin/minilogd
 568
 569     # This tells the Boot Manager that it is okay to update
 570     # /etc/resolv.conf and /etc/hosts whenever the network configuration
 571     # changes. Users are free to delete this file.
 572     touch $root/etc/AUTO_UPDATE_NET_FILES
 573 }
 574
 575 # Move specified directories out of a src tree into a dst tree, and
 576 # then for each moved directory create a symlink in src to dst.
 577 function pl_move_dirs() {
 578     root=$1
 579     data=$2
 580     store=$3
 581     shift 3
 582
 583     mkdir -p $root/data
 584     for datadir in "$@" ; do
 585         mkdir -p ${data}${datadir}
 586         if [ -d ${root}/${datadir} -a ! -h ${root}/${datadir} ] ; then
 587             (cd ${root} && find ./${datadir} | cpio -p -d -u ../${data}/)
 588         fi
 589         rm -rf ${root}/${datadir}
 590         mkdir -p $(dirname ${root}/${datadir})
 591         ln -nsf ${store}/${datadir} ${root}/${datadir}
 592     done
 593 }
 594
 595 # Construct an image file from given some directory
 596 # XXX in the future maybe use livecdtools?
 597 function pl_make_image() {
 598     root=$1
 599     image=$2
 600     extraspace=$3
 601
 602     # Leave about 100 MB free space and allow for about 20% inode overhead
 603     bytes=$((($(du -sb $root | cut -f1) + $extraspace) * 120 / 100))
 604     bs=4096
 605     blocks=$(($bytes / $bs))
 606     dd bs=$bs count=$blocks if=/dev/zero of=$image
 607     mkfs.ext3 -b $bs -j -F $image
 608
 609     # Temporarily mount it
 610     tmp=$(mktemp -d tmp.XXXXXX)
 611     mount -o loop $image $tmp
 612     trap "umount $tmp; rmdir $tmp" ERR INT
 613
 614     # Move files to it
 615     (cd $root && tar cpf - .) | (cd $tmp && tar xpf -)
 616
 617     # Unmount it
 618     umount $tmp
 619     rmdir $tmp
 620     trap - ERR INT
 621 }
 622
 623 # Fix permissions on tmp directories
 624 function pl_fixtmp_permissions() {
 625     root=$1
 626     chmod 1777 $root/tmp $root/usr/tmp $root/var/tmp
 627 }
 628
 629 function pl_fixdirs() {
 630     root=$1
 631     datadirs=$2
 632     for datadir in datadirs ; do
 633         if [ -h ${root}/${datadir} ] ; then
 634             rm -f ${root}/${datadir}
 635             mkdir -p ${root}/${datadir}
 636         fi
 637     done
 638 }
 639
 640 ########## .pkgs format
 641 # comments start with a # - this is needed only if you use a keyword in a comment
 642
 643 function pl_getPkgsAttribute () {
 644     keyword=$1; shift
 645     file=$1; shift
 646     # remove any initial white spaces from the result
 647     grep -v '^#' $file | grep --regexp="^${keyword}:" | sed -e "s,${keyword}:,," -e "s,^[[:space:]][[:space:]]*,,"
 648 }
 649
 650 # for a given keyword like 'package' :
 651 # we support fcdistro-dependant format, for tokens (pkgname) without whitespace
 652 # you can e.g. use
 653 # package: pkg1 .. pkgn
 654 # package+f8: pkg1 .. pkgn
 655 # package-f8: pkg1 .. pkgn
 656 #
 657 # values can contain @arch@, @fcdistro@ or @pldistro@ that are replaced with the current values
 658 #
 659 function pl_parsePkgs () {
 660
 661     keyword=$1;shift
 662     fcdistro=$1; shift
 663     pldistro=$1; shift
 664     # remaining arguments are paths to the pkgs files
 665
 666     # grab regular descriptions
 667     all=$(grep -v '^#' "$@" | grep --regexp="^${keyword}:" | sed -e "s,${keyword}:,,")
 668     # grab additions
 669     add=$(grep -v '^#' "$@" | grep --regexp="^${keyword}+${fcdistro}:" | sed -e "s,${keyword}+${fcdistro}:,,")
 670     # grab exclusions
 671     sub=$(grep -v '^#' "$@" | grep --regexp="^${keyword}-${fcdistro}:" | sed -e "s,${keyword}-${fcdistro}:,,")
 672
 673     for i in $all $add; do
 674         for exclude in $sub; do
 675             [ "$i" = "$exclude" ] && continue 2
 676         done
 677         echo "$i " | sed -e "s,@arch@,$pl_DISTRO_ARCH,g" -e "s,@fcdistro@,$fcdistro,g" -e "s,@pldistro@,$pldistro,g"
 678     done
 679     return 0
 680 }
 681
 682 function pl_getPackages() { fcdistro=$1; shift ; pldistro=$1; shift ; pl_parsePkgs package $fcdistro $pldistro "$@" ; }
 683 function pl_getGroups() { fcdistro=$1; shift ; pldistro=$1; shift ; pl_parsePkgs group $fcdistro $pldistro "$@" ; }
 684
 685 # locates a pldistro-dependant file
 686 # tries first in build/<pldistro>/, then in build/planetlab/
 687 function pl_locateDistroFile () {
 688     builddir=$1; shift
 689     pldistro=$1; shift
 690     pkgsfile=$1; shift
 691
 692     pkgspath=""
 693     # locate it
 694     paths="$builddir/config.$pldistro/$pkgsfile $builddir/config.planetlab/$pkgsfile"
 695     for path in $paths; do
 696         if [ -f $path ] ; then
 697             pkgspath=$path
 698             break
 699         fi
 700     done
 701     if [ -z "$pkgspath" ] ; then
 702         echo 1>&2 "pl_locateDistroFile - in $(pwd) : cannot locate $pkgsfile in $builddir"
 703         echo 1>&2 "candidates were $paths"
 704         echo "not-found-by-pl_locateDistroFile"
 705         return 1
 706     else
 707         echo 1>&2 "pl_locateDistroFile: using $pkgspath"
 708         echo $pkgspath
 709         return 0
 710     fi
 711 }
 712
 713 function yumgroups_from_pkgs () {
 714     builddir=$1; shift
 715     pldistro=$1; shift
 716     fcdistro=$1; shift
 717     pkgsnames=$@
 718
 719     sedargs="-e s,@FCDISTRO@,$fcdistro,g"
 720
 721    cat <<__header
 722 <?xml version="1.0"?>
 723 <!DOCTYPE comps PUBLIC "-//Red Hat, Inc.//DTD Comps info//EN" "comps.dtd">
 724 <comps>
 725 __header
 726
 727     for pkgsname in $pkgsnames; do
 728         pkgsfile=$(pl_locateDistroFile $builddir $pldistro $pkgsname)
 729         packages=$(pl_getPackages $fcdistro $pldistro $pkgsfile)
 730
 731         groupname=$(pl_getPkgsAttribute groupname $pkgsfile | sed $sedargs)
 732         groupdesc=$(pl_getPkgsAttribute groupdesc $pkgsfile | sed $sedargs)
 733
 734         if [ -z "$groupname" -o -z "$groupdesc" ] ; then
 735             echo "Cannot find groupname: and groupdesc: in $pkgsfile -- skipped" 1>&2
 736             continue
 737         fi
 738
 739         cat << __group_header
 740   <group>
 741     <id>$(echo $groupname|tr A-Z a-z)</id>
 742     <name>$groupname</name>
 743     <description>$groupdesc</description>
 744     <uservisible>true</uservisible>
 745     <packagelist>
 746 __group_header
 747         for package in $packages; do
 748             echo "<packagereq type=\"mandatory\">$package</packagereq>"
 749         done
 750         cat << __group_footer
 751     </packagelist>
 752   </group>
 753 __group_footer
 754     done
 755 cat <<__footer
 756 </comps>
 757 __footer
 758 }