1 /* $Id: yaz-proxy-config.cpp,v 1.28 2006-04-06 01:20:02 adam Exp $
2 Copyright (c) 1998-2006, Index Data.
4 This file is part of the yazproxy.
6 YAZ proxy is free software; you can redistribute it and/or modify it under
7 the terms of the GNU General Public License as published by the Free
8 Software Foundation; either version 2, or (at your option) any later
11 YAZ proxy is distributed in the hope that it will be useful, but WITHOUT ANY
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16 You should have received a copy of the GNU General Public License
17 along with YAZ proxy; see the file LICENSE. If not, write to the
18 Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
27 class Yaz_ProxyConfigP {
28 friend class Yaz_ProxyConfig;
30 Yaz_ProxyModules m_modules;
31 int mycmp(const char *hay, const char *item, size_t len);
32 int match_list(int v, const char *m);
33 int atoi_l(const char **cp);
35 void load_modules(void);
36 int check_schema(xmlNodePtr ptr, Z_RecordComposition *comp,
37 const char *schema_identifier);
39 xmlNodePtr m_proxyPtr;
40 void return_target_info(xmlNodePtr ptr, const char **url,
41 int *limit_bw, int *limit_pdu, int *limit_req,
43 int *target_idletime, int *client_idletime,
44 int *keepalive_limit_bw, int *keepalive_limit_pdu,
45 int *pre_init, const char **cql2rpn,
46 const char **negotiation_charset,
47 const char **negotiation_lang,
48 const char **target_charset,
49 const char **default_client_query_charset);
50 void return_limit(xmlNodePtr ptr,
51 int *limit_bw, int *limit_pdu, int *limit_req,
53 int check_type_1(ODR odr, xmlNodePtr ptr, Z_RPNQuery *query,
55 xmlNodePtr find_target_node(const char *name, const char *db);
56 xmlNodePtr find_target_db(xmlNodePtr ptr, const char *db);
57 const char *get_text(xmlNodePtr ptr);
58 int check_type_1_attributes(ODR odr, xmlNodePtr ptr,
59 Z_AttributeList *attrs,
61 int check_type_1_structure(ODR odr, xmlNodePtr ptr, Z_RPNStructure *q,
63 int get_explain_ptr(const char *host, const char *db,
64 xmlNodePtr *ptr_target, xmlNodePtr *ptr_explain);
70 Yaz_ProxyConfigP::Yaz_ProxyConfigP() : m_modules()
78 Yaz_ProxyConfigP::~Yaz_ProxyConfigP()
86 Yaz_ProxyConfig::Yaz_ProxyConfig()
88 m_cp = new Yaz_ProxyConfigP();
91 Yaz_ProxyConfig::~Yaz_ProxyConfig()
97 void Yaz_ProxyConfigP::load_modules()
102 for (ptr = m_proxyPtr->children; ptr; ptr = ptr->next)
105 if (ptr->type == XML_ELEMENT_NODE
106 && !strcmp((const char *) ptr->name, "module")
107 && (fname = get_text(ptr)))
109 m_modules.add_module(fname);
115 int Yaz_ProxyConfig::read_xml(const char *fname)
118 xmlDocPtr ndoc = xmlParseFile(fname);
122 yaz_log(YLOG_WARN, "Config file %s not found or parse error", fname);
123 return -1; // no good
125 int noSubstitutions = xmlXIncludeProcess(ndoc);
126 if (noSubstitutions == -1)
127 yaz_log(YLOG_WARN, "XInclude processing failed on config %s", fname);
129 xmlNodePtr proxyPtr = xmlDocGetRootElement(ndoc);
130 if (!proxyPtr || proxyPtr->type != XML_ELEMENT_NODE ||
131 strcmp((const char *) proxyPtr->name, "proxy"))
133 yaz_log(YLOG_WARN, "No proxy element in %s", fname);
137 m_cp->m_proxyPtr = proxyPtr;
139 // OK: release previous and make it the current one.
141 xmlFreeDoc(m_cp->m_docPtr);
142 m_cp->m_docPtr = ndoc;
144 m_cp->m_modules.unload_modules();
145 m_cp->load_modules();
153 const char *Yaz_ProxyConfigP::get_text(xmlNodePtr ptr)
155 for(ptr = ptr->children; ptr; ptr = ptr->next)
156 if (ptr->type == XML_TEXT_NODE)
158 xmlChar *t = ptr->content;
163 return (const char *) t;
171 void Yaz_ProxyConfigP::return_limit(xmlNodePtr ptr,
177 for (ptr = ptr->children; ptr; ptr = ptr->next)
179 if (ptr->type == XML_ELEMENT_NODE
180 && !strcmp((const char *) ptr->name, "bandwidth"))
182 const char *t = get_text(ptr);
186 if (ptr->type == XML_ELEMENT_NODE
187 && !strcmp((const char *) ptr->name, "retrieve"))
189 const char *t = get_text(ptr);
191 *limit_req = atoi(t);
193 if (ptr->type == XML_ELEMENT_NODE
194 && !strcmp((const char *) ptr->name, "pdu"))
196 const char *t = get_text(ptr);
198 *limit_pdu = atoi(t);
200 if (ptr->type == XML_ELEMENT_NODE
201 && !strcmp((const char *) ptr->name, "search"))
203 const char *t = get_text(ptr);
205 *limit_search = atoi(t);
212 void Yaz_ProxyConfigP::return_target_info(xmlNodePtr ptr,
218 int *target_idletime,
219 int *client_idletime,
220 int *keepalive_limit_bw,
221 int *keepalive_limit_pdu,
223 const char **cql2rpn,
224 const char **negotiation_charset,
225 const char **negotiation_lang,
226 const char **target_charset,
227 const char **default_client_query_charset)
232 for (; ptr; ptr = ptr->next)
234 if (ptr->type == XML_ELEMENT_NODE
235 && !strcmp((const char *) ptr->name, "preinit"))
237 const char *v = get_text(ptr);
238 *pre_init = v ? atoi(v) : 1;
240 if (ptr->type == XML_ELEMENT_NODE
241 && !strcmp((const char *) ptr->name, "url"))
243 const char *t = get_text(ptr);
244 if (t && no_url < MAX_ZURL_PLEX)
250 if (ptr->type == XML_ELEMENT_NODE
251 && !strcmp((const char *) ptr->name, "keepalive"))
254 *keepalive_limit_bw = 500000;
255 *keepalive_limit_pdu = 1000;
256 return_limit(ptr, keepalive_limit_bw, keepalive_limit_pdu,
259 if (ptr->type == XML_ELEMENT_NODE
260 && !strcmp((const char *) ptr->name, "limit"))
261 return_limit(ptr, limit_bw, limit_pdu, limit_req,
263 if (ptr->type == XML_ELEMENT_NODE
264 && !strcmp((const char *) ptr->name, "target-timeout"))
266 const char *t = get_text(ptr);
269 *target_idletime = atoi(t);
270 if (*target_idletime < 0)
271 *target_idletime = 0;
274 if (ptr->type == XML_ELEMENT_NODE
275 && !strcmp((const char *) ptr->name, "client-timeout"))
277 const char *t = get_text(ptr);
280 *client_idletime = atoi(t);
281 if (*client_idletime < 0)
282 *client_idletime = 0;
285 if (ptr->type == XML_ELEMENT_NODE
286 && !strcmp((const char *) ptr->name, "cql2rpn"))
288 const char *t = get_text(ptr);
292 if (ptr->type == XML_ELEMENT_NODE
293 && !strcmp((const char *) ptr->name, "target-charset"))
295 const char *t = get_text(ptr);
296 if (t && target_charset)
299 if (ptr->type == XML_ELEMENT_NODE
300 && !strcmp((const char *) ptr->name, "default-client-charset"))
302 const char *t = get_text(ptr);
303 if (t && default_client_query_charset)
304 *default_client_query_charset = t;
306 if (ptr->type == XML_ELEMENT_NODE
307 && !strcmp((const char *) ptr->name, "negotiation-charset"))
309 const char *t = get_text(ptr);
311 *negotiation_charset = t;
313 if (ptr->type == XML_ELEMENT_NODE
314 && !strcmp((const char *) ptr->name, "negotiation-lang"))
316 const char *t = get_text(ptr);
318 *negotiation_lang = t;
324 int Yaz_ProxyConfigP::atoi_l(const char **cp)
327 while (**cp && isdigit(**cp))
329 v = v*10 + (**cp - '0');
335 int Yaz_ProxyConfigP::match_list(int v, const char *m)
339 while(*m && isspace(*m))
350 if (v >= l && v <= h)
359 int Yaz_ProxyConfigP::check_type_1_attributes(ODR odr, xmlNodePtr ptrl,
360 Z_AttributeList *attrs,
364 for (i = 0; i<attrs->num_attributes; i++)
366 Z_AttributeElement *el = attrs->attributes[i];
368 if (!el->attributeType)
370 int type = *el->attributeType;
373 if (el->which == Z_AttributeValue_numeric && el->value.numeric)
374 value = el->value.numeric;
377 for(ptr = ptrl->children; ptr; ptr = ptr->next)
379 if (ptr->type == XML_ELEMENT_NODE &&
380 !strcmp((const char *) ptr->name, "attribute"))
382 const char *match_type = 0;
383 const char *match_value = 0;
384 const char *match_error = 0;
385 struct _xmlAttr *attr;
386 for (attr = ptr->properties; attr; attr = attr->next)
388 if (!strcmp((const char *) attr->name, "type") &&
389 attr->children && attr->children->type == XML_TEXT_NODE)
390 match_type = (const char *) attr->children->content;
391 if (!strcmp((const char *) attr->name, "value") &&
392 attr->children && attr->children->type == XML_TEXT_NODE)
393 match_value = (const char *) attr->children->content;
394 if (!strcmp((const char *) attr->name, "error") &&
395 attr->children && attr->children->type == XML_TEXT_NODE)
396 match_error = (const char *) attr->children->content;
398 if (match_type && match_value)
400 char addinfo_str[20];
401 if (!match_list(type, match_type))
405 if (!strcmp(match_type, "*"))
406 sprintf (addinfo_str, "%d", type);
409 if (!match_list(*value, match_value))
411 sprintf (addinfo_str, "%d", *value);
419 *addinfo = odr_strdup(odr, addinfo_str);
420 return atoi(match_error);
432 int Yaz_ProxyConfigP::check_type_1_structure(ODR odr, xmlNodePtr ptr,
436 if (q->which == Z_RPNStructure_complex)
438 int e = check_type_1_structure(odr, ptr, q->u.complex->s1, addinfo);
441 e = check_type_1_structure(odr, ptr, q->u.complex->s2, addinfo);
444 else if (q->which == Z_RPNStructure_simple)
446 if (q->u.simple->which == Z_Operand_APT)
448 return check_type_1_attributes(
449 odr, ptr, q->u.simple->u.attributesPlusTerm->attributes,
458 int Yaz_ProxyConfigP::check_type_1(ODR odr, xmlNodePtr ptr, Z_RPNQuery *query,
461 // possibly check for Bib-1
462 return check_type_1_structure(odr, ptr, query->RPNStructure, addinfo);
466 int Yaz_ProxyConfig::check_query(ODR odr, const char *name, Z_Query *query,
472 ptr = m_cp->find_target_node(name, 0);
475 if (query->which == Z_Query_type_1 || query->which == Z_Query_type_101)
476 return m_cp->check_type_1(odr, ptr, query->u.type_1, addinfo);
483 int Yaz_ProxyConfigP::check_schema(xmlNodePtr ptr, Z_RecordComposition *comp,
484 const char *schema_identifier)
487 int default_match = 1;
488 if (comp && comp->which == Z_RecordComp_simple &&
489 comp->u.simple && comp->u.simple->which == Z_ElementSetNames_generic)
491 esn = comp->u.simple->u.generic;
493 // if no ESN/schema was given accept..
496 // check if schema identifier match
497 if (schema_identifier && !strcmp(esn, schema_identifier))
499 // Check each name element
500 for (; ptr; ptr = ptr->next)
502 if (ptr->type == XML_ELEMENT_NODE
503 && !strcmp((const char *) ptr->name, "name"))
505 xmlNodePtr tptr = ptr->children;
507 for (; tptr; tptr = tptr->next)
508 if (tptr->type == XML_TEXT_NODE && tptr->content)
510 xmlChar *t = tptr->content;
511 while (*t && isspace(*t))
514 while (esn[i] && esn[i] == t[i])
516 if (!esn[i] && (!t[i] || isspace(t[i])))
521 return default_match;
525 const char *Yaz_ProxyConfig::check_mime_type(const char *path)
531 {".xml", "text/xml"},
532 {".xsl", "text/xml"},
533 {".tkl", "text/xml"},
534 {".xsd", "text/xml"},
535 {".html", "text/html"},
536 {".jpg", "image/jpeg"},
537 {".png", "image/png"},
538 {".gif", "image/gif"},
539 {".css", "text/css"},
540 {".pdf", "application/pdf"},
545 size_t plen = strlen (path);
546 for (i = 0; types[i].type; i++)
547 if (types[i].mask == 0)
548 return types[i].type;
551 size_t mlen = strlen(types[i].mask);
552 if (plen > mlen && !memcmp(path+plen-mlen, types[i].mask, mlen))
553 return types[i].type;
555 return "application/octet-stream";
559 void Yaz_ProxyConfig::target_authentication(const char *name,
560 ODR odr, Z_InitRequest *req)
563 xmlNodePtr ptr = m_cp->find_target_node(name, 0);
567 for (ptr = ptr->children; ptr; ptr = ptr->next)
568 if (ptr->type == XML_ELEMENT_NODE &&
569 !strcmp((const char *) ptr->name, "target-authentication"))
571 struct _xmlAttr *attr;
572 const char *type = "open";
573 for (attr = ptr->properties; attr; attr = attr->next)
575 if (!strcmp((const char *) attr->name, "type") &&
576 attr->children && attr->children->type == XML_TEXT_NODE)
577 type = (const char *) attr->children->content;
579 const char *t = m_cp->get_text(ptr);
580 if (!t || !strcmp(type, "none"))
582 req->idAuthentication = 0;
584 else if (!strcmp(type, "anonymous"))
586 req->idAuthentication =
587 (Z_IdAuthentication *)
588 odr_malloc (odr, sizeof(*req->idAuthentication));
589 req->idAuthentication->which =
590 Z_IdAuthentication_anonymous;
591 req->idAuthentication->u.anonymous = odr_nullval();
593 else if (!strcmp(type, "open"))
595 req->idAuthentication =
596 (Z_IdAuthentication *)
597 odr_malloc (odr, sizeof(*req->idAuthentication));
598 req->idAuthentication->which =
599 Z_IdAuthentication_open;
600 req->idAuthentication->u.open = odr_strdup (odr, t);
602 else if (!strcmp(type, "idPass"))
604 char user[64], group[64], password[64];
608 sscanf(t, "%63[^:]:%63[^:]:%63s", user, group, password);
610 req->idAuthentication =
611 (Z_IdAuthentication *)
612 odr_malloc (odr, sizeof(*req->idAuthentication));
613 req->idAuthentication->which =
614 Z_IdAuthentication_idPass;
615 req->idAuthentication->u.idPass =
616 (Z_IdPass*) odr_malloc(odr, sizeof(Z_IdPass));
617 req->idAuthentication->u.idPass->userId =
618 *user ? odr_strdup(odr, user) : 0;
619 req->idAuthentication->u.idPass->groupId =
620 *group ? odr_strdup(odr, group) : 0;
621 req->idAuthentication->u.idPass->password =
622 *password ? odr_strdup(odr, password) : 0;
628 int Yaz_ProxyConfig::client_authentication(const char *name,
631 const char *password,
634 int ret = YAZPROXY_RET_NOT_ME;
637 ptr = m_cp->find_target_node(name, 0);
640 for (ptr = ptr->children; ptr; ptr = ptr->next)
641 if (ptr->type == XML_ELEMENT_NODE &&
642 !strcmp((const char *) ptr->name, "client-authentication"))
644 struct _xmlAttr *attr;
645 const char *module_name = 0;
646 for (attr = ptr->properties; attr; attr = attr->next)
648 if (!strcmp((const char *) attr->name, "module") &&
649 attr->children && attr->children->type == XML_TEXT_NODE)
650 module_name = (const char *) attr->children->content;
652 ret = m_cp->m_modules.authenticate(module_name,
654 user, group, password,
657 if (ret != YAZPROXY_RET_NOT_ME)
661 if (ret == YAZPROXY_RET_PERM)
666 int Yaz_ProxyConfig::check_syntax(ODR odr, const char *name,
667 Odr_oid *syntax, Z_RecordComposition *comp,
669 char **stylesheet, char **schema,
671 char **backend_charset,
672 char **usemarcon_ini_stage1,
673 char **usemarcon_ini_stage2
688 xfree (*backend_type);
693 xfree (*backend_charset);
694 *backend_charset = 0;
696 if (usemarcon_ini_stage1)
698 xfree (*usemarcon_ini_stage1);
699 *usemarcon_ini_stage1 = 0;
701 if (usemarcon_ini_stage2)
703 xfree (*usemarcon_ini_stage2);
704 *usemarcon_ini_stage2 = 0;
707 int syntax_has_matched = 0;
710 ptr = m_cp->find_target_node(name, 0);
713 for(ptr = ptr->children; ptr; ptr = ptr->next)
715 if (ptr->type == XML_ELEMENT_NODE &&
716 !strcmp((const char *) ptr->name, "syntax"))
718 int match = 0; // if we match record syntax
719 const char *match_type = 0;
720 const char *match_error = 0;
721 const char *match_marcxml = 0;
722 const char *match_stylesheet = 0;
723 const char *match_identifier = 0;
724 const char *match_backend_type = 0;
725 const char *match_backend_charset = 0;
726 const char *match_usemarcon_ini_stage1 = 0;
727 const char *match_usemarcon_ini_stage2 = 0;
728 struct _xmlAttr *attr;
729 for (attr = ptr->properties; attr; attr = attr->next)
731 if (!strcmp((const char *) attr->name, "type") &&
732 attr->children && attr->children->type == XML_TEXT_NODE)
733 match_type = (const char *) attr->children->content;
734 if (!strcmp((const char *) attr->name, "error") &&
735 attr->children && attr->children->type == XML_TEXT_NODE)
736 match_error = (const char *) attr->children->content;
737 if (!strcmp((const char *) attr->name, "marcxml") &&
738 attr->children && attr->children->type == XML_TEXT_NODE)
739 match_marcxml = (const char *) attr->children->content;
740 if (!strcmp((const char *) attr->name, "stylesheet") &&
741 attr->children && attr->children->type == XML_TEXT_NODE)
742 match_stylesheet = (const char *) attr->children->content;
743 if (!strcmp((const char *) attr->name, "identifier") &&
744 attr->children && attr->children->type == XML_TEXT_NODE)
745 match_identifier = (const char *) attr->children->content;
746 if (!strcmp((const char *) attr->name, "backendtype") &&
747 attr->children && attr->children->type == XML_TEXT_NODE)
748 match_backend_type = (const char *)
749 attr->children->content;
750 if (!strcmp((const char *) attr->name, "backendcharset") &&
751 attr->children && attr->children->type == XML_TEXT_NODE)
752 match_backend_charset = (const char *)
753 attr->children->content;
754 if (!strcmp((const char *) attr->name, "usemarconstage1") &&
755 attr->children && attr->children->type == XML_TEXT_NODE)
756 match_usemarcon_ini_stage1 = (const char *)
757 attr->children->content;
758 if (!strcmp((const char *) attr->name, "usemarconstage2") &&
759 attr->children && attr->children->type == XML_TEXT_NODE)
760 match_usemarcon_ini_stage2 = (const char *)
761 attr->children->content;
765 if (!strcmp(match_type, "*"))
767 else if (!strcmp(match_type, "none"))
774 int match_oid[OID_SIZE];
775 oid_name_to_oid(CLASS_RECSYN, match_type, match_oid);
776 if (oid_oidcmp(match_oid, syntax) == 0)
783 syntax_has_matched = 1;
784 match = m_cp->check_schema(ptr->children, comp,
789 if (stylesheet && match_stylesheet)
792 *stylesheet = xstrdup(match_stylesheet);
794 if (schema && match_identifier)
797 *schema = xstrdup(match_identifier);
799 if (backend_type && match_backend_type)
801 xfree(*backend_type);
802 *backend_type = xstrdup(match_backend_type);
804 if (backend_charset && match_backend_charset)
806 xfree(*backend_charset);
807 *backend_charset = xstrdup(match_backend_charset);
809 if (usemarcon_ini_stage1 && match_usemarcon_ini_stage1)
811 xfree(*usemarcon_ini_stage1);
812 *usemarcon_ini_stage1 = xstrdup(match_usemarcon_ini_stage1);
814 if (usemarcon_ini_stage1 && match_usemarcon_ini_stage2)
816 xfree(*usemarcon_ini_stage2);
817 *usemarcon_ini_stage2 = xstrdup(match_usemarcon_ini_stage2);
825 if (syntax_has_matched) // if syntax OK, bad schema/ESN
829 char dotoid_str[100];
830 oid_to_dotstring(syntax, dotoid_str);
831 *addinfo = odr_strdup(odr, dotoid_str);
833 return atoi(match_error);
844 xmlNodePtr Yaz_ProxyConfigP::find_target_db(xmlNodePtr ptr, const char *db)
851 for (dptr = ptr->children; dptr; dptr = dptr->next)
852 if (dptr->type == XML_ELEMENT_NODE &&
853 !strcmp((const char *) dptr->name, "database"))
855 struct _xmlAttr *attr;
856 for (attr = dptr->properties; attr; attr = attr->next)
857 if (!strcmp((const char *) attr->name, "name"))
860 && attr->children->type==XML_TEXT_NODE
861 && attr->children->content
862 && (!strcmp((const char *) attr->children->content, db)
863 || !strcmp((const char *) attr->children->content,
871 xmlNodePtr Yaz_ProxyConfigP::find_target_node(const char *name, const char *db)
876 for (ptr = m_proxyPtr->children; ptr; ptr = ptr->next)
878 if (ptr->type == XML_ELEMENT_NODE &&
879 !strcmp((const char *) ptr->name, "target"))
884 // <target default="1"> ?
885 struct _xmlAttr *attr;
886 for (attr = ptr->properties; attr; attr = attr->next)
887 if (!strcmp((const char *) attr->name, "default") &&
888 attr->children && attr->children->type == XML_TEXT_NODE)
890 xmlChar *t = attr->children->content;
893 return find_target_db(ptr, db);
899 // <target name="name"> ?
900 struct _xmlAttr *attr;
901 for (attr = ptr->properties; attr; attr = attr->next)
902 if (!strcmp((const char *) attr->name, "name"))
905 && attr->children->type==XML_TEXT_NODE
906 && attr->children->content
907 && (!strcmp((const char *) attr->children->content,
909 || !strcmp((const char *) attr->children->content,
912 return find_target_db(ptr, db);
922 int Yaz_ProxyConfig::get_target_no(int no,
929 int *target_idletime,
930 int *client_idletime,
932 int *keepalive_limit_bw,
933 int *keepalive_limit_pdu,
935 const char **cql2rpn,
936 const char **authentication,
937 const char **negotiation_charset,
938 const char **negotiation_lang,
939 const char **target_charset,
940 const char **default_client_query_charset)
944 if (!m_cp->m_proxyPtr)
947 for (ptr = m_cp->m_proxyPtr->children; ptr; ptr = ptr->next)
948 if (ptr->type == XML_ELEMENT_NODE &&
949 !strcmp((const char *) ptr->name, "target"))
953 struct _xmlAttr *attr;
954 for (attr = ptr->properties; attr; attr = attr->next)
955 if (!strcmp((const char *) attr->name, "name"))
958 && attr->children->type==XML_TEXT_NODE
959 && attr->children->content)
960 *name = (const char *) attr->children->content;
962 m_cp->return_target_info(
964 limit_bw, limit_pdu, limit_req,
966 target_idletime, client_idletime,
967 keepalive_limit_bw, keepalive_limit_pdu,
969 negotiation_charset, negotiation_lang, target_charset,
970 default_client_query_charset);
979 int Yaz_ProxyConfigP::mycmp(const char *hay, const char *item, size_t len)
981 if (len == strlen(item) && memcmp(hay, item, len) == 0)
986 int Yaz_ProxyConfig::get_file_access_info(const char *path)
990 if (!m_cp->m_proxyPtr)
992 for (ptr = m_cp->m_proxyPtr->children; ptr; ptr = ptr->next)
994 if (ptr->type == XML_ELEMENT_NODE
995 && !strcmp((const char *) ptr->name, "docpath"))
997 const char *docpath = m_cp->get_text(ptr);
998 size_t docpath_len = strlen(docpath);
999 if (docpath_len < strlen(path) && path[docpath_len] == '/'
1000 && !memcmp(docpath, path, docpath_len))
1008 void Yaz_ProxyConfig::get_generic_info(int *log_mask,
1017 if (!m_cp->m_proxyPtr)
1019 for (ptr = m_cp->m_proxyPtr->children; ptr; ptr = ptr->next)
1021 if (ptr->type == XML_ELEMENT_NODE
1022 && !strcmp((const char *) ptr->name, "log"))
1024 const char *v = m_cp->get_text(ptr);
1029 while (*cp && *cp != ',' && !isspace(*cp))
1031 size_t len = cp - v;
1032 if (m_cp->mycmp(v, "client-apdu", len))
1033 *log_mask |= PROXY_LOG_APDU_CLIENT;
1034 if (m_cp->mycmp(v, "server-apdu", len))
1035 *log_mask |= PROXY_LOG_APDU_SERVER;
1036 if (m_cp->mycmp(v, "client-requests", len))
1037 *log_mask |= PROXY_LOG_REQ_CLIENT;
1038 if (m_cp->mycmp(v, "server-requests", len))
1039 *log_mask |= PROXY_LOG_REQ_SERVER;
1041 *log_mask |= atoi(v);
1044 while (*cp && isspace(*cp))
1049 else if (ptr->type == XML_ELEMENT_NODE &&
1050 !strcmp((const char *) ptr->name, "max-clients"))
1052 const char *t = m_cp->get_text(ptr);
1055 *max_clients = atoi(t);
1056 if (*max_clients < 1)
1060 else if (ptr->type == XML_ELEMENT_NODE &&
1061 !strcmp((const char *) ptr->name, "max-connect"))
1063 const char *t = m_cp->get_text(ptr);
1065 *max_connect = atoi(t);
1067 else if (ptr->type == XML_ELEMENT_NODE &&
1068 !strcmp((const char *) ptr->name, "limit-connect"))
1070 const char *t = m_cp->get_text(ptr);
1072 *limit_connect = atoi(t);
1074 else if (ptr->type == XML_ELEMENT_NODE &&
1075 !strcmp((const char *) ptr->name, "target"))
1077 else if (ptr->type == XML_ELEMENT_NODE &&
1078 !strcmp((const char *) ptr->name, "docpath"))
1080 else if (ptr->type == XML_ELEMENT_NODE)
1082 yaz_log(YLOG_WARN, "0 Unknown element %s in yazproxy config",
1090 int Yaz_ProxyConfigP::get_explain_ptr(const char *host, const char *db,
1091 xmlNodePtr *ptr_target,
1092 xmlNodePtr *ptr_explain)
1099 for (ptr = m_proxyPtr->children; ptr; ptr = ptr->next)
1101 if (ptr->type == XML_ELEMENT_NODE &&
1102 !strcmp((const char *) ptr->name, "target"))
1105 xmlNodePtr ptr = (*ptr_target)->children;
1106 for (; ptr; ptr = ptr->next)
1108 if (ptr->type == XML_ELEMENT_NODE &&
1109 !strcmp((const char *) ptr->name, "explain"))
1112 xmlNodePtr ptr = (*ptr_explain)->children;
1114 for (; ptr; ptr = ptr->next)
1115 if (ptr->type == XML_ELEMENT_NODE &&
1116 !strcmp((const char *) ptr->name, "serverInfo"))
1120 for (ptr = ptr->children; ptr; ptr = ptr->next)
1121 if (ptr->type == XML_ELEMENT_NODE &&
1122 !strcmp((const char *) ptr->name, "database"))
1127 for (ptr = ptr->children; ptr; ptr = ptr->next)
1128 if (ptr->type == XML_TEXT_NODE &&
1130 !strcmp((const char *) ptr->content, db))
1143 const char *Yaz_ProxyConfig::get_explain_name(const char *db,
1144 const char **backend_db)
1147 xmlNodePtr ptr_target, ptr_explain;
1148 if (m_cp->get_explain_ptr(0, db, &ptr_target, &ptr_explain)
1151 struct _xmlAttr *attr;
1152 const char *name = 0;
1154 for (attr = ptr_target->properties; attr; attr = attr->next)
1155 if (!strcmp((const char *) attr->name, "name")
1157 && attr->children->type==XML_TEXT_NODE
1158 && attr->children->content
1159 && attr->children->content[0])
1161 name = (const char *)attr->children->content;
1166 for (attr = ptr_target->properties; attr; attr = attr->next)
1167 if (!strcmp((const char *) attr->name, "database"))
1170 && attr->children->type==XML_TEXT_NODE
1171 && attr->children->content)
1172 *backend_db = (const char *) attr->children->content;
1181 char *Yaz_ProxyConfig::get_explain_doc(ODR odr, const char *name,
1182 const char *db, int *len)
1185 xmlNodePtr ptr_target, ptr_explain;
1186 if (m_cp->get_explain_ptr(0 /* host */, db, &ptr_target, &ptr_explain))
1188 xmlNodePtr ptr2 = xmlCopyNode(ptr_explain, 1);
1190 xmlDocPtr doc = xmlNewDoc((const xmlChar *) "1.0");
1192 xmlDocSetRootElement(doc, ptr2);
1195 xmlDocDumpMemory(doc, &buf_out, len);
1196 char *content = (char*) odr_malloc(odr, *len);
1197 memcpy(content, buf_out, *len);
1207 void Yaz_ProxyConfig::get_target_info(const char *name,
1213 int *target_idletime,
1214 int *client_idletime,
1216 int *keepalive_limit_bw,
1217 int *keepalive_limit_pdu,
1219 const char **cql2rpn,
1220 const char **negotiation_charset,
1221 const char **negotiation_lang,
1222 const char **target_charset,
1223 const char **default_client_query_charset)
1227 if (!m_cp->m_proxyPtr)
1234 for (ptr = m_cp->m_proxyPtr->children; ptr; ptr = ptr->next)
1236 if (ptr->type == XML_ELEMENT_NODE &&
1237 !strcmp((const char *) ptr->name, "max-clients"))
1239 const char *t = m_cp->get_text(ptr);
1242 *max_clients = atoi(t);
1243 if (*max_clients < 1)
1248 ptr = m_cp->find_target_node(name, 0);
1256 m_cp->return_target_info(ptr, url, limit_bw, limit_pdu, limit_req,
1258 target_idletime, client_idletime,
1259 keepalive_limit_bw, keepalive_limit_pdu,
1261 negotiation_charset, negotiation_lang,
1263 default_client_query_charset);
1275 * indent-tabs-mode: nil
1277 * vim: shiftwidth=4 tabstop=8 expandtab