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