rset/rset.c

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