📄 zgdu.c
字号:
/* * Copyright (c) 2002-2003, Index Data. * See the file LICENSE for details. * * $Id: zgdu.c,v 1.9 2003/03/11 11:09:17 adam Exp $ */#include <yaz/odr.h>#include <yaz/yaz-version.h>#include <yaz/zgdu.h>static int decode_headers_content(ODR o, int off, Z_HTTP_Header **headers, char **content_buf, int *content_len){ int i = off; *headers = 0; while (i < o->size-1 && o->buf[i] == '\r') { int po; i++; if (o->buf[i] != '\n') { o->error = OHTTP; return 0; } i++; if (o->buf[i] == '\r') 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 && o->buf[i] != '\r' ; i++) ; (*headers)->value = (char*) odr_malloc(o, i - po + 1); memcpy ((*headers)->value, o->buf + po, i - po); (*headers)->value[i - po] = '\0'; headers = &(*headers)->next; } *headers = 0; i++; if (o->buf[i] != '\n') { o->error = OHTTP; return 0; } i++; 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(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(Z_HTTP_Header *hp, const char *n){ for (; hp; hp = hp->next) if (!strcmp(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_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, "<!DOCTYPE HTML PUBLIC \"-//IETF//DTD HTML 2.0//EN\">\n" "<HTML>\n" " <HEAD>\n" " <TITLE>YAZ " YAZ_VERSION "</TITLE>\n" " </HEAD>\n" " <BODY>\n" " <P><A HREF=\"http://www.indexdata.dk/yaz/\">YAZ</A> " YAZ_VERSION "</P>\n" " <P>Error: %d</P>\n" " <P>Description: %.50s</P>\n" " </BODY>\n" "</HTML>\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; hr = (*p)->u.HTTP_Response = (Z_HTTP_Response *) odr_malloc(o, sizeof(*hr)); po = i = 5; while (i < o->size-2 && o->buf[i] != ' ' && o->buf[i] != '\r') 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] != '\r') 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 && o->buf[1] >= 0x20 && o->buf[1] < 0x7f && 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 (o->buf[i] != '\r') { if (i >= o->size-1) { o->error = OHTTP; return 0; } i++; } hr->version = (char *) odr_malloc(o, i - po + 1); memcpy(hr->version, o->buf + po, i - po); hr->version[i - po] = '\0'; /* headers */ return decode_headers_content(o, i, &hr->headers, &hr->content_buf, &hr->content_len); } else { (*p)->which = Z_GDU_Z3950; return z_APDU(o, &(*p)->u.z3950, opt, 0); } } 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[20]; sprintf(lstr, "%d", (*p)->u.HTTP_Response->content_len); z_HTTP_header_add(o, &(*p)->u.HTTP_Response->headers, "Content-Length", 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) { fprintf(o->print, "-- HTTP response:\n%.*s\n", o->top - top0, o->buf + top0); fprintf(o->print, "-- \n"); } break; 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[20]; sprintf(lstr, "%d", (*p)->u.HTTP_Request->content_len); z_HTTP_header_add(o, &(*p)->u.HTTP_Request->headers, "Content-Length", 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) { fprintf(o->print, "-- HTTP request:\n%.*s\n", o->top, o->buf); } break; case Z_GDU_Z3950: return z_APDU(o, &(*p)->u.z3950, opt, 0); } } return 1;}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -