From 3dcdf20f2ccc20554dc247f60281eb06111f0bf6 Mon Sep 17 00:00:00 2001 From: Adam Dickmeiss Date: Mon, 29 Jul 2002 19:51:34 +0000 Subject: [PATCH] record fetch method ext that returns YAZ Z_External --- zoom/zoom-c.c | 26 +++++++++++++++++++++++++- 1 file changed, 25 insertions(+), 1 deletion(-) diff --git a/zoom/zoom-c.c b/zoom/zoom-c.c index 1b2480b..3fbd46b 100644 --- a/zoom/zoom-c.c +++ b/zoom/zoom-c.c @@ -1,5 +1,5 @@ /* - * $Id: zoom-c.c,v 1.37 2002-07-25 12:51:48 adam Exp $ + * $Id: zoom-c.c,v 1.38 2002-07-29 19:51:34 adam Exp $ * * ZOOM layer for C, connections, result sets, queries. */ @@ -1151,6 +1151,30 @@ ZOOM_record_get (ZOOM_record rec, const char *type, int *len) else if (!strcmp (type, "raw")) { if (npr->which == Z_NamePlusRecord_databaseRecord) + { + Z_External *r = (Z_External *) npr->u.databaseRecord; + + if (r->which == Z_External_sutrs) + { + if (len) *len = r->u.sutrs->len; + return (const char *) r->u.sutrs->buf; + } + else if (r->which == Z_External_octet) + { + if (len) *len = r->u.octet_aligned->len; + return (const char *) r->u.octet_aligned->buf; + } + else /* grs-1, explain, ... */ + { + if (len) *len = -1; + return (const char *) npr->u.databaseRecord; + } + } + return 0; + } + else if (!strcmp (type, "ext")) + { + if (npr->which == Z_NamePlusRecord_databaseRecord) return (const char *) npr->u.databaseRecord; return 0; } -- 1.7.10.4