X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=SimpleServer.xs;h=b153429b653bc82eb1506eb8bf617b6cb410bae4;hb=4c9f8d722f9c20fb9344b4939202043e725c191e;hp=6e2ba0ed5b60caad5d06d80c6bcb21c5e0081fc9;hpb=b76d965f82b76a458000edb32eb55f97b5333caa;p=simpleserver-moved-to-github.git diff --git a/SimpleServer.xs b/SimpleServer.xs index 6e2ba0e..b153429 100644 --- a/SimpleServer.xs +++ b/SimpleServer.xs @@ -1,5 +1,5 @@ /* - * $Id: SimpleServer.xs,v 1.50 2006-07-24 23:05:22 mike Exp $ + * $Id: SimpleServer.xs,v 1.52 2006-07-26 01:08:44 mike Exp $ * ---------------------------------------------------------------------- * * Copyright (c) 2000-2004, Index Data. @@ -962,8 +962,13 @@ int bend_fetch(void *handle, bend_fetch_rr *rr) temp = hv_fetch(href, "REP_FORM", 8, 1); rep_form = newSVsv(*temp); - temp = hv_fetch(href, "SCHEMA", 8, 1); - schema = newSVsv(*temp); + temp = hv_fetch(href, "SCHEMA", 6, 1); + if (temp != 0) { + schema = newSVsv(*temp); + ptr = SvPV(schema, length); + rr->schema = (char *)odr_malloc(rr->stream, length + 1); + strcpy(rr->schema, ptr); + } temp = hv_fetch(href, "HANDLE", 6, 1); point = newSVsv(*temp); @@ -976,10 +981,6 @@ int bend_fetch(void *handle, bend_fetch_rr *rr) strcpy(ODR_basename, ptr); rr->basename = ODR_basename; - ptr = SvPV(schema, length); - rr->schema = (char *)odr_malloc(rr->stream, length + 1); - strcpy(rr->schema, ptr); - ptr = SvPV(rep_form, length); ODR_oid_buf = (int *)odr_malloc(rr->stream, (MAX_OID + 1) * sizeof(int)); if (dotted2oid(ptr, ODR_oid_buf) == -1) /* Maximum number of OID elements exceeded */ @@ -1206,7 +1207,7 @@ int bend_scan(void *handle, bend_scan_rr *rr) if (rr->term->term->which == Z_Term_general) { term_len = rr->term->term->u.general->len; - hv_store(href, "TERM", 4, newSVpv(rr->term->term->u.general->buf, term_len), 0); + hv_store(href, "TERM", 4, newSVpv((char*) rr->term->term->u.general->buf, term_len), 0); } else { rr->errcode = 229; /* Unsupported term type */ return 0;