+ m_p->configure(xmlnode);
+}
+
+void yf::Log::process(mp::Package &package) const
+{
+ m_p->process(package);
+}
+
+
+// static initialization
+std::list<yf::Log::Impl::LFilePtr> yf::Log::Impl::filter_log_files;
+
+
+yf::Log::Impl::Impl(const std::string &x)
+ : m_msg_config(x),
+ m_1line(false),
+ m_access(true),
+ m_user_access(false),
+ m_req_apdu(false),
+ m_res_apdu(false),
+ m_req_session(false),
+ m_res_session(false),
+ m_init_options(false),
+ m_time_format("%H:%M:%S-%d/%m")
+{
+ openfile("");
+}
+
+
+yf::Log::Impl::~Impl()
+{
+}
+
+static void log_DefaultDiagFormat(WRBUF w, Z_DefaultDiagFormat *e)
+{
+ if (e->condition)
+ wrbuf_printf(w, ODR_INT_PRINTF " ", *e->condition);
+ else
+ wrbuf_puts(w, "?? ");
+ if (e->which == Z_DefaultDiagFormat_v2Addinfo && e->u.v2Addinfo)
+ {
+ wrbuf_puts(w, "\"");
+ wrbuf_puts(w, e->u.v2Addinfo);
+ wrbuf_puts(w, "\"");
+ }
+ else if (e->which == Z_DefaultDiagFormat_v3Addinfo && e->u.v3Addinfo)
+ {
+ wrbuf_puts(w, "\"");
+ wrbuf_puts(w, e->u.v3Addinfo);
+ wrbuf_puts(w, "\"");
+ }
+ else
+ wrbuf_puts(w, "-");
+}
+
+static void log_DiagRecs(WRBUF w, int num_diagRecs, Z_DiagRec **diags)
+{
+ if (diags[0]->which != Z_DiagRec_defaultFormat)
+ wrbuf_puts(w ,"(diag not in default format?)");
+ else
+ {
+ Z_DefaultDiagFormat *e = diags[0]->u.defaultFormat;
+ log_DefaultDiagFormat(w, e);
+ }
+}
+
+static void log_syntax(WRBUF w, const Odr_oid *syntax)
+{
+ if (syntax)
+ {
+ char oid_name[OID_STR_MAX+1];
+ wrbuf_puts(w, yaz_oid_to_string_buf(syntax, 0, oid_name));
+ }
+ else
+ wrbuf_puts(w, "-");
+}
+
+static void log_1line_Z_APDU(Z_APDU *z_req, Z_APDU *z_res, WRBUF w)
+{
+ switch (z_req->which)
+ {
+ case Z_APDU_initRequest:
+ wrbuf_puts(w, "Init ");
+ if (!z_res)
+ wrbuf_puts(w, "?");
+ else if (z_res->which != Z_APDU_initResponse)
+ wrbuf_printf(w, "? response=%d", z_res->which);
+ else
+ {
+ Z_InitRequest *req = z_req->u.initRequest;
+ Z_InitResponse *res = z_res->u.initResponse;
+ if (res->result && *res->result)
+ wrbuf_printf(w, "OK -");
+ else
+ {
+ Z_External *uif = res->userInformationField;
+ bool got_code = false;
+ wrbuf_printf(w, "ERROR ");
+ if (uif && uif->which == Z_External_userInfo1)
+ {
+ Z_OtherInformation *ui = uif->u.userInfo1;
+ if (ui->num_elements >= 1)
+ {
+ Z_OtherInformationUnit *unit = ui->list[0];
+ if (unit->which == Z_OtherInfo_externallyDefinedInfo &&
+ unit->information.externallyDefinedInfo &&
+ unit->information.externallyDefinedInfo->which ==
+ Z_External_diag1)
+ {
+ Z_DiagnosticFormat *diag =
+ unit->information.externallyDefinedInfo->
+ u.diag1;
+ if (diag->num >= 1)
+ {
+ Z_DiagnosticFormat_s *ds = diag->elements[0];
+ if (ds->which ==
+ Z_DiagnosticFormat_s_defaultDiagRec)
+ {
+ log_DefaultDiagFormat(w,
+ ds->u.defaultDiagRec);
+ got_code = true;
+ }
+ }
+
+ }
+ }
+ }
+ if (!got_code)
+ wrbuf_puts(w, "-");
+ }
+ wrbuf_printf(w, " ID:%s Name:%s Version:%s",
+ req->implementationId ? req->implementationId :"-",
+ req->implementationName ?req->implementationName : "-",
+ req->implementationVersion ?
+ req->implementationVersion : "-");
+ }
+ break;
+ case Z_APDU_searchRequest:
+ wrbuf_puts(w, "Search ");
+ if (!z_res)
+ wrbuf_puts(w, "?");
+ else if (z_res->which != Z_APDU_searchResponse)
+ wrbuf_printf(w, "? response=%d", z_res->which);
+ else
+ {
+ Z_SearchRequest *req = z_req->u.searchRequest;
+ Z_SearchResponse *res = z_res->u.searchResponse;
+ int i;
+ for (i = 0 ; i < req->num_databaseNames; i++)
+ {
+ if (i)
+ wrbuf_printf(w, "+");
+ wrbuf_puts(w, req->databaseNames[i]);
+ }
+ wrbuf_printf(w, " ");
+ if (!res->records)
+ {
+ wrbuf_printf(w, "OK " ODR_INT_PRINTF " %s", *res->resultCount,
+ req->resultSetName);
+ }
+ else if (res->records->which == Z_Records_DBOSD)
+ {
+ wrbuf_printf(w, "OK " ODR_INT_PRINTF " %s", *res->resultCount,
+ req->resultSetName);
+ }
+ else if (res->records->which == Z_Records_NSD)
+ {
+ wrbuf_puts(w, "ERROR ");
+ log_DefaultDiagFormat(w,
+ res->records->u.nonSurrogateDiagnostic);
+ }
+ else if (res->records->which == Z_Records_multipleNSD)
+ {
+ wrbuf_puts(w, "ERROR ");
+ log_DiagRecs(
+ w,
+ res->records->u.multipleNonSurDiagnostics->num_diagRecs,
+ res->records->u.multipleNonSurDiagnostics->diagRecs);
+ }
+ wrbuf_puts(w, " ");
+ log_syntax(w, req->preferredRecordSyntax);
+ wrbuf_printf(w, " 1+" ODR_INT_PRINTF " ",
+ res->numberOfRecordsReturned
+ ? *res->numberOfRecordsReturned : 0);
+ yaz_query_to_wrbuf(w, req->query);
+ }
+ break;
+ case Z_APDU_presentRequest:
+ wrbuf_puts(w, "Present ");
+ if (!z_res)
+ wrbuf_puts(w, "?");
+ else if (z_res->which != Z_APDU_presentResponse)
+ wrbuf_printf(w, "? response=%d", z_res->which);
+ else
+ {
+ Z_PresentRequest *req = z_req->u.presentRequest;
+ Z_PresentResponse *res = z_res->u.presentResponse;