From: Adam Dickmeiss Date: Thu, 11 Jan 2007 10:55:56 +0000 (+0000) Subject: Move HTTP logic out of zgdu.c to http.c. X-Git-Tag: YAZ.2.1.46~5 X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=commitdiff_plain;h=f9d5791b3b7222309b5112e8e269ff36325d7498;hp=d6862f25e98c81258ac86ee865b82ba610fd0b8f Move HTTP logic out of zgdu.c to http.c. --- diff --git a/include/yaz/zgdu.h b/include/yaz/zgdu.h index 92abdbf..1dc65dd 100644 --- a/include/yaz/zgdu.h +++ b/include/yaz/zgdu.h @@ -24,7 +24,7 @@ * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ -/* $Id: zgdu.h,v 1.11 2007-01-03 08:42:14 adam Exp $ */ +/* $Id: zgdu.h,v 1.12 2007-01-11 10:55:56 adam Exp $ */ /** * \file zgdu.h @@ -91,6 +91,11 @@ YAZ_EXPORT Z_GDU *z_get_HTTP_Request_host_path(ODR odr, const char *host, const char *path); +YAZ_EXPORT int yaz_decode_http_request(ODR o, Z_HTTP_Request **hr_p); +YAZ_EXPORT int yaz_decode_http_response(ODR o, Z_HTTP_Response **hr_p); +YAZ_EXPORT int yaz_encode_http_response(ODR o, Z_HTTP_Response *hr); +YAZ_EXPORT int yaz_encode_http_request(ODR o, Z_HTTP_Request *hr); + YAZ_END_CDECL #endif diff --git a/src/Makefile.am b/src/Makefile.am index 3e8c349..5aceac1 100644 --- a/src/Makefile.am +++ b/src/Makefile.am @@ -1,6 +1,6 @@ ## This file is part of the YAZ toolkit. ## Copyright (C) 1995-2007, Index Data, All rights reserved. -## $Id: Makefile.am,v 1.50 2007-01-09 13:56:48 adam Exp $ +## $Id: Makefile.am,v 1.51 2007-01-11 10:55:57 adam Exp $ YAZ_VERSION_INFO=2:1:0 @@ -79,7 +79,7 @@ libyaz_la_SOURCES=version.c options.c log.c \ cqlstrer.c querytowrbuf.c \ eventl.c seshigh.c statserv.c requestq.c tcpdchk.c \ eventl.h service.c service.h session.h test.c timing.c \ - xmlquery.c \ + xmlquery.c http.c \ mime.c mime.h \ record_conv.c retrieval.c elementset.c diff --git a/src/http.c b/src/http.c new file mode 100644 index 0000000..12e7c66 --- /dev/null +++ b/src/http.c @@ -0,0 +1,477 @@ +/* + * Copyright (C) 1995-2007, Index Data ApS + * See the file LICENSE for details. + * + * $Id: http.c,v 1.1 2007-01-11 10:55:57 adam Exp $ + */ + +/** + * \file http.c + * \brief Implements HTTP decoding + */ + +#include +#include +#include +#include +#include + +#ifdef WIN32 +#define strncasecmp _strnicmp +#define strcasecmp _stricmp +#endif + +static int decode_headers_content(ODR o, int off, Z_HTTP_Header **headers, + char **content_buf, int *content_len) +{ + int i = off; + int chunked = 0; + + *headers = 0; + while (i < o->size-1 && o->buf[i] == '\n') + { + int po; + i++; + if (o->buf[i] == '\r' && i < o->size-1 && o->buf[i+1] == '\n') + { + i++; + break; + } + if (o->buf[i] == '\n') + break; + for (po = i; ; i++) + { + if (i == o->size) + { + o->error = OHTTP; + return 0; + } + else if (o->buf[i] == ':') + break; + } + *headers = (Z_HTTP_Header *) odr_malloc(o, sizeof(**headers)); + (*headers)->name = (char*) odr_malloc(o, i - po + 1); + memcpy ((*headers)->name, o->buf + po, i - po); + (*headers)->name[i - po] = '\0'; + i++; + while (i < o->size-1 && o->buf[i] == ' ') + i++; + for (po = i; i < o->size-1 && !strchr("\r\n", o->buf[i]); i++) + ; + + (*headers)->value = (char*) odr_malloc(o, i - po + 1); + memcpy ((*headers)->value, o->buf + po, i - po); + (*headers)->value[i - po] = '\0'; + + if (!strcasecmp((*headers)->name, "Transfer-Encoding") + && + !strcasecmp((*headers)->value, "chunked")) + chunked = 1; + headers = &(*headers)->next; + if (i < o->size-1 && o->buf[i] == '\r') + i++; + } + *headers = 0; + if (o->buf[i] != '\n') + { + o->error = OHTTP; + return 0; + } + i++; + + if (chunked) + { + int off = 0; + + /* we know buffer will be smaller than o->size - i*/ + *content_buf = (char*) odr_malloc(o, o->size - i); + + while (1) + { + /* chunk length .. */ + int chunk_len = 0; + for (; i < o->size-2; i++) + if (isdigit(o->buf[i])) + chunk_len = chunk_len * 16 + + (o->buf[i] - '0'); + else if (isupper(o->buf[i])) + chunk_len = chunk_len * 16 + + (o->buf[i] - ('A'-10)); + else if (islower(o->buf[i])) + chunk_len = chunk_len * 16 + + (o->buf[i] - ('a'-10)); + else + break; + /* chunk extension ... */ + while (o->buf[i] != '\r' && o->buf[i+1] != '\n') + { + if (i >= o->size-2) + { + o->error = OHTTP; + return 0; + } + i++; + } + i += 2; /* skip CRLF */ + if (chunk_len == 0) + break; + if (chunk_len < 0 || off + chunk_len > o->size) + { + o->error = OHTTP; + return 0; + } + /* copy chunk .. */ + memcpy (*content_buf + off, o->buf + i, chunk_len); + i += chunk_len + 2; /* skip chunk+CRLF */ + off += chunk_len; + } + if (!off) + *content_buf = 0; + *content_len = off; + } + else + { + if (i > o->size) + { + o->error = OHTTP; + return 0; + } + else if (i == o->size) + { + *content_buf = 0; + *content_len = 0; + } + else + { + *content_len = o->size - i; + *content_buf = (char*) odr_malloc(o, *content_len + 1); + memcpy(*content_buf, o->buf + i, *content_len); + (*content_buf)[*content_len] = '\0'; + } + } + return 1; +} + +void z_HTTP_header_add_content_type(ODR o, Z_HTTP_Header **hp, + const char *content_type, + const char *charset) +{ + const char *l = "Content-Type"; + if (charset) + { + char *ctype = odr_malloc(o, strlen(content_type)+strlen(charset) + 15); + sprintf(ctype, "%s; charset=%s", content_type, charset); + z_HTTP_header_add(o, hp, l, ctype); + } + else + z_HTTP_header_add(o, hp, l, content_type); + +} + +void z_HTTP_header_add(ODR o, Z_HTTP_Header **hp, const char *n, + const char *v) +{ + while (*hp) + hp = &(*hp)->next; + *hp = (Z_HTTP_Header *) odr_malloc(o, sizeof(**hp)); + (*hp)->name = odr_strdup(o, n); + (*hp)->value = odr_strdup(o, v); + (*hp)->next = 0; +} + +const char *z_HTTP_header_lookup(const Z_HTTP_Header *hp, const char *n) +{ + for (; hp; hp = hp->next) + if (!yaz_matchstr(hp->name, n)) + return hp->value; + return 0; +} + + +Z_GDU *z_get_HTTP_Request(ODR o) +{ + Z_GDU *p = (Z_GDU *) odr_malloc(o, sizeof(*p)); + Z_HTTP_Request *hreq; + + p->which = Z_GDU_HTTP_Request; + p->u.HTTP_Request = (Z_HTTP_Request *) odr_malloc(o, sizeof(*hreq)); + hreq = p->u.HTTP_Request; + hreq->headers = 0; + hreq->content_len = 0; + hreq->content_buf = 0; + hreq->version = "1.1"; + hreq->method = "POST"; + hreq->path = "/"; + z_HTTP_header_add(o, &hreq->headers, "User-Agent", "YAZ/" YAZ_VERSION); + return p; +} + + +Z_GDU *z_get_HTTP_Request_host_path(ODR odr, + const char *host, + const char *path) +{ + Z_GDU *p = z_get_HTTP_Request(odr); + + p->u.HTTP_Request->path = odr_strdup(odr, path); + + if (host) + { + const char *cp0 = strstr(host, "://"); + const char *cp1 = 0; + if (cp0) + cp0 = cp0+3; + else + cp0 = host; + + cp1 = strchr(cp0, '/'); + if (!cp1) + cp1 = cp0+strlen(cp0); + + if (cp0 && cp1) + { + char *h = (char*) odr_malloc(odr, cp1 - cp0 + 1); + memcpy (h, cp0, cp1 - cp0); + h[cp1-cp0] = '\0'; + z_HTTP_header_add(odr, &p->u.HTTP_Request->headers, + "Host", h); + } + } + return p; +} + + +Z_GDU *z_get_HTTP_Response(ODR o, int code) +{ + Z_GDU *p = (Z_GDU *) odr_malloc(o, sizeof(*p)); + Z_HTTP_Response *hres; + + p->which = Z_GDU_HTTP_Response; + p->u.HTTP_Response = (Z_HTTP_Response *) odr_malloc(o, sizeof(*hres)); + hres = p->u.HTTP_Response; + hres->headers = 0; + hres->content_len = 0; + hres->content_buf = 0; + hres->code = code; + hres->version = "1.1"; + z_HTTP_header_add(o, &hres->headers, "Server", + "YAZ/" YAZ_VERSION); + if (code != 200) + { + hres->content_buf = (char*) odr_malloc(o, 400); + sprintf (hres->content_buf, + "\n" + "\n" + " \n" + " YAZ " YAZ_VERSION "\n" + " \n" + " \n" + "

YAZ " + YAZ_VERSION "

\n" + "

Error: %d

\n" + "

Description: %.50s

\n" + " \n" + "\n", + code, z_HTTP_errmsg(code)); + hres->content_len = strlen(hres->content_buf); + z_HTTP_header_add(o, &hres->headers, "Content-Type", "text/html"); + } + return p; +} + +const char *z_HTTP_errmsg(int code) +{ + if (code == 200) + return "OK"; + else if (code == 400) + return "Bad Request"; + else if (code == 404) + return "Not Found"; + else if (code == 405) + return "Method Not Allowed"; + else if (code == 500) + return "Internal Error"; + else + return "Unknown Error"; +} + +int yaz_decode_http_response(ODR o, Z_HTTP_Response **hr_p) +{ + int i, po; + Z_HTTP_Response *hr = (Z_HTTP_Response *) odr_malloc(o, sizeof(*hr)); + + *hr_p = hr; + hr->content_buf = 0; + hr->content_len = 0; + + po = i = 5; + while (i < o->size-2 && !strchr(" \r\n", o->buf[i])) + i++; + hr->version = (char *) odr_malloc(o, i - po + 1); + if (i - po) + memcpy(hr->version, o->buf + po, i - po); + hr->version[i-po] = 0; + if (o->buf[i] != ' ') + { + o->error = OHTTP; + return 0; + } + i++; + hr->code = 0; + while (i < o->size-2 && o->buf[i] >= '0' && o->buf[i] <= '9') + { + hr->code = hr->code*10 + (o->buf[i] - '0'); + i++; + } + while (i < o->size-1 && o->buf[i] != '\n') + i++; + return decode_headers_content(o, i, &hr->headers, + &hr->content_buf, &hr->content_len); +} + +int yaz_decode_http_request(ODR o, Z_HTTP_Request **hr_p) +{ + int i, po; + Z_HTTP_Request *hr = (Z_HTTP_Request *) odr_malloc(o, sizeof(*hr)); + + *hr_p = hr; + + /* method .. */ + for (i = 0; o->buf[i] != ' '; i++) + if (i >= o->size-5 || i > 30) + { + o->error = OHTTP; + return 0; + } + hr->method = (char *) odr_malloc(o, i+1); + memcpy (hr->method, o->buf, i); + hr->method[i] = '\0'; + /* path */ + po = i+1; + for (i = po; o->buf[i] != ' '; i++) + if (i >= o->size-5) + { + o->error = OHTTP; + return 0; + } + hr->path = (char *) odr_malloc(o, i - po + 1); + memcpy (hr->path, o->buf+po, i - po); + hr->path[i - po] = '\0'; + /* HTTP version */ + i++; + if (i > o->size-5 || memcmp(o->buf+i, "HTTP/", 5)) + { + o->error = OHTTP; + return 0; + } + i+= 5; + po = i; + while (i < o->size && !strchr("\r\n", o->buf[i])) + i++; + hr->version = (char *) odr_malloc(o, i - po + 1); + memcpy(hr->version, o->buf + po, i - po); + hr->version[i - po] = '\0'; + /* headers */ + if (i < o->size-1 && o->buf[i] == '\r') + i++; + if (o->buf[i] != '\n') + { + o->error = OHTTP; + return 0; + } + return decode_headers_content(o, i, &hr->headers, + &hr->content_buf, &hr->content_len); +} + +int yaz_encode_http_response(ODR o, Z_HTTP_Response *hr) +{ + char sbuf[80]; + Z_HTTP_Header *h; + int top0 = o->top; + + sprintf(sbuf, "HTTP/%s %d %s\r\n", hr->version, + hr->code, + z_HTTP_errmsg(hr->code)); + odr_write(o, (unsigned char *) sbuf, strlen(sbuf)); + /* apply Content-Length if not already applied */ + if (!z_HTTP_header_lookup(hr->headers, + "Content-Length")) + { + char lstr[60]; + sprintf(lstr, "Content-Length: %d\r\n", + hr->content_len); + odr_write(o, (unsigned char *) lstr, strlen(lstr)); + } + for (h = hr->headers; h; h = h->next) + { + odr_write(o, (unsigned char *) h->name, strlen(h->name)); + odr_write(o, (unsigned char *) ": ", 2); + odr_write(o, (unsigned char *) h->value, strlen(h->value)); + odr_write(o, (unsigned char *) "\r\n", 2); + } + odr_write(o, (unsigned char *) "\r\n", 2); + if (hr->content_buf) + odr_write(o, (unsigned char *) + hr->content_buf, + hr->content_len); + if (o->direction == ODR_PRINT) + { + odr_printf(o, "-- HTTP response:\n%.*s\n", o->top - top0, + o->buf + top0); + odr_printf(o, "-- \n"); + } + return 1; +} + +int yaz_encode_http_request(ODR o, Z_HTTP_Request *hr) +{ + Z_HTTP_Header *h; + int top0 = o->top; + + odr_write(o, (unsigned char *) hr->method, + strlen(hr->method)); + odr_write(o, (unsigned char *) " ", 1); + odr_write(o, (unsigned char *) hr->path, + strlen(hr->path)); + odr_write(o, (unsigned char *) " HTTP/", 6); + odr_write(o, (unsigned char *) hr->version, + strlen(hr->version)); + odr_write(o, (unsigned char *) "\r\n", 2); + if (hr->content_len && + !z_HTTP_header_lookup(hr->headers, + "Content-Length")) + { + char lstr[60]; + sprintf(lstr, "Content-Length: %d\r\n", + hr->content_len); + odr_write(o, (unsigned char *) lstr, strlen(lstr)); + } + for (h = hr->headers; h; h = h->next) + { + odr_write(o, (unsigned char *) h->name, strlen(h->name)); + odr_write(o, (unsigned char *) ": ", 2); + odr_write(o, (unsigned char *) h->value, strlen(h->value)); + odr_write(o, (unsigned char *) "\r\n", 2); + } + odr_write(o, (unsigned char *) "\r\n", 2); + if (hr->content_buf) + odr_write(o, (unsigned char *) + hr->content_buf, + hr->content_len); + if (o->direction == ODR_PRINT) + { + odr_printf(o, "-- HTTP request:\n%.*s\n", o->top - top0, + o->buf + top0); + odr_printf(o, "-- \n"); + } + return 1; +} + +/* + * Local variables: + * c-basic-offset: 4 + * indent-tabs-mode: nil + * End: + * vim: shiftwidth=4 tabstop=8 expandtab + */ + diff --git a/src/zgdu.c b/src/zgdu.c index 49f1ea3..f79bc9b 100644 --- a/src/zgdu.c +++ b/src/zgdu.c @@ -2,7 +2,7 @@ * Copyright (C) 1995-2007, Index Data ApS * See the file LICENSE for details. * - * $Id: zgdu.c,v 1.18 2007-01-11 10:30:41 adam Exp $ + * $Id: zgdu.c,v 1.19 2007-01-11 10:55:57 adam Exp $ */ /** @@ -10,330 +10,19 @@ * \brief Implements HTTP and Z39.50 encoding and decoding. */ -#include +#include #include -#include -#include #include -#ifdef WIN32 -#define strncasecmp _strnicmp -#define strcasecmp _stricmp -#endif - -static int decode_headers_content(ODR o, int off, Z_HTTP_Header **headers, - char **content_buf, int *content_len) -{ - int i = off; - int chunked = 0; - - *headers = 0; - while (i < o->size-1 && o->buf[i] == '\n') - { - int po; - i++; - if (o->buf[i] == '\r' && i < o->size-1 && o->buf[i+1] == '\n') - { - i++; - break; - } - if (o->buf[i] == '\n') - break; - for (po = i; ; i++) - { - if (i == o->size) - { - o->error = OHTTP; - return 0; - } - else if (o->buf[i] == ':') - break; - } - *headers = (Z_HTTP_Header *) odr_malloc(o, sizeof(**headers)); - (*headers)->name = (char*) odr_malloc(o, i - po + 1); - memcpy ((*headers)->name, o->buf + po, i - po); - (*headers)->name[i - po] = '\0'; - i++; - while (i < o->size-1 && o->buf[i] == ' ') - i++; - for (po = i; i < o->size-1 && !strchr("\r\n", o->buf[i]); i++) - ; - - (*headers)->value = (char*) odr_malloc(o, i - po + 1); - memcpy ((*headers)->value, o->buf + po, i - po); - (*headers)->value[i - po] = '\0'; - - if (!strcasecmp((*headers)->name, "Transfer-Encoding") - && - !strcasecmp((*headers)->value, "chunked")) - chunked = 1; - headers = &(*headers)->next; - if (i < o->size-1 && o->buf[i] == '\r') - i++; - } - *headers = 0; - if (o->buf[i] != '\n') - { - o->error = OHTTP; - return 0; - } - i++; - - if (chunked) - { - int off = 0; - - /* we know buffer will be smaller than o->size - i*/ - *content_buf = (char*) odr_malloc(o, o->size - i); - - while (1) - { - /* chunk length .. */ - int chunk_len = 0; - for (; i < o->size-2; i++) - if (isdigit(o->buf[i])) - chunk_len = chunk_len * 16 + - (o->buf[i] - '0'); - else if (isupper(o->buf[i])) - chunk_len = chunk_len * 16 + - (o->buf[i] - ('A'-10)); - else if (islower(o->buf[i])) - chunk_len = chunk_len * 16 + - (o->buf[i] - ('a'-10)); - else - break; - /* chunk extension ... */ - while (o->buf[i] != '\r' && o->buf[i+1] != '\n') - { - if (i >= o->size-2) - { - o->error = OHTTP; - return 0; - } - i++; - } - i += 2; /* skip CRLF */ - if (chunk_len == 0) - break; - if (chunk_len < 0 || off + chunk_len > o->size) - { - o->error = OHTTP; - return 0; - } - /* copy chunk .. */ - memcpy (*content_buf + off, o->buf + i, chunk_len); - i += chunk_len + 2; /* skip chunk+CRLF */ - off += chunk_len; - } - if (!off) - *content_buf = 0; - *content_len = off; - } - else - { - if (i > o->size) - { - o->error = OHTTP; - return 0; - } - else if (i == o->size) - { - *content_buf = 0; - *content_len = 0; - } - else - { - *content_len = o->size - i; - *content_buf = (char*) odr_malloc(o, *content_len + 1); - memcpy(*content_buf, o->buf + i, *content_len); - (*content_buf)[*content_len] = '\0'; - } - } - return 1; -} - -void z_HTTP_header_add_content_type(ODR o, Z_HTTP_Header **hp, - const char *content_type, - const char *charset) -{ - const char *l = "Content-Type"; - if (charset) - { - char *ctype = odr_malloc(o, strlen(content_type)+strlen(charset) + 15); - sprintf(ctype, "%s; charset=%s", content_type, charset); - z_HTTP_header_add(o, hp, l, ctype); - } - else - z_HTTP_header_add(o, hp, l, content_type); - -} - -void z_HTTP_header_add(ODR o, Z_HTTP_Header **hp, const char *n, - const char *v) -{ - while (*hp) - hp = &(*hp)->next; - *hp = (Z_HTTP_Header *) odr_malloc(o, sizeof(**hp)); - (*hp)->name = odr_strdup(o, n); - (*hp)->value = odr_strdup(o, v); - (*hp)->next = 0; -} - -const char *z_HTTP_header_lookup(const Z_HTTP_Header *hp, const char *n) -{ - for (; hp; hp = hp->next) - if (!yaz_matchstr(hp->name, n)) - return hp->value; - return 0; -} - - -Z_GDU *z_get_HTTP_Request(ODR o) -{ - Z_GDU *p = (Z_GDU *) odr_malloc(o, sizeof(*p)); - Z_HTTP_Request *hreq; - - p->which = Z_GDU_HTTP_Request; - p->u.HTTP_Request = (Z_HTTP_Request *) odr_malloc(o, sizeof(*hreq)); - hreq = p->u.HTTP_Request; - hreq->headers = 0; - hreq->content_len = 0; - hreq->content_buf = 0; - hreq->version = "1.1"; - hreq->method = "POST"; - hreq->path = "/"; - z_HTTP_header_add(o, &hreq->headers, "User-Agent", - "YAZ/" YAZ_VERSION); - return p; -} - - -Z_GDU *z_get_HTTP_Request_host_path(ODR odr, - const char *host, - const char *path) -{ - Z_GDU *p = z_get_HTTP_Request(odr); - - p->u.HTTP_Request->path = odr_strdup(odr, path); - - if (host) - { - const char *cp0 = strstr(host, "://"); - const char *cp1 = 0; - if (cp0) - cp0 = cp0+3; - else - cp0 = host; - - cp1 = strchr(cp0, '/'); - if (!cp1) - cp1 = cp0+strlen(cp0); - - if (cp0 && cp1) - { - char *h = (char*) odr_malloc(odr, cp1 - cp0 + 1); - memcpy (h, cp0, cp1 - cp0); - h[cp1-cp0] = '\0'; - z_HTTP_header_add(odr, &p->u.HTTP_Request->headers, - "Host", h); - } - } - return p; -} - - -Z_GDU *z_get_HTTP_Response(ODR o, int code) -{ - Z_GDU *p = (Z_GDU *) odr_malloc(o, sizeof(*p)); - Z_HTTP_Response *hres; - - p->which = Z_GDU_HTTP_Response; - p->u.HTTP_Response = (Z_HTTP_Response *) odr_malloc(o, sizeof(*hres)); - hres = p->u.HTTP_Response; - hres->headers = 0; - hres->content_len = 0; - hres->content_buf = 0; - hres->code = code; - hres->version = "1.1"; - z_HTTP_header_add(o, &hres->headers, "Server", - "YAZ/" YAZ_VERSION); - if (code != 200) - { - hres->content_buf = (char*) odr_malloc(o, 400); - sprintf (hres->content_buf, - "\n" - "\n" - " \n" - " YAZ " YAZ_VERSION "\n" - " \n" - " \n" - "

YAZ " - YAZ_VERSION "

\n" - "

Error: %d

\n" - "

Description: %.50s

\n" - " \n" - "\n", - code, z_HTTP_errmsg(code)); - hres->content_len = strlen(hres->content_buf); - z_HTTP_header_add(o, &hres->headers, "Content-Type", "text/html"); - } - return p; -} - -const char *z_HTTP_errmsg(int code) -{ - if (code == 200) - return "OK"; - else if (code == 400) - return "Bad Request"; - else if (code == 404) - return "Not Found"; - else if (code == 405) - return "Method Not Allowed"; - else if (code == 500) - return "Internal Error"; - else - return "Unknown Error"; -} - int z_GDU (ODR o, Z_GDU **p, int opt, const char *name) { if (o->direction == ODR_DECODE) { *p = (Z_GDU *) odr_malloc(o, sizeof(**p)); if (o->size > 10 && !memcmp(o->buf, "HTTP/", 5)) { - int i, po; - Z_HTTP_Response *hr; (*p)->which = Z_GDU_HTTP_Response; + return yaz_decode_http_response(o, &(*p)->u.HTTP_Response); - hr = (*p)->u.HTTP_Response = (Z_HTTP_Response *) - odr_malloc(o, sizeof(*hr)); - hr->content_buf = 0; - hr->content_len = 0; - - po = i = 5; - while (i < o->size-2 && !strchr(" \r\n", o->buf[i])) - i++; - hr->version = (char *) odr_malloc(o, i - po + 1); - if (i - po) - memcpy(hr->version, o->buf + po, i - po); - hr->version[i-po] = 0; - if (o->buf[i] != ' ') - { - o->error = OHTTP; - return 0; - } - i++; - hr->code = 0; - while (i < o->size-2 && o->buf[i] >= '0' && o->buf[i] <= '9') - { - hr->code = hr->code*10 + (o->buf[i] - '0'); - i++; - } - while (i < o->size-1 && o->buf[i] != '\n') - i++; - return decode_headers_content(o, i, &hr->headers, - &hr->content_buf, &hr->content_len); } else if (o->size > 5 && o->buf[0] >= 0x20 && o->buf[0] < 0x7f @@ -341,59 +30,8 @@ int z_GDU (ODR o, Z_GDU **p, int opt, const char *name) && o->buf[2] >= 0x20 && o->buf[2] < 0x7f && o->buf[3] >= 0x20 && o->buf[3] < 0x7f) { - int i, po; - Z_HTTP_Request *hr; - (*p)->which = Z_GDU_HTTP_Request; - hr = (*p)->u.HTTP_Request = - (Z_HTTP_Request *) odr_malloc(o, sizeof(*hr)); - - /* method .. */ - for (i = 0; o->buf[i] != ' '; i++) - if (i >= o->size-5 || i > 30) - { - o->error = OHTTP; - return 0; - } - hr->method = (char *) odr_malloc(o, i+1); - memcpy (hr->method, o->buf, i); - hr->method[i] = '\0'; - /* path */ - po = i+1; - for (i = po; o->buf[i] != ' '; i++) - if (i >= o->size-5) - { - o->error = OHTTP; - return 0; - } - hr->path = (char *) odr_malloc(o, i - po + 1); - memcpy (hr->path, o->buf+po, i - po); - hr->path[i - po] = '\0'; - /* HTTP version */ - i++; - if (i > o->size-5 || memcmp(o->buf+i, "HTTP/", 5)) - { - o->error = OHTTP; - return 0; - } - i+= 5; - po = i; - while (i < o->size && !strchr("\r\n", o->buf[i])) - i++; - hr->version = (char *) odr_malloc(o, i - po + 1); - memcpy(hr->version, o->buf + po, i - po); - hr->version[i - po] = '\0'; - /* headers */ - if (i < o->size-1 && o->buf[i] == '\r') - i++; - if (o->buf[i] != '\n') - { - o->error = OHTTP; - return 0; - } - return decode_headers_content(o, i, &hr->headers, - &hr->content_buf, &hr->content_len); - + return yaz_decode_http_request(o, &(*p)->u.HTTP_Request); } else { @@ -403,87 +41,17 @@ int z_GDU (ODR o, Z_GDU **p, int opt, const char *name) } else /* ENCODE or PRINT */ { - int top0 = o->top; - char sbuf[80]; - Z_HTTP_Header *h; switch((*p)->which) { case Z_GDU_HTTP_Response: - sprintf(sbuf, "HTTP/%s %d %s\r\n", (*p)->u.HTTP_Response->version, - (*p)->u.HTTP_Response->code, - z_HTTP_errmsg((*p)->u.HTTP_Response->code)); - odr_write(o, (unsigned char *) sbuf, strlen(sbuf)); - /* apply Content-Length if not already applied */ - if (!z_HTTP_header_lookup((*p)->u.HTTP_Response->headers, - "Content-Length")) - { - char lstr[60]; - sprintf(lstr, "Content-Length: %d\r\n", - (*p)->u.HTTP_Response->content_len); - odr_write(o, (unsigned char *) lstr, strlen(lstr)); - } - for (h = (*p)->u.HTTP_Response->headers; h; h = h->next) - { - odr_write(o, (unsigned char *) h->name, strlen(h->name)); - odr_write(o, (unsigned char *) ": ", 2); - odr_write(o, (unsigned char *) h->value, strlen(h->value)); - odr_write(o, (unsigned char *) "\r\n", 2); - } - odr_write(o, (unsigned char *) "\r\n", 2); - if ((*p)->u.HTTP_Response->content_buf) - odr_write(o, (unsigned char *) - (*p)->u.HTTP_Response->content_buf, - (*p)->u.HTTP_Response->content_len); - if (o->direction == ODR_PRINT) - { - odr_printf(o, "-- HTTP response:\n%.*s\n", o->top - top0, - o->buf + top0); - odr_printf(o, "-- \n"); - } - break; + return yaz_encode_http_response(o, (*p)->u.HTTP_Response); case Z_GDU_HTTP_Request: - odr_write(o, (unsigned char *) (*p)->u.HTTP_Request->method, - strlen((*p)->u.HTTP_Request->method)); - odr_write(o, (unsigned char *) " ", 1); - odr_write(o, (unsigned char *) (*p)->u.HTTP_Request->path, - strlen((*p)->u.HTTP_Request->path)); - odr_write(o, (unsigned char *) " HTTP/", 6); - odr_write(o, (unsigned char *) (*p)->u.HTTP_Request->version, - strlen((*p)->u.HTTP_Request->version)); - odr_write(o, (unsigned char *) "\r\n", 2); - if ((*p)->u.HTTP_Request->content_len && - !z_HTTP_header_lookup((*p)->u.HTTP_Request->headers, - "Content-Length")) - { - char lstr[60]; - sprintf(lstr, "Content-Length: %d\r\n", - (*p)->u.HTTP_Request->content_len); - odr_write(o, (unsigned char *) lstr, strlen(lstr)); - } - for (h = (*p)->u.HTTP_Request->headers; h; h = h->next) - { - odr_write(o, (unsigned char *) h->name, strlen(h->name)); - odr_write(o, (unsigned char *) ": ", 2); - odr_write(o, (unsigned char *) h->value, strlen(h->value)); - odr_write(o, (unsigned char *) "\r\n", 2); - } - odr_write(o, (unsigned char *) "\r\n", 2); - if ((*p)->u.HTTP_Request->content_buf) - odr_write(o, (unsigned char *) - (*p)->u.HTTP_Request->content_buf, - (*p)->u.HTTP_Request->content_len); - if (o->direction == ODR_PRINT) - { - odr_printf(o, "-- HTTP request:\n%.*s\n", o->top - top0, - o->buf + top0); - odr_printf(o, "-- \n"); - } - break; + return yaz_encode_http_request(o, (*p)->u.HTTP_Request); case Z_GDU_Z3950: return z_APDU(o, &(*p)->u.z3950, opt, 0); } } - return 1; + return 0; } /* diff --git a/win/makefile b/win/makefile index 0600251..ba812f1 100644 --- a/win/makefile +++ b/win/makefile @@ -1,6 +1,6 @@ # Copyright (C) 1995-2007, Index Data ApS # All rights reserved. -# $Id: makefile,v 1.126 2007-01-09 13:56:49 adam Exp $ +# $Id: makefile,v 1.127 2007-01-11 10:55:57 adam Exp $ # # Programmed by # Heikki Levanto & Adam Dickmeiss @@ -424,7 +424,8 @@ MISC_OBJS= \ $(OBJDIR)\cqlstrer.obj \ $(OBJDIR)\xcqlutil.obj \ $(OBJDIR)\elementset.obj \ - $(OBJDIR)\timing.obj + $(OBJDIR)\timing.obj \ + $(OBJDIR)\http.obj Z3950_OBJS= \ $(OBJDIR)\z-date.obj\