X-Git-Url: http://git.indexdata.com/?p=yazproxy-moved-to-github.git;a=blobdiff_plain;f=src%2Fyaz-proxy-config.cpp;h=e0dbf5a24ba5e2d01a0432af6321c3baa693fdcd;hp=9e0fbf875a96d388554713d8106825237fd6571f;hb=d2c4cf45aa3c566c99be2dc305e86371e59b509d;hpb=2f1a9a4b28ae43c9da9e0740f84048065b2d3bf6

diff --git a/src/yaz-proxy-config.cpp b/src/yaz-proxy-config.cpp
index 9e0fbf8..e0dbf5a 100644
--- a/src/yaz-proxy-config.cpp
+++ b/src/yaz-proxy-config.cpp
@@ -1,43 +1,81 @@
-/* $Id: yaz-proxy-config.cpp,v 1.1 2004-04-11 11:36:47 adam Exp $
+/* $Id: yaz-proxy-config.cpp,v 1.13 2005-01-18 10:49:22 adam Exp $
    Copyright (c) 1998-2004, Index Data.
 
 This file is part of the yaz-proxy.
 
-Zebra is free software; you can redistribute it and/or modify it under
+YAZ proxy is free software; you can redistribute it and/or modify it under
 the terms of the GNU General Public License as published by the Free
 Software Foundation; either version 2, or (at your option) any later
 version.
 
-Zebra is distributed in the hope that it will be useful, but WITHOUT ANY
+YAZ proxy is distributed in the hope that it will be useful, but WITHOUT ANY
 WARRANTY; without even the implied warranty of MERCHANTABILITY or
 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
 for more details.
 
 You should have received a copy of the GNU General Public License
-along with Zebra; see the file LICENSE.proxy.  If not, write to the
+along with YAZ proxy; see the file LICENSE.  If not, write to the
 Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 02111-1307, USA.
  */
 
 #include <ctype.h>
 #include <yaz/log.h>
-#include <yaz++/proxy/proxy.h>
+#include "proxyp.h"
+
+class Yaz_ProxyConfigP {
+    friend class Yaz_ProxyConfig;
+
+    int m_copy;
+
+    int mycmp(const char *hay, const char *item, size_t len);
+    int match_list(int v, const char *m);
+    int atoi_l(const char **cp);
+#if HAVE_XSLT
+    int check_schema(xmlNodePtr ptr, Z_RecordComposition *comp,
+		     const char *schema_identifier);
+    xmlDocPtr m_docPtr;
+    xmlNodePtr m_proxyPtr;
+    void return_target_info(xmlNodePtr ptr, const char **url,
+			    int *limit_bw, int *limit_pdu, int *limit_req,
+			    int *target_idletime, int *client_idletime,
+			    int *keepalive_limit_bw, int *keepalive_limit_pdu,
+			    int *pre_init, const char **cql2rpn,
+			    const char **authentication);
+    void return_limit(xmlNodePtr ptr,
+		      int *limit_bw, int *limit_pdu, int *limit_req);
+    int check_type_1(ODR odr, xmlNodePtr ptr, Z_RPNQuery *query,
+		     char **addinfo);
+    xmlNodePtr find_target_node(const char *name, const char *db);
+    xmlNodePtr find_target_db(xmlNodePtr ptr, const char *db);
+    const char *get_text(xmlNodePtr ptr);
+    int check_type_1_attributes(ODR odr, xmlNodePtr ptr,
+				Z_AttributeList *attrs,
+				char **addinfo);
+    int check_type_1_structure(ODR odr, xmlNodePtr ptr, Z_RPNStructure *q,
+			       char **addinfo);
+    int get_explain_ptr(const char *host, const char *db,
+			xmlNodePtr *ptr_target,	xmlNodePtr *ptr_explain);
+#endif
+};
 
 Yaz_ProxyConfig::Yaz_ProxyConfig()
 {
-    m_copy = 0;
+    m_cp = new Yaz_ProxyConfigP;
+    m_cp->m_copy = 0;
 #if HAVE_XSLT
-    m_docPtr = 0;
-    m_proxyPtr = 0;
+    m_cp->m_docPtr = 0;
+    m_cp->m_proxyPtr = 0;
 #endif
 }
 
 Yaz_ProxyConfig::~Yaz_ProxyConfig()
 {
 #if HAVE_XSLT
-    if (!m_copy && m_docPtr)
-	xmlFreeDoc(m_docPtr);
+    if (!m_cp->m_copy && m_cp->m_docPtr)
+	xmlFreeDoc(m_cp->m_docPtr);
 #endif
+    delete m_cp;
 }
 
 int Yaz_ProxyConfig::read_xml(const char *fname)
@@ -47,23 +85,27 @@ int Yaz_ProxyConfig::read_xml(const char *fname)
 
     if (!ndoc)
     {
-	yaz_log(LOG_WARN, "Config file %s not found or parse error", fname);
+	yaz_log(YLOG_WARN, "Config file %s not found or parse error", fname);
 	return -1;  // no good
     }
+    int noSubstitutions = xmlXIncludeProcess(ndoc);
+    if (noSubstitutions == -1)
+	yaz_log(YLOG_WARN, "XInclude processing failed on config %s", fname);
+
     xmlNodePtr proxyPtr = xmlDocGetRootElement(ndoc);
     if (!proxyPtr || proxyPtr->type != XML_ELEMENT_NODE ||
 	strcmp((const char *) proxyPtr->name, "proxy"))
     {
-	yaz_log(LOG_WARN, "No proxy element in %s", fname);
+	yaz_log(YLOG_WARN, "No proxy element in %s", fname);
 	xmlFreeDoc(ndoc);
 	return -1;
     }
-    m_proxyPtr = proxyPtr;
+    m_cp->m_proxyPtr = proxyPtr;
 
     // OK: release previous and make it the current one.
-    if (m_docPtr)
-	xmlFreeDoc(m_docPtr);
-    m_docPtr = ndoc;
+    if (m_cp->m_docPtr)
+	xmlFreeDoc(m_cp->m_docPtr);
+    m_cp->m_docPtr = ndoc;
     return 0;
 #else
     return -2;
@@ -71,7 +113,7 @@ int Yaz_ProxyConfig::read_xml(const char *fname)
 }
 
 #if HAVE_XSLT
-const char *Yaz_ProxyConfig::get_text(xmlNodePtr ptr)
+const char *Yaz_ProxyConfigP::get_text(xmlNodePtr ptr)
 {
     for(ptr = ptr->children; ptr; ptr = ptr->next)
 	if (ptr->type == XML_TEXT_NODE)
@@ -89,7 +131,7 @@ const char *Yaz_ProxyConfig::get_text(xmlNodePtr ptr)
 #endif
 
 #if HAVE_XSLT
-void Yaz_ProxyConfig::return_limit(xmlNodePtr ptr,
+void Yaz_ProxyConfigP::return_limit(xmlNodePtr ptr,
 				   int *limit_bw,
 				   int *limit_pdu,
 				   int *limit_req)
@@ -122,17 +164,18 @@ void Yaz_ProxyConfig::return_limit(xmlNodePtr ptr,
 #endif
 
 #if HAVE_XSLT
-void Yaz_ProxyConfig::return_target_info(xmlNodePtr ptr,
-					 const char **url,
-					 int *limit_bw,
-					 int *limit_pdu,
-					 int *limit_req,
-					 int *target_idletime,
-					 int *client_idletime,
-					 int *keepalive_limit_bw,
-					 int *keepalive_limit_pdu,
-					 int *pre_init,
-					 const char **cql2rpn)
+void Yaz_ProxyConfigP::return_target_info(xmlNodePtr ptr,
+					  const char **url,
+					  int *limit_bw,
+					  int *limit_pdu,
+					  int *limit_req,
+					  int *target_idletime,
+					  int *client_idletime,
+					  int *keepalive_limit_bw,
+					  int *keepalive_limit_pdu,
+					  int *pre_init,
+					  const char **cql2rpn,
+					  const char **authentication)
 {
     *pre_init = 0;
     int no_url = 0;
@@ -196,11 +239,18 @@ void Yaz_ProxyConfig::return_target_info(xmlNodePtr ptr,
 	    if (t)
 		*cql2rpn = t;
 	}
+	if (ptr->type == XML_ELEMENT_NODE 
+	    && !strcmp((const char *) ptr->name, "authentication"))
+	{
+	    const char *t = get_text(ptr);
+	    if (t)
+		*authentication = t;
+	}
     }
 }
 #endif
 
-int Yaz_ProxyConfig::atoi_l(const char **cp)
+int Yaz_ProxyConfigP::atoi_l(const char **cp)
 {
     int v = 0;
     while (**cp && isdigit(**cp))
@@ -211,33 +261,33 @@ int Yaz_ProxyConfig::atoi_l(const char **cp)
     return v;
 }
 
-int Yaz_ProxyConfig::match_list(int v, const char *m)
+int Yaz_ProxyConfigP::match_list(int v, const char *m)
 {
-  while(m && *m)
-  {
-      while(*m && isspace(*m))
-	  m++;
-      if (*m == '*')
-	  return 1;
-      int l = atoi_l(&m);
-      int h = l;
-      if (*m == '-')
-      {
-	  ++m;
-	  h = atoi_l(&m);
-      }
-      if (v >= l && v <= h)
+    while(m && *m)
+    {
+	while(*m && isspace(*m))
+	    m++;
+	if (*m == '*')
+	    return 1;
+	int l = atoi_l(&m);
+	int h = l;
+	if (*m == '-')
+	{
+	    ++m;
+	    h = atoi_l(&m);
+	}
+	if (v >= l && v <= h)
 	  return 1;
-      if (*m == ',')
-	  m++;
-  }
-  return 0;
+	if (*m == ',')
+	    m++;
+    }
+    return 0;
 }
 
 #if HAVE_XSLT
-int Yaz_ProxyConfig::check_type_1_attributes(ODR odr, xmlNodePtr ptrl,
-					     Z_AttributeList *attrs,
-					     char **addinfo)
+int Yaz_ProxyConfigP::check_type_1_attributes(ODR odr, xmlNodePtr ptrl,
+					      Z_AttributeList *attrs,
+					      char **addinfo)
 {
     int i;
     for (i = 0; i<attrs->num_attributes; i++)
@@ -308,7 +358,7 @@ int Yaz_ProxyConfig::check_type_1_attributes(ODR odr, xmlNodePtr ptrl,
 #endif
 
 #if HAVE_XSLT
-int Yaz_ProxyConfig::check_type_1_structure(ODR odr, xmlNodePtr ptr,
+int Yaz_ProxyConfigP::check_type_1_structure(ODR odr, xmlNodePtr ptr,
 					    Z_RPNStructure *q,
 					    char **addinfo)
 {
@@ -334,8 +384,8 @@ int Yaz_ProxyConfig::check_type_1_structure(ODR odr, xmlNodePtr ptr,
 #endif
 
 #if HAVE_XSLT
-int Yaz_ProxyConfig::check_type_1(ODR odr, xmlNodePtr ptr, Z_RPNQuery *query,
-				  char **addinfo)
+int Yaz_ProxyConfigP::check_type_1(ODR odr, xmlNodePtr ptr, Z_RPNQuery *query,
+				   char **addinfo)
 {
     // possibly check for Bib-1
     return check_type_1_structure(odr, ptr, query->RPNStructure, addinfo);
@@ -348,19 +398,19 @@ int Yaz_ProxyConfig::check_query(ODR odr, const char *name, Z_Query *query,
 #if HAVE_XSLT
     xmlNodePtr ptr;
     
-    ptr = find_target_node(name, 0);
+    ptr = m_cp->find_target_node(name, 0);
     if (ptr)
     {
 	if (query->which == Z_Query_type_1 || query->which == Z_Query_type_101)
-	    return check_type_1(odr, ptr, query->u.type_1, addinfo);
+	    return m_cp->check_type_1(odr, ptr, query->u.type_1, addinfo);
     }
 #endif
     return 0;
 }
 
 #if HAVE_XSLT
-int Yaz_ProxyConfig::check_schema(xmlNodePtr ptr, Z_RecordComposition *comp,
-				  const char *schema_identifier)
+int Yaz_ProxyConfigP::check_schema(xmlNodePtr ptr, Z_RecordComposition *comp,
+				   const char *schema_identifier)
 {
     char *esn = 0;
     int default_match = 1;
@@ -401,10 +451,47 @@ int Yaz_ProxyConfig::check_schema(xmlNodePtr ptr, Z_RecordComposition *comp,
 }
 #endif
 
+const char *Yaz_ProxyConfig::check_mime_type(const char *path)
+{
+    struct {
+	const char *mask;
+	const char *type;
+    } types[] = {
+	{".xml", "text/xml"},
+	{".xsl", "text/xml"},
+	{".tkl", "text/xml"},
+	{".xsd", "text/xml"},
+	{".html", "text/html"},
+	{".jpg", "image/jpeg"},
+	{".png", "image/png"},
+	{".gif", "image/gif"},
+	{0, "text/plain"},
+	{0, 0},
+    };
+    int i;
+    size_t plen = strlen (path);
+    for (i = 0; types[i].type; i++)
+	if (types[i].mask == 0)
+	    return types[i].type;
+	else
+	{
+	    size_t mlen = strlen(types[i].mask);
+	    if (plen > mlen && !memcmp(path+plen-mlen, types[i].mask, mlen))
+		return types[i].type;
+	}
+    return "application/octet-stream";
+}
+
+
 int Yaz_ProxyConfig::check_syntax(ODR odr, const char *name,
 				  Odr_oid *syntax, Z_RecordComposition *comp,
 				  char **addinfo,
-				  char **stylesheet, char **schema)
+				  char **stylesheet, char **schema,
+				  char **backend_type,
+				  char **backend_charset,
+				  char **usemarcon_ini_stage1,
+				  char **usemarcon_ini_stage2
+				  )
 {
     if (stylesheet)
     {
@@ -416,11 +503,31 @@ int Yaz_ProxyConfig::check_syntax(ODR odr, const char *name,
 	xfree (*schema);
 	*schema = 0;
     }
+    if (backend_type)
+    {
+	xfree (*backend_type);
+	*backend_type = 0;
+    }
+    if (backend_charset)
+    {
+	xfree (*backend_charset);
+	*backend_charset = 0;
+    }
+    if (usemarcon_ini_stage1)
+    {
+	xfree (*usemarcon_ini_stage1);
+	*usemarcon_ini_stage1 = 0;
+    }
+    if (usemarcon_ini_stage2)
+    {
+	xfree (*usemarcon_ini_stage2);
+	*usemarcon_ini_stage2 = 0;
+    }
 #if HAVE_XSLT
     int syntax_has_matched = 0;
     xmlNodePtr ptr;
     
-    ptr = find_target_node(name, 0);
+    ptr = m_cp->find_target_node(name, 0);
     if (!ptr)
 	return 0;
     for(ptr = ptr->children; ptr; ptr = ptr->next)
@@ -434,6 +541,10 @@ int Yaz_ProxyConfig::check_syntax(ODR odr, const char *name,
 	    const char *match_marcxml = 0;
 	    const char *match_stylesheet = 0;
 	    const char *match_identifier = 0;
+	    const char *match_backend_type = 0;
+	    const char *match_backend_charset = 0;
+	    const char *match_usemarcon_ini_stage1 = 0;
+	    const char *match_usemarcon_ini_stage2 = 0;
 	    struct _xmlAttr *attr;
 	    for (attr = ptr->properties; attr; attr = attr->next)
 	    {
@@ -452,6 +563,22 @@ int Yaz_ProxyConfig::check_syntax(ODR odr, const char *name,
 		if (!strcmp((const char *) attr->name, "identifier") &&
 		    attr->children && attr->children->type == XML_TEXT_NODE)
 		    match_identifier = (const char *) attr->children->content;
+		if (!strcmp((const char *) attr->name, "backendtype") &&
+		    attr->children && attr->children->type == XML_TEXT_NODE)
+		    match_backend_type = (const char *)
+			attr->children->content;
+		if (!strcmp((const char *) attr->name, "backendcharset") &&
+		    attr->children && attr->children->type == XML_TEXT_NODE)
+		    match_backend_charset = (const char *)
+			attr->children->content;
+		if (!strcmp((const char *) attr->name, "usemarconstage1") &&
+		    attr->children && attr->children->type == XML_TEXT_NODE)
+		    match_usemarcon_ini_stage1 = (const char *)
+			attr->children->content;
+		if (!strcmp((const char *) attr->name, "usemarconstage2") &&
+		    attr->children && attr->children->type == XML_TEXT_NODE)
+		    match_usemarcon_ini_stage2 = (const char *)
+			attr->children->content;
 	    }
 	    if (match_type)
 	    {
@@ -474,7 +601,8 @@ int Yaz_ProxyConfig::check_syntax(ODR odr, const char *name,
 	    {
 		if (!match_error)
 		    syntax_has_matched = 1;
-		match = check_schema(ptr->children, comp, match_identifier);
+		match = m_cp->check_schema(ptr->children, comp,
+					   match_identifier);
 	    }
 	    if (match)
 	    {
@@ -488,6 +616,26 @@ int Yaz_ProxyConfig::check_syntax(ODR odr, const char *name,
 		    xfree(*schema);
 		    *schema = xstrdup(match_identifier);
 		}
+		if (backend_type && match_backend_type)
+		{
+		    xfree(*backend_type);
+		    *backend_type = xstrdup(match_backend_type);
+		}
+		if (backend_charset && match_backend_charset)
+		{
+		    xfree(*backend_charset);
+		    *backend_charset = xstrdup(match_backend_charset);
+		}
+		if (usemarcon_ini_stage1 && match_usemarcon_ini_stage1)
+		{
+		    xfree(*usemarcon_ini_stage1);
+		    *usemarcon_ini_stage1 = xstrdup(match_usemarcon_ini_stage1);
+		}
+		if (usemarcon_ini_stage1 && match_usemarcon_ini_stage2)
+		{
+		    xfree(*usemarcon_ini_stage2);
+		    *usemarcon_ini_stage2 = xstrdup(match_usemarcon_ini_stage2);
+		}
 		if (match_marcxml)
 		{
 		    return -1;
@@ -513,7 +661,7 @@ int Yaz_ProxyConfig::check_syntax(ODR odr, const char *name,
 }
 
 #if HAVE_XSLT
-xmlNodePtr Yaz_ProxyConfig::find_target_db(xmlNodePtr ptr, const char *db)
+xmlNodePtr Yaz_ProxyConfigP::find_target_db(xmlNodePtr ptr, const char *db)
 {
     xmlNodePtr dptr;
     if (!db)
@@ -540,7 +688,7 @@ xmlNodePtr Yaz_ProxyConfig::find_target_db(xmlNodePtr ptr, const char *db)
     return ptr;
 }
     
-xmlNodePtr Yaz_ProxyConfig::find_target_node(const char *name, const char *db)
+xmlNodePtr Yaz_ProxyConfigP::find_target_node(const char *name, const char *db)
 {
     xmlNodePtr ptr;
     if (!m_proxyPtr)
@@ -603,14 +751,15 @@ int Yaz_ProxyConfig::get_target_no(int no,
 				   int *keepalive_limit_bw,
 				   int *keepalive_limit_pdu,
 				   int *pre_init,
-				   const char **cql2rpn)
+				   const char **cql2rpn,
+				   const char **authentication)
 {
 #if HAVE_XSLT
     xmlNodePtr ptr;
-    if (!m_proxyPtr)
+    if (!m_cp->m_proxyPtr)
 	return 0;
     int i = 0;
-    for (ptr = m_proxyPtr->children; ptr; ptr = ptr->next)
+    for (ptr = m_cp->m_proxyPtr->children; ptr; ptr = ptr->next)
 	if (ptr->type == XML_ELEMENT_NODE &&
 	    !strcmp((const char *) ptr->name, "target"))
 	{
@@ -625,10 +774,12 @@ int Yaz_ProxyConfig::get_target_no(int no,
 			    && attr->children->content)
 			    *name = (const char *) attr->children->content;
 		    }
-		return_target_info(ptr, url, limit_bw, limit_pdu, limit_req,
-				   target_idletime, client_idletime,
-				   keepalive_limit_bw, keepalive_limit_pdu,
-				   pre_init, cql2rpn);
+		m_cp->return_target_info(
+		    ptr, url,
+		    limit_bw, limit_pdu, limit_req,
+		    target_idletime, client_idletime,
+		    keepalive_limit_bw, keepalive_limit_pdu,
+		    pre_init, cql2rpn, authentication);
 		return 1;
 	    }
 	    i++;
@@ -637,7 +788,7 @@ int Yaz_ProxyConfig::get_target_no(int no,
     return 0;
 }
 
-int Yaz_ProxyConfig::mycmp(const char *hay, const char *item, size_t len)
+int Yaz_ProxyConfigP::mycmp(const char *hay, const char *item, size_t len)
 {
     if (len == strlen(item) && memcmp(hay, item, len) == 0)
 	return 1;
@@ -649,14 +800,14 @@ void Yaz_ProxyConfig::get_generic_info(int *log_mask,
 {
 #if HAVE_XSLT
     xmlNodePtr ptr;
-    if (!m_proxyPtr)
+    if (!m_cp->m_proxyPtr)
 	return;
-    for (ptr = m_proxyPtr->children; ptr; ptr = ptr->next)
+    for (ptr = m_cp->m_proxyPtr->children; ptr; ptr = ptr->next)
     {
 	if (ptr->type == XML_ELEMENT_NODE 
 	    && !strcmp((const char *) ptr->name, "log"))
 	{
-	    const char *v = get_text(ptr);
+	    const char *v = m_cp->get_text(ptr);
 	    *log_mask = 0;
 	    while (v && *v)
 	    {
@@ -664,13 +815,13 @@ void Yaz_ProxyConfig::get_generic_info(int *log_mask,
 		while (*cp && *cp != ',' && !isspace(*cp))
 		    cp++;
 		size_t len = cp - v;
-		if (mycmp(v, "client-apdu", len))
+		if (m_cp->mycmp(v, "client-apdu", len))
 		    *log_mask |= PROXY_LOG_APDU_CLIENT;
-		if (mycmp(v, "server-apdu", len))
+		if (m_cp->mycmp(v, "server-apdu", len))
 		    *log_mask |= PROXY_LOG_APDU_SERVER;
-		if (mycmp(v, "client-requests", len))
+		if (m_cp->mycmp(v, "client-requests", len))
 		    *log_mask |= PROXY_LOG_REQ_CLIENT;
-		if (mycmp(v, "server-requests", len))
+		if (m_cp->mycmp(v, "server-requests", len))
 		    *log_mask |= PROXY_LOG_REQ_SERVER;
 		if (isdigit(*v))
 		    *log_mask |= atoi(v);
@@ -684,7 +835,7 @@ void Yaz_ProxyConfig::get_generic_info(int *log_mask,
 	if (ptr->type == XML_ELEMENT_NODE &&
 	    !strcmp((const char *) ptr->name, "max-clients"))
 	{
-	    const char *t = get_text(ptr);
+	    const char *t = m_cp->get_text(ptr);
 	    if (t)
 	    {
 		*max_clients = atoi(t);
@@ -696,57 +847,119 @@ void Yaz_ProxyConfig::get_generic_info(int *log_mask,
 #endif
 }
 
-char *Yaz_ProxyConfig::get_explain(ODR odr, const char *name, const char *db,
-				   int *len)
-{
 #if HAVE_XSLT
-    xmlNodePtr ptr = find_target_node(name, db);
-    if (ptr)
+int Yaz_ProxyConfigP::get_explain_ptr(const char *host, const char *db,
+				      xmlNodePtr *ptr_target,
+				      xmlNodePtr *ptr_explain)
+{
+    xmlNodePtr ptr;
+    if (!m_proxyPtr)
+	return 0;
+    if (!db)
+	return 0;
+    for (ptr = m_proxyPtr->children; ptr; ptr = ptr->next)
     {
-	ptr = ptr->children;
-	for (; ptr; ptr = ptr->next)
-	    if (ptr->type == XML_ELEMENT_NODE &&
-		!strcmp((const char *) ptr->name, "explain"))
+	if (ptr->type == XML_ELEMENT_NODE &&
+	    !strcmp((const char *) ptr->name, "target"))
+	{
+	    *ptr_target = ptr;
+	    xmlNodePtr ptr = (*ptr_target)->children;
+	    for (; ptr; ptr = ptr->next)
 	    {
-		xmlNodePtr ptr1 = ptr->children;
-		if (db)
+		if (ptr->type == XML_ELEMENT_NODE &&
+		    !strcmp((const char *) ptr->name, "explain"))
 		{
-		    for (; ptr1; ptr1 = ptr1->next)
-			if (ptr1->type == XML_ELEMENT_NODE &&
-			    !strcmp((const char *) ptr1->name, "serverInfo"))
+		    *ptr_explain = ptr;
+		    xmlNodePtr ptr = (*ptr_explain)->children;
+
+		    for (; ptr; ptr = ptr->next)
+			if (ptr->type == XML_ELEMENT_NODE &&
+			    !strcmp((const char *) ptr->name, "serverInfo"))
 			    break;
-		    if (!ptr1)
+		    if (!ptr)
 			continue;
-		    for (ptr1 = ptr1->children; ptr1; ptr1 = ptr1->next)
-			if (ptr1->type == XML_ELEMENT_NODE &&
-			    !strcmp((const char *) ptr1->name, "database"))
+		    for (ptr = ptr->children; ptr; ptr = ptr->next)
+			if (ptr->type == XML_ELEMENT_NODE &&
+			    !strcmp((const char *) ptr->name, "database"))
 			    break;
 		    
-		    if (!ptr1)
+		    if (!ptr)
 			continue;
-		    for (ptr1 = ptr1->children; ptr1; ptr1 = ptr1->next)
-			if (ptr1->type == XML_TEXT_NODE &&
-			    ptr1->content &&
-			    !strcmp((const char *) ptr1->content, db))
+		    for (ptr = ptr->children; ptr; ptr = ptr->next)
+			if (ptr->type == XML_TEXT_NODE &&
+			    ptr->content &&
+			    !strcmp((const char *) ptr->content, db))
 			    break;
-		    if (!ptr1)
+		    if (!ptr)
 			continue;
+		    return 1;
 		}
-		xmlNodePtr ptr2 = xmlCopyNode(ptr, 1);
-
-		xmlDocPtr doc = xmlNewDoc((const xmlChar *) "1.0");
-		
-		xmlDocSetRootElement(doc, ptr2);
-		
-		xmlChar *buf_out;
-		xmlDocDumpMemory(doc, &buf_out, len);
-		char *content = (char*) odr_malloc(odr, *len);
-		memcpy(content, buf_out, *len);
-		
-		xmlFree(buf_out);
-		xmlFreeDoc(doc);
-		return content;
 	    }
+	}
+    }
+    return 0;
+}
+#endif
+
+const char *Yaz_ProxyConfig::get_explain_name(const char *db,
+					      const char **backend_db)
+{
+#if HAVE_XSLT
+    xmlNodePtr ptr_target, ptr_explain;
+    if (m_cp->get_explain_ptr(0, db, &ptr_target, &ptr_explain)
+	&& ptr_target)
+    {
+	struct _xmlAttr *attr;
+	const char *name = 0;
+	
+	for (attr = ptr_target->properties; attr; attr = attr->next)
+	    if (!strcmp((const char *) attr->name, "name")
+		&& attr->children
+		&& attr->children->type==XML_TEXT_NODE
+		&& attr->children->content 
+		&& attr->children->content[0])
+	    {
+		name = (const char *)attr->children->content;
+		break;
+	    }
+	if (name)
+	{
+	    for (attr = ptr_target->properties; attr; attr = attr->next)
+		if (!strcmp((const char *) attr->name, "database"))
+		{
+		    if (attr->children
+			&& attr->children->type==XML_TEXT_NODE
+			&& attr->children->content)
+			*backend_db = (const char *) attr->children->content;
+		}
+	    return name;
+	}
+    }
+#endif
+    return 0;
+}
+
+char *Yaz_ProxyConfig::get_explain_doc(ODR odr, const char *name,
+				       const char *db, int *len)
+{
+#if HAVE_XSLT
+    xmlNodePtr ptr_target, ptr_explain;
+    if (m_cp->get_explain_ptr(0 /* host */, db, &ptr_target, &ptr_explain))
+    {
+	xmlNodePtr ptr2 = xmlCopyNode(ptr_explain, 1);
+	
+	xmlDocPtr doc = xmlNewDoc((const xmlChar *) "1.0");
+	
+	xmlDocSetRootElement(doc, ptr2);
+	
+	xmlChar *buf_out;
+	xmlDocDumpMemory(doc, &buf_out, len);
+	char *content = (char*) odr_malloc(odr, *len);
+	memcpy(content, buf_out, *len);
+	
+	xmlFree(buf_out);
+	xmlFreeDoc(doc);
+	return content;
     }
 #endif
     return 0;
@@ -763,23 +976,24 @@ void Yaz_ProxyConfig::get_target_info(const char *name,
 				      int *keepalive_limit_bw,
 				      int *keepalive_limit_pdu,
 				      int *pre_init,
-				      const char **cql2rpn)
+				      const char **cql2rpn,
+				      const char **authentication)
 {
 #if HAVE_XSLT
     xmlNodePtr ptr;
-    if (!m_proxyPtr)
+    if (!m_cp->m_proxyPtr)
     {
 	url[0] = name;
 	url[1] = 0;
 	return;
     }
     url[0] = 0;
-    for (ptr = m_proxyPtr->children; ptr; ptr = ptr->next)
+    for (ptr = m_cp->m_proxyPtr->children; ptr; ptr = ptr->next)
     {
 	if (ptr->type == XML_ELEMENT_NODE &&
 	    !strcmp((const char *) ptr->name, "max-clients"))
 	{
-	    const char *t = get_text(ptr);
+	    const char *t = m_cp->get_text(ptr);
 	    if (t)
 	    {
 		*max_clients = atoi(t);
@@ -788,7 +1002,7 @@ void Yaz_ProxyConfig::get_target_info(const char *name,
 	    }
 	}
     }
-    ptr = find_target_node(name, 0);
+    ptr = m_cp->find_target_node(name, 0);
     if (ptr)
     {
 	if (name)
@@ -796,10 +1010,10 @@ void Yaz_ProxyConfig::get_target_info(const char *name,
 	    url[0] = name;
 	    url[1] = 0;
 	}
-	return_target_info(ptr, url, limit_bw, limit_pdu, limit_req,
-			   target_idletime, client_idletime,
-			   keepalive_limit_bw, keepalive_limit_pdu,
-			   pre_init, cql2rpn);
+	m_cp->return_target_info(ptr, url, limit_bw, limit_pdu, limit_req,
+				 target_idletime, client_idletime,
+				 keepalive_limit_bw, keepalive_limit_pdu,
+				 pre_init, cql2rpn, authentication);
     }
 #else
     *url = name;