rset/rset.c

   1 /*
   2  * Copyright (C) 1994-1999, Index Data
   3  * All rights reserved.
   4  * Sebastian Hammer, Adam Dickmeiss
   5  *
   6  * $Log: rset.c,v $
   7  * Revision 1.16  2002-07-25 13:06:44  adam
   8  * Character set negotiation updates
   9  *
  10  * Revision 1.15  2002/03/20 20:24:30  adam
  11  * Hits per term. Returned in SearchResult-1
  12  *
  13  * Revision 1.14  1999/05/26 07:49:14  adam
  14  * C++ compilation.
  15  *
  16  * Revision 1.13  1999/02/02 14:51:33  adam
  17  * Updated WIN32 code specific sections. Changed header.
  18  *
  19  * Revision 1.12  1998/04/26 10:56:57  adam
  20  * Added include of string.h.
  21  *
  22  * Revision 1.11  1998/03/05 08:36:28  adam
  23  * New result set model.
  24  *
  25  * Revision 1.10  1998/02/10 11:56:46  adam
  26  * Implemented rset_dup.
  27  *
  28  * Revision 1.9  1996/10/29 13:55:21  adam
  29  * Include of zebrautl.h instead of alexutil.h.
  30  *
  31  * Revision 1.8  1995/12/11 09:15:23  adam
  32  * New set types: sand/sor/snot - ranked versions of and/or/not in
  33  * ranked/semi-ranked result sets.
  34  * Note: the snot not finished yet.
  35  * New rset member: flag.
  36  * Bug fix: r_delete in rsrel.c did free bad memory block.
  37  *
  38  * Revision 1.7  1995/10/12  12:41:56  adam
  39  * Private info (buf) moved from struct rset_control to struct rset.
  40  * Bug fixes in relevance.
  41  *
  42  * Revision 1.6  1995/09/08  14:52:41  adam
  43  * Work on relevance feedback.
  44  *
  45  * Revision 1.5  1995/09/07  13:58:43  adam
  46  * New parameter: result-set file descriptor (RSFD) to support multiple
  47  * positions within the same result-set.
  48  * Boolean operators: and, or, not implemented.
  49  *
  50  * Revision 1.4  1995/09/06  16:11:56  adam
  51  * More work on boolean sets.
  52  *
  53  * Revision 1.3  1995/09/04  15:20:39  adam
  54  * More work on temp sets. is_open member removed.
  55  *
  56  * Revision 1.2  1995/09/04  12:33:56  adam
  57  * Various cleanup. YAZ util used instead.
  58  *
  59  * Revision 1.1  1994/11/04  13:21:28  quinn
  60  * Working.
  61  *
  62  */
  63
  64 #include <stdio.h>
  65 #include <string.h>
  66 #include <zebrautl.h>
  67
  68 #include <rset.h>
  69
  70 RSET rset_create(const struct rset_control *sel, void *parms)
  71 {
  72     RSET rnew;
  73     int i;
  74
  75     logf (LOG_DEBUG, "rs_create(%s)", sel->desc);
  76     rnew = (RSET) xmalloc(sizeof(*rnew));
  77     rnew->control = sel;
  78     rnew->flags = 0;
  79     rnew->count = 1;
  80     rnew->rset_terms = NULL;
  81     rnew->no_rset_terms = 0;
  82     rnew->buf = (*sel->f_create)(rnew, sel, parms);
  83     logf (LOG_DEBUG, "no_rset_terms: %d", rnew->no_rset_terms);
  84     for (i = 0; i<rnew->no_rset_terms; i++)
  85         logf (LOG_DEBUG, " %s", rnew->rset_terms[i]->name);
  86     return rnew;
  87 }
  88
  89 void rset_delete (RSET rs)
  90 {
  91     (rs->count)--;
  92     if (!rs->count)
  93     {
  94         (*rs->control->f_delete)(rs);
  95         xfree(rs);
  96     }
  97 }
  98
  99 RSET rset_dup (RSET rs)
 100 {
 101     (rs->count)++;
 102     return rs;
 103 }
 104
 105 RSET_TERM *rset_terms(RSET rs, int *no)
 106 {
 107     *no = rs->no_rset_terms;
 108     return rs->rset_terms;
 109 }
 110
 111 RSET_TERM rset_term_create (const char *name, int length, const char *flags,
 112                             int type)
 113 {
 114     RSET_TERM t = (RSET_TERM) xmalloc (sizeof(*t));
 115     if (!name)
 116         t->name = NULL;
 117     else if (length == -1)
 118         t->name = xstrdup (name);
 119     else
 120     {
 121         t->name = (char*) xmalloc (length+1);
 122         memcpy (t->name, name, length);
 123         t->name[length] = '\0';
 124     }
 125     if (!flags)
 126         t->flags = NULL;
 127     else
 128         t->flags = xstrdup (flags);
 129     t->nn = -1;
 130     t->count = 0;
 131     t->type = type;
 132     return t;
 133 }
 134
 135 void rset_term_destroy (RSET_TERM t)
 136 {
 137     xfree (t->name);
 138     xfree (t->flags);
 139     xfree (t);
 140 }
 141
 142 RSET_TERM rset_term_dup (RSET_TERM t)
 143 {
 144     RSET_TERM nt = (RSET_TERM) xmalloc (sizeof(*nt));
 145     if (t->name)
 146         nt->name = xstrdup (t->name);
 147     else
 148         nt->name = NULL;
 149     if (t->flags)
 150         nt->flags = xstrdup (t->flags);
 151     else
 152         nt->flags = NULL;
 153     nt->nn = t->nn;
 154     return nt;
 155 }