sync'ing files for RCS->CVS migration

[moira.git] / update / sms_untar.c

diff --git a/update/sms_untar.c b/update/sms_untar.c
deleted file mode 100644 (file)
index 5e60474..0000000
--- a/update/sms_untar.c
+++ /dev/null
@@ -1,32 +0,0 @@
-/* $Header$
- *
- * Reads a tar file from standard input, and extracts the contents as
- * the user specified by uid as an argument.
- *
- *  (c) Copyright 1988 by the Massachusetts Institute of Technology.
- *  For copying and distribution information, please see the file
- *  <mit-copyright.h>.
- */
-
-#include <mit-copyright.h>
-
-main(argc,argv)
-int argc;
-char **argv; 
-{
-    if (getuid() != 0) {
-       write(2, "You must be root to run sms_untar\n", 34);
-       exit(1);
-    }
-
-    if (argc != 2) {
-       write(2, "Usage: sms_untar uid\n", 21);
-       write(2, "sms_untar takes a tar file as standard input.\n", 46);
-       exit(2);
-    }
-
-    setuid(atoi(argv[1]));
-    execl("/bin/tar", "tar", "xfp", "-", 0);
-    write(2, "sms_untar: unable to exec /bin/tar\n", 35);
-    exit(3);
-}