summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMichael I. Bushnell <mib@gnu.org>1994-09-01 15:50:18 +0000
committerMichael I. Bushnell <mib@gnu.org>1994-09-01 15:50:18 +0000
commitee280f4a094bd2ae53dafb30449f38f0abe9bda2 (patch)
tree7a2cb8fc677ea5bcc0db34805eed1b702481c466
parent1242f1279735629ff7845f3ee64930ce99c03d25 (diff)
Initial revision
-rw-r--r--utils/old-settrans.c62
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);
+}
+
+
+