[devscripts] 01/01: debc: add --list-changes option

[Antonio Terceiro]

This is an automated email from the git hooks/post-receive script.

terceiro pushed a commit to branch master
in repository devscripts.

commit 77d431b2b4bfb6767d1f7f527fe71d9fbcf803e8
Author: Antonio Terceiro <terceiro at debian.org>
Date:   Wed Jul 26 18:06:03 2017 -0300

    debc: add --list-changes option
    
    Use case: I just did a build, and I need to figure out where the
    .changes is (../, ../build-area/, etc) so that I can pass it to
    autopkgtest.
---
 debian/changelog | 5 +++++
 scripts/debc.1   | 7 +++++++
 scripts/debi.pl  | 9 ++++++++-
 3 files changed, 20 insertions(+), 1 deletion(-)

diff --git a/debian/changelog b/debian/changelog
index 9e39c8d..b22957f 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -5,6 +5,11 @@ devscripts (2.17.10) UNRELEASED; urgency=medium
     + Add dependency on debhelper; apparently autopkgtest in ubuntu doesn't
       pull it otherwise
 
+  [ Antonio Terceiro ]
+  * debc:
+    + add --list-changes option, similar to --list-debs but for displaying the
+      path to the .changes file.
+
  -- Mattia Rizzolo <mattia at debian.org>  Tue, 25 Jul 2017 14:18:24 +0200
 
 devscripts (2.17.9) unstable; urgency=medium
diff --git a/scripts/debc.1 b/scripts/debc.1
index 99f9c66..b043ee5 100644
--- a/scripts/debc.1
+++ b/scripts/debc.1
@@ -83,6 +83,13 @@ this option.
 See the above section \fBDirectory name checking\fR for an explanation of
 this option.
 .TP
+\fB\-\-list-changes\fR
+List the filename of the .changes file, and do not display anything else. This
+option only makes sense if a .changes file is NOT passed explicitly in the
+command line. This can be used for example in a script that needs to reference
+the .changes file, without having to duplicate the heuristics for finding it
+that debc already implements.
+.TP
 \fB\-\-list-debs\fR
 List the filenames of the .deb packages, and do not display their contents.
 .TP
diff --git a/scripts/debi.pl b/scripts/debi.pl
index 82588be..6997f5b 100755
--- a/scripts/debi.pl
+++ b/scripts/debi.pl
@@ -86,6 +86,7 @@ Usage: $progname [options] [.changes file] [package ...]
     -t<target>        Search for changes file made for GNU <target> arch
     --debs-dir DIR    Look for the changes and debs files in DIR instead of
                       the parent of the current package directory
+    --list-changes    only list the .changes file
     --list-debs       only list the .deb files; don't display their contents
     --multi           Search for multiarch .changes file made by dpkg-cross
     --check-dirname-level N
@@ -181,7 +182,7 @@ my ($opt_help, $opt_version, $opt_a, $opt_t, $opt_debsdir, $opt_multi);
 my $opt_upgrade;
 my ($opt_level, $opt_regex, $opt_noconf);
 my ($opt_tool, $opt_with_depends);
-my ($opt_list_debs);
+my ($opt_list_changes, $opt_list_debs);
 GetOptions("help" => \$opt_help,
 	   "version" => \$opt_version,
 	   "a=s" => \$opt_a,
@@ -195,6 +196,7 @@ GetOptions("help" => \$opt_help,
 	   "tool=s" => \$opt_tool,
 	   "noconf" => \$opt_noconf,
 	   "no-conf" => \$opt_noconf,
+	   "list-changes" => \$opt_list_changes,
 	   "list-debs" => \$opt_list_debs,
 	   )
     or die "Usage: $progname [options] [.changes file] [package ...]\nRun $progname --help for more details\n";
@@ -323,6 +325,11 @@ EOF
     }
 }
 
+if ($opt_list_changes) {
+  printf "%s\n", $changes;
+  exit(0);
+}
+
 chdir dirname($changes)
     or die "$progname: can't chdir to $changes directory: $!\n";
 $changes = basename($changes);

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/collab-maint/devscripts.git