From 4d1ab9278a03c2d00dd31ae150f9f77bfe581f18 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 9 Oct 2013 07:21:45 +0100
Subject: wip changes for remote push - implement i_resp_*

---
 dgit | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

(limited to 'dgit')

diff --git a/dgit b/dgit
index b551eac..eb6f01d 100755
--- a/dgit
+++ b/dgit
@@ -1406,7 +1406,34 @@ sub cmd_rpush {
     };
     i_cleanup();
     die $@;
+}
+
+sub i_resp_progress ($) {
+    my ($rhs) = @_;
+    my $msg = protocol_read_bytes \*RO, $rhs;
+    progress $msg;
+}
+
+sub i_resp_complete {
+    i_cleanup();
+    exit 0;
+}
+
+sub i_resp_file ($) {
+    my ($keyword) = @_;
+    my $localname = i_method "i_localname_", $keyword;
+    my $localpath = "$i_tmp/$localname";
+    stat $localpath and badproto \*RO, "file $keyword ($localpath) twice";
+    protocol_receive_file \*RO, $localpath;
+}
+
+sub i_resp_want ($) {
+    my ($keyword) = @_;
+    my @localpaths = i_method "i_want_", $keyword;
+    foreach my $localpath (@localpaths) {
+	protocol_send_file \*RI, $localpath;
     }
+    print RI "end-files\n" or die $!;
 }
 
 #---------- building etc. ----------
-- 
cgit v1.2.3