New result set method: r_score.
[idzebra-moved-to-github.git] / index / kdump.c
index b9f9ae0..899f508 100644 (file)
@@ -1,10 +1,22 @@
 /*
- * Copyright (C) 1995, Index Data I/S 
+ * Copyright (C) 1994-1995, Index Data I/S 
  * All rights reserved.
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: kdump.c,v $
- * Revision 1.2  1995-09-04 12:33:42  adam
+ * Revision 1.6  1995-09-29 14:01:42  adam
+ * Bug fixes.
+ *
+ * Revision 1.5  1995/09/11  13:09:35  adam
+ * More work on relevance feedback.
+ *
+ * Revision 1.4  1995/09/08  14:52:27  adam
+ * Minor changes. Dictionary is lower case now.
+ *
+ * Revision 1.3  1995/09/06  16:11:17  adam
+ * Option: only one word key per file.
+ *
+ * Revision 1.2  1995/09/04  12:33:42  adam
  * Various cleanup. YAZ util used instead.
  *
  * Revision 1.1  1995/09/04  09:10:36  adam
@@ -26,7 +38,6 @@ static int read_one (FILE *inf, char *name, char *key)
 {
     int c;
     int i = 0;
-    name[0] = 0;
     do
     {
         if ((c=getc(inf)) == EOF)
@@ -43,7 +54,7 @@ int main (int argc, char **argv)
     int ret;
     char *arg;
     char *key_fname = NULL;
-    char key_string[1000];
+    char key_string[IT_MAX_WORD];
     char key_info[256];
     FILE *inf;
 
@@ -77,9 +88,18 @@ int main (int argc, char **argv)
     while (read_one (inf, key_string, key_info))
     {
         struct it_key k;
+        int op;
+
+        op = key_info[0];
+        memcpy (&k, 1+key_info, sizeof(k));
+#if IT_KEY_HAVE_SEQNO
+        printf ("%7d op=%d s=%-5d %s\n", k.sysno, op, k.seqno,
+                key_string);
+#else
+        printf ("%7d op=%d f=%-3d %s\n", k.sysno, op, k.freq,
+                key_string);
 
-        memcpy (&k, key_info+1, sizeof(k));
-        printf ("%s sysno=%d op=%d\n", key_string, k.sysno, *key_info);
+#endif
     }
     if (fclose (inf))
     {