1 /* $Id: rset.c,v 1.41 2004-11-19 15:52:59 heikki Exp $
2 Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002,2003,2004
5 This file is part of the Zebra server.
7 Zebra is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 2, or (at your option) any later
12 Zebra is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
17 You should have received a copy of the GNU General Public License
18 along with Zebra; see the file LICENSE.zebra. If not, write to the
19 Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
32 static int log_level=0;
33 static int log_level_initialized=0;
36 * creates an rfd. Either allocates a new one, in which case the priv
37 * pointer is null, and will have to be filled in, or picks up one
38 * from the freelist, in which case the priv is already allocated,
39 * and presumably everything that hangs from it as well
42 RSFD rfd_create_base(RSET rs)
44 RSFD rnew=rs->free_list;
46 if (!log_level_initialized)
48 log_level=yaz_log_module_level("rset");
49 log_level_initialized=1;
54 rs->free_list=rnew->next;
55 assert(rnew->rset==rs);
56 yaz_log(log_level,"rfd-create_base (fl): rfd=%p rs=%p fl=%p priv=%p",
57 rnew, rs, rs->free_list, rnew->priv);
59 rnew=nmem_malloc(rs->nmem, sizeof(*rnew));
62 yaz_log(log_level,"rfd_create_base (new): rfd=%p rs=%p fl=%p priv=%p",
63 rnew, rs, rs->free_list, rnew->priv);
65 rnew->next=NULL; /* not part of any (free?) list */
69 /* puts an rfd into the freelist of the rset. Only when the rset gets */
70 /* deleted, will all the nmem disappear */
71 void rfd_delete_base(RSFD rfd)
74 yaz_log(log_level,"rfd_delete_base: rfd=%p rs=%p priv=%p fl=%p",
75 rfd, rs, rfd->priv, rs->free_list);
76 assert(NULL == rfd->next);
77 rfd->next=rs->free_list;
82 RSET rset_create_base(const struct rset_control *sel,
83 NMEM nmem, const struct key_control *kcontrol,
84 int scope, TERMID term)
88 /* assert(nmem); */ /* can not yet be used, api/t4 fails */
93 rnew = (RSET) nmem_malloc(M,sizeof(*rnew));
94 yaz_log (log_level, "rs_create(%s) rs=%p (nm=%p)", sel->desc, rnew, nmem);
101 rnew->count = 1; /* refcount! */
103 rnew->free_list=NULL;
104 rnew->keycontrol=kcontrol;
112 void rset_delete (RSET rs)
115 yaz_log(log_level,"rs_delete(%s), rs=%p, count=%d",
116 rs->control->desc, rs, rs->count);
119 (*rs->control->f_delete)(rs);
121 nmem_destroy(rs->nmem);
125 RSET rset_dup (RSET rs)
128 yaz_log(log_level,"rs_dup(%s), rs=%p, count=%d",
129 rs->control->desc, rs, rs->count);
133 int rset_default_forward(RSFD rfd, void *buf, TERMID *term,
134 const void *untilbuf)
137 int cmp=rfd->rset->scope;
140 yaz_log (log_level, "rset_default_forward starting '%s' (ct=%p rfd=%p)",
141 rfd->rset->control->desc, rfd->rset, rfd);
142 /* key_logdump(log_level, untilbuf); */
144 while ( (cmp>=rfd->rset->scope) && (more))
146 if (log_level) /* time-critical, check first */
147 yaz_log(log_level,"rset_default_forward looping m=%d c=%d",more,cmp);
148 more=rset_read(rfd, buf, term);
150 cmp=(rfd->rset->keycontrol->cmp)(untilbuf,buf);
152 key_logdump(log_level,buf); */
155 yaz_log (log_level, "rset_default_forward exiting m=%d c=%d",more,cmp);
161 * rset_count uses rset_pos to get the total and returns that.
162 * This is ok for rsisamb/c/s, and for some other rsets, but in case of
163 * booleans etc it will give bad estimate, as nothing has been read
166 zint rset_count(RSET rs)
169 RSFD rfd=rset_open(rs,0);
170 rset_pos(rfd,&cur,&tot);
176 /** rset_get_no_terms is a getterms function for those that don't have any */
177 void rset_get_no_terms(RSET ct, TERMID *terms, int maxterms, int *curterm)
182 /* rset_get_one_term gets that one term from an rset. Used by rsisamX */
183 void rset_get_one_term(RSET ct,TERMID *terms,int maxterms,int *curterm)
187 if (*curterm < maxterms)
188 terms[*curterm]=ct->term;
194 TERMID rset_term_create (const char *name, int length, const char *flags,
199 yaz_log (log_level, "term_create '%s' %d f=%s type=%d nmem=%p",
200 name, length, flags, type, nmem);
201 t= (TERMID) nmem_malloc (nmem, sizeof(*t));
204 else if (length == -1)
205 t->name = nmem_strdup(nmem,name);
208 t->name = (char*) nmem_malloc(nmem,length+1);
209 memcpy (t->name, name, length);
210 t->name[length] = '\0';
215 t->flags = nmem_strdup(nmem,flags);