+#include "filter_factory.hpp"
+#include "factory_static.hpp"
+
+#include <iostream>
+#include <map>
+#include <list>
+
+#include <boost/shared_ptr.hpp>
+
+#include <libxml/xmlversion.h>
+#include <libxml/parser.h>
+#include <libxml/tree.h>
+
+
+namespace yp2 {
+ class RouterFleXML::Rep {
+ friend class RouterFleXML;
+ Rep();
+
+ typedef std::map<std::string, boost::shared_ptr<const yp2::filter::Base> >
+ IdFilterMap ;
+ typedef std::list<std::string> FilterIdList;
+ typedef std::map<std::string, FilterIdList > IdRouteMap ;
+
+ bool m_xinclude;
+ IdFilterMap m_id_filter_map;
+ FilterIdList m_filter_id_list;
+ IdRouteMap m_id_route_map;
+
+ void create_filter(std::string type,
+ const xmlDoc * xmldoc,
+ std::string id = "");
+
+ void parse_xml_config_dom(xmlDocPtr doc);
+
+ bool is_element(const xmlNode *ptr,
+ const std::string &ns,
+ const std::string &name);
+
+ bool is_element_yp2(const xmlNode *ptr,
+ const std::string &name);
+
+ bool check_element_yp2(const xmlNode *ptr,
+ const std::string &name);
+
+ const xmlNode* jump_to(const xmlNode* node, int xml_node_type);
+
+ const xmlNode* jump_to_next(const xmlNode* node, int xml_node_type);
+
+ const xmlNode* jump_to_children(const xmlNode* node, int xml_node_type);
+ FilterFactory m_factory;
+ };
+}
+
+const xmlNode* yp2::RouterFleXML::Rep::jump_to_children(const xmlNode* node, int xml_node_type)
+{
+ node = node->children;
+ for (; node && node->type != xml_node_type; node = node->next)
+ ;
+ return node;
+}
+
+const xmlNode* yp2::RouterFleXML::Rep::jump_to_next(const xmlNode* node, int xml_node_type)
+{
+ node = node->next;
+ for (; node && node->type != xml_node_type; node = node->next)
+ ;
+ return node;
+}
+
+const xmlNode* yp2::RouterFleXML::Rep::jump_to(const xmlNode* node, int xml_node_type)
+{
+ for (; node && node->type != xml_node_type; node = node->next)
+ ;
+ return node;
+}
+
+bool yp2::RouterFleXML::Rep::is_element(const xmlNode *ptr,
+ const std::string &ns,
+ const std::string &name)
+{
+ if (ptr && ptr->type == XML_ELEMENT_NODE && ptr->ns && ptr->ns->href
+ && !xmlStrcmp(BAD_CAST ns.c_str(), ptr->ns->href)
+ && !xmlStrcmp(BAD_CAST name.c_str(), ptr->name))
+ return true;
+ return false;
+}
+
+bool yp2::RouterFleXML::Rep::is_element_yp2(const xmlNode *ptr,
+ const std::string &name)
+{
+ return is_element(ptr, "http://indexdata.dk/yp2/config/1", name);
+}
+
+bool yp2::RouterFleXML::Rep::check_element_yp2(const xmlNode *ptr,
+ const std::string &name)
+{
+ if (!is_element_yp2(ptr, name))
+ throw XMLError("Error. Expected element name " + name);
+ return true;
+}
+
+void yp2::RouterFleXML::Rep::parse_xml_config_dom(xmlDocPtr doc)
+{
+ if (!doc)
+ throw XMLError("Empty XML Document");
+
+ const xmlNode* root = xmlDocGetRootElement(doc);
+
+ check_element_yp2(root, "yp2");
+
+ std::cout << "processing /yp2" << std::endl;
+
+ // process <start> node which is expected first element node
+ const xmlNode* node = jump_to_children(root, XML_ELEMENT_NODE);
+ //for (; node && node->type != XML_ELEMENT_NODE; node = node->next)
+ // ;
+
+ check_element_yp2(node, "start");
+
+ std::cout << "processing /yp2/start" << std::endl;
+
+ // process <filters> node which is expected second element node
+ node = jump_to_next(node, XML_ELEMENT_NODE);
+ check_element_yp2(node, "filters");
+ std::cout << "processing /yp2/filters" << std::endl;
+
+ // process <filter> nodes in next level
+ const xmlNode* node2 = jump_to_children(node, XML_ELEMENT_NODE);
+
+ unsigned int filter_nr = 0;
+ while(node2 && check_element_yp2(node2, "filter"))
+ {
+ filter_nr++;
+ std::cout << "processing /yp2/filters/filter["
+ << filter_nr << "]" << std::endl;
+
+ const struct _xmlAttr *attr;
+ std::string id_value;
+ std::string type_value;
+ for (attr = node2->properties; attr; attr = attr->next)
+ {
+ std::string name = std::string((const char *) attr->name);
+ std::string value;
+
+ if (attr->children && attr->children->type == XML_TEXT_NODE)
+ value = std::string((const char *)attr->children->content);
+
+ if (name == "id")
+ id_value = value;
+ else if (name == "type")
+ type_value = value;
+ else
+ throw XMLError("Error. Only attribute id or type allowed in filter element. Got " + name);
+
+ std::cout << "attr " << name << "=" << value << "\n";
+
+ //const xmlNode *val;
+ }
+
+ yp2::filter::Base* filter_base = m_factory.create(type_value);
+
+ node2 = jump_to_next(node2, XML_ELEMENT_NODE);
+ }
+
+ // process <routes> node which is expected third element node
+ node = jump_to_next(node, XML_ELEMENT_NODE);
+ check_element_yp2(node, "routes");
+ std::cout << "processing /yp2/routes" << std::endl;
+
+ // process <route> nodes in next level
+ node2 = jump_to_children(node, XML_ELEMENT_NODE);
+ check_element_yp2(node2, "route");
+
+ unsigned int route_nr = 0;
+ while(is_element_yp2(node2, "router"))
+ {
+ route_nr++;
+ std::cout << "processing /yp2/routes/route["
+ << route_nr << "]" << std::endl;
+
+ // process <filter> nodes in third level
+ const xmlNode* node3 = jump_to_children(node2, XML_ELEMENT_NODE);
+
+ unsigned int filter3_nr = 0;
+ while(node3 && check_element_yp2(node3, "filter"))
+ {
+ filter3_nr++;
+
+ std::cout << "processing /yp2/routes/route["
+ << route_nr << "]/filter["
+ << filter3_nr << "]" << std::endl;
+
+ node3 = jump_to_next(node3, XML_ELEMENT_NODE);
+
+ }
+ node2 = jump_to_next(node2, XML_ELEMENT_NODE);
+ }
+}
+
+void yp2::RouterFleXML::Rep::create_filter(std::string type,
+ const xmlDoc * xmldoc,
+ std::string id)
+{
+ std::cout << "Created Filter type='" << type
+ << "' id='" << id << "'" << std::endl;
+}
+
+yp2::RouterFleXML::Rep::Rep() :
+ m_xinclude(false)
+{
+}
+
+yp2::RouterFleXML::RouterFleXML(std::string xmlconf)
+ : m_p(new Rep)
+{
+ {
+ yp2::FactoryStatic fs(m_p->m_factory);
+ }
+
+ LIBXML_TEST_VERSION;
+
+ xmlDocPtr doc = xmlParseMemory(xmlconf.c_str(),
+ xmlconf.size());
+ if (!doc)
+ throw XMLError("xmlParseMemory failed");
+ else
+ {
+ m_p->parse_xml_config_dom(doc);
+ xmlFreeDoc(doc);
+ }
+}