~ubuntu-branches/ubuntu/vivid/svn-buildpackage/vivid

« back to all changes in this revision

Viewing changes to svn-inject

  • Committer: Bazaar Package Importer
  • Author(s): Jan Hauke Rahm, Neil Williams, Jan Hauke Rahm
  • Date: 2011-10-19 17:57:27 UTC
  • Revision ID: james.westby@ubuntu.com-20111019175727-y8preiuhnlpzr0yo
Tags: 0.8.4
[ Neil Williams ]
* [INTL:pt] Updated Portuguese translation for manpage
  (Closes: #606912)
* [INTL:da] Danish translation of svn-buildpackage (Closes: #625479)

[ Jan Hauke Rahm ]
* Implement support for xz tarballs. Thanks Sjoerd Simons <sjoerd@luon.net>
  (Closes: #637900, #388567)
* Don't repack bzip2 or xz tarballs. Thanks Robert Luberda
  <robert@debian.org> (Closes: #617964)
* Search for bz2 and xz tarballs in ../tarballs, too (when origDir is not
  set) (Closes: #592339)
* Don't translate commit message when retagging (Closes: #638909)
* Remove ancient Conflicts/Replaces svn-devscripts; it's gone since 2005
* Allow file locks when building a package (Closes: 597192)
* Apapt recent alioth changes regarding VCS location
* Add support for xz in svn-inject, too
* Fix recognition of xz tarballs in svn-upgrade

Show diffs side-by-side

added added

removed removed

Lines of Context:
309
309
   $dscFormat = $1 if (/^Format: (.+)\n/);
310
310
   $package=$1 if(/^Source: (.+)\n/);
311
311
   $debVersion=$1 if(/^Version: (.+)\n/ && !$debVersion);
312
 
   if(/^(\s\w+\s\d+\s+)((.*)_(.*).orig.tar.(gz|bz2))/)
 
312
   if(/^(\s\w+\s\d+\s+)((.*)_(.*).orig.tar.(gz|bz2|xz))/)
313
313
   {
314
314
      $dscOrig="$fromDir/$2";
315
315
      $upsVersion=$4;
316
316
   }
317
 
   if (/^(\s\w+\s\d+\s+)((.*)_(.*).orig(?:-([\w-]+)).tar.(gz|bz2))/)
 
317
   if (/^(\s\w+\s\d+\s+)((.*)_(.*).orig(?:-([\w-]+)).tar.(gz|bz2|xz))/)
318
318
   {
319
319
       $dscOtherOrig{$5}="$fromDir/$2";
320
320
   }
321
 
   $dscDebianTar = "$fromDir/$1" if(/^\s\w+\s\d+\s(.+\.debian\.tar\.(gz|bz2))\n/);
322
 
   $dscDiff = "$fromDir/$1" if(/^\s\w+\s\d+\s(.+\.diff.(gz|bz2))\n/);
 
321
   $dscDebianTar = "$fromDir/$1" if(/^\s\w+\s\d+\s(.+\.debian\.tar\.(gz|bz2|xz))\n/);
 
322
   $dscDiff = "$fromDir/$1" if(/^\s\w+\s\d+\s(.+\.diff.(gz|bz2|xz))\n/);
323
323
}
324
324
close($dsc);
325
325
 
348
348
# creating the list of relevant files for mergeWithUpstream mode
349
349
if($opt_onlychanged) {
350
350
   if ($dscDiff) {
351
 
       open(my $dl, (($dscDiff=~/bz2/i)?"bz":"z")."cat $dscDiff|");
 
351
       my $ourcat = "zcat";
 
352
       $ourcat = "bzcat" if ($dscDiff =~ /bz2/i);
 
353
       $ourcat = "xzcat" if ($dscDiff =~ /xz/i);
 
354
       open(my $dl, "$ourcat $dscDiff|");
352
355
       while(<$dl>) {
353
356
           if(/^\+\+\+\ [^\/]+\/(.+)\n/) {
354
357
               my $file=$1;
402
405
   chdir "$subupsTags";
403
406
 
404
407
   # extract the whole package and use its Debian version as upstream version
405
 
   withecho "tar", $opt_tarquiet, ($dscOrig=~/bz2$/i ? "-j" : "-z"), "-x", "-f", $dscOrig;
 
408
   my $comp = "-z";
 
409
   $comp = "-j" if ($dscOrig =~ /bz2$/i);
 
410
   $comp = "-J" if ($dscOrig =~ /xz$/i);
 
411
   withecho "tar", $opt_tarquiet, $comp, "-x", "-f", $dscOrig;
406
412
   oldSvnDirsCheck ".";
407
413
 
408
414
   my @filesInside=(<*>);
456
462
  withecho "mkdir", "-p", $dir;
457
463
  chdir $dir;
458
464
  withecho "dpkg-source -x $opt_dsc";
459
 
  system "rm -f *.gz *.bz2";
 
465
  system "rm -f *.gz *.bz2 *.xz";
460
466
  withecho "mv * $base";
461
467
}
462
468
chdir $tempdir;
509
515
   } else {
510
516
       withecho "dpkg-source -x $opt_dsc";
511
517
   }
512
 
   system "rm -f *.gz *.bz2";
 
518
   system "rm -f *.gz *.bz2 *.xz";
513
519
   # now use svn_load_dirs to upgrade the trunk fork to Debian versions.
514
520
   # For mergeWithUpstream mode, drop all unchanged files
515
521
   my $dirname=<*>;