1 /* This file is part of Pazpar2.
2 Copyright (C) 2006-2011 Index Data
4 Pazpar2 is free software; you can redistribute it and/or modify it under
5 the terms of the GNU General Public License as published by the Free
6 Software Foundation; either version 2, or (at your option) any later
9 Pazpar2 is distributed in the hope that it will be useful, but WITHOUT ANY
10 WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
39 #include <yaz/marcdisp.h>
40 #include <yaz/comstack.h>
41 #include <yaz/tcpip.h>
42 #include <yaz/proto.h>
43 #include <yaz/readconf.h>
44 #include <yaz/pquery.h>
45 #include <yaz/otherinfo.h>
46 #include <yaz/yaz-util.h>
48 #include <yaz/query-charset.h>
49 #include <yaz/querytowrbuf.h>
50 #include <yaz/oid_db.h>
51 #include <yaz/diagbib1.h>
52 #include <yaz/snprintf.h>
53 #include <yaz/rpn2cql.h>
54 #include <yaz/rpn2solr.h>
58 #include <yaz/timing.h>
63 #include "parameters.h"
65 #include "connection.h"
67 #include "relevance.h"
70 static YAZ_MUTEX g_mutex = 0;
71 static int no_clients = 0;
72 static int no_clients_total = 0;
74 static int client_use(int delta)
78 yaz_mutex_create(&g_mutex);
79 yaz_mutex_enter(g_mutex);
82 no_clients_total += delta;
84 yaz_mutex_leave(g_mutex);
85 yaz_log(YLOG_DEBUG, "%s clients=%d", delta == 0 ? "" : (delta > 0 ? "INC" : "DEC"), clients);
89 int clients_count(void) {
93 int clients_count_total(void) {
97 yaz_mutex_enter(g_mutex);
98 total = no_clients_total;
99 yaz_mutex_leave(g_mutex);
104 /** \brief Represents client state for a connection to one search target */
106 struct session_database *database;
107 struct connection *connection;
108 struct session *session;
109 char *pquery; // Current search
110 char *cqlquery; // used for SRU targets only
117 enum client_state state;
118 struct show_raw *show_raw;
119 ZOOM_resultset resultset;
126 int active; // whether this request has been sent to the server
131 void (*error_handler)(void *data, const char *addinfo);
132 void (*record_handler)(void *data, const char *buf, size_t sz);
134 struct show_raw *next;
137 static const char *client_states[] = {
143 "Client_Disconnected"
146 const char *client_get_state_str(struct client *cl)
148 return client_states[cl->state];
151 enum client_state client_get_state(struct client *cl)
156 void client_set_state(struct client *cl, enum client_state st)
159 if (client_is_active(cl))
162 /* If client is going from being active to inactive and all clients
163 are now idle we fire a watch for the session . The assumption is
164 that session is not mutex locked if client is already active */
165 if (was_active && !client_is_active(cl) && cl->session)
168 int no_active = session_active_clients(cl->session);
169 yaz_log(YLOG_DEBUG, "%s: releasing watches on zero active: %d",
170 client_get_id(cl), no_active);
171 if (no_active == 0) {
172 session_alert_watch(cl->session, SESSION_WATCH_SHOW);
173 session_alert_watch(cl->session, SESSION_WATCH_SHOW_PREF);
178 static void client_show_raw_error(struct client *cl, const char *addinfo);
180 struct connection *client_get_connection(struct client *cl)
182 return cl->connection;
185 struct session_database *client_get_database(struct client *cl)
190 struct session *client_get_session(struct client *cl)
195 const char *client_get_pquery(struct client *cl)
200 static void client_send_raw_present(struct client *cl);
201 static int nativesyntax_to_type(struct session_database *sdb, char *type,
204 static void client_show_immediate(
205 ZOOM_resultset resultset, struct session_database *sdb, int position,
207 void (*error_handler)(void *data, const char *addinfo),
208 void (*record_handler)(void *data, const char *buf, size_t sz),
218 error_handler(data, "no resultset");
221 rec = ZOOM_resultset_record(resultset, position-1);
224 error_handler(data, "no record");
230 nativesyntax_to_type(sdb, type, rec);
231 buf = ZOOM_record_get(rec, type, &len);
234 error_handler(data, "no record");
237 record_handler(data, buf, len);
241 int client_show_raw_begin(struct client *cl, int position,
242 const char *syntax, const char *esn,
244 void (*error_handler)(void *data, const char *addinfo),
245 void (*record_handler)(void *data, const char *buf,
249 if (syntax == 0 && esn == 0)
250 client_show_immediate(cl->resultset, client_get_database(cl),
252 error_handler, record_handler,
256 struct show_raw *rr, **rrp;
262 rr = xmalloc(sizeof(*rr));
263 rr->position = position;
266 rr->error_handler = error_handler;
267 rr->record_handler = record_handler;
270 rr->syntax = xstrdup(syntax);
274 rr->esn = xstrdup(esn);
279 for (rrp = &cl->show_raw; *rrp; rrp = &(*rrp)->next)
283 if (cl->state == Client_Failed)
285 client_show_raw_error(cl, "client failed");
287 else if (cl->state == Client_Disconnected)
289 client_show_raw_error(cl, "client disconnected");
293 client_send_raw_present(cl);
299 static void client_show_raw_delete(struct show_raw *r)
306 void client_show_raw_remove(struct client *cl, void *data)
308 struct show_raw *rr = data;
309 struct show_raw **rrp = &cl->show_raw;
315 client_show_raw_delete(rr);
319 void client_show_raw_dequeue(struct client *cl)
321 struct show_raw *rr = cl->show_raw;
323 cl->show_raw = rr->next;
324 client_show_raw_delete(rr);
327 static void client_show_raw_error(struct client *cl, const char *addinfo)
331 cl->show_raw->error_handler(cl->show_raw->data, addinfo);
332 client_show_raw_dequeue(cl);
336 static void client_send_raw_present(struct client *cl)
338 struct session_database *sdb = client_get_database(cl);
339 struct connection *co = client_get_connection(cl);
340 ZOOM_resultset set = cl->resultset;
342 int offset = cl->show_raw->position;
343 const char *syntax = 0;
344 const char *elements = 0;
346 assert(cl->show_raw);
349 yaz_log(YLOG_DEBUG, "%s: trying to present %d record(s) from %d",
350 client_get_id(cl), 1, offset);
352 if (cl->show_raw->syntax)
353 syntax = cl->show_raw->syntax;
355 syntax = session_setting_oneval(sdb, PZ_REQUESTSYNTAX);
356 ZOOM_resultset_option_set(set, "preferredRecordSyntax", syntax);
358 if (cl->show_raw->esn)
359 elements = cl->show_raw->esn;
361 elements = session_setting_oneval(sdb, PZ_ELEMENTS);
362 if (elements && *elements)
363 ZOOM_resultset_option_set(set, "elementSetName", elements);
365 ZOOM_resultset_records(set, 0, offset-1, 1);
366 cl->show_raw->active = 1;
368 connection_continue(co);
371 static int nativesyntax_to_type(struct session_database *sdb, char *type,
374 const char *s = session_setting_oneval(sdb, PZ_NATIVESYNTAX);
378 if (!strncmp(s, "iso2709", 7))
380 const char *cp = strchr(s, ';');
381 yaz_snprintf(type, 80, "xml; charset=%s", cp ? cp+1 : "marc-8s");
383 else if (!strncmp(s, "xml", 3))
387 else if (!strncmp(s, "txml", 4))
389 const char *cp = strchr(s, ';');
390 yaz_snprintf(type, 80, "txml; charset=%s", cp ? cp+1 : "marc-8s");
396 else /* attempt to deduce structure */
398 const char *syntax = ZOOM_record_get(rec, "syntax", NULL);
401 if (!strcmp(syntax, "XML"))
406 else if (!strcmp(syntax, "USmarc") || !strcmp(syntax, "MARC21"))
408 strcpy(type, "xml; charset=marc8-s");
418 * TODO Consider thread safety!!!
421 void client_report_facets(struct client *cl, ZOOM_resultset rs)
423 struct session_database *sdb = client_get_database(cl);
424 ZOOM_facet_field *facets = ZOOM_resultset_facets(rs);
428 struct session *se = client_get_session(cl);
429 int facet_num = ZOOM_resultset_facets_size(rs);
432 for (s = sdb->settings[PZ_FACETMAP]; s; s = s->next)
434 const char *p = strchr(s->name + 3, ':');
435 if (p && p[1] && s->value && s->value[0])
438 p++; /* p now holds logical facet name */
439 for (facet_idx = 0; facet_idx < facet_num; facet_idx++)
441 const char *native_name =
442 ZOOM_facet_field_name(facets[facet_idx]);
443 if (native_name && !strcmp(s->value, native_name))
447 ZOOM_facet_field_term_count(facets[facet_idx]);
448 for (term_idx = 0; term_idx < term_num; term_idx++ )
452 ZOOM_facet_field_get_term(facets[facet_idx],
455 add_facet(se, p, term, freq);
465 static void ingest_raw_record(struct client *cl, ZOOM_record rec)
471 if (cl->show_raw->binary)
475 struct session_database *sdb = client_get_database(cl);
476 nativesyntax_to_type(sdb, type, rec);
479 buf = ZOOM_record_get(rec, type, &len);
480 cl->show_raw->record_handler(cl->show_raw->data, buf, len);
481 client_show_raw_dequeue(cl);
484 void client_check_preferred_watch(struct client *cl)
486 struct session *se = cl->session;
487 yaz_log(YLOG_DEBUG, "client_check_preferred_watch: %s ", client_get_id(cl));
491 /* TODO possible threading issue. Session can have been destroyed */
492 if (session_is_preferred_clients_ready(se)) {
493 session_alert_watch(se, SESSION_WATCH_SHOW_PREF);
496 yaz_log(YLOG_DEBUG, "client_check_preferred_watch: Still locked on preferred targets.");
501 yaz_log(YLOG_WARN, "client_check_preferred_watch: %s. No session!", client_get_id(cl));
505 void client_search_response(struct client *cl)
507 struct connection *co = cl->connection;
508 ZOOM_connection link = connection_get_link(co);
509 ZOOM_resultset resultset = cl->resultset;
511 const char *error, *addinfo = 0;
513 if (ZOOM_connection_error(link, &error, &addinfo))
516 client_set_state(cl, Client_Error);
517 yaz_log(YLOG_WARN, "Search error %s (%s): %s",
518 error, addinfo, client_get_id(cl));
522 yaz_log(YLOG_DEBUG, "client_search_response: hits "
523 ODR_INT_PRINTF, cl->hits);
524 client_report_facets(cl, resultset);
525 cl->record_offset = cl->startrecs;
526 cl->hits = ZOOM_resultset_size(resultset);
530 void client_got_records(struct client *cl)
532 struct session *se = cl->session;
536 session_alert_watch(se, SESSION_WATCH_SHOW);
537 session_alert_watch(se, SESSION_WATCH_RECORD);
542 void client_record_response(struct client *cl)
544 struct connection *co = cl->connection;
545 ZOOM_connection link = connection_get_link(co);
546 ZOOM_resultset resultset = cl->resultset;
547 const char *error, *addinfo;
549 if (ZOOM_connection_error(link, &error, &addinfo))
551 client_set_state(cl, Client_Error);
552 yaz_log(YLOG_WARN, "Search error %s (%s): %s",
553 error, addinfo, client_get_id(cl));
558 const char *msg, *addinfo;
560 if (cl->show_raw && cl->show_raw->active)
562 if ((rec = ZOOM_resultset_record(resultset,
563 cl->show_raw->position-1)))
565 cl->show_raw->active = 0;
566 ingest_raw_record(cl, rec);
570 yaz_log(YLOG_WARN, "Expected record, but got NULL, offset=%d",
571 cl->show_raw->position-1);
576 int offset = cl->record_offset;
577 if ((rec = ZOOM_resultset_record(resultset, offset)))
580 if (cl->session == 0)
582 else if (ZOOM_record_error(rec, &msg, &addinfo, 0))
584 yaz_log(YLOG_WARN, "Record error %s (%s): %s (rec #%d)",
585 msg, addinfo, client_get_id(cl),
590 struct session_database *sdb = client_get_database(cl);
591 NMEM nmem = nmem_create();
595 if (nativesyntax_to_type(sdb, type, rec))
596 yaz_log(YLOG_WARN, "Failed to determine record type");
597 xmlrec = ZOOM_record_get(rec, type, NULL);
599 yaz_log(YLOG_WARN, "ZOOM_record_get failed from %s",
603 /* OK = 0, -1 = failure, -2 = Filtered */
604 if (ingest_record(cl, xmlrec, cl->record_offset, nmem) == -1)
605 yaz_log(YLOG_WARN, "Failed to ingest from %s", client_get_id(cl));
612 yaz_log(YLOG_WARN, "Expected record, but got NULL, offset=%d",
619 static void client_set_facets_request(struct client *cl, ZOOM_connection link)
621 struct session_database *sdb = client_get_database(cl);
623 WRBUF w = wrbuf_alloc();
627 for (s = sdb->settings[PZ_FACETMAP]; s; s = s->next)
629 const char *p = strchr(s->name + 3, ':');
632 yaz_log(YLOG_WARN, "Malformed facetmap name: %s", s->name);
634 else if (s->value && s->value[0])
636 wrbuf_puts(w, "@attr 1=");
637 yaz_encode_pqf_term(w, s->value, strlen(s->value));
642 yaz_log(YLOG_LOG, "using facets str: %s", wrbuf_cstr(w));
643 ZOOM_connection_option_set(link, "facets",
644 wrbuf_len(w) ? wrbuf_cstr(w) : 0);
648 int client_has_facet(struct client *cl, const char *name)
650 struct session_database *sdb = client_get_database(cl);
653 for (s = sdb->settings[PZ_FACETMAP]; s; s = s->next)
655 const char *p = strchr(s->name + 3, ':');
656 if (p && !strcmp(name, p + 1))
662 void client_start_search(struct client *cl, const char *sort_strategy,
663 const char *sort_spec)
665 struct session_database *sdb = client_get_database(cl);
666 struct connection *co = client_get_connection(cl);
667 ZOOM_connection link = connection_get_link(co);
669 const char *opt_piggyback = session_setting_oneval(sdb, PZ_PIGGYBACK);
670 const char *opt_queryenc = session_setting_oneval(sdb, PZ_QUERYENCODING);
671 const char *opt_elements = session_setting_oneval(sdb, PZ_ELEMENTS);
672 const char *opt_requestsyn = session_setting_oneval(sdb, PZ_REQUESTSYNTAX);
673 const char *opt_maxrecs = session_setting_oneval(sdb, PZ_MAXRECS);
674 const char *opt_sru = session_setting_oneval(sdb, PZ_SRU);
675 const char *opt_sort = session_setting_oneval(sdb, PZ_SORT);
676 const char *opt_preferred = session_setting_oneval(sdb, PZ_PREFERRED);
677 const char *extra_args = session_setting_oneval(sdb, PZ_EXTRA_ARGS);
678 char maxrecs_str[24], startrecs_str[24];
682 cl->record_offset = 0;
685 if (extra_args && *extra_args)
686 ZOOM_connection_option_set(link, "extraArgs", extra_args);
689 cl->preferred = atoi(opt_preferred);
691 yaz_log(YLOG_LOG, "Target %s has preferred status: %d",
692 client_get_id(cl), cl->preferred);
694 client_set_state(cl, Client_Working);
697 ZOOM_connection_option_set(link, "piggyback", opt_piggyback);
699 ZOOM_connection_option_set(link, "piggyback", "1");
701 ZOOM_connection_option_set(link, "rpnCharset", opt_queryenc);
702 if (*opt_sru && *opt_elements)
703 ZOOM_connection_option_set(link, "schema", opt_elements);
704 else if (*opt_elements)
705 ZOOM_connection_option_set(link, "elementSetName", opt_elements);
707 ZOOM_connection_option_set(link, "preferredRecordSyntax", opt_requestsyn);
709 if (opt_maxrecs && *opt_maxrecs)
711 cl->maxrecs = atoi(opt_maxrecs);
714 /* convert back to string representation used in ZOOM API */
715 sprintf(maxrecs_str, "%d", cl->maxrecs);
716 ZOOM_connection_option_set(link, "count", maxrecs_str);
718 if (cl->maxrecs > 20)
719 ZOOM_connection_option_set(link, "presentChunk", "20");
721 ZOOM_connection_option_set(link, "presentChunk", maxrecs_str);
723 sprintf(startrecs_str, "%d", cl->startrecs);
724 ZOOM_connection_option_set(link, "start", startrecs_str);
726 /* TODO Verify does it break something for CQL targets(non-SOLR) ? */
727 /* facets definition is in PQF */
728 client_set_facets_request(cl, link);
732 ZOOM_query q = ZOOM_query_create();
733 yaz_log(YLOG_LOG, "Search %s CQL: %s", client_get_id(cl),
735 ZOOM_query_cql(q, cl->cqlquery);
737 ZOOM_query_sortby(q, opt_sort);
738 if (sort_strategy && sort_spec)
740 yaz_log(YLOG_LOG, "applying %s %s", sort_strategy, sort_spec);
741 ZOOM_query_sortby2(q, sort_strategy, sort_spec);
743 rs = ZOOM_connection_search(link, q);
744 ZOOM_query_destroy(q);
748 ZOOM_query q = ZOOM_query_create();
750 yaz_log(YLOG_LOG, "Search %s PQF: %s", client_get_id(cl), cl->pquery);
752 ZOOM_query_prefix(q, cl->pquery);
754 if (sort_strategy && sort_spec)
756 yaz_log(YLOG_LOG, "applying %s %s", sort_strategy, sort_spec);
757 ZOOM_query_sortby2(q, sort_strategy, sort_spec);
759 rs = ZOOM_connection_search(link, q);
760 ZOOM_query_destroy(q);
762 ZOOM_resultset_destroy(cl->resultset);
764 connection_continue(co);
767 struct client *client_create(const char *id)
769 struct client *cl = xmalloc(sizeof(*cl));
778 cl->record_offset = 0;
780 cl->state = Client_Disconnected;
784 pazpar2_mutex_create(&cl->mutex, "client");
788 cl->id = xstrdup(id);
794 void client_lock(struct client *c)
796 yaz_mutex_enter(c->mutex);
799 void client_unlock(struct client *c)
801 yaz_mutex_leave(c->mutex);
804 void client_incref(struct client *c)
806 pazpar2_incref(&c->ref_count, c->mutex);
807 yaz_log(YLOG_DEBUG, "client_incref c=%p %s cnt=%d",
808 c, client_get_id(c), c->ref_count);
811 int client_destroy(struct client *c)
815 yaz_log(YLOG_DEBUG, "client_destroy c=%p %s cnt=%d",
816 c, client_get_id(c), c->ref_count);
817 if (!pazpar2_decref(&c->ref_count, c->mutex))
824 assert(!c->connection);
828 ZOOM_resultset_destroy(c->resultset);
830 yaz_mutex_destroy(&c->mutex);
839 void client_set_connection(struct client *cl, struct connection *con)
842 ZOOM_resultset_release(cl->resultset);
845 assert(cl->connection == 0);
846 cl->connection = con;
851 cl->connection = con;
856 void client_disconnect(struct client *cl)
858 if (cl->state != Client_Idle)
859 client_set_state(cl, Client_Disconnected);
860 client_set_connection(cl, 0);
864 // Initialize CCL map for a target
865 static CCL_bibset prepare_cclmap(struct client *cl)
867 struct session_database *sdb = client_get_database(cl);
874 for (s = sdb->settings[PZ_CCLMAP]; s; s = s->next)
876 char *p = strchr(s->name + 3, ':');
879 yaz_log(YLOG_WARN, "Malformed cclmap name: %s", s->name);
884 ccl_qual_fitem(res, s->value, p);
889 // returns a xmalloced CQL query corresponding to the pquery in client
890 static char *make_cqlquery(struct client *cl)
892 cql_transform_t cqlt = cql_transform_create();
895 WRBUF wrb = wrbuf_alloc();
897 ODR odr_out = odr_createmem(ODR_ENCODE);
899 zquery = p_query_rpn(odr_out, cl->pquery);
900 yaz_log(YLOG_LOG, "PQF: %s", cl->pquery);
901 if ((status = cql_transform_rpn2cql_wrbuf(cqlt, wrb, zquery)))
903 yaz_log(YLOG_WARN, "Failed to generate CQL query, code=%d", status);
908 r = xstrdup(wrbuf_cstr(wrb));
911 odr_destroy(odr_out);
912 cql_transform_close(cqlt);
916 // returns a xmalloced SOLR query corresponding to the pquery in client
917 // TODO Could prob. be merge with the similar make_cqlquery
918 static char *make_solrquery(struct client *cl)
920 solr_transform_t sqlt = solr_transform_create();
923 WRBUF wrb = wrbuf_alloc();
925 ODR odr_out = odr_createmem(ODR_ENCODE);
927 zquery = p_query_rpn(odr_out, cl->pquery);
929 yaz_log(YLOG_WARN, "Failed to generate RPN from PQF: %s", cl->pquery);
932 yaz_log(YLOG_LOG, "PQF: %s", cl->pquery);
933 if ((status = solr_transform_rpn2solr_wrbuf(sqlt, wrb, zquery)))
935 yaz_log(YLOG_WARN, "Failed to generate SOLR query from PQF %s, code=%d", cl->pquery, status);
940 r = xstrdup(wrbuf_cstr(wrb));
943 odr_destroy(odr_out);
944 solr_transform_close(sqlt);
948 static void apply_limit(struct session_database *sdb,
949 facet_limits_t facet_limits,
950 WRBUF w_pqf, WRBUF w_ccl)
955 NMEM nmem_tmp = nmem_create();
956 for (i = 0; (name = facet_limits_get(facet_limits, i, &value)); i++)
958 struct setting *s = 0;
960 for (s = sdb->settings[PZ_LIMITMAP]; s; s = s->next)
962 const char *p = strchr(s->name + 3, ':');
963 if (p && !strcmp(p + 1, name) && s->value)
967 nmem_strsplit_escape2(nmem_tmp, "|", value, &values,
970 if (!strncmp(s->value, "rpn:", 4))
972 const char *pqf = s->value + 4;
974 wrbuf_puts(w_pqf, "@and ");
975 wrbuf_puts(w_pqf, pqf);
976 wrbuf_puts(w_pqf, " ");
977 for (i = 0; i < num; i++)
980 wrbuf_puts(w_pqf, "@or ");
981 yaz_encode_pqf_term(w_pqf, values[i],
985 else if (!strncmp(s->value, "ccl:", 4))
987 const char *ccl = s->value + 4;
989 wrbuf_puts(w_ccl, " and (");
991 for (i = 0; i < num; i++)
994 wrbuf_puts(w_ccl, " or ");
995 wrbuf_puts(w_ccl, ccl);
996 wrbuf_puts(w_ccl, "=\"");
997 wrbuf_puts(w_ccl, values[i]);
998 wrbuf_puts(w_ccl, "\"");
1000 wrbuf_puts(w_ccl, ")");
1006 nmem_reset(nmem_tmp);
1009 yaz_log(YLOG_WARN, "Target %s: limit %s used, but no limitmap defined",
1010 (sdb->database ? sdb->database->id : "<no id>"), name);
1013 nmem_destroy(nmem_tmp);
1016 // Parse the query given the settings specific to this client
1017 int client_parse_query(struct client *cl, const char *query,
1018 facet_limits_t facet_limits)
1020 struct session *se = client_get_session(cl);
1021 struct session_database *sdb = client_get_database(cl);
1022 struct ccl_rpn_node *cn;
1024 CCL_bibset ccl_map = prepare_cclmap(cl);
1025 const char *sru = session_setting_oneval(sdb, PZ_SRU);
1026 const char *pqf_prefix = session_setting_oneval(sdb, PZ_PQF_PREFIX);
1027 const char *pqf_strftime = session_setting_oneval(sdb, PZ_PQF_STRFTIME);
1028 const char *query_syntax = session_setting_oneval(sdb, PZ_QUERY_SYNTAX);
1034 w_ccl = wrbuf_alloc();
1035 wrbuf_puts(w_ccl, query);
1037 w_pqf = wrbuf_alloc();
1040 wrbuf_puts(w_pqf, pqf_prefix);
1041 wrbuf_puts(w_pqf, " ");
1044 apply_limit(sdb, facet_limits, w_pqf, w_ccl);
1046 yaz_log(YLOG_LOG, "CCL query: %s", wrbuf_cstr(w_ccl));
1047 cn = ccl_find_str(ccl_map, wrbuf_cstr(w_ccl), &cerror, &cpos);
1048 ccl_qual_rm(&ccl_map);
1051 client_set_state(cl, Client_Error);
1052 session_log(se, YLOG_WARN, "Failed to parse CCL query '%s' for %s",
1055 wrbuf_destroy(w_ccl);
1056 wrbuf_destroy(w_pqf);
1059 wrbuf_destroy(w_ccl);
1061 if (!pqf_strftime || !*pqf_strftime)
1062 ccl_pquery(w_pqf, cn);
1065 time_t cur_time = time(0);
1066 struct tm *tm = localtime(&cur_time);
1068 const char *cp = tmp_str;
1070 /* see man strftime(3) for things .. In particular %% gets converted
1071 to %.. And That's our original query .. */
1072 strftime(tmp_str, sizeof(tmp_str)-1, pqf_strftime, tm);
1076 ccl_pquery(w_pqf, cn);
1078 wrbuf_putc(w_pqf, cp[0]);
1082 cl->pquery = xstrdup(wrbuf_cstr(w_pqf));
1083 wrbuf_destroy(w_pqf);
1085 yaz_log(YLOG_LOG, "PQF query: %s", cl->pquery);
1087 xfree(cl->cqlquery);
1089 /* Support for PQF on SRU targets. */
1091 yaz_log(YLOG_DEBUG, "Query syntax: %s", query_syntax);
1092 if (strcmp(query_syntax, "pqf") != 0 && *sru)
1094 if (!strcmp(sru, "solr")) {
1095 if (!(cl->cqlquery = make_solrquery(cl)))
1099 if (!(cl->cqlquery = make_cqlquery(cl)))
1106 /* TODO FIX Not thread safe */
1109 // Initialize relevance structure with query terms
1110 se->relevance = relevance_create_ccl(
1111 se->service->charsets, se->nmem, cn);
1118 void client_set_session(struct client *cl, struct session *se)
1123 int client_is_active(struct client *cl)
1125 if (cl->connection && (cl->state == Client_Connecting ||
1126 cl->state == Client_Working))
1131 int client_is_active_preferred(struct client *cl)
1133 /* only count if this is a preferred target. */
1136 /* TODO No sure this the condition that Seb wants */
1137 if (cl->connection && (cl->state == Client_Connecting ||
1138 cl->state == Client_Working))
1143 Odr_int client_get_hits(struct client *cl)
1148 int client_get_num_records(struct client *cl)
1150 return cl->record_offset;
1153 void client_set_diagnostic(struct client *cl, int diagnostic)
1155 cl->diagnostic = diagnostic;
1158 int client_get_diagnostic(struct client *cl)
1160 return cl->diagnostic;
1163 void client_set_database(struct client *cl, struct session_database *db)
1168 const char *client_get_id(struct client *cl)
1173 void client_set_maxrecs(struct client *cl, int v)
1178 int client_get_maxrecs(struct client *cl)
1183 void client_set_startrecs(struct client *cl, int v)
1188 void client_set_preferred(struct client *cl, int v)
1197 * c-file-style: "Stroustrup"
1198 * indent-tabs-mode: nil
1200 * vim: shiftwidth=4 tabstop=8 expandtab