1 /* $Id: filter_virt_db.cpp,v 1.13 2005-11-03 14:45:16 adam Exp $
2 Copyright (c) 2005, Index Data.
11 #include "package.hpp"
13 #include <boost/thread/mutex.hpp>
16 #include "filter_virt_db.hpp"
20 #include <yaz/otherinfo.h>
21 #include <yaz/diagbib1.h>
27 namespace yf = yp2::filter;
32 Virt_db_set(yp2::Session &id, std::string setname,
33 std::string vhost, bool named_result_sets);
37 yp2::Session m_backend_session;
38 std::string m_backend_setname;
40 bool m_named_result_sets;
42 struct Virt_db_session {
43 Virt_db_session(yp2::Session &id, bool use_vhost);
45 yp2::Session m_session;
47 std::map<std::string,Virt_db_set> m_sets;
50 Virt_db_map(std::string vhost);
57 void release_session(Package &package);
58 void init(Package &package, Z_APDU *apdu, bool &move_later);
59 void search(Package &package, Z_APDU *apdu, bool &move_later);
60 void present(Package &package, Z_APDU *apdu, bool &move_later);
62 boost::mutex m_sessions_mutex;
63 std::map<yp2::Session,Virt_db_session>m_sessions;
64 std::map<std::string, Virt_db_map>m_maps;
66 typedef std::map<yp2::Session,Virt_db_session>::iterator Ses_it;
67 typedef std::map<std::string,Virt_db_set>::iterator Sets_it;
74 yf::Virt_db_set::Virt_db_set(yp2::Session &id, std::string setname,
75 std::string vhost, bool named_result_sets)
76 : m_backend_session(id), m_backend_setname(setname), m_vhost(vhost),
77 m_named_result_sets(named_result_sets)
82 yf::Virt_db_set::Virt_db_set()
87 yf::Virt_db_set::~Virt_db_set()
91 yf::Virt_db_map::Virt_db_map(std::string vhost)
96 yf::Virt_db_map::Virt_db_map()
100 yf::Virt_db_session::Virt_db_session()
106 yf::Virt_db_session::Virt_db_session(yp2::Session &id,
108 m_session(id) , m_use_vhost(use_vhost)
113 yf::Virt_db::Virt_db() : m_p(new Virt_db::Rep)
117 yf::Virt_db::~Virt_db() {
120 void yf::Virt_db::Rep::release_session(Package &package)
122 boost::mutex::scoped_lock lock(m_sessions_mutex);
124 m_sessions.erase(package.session());
127 void yf::Virt_db::Rep::present(Package &package, Z_APDU *apdu, bool &move_later){
129 Z_PresentRequest *req = apdu->u.presentRequest;
130 std::string resultSetId = req->resultSetId;
133 boost::mutex::scoped_lock lock(m_sessions_mutex);
135 Ses_it it = m_sessions.find(package.session());
136 if (it == m_sessions.end())
138 package.response() = odr.create_close(
139 Z_Close_protocolError,
140 "no session for present request");
141 package.session().close();
144 if (it->second.m_use_vhost)
149 Sets_it sets_it = it->second.m_sets.find(resultSetId);
150 if (sets_it == it->second.m_sets.end())
152 Z_APDU *apdu = zget_APDU(odr, Z_APDU_presentResponse);
154 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
155 apdu->u.presentResponse->records = rec;
156 rec->which = Z_Records_NSD;
157 rec->u.nonSurrogateDiagnostic =
158 zget_DefaultDiagFormat(
160 YAZ_BIB1_SPECIFIED_RESULT_SET_DOES_NOT_EXIST,
161 resultSetId.c_str());
162 package.response() = apdu;
166 id = new yp2::Session(sets_it->second.m_backend_session);
169 // sending present to backend
170 Package present_package(*id, package.origin());
171 present_package.copy_filter(package);
173 req->resultSetId = odr_strdup(odr, "default");
174 present_package.request() = yazpp_1::GDU(apdu);
176 present_package.move();
178 if (present_package.session().is_closed())
180 Z_APDU *apdu = zget_APDU(odr, Z_APDU_presentResponse);
182 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
183 apdu->u.presentResponse->records = rec;
184 rec->which = Z_Records_NSD;
185 rec->u.nonSurrogateDiagnostic =
186 zget_DefaultDiagFormat(
188 YAZ_BIB1_RESULT_SET_NO_LONGER_EXISTS_UNILATERALLY_DELETED_BY_,
189 resultSetId.c_str());
190 package.response() = apdu;
192 boost::mutex::scoped_lock lock(m_sessions_mutex);
193 Ses_it it = m_sessions.find(package.session());
194 if (it != m_sessions.end())
195 it->second.m_sets.erase(resultSetId);
199 package.response() = present_package.response();
204 void yf::Virt_db::Rep::search(Package &package, Z_APDU *apdu, bool &move_later)
206 Z_SearchRequest *req = apdu->u.searchRequest;
208 std::string database;
209 std::string resultSetId = req->resultSetName;
210 bool support_named_result_sets = false; // whether backend supports it
213 boost::mutex::scoped_lock lock(m_sessions_mutex);
215 Ses_it it = m_sessions.find(package.session());
216 if (it == m_sessions.end())
218 package.response() = odr.create_close(
219 Z_Close_protocolError,
220 "no session for search request");
221 package.session().close();
225 if (it->second.m_use_vhost)
230 if (req->num_databaseNames != 1)
231 { // exactly one database must be specified
232 Z_APDU *apdu = zget_APDU(odr, Z_APDU_searchResponse);
234 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
235 apdu->u.searchResponse->records = rec;
236 rec->which = Z_Records_NSD;
237 rec->u.nonSurrogateDiagnostic =
238 zget_DefaultDiagFormat(
239 odr, YAZ_BIB1_TOO_MANY_DATABASES_SPECIFIED, 0);
240 package.response() = apdu;
244 database = req->databaseNames[0];
245 std::map<std::string, Virt_db_map>::iterator map_it;
246 map_it = m_maps.find(database);
247 if (map_it == m_maps.end())
248 { // no map for database: return diagnostic
249 Z_APDU *apdu = zget_APDU(odr, Z_APDU_searchResponse);
251 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
252 apdu->u.searchResponse->records = rec;
253 rec->which = Z_Records_NSD;
254 rec->u.nonSurrogateDiagnostic =
255 zget_DefaultDiagFormat(
256 odr, YAZ_BIB1_DATABASE_DOES_NOT_EXIST, database.c_str());
257 package.response() = apdu;
261 if (*req->replaceIndicator == 0)
263 Sets_it sets_it = it->second.m_sets.find(req->resultSetName);
264 if (sets_it != it->second.m_sets.end())
266 Z_APDU *apdu = zget_APDU(odr, Z_APDU_searchResponse);
268 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
269 apdu->u.searchResponse->records = rec;
270 rec->which = Z_Records_NSD;
271 rec->u.nonSurrogateDiagnostic =
272 zget_DefaultDiagFormat(
274 YAZ_BIB1_RESULT_SET_EXISTS_AND_REPLACE_INDICATOR_OFF,
276 package.response() = apdu;
281 it->second.m_sets.erase(req->resultSetName);
282 vhost = map_it->second.m_vhost;
284 // we might look for an existing session with same vhost
286 const char *vhost_cstr = vhost.c_str();
288 { // sending init to backend
289 Package init_package(id, package.origin());
290 init_package.copy_filter(package);
292 Z_APDU *init_apdu = zget_APDU(odr, Z_APDU_initRequest);
294 yaz_oi_set_string_oidval(&init_apdu->u.initRequest->otherInfo, odr,
295 VAL_PROXY, 1, vhost_cstr);
297 init_package.request() = init_apdu;
299 init_package.move(); // sending init
301 if (init_package.session().is_closed())
303 Z_APDU *apdu = zget_APDU(odr, Z_APDU_searchResponse);
305 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
306 apdu->u.searchResponse->records = rec;
307 rec->which = Z_Records_NSD;
308 rec->u.nonSurrogateDiagnostic =
309 zget_DefaultDiagFormat(
310 odr, YAZ_BIB1_DATABASE_UNAVAILABLE, database.c_str());
311 package.response() = apdu;
313 Z_GDU *gdu = init_package.response().get();
314 // we hope to get an init response
315 if (gdu && gdu->which == Z_GDU_Z3950 && gdu->u.z3950->which ==
318 if (ODR_MASK_GET(gdu->u.z3950->u.initResponse->options,
319 Z_Options_namedResultSets))
320 support_named_result_sets = true;
324 Z_APDU *apdu = zget_APDU(odr, Z_APDU_searchResponse);
326 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
327 apdu->u.searchResponse->records = rec;
328 rec->which = Z_Records_NSD;
329 rec->u.nonSurrogateDiagnostic =
330 zget_DefaultDiagFormat(
331 odr, YAZ_BIB1_DATABASE_UNAVAILABLE, database.c_str());
332 package.response() = apdu;
337 // sending search to backend
338 Package search_package(id, package.origin());
340 search_package.copy_filter(package);
341 const char *sep = strchr(vhost_cstr, '/');
343 req->databaseNames[0] = odr_strdup(odr, sep+1);
345 *req->replaceIndicator = 1;
347 std::string backend_resultSetId = "default";
348 req->resultSetName = odr_strdup(odr, backend_resultSetId.c_str());
349 search_package.request() = yazpp_1::GDU(apdu);
351 search_package.move();
353 if (search_package.session().is_closed())
355 Z_APDU *apdu = zget_APDU(odr, Z_APDU_searchResponse);
357 Z_Records *rec = (Z_Records *) odr_malloc(odr, sizeof(Z_Records));
358 apdu->u.searchResponse->records = rec;
359 rec->which = Z_Records_NSD;
360 rec->u.nonSurrogateDiagnostic =
361 zget_DefaultDiagFormat(
362 odr, YAZ_BIB1_DATABASE_UNAVAILABLE, database.c_str());
363 package.response() = apdu;
367 package.response() = search_package.response();
369 boost::mutex::scoped_lock lock(m_sessions_mutex);
370 Ses_it it = m_sessions.find(package.session());
371 if (it != m_sessions.end())
372 it->second.m_sets[resultSetId] =
373 Virt_db_set(id, backend_resultSetId, vhost,
374 support_named_result_sets);
377 void yf::Virt_db::Rep::init(Package &package, Z_APDU *apdu, bool &move_later)
379 release_session(package);
380 boost::mutex::scoped_lock lock(m_sessions_mutex);
382 Z_InitRequest *req = apdu->u.initRequest;
385 yaz_oi_get_string_oidval(&req->otherInfo, VAL_PROXY, 1, 0);
389 Z_APDU *apdu = zget_APDU(odr, Z_APDU_initResponse);
390 Z_InitResponse *resp = apdu->u.initResponse;
393 static const int masks[] = {
394 Z_Options_search, Z_Options_present, Z_Options_namedResultSets, -1
396 for (i = 0; masks[i] != -1; i++)
397 if (ODR_MASK_GET(req->options, masks[i]))
398 ODR_MASK_SET(resp->options, masks[i]);
400 static const int versions[] = {
406 for (i = 0; versions[i] != -1; i++)
407 if (ODR_MASK_GET(req->protocolVersion, versions[i]))
408 ODR_MASK_SET(resp->protocolVersion, versions[i]);
412 package.response() = apdu;
414 m_sessions[package.session()] = Virt_db_session(package.session(), false);
418 m_sessions[package.session()] = Virt_db_session(package.session(), true);
423 void yf::Virt_db::add_map_db2vhost(std::string db, std::string vhost)
425 m_p->m_maps[db] = Virt_db_map(vhost);
428 void yf::Virt_db::process(Package &package) const
430 Z_GDU *gdu = package.request().get();
432 if (!gdu || gdu->which != Z_GDU_Z3950)
436 bool move_later = false;
437 Z_APDU *apdu = gdu->u.z3950;
438 if (apdu->which == Z_APDU_initRequest)
440 m_p->init(package, apdu, move_later);
442 else if (apdu->which == Z_APDU_searchRequest)
444 m_p->search(package, apdu, move_later);
446 else if (apdu->which == Z_APDU_presentRequest)
448 m_p->present(package, apdu, move_later);
454 package.response() = odr.create_close(
455 Z_Close_protocolError,
456 "unsupported APDU in filter_virt_db");
458 package.session().close();
463 if (package.session().is_closed())
464 m_p->release_session(package);
471 * indent-tabs-mode: nil
472 * c-file-style: "stroustrup"
474 * vim: shiftwidth=4 tabstop=8 expandtab