SOAP, SRW codecs and HTTP transport for YAZ using libxml2.

[yaz-moved-to-github.git] / zutil / logrpn.c

diff --git a/zutil/logrpn.c b/zutil/logrpn.c
index 95460cb..9d46fad 100644 (file)
--- a/zutil/logrpn.c
+++ b/zutil/logrpn.c
@@ -2,7 +2,7 @@
  * Copyright (C) 1995-2001, Index Data
  * All rights reserved.
  *
- * $Id: logrpn.c,v 1.8 2002-12-28 12:13:03 adam Exp $
+ * $Id: logrpn.c,v 1.10 2003-02-12 15:06:44 adam Exp $
  */
 #include <stdio.h>
 
@@ -350,3 +350,16 @@ void log_scan_term (Z_AttributesPlusTerm *zapt, oid_value ast)
        yaz_log (LOG_LOG, "%*.0s term (not general)", level, "");
     zlog_attributes (zapt, level+2, ast);
 }
+
+void yaz_log_zquery (Z_Query *q)
+{
+    switch (q->which)
+    {
+    case Z_Query_type_1: case Z_Query_type_101:
+       log_rpn_query (q->u.type_1);
+        break;
+    case Z_Query_type_104:
+        if (q->u.type_104->which == Z_External_CQL)
+            yaz_log (LOG_LOG, "CQL: %s", q->u.type_104->u.cql);
+    }
+}