static void pan_req(const struct req *req) { const char *stp; VSB_printf(pan_vsp, "req = %p {\n", req); VSB_printf(pan_vsp, " sp = %p, vxid = %u,", req->sp, VXID(req->vsl->wid)); switch (req->req_step) { #define REQ_STEP(l, u, arg) case R_STP_##u: stp = "R_STP_" #u; break; #include "tbl/steps.h" #undef REQ_STEP default: stp = NULL; } if (stp != NULL) VSB_printf(pan_vsp, " step = %s,\n", stp); else VSB_printf(pan_vsp, " step = 0x%x,\n", req->req_step); VSB_printf(pan_vsp, " req_body = %s,\n", reqbody_status_2str(req->req_body_status)); if (req->err_code) VSB_printf(pan_vsp, " err_code = %d, err_reason = %s,\n", req->err_code, req->err_reason ? req->err_reason : "(null)"); VSB_printf(pan_vsp, " restarts = %d, esi_level = %d\n", req->restarts, req->esi_level); if (req->sp != NULL) pan_sess(req->sp); if (req->wrk != NULL) pan_wrk(req->wrk); pan_ws(req->ws, 2); pan_http("req", req->http, 2); if (req->resp->ws != NULL) pan_http("resp", req->resp, 2); if (VALID_OBJ(req->vcl, VCL_CONF_MAGIC)) pan_vcl(req->vcl); if (req->objcore != NULL) { pan_objcore("REQ", req->objcore); if (req->objcore->busyobj != NULL) pan_busyobj(req->objcore->busyobj); } VSB_printf(pan_vsp, "},\n"); }
static void pan_sess(const struct sess *sp) { const char *stp, *hand; VSB_printf(pan_vsp, "sp = %p {\n", sp); VSB_printf(pan_vsp, " fd = %d, id = %u, xid = %u,\n", sp->fd, sp->vsl_id & VSL_IDENTMASK, sp->req->xid); VSB_printf(pan_vsp, " client = %s %s,\n", sp->addr ? sp->addr : "?.?.?.?", sp->port ? sp->port : "?"); switch (sp->step) { #define STEP(l, u, arg) case STP_##u: stp = "STP_" #u; break; #include "tbl/steps.h" #undef STEP default: stp = NULL; } hand = VCL_Return_Name(sp->req->handling); if (stp != NULL) VSB_printf(pan_vsp, " step = %s,\n", stp); else VSB_printf(pan_vsp, " step = 0x%x,\n", sp->step); if (hand != NULL) VSB_printf(pan_vsp, " handling = %s,\n", hand); else VSB_printf(pan_vsp, " handling = 0x%x,\n", sp->req->handling); if (sp->req->err_code) VSB_printf(pan_vsp, " err_code = %d, err_reason = %s,\n", sp->req->err_code, sp->req->err_reason ? sp->req->err_reason : "(null)"); VSB_printf(pan_vsp, " restarts = %d, esi_level = %d\n", sp->req->restarts, sp->req->esi_level); if (sp->wrk->busyobj != NULL) pan_busyobj(sp->wrk->busyobj); pan_ws(sp->req->ws, 2); pan_http("req", sp->req->http, 2); if (sp->req->resp->ws != NULL) pan_http("resp", sp->req->resp, 4); if (sp->wrk != NULL) pan_wrk(sp->wrk); if (VALID_OBJ(sp->req->vcl, VCL_CONF_MAGIC)) pan_vcl(sp->req->vcl); if (VALID_OBJ(sp->req->obj, OBJECT_MAGIC)) pan_object(sp->req->obj); VSB_printf(pan_vsp, "},\n"); }
static void pan_req(struct vsb *vsb, const struct req *req) { const char *stp; VSB_printf(vsb, "req = %p {\n", req); VSB_indent(vsb, 2); VSB_printf(vsb, "vxid = %u, ", VXID(req->vsl->wid)); switch (req->req_step) { #define REQ_STEP(l, u, arg) case R_STP_##u: stp = "R_STP_" #u; break; #include "tbl/steps.h" #undef REQ_STEP default: stp = NULL; } if (stp != NULL) VSB_printf(vsb, "step = %s,\n", stp); else VSB_printf(vsb, "step = 0x%x,\n", req->req_step); VSB_printf(vsb, "req_body = %s,\n", reqbody_status_2str(req->req_body_status)); if (req->err_code) VSB_printf(vsb, "err_code = %d, err_reason = %s,\n", req->err_code, req->err_reason ? req->err_reason : "(null)"); VSB_printf(vsb, "restarts = %d, esi_level = %d,\n", req->restarts, req->esi_level); if (req->sp != NULL) pan_sess(vsb, req->sp); if (req->wrk != NULL) pan_wrk(vsb, req->wrk); pan_ws(vsb, req->ws); if (VALID_OBJ(req->htc, HTTP_CONN_MAGIC)) pan_htc(vsb, req->htc); pan_http(vsb, "req", req->http); if (req->resp->ws != NULL) pan_http(vsb, "resp", req->resp); VCL_Panic(vsb, req->vcl); if (req->objcore != NULL) { pan_objcore(vsb, "REQ", req->objcore); if (req->objcore->busyobj != NULL) pan_busyobj(vsb, req->objcore->busyobj); } VSB_printf(vsb, "flags = {\n"); VSB_indent(vsb, 2); #define REQ_FLAG(l, r, w, d) if(req->l) VSB_printf(vsb, #l ",\n"); #include "tbl/req_flags.h" #undef REQ_FLAG VSB_indent(vsb, -2); VSB_printf(vsb, "},\n"); VSB_indent(vsb, -2); VSB_printf(vsb, "},\n"); }
static void pan_sess(const struct sess *sp) { const char *stp, *hand; VSB_printf(vsp, "sp = %p {\n", sp); VSB_printf(vsp, " fd = %d, id = %d, xid = %u,\n", sp->fd, sp->vsl_id & VSL_IDENTMASK, sp->xid); VSB_printf(vsp, " client = %s %s,\n", sp->addr ? sp->addr : "?.?.?.?", sp->port ? sp->port : "?"); switch (sp->step) { #define STEP(l, u) case STP_##u: stp = "STP_" #u; break; #include "tbl/steps.h" #undef STEP default: stp = NULL; } hand = VCC_Return_Name(sp->handling); if (stp != NULL) VSB_printf(vsp, " step = %s,\n", stp); else VSB_printf(vsp, " step = 0x%x,\n", sp->step); if (hand != NULL) VSB_printf(vsp, " handling = %s,\n", hand); else VSB_printf(vsp, " handling = 0x%x,\n", sp->handling); if (sp->err_code) VSB_printf(vsp, " err_code = %d, err_reason = %s,\n", sp->err_code, sp->err_reason ? sp->err_reason : "(null)"); VSB_printf(vsp, " restarts = %d, esi_level = %d\n", sp->restarts, sp->esi_level); VSB_printf(vsp, " flags = "); if (sp->wrk->do_stream) VSB_printf(vsp, " do_stream"); if (sp->wrk->do_gzip) VSB_printf(vsp, " do_gzip"); if (sp->wrk->do_gunzip) VSB_printf(vsp, " do_gunzip"); if (sp->wrk->do_esi) VSB_printf(vsp, " do_esi"); if (sp->wrk->do_close) VSB_printf(vsp, " do_close"); if (sp->wrk->is_gzip) VSB_printf(vsp, " is_gzip"); if (sp->wrk->is_gunzip) VSB_printf(vsp, " is_gunzip"); VSB_printf(vsp, "\n"); VSB_printf(vsp, " bodystatus = %d\n", sp->wrk->body_status); pan_ws(sp->ws, 2); pan_http("req", sp->http, 2); if (sp->wrk != NULL) pan_wrk(sp->wrk); if (VALID_OBJ(sp->vcl, VCL_CONF_MAGIC)) pan_vcl(sp->vcl); if (VALID_OBJ(sp->wrk->vbc, BACKEND_MAGIC)) pan_vbc(sp->wrk->vbc); if (VALID_OBJ(sp->obj, OBJECT_MAGIC)) pan_object(sp->obj); VSB_printf(vsp, "},\n"); }