1 /* $Id: filter_sru_to_z3950.cpp,v 1.27 2007-01-17 14:59:18 marc Exp $
2 Copyright (c) 2005-2006, Index Data.
4 See the LICENSE file for details
11 #include "gduutil.hpp"
12 #include "sru_util.hpp"
13 #include "filter_sru_to_z3950.hpp"
16 #include <yaz/z-core.h>
18 #include <yaz/pquery.h>
20 #include <boost/thread/mutex.hpp>
28 namespace mp = metaproxy_1;
29 namespace mp_util = metaproxy_1::util;
30 namespace yf = mp::filter;
33 namespace metaproxy_1 {
35 class SRUtoZ3950::Impl {
37 void configure(const xmlNode *xmlnode);
38 void process(metaproxy_1::Package &package);
40 union SRW_query {char * cql; char * xcql; char * pqf;};
41 typedef const int& SRW_query_type;
42 std::map<std::string, const xmlNode *> m_database_explain;
45 bool z3950_build_query(mp::odr &odr_en, Z_Query *z_query,
46 const SRW_query &query,
47 SRW_query_type query_type) const;
49 bool z3950_init_request(mp::Package &package,
51 &database = "Default") const;
53 bool z3950_close_request(mp::Package &package) const;
55 bool z3950_search_request(mp::Package &package,
57 Z_SRW_PDU *sru_pdu_res,
58 Z_SRW_searchRetrieveRequest
61 bool z3950_present_request(mp::Package &package,
63 Z_SRW_PDU *sru_pdu_res,
64 Z_SRW_searchRetrieveRequest
67 bool z3950_scan_request(mp::Package &package,
69 Z_SRW_PDU *sru_pdu_res,
73 bool z3950_to_srw_diagnostics_ok(mp::odr &odr_en,
74 Z_SRW_searchRetrieveResponse *srw_res,
75 Z_Records *records) const;
77 int z3950_to_srw_diag(mp::odr &odr_en,
78 Z_SRW_searchRetrieveResponse *srw_res,
79 Z_DefaultDiagFormat *ddf) const;
84 yf::SRUtoZ3950::SRUtoZ3950() : m_p(new Impl)
88 yf::SRUtoZ3950::~SRUtoZ3950()
89 { // must have a destructor because of boost::scoped_ptr
92 void yf::SRUtoZ3950::configure(const xmlNode *xmlnode)
94 m_p->configure(xmlnode);
97 void yf::SRUtoZ3950::process(mp::Package &package) const
99 m_p->process(package);
102 void yf::SRUtoZ3950::Impl::configure(const xmlNode *confignode)
104 const xmlNode * dbnode;
106 for (dbnode = confignode->children; dbnode; dbnode = dbnode->next){
107 if (dbnode->type != XML_ELEMENT_NODE)
110 std::string database;
111 mp::xml::check_element_mp(dbnode, "database");
113 for (struct _xmlAttr *attr = dbnode->properties;
114 attr; attr = attr->next){
116 mp::xml::check_attribute(attr, "", "name");
117 database = mp::xml::get_text(attr);
119 const xmlNode *explainnode;
120 for (explainnode = dbnode->children;
121 explainnode; explainnode = explainnode->next){
122 if (explainnode->type != XML_ELEMENT_NODE)
127 // assigning explain node to database name - no check yet
128 m_database_explain.insert(std::make_pair(database, explainnode));
133 void yf::SRUtoZ3950::Impl::process(mp::Package &package)
135 Z_GDU *zgdu_req = package.request().get();
137 // ignoring all non HTTP_Request packages
138 if (!zgdu_req || !(zgdu_req->which == Z_GDU_HTTP_Request)){
143 // only working on HTTP_Request packages now
147 mp::odr odr_de(ODR_DECODE);
148 Z_SRW_PDU *sru_pdu_req = 0;
150 mp::odr odr_en(ODR_ENCODE);
151 Z_SRW_PDU *sru_pdu_res = yaz_srw_get(odr_en, Z_SRW_explain_response);
153 // determine database with the HTTP header information only
154 mp_util::SRUServerInfo sruinfo = mp_util::get_sru_server_info(package);
155 std::map<std::string, const xmlNode *>::iterator idbexp;
156 idbexp = m_database_explain.find(sruinfo.database);
158 // assign explain config XML DOM node if database is known
159 const xmlNode *explainnode = 0;
160 if (idbexp != m_database_explain.end()){
161 explainnode = idbexp->second;
163 // just moving package if database is not known
170 // decode SRU request
173 char *stylesheet = 0;
175 // filter acts as sink for non-valid SRU requests
176 if (! (sru_pdu_req = mp_util::decode_sru_request(package, odr_de, odr_en,
178 charset, stylesheet)))
180 mp_util::build_sru_explain(package, odr_en, sru_pdu_res,
181 sruinfo, explainnode);
182 mp_util::build_sru_response(package, odr_en, soap,
183 sru_pdu_res, charset, stylesheet);
184 package.session().close();
188 // filter acts as sink for SRU explain requests
189 if (sru_pdu_req && sru_pdu_req->which == Z_SRW_explain_request)
191 Z_SRW_explainRequest *er_req = sru_pdu_req->u.explain_request;
192 //mp_util::build_simple_explain(package, odr_en, sru_pdu_res,
194 mp_util::build_sru_explain(package, odr_en, sru_pdu_res,
195 sruinfo, explainnode, er_req);
196 mp_util::build_sru_response(package, odr_en, soap,
197 sru_pdu_res, charset, stylesheet);
203 && sru_pdu_req->which == Z_SRW_searchRetrieve_request
204 && sru_pdu_req->u.request)
206 Z_SRW_searchRetrieveRequest *sr_req = sru_pdu_req->u.request;
208 sru_pdu_res = yaz_srw_get(odr_en, Z_SRW_searchRetrieve_response);
210 // checking that we have a query
211 ok = mp_util::check_sru_query_exists(package, odr_en,
212 sru_pdu_res, sr_req);
214 if (ok && z3950_init_request(package))
217 ok = z3950_search_request(package, odr_en,
218 sru_pdu_res, sr_req);
221 && sru_pdu_res->u.response->numberOfRecords
222 && *(sru_pdu_res->u.response->numberOfRecords)
223 && sr_req->maximumRecords
224 && *(sr_req->maximumRecords))
226 ok = z3950_present_request(package, odr_en,
229 z3950_close_request(package);
236 && sru_pdu_req->which == Z_SRW_scan_request
237 && sru_pdu_req->u.scan_request)
239 Z_SRW_scanRequest *sr_req = sru_pdu_req->u.scan_request;
241 sru_pdu_res = yaz_srw_get(odr_en, Z_SRW_scan_response);
243 // we do not do scan at the moment, therefore issuing a diagnostic
244 yaz_add_srw_diagnostic(odr_en,
245 &(sru_pdu_res->u.scan_response->diagnostics),
246 &(sru_pdu_res->u.scan_response->num_diagnostics),
249 // to be used when we do scan
250 if (false && z3950_init_request(package))
252 z3950_scan_request(package, odr_en, sru_pdu_res, sr_req);
253 z3950_close_request(package);
258 //std::cout << "SRU OPERATION NOT SUPPORTED \n";
259 sru_pdu_res = yaz_srw_get(odr_en, Z_SRW_explain_response);
261 // TODO: make nice diagnostic return package
262 package.session().close();
266 // build and send SRU response
267 mp_util::build_sru_response(package, odr_en, soap,
268 sru_pdu_res, charset, stylesheet);
275 yf::SRUtoZ3950::Impl::z3950_init_request(mp::Package &package,
276 const std::string &database) const
278 // prepare Z3950 package
279 Package z3950_package(package.session(), package.origin());
280 z3950_package.copy_filter(package);
282 // set initRequest APDU
283 mp::odr odr_en(ODR_ENCODE);
284 Z_APDU *apdu = zget_APDU(odr_en, Z_APDU_initRequest);
285 Z_InitRequest *init_req = apdu->u.initRequest;
286 //TODO: add user name in apdu
287 //TODO: add user passwd in apdu
288 //init_req->idAuthentication = org_init->idAuthentication;
289 //init_req->implementationId = "IDxyz";
290 //init_req->implementationName = "NAMExyz";
291 //init_req->implementationVersion = "VERSIONxyz";
293 ODR_MASK_SET(init_req->options, Z_Options_search);
294 ODR_MASK_SET(init_req->options, Z_Options_present);
295 ODR_MASK_SET(init_req->options, Z_Options_namedResultSets);
296 ODR_MASK_SET(init_req->options, Z_Options_scan);
298 ODR_MASK_SET(init_req->protocolVersion, Z_ProtocolVersion_1);
299 ODR_MASK_SET(init_req->protocolVersion, Z_ProtocolVersion_2);
300 ODR_MASK_SET(init_req->protocolVersion, Z_ProtocolVersion_3);
302 z3950_package.request() = apdu;
304 // send Z3950 package
305 z3950_package.move();
307 // dead Z3950 backend detection
308 if (z3950_package.session().is_closed()){
309 package.session().close();
313 // check successful initResponse
314 Z_GDU *z3950_gdu = z3950_package.response().get();
316 if (z3950_gdu && z3950_gdu->which == Z_GDU_Z3950
317 && z3950_gdu->u.z3950->which == Z_APDU_initResponse)
324 yf::SRUtoZ3950::Impl::z3950_close_request(mp::Package &package) const
327 package.session().close();
329 // prepare and close Z3950 package
330 Package z3950_package(package.session(), package.origin());
331 z3950_package.copy_filter(package);
332 z3950_package.session().close();
335 //mp::odr odr_en(ODR_ENCODE);
336 //Z_APDU *apdu = zget_APDU(odr_en, Z_APDU_close);
337 //z3950_package.request() = apdu;
339 z3950_package.move();
341 // check successful close response
342 //Z_GDU *z3950_gdu = z3950_package.response().get();
343 //if (z3950_gdu && z3950_gdu->which == Z_GDU_Z3950
344 // && z3950_gdu->u.z3950->which == Z_APDU_close)
347 if (z3950_package.session().is_closed()){
354 yf::SRUtoZ3950::Impl::z3950_search_request(mp::Package &package,
356 Z_SRW_PDU *sru_pdu_res,
357 Z_SRW_searchRetrieveRequest
361 assert(sru_pdu_res->u.response);
363 Package z3950_package(package.session(), package.origin());
364 z3950_package.copy_filter(package);
366 //add stuff in z3950 apdu
367 Z_APDU *apdu = zget_APDU(odr_en, Z_APDU_searchRequest);
368 Z_SearchRequest *z_searchRequest = apdu->u.searchRequest;
371 z_searchRequest->num_databaseNames = 1;
372 z_searchRequest->databaseNames = (char**)
373 odr_malloc(odr_en, sizeof(char *));
375 if (sr_req->database)
376 z_searchRequest->databaseNames[0]
377 = odr_strdup(odr_en, const_cast<char *>(sr_req->database));
379 z_searchRequest->databaseNames[0]
380 = odr_strdup(odr_en, "Default");
384 Z_Query *z_query = (Z_Query *) odr_malloc(odr_en, sizeof(Z_Query));
385 z_searchRequest->query = z_query;
387 if (!z3950_build_query(odr_en, z_query,
388 (const SRW_query&)sr_req->query,
391 yaz_add_srw_diagnostic(odr_en,
392 &(sru_pdu_res->u.response->diagnostics),
393 &(sru_pdu_res->u.response->num_diagnostics),
398 z3950_package.request() = apdu;
400 // send Z39.50 package off to backend
401 z3950_package.move();
404 Z_GDU *z3950_gdu = z3950_package.response().get();
406 //TODO: check success condition
407 //int yaz_diag_bib1_to_srw (int bib1_code);
408 //int yaz_diag_srw_to_bib1(int srw_code);
409 //Se kode i src/seshigh.c (srw_bend_search, srw_bend_init).
411 if (!z3950_gdu || z3950_gdu->which != Z_GDU_Z3950
412 || z3950_gdu->u.z3950->which != Z_APDU_searchResponse
413 || !z3950_gdu->u.z3950->u.searchResponse
414 || !z3950_gdu->u.z3950->u.searchResponse->searchStatus)
416 yaz_add_srw_diagnostic(odr_en,
417 &(sru_pdu_res->u.response->diagnostics),
418 &(sru_pdu_res->u.response->num_diagnostics),
420 package.session().close();
424 // everything fine, continuing
425 Z_SearchResponse *sr = z3950_gdu->u.z3950->u.searchResponse;
427 // checking non surrogate diagnostics in Z3950 search response package
428 if (!z3950_to_srw_diagnostics_ok(odr_en, sru_pdu_res->u.response,
433 // Finally, roll on and srw'fy number of records
434 sru_pdu_res->u.response->numberOfRecords
435 = (int *) odr_malloc(odr_en, sizeof(int *));
436 *(sru_pdu_res->u.response->numberOfRecords) = *(sr->resultCount);
438 // srw'fy nextRecordPosition
439 //sru_pdu_res->u.response->nextRecordPosition
440 // = (int *) odr_malloc(odr_en, sizeof(int *));
441 //*(sru_pdu_res->u.response->nextRecordPosition) = 1;
447 yf::SRUtoZ3950::Impl::z3950_present_request(mp::Package &package,
449 Z_SRW_PDU *sru_pdu_res,
450 Z_SRW_searchRetrieveRequest
454 assert(sru_pdu_res->u.response);
460 // no need to work if nobody wants record ..
461 if (!(sr_req->maximumRecords) || 0 == *(sr_req->maximumRecords))
464 bool send_z3950_present = true;
466 // recordXPath unsupported.
467 if (sr_req->recordXPath)
469 send_z3950_present = false;
470 yaz_add_srw_diagnostic(odr_en,
471 &(sru_pdu_res->u.response->diagnostics),
472 &(sru_pdu_res->u.response->num_diagnostics),
476 // resultSetTTL unsupported.
477 // resultSetIdleTime in response
478 if (sr_req->resultSetTTL)
480 send_z3950_present = false;
481 yaz_add_srw_diagnostic(odr_en,
482 &(sru_pdu_res->u.response->diagnostics),
483 &(sru_pdu_res->u.response->num_diagnostics),
488 if (sr_req->sort_type != Z_SRW_sort_type_none)
490 send_z3950_present = false;
491 yaz_add_srw_diagnostic(odr_en,
492 &(sru_pdu_res->u.response->diagnostics),
493 &(sru_pdu_res->u.response->num_diagnostics),
497 // start record requested negative, or larger than number of records
498 if (sr_req->startRecord
500 ((*(sr_req->startRecord) < 0) // negative
502 (sru_pdu_res->u.response->numberOfRecords //out of range
503 && *(sr_req->startRecord)
504 > *(sru_pdu_res->u.response->numberOfRecords))
507 send_z3950_present = false;
508 yaz_add_srw_diagnostic(odr_en,
509 &(sru_pdu_res->u.response->diagnostics),
510 &(sru_pdu_res->u.response->num_diagnostics),
514 // maximumRecords requested negative
515 if (sr_req->maximumRecords
516 && *(sr_req->maximumRecords) < 0)
519 send_z3950_present = false;
520 yaz_add_srw_diagnostic(odr_en,
521 &(sru_pdu_res->u.response->diagnostics),
522 &(sru_pdu_res->u.response->num_diagnostics),
523 6, "maximumRecords");
526 // exit on all these above diagnostics
527 if (!send_z3950_present)
530 // now packaging the z3950 present request
531 Package z3950_package(package.session(), package.origin());
532 z3950_package.copy_filter(package);
533 Z_APDU *apdu = zget_APDU(odr_en, Z_APDU_presentRequest);
535 assert(apdu->u.presentRequest);
537 // z3950'fy start record position
538 if (sr_req->startRecord)
539 *(apdu->u.presentRequest->resultSetStartPoint)
540 = *(sr_req->startRecord);
542 *(apdu->u.presentRequest->resultSetStartPoint) = 1;
544 // z3950'fy number of records requested
545 // protect against requesting records out of range
546 if (sr_req->maximumRecords)
547 *(apdu->u.presentRequest->numberOfRecordsRequested)
548 = std::min(*(sr_req->maximumRecords),
549 *(sru_pdu_res->u.response->numberOfRecords)
550 - *(apdu->u.presentRequest->resultSetStartPoint)
553 // z3950'fy recordPacking
554 int record_packing = Z_SRW_recordPacking_XML;
555 if (sr_req->recordPacking && 's' == *(sr_req->recordPacking))
556 record_packing = Z_SRW_recordPacking_string;
558 // RecordSyntax will always be XML
559 (apdu->u.presentRequest->preferredRecordSyntax)
560 = yaz_oidval_to_z3950oid (odr_en, CLASS_RECSYN, VAL_TEXT_XML);
562 // z3950'fy record schema
563 if (sr_req->recordSchema)
565 apdu->u.presentRequest->recordComposition
566 = (Z_RecordComposition *)
567 odr_malloc(odr_en, sizeof(Z_RecordComposition));
568 apdu->u.presentRequest->recordComposition->which
569 = Z_RecordComp_simple;
570 apdu->u.presentRequest->recordComposition->u.simple
571 = mp_util::build_esn_from_schema(odr_en,
572 (const char *) sr_req->recordSchema);
575 // z3950'fy time to live - flagged as diagnostics above
576 //if (sr_req->resultSetTTL)
578 // attaching Z3950 package to filter chain
579 z3950_package.request() = apdu;
581 // sending Z30.50 present request
582 z3950_package.move();
584 //check successful Z3950 present response
585 Z_GDU *z3950_gdu = z3950_package.response().get();
586 if (!z3950_gdu || z3950_gdu->which != Z_GDU_Z3950
587 || z3950_gdu->u.z3950->which != Z_APDU_presentResponse
588 || !z3950_gdu->u.z3950->u.presentResponse)
591 yaz_add_srw_diagnostic(odr_en,
592 &(sru_pdu_res->u.response->diagnostics),
593 &(sru_pdu_res->u.response->num_diagnostics),
595 package.session().close();
600 // everything fine, continuing
602 Z_PresentResponse *pr = z3950_gdu->u.z3950->u.presentResponse;
603 Z_SRW_searchRetrieveResponse *sru_res = sru_pdu_res->u.response;
606 // checking non surrogate diagnostics in Z3950 present response package
607 if (!z3950_to_srw_diagnostics_ok(odr_en, sru_pdu_res->u.response,
613 // copy all records if existing
614 if (pr->records && pr->records->which == Z_Records_DBOSD)
616 // srw'fy number of returned records
618 = pr->records->u.databaseOrSurDiagnostics->num_records;
621 = (Z_SRW_record *) odr_malloc(odr_en,
623 * sizeof(Z_SRW_record));
626 // srw'fy nextRecordPosition
627 // next position never zero or behind the last z3950 record
628 if (pr->nextResultSetPosition
629 && *(pr->nextResultSetPosition) > 0
630 && *(pr->nextResultSetPosition)
631 <= *(sru_pdu_res->u.response->numberOfRecords))
632 sru_res->nextRecordPosition
633 = odr_intdup(odr_en, *(pr->nextResultSetPosition));
635 // inserting all records
636 for (int i = 0; i < sru_res->num_records; i++)
638 Z_NamePlusRecord *npr
639 = pr->records->u.databaseOrSurDiagnostics->records[i];
641 sru_res->records[i].recordPosition
643 i + *(apdu->u.presentRequest->resultSetStartPoint));
645 sru_res->records[i].recordPacking = record_packing;
647 if (npr->which != Z_NamePlusRecord_databaseRecord)
649 sru_res->records[i].recordSchema = "diagnostic";
650 sru_res->records[i].recordData_buf = "67";
651 sru_res->records[i].recordData_len = 2;
655 Z_External *r = npr->u.databaseRecord;
656 oident *ent = oid_getentbyoid(r->direct_reference);
657 if (r->which == Z_External_octet
658 && ent->value == VAL_TEXT_XML)
660 sru_res->records[i].recordSchema = "dc";
661 sru_res->records[i].recordData_buf
662 = odr_strdupn(odr_en,
663 (const char *)r->u.octet_aligned->buf,
664 r->u.octet_aligned->len);
665 sru_res->records[i].recordData_len
666 = r->u.octet_aligned->len;
670 sru_res->records[i].recordSchema = "diagnostic";
671 sru_res->records[i].recordData_buf = "67";
672 sru_res->records[i].recordData_len = 2;
682 yf::SRUtoZ3950::Impl::z3950_scan_request(mp::Package &package,
684 Z_SRW_PDU *sru_pdu_res,
685 Z_SRW_scanRequest const *sr_req) const
687 assert(sru_pdu_res->u.scan_response);
689 Package z3950_package(package.session(), package.origin());
690 z3950_package.copy_filter(package);
691 //mp::odr odr_en(ODR_ENCODE);
692 Z_APDU *apdu = zget_APDU(odr_en, Z_APDU_scanRequest);
694 //TODO: add stuff in apdu
695 Z_ScanRequest *z_scanRequest = apdu->u.scanRequest;
697 // database repackaging
698 z_scanRequest->num_databaseNames = 1;
699 z_scanRequest->databaseNames = (char**)
700 odr_malloc(odr_en, sizeof(char *));
701 if (sr_req->database)
702 z_scanRequest->databaseNames[0]
703 = odr_strdup(odr_en, const_cast<char *>(sr_req->database));
705 z_scanRequest->databaseNames[0]
706 = odr_strdup(odr_en, "Default");
710 // CQL or XCQL scan is not possible in Z3950, flagging a diagnostic
711 if (sr_req->query_type != Z_SRW_query_type_pqf)
713 //send_to_srw_client_error(7, "query");
717 // PQF query repackaging
718 // need to use Z_AttributesPlusTerm structure, not Z_Query
719 // this can be digget out of a
720 // Z_query->type1(Z_RPNQuery)->RPNStructure(Z_RPNStructure)
721 // ->u.simple(Z_Operand)->u.attributesPlusTerm(Z_AttributesPlusTerm )
723 //Z_Query *z_query = (Z_Query *) odr_malloc(odr_en, sizeof(Z_Query));
724 //z_searchRequest->query = z_query;
726 //if (!z3950_build_query(odr_en, z_query,
727 // (const SRW_query&)sr_req->query,
728 // sr_req->query_type))
730 //send_to_srw_client_error(7, "query");
736 z3950_package.request() = apdu;
737 std::cout << "z3950_scan_request " << *apdu << "\n";
739 z3950_package.move();
740 //TODO: check success condition
745 bool yf::SRUtoZ3950::Impl::z3950_build_query(mp::odr &odr_en, Z_Query *z_query,
746 const SRW_query &query,
747 SRW_query_type query_type) const
749 if (query_type == Z_SRW_query_type_cql)
751 Z_External *ext = (Z_External *)
752 odr_malloc(odr_en, sizeof(*ext));
753 ext->direct_reference =
754 odr_getoidbystr(odr_en, "1.2.840.10003.16.2");
755 ext->indirect_reference = 0;
757 ext->which = Z_External_CQL;
758 ext->u.cql = const_cast<char *>(query.cql);
760 z_query->which = Z_Query_type_104;
761 z_query->u.type_104 = ext;
765 if (query_type == Z_SRW_query_type_pqf)
767 Z_RPNQuery *RPNquery;
768 YAZ_PQF_Parser pqf_parser;
770 pqf_parser = yaz_pqf_create ();
772 RPNquery = yaz_pqf_parse (pqf_parser, odr_en, query.pqf);
775 std::cout << "TODO: Handeling of bad PQF\n";
776 std::cout << "TODO: Diagnostic to be send\n";
778 z_query->which = Z_Query_type_1;
779 z_query->u.type_1 = RPNquery;
781 yaz_pqf_destroy(pqf_parser);
789 yf::SRUtoZ3950::Impl::z3950_to_srw_diagnostics_ok(mp::odr &odr_en,
790 Z_SRW_searchRetrieveResponse
792 Z_Records *records) const
794 // checking non surrogate diagnostics in Z3950 present response package
796 && records->which == Z_Records_NSD
797 && records->u.nonSurrogateDiagnostic)
799 z3950_to_srw_diag(odr_en, sru_res,
800 records->u.nonSurrogateDiagnostic);
808 yf::SRUtoZ3950::Impl::z3950_to_srw_diag(mp::odr &odr_en,
809 Z_SRW_searchRetrieveResponse *sru_res,
810 Z_DefaultDiagFormat *ddf) const
812 int bib1_code = *ddf->condition;
813 if (bib1_code == 109)
815 sru_res->num_diagnostics = 1;
816 sru_res->diagnostics = (Z_SRW_diagnostic *)
817 odr_malloc(odr_en, sizeof(*sru_res->diagnostics));
818 yaz_mk_std_diagnostic(odr_en, sru_res->diagnostics,
819 yaz_diag_bib1_to_srw(*ddf->condition),
826 static mp::filter::Base* filter_creator()
828 return new mp::filter::SRUtoZ3950;
832 struct metaproxy_1_filter_struct metaproxy_1_filter_sru_to_z3950 = {
843 * indent-tabs-mode: nil
844 * c-file-style: "stroustrup"
846 * vim: shiftwidth=4 tabstop=8 expandtab