filter_log.cpp File Reference

#include "config.hpp"
#include "filter_log.hpp"
#include <metaproxy/package.hpp>
#include <string>
#include <sstream>
#include <iomanip>
#include <boost/thread/mutex.hpp>
#include "gduutil.hpp"
#include <metaproxy/util.hpp>
#include <metaproxy/xmlutil.hpp>
#include <yaz/oid_db.h>
#include <yaz/zgdu.h>
#include <yaz/wrbuf.h>
#include <yaz/log.h>
#include <yaz/querytowrbuf.h>
#include <yaz/timing.h>
#include <stdio.h>
#include <time.h>

Include dependency graph for filter_log.cpp:

Go to the source code of this file.

Classes
class	metaproxy_1::filter::Log::Impl
class	metaproxy_1::filter::Log::Impl::LFile

Namespaces
namespace	metaproxy_1
namespace	metaproxy_1::filter

Functions
static void	log_DefaultDiagFormat (WRBUF w, Z_DefaultDiagFormat *e)
static void	log_DiagRecs (WRBUF w, int num_diagRecs, Z_DiagRec **diags)
static void	log_syntax (WRBUF w, const Odr_oid *syntax)
static void	log_1line_Z_APDU (Z_APDU *z_req, Z_APDU *z_res, WRBUF w)
static void	log_1line_Z_HTTP (Z_HTTP_Request *req, Z_HTTP_Response *res, WRBUF w)
static void	log_1line_Z_GDU (Z_GDU *gdu_req, Z_GDU *gdu_res, WRBUF w)
static mp::filter::Base *	filter_creator ()

Variables
static std::list< yf::Log::Impl::LFilePtr >	metaproxy_1::filter::filter_log_files
struct metaproxy_1_filter_struct	metaproxy_1_filter_log

Function Documentation

filter_creator()

static mp::filter::Base * filter_creator ( )

static

Definition at line 872 of file filter_log.cpp.

{
    return new mp::filter::Log;
}

log_1line_Z_APDU()

static void log_1line_Z_APDU ( Z_APDU *  z_req, Z_APDU *  z_res, WRBUF  w  )

static

Definition at line 185 of file filter_log.cpp.

{
    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;
 
            if (!res->records)
            {
                wrbuf_printf(w, "OK");
            }
            else if (res->records->which == Z_Records_DBOSD)
            {
                wrbuf_printf(w, "OK");
            }
            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, " %s " ODR_INT_PRINTF "+" ODR_INT_PRINTF " ",
                req->resultSetId, *req->resultSetStartPoint,
                         *req->numberOfRecordsRequested);
        }
        break;
    case Z_APDU_deleteResultSetRequest:
        wrbuf_puts(w, "deleteResultSet ");
        break;
    case Z_APDU_accessControlRequest:
        wrbuf_puts(w, "accessControl ");
        break;
    case Z_APDU_resourceControlRequest:
        wrbuf_puts(w, "resourceControl ");
        break;
    case Z_APDU_triggerResourceControlRequest:
        wrbuf_puts(w, "triggerResourceControlRequest");
        break;
    case Z_APDU_resourceReportRequest:
        wrbuf_puts(w, "resourceReport ");
        break;
    case Z_APDU_scanRequest:
        wrbuf_puts(w, "Scan ");
        if (!z_res)
            wrbuf_puts(w, "?");
        else if (z_res->which != Z_APDU_scanResponse)
            wrbuf_printf(w, "? response=%d", z_res->which);
        else
        {
            Z_ScanRequest *req = z_req->u.scanRequest;
            Z_ScanResponse *res = z_res->u.scanResponse;
            int i;
            for (i = 0 ; i < req->num_databaseNames; i++)
            {
                if (i)
                    wrbuf_printf(w, "+");
                wrbuf_puts(w, req->databaseNames[i]);
            }
            wrbuf_puts(w, " ");
            if (!res->scanStatus || *res->scanStatus == 0)
                wrbuf_puts(w, "OK");
            else if (*res->scanStatus == 6)
                wrbuf_puts(w, "ERROR");
            else
                wrbuf_printf(w, "PARTIAL" ODR_INT_PRINTF, *res->scanStatus);
 
            wrbuf_printf(w, " " ODR_INT_PRINTF " " ODR_INT_PRINTF "+"
                         ODR_INT_PRINTF "+" ODR_INT_PRINTF " ",
                         res->numberOfEntriesReturned ?
                         *res->numberOfEntriesReturned : 0,
                         req->preferredPositionInResponse ?
                          *req->preferredPositionInResponse : 1,
                         *req->numberOfTermsRequested,
                         res->stepSize ? *res->stepSize : 1);
 
            yaz_scan_to_wrbuf(w, req->termListAndStartPoint,
                              req->attributeSet);
        }
        break;
    case Z_APDU_sortRequest:
        wrbuf_puts(w, "sort ");
        if (!z_res)
            wrbuf_puts(w, "?");
        else if (z_res->which != Z_APDU_sortResponse)
            wrbuf_printf(w, "? response=%d", z_res->which);
        else
        {
            Z_SortResponse *res = z_res->u.sortResponse;
            Z_SortRequest *req = z_res->u.sortRequest;
            int i;
 
            if (*res->sortStatus == Z_SortResponse_success)
                wrbuf_puts(w, "OK");
            else if (*res->sortStatus == Z_SortResponse_partial_1)
                wrbuf_puts(w, "PARTIAL");
            else if (*res->sortStatus == Z_SortResponse_failure)
                wrbuf_puts(w, "ERROR");
 
            wrbuf_puts(w, " ");
            if (res->diagnostics && res->num_diagnostics >= 1)
                log_DiagRecs(w, res->num_diagnostics,res->diagnostics);
            else
                wrbuf_puts(w, "-");
 
            wrbuf_puts(w, " (");
            for (i = 0; i < req->num_inputResultSetNames; i++)
            {
                if (i)
                    wrbuf_puts(w, "+");
                wrbuf_puts(w, req->inputResultSetNames[i]);
            }
            wrbuf_printf(w, ")->%s ",req->sortedResultSetName);
 
        }
        break;
    case Z_APDU_segmentRequest:
        wrbuf_puts(w, "segmentRequest");
        break;
    case Z_APDU_extendedServicesRequest:
        wrbuf_puts(w, "extendedServices ");
        if (!z_res)
            wrbuf_puts(w, "?");
        else if (z_res->which != Z_APDU_extendedServicesResponse)
            wrbuf_printf(w, "? response=%d", z_res->which);
        else
        {
            Z_ExtendedServicesResponse *res =
                z_res->u.extendedServicesResponse;
            switch (*res->operationStatus)
            {
            case Z_ExtendedServicesResponse_done:
                wrbuf_puts(w, "DONE"); break;
            case Z_ExtendedServicesResponse_accepted:
                wrbuf_puts(w, "ACCEPTED"); break;
            case Z_ExtendedServicesResponse_failure:
                wrbuf_puts(w, "ERROR"); break;
            default:
                wrbuf_printf(w, ODR_INT_PRINTF, *res->operationStatus);
            }
            wrbuf_puts(w, " ");
            if (res->diagnostics && res->num_diagnostics >= 1)
                log_DiagRecs(w, res->num_diagnostics,res->diagnostics);
            else
                wrbuf_puts(w, "-");
        }
        break;
    case Z_APDU_close:
        wrbuf_puts(w, "close");
        break;
    case Z_APDU_duplicateDetectionRequest:
        wrbuf_puts(w, "duplicateDetention ");
        if (!z_res)
            wrbuf_puts(w, "?");
        else if (z_res->which != Z_APDU_duplicateDetectionResponse)
            wrbuf_printf(w, "? response=%d", z_res->which);
        else
        {
            Z_DuplicateDetectionResponse *res =
                z_res->u.duplicateDetectionResponse;
            if (*res->status)
                wrbuf_puts(w, "OK");
            else
                wrbuf_puts(w, "ERROR");
 
            wrbuf_puts(w, " ");
            if (res->diagnostics && res->num_diagnostics >= 1)
                log_DiagRecs(w, res->num_diagnostics, res->diagnostics);
            else
                wrbuf_puts(w, "-");
        }
        break;
    default:
        wrbuf_printf(w, "REQ=%d RES=%d", z_req->which, z_res->which);
    }
}

References log_DefaultDiagFormat(), log_DiagRecs(), and log_syntax().

Referenced by log_1line_Z_GDU().

Here is the call graph for this function:

log_1line_Z_GDU()

static void log_1line_Z_GDU ( Z_GDU *  gdu_req, Z_GDU *  gdu_res, WRBUF  w  )

static

Definition at line 496 of file filter_log.cpp.

{
    if (gdu_req && gdu_req->which == Z_GDU_Z3950)
    {
        log_1line_Z_APDU(gdu_req->u.z3950,
                         (gdu_res && gdu_res->which == Z_GDU_Z3950) ?
                         gdu_res->u.z3950 : 0, w);
    }
    else if (gdu_req && gdu_req->which == Z_GDU_HTTP_Request)
    {
        log_1line_Z_HTTP(gdu_req->u.HTTP_Request,
                         (gdu_res && gdu_res->which == Z_GDU_HTTP_Response) ?
                         gdu_res->u.HTTP_Response : 0, w);
    }
}

References log_1line_Z_APDU(), and log_1line_Z_HTTP().

Referenced by metaproxy_1::filter::Log::Impl::process().

Here is the call graph for this function:

log_1line_Z_HTTP()

static void log_1line_Z_HTTP ( Z_HTTP_Request *  req, Z_HTTP_Response *  res, WRBUF  w  )

static

Definition at line 487 of file filter_log.cpp.

{
    wrbuf_printf(w, "%s %s HTTP/%s", req->method, req->path, req->version);
    if (res)
        wrbuf_printf(w, " %d %d", res->code, res->content_len);
    else
        wrbuf_printf(w, " ?");
}

Referenced by log_1line_Z_GDU().

log_DefaultDiagFormat()

static void log_DefaultDiagFormat ( WRBUF  w, Z_DefaultDiagFormat *  e  )

static

Definition at line 141 of file filter_log.cpp.

{
    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, "-");
}

Referenced by log_1line_Z_APDU(), and log_DiagRecs().

log_DiagRecs()

static void log_DiagRecs ( WRBUF  w, int  num_diagRecs, Z_DiagRec **  diags  )

static

Definition at line 163 of file filter_log.cpp.

{
    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);
    }
}

References log_DefaultDiagFormat().

Referenced by log_1line_Z_APDU().

Here is the call graph for this function:

log_syntax()

static void log_syntax ( WRBUF  w, const Odr_oid *  syntax  )

static

Definition at line 174 of file filter_log.cpp.

{
    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, "-");
}

Referenced by log_1line_Z_APDU().

Variable Documentation

metaproxy_1_filter_log

struct metaproxy_1_filter_struct metaproxy_1_filter_log

Initial value:

= {
        0,
        "log",
        filter_creator
    }

Definition at line 878 of file filter_log.cpp.

                                                              {
        0,
        "log",
        filter_creator
    };

Referenced by metaproxy_1::FactoryStatic::FactoryStatic().