Initial revision

diff --git a/update/xfer_003.c b/update/xfer_003.c
new file mode 100644 (file)
index 0000000..56b3815
--- /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);
+}