--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/rvinterf/etmsync/fsupload.c	Sat Mar 01 09:07:03 2014 +0000
@@ -0,0 +1,112 @@
+/*
+ * upload-fs implementation
+ */
+
+#include <sys/types.h>
+#include <sys/param.h>
+#include <sys/stat.h>
+#include <dirent.h>
+#include <ctype.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <strings.h>
+#include "etm.h"
+#include "ffs.h"
+#include "ffserr.h"
+#include "tmffs2.h"
+#include "limits.h"
+#include "ffslimits.h"
+#include "localtypes.h"
+#include "localstruct.h"
+#include "exitcodes.h"
+
+uploadfs_level(srcpath, depth, prefix)
+	char *srcpath, *prefix;
+{
+	char ffs_childpath[MAX_FULL_PATHNAME+1], *ffs_childp;
+	DIR *rdd;
+	struct dirent *dirent;
+	char hostpath_child[MAXPATHLEN];
+	struct stat hst;
+	int rc;
+
+	strcpy(ffs_childpath, prefix);
+	ffs_childp = index(ffs_childpath, '\0');
+	*ffs_childp++ = '/';
+	rdd = opendir(srcpath);
+	if (!rdd) {
+		perror(srcpath);
+		return(ERROR_UNIX);
+	}
+	while (dirent = readdir(rdd)) {
+		if (dirent->d_name[0] == '.')
+			continue;
+		if (strlen(dirent->d_name) > MAX_FN_COMPONENT) {
+			fprintf(stderr,
+		"error: \"%s\" in %s exceeds the FFS component name limit\n",
+				dirent->d_name, srcpath);
+			closedir(rdd);
+			return(ERROR_USAGE);
+		}
+		if (strlen(srcpath) + strlen(dirent->d_name) + 2 >
+		    sizeof hostpath_child) {
+			fprintf(stderr,
+				"error: host side pathname buffer overflow\n");
+			closedir(rdd);
+			return(ERROR_UNIX);
+		}
+		sprintf(hostpath_child, "%s/%s", srcpath, dirent->d_name);
+		if (lstat(hostpath_child, &hst) < 0) {
+			perror(hostpath_child);
+			closedir(rdd);
+			return(ERROR_UNIX);
+		}
+		strcpy(ffs_childp, dirent->d_name);
+		switch (hst.st_mode & S_IFMT) {
+		case S_IFREG:
+			printf("uploading %s\n", ffs_childpath);
+			rc = fwrite_from_file(ffs_childpath, hostpath_child);
+			if (rc) {
+				closedir(rdd);
+				return(rc);
+			}
+			break;
+		case S_IFDIR:
+			if (depth >= MAX_NAME_DEPTH-1) {
+				fprintf(stderr,
+				"error: directory nesting too deep at %s\n",
+					hostpath_child);
+				closedir(rdd);
+				return(ERROR_USAGE);
+			}
+			printf("mkdir %s\n", ffs_childpath);
+			rc = do_mkdir_existok(ffs_childpath);
+			if (rc) {
+				closedir(rdd);
+				return(rc);
+			}
+			rc = uploadfs_level(hostpath_child, depth + 1,
+						ffs_childpath);
+			if (rc) {
+				closedir(rdd);
+				return(rc);
+			}
+			break;
+		default:
+			fprintf(stderr,
+			"error: %s is neither a regular file nor a directory\n",
+				hostpath_child);
+			closedir(rdd);
+			return(ERROR_USAGE);
+		}
+	}
+	closedir(rdd);
+	return(0);
+}
+
+cmd_uploadfs(argc, argv)
+	char **argv;
+{
+	return uploadfs_level(argv[1], 0, "");
+}