diff options
Diffstat (limited to 'sys/contrib/ia64/libuwx/src/uwx_trace.c')
| -rw-r--r-- | sys/contrib/ia64/libuwx/src/uwx_trace.c | 138 |
1 files changed, 138 insertions, 0 deletions
diff --git a/sys/contrib/ia64/libuwx/src/uwx_trace.c b/sys/contrib/ia64/libuwx/src/uwx_trace.c new file mode 100644 index 0000000..695192a --- /dev/null +++ b/sys/contrib/ia64/libuwx/src/uwx_trace.c @@ -0,0 +1,138 @@ +/* + * Copyright (c) 2002,2003 Hewlett-Packard Company + * + * Permission is hereby granted, free of charge, to any person obtaining a + * copy of this software and associated documentation files (the "Software"), + * to deal in the Software without restriction, including without limitation + * the rights to use, copy, modify, merge, publish, distribute, sublicense, + * and/or sell copies of the Software, and to permit persons to whom the + * Software is furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included + * in all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL + * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING + * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER + * DEALINGS IN THE SOFTWARE. + */ + +#include "uwx_env.h" +#include "uwx_uinfo.h" +#include "uwx_scoreboard.h" +#include "uwx_trace.h" + +void uwx_trace_init(struct uwx_env *env) +{ + char *tstr; + + tstr = getenv("UWX_TRACE"); + if (tstr != NULL) { + while (*tstr != '\0') { + switch (*tstr) { + case 'i': env->trace |= UWX_TRACE_UINFO; break; + case 't': env->trace |= UWX_TRACE_UTABLE; break; + case 'b': env->trace |= UWX_TRACE_SB; break; + case 'r': env->trace |= UWX_TRACE_RSTATE; break; + case 's': env->trace |= UWX_TRACE_STEP; break; + case 'c': env->trace |= UWX_TRACE_CONTEXT; break; + case 'C': env->trace |= UWX_TRACE_COPYIN; break; + case 'L': env->trace |= UWX_TRACE_LOOKUPIP; break; + case '?': +#ifdef _KERNEL + printf("UWX_TRACE flag `%c' unknown.\n", *tstr); +#else + fprintf(stderr, "UWX_TRACE flags:\n"); + fprintf(stderr, " i: unwind info\n"); + fprintf(stderr, " t: unwind table searching\n"); + fprintf(stderr, " b: scoreboard management\n"); + fprintf(stderr, " r: register state vector\n"); + fprintf(stderr, " s: step\n"); + fprintf(stderr, " c: context\n"); + fprintf(stderr, " C: copyin callback\n"); + fprintf(stderr, " L: lookup ip callback\n"); + exit(1); +#endif + } + tstr++; + } + } +} + +char *uwx_sb_rnames[] = { + "RP", "PSP", "PFS", + "PREDS", "UNAT", "PRIUNAT", "RNAT", "LC", "FPSR", + "GR4", "GR5", "GR6", "GR7", + "BR1", "BR2", "BR3", "BR4", "BR5", + "FR2", "FR3", "FR4", "FR5", + "FR16", "FR17", "FR18", "FR19", + "FR20", "FR21", "FR22", "FR23", + "FR24", "FR25", "FR26", "FR27", + "FR28", "FR29", "FR30", "FR31", +}; + +void uwx_dump_rstate(int regid, uint64_t rstate) +{ + int reg; + + if (rstate == UWX_DISP_NONE) + return; + printf(" %-7s", uwx_sb_rnames[regid]); + switch (UWX_GET_DISP_CODE(rstate)) { + case UWX_DISP_NONE: + printf(" unchanged\n"); + break; + case UWX_DISP_SPPLUS(0): + printf(" SP + %d\n", (int)rstate & ~0x07); + break; + case UWX_DISP_SPREL(0): + printf(" [SP + %d]\n", (int)rstate & ~0x07); + break; + case UWX_DISP_PSPREL(0): + printf(" [PSP + 16 - %d]\n", (int)rstate & ~0x07); + break; + case UWX_DISP_REG(0): + reg = UWX_GET_DISP_REGID(rstate); + if (reg == UWX_REG_PFS) + printf(" [AR.PFS]\n"); + else if (reg == UWX_REG_UNAT) + printf(" [AR.UNAT]\n"); + else if (reg >= UWX_REG_GR(0) && reg < UWX_REG_GR(128)) + printf(" [GR%d]\n", reg - UWX_REG_GR(0)); + else if (reg >= UWX_REG_FR(0) && reg < UWX_REG_FR(128)) + printf(" [FR%d]\n", reg - UWX_REG_FR(0)); + else if (reg >= UWX_REG_BR(0) && reg < UWX_REG_BR(8)) + printf(" [BR%d]\n", reg - UWX_REG_BR(0)); + else + printf(" [reg %d]\n", reg); + break; + default: + printf(" <%08llx>\n", (unsigned long long)rstate); + break; + } +} + +void uwx_dump_scoreboard( + struct uwx_scoreboard *scoreboard, + int nsbreg, + struct uwx_rhdr *rhdr, + int cur_slot, + int ip_slot) +{ + int i; + + if (rhdr->is_prologue) + printf(" Prologue region (start = %d, length = %d)\n", + (int)cur_slot, (int)rhdr->rlen); + else + printf(" Body region (start = %d, length = %d, ecount = %d)\n", + cur_slot, (int)rhdr->rlen, rhdr->ecount); + if (ip_slot < rhdr->rlen) + printf(" IP is in this region (offset = %d)\n", ip_slot); + for (i = 0; i < nsbreg; i++) + uwx_dump_rstate(i, scoreboard->rstate[i]); +} + |
