1 /* $Id: filter_virt_db.cpp,v 1.3 2005-10-25 11:48:30 adam Exp $
2 Copyright (c) 2005, Index Data.
11 #include "package.hpp"
13 #include <boost/thread/mutex.hpp>
15 #include "filter_virt_db.hpp"
19 #include <yaz/otherinfo.h>
20 #include <yaz/diagbib1.h>
26 namespace yf = yp2::filter;
31 Virt_db_set(yp2::Session &id, std::string setname,
36 yp2::Session m_session;
37 std::string m_setname;
40 struct Virt_db_session {
41 Virt_db_session(yp2::Session &id, bool use_vhost);
43 yp2::Session m_session;
45 std::map<std::string,Virt_db_set> m_sets;
48 Virt_db_map(std::string vhost);
55 void release_session(Package &package);
56 void init(Package &package, Z_APDU *apdu, bool &move_later);
57 void search(Package &package, Z_APDU *apdu, bool &move_later);
58 void present(Package &package, Z_APDU *apdu, bool &move_later);
60 boost::mutex m_sessions_mutex;
61 std::map<yp2::Session,Virt_db_session>m_sessions;
62 std::map<std::string, Virt_db_map>m_maps;
64 typedef std::map<yp2::Session,Virt_db_session>::iterator Ses_it;
65 typedef std::map<std::string,Virt_db_set>::iterator Sets_it;
70 yf::Virt_db_set::Virt_db_set(yp2::Session &id, std::string setname,
72 : m_session(id), m_setname(setname), m_vhost(vhost)
77 yf::Virt_db_set::Virt_db_set()
82 yf::Virt_db_set::~Virt_db_set()
86 yf::Virt_db_map::Virt_db_map(std::string vhost)
91 yf::Virt_db_map::Virt_db_map()
95 yf::Virt_db_session::Virt_db_session()
101 yf::Virt_db_session::Virt_db_session(yp2::Session &id,
103 m_session(id) , m_use_vhost(use_vhost)
108 yf::Virt_db::Virt_db() {
109 m_p = new Virt_db::Rep;
112 yf::Virt_db::~Virt_db() {
116 void yf::Virt_db::Rep::release_session(Package &package)
118 boost::mutex::scoped_lock lock(m_sessions_mutex);
120 Ses_it it = m_sessions.find(package.session());
122 if (it != m_sessions.end())
123 m_sessions.erase(it);
126 void yf::Virt_db::Rep::present(Package &package, Z_APDU *apdu, bool &move_later){
128 Z_PresentRequest *req = apdu->u.presentRequest;
130 boost::mutex::scoped_lock lock(m_sessions_mutex);
132 Ses_it it = m_sessions.find(package.session());
133 if (it == m_sessions.end())
135 ODR odr = odr_createmem(ODR_ENCODE);
137 Z_APDU *apdu = zget_APDU(odr, Z_APDU_close);
139 *apdu->u.close->closeReason = Z_Close_protocolError;
141 package.response() = apdu;
142 package.session().close();
146 if (it->second.m_use_vhost)
151 Sets_it sets_it = it->second.m_sets.find(req->resultSetId);
152 if (sets_it == it->second.m_sets.end())
154 ODR odr = odr_createmem(ODR_ENCODE);
155 Z_APDU *apdu = zget_APDU(odr, Z_APDU_presentResponse);
157 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
158 apdu->u.presentResponse->records = rec;
159 rec->which = Z_Records_NSD;
160 rec->u.nonSurrogateDiagnostic =
161 zget_DefaultDiagFormat(
163 YAZ_BIB1_SPECIFIED_RESULT_SET_DOES_NOT_EXIST,
165 package.response() = apdu;
169 id = new yp2::Session(it->second.m_session);
171 ODR odr = odr_createmem(ODR_ENCODE);
173 // sending present to backend
174 Package present_package(*id, package.origin());
175 present_package.copy_filter(package);
177 req->resultSetId = odr_strdup(odr, "default");
178 present_package.request() = yazpp_1::GDU(apdu);
182 present_package.move();
184 package.response() = present_package.response();
185 // must check for a closed present session..
189 void yf::Virt_db::Rep::search(Package &package, Z_APDU *apdu, bool &move_later)
191 Z_SearchRequest *req = apdu->u.searchRequest;
193 std::string database;
196 boost::mutex::scoped_lock lock(m_sessions_mutex);
198 Ses_it it = m_sessions.find(package.session());
199 if (it == m_sessions.end())
201 ODR odr = odr_createmem(ODR_ENCODE);
203 Z_APDU *apdu = zget_APDU(odr, Z_APDU_close);
205 *apdu->u.close->closeReason = Z_Close_protocolError;
207 package.response() = apdu;
208 package.session().close();
212 if (it->second.m_use_vhost)
217 if (req->num_databaseNames != 1)
218 { // exactly one database must be specified
219 ODR odr = odr_createmem(ODR_ENCODE);
220 Z_APDU *apdu = zget_APDU(odr, Z_APDU_searchResponse);
222 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
223 apdu->u.searchResponse->records = rec;
224 rec->which = Z_Records_NSD;
225 rec->u.nonSurrogateDiagnostic =
226 zget_DefaultDiagFormat(
227 odr, YAZ_BIB1_TOO_MANY_DATABASES_SPECIFIED, 0);
228 package.response() = apdu;
233 database = req->databaseNames[0];
234 std::map<std::string, Virt_db_map>::iterator map_it;
235 map_it = m_maps.find(database);
236 if (map_it == m_maps.end())
237 { // no map for database: return diagnostic
238 ODR odr = odr_createmem(ODR_ENCODE);
239 Z_APDU *apdu = zget_APDU(odr, Z_APDU_searchResponse);
241 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
242 apdu->u.searchResponse->records = rec;
243 rec->which = Z_Records_NSD;
244 rec->u.nonSurrogateDiagnostic =
245 zget_DefaultDiagFormat(
246 odr, YAZ_BIB1_DATABASE_UNAVAILABLE, database.c_str());
247 package.response() = apdu;
252 if (*req->replaceIndicator == 0)
254 Sets_it sets_it = it->second.m_sets.find(req->resultSetName);
255 if (sets_it != it->second.m_sets.end())
257 ODR odr = odr_createmem(ODR_ENCODE);
258 Z_APDU *apdu = zget_APDU(odr, Z_APDU_searchResponse);
260 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
261 apdu->u.searchResponse->records = rec;
262 rec->which = Z_Records_NSD;
263 rec->u.nonSurrogateDiagnostic =
264 zget_DefaultDiagFormat(
266 YAZ_BIB1_RESULT_SET_EXISTS_AND_REPLACE_INDICATOR_OFF,
268 package.response() = apdu;
274 vhost = map_it->second.m_vhost;
277 it->second.m_sets[req->resultSetName] =
278 Virt_db_set(*id, req->resultSetName, vhost);
280 const char *vhost_cstr = vhost.c_str();
282 { // sending init to backend
283 Package init_package(*id, package.origin());
284 init_package.copy_filter(package);
286 ODR odr = odr_createmem(ODR_ENCODE);
287 Z_APDU *init_apdu = zget_APDU(odr, Z_APDU_initRequest);
289 yaz_oi_set_string_oidval(&init_apdu->u.initRequest->otherInfo, odr,
290 VAL_PROXY, 1, vhost_cstr);
292 init_package.request() = init_apdu;
295 init_package.move(); // sending init
297 if (init_package.session().is_closed())
299 ODR odr = odr_createmem(ODR_ENCODE);
300 Z_APDU *apdu = zget_APDU(odr, Z_APDU_searchResponse);
302 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
303 apdu->u.searchResponse->records = rec;
304 rec->which = Z_Records_NSD;
305 rec->u.nonSurrogateDiagnostic =
306 zget_DefaultDiagFormat(
307 odr, YAZ_BIB1_DATABASE_UNAVAILABLE, database.c_str());
308 package.response() = apdu;
314 // sending search to backend
315 Package search_package(*id, package.origin());
317 search_package.copy_filter(package);
318 const char *sep = strchr(vhost_cstr, '/');
319 ODR odr = odr_createmem(ODR_ENCODE);
321 req->databaseNames[0] = odr_strdup(odr, sep+1);
323 *req->replaceIndicator = 1;
324 req->resultSetName = odr_strdup(odr, "default");
325 search_package.request() = yazpp_1::GDU(apdu);
329 search_package.move();
331 package.response() = search_package.response();
332 // must check for a closed search session..
336 void yf::Virt_db::Rep::init(Package &package, Z_APDU *apdu, bool &move_later)
338 release_session(package);
339 boost::mutex::scoped_lock lock(m_sessions_mutex);
341 Z_InitRequest *req = apdu->u.initRequest;
344 yaz_oi_get_string_oidval(&req->otherInfo, VAL_PROXY, 1, 0);
347 ODR odr = odr_createmem(ODR_ENCODE);
349 Z_APDU *apdu = zget_APDU(odr, Z_APDU_initResponse);
350 Z_InitResponse *resp = apdu->u.initResponse;
353 static const int masks[] = {
354 Z_Options_search, Z_Options_present, Z_Options_namedResultSets, 0
356 for (i = 0; masks[i]; i++)
357 if (ODR_MASK_GET(req->options, masks[i]))
358 ODR_MASK_SET(resp->options, masks[i]);
360 package.response() = apdu;
364 m_sessions[package.session()] = Virt_db_session(package.session(), false);
368 m_sessions[package.session()] = Virt_db_session(package.session(), true);
373 void yf::Virt_db::add_map_db2vhost(std::string db, std::string vhost)
375 m_p->m_maps[db] = Virt_db_map(vhost);
378 void yf::Virt_db::process(Package &package) const
380 Z_GDU *gdu = package.request().get();
382 if (!gdu || gdu->which != Z_GDU_Z3950)
386 bool move_later = false;
387 Z_APDU *apdu = gdu->u.z3950;
388 if (apdu->which == Z_APDU_initRequest)
390 m_p->init(package, apdu, move_later);
392 else if (apdu->which == Z_APDU_searchRequest)
394 m_p->search(package, apdu, move_later);
396 else if (apdu->which == Z_APDU_presentRequest)
398 m_p->present(package, apdu, move_later);
402 ODR odr = odr_createmem(ODR_ENCODE);
404 Z_APDU *apdu = zget_APDU(odr, Z_APDU_close);
406 *apdu->u.close->closeReason = Z_Close_protocolError;
408 package.response() = apdu;
409 package.session().close();
415 if (package.session().is_closed())
416 m_p->release_session(package);
423 * indent-tabs-mode: nil
424 * c-file-style: "stroustrup"
426 * vim: shiftwidth=4 tabstop=8 expandtab