From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 9 Oct 2013 06:50:42 +0000 (+0100)
Subject: wip changes for remote push - implement i_want
X-Git-Tag: debian/0.16_experimental2^2~7
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=commitdiff_plain;h=fb64dcd0b68b73fa8f59edac53855dd303a7562f

wip changes for remote push - implement i_want
---

diff --git a/TODO b/TODO
index 64eace4b..58905973 100644
--- a/TODO
+++ b/TODO
@@ -1,5 +1,3 @@
-implement i_want_*
-
 --gpg= etc. @gpg should be in manual
 should pass @gpg to debsign
 --ssh= etc. @ssh should be in manual
diff --git a/dgit b/dgit
index 05e95dfb..6c1477cc 100755
--- a/dgit
+++ b/dgit
@@ -1465,6 +1465,28 @@ sub i_localname_dsc {
     return $dscfn;
 }
 
+sub i_want_signed_tag {
+    defined $i_param{'head'} && defined $dscfn
+	or badproto \*RO, "sequencing error";
+    my $head = $i_param{'head'};
+    die if $head =~ m/[^0-9a-f]/ || $head !~ m/^../;
+
+    push_parse_dsc $i_dscfn, 'remote dsc', 
+
+    push_mktag $head, $i_clogp, $i_tag,
+        $dsc, $i_dscfn,
+        'remote.changes', 'remote changes',
+        'tag.tag';
+
+    return 'tag.tag';
+}
+
+sub i_want_signed_dsc_changes {
+    rename "$i_dscfn.tmp","$i_dscfn" or die "$i_dscfn $!";
+    sign_changes 'remote.changes';
+    return ($i_dscfn, 'remote.changes');
+}
+
 #---------- building etc. ----------
 
 our $version;