X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=index%2Fkcompare.c;h=0f3e3b303a18c0c384c2d36a9c3478e1c4676bf5;hb=3b728a4683973b29bdb8eef0347cc79b01ff3e93;hp=2d7e72095899268838dca6b0b5e32c6558f82f64;hpb=45554249f7785e31125a062dc410a93ef693f574;p=idzebra-moved-to-github.git diff --git a/index/kcompare.c b/index/kcompare.c index 2d7e720..0f3e3b3 100644 --- a/index/kcompare.c +++ b/index/kcompare.c @@ -1,10 +1,36 @@ /* - * Copyright (C) 1994-1996, Index Data I/S + * Copyright (C) 1994-1998, Index Data I/S * All rights reserved. * Sebastian Hammer, Adam Dickmeiss * * $Log: kcompare.c,v $ - * Revision 1.18 1996-10-29 14:09:44 adam + * Revision 1.25 1998-06-08 15:26:06 adam + * Minor changes. + * + * Revision 1.24 1998/06/08 14:43:12 adam + * Added suport for EXPLAIN Proxy servers - added settings databasePath + * and explainDatabase to facilitate this. Increased maximum number + * of databases and attributes in one register. + * + * Revision 1.23 1998/03/05 08:45:12 adam + * New result set model and modular ranking system. Moved towards + * descent server API. System information stored as "SGML" records. + * + * Revision 1.22 1997/09/22 12:39:06 adam + * Added get_pos method for the ranked result sets. + * + * Revision 1.21 1997/09/17 12:19:13 adam + * Zebra version corresponds to YAZ version 1.4. + * Changed Zebra server so that it doesn't depend on global common_resource. + * + * Revision 1.20 1996/12/23 15:30:44 adam + * Work on truncation. + * Bug fix: result sets weren't deleted after server shut down. + * + * Revision 1.19 1996/12/11 12:08:00 adam + * Added better compression. + * + * Revision 1.18 1996/10/29 14:09:44 adam * Use of cisam system - enabled if setting isamc is 1. * * Revision 1.17 1996/06/04 10:18:58 adam @@ -82,6 +108,25 @@ void key_logdump (int logmask, const void *p) logf (logmask, "%7d s=%-4d", key.sysno, key.seqno); } +int key_compare_it (const void *p1, const void *p2) +{ + if (((struct it_key *) p1)->sysno != ((struct it_key *) p2)->sysno) + { + if (((struct it_key *) p1)->sysno > ((struct it_key *) p2)->sysno) + return 2; + else + return -2; + } + if (((struct it_key *) p1)->seqno != ((struct it_key *) p2)->seqno) + { + if (((struct it_key *) p1)->seqno > ((struct it_key *) p2)->seqno) + return 1; + else + return -1; + } + return 0; +} + int key_compare (const void *p1, const void *p2) { struct it_key i1, i2; @@ -94,7 +139,6 @@ int key_compare (const void *p1, const void *p2) else return -2; } -#if IT_KEY_HAVE_SEQNO if (i1.seqno != i2.seqno) { if (i1.seqno > i2.seqno) @@ -102,15 +146,6 @@ int key_compare (const void *p1, const void *p2) else return -1; } -#else - if (i1.freq != i2.freq) - { - if (i1.freq > i2.freq) - return 1; - else - return -1; - } -#endif return 0; } @@ -129,24 +164,31 @@ int key_qsort_compare (const void *p1, const void *p2) return cp1[l] - cp2[l]; } -struct iscz_code_info { +int key_get_pos (const void *p) +{ + struct it_key key; + memcpy (&key, p, sizeof(key)); + return key.seqno; +} + +struct iscz1_code_info { struct it_key key; }; -static void *iscz_code_start (int mode) +static void *iscz1_code_start (int mode) { - struct iscz_code_info *p = xmalloc (sizeof(*p)); + struct iscz1_code_info *p = xmalloc (sizeof(*p)); p->key.sysno = 0; p->key.seqno = 0; return p; } -static void iscz_code_stop (int mode, void *p) +static void iscz1_code_stop (int mode, void *p) { xfree (p); } -void iscz_encode_int (unsigned d, char **dst) +void iscz1_encode_int (unsigned d, char **dst) { unsigned char *bp = (unsigned char*) *dst; @@ -173,7 +215,7 @@ void iscz_encode_int (unsigned d, char **dst) *dst = (char *) bp; } -int isxz_decode_int (unsigned char **src) +int iscz1_decode_int (unsigned char **src) { unsigned c = *(*src)++; switch (c & 192) @@ -193,9 +235,9 @@ int isxz_decode_int (unsigned char **src) return c; } -static void iscz_code_item (int mode, void *vp, char **dst, char **src) +static void iscz1_code_item (int mode, void *vp, char **dst, char **src) { - struct iscz_code_info *p = vp; + struct iscz1_code_info *p = vp; struct it_key tkey; int d; @@ -203,32 +245,36 @@ static void iscz_code_item (int mode, void *vp, char **dst, char **src) { memcpy (&tkey, *src, sizeof(struct it_key)); d = tkey.sysno - p->key.sysno; - iscz_encode_int (d, dst); if (d) { - p->key.sysno = tkey.sysno; - p->key.seqno = 0; + iscz1_encode_int (2*tkey.seqno + 1, dst); + iscz1_encode_int (d, dst); + p->key.sysno += d; + p->key.seqno = tkey.seqno; + } + else + { + iscz1_encode_int (2*(tkey.seqno - p->key.seqno), dst); + p->key.seqno = tkey.seqno; } - iscz_encode_int (tkey.seqno - p->key.seqno, dst); - p->key.seqno = tkey.seqno; (*src) += sizeof(struct it_key); } else { - d = isxz_decode_int ((unsigned char **) src); - if (d) + d = iscz1_decode_int ((unsigned char **) src); + if (d & 1) { - p->key.sysno += d; - p->key.seqno = 0; + p->key.seqno = d>>1; + p->key.sysno += iscz1_decode_int ((unsigned char **) src); } - d = isxz_decode_int ((unsigned char **) src); - p->key.seqno += d; + else + p->key.seqno += d>>1; memcpy (*dst, &p->key, sizeof(struct it_key)); (*dst) += sizeof(struct it_key); } } -ISAMC_M key_isamc_m (void) +ISAMC_M key_isamc_m (Res res) { static ISAMC_M me = NULL; @@ -239,13 +285,25 @@ ISAMC_M key_isamc_m (void) me->compare_item = key_compare; - me->code_start = iscz_code_start; - me->code_item = iscz_code_item; - me->code_stop = iscz_code_stop; + me->code_start = iscz1_code_start; + me->code_item = iscz1_code_item; + me->code_stop = iscz1_code_stop; - me->debug = atoi(res_get_def (common_resource, "isamcDebug", "0")); + me->debug = atoi(res_get_def (res, "isamcDebug", "0")); - logf (LOG_LOG, "ISAMC system active"); return me; } +int key_SU_code (int ch, char *out) +{ + int i; + for (i = 0; ch; i++) + { + if (ch > 63) + out[i] = 128 + (ch & 63); + else + out[i] = 1 + ch; + ch = ch >> 6; + } + return i; +}