/*
- * Copyright (C) 1994-1996, Index Data I/S
+ * Copyright (C) 1994-1999, Index Data
* All rights reserved.
* Sebastian Hammer, Adam Dickmeiss
*
* $Log: kcompare.c,v $
- * Revision 1.18 1996-10-29 14:09:44 adam
+ * Revision 1.26 1999-02-02 14:50:54 adam
+ * Updated WIN32 code specific sections. Changed header.
+ *
+ * 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
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;
else
return -2;
}
-#if IT_KEY_HAVE_SEQNO
if (i1.seqno != i2.seqno)
{
if (i1.seqno > i2.seqno)
else
return -1;
}
-#else
- if (i1.freq != i2.freq)
- {
- if (i1.freq > i2.freq)
- return 1;
- else
- return -1;
- }
-#endif
return 0;
}
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;
*dst = (char *) bp;
}
-int isxz_decode_int (unsigned char **src)
+int iscz1_decode_int (unsigned char **src)
{
unsigned c = *(*src)++;
switch (c & 192)
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;
{
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;
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;
+}
projects / idzebra-moved-to-github.git / blobdiff