diff PubdicPlus/wtopd.c @ 0:bbc77ca4def5

initial import

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/PubdicPlus/wtopd.c	Thu Dec 13 04:30:14 2007 +0900
@@ -0,0 +1,93 @@
+/* Copyright 1994 Pubdic Project.
+ *
+ * Permission to use, copy, modify, distribute and sell this software
+ * and its documentation for any purpose is hereby granted without
+ * fee, provided that the above copyright notice appear in all copies
+ * and that both that copyright notice and this permission notice
+ * appear in supporting documentation, and that the name of Pubdic
+ * Project not be used in advertising or publicity pertaining to
+ * distribution of the software without specific, written prior
+ * permission.  Pubdic Project makes no representations about the
+ * suitability of this software for any purpose.  It is provided "as
+ * is" without express or implied warranty.
+ *
+ * PUBDIC PROJECT DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN 
+ * NO EVENT SHALL PUBDIC PROJECT BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF 
+ * USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR 
+ * OTHER TORTUOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR 
+ * PERFORMANCE OF THIS SOFTWARE. 
+ */
+
+#ifndef lint
+static char rcsid[] = "$Id: wtopd.c,v 1.2 2001/06/14 18:15:54 ura Exp $";
+#endif
+
+#include <stdio.h>
+
+static char *program;
+
+#define READBUFSIZE 1024
+
+char *
+extstr (p, pp)
+     char *p, **pp;
+{
+  char *res;
+
+  while (*p == ' ' || *p == '\t')
+    p++;
+  res = p;
+  while (*p && *p != ' ' && *p != '\t' && *p != '\n')
+    p++;
+  *p++ = '\0';
+  if (pp)
+    *pp = p;
+  return res;
+}
+
+static void
+wtop (file)
+     FILE *file;
+{
+  char readbuf[READBUFSIZE], *p, *yomi, *hinshi, *kouho, *hindo;
+
+  while (p = fgets (readbuf, sizeof (readbuf), file))
+    {
+      yomi = extstr (p, &p);
+      kouho = extstr (p, &p);
+      hinshi = extstr (p, &p);
+      hindo = extstr (p, &p);
+
+      printf ("%s %s %s %s\n", yomi, kouho, hinshi, hindo);
+    }
+}
+
+main (argc, argv)
+     int argc;
+     char *argv[];
+{
+  FILE *ins = stdin;
+
+  for (program = argv[0] + strlen (argv[0]); argv[0] < program; program--)
+    {
+      if (program[0] == '/')
+        {
+          program++;
+          break;
+        }
+    }
+
+  if (argc > 1)
+    {
+      ins = fopen (argv[1], "r");
+      if (!ins)
+        {
+          fprintf (stderr, "%s: can not open file \"%s\".\n", program, argv[1]);
+        }
+    }
+  wtop (ins);
+  fclose (ins);
+  exit (0);
+}