diff Wnn/uum/inspect.c @ 0:bbc77ca4def5

initial import

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Wnn/uum/inspect.c	Thu Dec 13 04:30:14 2007 +0900
@@ -0,0 +1,334 @@
+/*
+ *  $Id: inspect.c,v 1.5 2002/03/30 01:45:41 hiroo Exp $
+ */
+
+/*
+ * FreeWnn is a network-extensible Kana-to-Kanji conversion system.
+ * This file is part of FreeWnn.
+ * 
+ * Copyright Kyoto University Research Institute for Mathematical Sciences
+ *                 1987, 1988, 1989, 1990, 1991, 1992
+ * Copyright OMRON Corporation. 1987, 1988, 1989, 1990, 1991, 1992, 1999
+ * Copyright ASTEC, Inc. 1987, 1988, 1989, 1990, 1991, 1992
+ * Copyright FreeWnn Project 1999, 2000, 2002
+ *
+ * Maintainer:  FreeWnn Project   <[e-mail]>
+ *
+ * This program 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 of the License, or
+ * (at your option) any later version.
+ *
+ * This program 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ */
+#ifdef HAVE_CONFIG_H
+#  include <config.h>
+#endif
+
+#include <stdio.h>
+#if STDC_HEADERS
+#  include <string.h>
+#elif HAVE_STRINGS_H
+#  include <strings.h>
+#endif /* STDC_HEADERS */
+
+#include "jllib.h"
+#include "commonhd.h"
+#include "sdefine.h"
+#include "sheader.h"
+#include "wnn_config.h"
+#include "buffer.h"
+
+int
+inspect (bun_no)
+     int bun_no;
+{
+  char buf[1024];
+  char *c = buf;
+
+  if (make_string_for_ke (bun_no, buf, sizeof (buf)) == -1)
+    {
+      print_msg_getc ("Error in inspect");
+      return (0);
+    }
+  select_line_element (&c, 1, 0, "", 0, 0, main_table[9]);
+  return (1);
+}
+
+static int next_flag;
+#define I_NEXT 1
+#define I_PREV 2
+#define I_CUR 3
+
+int
+inspect_kouho ()
+{
+  push_cursor ();
+  next_flag = I_CUR;
+  while (next_flag)
+    {
+      if (next_flag == I_NEXT || next_flag == I_PREV)
+        {
+          if (jl_zenkouho_bun (bun_data_) != cur_bnst_ || jl_zenkouho_daip (bun_data_) != WNN_SHO)
+            {
+              jl_zenkouho (bun_data_, cur_bnst_, WNN_USE_ZENGO, WNN_UNIQ);
+            }
+          if (next_flag == I_NEXT)
+            {
+              jl_next (bun_data_);
+            }
+          else
+            {
+              jl_previous (bun_data_);
+            }
+          make_kanji_buffer (cur_bnst_);
+          c_b->t_m_start = bunsetsuend[cur_bnst_];
+          c_b->t_b_st = bunsetsu[dai_top (bun_data_, cur_bnst_)];
+          c_b->t_b_end = bunsetsuend[dai_end (bun_data_, cur_bnst_) - 1];
+        }
+      next_flag = 0;
+      inspect (cur_bnst_);
+    }
+  pop_cursor ();
+  t_print_l ();
+  return (0);
+}
+
+/*
+ *  Very Dirty, but we permit only this inspect function to manipulate
+ *  directly the contents of bun_data_.
+ */
+
+static int Bun_no;
+
+int
+make_string_for_ke (bun_no, buf, buf_size)
+     int bun_no;
+     char *buf;
+     int buf_size;
+{
+  struct wnn_jl_bun *bun;
+  w_char buf1[1024];
+  w_char save_c;
+  char tmp[WNN_HINSI_NAME_LEN * 2];
+
+  Bun_no = bun_no;
+  bun = bun_data_->bun[bun_no];
+  jl_get_kanji (bun_data_, bun_no, bun_no + 1, buf1);
+  if (print_out_func)
+    (*print_out_func) (buf1, buf1, Strlen (buf1));
+  wnn_delete_w_ss2 (buf1, Strlen (buf1));
+  sStrcpy (buf, buf1);
+  strcat (buf, " ");
+  jl_get_yomi (bun_data_, bun_no, bun_no + 1, buf1);
+  if (print_out_func)
+    (*print_out_func) (buf1, buf1, Strlen (buf1));
+  wnn_delete_w_ss2 (buf1, Strlen (buf1));
+  save_c = *(buf1 + bun->jirilen);
+  *(buf1 + bun->jirilen) = 0;
+  sStrcpy (buf + strlen (buf), buf1);
+  *(buf1 + bun->jirilen) = save_c;
+  strcat (buf, "-");
+  sStrcpy (buf + strlen (buf), buf1 + bun->jirilen);
+
+  set_escape_code (buf);
+
+  strcat (buf, "   (");
+  if (bun->dic_no >= 0)
+    {
+      update_dic_list (bun_data_);
+      dic_nickname (bun->dic_no, buf + strlen (buf));
+      sStrcpy (tmp, jl_hinsi_name (bun_data_, bun->hinsi));
+      sprintf (buf + strlen (buf), ":%d %s", bun->entry, tmp);
+      if (bun->hindo != 0x7f)
+        {
+          sprintf (buf + strlen (buf), MSG_GET (16), bun->ima ? '*' : ' ', bun->hindo);
+        }
+      else
+        {
+          sprintf (buf + strlen (buf), " ---------");
+        }                       /* Means This entry is not used.
+                                   This must not appear in ordinary use! */
+
+    }
+  else
+    {
+      sStrcpy (tmp, jl_hinsi_name (bun_data_, bun->hinsi));
+      sprintf (buf + strlen (buf), "GIJI BUNSETU:%s", tmp);
+    }
+  strcat (buf, ")   ");
+  sprintf (buf + strlen (buf), MSG_GET (17), bun->hyoka, bun->kangovect);
+
+  if (bun->dai_top)
+    {
+      if (bun->daihyoka != -1)
+        {
+          sprintf (buf + strlen (buf), "(%s:%d) ", MSG_GET (18), bun->daihyoka);
+        }
+      else
+        {
+          sprintf (buf + strlen (buf), "(%s:---) ", MSG_GET (18));
+        }
+    }
+
+  return (0);
+}
+
+static void sakujo_kouho1 ();
+
+int
+sakujo_kouho ()
+{
+  push_cursor ();
+  sakujo_kouho1 (cur_bnst_);
+  pop_cursor ();
+  t_print_l ();
+  return (0);
+}
+
+static void
+sakujo_kouho1 (bun_no)
+     int bun_no;
+{
+  w_char w_buf[512];
+  char buf[512];
+  int kanji_len = jl_kanji_len (bun_data_, bun_no, bun_no + 1) - jl_fuzoku_len (bun_data_, bun_no);
+
+  jl_get_kanji (bun_data_, bun_no, bun_no + 1, w_buf);
+  w_buf[kanji_len] = 0;
+  sStrcpy (buf, w_buf);
+  strcat (buf, MSG_GET (19));
+  /*
+     strcat(buf,"  読み:");
+   */
+  jl_get_yomi (bun_data_, bun_no, bun_no + 1, w_buf);
+  w_buf[jl_jiri_len (bun_data_, bun_no)] = 0;
+  sStrcpy (buf + strlen (buf), w_buf);
+  set_escape_code (buf);
+  strcat (buf, " ");
+  sprintf (buf + strlen (buf), MSG_GET (20));
+  /*
+     sprintf(buf + strlen(buf), "を削除しますか?(Y/N)");
+   */
+  if (yes_or_no (buf) == 1)
+    {
+      if (jl_word_delete (bun_data_, bun_data_->bun[bun_no]->dic_no, bun_data_->bun[bun_no]->entry) == -1)
+        {
+          errorkeyin ();
+          return;
+        }
+    }
+}
+
+int
+inspectdel ()
+{
+  struct wnn_jl_bun *bun = bun_data_->bun[Bun_no];
+  int type;
+  w_char buf1[1024];
+  char buf[512];
+  int kanji_len = jl_kanji_len (bun_data_, Bun_no, Bun_no + 1) - jl_fuzoku_len (bun_data_, Bun_no);
+
+  type = dicinfo[find_dic_by_no (bun->dic_no)].type;
+  if (type != WNN_UD_DICT && type != WNN_REV_DICT && type != BWNN_REV_DICT && type != CWNN_REV_DICT)
+    {
+      print_msg_getc (MSG_GET (21));
+      /*
+         print_msg_getc("固定形式の辞書のエントリは削除出来ません。(如何?)");
+       */
+      return (0);
+    }
+  if (dicinfo[find_dic_by_no (bun->dic_no)].rw == WNN_DIC_RDONLY)
+    {
+      print_msg_getc (MSG_GET (22));
+      /*
+         print_msg_getc("リードオンリーの辞書のエントリは削除出来ません。(如何?)");
+       */
+      return (0);
+    }
+
+  jl_get_kanji (bun_data_, Bun_no, Bun_no + 1, buf1);
+  buf1[kanji_len] = 0;
+
+  strcpy (buf, MSG_GET (23));
+  /*
+     strcpy(buf, "「");
+   */
+  sStrcpy (buf + strlen (buf), buf1);
+  sprintf (buf + strlen (buf), MSG_GET (24));
+  /*
+     sprintf(buf + strlen(buf), "」を削除します。(Y/N)");
+   */
+  set_escape_code (buf);
+  if (yes_or_no (buf) == 1)
+    {
+      if (jl_word_delete (bun_data_, bun->dic_no, bun->entry) == -1)
+        {
+          errorkeyin ();
+          return (0);
+        }
+      return (1);
+    }
+  return (0);
+}
+
+int
+inspectuse ()
+{
+  struct wnn_jl_bun *bun = bun_data_->bun[Bun_no];
+  w_char buf1[1024];
+  char buf[512];
+  int kanji_len = jl_kanji_len (bun_data_, Bun_no, Bun_no + 1) - jl_fuzoku_len (bun_data_, Bun_no);
+
+  if (dicinfo[find_dic_by_no (bun->dic_no)].hindo_rw == WNN_DIC_RDONLY)
+    {
+      print_msg_getc (MSG_GET (25));
+      /*
+         print_msg_getc("リードオンリーの頻度は変更出来ません。(如何?)");
+       */
+      return (0);
+    }
+  strcpy (buf, MSG_GET (23));
+  /*
+     strcpy(buf, "「");
+   */
+  jl_get_kanji (bun_data_, Bun_no, Bun_no + 1, buf1);
+  buf1[kanji_len] = 0;
+  sStrcpy (buf + strlen (buf), buf1);
+  set_escape_code (buf);
+  sprintf (buf + strlen (buf), MSG_GET (26));
+  /*
+     sprintf(buf + strlen(buf), "」の使用を中止します。(Y/N)");
+   */
+  if (yes_or_no (buf) == 1)
+    {
+      if (jl_word_use (bun_data_, bun->dic_no, bun->entry) == -1)
+        {
+          errorkeyin ();
+          return (0);
+        }
+      return (1);
+    }
+  return (0);
+}
+
+int
+next_inspect ()
+{
+  next_flag = I_NEXT;
+  return (1);
+}
+
+int
+previous_inspect ()
+{
+  next_flag = I_PREV;
+  return (1);
+}