Changeset 1860 for trunk/packages/invirt-dev

Timestamp:

Dec 20, 2008, 1:58:21 AM (16 years ago)

Author:

price

Message:

invirt-build-release: clean up some shell and perl

Also wait to parse the .dsc file until we've made it.

Location:

trunk/packages/invirt-dev

Files:

• debian/changelog (modified) (1 diff)
• invirt-build-release (modified) (2 diffs)

trunk/packages/invirt-dev/debian/changelog

@@ -3 +3 @@
   * add i386 to apt repo
   * extend invirt-build-release to handle amd64 + i386
+  * invirt-build-release: clean up some shell and some perl
 
  -- Greg Price <price@mit.edu>  Fri, 19 Dec 2008 23:37:02 -0500

trunk/packages/invirt-dev/invirt-build-release

@@ -13 +13 @@
     cd build-release/$package
     
-    eval  `perl '-F:\s+' -lane 'print  $F[0]."=".$F[1] if /^Version|^Source|^Distribution/' \
-        <(dpkg-parsechangelog)`
-    eval $(perl '-F:\s+' -lane 'print $F[0]."=".$F[1] if /^Binary|Architecture/' <"../${Source}_${Version}.dsc")
-
+    eval $(perl -ne 'print if s/^(Version|Source|Distribution): /\1=/' \
+             <(dpkg-parsechangelog))
     dpkg-buildpackage -us -uc -rfakeroot -S
     cd ..
+    eval $(perl -ne 'print if s/^(Architecture): /\1=/' ${Source}_${Version}.dsc)
     case $Architecture in
       all)
-        sbuild -A -d hardy "${Source}_${Version}.dsc";;
+        sbuild -A -d hardy ${Source}_${Version}.dsc;;
       any)
-        sbuild -d hardy-amd64 "${Source}_${Version}.dsc"
-        sbuild -d hardy-i386  "${Source}_${Version}.dsc";;
+        sbuild -d hardy-amd64 ${Source}_${Version}.dsc
+        sbuild -d hardy-i386  ${Source}_${Version}.dsc;;
       *)
-        echo "invirt-build-release: architecture '$Architecture' not 'all' or 'any'" >&2
+        echo "invirt-build-release: arch '$Architecture' unimplemented" >&2
         exit 1
     esac
@@ -42 +41 @@
     
     [ $Distribution = 'unstable' ] \
-        || echo "$(basename $0): warning: Distribution is ${Distribution}, script expects unstable"
+        || echo "$(basename $0): warning: Distribution is $Distribution, script expects unstable"
     changesfile=`pwd`/${Source}_*${Version}*.changes
     for i in $changesfile; do
         reprepro-env include unstable $i
-        reprepro-env copy stable unstable \
-            $(perl '-F:\s+' -lane 'print $F[1]." " if /^Binary/' <$i)
+        reprepro-env copy stable unstable $(sed -ne 's/^Binary: //p' $i)
     done
-    reprepro-env copy stable unstable ${Source}
+    reprepro-env copy stable unstable $Source
     
     cd ..
-    rm -rf build-release
+    rm -rf build-release/$package
 done