X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=rset%2Frsbetween.c;h=49346fb1f3841df8a9f1554db00d047703a82305;hb=ec214819d7b9e2f5c362584d8e38f83e13aae600;hp=e04c74617d07c7f93a2a78f1e6e17ad2d147e3b5;hpb=70ba74c9bbf739fbe82d1bc2b0fb64a547c0c9e0;p=idzebra-moved-to-github.git diff --git a/rset/rsbetween.c b/rset/rsbetween.c index e04c746..49346fb 100644 --- a/rset/rsbetween.c +++ b/rset/rsbetween.c @@ -1,4 +1,4 @@ -/* $Id: rsbetween.c,v 1.15 2004-08-03 14:54:41 heikki Exp $ +/* $Id: rsbetween.c,v 1.21 2004-08-24 15:00:16 heikki Exp $ Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002 Index Data Aps @@ -35,38 +35,37 @@ Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA #include #include -#include #include +#include -#define RSBETWEEN_DEBUG 0 +#define RSBETWEEN_DEBUG 0 -static void *r_create_between(RSET ct, const struct rset_control *sel, void *parms); static RSFD r_open_between (RSET ct, int flag); static void r_close_between (RSFD rfd); static void r_delete_between (RSET ct); static void r_rewind_between (RSFD rfd); -static int r_forward_between(RSET ct, RSFD rfd, void *buf, int *term_index, +static int r_forward_between(RSET ct, RSFD rfd, void *buf, int (*cmpfunc)(const void *p1, const void *p2), const void *untilbuf); -static int r_read_between (RSFD rfd, void *buf, int *term_index); +static int r_read_between (RSFD rfd, void *buf); static int r_write_between (RSFD rfd, const void *buf); +static void r_pos_between (RSFD rfd, double *current, double *total); -static const struct rset_control control_between = +static const struct rset_control control = { "between", - r_create_between, r_open_between, r_close_between, r_delete_between, r_rewind_between, r_forward_between, /* rset_default_forward, */ - rset_default_pos, + r_pos_between, r_read_between, r_write_between, }; -const struct rset_control *rset_kind_between = &control_between; +const struct rset_control *rset_kind_between = &control; struct rset_between_info { int key_size; @@ -74,7 +73,6 @@ struct rset_between_info { RSET rset_m; RSET rset_r; RSET rset_attr; - int term_index_s; int (*cmp)(const void *p1, const void *p2); char *(*printer)(const void *p1, char *buf); struct rset_between_rfd *rfd_list; @@ -89,9 +87,6 @@ struct rset_between_rfd { int more_m; int more_r; int more_attr; - int term_index_l; - int term_index_m; - int term_index_r; void *buf_l; void *buf_m; void *buf_r; @@ -99,6 +94,7 @@ struct rset_between_rfd { int level; struct rset_between_rfd *next; struct rset_between_info *info; + zint hits; }; #if RSBETWEEN_DEBUG @@ -116,6 +112,28 @@ static void log2 (struct rset_between_rfd *p, char *msg, int cmp_l, int cmp_r) } #endif +RSET rsbetween_create( NMEM nmem, int key_size, + int (*cmp)(const void *p1, const void *p2), + RSET rset_l, RSET rset_m, RSET rset_r, RSET rset_attr, + char *(*printer)(const void *p1, char *buf) ) +{ + RSET rnew=rset_create_base(&control, nmem); + struct rset_between_info *info; + info = (struct rset_between_info *) nmem_malloc(rnew->nmem,sizeof(*info)); + info->key_size = key_size; + info->rset_l = rset_l; + info->rset_m = rset_m; + info->rset_r = rset_r; + info->rset_attr = rset_attr; + info->cmp = cmp; + info->printer = printer; + info->rfd_list = NULL; + + rnew->priv=info; + return rnew; +} + +/* static void *r_create_between (RSET ct, const struct rset_control *sel, void *parms) { @@ -128,53 +146,30 @@ static void *r_create_between (RSET ct, const struct rset_control *sel, info->rset_m = between_parms->rset_m; info->rset_r = between_parms->rset_r; info->rset_attr = between_parms->rset_attr; - if (rset_is_volatile(info->rset_l) || - rset_is_volatile(info->rset_m) || - rset_is_volatile(info->rset_r)) - ct->flags |= RSET_FLAG_VOLATILE; info->cmp = between_parms->cmp; info->printer = between_parms->printer; info->rfd_list = NULL; - - info->term_index_s = info->rset_l->no_rset_terms; - if (info->rset_m) - { - ct->no_rset_terms = - info->rset_l->no_rset_terms + - info->rset_m->no_rset_terms + - info->rset_r->no_rset_terms; - ct->rset_terms = (RSET_TERM *) - xmalloc (sizeof (*ct->rset_terms) * ct->no_rset_terms); - memcpy (ct->rset_terms, info->rset_l->rset_terms, - info->rset_l->no_rset_terms * sizeof(*ct->rset_terms)); - memcpy (ct->rset_terms + info->rset_l->no_rset_terms, - info->rset_m->rset_terms, - info->rset_m->no_rset_terms * sizeof(*ct->rset_terms)); - memcpy (ct->rset_terms + info->rset_l->no_rset_terms + - info->rset_m->no_rset_terms, - info->rset_r->rset_terms, - info->rset_r->no_rset_terms * sizeof(*ct->rset_terms)); - } - else - { - ct->no_rset_terms = - info->rset_l->no_rset_terms + - info->rset_r->no_rset_terms; - ct->rset_terms = (RSET_TERM *) - xmalloc (sizeof (*ct->rset_terms) * ct->no_rset_terms); - memcpy (ct->rset_terms, info->rset_l->rset_terms, - info->rset_l->no_rset_terms * sizeof(*ct->rset_terms)); - memcpy (ct->rset_terms + info->rset_l->no_rset_terms, - info->rset_r->rset_terms, - info->rset_r->no_rset_terms * sizeof(*ct->rset_terms)); - } - return info; } +*/ + + +static void r_delete_between (RSET ct) +{ + struct rset_between_info *info = (struct rset_between_info *) ct->priv; + + assert (info->rfd_list == NULL); + rset_delete (info->rset_l); + rset_delete (info->rset_m); + rset_delete (info->rset_r); + if (info->rset_attr) + rset_delete (info->rset_attr); +} + static RSFD r_open_between (RSET ct, int flag) { - struct rset_between_info *info = (struct rset_between_info *) ct->buf; + struct rset_between_info *info = (struct rset_between_info *) ct->priv; struct rset_between_rfd *rfd; if (flag & RSETF_WRITE) @@ -182,34 +177,31 @@ static RSFD r_open_between (RSET ct, int flag) logf (LOG_FATAL, "between set type is read-only"); return NULL; } - rfd = (struct rset_between_rfd *) xmalloc (sizeof(*rfd)); + rfd = (struct rset_between_rfd *) nmem_malloc(ct->nmem, (sizeof(*rfd))); rfd->next = info->rfd_list; info->rfd_list = rfd; rfd->info = info; - rfd->buf_l = xmalloc (info->key_size); - rfd->buf_m = xmalloc (info->key_size); - rfd->buf_r = xmalloc (info->key_size); - rfd->buf_attr = xmalloc (info->key_size); + rfd->buf_l = nmem_malloc(ct->nmem, (info->key_size)); + rfd->buf_m = nmem_malloc(ct->nmem, (info->key_size)); + rfd->buf_r = nmem_malloc(ct->nmem, (info->key_size)); + rfd->buf_attr = nmem_malloc(ct->nmem, (info->key_size)); rfd->rfd_l = rset_open (info->rset_l, RSETF_READ); rfd->rfd_m = rset_open (info->rset_m, RSETF_READ); rfd->rfd_r = rset_open (info->rset_r, RSETF_READ); - rfd->more_l = rset_read (info->rset_l, rfd->rfd_l, rfd->buf_l, - &rfd->term_index_l); - rfd->more_m = rset_read (info->rset_m, rfd->rfd_m, rfd->buf_m, - &rfd->term_index_m); - rfd->more_r = rset_read (info->rset_r, rfd->rfd_r, rfd->buf_r, - &rfd->term_index_r); + rfd->more_l = rset_read (info->rset_l, rfd->rfd_l, rfd->buf_l); + rfd->more_m = rset_read (info->rset_m, rfd->rfd_m, rfd->buf_m); + rfd->more_r = rset_read (info->rset_r, rfd->rfd_r, rfd->buf_r); if (info->rset_attr) { - int dummy; rfd->rfd_attr = rset_open (info->rset_attr, RSETF_READ); rfd->more_attr = rset_read (info->rset_attr, rfd->rfd_attr, - rfd->buf_attr, &dummy); + rfd->buf_attr); } rfd->level=0; + rfd->hits=0; return rfd; } @@ -221,10 +213,6 @@ static void r_close_between (RSFD rfd) for (rfdp = &info->rfd_list; *rfdp; rfdp = &(*rfdp)->next) if (*rfdp == rfd) { - xfree ((*rfdp)->buf_l); - xfree ((*rfdp)->buf_m); - xfree ((*rfdp)->buf_r); - xfree ((*rfdp)->buf_attr); rset_close (info->rset_l, (*rfdp)->rfd_l); rset_close (info->rset_m, (*rfdp)->rfd_m); rset_close (info->rset_r, (*rfdp)->rfd_r); @@ -232,27 +220,12 @@ static void r_close_between (RSFD rfd) rset_close (info->rset_attr, (*rfdp)->rfd_attr); *rfdp = (*rfdp)->next; - xfree (rfd); return; } logf (LOG_FATAL, "r_close_between but no rfd match!"); assert (0); } -static void r_delete_between (RSET ct) -{ - struct rset_between_info *info = (struct rset_between_info *) ct->buf; - - assert (info->rfd_list == NULL); - xfree (ct->rset_terms); - rset_delete (info->rset_l); - rset_delete (info->rset_m); - rset_delete (info->rset_r); - if (info->rset_attr) - rset_delete (info->rset_attr); - xfree (info); -} - static void r_rewind_between (RSFD rfd) { struct rset_between_info *info = ((struct rset_between_rfd*)rfd)->info; @@ -264,22 +237,21 @@ static void r_rewind_between (RSFD rfd) rset_rewind (info->rset_l, p->rfd_l); rset_rewind (info->rset_m, p->rfd_m); rset_rewind (info->rset_r, p->rfd_r); - p->more_l = rset_read (info->rset_l, p->rfd_l, p->buf_l, &p->term_index_l); - p->more_m = rset_read (info->rset_m, p->rfd_m, p->buf_m, &p->term_index_m); - p->more_r = rset_read (info->rset_r, p->rfd_r, p->buf_r, &p->term_index_r); + p->more_l = rset_read (info->rset_l, p->rfd_l, p->buf_l); + p->more_m = rset_read (info->rset_m, p->rfd_m, p->buf_m); + p->more_r = rset_read (info->rset_r, p->rfd_r, p->buf_r); if (info->rset_attr) { - int dummy; rset_rewind (info->rset_attr, p->rfd_attr); - p->more_attr = rset_read (info->rset_attr, p->rfd_attr, p->buf_attr, - &dummy); + p->more_attr = rset_read (info->rset_attr, p->rfd_attr, p->buf_attr); } p->level=0; + p->hits=0; } -static int r_forward_between(RSET ct, RSFD rfd, void *buf, int *term_index, +static int r_forward_between(RSET ct, RSFD rfd, void *buf, int (*cmpfunc)(const void *p1, const void *p2), const void *untilbuf) { @@ -293,11 +265,11 @@ static int r_forward_between(RSET ct, RSFD rfd, void *buf, int *term_index, /* naturally forward the l, m, and attr pointers */ if (p->more_m) p->more_m=rset_forward(info->rset_m,p->rfd_m, p->buf_m, - &p->term_index_m, info->cmp,untilbuf); + info->cmp,untilbuf); #if RSBETWEEN_DEBUG log2( p, "fwd: after forward M", 0,0); #endif - rc = r_read_between(rfd, buf, term_index); + rc = r_read_between(rfd, buf); #if RSBETWEEN_DEBUG log2( p, "fwd: after forward", 0,0); #endif @@ -307,7 +279,7 @@ static int r_forward_between(RSET ct, RSFD rfd, void *buf, int *term_index, -static int r_read_between (RSFD rfd, void *buf, int *term_index) +static int r_read_between (RSFD rfd, void *buf) { struct rset_between_rfd *p = (struct rset_between_rfd *) rfd; struct rset_between_info *info = p->info; @@ -346,7 +318,6 @@ static int r_read_between (RSFD rfd, void *buf, int *term_index) else { int cmp_attr; - int dummy_term; attr_match = 0; while (p->more_attr) { @@ -359,8 +330,8 @@ static int r_read_between (RSFD rfd, void *buf, int *term_index) else if (cmp_attr > 0) break; else if (cmp_attr==-1) - p->more_attr = rset_read (info->rset_attr, p->rfd_attr, - p->buf_attr, &dummy_term); + p->more_attr = rset_read (info->rset_attr, + p->rfd_attr, p->buf_attr); /* if we had a forward that went all the way to * the seqno, we could use that. But fwd only goes * to the sysno */ @@ -368,8 +339,7 @@ static int r_read_between (RSFD rfd, void *buf, int *term_index) { p->more_attr = rset_forward( info->rset_attr, p->rfd_attr, - p->buf_attr, &dummy_term, - info->cmp, p->buf_l); + p->buf_attr, info->cmp, p->buf_l); #if RSBETWEEN_DEBUG logf(LOG_DEBUG, "btw: after frowarding attr m=%d",p->more_attr); #endif @@ -383,10 +353,8 @@ static int r_read_between (RSFD rfd, void *buf, int *term_index) { if (p->more_l) { - p->more_l=rset_forward( - info->rset_l, p->rfd_l, - p->buf_l, &p->term_index_l, - info->cmp, p->buf_m); + p->more_l=rset_forward( info->rset_l, p->rfd_l, + p->buf_l, info->cmp, p->buf_m); if (p->more_l) cmp_l= (*info->cmp)(p->buf_l, p->buf_m); else @@ -397,12 +365,10 @@ static int r_read_between (RSFD rfd, void *buf, int *term_index) } } else { - p->more_l = rset_read (info->rset_l, p->rfd_l, p->buf_l, - &p->term_index_l); + p->more_l = rset_read (info->rset_l, p->rfd_l, p->buf_l); } #else - p->more_l = rset_read (info->rset_l, p->rfd_l, p->buf_l, - &p->term_index_l); + p->more_l = rset_read (info->rset_l, p->rfd_l, p->buf_l); #endif if (p->more_l) { @@ -437,21 +403,17 @@ static int r_read_between (RSFD rfd, void *buf, int *term_index) #if NEWCODE if (cmp_r==-2) { - p->more_r=rset_forward( - info->rset_r, p->rfd_r, - p->buf_r, &p->term_index_r, - info->cmp, p->buf_m); + p->more_r=rset_forward( info->rset_r, p->rfd_r, + p->buf_r, info->cmp, p->buf_m); } else { - p->more_r = rset_read (info->rset_r, p->rfd_r, p->buf_r, - &p->term_index_r); + p->more_r = rset_read (info->rset_r, p->rfd_r, p->buf_r); } if (p->more_r) cmp_r= (*info->cmp)(p->buf_r, p->buf_m); #else - p->more_r = rset_read (info->rset_r, p->rfd_r, p->buf_r, - &p->term_index_r); + p->more_r = rset_read (info->rset_r, p->rfd_r, p->buf_r); cmp_r= (*info->cmp)(p->buf_r, p->buf_m); #endif } @@ -468,14 +430,13 @@ static int r_read_between (RSFD rfd, void *buf, int *term_index) if ( attr_match && p->level > 0) /* within a tag pair (or deeper) */ { memcpy (buf, p->buf_m, info->key_size); - *term_index = p->term_index_m; #if RSBETWEEN_DEBUG log2( p, "Returning a hit (and forwarding m)", cmp_l, cmp_r); #endif - p->more_m = rset_read (info->rset_m, p->rfd_m, p->buf_m, - &p->term_index_m); + p->more_m = rset_read (info->rset_m, p->rfd_m, p->buf_m); if (cmp_l == 2) p->level = 0; + p->hits++; return 1; } else if ( ! p->more_l ) /* not in data, no more starts */ @@ -489,20 +450,16 @@ static int r_read_between (RSFD rfd, void *buf, int *term_index) if (cmp_l == 2) { p->level = 0; - p->more_m=rset_forward( - info->rset_m, p->rfd_m, - p->buf_m, &p->term_index_m, - info->cmp, p->buf_l); + p->more_m=rset_forward( info->rset_m, p->rfd_m, + p->buf_m, info->cmp, p->buf_l); } else { - p->more_m = rset_read (info->rset_m, p->rfd_m, p->buf_m, - &p->term_index_m); + p->more_m = rset_read (info->rset_m, p->rfd_m, p->buf_m); } #else if (cmp_l == 2) p->level = 0; - p->more_m = rset_read (info->rset_m, p->rfd_m, p->buf_m, - &p->term_index_m); + p->more_m = rset_read (info->rset_m, p->rfd_m, p->buf_m); #endif #if RSBETWEEN_DEBUG log2( p, "End of M loop", cmp_l, cmp_r); @@ -524,3 +481,37 @@ static int r_write_between (RSFD rfd, const void *buf) return -1; } + +static void r_pos_between (RSFD rfd, double *current, double *total) +{ + struct rset_between_rfd *p = (struct rset_between_rfd *) rfd; + struct rset_between_info *info = p->info; + double lcur,ltot; + double mcur,mtot; + double rcur,rtot; + double r; + ltot=-1; rtot=-1; + rset_pos(info->rset_l, p->rfd_l, &lcur, <ot); + rset_pos(info->rset_m, p->rfd_m, &mcur, &mtot); + rset_pos(info->rset_r, p->rfd_r, &rcur, &rtot); + if ( (ltot<0) && (mtot<0) && (rtot<0) ) { /*no position */ + *current=mcur; /* return same as you got */ + *total=mtot; /* probably -1 for not available */ + } + if ( ltot<0) { ltot=0; lcur=0;} /* if only one useful, use it */ + if ( mtot<0) { mtot=0; mcur=0;} + if ( rtot<0) { rtot=0; rcur=0;} + if ( ltot+mtot+rtot < 1 ) { /* empty rset */ + *current=0; + *total=0; + return; + } + r=1.0*(lcur+mcur+rcur)/(ltot+mtot+rtot); /* weighed average of l and r */ + *current=p->hits; + *total=*current/r ; +#if RSBETWEEN_DEBUG + yaz_log(LOG_DEBUG,"betw_pos: (%s/%s) %0.1f/%0.1f= %0.4f ", + info->rset_l->control->desc, info->rset_r->control->desc, + *current, *total, r); +#endif +}