+/* This file is part of Metaproxy.
+ Copyright (C) 2005-2008 Index Data
+Metaproxy 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.
+
+Metaproxy 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 this program; if not, write to the Free Software
+Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+*/
#include "config.hpp"
+#include "util.hpp"
+#include "pipe.hpp"
#include "filter.hpp"
-#include "router.hpp"
#include "package.hpp"
#include "thread_pool_observer.hpp"
#include "filter_frontend_net.hpp"
-#include <yaz++/z-assoc.h>
-#include <yaz++/pdu-assoc.h>
-#include <yaz++/socket-manager.h>
+#include <yazpp/z-assoc.h>
+#include <yazpp/pdu-assoc.h>
+#include <yazpp/socket-manager.h>
#include <yaz/log.h>
#include <iostream>
-using namespace yp2;
-
-class ZAssocServerChild : public yazpp_1::Z_Assoc {
-public:
- ~ZAssocServerChild();
- ZAssocServerChild(yazpp_1::IPDU_Observable *the_PDU_Observable,
- ThreadPoolSocketObserver *m_thread_pool_observer,
- const Package *package);
- int m_no_requests;
-private:
- yazpp_1::IPDU_Observer* sessionNotify(
- yazpp_1::IPDU_Observable *the_PDU_Observable,
- int fd);
- void recv_GDU(Z_GDU *apdu, int len);
-
- void failNotify();
- void timeoutNotify();
+namespace mp = metaproxy_1;
+
+namespace metaproxy_1 {
+ class My_Timer_Thread;
+ class ZAssocServer;
+ namespace filter {
+ class FrontendNet::Rep {
+ friend class FrontendNet;
+ int m_no_threads;
+ std::vector<std::string> m_ports;
+ int m_listen_duration;
+ int m_session_timeout;
+ yazpp_1::SocketManager mySocketManager;
+
+ ZAssocServer **az;
+ };
+ }
+ class My_Timer_Thread : public yazpp_1::ISocketObserver {
+ private:
+ yazpp_1::ISocketObservable *m_obs;
+ Pipe m_pipe;
+ bool m_timeout;
+ public:
+ My_Timer_Thread(yazpp_1::ISocketObservable *obs, int duration);
+ void socketNotify(int event);
+ bool timeout();
+ };
+ class ZAssocChild : public yazpp_1::Z_Assoc {
+ public:
+ ~ZAssocChild();
+ ZAssocChild(yazpp_1::IPDU_Observable *the_PDU_Observable,
+ mp::ThreadPoolSocketObserver *m_thread_pool_observer,
+ const mp::Package *package);
+ int m_no_requests;
+ private:
+ yazpp_1::IPDU_Observer* sessionNotify(
+ yazpp_1::IPDU_Observable *the_PDU_Observable,
+ int fd);
+ void recv_GDU(Z_GDU *apdu, int len);
+
+ void failNotify();
+ void timeoutNotify();
+ void connectNotify();
+ private:
+ mp::ThreadPoolSocketObserver *m_thread_pool_observer;
+ mp::Session m_session;
+ mp::Origin m_origin;
+ bool m_delete_flag;
+ const mp::Package *m_package;
+ };
+ class ThreadPoolPackage : public mp::IThreadPoolMsg {
+ public:
+ ThreadPoolPackage(mp::Package *package, mp::ZAssocChild *ses) :
+ m_assoc_child(ses), m_package(package) { };
+ ~ThreadPoolPackage();
+ IThreadPoolMsg *handle();
+ void result();
+
+ private:
+ mp::ZAssocChild *m_assoc_child;
+ mp::Package *m_package;
+
+ };
+ class ZAssocServer : public yazpp_1::Z_Assoc {
+ public:
+ ~ZAssocServer();
+ ZAssocServer(yazpp_1::IPDU_Observable *PDU_Observable, int timeout);
+ void set_package(const mp::Package *package);
+ void set_thread_pool(ThreadPoolSocketObserver *m_thread_pool_observer);
+ private:
+ yazpp_1::IPDU_Observer* sessionNotify(
+ yazpp_1::IPDU_Observable *the_PDU_Observable,
+ int fd);
+ void recv_GDU(Z_GDU *apdu, int len);
+
+ void failNotify();
+ void timeoutNotify();
void connectNotify();
-private:
- ThreadPoolSocketObserver *m_thread_pool_observer;
- Session m_session;
- Origin m_origin;
- bool m_delete_flag;
- const Package *m_package;
-};
-
-
-class ThreadPoolPackage : public IThreadPoolMsg {
-public:
- ThreadPoolPackage(Package *package, ZAssocServerChild *ses) :
- m_session(ses), m_package(package) { };
- ~ThreadPoolPackage();
- IThreadPoolMsg *handle();
- void result();
-
-private:
- ZAssocServerChild *m_session;
- Package *m_package;
-
-};
+ private:
+ mp::ThreadPoolSocketObserver *m_thread_pool_observer;
+ const mp::Package *m_package;
+ int m_session_timeout;
+ };
+}
-ThreadPoolPackage::~ThreadPoolPackage()
+mp::ThreadPoolPackage::~ThreadPoolPackage()
{
delete m_package;
}
-void ThreadPoolPackage::result()
+void mp::ThreadPoolPackage::result()
{
- m_session->m_no_requests--;
+ m_assoc_child->m_no_requests--;
yazpp_1::GDU *gdu = &m_package->response();
+
if (gdu->get())
{
int len;
- m_session->send_GDU(gdu->get(), &len);
+ m_assoc_child->send_GDU(gdu->get(), &len);
+ }
+ else if (!m_package->session().is_closed())
+ {
+ // no response package and yet the session is still open..
+ // means that request is unhandled..
+ yazpp_1::GDU *gdu_req = &m_package->request();
+ Z_GDU *z_gdu = gdu_req->get();
+ if (z_gdu && z_gdu->which == Z_GDU_Z3950)
+ {
+ // For Z39.50, response with a Close and shutdown
+ mp::odr odr;
+ int len;
+ Z_APDU *apdu_response = odr.create_close(
+ z_gdu->u.z3950, Z_Close_systemProblem,
+ "unhandled Z39.50 request");
+
+ m_assoc_child->send_Z_PDU(apdu_response, &len);
+ }
+ else if (z_gdu && z_gdu->which == Z_GDU_HTTP_Request)
+ {
+ // For HTTP, respond with Server Error
+ int len;
+ mp::odr odr;
+ Z_GDU *zgdu_res
+ = odr.create_HTTP_Response(m_package->session(),
+ z_gdu->u.HTTP_Request, 500);
+ m_assoc_child->send_GDU(zgdu_res, &len);
+ }
+ m_package->session().close();
+ }
+
+ if (m_assoc_child->m_no_requests == 0 && m_package->session().is_closed())
+ {
+ m_assoc_child->close();
}
- if (m_session->m_no_requests == 0 && m_package->session().is_closed())
- delete m_session;
delete this;
}
-IThreadPoolMsg *ThreadPoolPackage::handle()
+mp::IThreadPoolMsg *mp::ThreadPoolPackage::handle()
{
m_package->move();
return this;
}
-ZAssocServerChild::ZAssocServerChild(yazpp_1::IPDU_Observable *the_PDU_Observable,
- ThreadPoolSocketObserver *my_thread_pool,
- const Package *package)
- : Z_Assoc(the_PDU_Observable)
+mp::ZAssocChild::ZAssocChild(yazpp_1::IPDU_Observable *PDU_Observable,
+ mp::ThreadPoolSocketObserver *my_thread_pool,
+ const mp::Package *package)
+ : Z_Assoc(PDU_Observable)
{
m_thread_pool_observer = my_thread_pool;
m_no_requests = 0;
m_delete_flag = false;
m_package = package;
+ const char *peername = PDU_Observable->getpeername();
+ if (!peername)
+ peername = "unknown";
+ m_origin.set_tcpip_address(std::string(peername), m_session.id());
}
-yazpp_1::IPDU_Observer *ZAssocServerChild::sessionNotify(yazpp_1::IPDU_Observable
+yazpp_1::IPDU_Observer *mp::ZAssocChild::sessionNotify(yazpp_1::IPDU_Observable
*the_PDU_Observable, int fd)
{
return 0;
}
-ZAssocServerChild::~ZAssocServerChild()
+mp::ZAssocChild::~ZAssocChild()
{
}
-void ZAssocServerChild::recv_GDU(Z_GDU *z_pdu, int len)
+void mp::ZAssocChild::recv_GDU(Z_GDU *z_pdu, int len)
{
m_no_requests++;
- Package *p = new Package(m_session, m_origin);
+ mp::Package *p = new mp::Package(m_session, m_origin);
- ThreadPoolPackage *tp = new ThreadPoolPackage(p, this);
+ mp::ThreadPoolPackage *tp = new mp::ThreadPoolPackage(p, this);
p->copy_filter(*m_package);
p->request() = yazpp_1::GDU(z_pdu);
m_thread_pool_observer->put(tp);
}
-void ZAssocServerChild::failNotify()
+void mp::ZAssocChild::failNotify()
{
// TODO: send Package to signal "close"
if (m_session.is_closed())
+ {
+ if (m_no_requests == 0)
+ delete this;
return;
+ }
m_no_requests++;
m_session.close();
- Package *p = new Package(m_session, m_origin);
+ mp::Package *p = new mp::Package(m_session, m_origin);
- ThreadPoolPackage *tp = new ThreadPoolPackage(p, this);
+ mp::ThreadPoolPackage *tp = new mp::ThreadPoolPackage(p, this);
p->copy_filter(*m_package);
m_thread_pool_observer->put(tp);
}
-void ZAssocServerChild::timeoutNotify()
+void mp::ZAssocChild::timeoutNotify()
{
failNotify();
}
-void ZAssocServerChild::connectNotify()
+void mp::ZAssocChild::connectNotify()
{
}
-class ZAssocServer : public yazpp_1::Z_Assoc {
-public:
- ~ZAssocServer();
- ZAssocServer(yazpp_1::IPDU_Observable *the_PDU_Observable,
- ThreadPoolSocketObserver *m_thread_pool_observer,
- const Package *package);
-private:
- yazpp_1::IPDU_Observer* sessionNotify(
- yazpp_1::IPDU_Observable *the_PDU_Observable,
- int fd);
- void recv_GDU(Z_GDU *apdu, int len);
-
- void failNotify();
- void timeoutNotify();
- void connectNotify();
-private:
- ThreadPoolSocketObserver *m_thread_pool_observer;
- const Package *m_package;
-};
+mp::ZAssocServer::ZAssocServer(yazpp_1::IPDU_Observable *PDU_Observable,
+ int timeout)
+ : Z_Assoc(PDU_Observable), m_session_timeout(timeout)
+{
+ m_package = 0;
+}
-ZAssocServer::ZAssocServer(yazpp_1::IPDU_Observable *the_PDU_Observable,
- ThreadPoolSocketObserver *thread_pool_observer,
- const Package *package)
- : Z_Assoc(the_PDU_Observable)
+void mp::ZAssocServer::set_package(const mp::Package *package)
{
- m_thread_pool_observer = thread_pool_observer;
m_package = package;
+}
+void mp::ZAssocServer::set_thread_pool(ThreadPoolSocketObserver *observer)
+{
+ m_thread_pool_observer = observer;
}
-yazpp_1::IPDU_Observer *ZAssocServer::sessionNotify(yazpp_1::IPDU_Observable
+yazpp_1::IPDU_Observer *mp::ZAssocServer::sessionNotify(yazpp_1::IPDU_Observable
*the_PDU_Observable, int fd)
{
- ZAssocServerChild *my = new ZAssocServerChild(the_PDU_Observable, m_thread_pool_observer,
- m_package);
+ mp::ZAssocChild *my =
+ new mp::ZAssocChild(the_PDU_Observable, m_thread_pool_observer,
+ m_package);
+ my->timeout(m_session_timeout);
return my;
}
-ZAssocServer::~ZAssocServer()
+mp::ZAssocServer::~ZAssocServer()
{
}
-void ZAssocServer::recv_GDU(Z_GDU *apdu, int len)
+void mp::ZAssocServer::recv_GDU(Z_GDU *apdu, int len)
{
}
-void ZAssocServer::failNotify()
+void mp::ZAssocServer::failNotify()
{
}
-void ZAssocServer::timeoutNotify()
+void mp::ZAssocServer::timeoutNotify()
{
}
-void ZAssocServer::connectNotify()
+void mp::ZAssocServer::connectNotify()
{
}
-FilterFrontendNet::FilterFrontendNet()
+mp::filter::FrontendNet::FrontendNet() : m_p(new Rep)
{
- m_no_threads = 5;
- m_listen_address = "@:9001";
- m_listen_duration = 0;
+ m_p->m_no_threads = 5;
+ m_p->m_listen_duration = 0;
+ m_p->m_session_timeout = 300; // 5 minutes
+ m_p->az = 0;
}
-class My_Timer_Thread : public yazpp_1::ISocketObserver {
-private:
- yazpp_1::ISocketObservable *m_obs;
- int m_fd[2];
- bool m_timeout;
-public:
- My_Timer_Thread(yazpp_1::ISocketObservable *obs, int duration);
- void socketNotify(int event);
- bool timeout();
-};
-
-bool My_Timer_Thread::timeout()
+mp::filter::FrontendNet::~FrontendNet()
+{
+ if (m_p->az)
+ {
+ size_t i;
+ for (i = 0; i<m_p->m_ports.size(); i++)
+ delete m_p->az[i];
+ delete [] m_p->az;
+ }
+}
+
+bool mp::My_Timer_Thread::timeout()
{
return m_timeout;
}
-My_Timer_Thread::My_Timer_Thread(yazpp_1::ISocketObservable *obs,
+mp::My_Timer_Thread::My_Timer_Thread(yazpp_1::ISocketObservable *obs,
int duration) :
- m_obs(obs), m_timeout(false)
+ m_obs(obs), m_pipe(9123), m_timeout(false)
{
- pipe(m_fd);
- obs->addObserver(m_fd[0], this);
+ obs->addObserver(m_pipe.read_fd(), this);
obs->maskObserver(this, yazpp_1::SOCKET_OBSERVE_READ);
obs->timeoutObserver(this, duration);
}
-void My_Timer_Thread::socketNotify(int event)
+void mp::My_Timer_Thread::socketNotify(int event)
{
m_timeout = true;
m_obs->deleteObserver(this);
- close(m_fd[0]);
- close(m_fd[1]);
}
-void FilterFrontendNet::process(Package &package) const {
- yazpp_1::SocketManager mySocketManager;
-
+void mp::filter::FrontendNet::process(Package &package) const
+{
+ if (m_p->az == 0)
+ return;
+ size_t i;
My_Timer_Thread *tt = 0;
- if (m_listen_duration)
- tt = new My_Timer_Thread(&mySocketManager, m_listen_duration);
- yazpp_1::PDU_Assoc *my_PDU_Assoc =
- new yazpp_1::PDU_Assoc(&mySocketManager);
+ if (m_p->m_listen_duration)
+ tt = new My_Timer_Thread(&m_p->mySocketManager,
+ m_p->m_listen_duration);
- ThreadPoolSocketObserver threadPool(&mySocketManager, m_no_threads);
-
- ZAssocServer z(my_PDU_Assoc, &threadPool, &package);
- z.server(m_listen_address.c_str());
+ ThreadPoolSocketObserver tp(&m_p->mySocketManager, m_p->m_no_threads);
- while (mySocketManager.processEvent() > 0)
+ for (i = 0; i<m_p->m_ports.size(); i++)
+ {
+ m_p->az[i]->set_package(&package);
+ m_p->az[i]->set_thread_pool(&tp);
+ }
+ while (m_p->mySocketManager.processEvent() > 0)
{
if (tt && tt->timeout())
break;
delete tt;
}
-std::string &FilterFrontendNet::listen_address()
+void mp::filter::FrontendNet::configure(const xmlNode * ptr, bool test_only)
{
- return m_listen_address;
+ if (!ptr || !ptr->children)
+ {
+ throw mp::filter::FilterException("No ports for Frontend");
+ }
+ std::vector<std::string> ports;
+ for (ptr = ptr->children; ptr; ptr = ptr->next)
+ {
+ if (ptr->type != XML_ELEMENT_NODE)
+ continue;
+ if (!strcmp((const char *) ptr->name, "port"))
+ {
+ std::string port = mp::xml::get_text(ptr);
+ ports.push_back(port);
+
+ }
+ else if (!strcmp((const char *) ptr->name, "threads"))
+ {
+ std::string threads_str = mp::xml::get_text(ptr);
+ int threads = atoi(threads_str.c_str());
+ if (threads < 1)
+ throw mp::filter::FilterException("Bad value for threads: "
+ + threads_str);
+ m_p->m_no_threads = threads;
+ }
+ else if (!strcmp((const char *) ptr->name, "timeout"))
+ {
+ std::string timeout_str = mp::xml::get_text(ptr);
+ int timeout = atoi(timeout_str.c_str());
+ if (timeout < 1)
+ throw mp::filter::FilterException("Bad value for timeout: "
+ + timeout_str);
+ m_p->m_session_timeout = timeout;
+ }
+ else
+ {
+ throw mp::filter::FilterException("Bad element "
+ + std::string((const char *)
+ ptr->name));
+ }
+ }
+ if (test_only)
+ return;
+ set_ports(ports);
}
-int &FilterFrontendNet::listen_duration()
+void mp::filter::FrontendNet::set_ports(std::vector<std::string> &ports)
{
- return m_listen_duration;
+ m_p->m_ports = ports;
+
+ m_p->az = new mp::ZAssocServer *[m_p->m_ports.size()];
+
+ // Create mp::ZAssocServer for each port
+ size_t i;
+ for (i = 0; i<m_p->m_ports.size(); i++)
+ {
+ // create a PDU assoc object (one per mp::ZAssocServer)
+ yazpp_1::PDU_Assoc *as = new yazpp_1::PDU_Assoc(&m_p->mySocketManager);
+
+ // create ZAssoc with PDU Assoc
+ m_p->az[i] = new mp::ZAssocServer(as,
+ m_p->m_session_timeout);
+ if (m_p->az[i]->server(m_p->m_ports[i].c_str()))
+ {
+ throw mp::filter::FilterException("Unable to bind to address "
+ + std::string(m_p->m_ports[i]));
+ }
+ }
+}
+
+void mp::filter::FrontendNet::set_listen_duration(int d)
+{
+ m_p->m_listen_duration = d;
+}
+
+static mp::filter::Base* filter_creator()
+{
+ return new mp::filter::FrontendNet;
+}
+
+extern "C" {
+ struct metaproxy_1_filter_struct metaproxy_1_filter_frontend_net = {
+ 0,
+ "frontend_net",
+ filter_creator
+ };
}
+/*
+ * Local variables:
+ * c-basic-offset: 4
+ * indent-tabs-mode: nil
+ * c-file-style: "stroustrup"
+ * End:
+ * vim: shiftwidth=4 tabstop=8 expandtab
+ */