xmlrelaxngsetparsererrors_chdl.c

图片显示,电脑光于望技术湖连望键往,网络

#include <libxml/tree.h>
#include <libxml/relaxng.h>
#include <ch.h>
#include "getvariables.h"

static ChInterp_t interp;

/* for arguments: pointer to function of "err" "warn"*/
static xmlRelaxNGValidityErrorFunc xmlrelaxngvalidityerror_chdl_funarg(void *ctx, const char *msg, ...);
static void *xmlrelaxngvalidityerror_chdl_funptr;

static xmlRelaxNGValidityWarningFunc xmlrelaxngvaliditywarning_chdl_funarg(void *ctx, const char *msg, ...);
static void *xmlrelaxngvaliditywarning_chdl_funptr;

EXPORTCH void xmlRelaxNGSetParserErrors_chdl(void *varg) {
    va_list ap;
    xmlRelaxNGParserCtxtPtr ctxt;
    xmlRelaxNGValidityErrorFunc err;
    xmlRelaxNGValidityWarningFunc warn;
    void *ctx;

    Ch_VaStart(interp, ap, varg);
    ctxt = Ch_VaArg(interp, ap, xmlRelaxNGParserCtxtPtr);

    err = Ch_VaArg(interp, ap, xmlRelaxNGValidityErrorFunc);
    if(err)
      xmlrelaxngvalidityerror_chdl_funptr = (void*)err;
    warn = Ch_VaArg(interp, ap, xmlRelaxNGValidityWarningFunc);
    if(warn)
      xmlrelaxngvaliditywarning_chdl_funptr = (void*)warn;

    ctx = Ch_VaArg(interp, ap, void *);
    xmlRelaxNGSetParserErrors(ctxt, xmlrelaxngvalidityerror_chdl_funarg, 
		   xmlrelaxngvaliditywarning_chdl_funarg, ctx);
    Ch_VaEnd(interp, ap);
}

static xmlRelaxNGValidityErrorFunc xmlrelaxngvalidityerror_chdl_funarg(void *ctx, const char *msg, ...){
    va_list ap_ch, ap_c;
    int num;
    va_start(ap_c, msg);
    ap_ch = Ch_VarArgsCreate(interp);
    /*include in getvariables.h */
    num = getvariables(ap_c, &ap_ch);
    Ch_CallFuncByAddr(interp, xmlrelaxngvalidityerror_chdl_funptr, NULL, ctx, msg, ap_ch);
    Ch_VarArgsDelete(interp, ap_ch);
}

static xmlRelaxNGValidityWarningFunc xmlrelaxngvaliditywarning_chdl_funarg(void *ctx, const char *msg, ...){
    va_list ap_ch, ap_c;
    int num;
    va_start(ap_c, msg);
    ap_ch = Ch_VarArgsCreate(interp);
    /*include in getvariables.h */
    num = getvariables(ap_c, &ap_ch);
    Ch_CallFuncByAddr(interp, xmlrelaxngvaliditywarning_chdl_funptr, NULL, ctx, msg, ap_ch);
    Ch_VarArgsDelete(interp, ap_ch);
}