/* * Convenience routine for freeing strings. */ void strfree(char *s) { mdb_free(s, strlen(s) + 1); }
/* * Print the core fields in an NCA node_t. With the "-r" argument, * provide additional information about the request; with "-v", * provide more verbose output. */ static int nca_node(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { unsigned int i, max; unsigned int verbose = FALSE; unsigned int request = FALSE; const int NODE_REFDELT = NCA_ADDR_WIDTH + 4 + 2; boolean_t arm; node_t node; char *buf; namedmem_t hdr[4]; if (!(flags & DCMD_ADDRSPEC)) return (DCMD_USAGE); if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, TRUE, &verbose, 'r', MDB_OPT_SETBITS, TRUE, &request, 'p', NULL) != argc) return (DCMD_USAGE); if (!DCMD_HDRSPEC(flags) && verbose) mdb_printf("\n\n"); if (DCMD_HDRSPEC(flags) || verbose) { mdb_printf("%<u>%-*s %4s %5s %8s %-*s %-*s %-*s %-*s%</u>\n", NCA_ADDR_WIDTH, "ADDR", "REF", "STATE", "DATASIZE", NCA_ADDR_WIDTH, "SQUEUE", NCA_ADDR_WIDTH, "REQUEST", NCA_ADDR_WIDTH, "PLRUN", NCA_ADDR_WIDTH, "VLRUN"); } if (mdb_vread(&node, sizeof (node_t), addr) == -1) { mdb_warn("cannot read node_t at %p", addr); return (DCMD_ERR); } mdb_printf("%0*p %4d %05x %8d %0*p %0*p %0*p %0*p\n", NCA_ADDR_WIDTH, addr, node.cnt, node.ref, node.datasz, NCA_ADDR_WIDTH, node.sqp, NCA_ADDR_WIDTH, node.req, NCA_ADDR_WIDTH, node.plrunn, NCA_ADDR_WIDTH, node.vlrunn); if (verbose) { arm = B_TRUE; for (i = 0; node_refs[i].bit_name != NULL; i++) { if ((node.ref & (1 << i)) == 0) continue; if (arm) { mdb_printf("%*s|\n", NODE_REFDELT, ""); mdb_printf("%*s+--> ", NODE_REFDELT, ""); arm = B_FALSE; } else mdb_printf("%*s ", NODE_REFDELT, ""); mdb_printf("%-12s %s\n", node_refs[i].bit_name, node_refs[i].bit_descr); } } if (!request || node.req == NULL) return (DCMD_OK); mdb_inc_indent(4); mdb_printf("\n%u byte HTTP/%u.%u %s request (%u bytes in header, " "%u in content)\n", node.reqsz, node.version >> 16, node.version & 0xff, method2name(node.method), node.reqhdrsz, node.reqcontl); hdr[0].nm_name = "URI"; hdr[0].nm_addr = (uintptr_t)node.path; hdr[0].nm_len = node.pathsz; hdr[1].nm_name = "Accept"; hdr[1].nm_addr = (uintptr_t)node.reqaccept; hdr[1].nm_len = node.reqacceptsz; hdr[2].nm_name = "Accept-Language"; hdr[2].nm_addr = (uintptr_t)node.reqacceptl; hdr[2].nm_len = node.reqacceptlsz; hdr[3].nm_name = "Host"; hdr[3].nm_addr = (uintptr_t)node.reqhost; hdr[3].nm_len = node.reqhostsz; /* * A little optimization. Allocate all of the necessary memory here, * so we don't have to allocate on each loop iteration. */ max = node.reqhdrsz; for (i = 0; i < 4; i++) max = MAX(max, hdr[i].nm_len); max++; buf = mdb_alloc(max, UM_SLEEP); mdb_inc_indent(4); for (i = 0; i < sizeof (hdr) / sizeof (hdr[0]); i++) { if (hdr[i].nm_len <= 0) continue; if (mdb_vread(buf, hdr[i].nm_len, hdr[i].nm_addr) == -1) { mdb_warn("cannot read \"%s\" header field at %p", hdr[i].nm_name, hdr[i].nm_addr); continue; } buf[hdr[i].nm_len] = '\0'; mdb_printf("%s: ", hdr[i].nm_name); mdb_inc_indent(4); mdb_printf("%s\n", buf); mdb_dec_indent(4); } if (node.reqhdrsz > 0 && verbose) { if (mdb_vread(buf, node.reqhdrsz, (uintptr_t)node.reqhdr) == -1) mdb_warn("cannot read header at %p", node.reqhdr); else { mdb_printf("Raw header: "); mdb_inc_indent(4); printbuf((uint8_t *)buf, node.reqhdrsz); mdb_dec_indent(4); } } mdb_dec_indent(4); mdb_dec_indent(4); mdb_free(buf, max); return (DCMD_OK); }
void mdb_free_align(void *ptr, size_t nbytes) { mdb_free(ptr, nbytes); }
/* * Print the core fields in an nca_io2_t. With the "-v" argument, * provide more verbose output. With the "-p" argument, print payload * information. */ static int nca_io2(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { unsigned int i; unsigned int payload_len; uint64_t payload_output_max = 0; unsigned int verbose = FALSE; const int IO2_ADVDELT = NCA_ADDR_WIDTH + 1; boolean_t arm; nca_io2_t io2; uint8_t *buf; namedmem_t area[3]; if (!(flags & DCMD_ADDRSPEC)) return (DCMD_USAGE); if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, TRUE, &verbose, 'p', MDB_OPT_UINT64, &payload_output_max, NULL) != argc) return (DCMD_USAGE); if (!DCMD_HDRSPEC(flags) && verbose) mdb_printf("\n\n"); if (DCMD_HDRSPEC(flags) || verbose) { mdb_printf("%<u>%-*s %2s %4s %8s %*s %8s %16s %-12s%</u>\n", NCA_ADDR_WIDTH, "ADDR", "AV", "MFNP", "TID", NCA_ADDR_WIDTH, "CONN", "CONN_TAG", "CACHE_TAG", "OPERATION"); } if (mdb_vread(&io2, sizeof (nca_io2_t), addr) == -1) { mdb_warn("cannot read nca_io2_t at %p", addr); return (DCMD_ERR); } if (io2.version != NCA_HTTP_VERSION2) mdb_warn("nca_io2_t at %p has incorrect version `%u'\n", addr, io2.version); mdb_printf("%0*p %02x %c%c%c%c %08x %0*llx %08x %016llx %s\n", NCA_ADDR_WIDTH, addr, io2.advisory, YESNO(io2.more), YESNO(io2.first), YESNO(io2.nocache), YESNO(io2.preempt), (uint32_t)io2.tid, NCA_ADDR_WIDTH, io2.cid, io2.tag, io2.ctag, op2name(io2.op)); if (verbose) { arm = B_TRUE; for (i = 0; advise_types[i].bit_name != NULL; i++) { if ((io2.advisory & (1 << i)) == 0) continue; if (arm) { mdb_printf("%*s|\n", IO2_ADVDELT, ""); mdb_printf("%*s+--> ", IO2_ADVDELT, ""); arm = B_FALSE; } else mdb_printf("%*s ", IO2_ADVDELT, ""); mdb_printf("%-15s %s\n", advise_types[i].bit_name, advise_types[i].bit_descr); } } payload_len = io2.data_len + io2.direct_len + io2.trailer_len; if (payload_output_max == 0 || payload_len == 0) return (DCMD_OK); mdb_inc_indent(4); mdb_printf("\n%u byte payload consists of:\n", payload_len); mdb_inc_indent(4); buf = mdb_alloc(payload_output_max, UM_SLEEP); area[0].nm_name = "data"; area[0].nm_addr = addr + io2.data; area[0].nm_len = io2.data_len; area[1].nm_name = direct2name(io2.direct_type); area[1].nm_addr = addr + io2.direct; area[1].nm_len = io2.direct_len; area[2].nm_name = "trailer"; area[2].nm_addr = addr + io2.trailer; area[2].nm_len = io2.trailer_len; for (i = 0; i < sizeof (area) / sizeof (area[0]); i++) { if (area[i].nm_len <= 0) continue; mdb_printf("%d byte %s area at %p (", area[i].nm_len, area[i].nm_name, area[i].nm_addr); if (area[i].nm_len > payload_output_max) { mdb_printf("first"); area[i].nm_len = (int)payload_output_max; } else mdb_printf("all"); mdb_printf(" %u bytes follow):\n", area[i].nm_len); if (mdb_vread(buf, area[i].nm_len, area[i].nm_addr) == -1) mdb_warn("cannot read %s area at %p", area[i].nm_name, area[i].nm_addr); else { mdb_inc_indent(4); printbuf(buf, area[i].nm_len); mdb_dec_indent(4); } } mdb_dec_indent(4); mdb_dec_indent(4); mdb_free(buf, payload_output_max); return (DCMD_OK); }
void ttrace_walk_fini(mdb_walk_state_t *wsp) { mdb_free(wsp->walk_data, sizeof (trap_trace_ctl_t) * NCPU); }