From 1dc4aaf1294f35a8d261d248ec220806fc3ae573 Mon Sep 17 00:00:00 2001
From: mar <mar>
Date: Tue, 22 Sep 1992 13:44:10 +0000
Subject: [PATCH] Initial revision

---
 update/xfer_003.c | 96 +++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 96 insertions(+)
 create mode 100644 update/xfer_003.c

diff --git a/update/xfer_003.c b/update/xfer_003.c
new file mode 100644
index 00000000..56b3815a
--- /dev/null
+++ b/update/xfer_003.c
@@ -0,0 +1,96 @@
+/*
+ *	$Source$
+ *	$Header$
+ */
+/*  (c) Copyright 1988, 1992 by the Massachusetts Institute of Technology.
+ *  For copying and distribution information, please see the file
+ *  <mit-copyright.h>.
+ */
+
+#ifndef lint
+static char *rcsid_xfer_002_c = "$Header$";
+#endif	lint
+
+#include <mit-copyright.h>
+#include <stdio.h>
+#include <gdb.h>
+#include <ctype.h>
+#include <sys/param.h>
+#include <sys/file.h>
+#include <strings.h>
+#include <moira.h>
+
+extern CONNECTION conn;
+char buf[BUFSIZ];
+
+extern int code, errno;
+
+extern int have_authorization, have_file, done;
+
+/*
+ *
+ * syntax:
+ * >>> (STRING)"xfer_003" filesize checksum pathname
+ * <<< (int)0
+ * >>> (STRING)data
+ * <<< (int)code
+ * >>> (STRING)data
+ * <<< (int)code
+ * ...
+ * >>> (STRING)data	(last data block)
+ * <<< (int)code	(from read, write, checksum verify)
+ *
+ * function:
+ *	perform initial preparations and receive file as
+ * a single string, storing it into <pathname>.moira_update.
+ * this version of transfer encrypts the file being transferred.
+ */
+
+int
+xfer_003(str)
+    char *str;
+{
+    int file_size;
+    int checksum;
+    char *pathname;
+    
+    str += 8;
+    while (*str == ' ')
+	str++;
+    if (!*str) {
+    failure:
+	reject_call(MR_ARGS);
+	return(0);
+    }
+    file_size = atoi(str);
+    while (isdigit(*str))
+	str++;
+    while (*str == ' ')
+	str++;
+    checksum = atoi(str);
+    while (isdigit(*str))
+	str++;
+    while (*str == ' ')
+	str++;
+    if (*str != '/')
+	goto failure;
+    pathname = str;
+    if (!have_authorization) {
+	reject_call(MR_PERM);
+	return(0);
+    }
+    if (done)			/* re-initialize data */
+	initialize();
+    code = send_ok();
+    if (code)
+	lose("sending ok for file xfer (2)");
+    code = get_file(pathname, file_size, checksum, 0444, 1);
+    if (!code) {
+	char buf[BUFSIZ];
+	have_file = 1;
+	strcpy(buf, "transferred file ");
+	strcat(buf, pathname);
+	mr_log_info(buf);
+    }
+    return(0);
+}
-- 
2.45.2