1 files changed, 62 insertions, 0 deletions
diff --git a/utils/old-settrans.c b/utils/old-settrans.c
new file mode 100644
index 00000000..649458f4
--- /dev/null
+++ b/utils/old-settrans.c
@@ -0,0 +1,62 @@
+/* Set a passive translator on a file
+   Copyright (C) 1994 Free Software Foundation, Inc.
+   Written by Michael I. Bushnell.
+
+   This file is part of the GNU Hurd.
+
+   The GNU Hurd is free software; you can redistribute it and/or
+   modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation; either version 2, or (at
+   your option) any later version.
+
+   The GNU Hurd is distributed in the hope that it will be useful, but
+   WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
+
+
+#include <hurd.h>
+
+main (argc, argv)
+{
+  /* This is pretty kludgy for now */
+  mach_port_t file;
+  
+  char *buf, *bp;
+  int buflen;
+  int i;
+  
+  file = file_name_lookup (argv[1], 0, 0);
+  if (file == MACH_PORT_NULL)
+    {
+      perror (argv[1]);
+      exit (1);
+    }
+  
+  buflen = 0;
+  for (i = 2; i < argc; i++)
+    buflen += strlen (argv[i]) + 1;
+  
+  bp = buf = alloca (buflen);
+  
+  for (i = 2; i < argc; i++)
+    bp = stpcpy (bp, argv[i]) + 1;
+  
+  errno = file_set_translator (file, FS_TRANS_SET|FS_TRANS_EXCL, 0, 0,
+			       buf, buflen, MACH_PORT_NULL, 
+			       MACH_MSG_TYPE_COPY_SEND);
+  if (errno != 0)
+    {
+      perror ("Setting translator");
+      exit (1);
+    }
+  
+  exit (0);
+}
+
+ 
+