static void r_print_format_word(const RPrint* p, int endian, int mustset, const char* setval, ut64 seeki, ut8* buf, int i, int size) { ut64 addr; if (endian) addr = (*(buf+i))<<8 | (*(buf+i+1)); else addr = (*(buf+i+1))<<8 | (*(buf+i)); if (mustset) { realprintf ("wv2 %s @ 0x%08"PFMT64x"\n", setval, seeki); } else { p->printf ("0x%08"PFMT64x" = ", seeki); if (size==-1) p->printf ("0x%04x", addr); else { p->printf ("[ 0x%04x", addr); size--; i+=2; while (size--) { if (endian) addr = (*(buf+i))<<8 | (*(buf+i+1)); else addr = (*(buf+i+1))<<8 | (*(buf+i)); p->printf (", 0x%04x", addr); i+=2; } p->printf (" ]"); } } }
static int r_print_format_10bytes(const RPrint* p, int mustset, const char* setval, ut64 seeki, ut64 addr, ut8* buf) { ut8 buffer[255]; int j; if (mustset) { realprintf ("?e pf B not yet implemented\n"); } else { if (!p->iob.read_at) { printf ("(cannot read memory)\n"); return -1; } else p->iob.read_at (p->iob.io, (ut64)addr, buffer, 248); p->printf ("0x%08"PFMT64x" = ", seeki); for (j=0; j<10; j++) p->printf ("%02x ", buf[j]); p->printf (" ... ("); for (j=0; j<10; j++) if (IS_PRINTABLE (buf[j])) p->printf ("%c", buf[j]); else p->printf ("."); p->printf (")"); } return 0; }
static void r_print_format_hexflag(const RPrint* p, int endian, int mustset, const char* setval, ut64 seeki, ut8* buf, int i, int size) { ut64 addr; updateAddr (buf, i, endian, &addr, NULL); if (mustset) { realprintf ("wv4 %s @ 0x%08"PFMT64x"\n", setval, seeki); } else { ut32 addr32 = (ut32)addr; p->printf ("0x%08"PFMT64x" = ", seeki); if (size==-1) p->printf ("0x%08"PFMT64x, addr32); else { p->printf ("[ 0x%08"PFMT64x, addr32); size--; i+=4; while (size--) { updateAddr (buf, i, endian, &addr, NULL); addr32 = (ut32)addr; p->printf (", 0x%08"PFMT64x, addr32); i+=4; } p->printf (" ]"); } } }
static int r_print_format_hexpairs(const RPrint* p, int endian, int mustset, const char* setval, ut64 seeki, ut8* buf, int size) { int j; if (mustset) { realprintf ("?e pf X not yet implemented\n"); } else { p->printf ("0x%08"PFMT64x" = ", seeki); size = (size < 1) ? 1 : size; for (j=0; j<size; j++) p->printf ("%02x ", (ut8)buf[j]); p->printf (" ... ("); for (j=0; j<size; j++) if (IS_PRINTABLE (buf[j])) p->printf ("%c", buf[j]); else p->printf ("."); p->printf (")"); } return size; }
static void r_print_format_char(const RPrint* p, int endian, int mustset, const char* setval, ut64 seeki, ut8* buf, int i, int size) { if (mustset) { realprintf ("\"w %s\" @ 0x%08"PFMT64x"\n", setval, seeki); } else { p->printf ("0x%08"PFMT64x" = ", seeki); if (size==-1) p->printf ("%d ; %d ; '%c'", buf[i], buf[i], IS_PRINTABLE (buf[i])?buf[i]:0); else { p->printf ("[ %d ; %d ; '%c'", buf[i], buf[i], IS_PRINTABLE (buf[i])?buf[i]:0); size--; i++; while (size--) { p->printf (", %d ; %d ; '%c'", buf[i], buf[i], IS_PRINTABLE (buf[i])?buf[i]:0); i++; } p->printf (" ]"); } } }
static void r_print_format_quadword(const RPrint* p, int endian, int mustset, const char* setval, ut64 seeki, ut8* buf, int i, int size) { ut64 addr64; updateAddr (buf, i, endian, NULL, &addr64); if (mustset) { realprintf ("wv8 %s @ 0x%08"PFMT64x"\n", setval, seeki); } else { p->printf ("0x%08"PFMT64x" = ", seeki); p->printf ("(qword) "); if (size==-1) p->printf ("0x%016"PFMT64x, addr64); else { p->printf ("[ 0x%016"PFMT64x, addr64); size--; i+=8; while (size--) { updateAddr (buf, i, endian, NULL, &addr64); p->printf (", 0x%016"PFMT64x, addr64); i+=8; } p->printf (" ]"); } } }
/* TODO: needs refactoring */ R_API int r_print_format(RPrint *p, ut64 seek, const ut8* b, int len, const char *fmt, int elem, const char *setval) { int nargs, i, j, nexti, idx, times, otimes, endian, isptr = 0; int (*realprintf)(const char *str, ...); int (*oldprintf)(const char *str, ...); const char *argend = fmt+strlen (fmt); ut64 addr = 0, addr64 = 0, seeki = 0;; char *args = NULL, *bracket, tmp, last = 0; const char *arg = fmt; int viewflags = 0; char namefmt[8]; ut8 *buf, buffer[256]; nexti = nargs = endian = i = j = 0; if (len<1) return 0; buf = malloc (len); if (!buf) return 0; memcpy (buf, b, len); endian = p->big_endian; oldprintf = NULL; realprintf = p->printf; while (*arg && iswhitechar (*arg)) arg++; /* get times */ otimes = times = atoi (arg); if (times > 0) while ((*arg>='0'&&*arg<='9')) arg++; bracket = strchr (arg,'{'); if (bracket) { char *end = strchr (arg,'}'); if (end == NULL) { eprintf ("No end bracket. Try pm {ecx}b @ esi\n"); goto beach; } *end='\0'; times = r_num_math (NULL, bracket+1); arg = end + 1; } if (*arg=='\0') { print_format_help (p); goto beach; } /* get args */ args = strchr (arg, ' '); if (args) { int l=0, maxl = 0; argend = args; args = strdup (args+1); nargs = r_str_word_set0 (args+1); if (nargs == 0) R_FREE (args); for (i=0; i<nargs; i++) { int len = strlen (r_str_word_get0 (args+1, i)); if (len>maxl) maxl = len; } l++; snprintf (namefmt, sizeof (namefmt), "%%%ds : ", maxl); } /* go format */ i = 0; if (!times) otimes = times = 1; for (; times; times--) { // repeat N times const char * orig = arg; if (otimes>1) p->printf ("0x%08"PFMT64x" [%d] {\n", seek+i, otimes-times); idx = 0; arg = orig; for (idx=0; i<len && arg<argend && *arg; idx++, arg++) { seeki = seek+i; addr = 0LL; if (endian) addr = (*(buf+i))<<24 | (*(buf+i+1))<<16 | *(buf+i+2)<<8 | *(buf+i+3); else addr = (*(buf+i+3))<<24 | (*(buf+i+2))<<16 | *(buf+i+1)<<8 | *(buf+i); if (endian) addr64 = (ut64)(*(buf+i))<<56 | (ut64)(*(buf+i+1))<<48 | (ut64)*(buf+i+2)<<40 | (ut64)(*(buf+i+3))<<32 | (*(buf+i+4))<<24 | (*(buf+i+5))<<16 | *(buf+i+6)<<8 | *(buf+i+7); else addr64 = ((ut64)(*(buf+i+7)))<<56 | (ut64)(*(buf+i+6))<<48 | (ut64)(*(buf+i+5))<<40 | (ut64)(*(buf+i+4))<<32 | (*(buf+i+3))<<24 | (*(buf+i+2))<<16 | *(buf+i+1)<<8 | *(buf+i); tmp = *arg; feed_me_again: switch (isptr) { case 1: nexti = i + (p->bits/8); i = 0; tmp = *arg; memset (buf, '\0', len); p->printf ("(*0x%"PFMT64x") ", addr); if (p->iob.read_at) { p->iob.read_at (p->iob.io, (ut64)addr, buf, len-4); } else { eprintf ("(cannot read memory)\n"); break; } isptr = 2; break; case 2: // restore state after pointer seek i = nexti; seeki = seek+i; memcpy (buf, b, len); isptr = 0; arg--; idx--; continue; } if (tmp == 0 && last != '*') break; /* skip chars */ switch (tmp) { case '*': isptr = 1; if (i<=0 || !arg[1]) break; arg++; tmp = *arg; //last; // arg--; // idx--; goto feed_me_again; case '+': idx--; viewflags = !viewflags; continue; case 'e': // tmp swap endian idx--; endian ^= 1; continue; case ':': // skip char i+=4; idx-=4; continue; case '.': // skip char i++; idx--; continue; case 'p': tmp = (p->bits==64)?'q': 'x'; //tmp = (sizeof (void*)==8)? 'q': 'x'; break; case '?': // help print_format_help (p); idx--; i = len; // exit continue; } if (otimes>1) p->printf (" "); #define MUSTSET (setval && elem == idx) #define MUSTSEE (elem == -1 || elem == idx) if (MUSTSEE) { if (!(MUSTSET)) { if (oldprintf) p->printf = oldprintf; if (idx<nargs) p->printf (namefmt, r_str_word_get0 (args, idx)); } } else { if (!oldprintf) oldprintf = p->printf; p->printf = nullprintf; } /* cmt chars */ switch (tmp) { #if 0 case 'n': // enable newline j ^= 1; continue; #endif #if 0 case 't': /* unix timestamp */ D cons_printf("0x%08x = ", config.seek+i); { /* dirty hack */ int oldfmt = last_print_format; ut64 old = config.seek; radare_seek(config.seek+i, SEEK_SET); radare_read(0); print_data(config.seek+i, "8", buf+i, 4, FMT_TIME_UNIX); last_print_format=oldfmt; radare_seek(old, SEEK_SET); } break; #endif case 'e': if (MUSTSET) { realprintf ("?e pf e not yet supported\n"); } else { double doub; memcpy (&doub, buf+i, sizeof (double)); p->printf ("0x%08"PFMT64x" = (double) ", seeki); p->printf ("%e", doub); i += 8; } break; case 'q': if (MUSTSET) { realprintf ("wv8 %s @ 0x%08"PFMT64x"\n", setval, seeki); } else { p->printf ("0x%08"PFMT64x" = ", seeki); p->printf ("(qword) "); p->printf ("0x%08"PFMT64x" ", addr64); } i += 8; break; case 'b': if (MUSTSET) { realprintf ("w %s @ 0x%08"PFMT64x"\n", setval, seeki); } else { p->printf ("0x%08"PFMT64x" = ", seeki); p->printf ("%d ; 0x%02x ; '%c' ", buf[i], buf[i], IS_PRINTABLE (buf[i])?buf[i]:0); } i++; break; case 'c': if (MUSTSET) { realprintf ("?e pf c not yet implemented\n"); } else { p->printf ("0x%08"PFMT64x" = ", seeki); p->printf ("%d ; %d ; '%c' ", buf[i], (char)buf[i], IS_PRINTABLE (buf[i])?buf[i]:0); } i++; break; case 'B': if (MUSTSET) { realprintf ("?e pf B not yet implemented\n"); } else { memset (buffer, '\0', 255); if (!p->iob.read_at) { printf ("(cannot read memory)\n"); break; } else p->iob.read_at (p->iob.io, (ut64)addr, buffer, 248); p->printf ("0x%08"PFMT64x" = ", seeki); for (j=0; j<10; j++) p->printf ("%02x ", buf[j]); p->printf (" ... ("); for (j=0; j<10; j++) if (IS_PRINTABLE (buf[j])) p->printf ("%c", buf[j]); p->printf (")"); } i += 4; break; case 'f': if (MUSTSET) { realprintf ("wv4 %s @ 0x%08"PFMT64x"\n", setval, seeki); } else { p->printf ("0x%08"PFMT64x" = %f", seeki, (float)(addr)); } i += 4; break; case 'i': case 'd': // TODO: support unsigned int? if (MUSTSET) { realprintf ("wv4 %s @ 0x%08"PFMT64x"\n", setval, seeki); } else { p->printf ("0x%08"PFMT64x" = ", seeki); p->printf ("%"PFMT64d" ", addr); } i += 4; break; case 'D': if (p->disasm && p->user) i += p->disasm (p->user, seeki); break; case 'x': if (MUSTSET) { realprintf ("wv4 %s @ 0x%08"PFMT64x"\n", setval, seeki); } else { ut32 addr32 = (ut32)addr; p->printf ("0x%08"PFMT64x" = ", seeki); p->printf ("0x%08"PFMT64x" ", addr32); } //if (string_flag_offset(buf, (ut64)addr32, -1)) // p->printf("; %s", buf); i += 4; break; case 'w': case '1': // word (16 bits) if (MUSTSET) { realprintf ("wv2 %s @ 0x%08"PFMT64x"\n", setval, seeki); } else { p->printf ("0x%08x = ", seeki); if (endian) addr = (*(buf+i))<<8 | (*(buf+i+1)); else addr = (*(buf+i+1))<<8 | (*(buf+i)); p->printf ("0x%04x ", addr); } i+=2; break; case 'z': // zero terminated string if (MUSTSET) { realprintf ("?e pf z not yet supported\n"); } else { p->printf ("0x%08"PFMT64x" = ", seeki); for (; buf[i]&&i<len; i++) { if (IS_PRINTABLE (buf[i])) p->printf ("%c", buf[i]); else p->printf ("."); } } break; case 'Z': // zero terminated wide string p->printf ("0x%08"PFMT64x" = ", seeki); for (; buf[i] && i<len; i+=2) { if (IS_PRINTABLE (buf[i])) p->printf ("%c", buf[i]); else p->printf ("."); } p->printf (" "); break; case 's': p->printf ("0x%08"PFMT64x" = ", seeki); memset (buffer, '\0', 255); if (p->iob.read_at) { p->iob.read_at (p->iob.io, (ut64)addr, buffer, sizeof (buffer)-8); } else { printf ("(cannot read memory)\n"); break; } p->printf ("0x%08"PFMT64x" -> 0x%08"PFMT64x" ", seeki, addr); p->printf ("%s ", buffer); i += 4; break; case 'S': p->printf ("0x%08"PFMT64x" = ", seeki); memset (buffer, '\0', 255); if (p->iob.read_at) { p->iob.read_at (p->iob.io, addr64, buffer, sizeof (buffer)-8); } else { printf ("(cannot read memory)\n"); break; } p->printf ("0x%08"PFMT64x" -> 0x%08"PFMT64x" ", seeki, addr); p->printf ("%s ", buffer); i += 8; break; default: /* ignore unknown chars */ break; } if (viewflags && p->offname) { const char *s = p->offname (p->user, seeki); if (s) p->printf ("@(%s)", s); s = p->offname (p->user, addr); if (s) p->printf ("*(%s)", s); } if (tmp != 'D') p->printf ("\n"); last = tmp; } if (otimes>1) p->printf ("}\n"); arg = orig; idx = 0; } if (oldprintf) p->printf = oldprintf; beach: free (buf); if (args) { free (args); } return i; }
R_API int r_print_format(RPrint *p, ut64 seek, const ut8* b, const int len, const char *fmt, int elem, const char *setval) { int nargs, i, j, invalid, nexti, idx, times, otimes, endian, isptr = 0; int (*oldprintf)(const char *str, ...); const char *argend = fmt+strlen (fmt); ut64 addr = 0, addr64 = 0, seeki = 0;; char *args = NULL, *bracket, tmp, last = 0; const char *arg = fmt; int viewflags = 0, flag = (elem==SEEFLAG)?1:0; char namefmt[8]; static int slide=0; ut8 *buf; nexti = nargs = i = j = 0; if (len < 1) return 0; buf = malloc (len); if (!buf) return 0; memcpy (buf, b, len); endian = p->big_endian; oldprintf = NULL; realprintf = p->printf; while (*arg && iswhitechar (*arg)) arg++; /* get times */ otimes = times = atoi (arg); if (times > 0) while ((*arg>='0'&&*arg<='9')) arg++; bracket = strchr (arg,'{'); if (bracket) { char *end = strchr (arg, '}'); if (end == NULL) { eprintf ("No end bracket. Try pm {ecx}b @ esi\n"); goto beach; } *end='\0'; times = r_num_math (NULL, bracket+1); arg = end + 1; } if (*arg=='\0' || *arg=='?') { print_format_help (p); goto beach; } /* get args */ args = strchr (arg, ' '); if (args) { int l=0, maxl = 0; argend = args; args = strdup (args+1); nargs = r_str_word_set0 (args); if (nargs == 0) R_FREE (args); for (i=0; i<nargs; i++) { const int len = strlen (r_str_word_get0 (args, i)); if (len > maxl) maxl = len; } l++; snprintf (namefmt, sizeof (namefmt), "%%%ds : ", maxl+6*slide%STRUCTPTR); } /* go format */ i = 0; if (!times) otimes = times = 1; for (; times; times--) { // repeat N times const char * orig = arg; if (otimes>1) p->printf ("0x%08"PFMT64x" [%d] {\n", seek+i, otimes-times); arg = orig; for (idx=0; i<len && arg<argend && *arg; arg++) { int size; char *name = NULL; seeki = seek+i; addr = 0LL; invalid = 0; if (arg[0] == '[') { char *end = strchr (arg,']'); if (end == NULL) { eprintf ("No end bracket.\n"); goto beach; } *end = '\0'; size = r_num_math (NULL, arg+1); arg = end + 1; *end = ']'; } else { size = -1; } updateAddr (buf, i, endian, &addr, &addr64); tmp = *arg; if (otimes>1) p->printf (" "); #define MUSTSET (setval && elem == idx) #define MUSTSEE (elem == -1 || elem == idx) if (MUSTSEE && !flag) { if (!(MUSTSET)) { if (oldprintf) p->printf = oldprintf; if (idx<nargs && tmp != 'e' && isptr == 0) { p->printf (namefmt, r_str_word_get0 (args, idx)); idx++; } } } else { if (!oldprintf) oldprintf = p->printf; p->printf = nullprintf; } feed_me_again: switch (isptr) { case 1: { nexti = i + (p->bits/8); i = 0; if(tmp == '?' )seeki = addr; memset (buf, '\0', len); p->printf ("(*0x%"PFMT64x") ", addr); if (addr == 0) isptr = NULLPTR; else isptr = PTRBACK; if (/*addr<(b+len) && addr>=b && */p->iob.read_at) { /* The test was here to avoid segfault in the next line, but len make it doesnt work... */ p->iob.read_at (p->iob.io, (ut64)addr, buf, len-4); updateAddr (buf, i, endian, &addr, &addr64); } else { eprintf ("(SEGFAULT: cannot read memory at 0x%08"PFMT64x", Block: %s, blocksize: 0x%x)\n", addr, b, len); p->printf("\n"); goto beach; } } break; case 2: // restore state after pointer seek i = nexti; seeki = seek+i; memcpy (buf, b, len); isptr = NOPTR; arg--; continue; } if (tmp == 0 && last != '*') break; /* skip chars */ switch (tmp) { case '*': // next char is a pointer isptr = PTRSEEK; arg++; tmp = *arg; //last; goto feed_me_again; case '+': // toggle view flags viewflags = !viewflags; continue; case 'e': // tmp swap endian endian ^= 1; continue; case ':': // skip 4 bytes if (size == -1) i+=4; else while (size--) i+=4; continue; case '.': // skip 1 byte if (size == -1) i++; else while (size--) i++; continue; case 'p': // pointer reference tmp = (p->bits == 64)? 'q': 'x'; //tmp = (sizeof (void*)==8)? 'q': 'x'; break; } if (flag && isptr != NULLPTR) { if (tmp == '?') { char *n = strdup (r_str_word_get0 (args, idx)+1); char *par = strchr (n, ')'); if (par == NULL) { eprintf ("No end parenthesis for struct name"); free (n); goto beach; } else { *par = '.'; } realprintf ("f %s_", n); free(n); } else if (slide>0 && idx==0) { realprintf ("%s=0x%08"PFMT64x"\n", r_str_word_get0 (args, idx), seeki); } else realprintf ("f %s=0x%08"PFMT64x"\n", r_str_word_get0 (args, idx) , seeki); idx++; } if (isptr == NULLPTR) { p->printf ("NULL"); isptr = PTRBACK; } else /* cmt chars */ switch (tmp) { #if 0 case 't': /* unix timestamp */ D cons_printf("0x%08x = ", config.seek+i); { /* dirty hack */ int oldfmt = last_print_format; ut64 old = config.seek; radare_seek(config.seek+i, SEEK_SET); radare_read(0); print_data(config.seek+i, "8", buf+i, 4, FMT_TIME_UNIX); last_print_format=oldfmt; radare_seek(old, SEEK_SET); } break; #endif case 'e': //WTF is this? 'e' is supposed to swap endians?! if (size > 0) p->printf ("Size not yet implemented\n"); if (MUSTSET) { realprintf ("?e pf e not yet supported\n"); } else { double doub; memcpy (&doub, buf+i, sizeof (double)); p->printf ("0x%08"PFMT64x" = (double) ", seeki); p->printf ("%e", doub); i += 8; } break; case 'q': r_print_format_quadword(p, endian, MUSTSET, setval, seeki, buf, i, size); i += (size==-1) ? 8 : 8*size; break; case 'b': r_print_format_byte(p, endian, MUSTSET, setval, seeki, buf, i, size); i+= (size==-1) ? 1 : size; break; case 'c': r_print_format_char (p, endian, MUSTSET, setval, seeki, buf, i, size); i+= (size==-1) ? 1 : size; break; case 'X': size = r_print_format_hexpairs (p, endian, MUSTSET, setval, seeki, buf, size); i += size; break; case 'T': if(r_print_format_10bytes(p, MUSTSET, setval, seeki, addr, buf) == 0) i += (size==-1) ? 4 : 4*size; break; case 'f': r_print_format_float(p, endian, MUSTSET, setval, seeki, buf, i, size); i += (size==-1) ? 4 : 4*size; break; case 'i': case 'd': r_print_format_hex(p, endian, MUSTSET, setval, seeki, buf, i, size); i+= (size==-1) ? 4 : 4*size; break; case 'D': if (size>0) p->printf ("Size not yet implemented\n"); if (p->disasm && p->user) i += p->disasm (p->user, seeki); break; case 'o': r_print_format_octal (p, endian, MUSTSET, setval, seeki, buf, i, size); i+= (size==-1) ? 4 : 4*size; break; case 'x': r_print_format_hexflag(p, endian, MUSTSET, setval, seeki, buf, i, size); i+= (size==-1) ? 4 : 4*size; break; case 'w': case '1': // word (16 bits) r_print_format_word(p, endian, MUSTSET, setval, seeki, buf, i, size); i+= (size==-1) ? 2 : 2*size; break; case 'z': // zero terminated string if (MUSTSET) { int buflen = strlen ((const char *)buf); if (buflen>seeki) { buflen = strlen ((const char *)buf+seeki); } if (strlen (setval) > buflen) { eprintf ("Warning: new string is longer than previous one \n"); } realprintf ("w %s @ 0x%08"PFMT64x"\n", setval, seeki); } else { p->printf ("0x%08"PFMT64x" = ", seeki); for (; ((size || size==-1) && buf[i]) && i<len; i++) { if (IS_PRINTABLE (buf[i])) p->printf ("%c", buf[i]); else p->printf ("."); size -= (size==-1) ? 0 : 1; } } if (size == -1) i++; else while (size--) i++; break; case 'Z': // zero terminated wide string if (MUSTSET) { if ((size = strlen(setval)) > r_wstr_clen((char*)(buf+seeki))) eprintf ("Warning: new string is longer than previous one\n"); realprintf ("ww %s @ 0x%08"PFMT64x"\n", setval, seeki); } else { p->printf ("0x%08"PFMT64x" = ", seeki); for (; ((size || size==-1) && buf[i]) && i<len; i+=2) { if (IS_PRINTABLE (buf[i])) p->printf ("%c", buf[i]); else p->printf ("."); size -= (size==-1) ? 0 : 1; } } if (size == -1) i+=2; else while (size--) i+=2; break; case 's': if (r_print_format_ptrstring (p, seeki, addr64, addr, 0) == 0) i += (size==-1) ? 4 : 4*size; break; case 'S': if (r_print_format_ptrstring (p, seeki, addr64, addr, 1) == 0) i += (size==-1) ? 8 : 8*size; break; case 'B': // resolve bitfield { char *structname, *osn; char *bitfield = NULL; structname = osn = strdup (r_str_word_get0 (args, idx-1)); switch (size) { case 1: addr &= UT8_MAX; break; case 2: addr &= UT16_MAX; break; case 4: addr &= UT32_MAX; break; } if (*structname == '(') { name = strchr (structname, ')'); } else { eprintf ("Bitfield name missing (%s)\n", structname); free (structname); goto beach; } structname++; if (name) *(name++) = '\0'; else eprintf ("No ')'\n"); if (p->get_bitfield) bitfield = p->get_bitfield (p->user, structname, addr); if (bitfield && *bitfield) { p->printf (" %s (bitfield) = %s\n", name, bitfield); } else { p->printf (" %s (bitfield) = `tb %s 0x%x`\n", name, structname, addr); } i+= 4; //(isptr) ? 4 : s; free (osn); free (bitfield); } break; case 'E': // resolve enum { char *enumname, *osn; char *enumvalue = NULL; enumname = osn = strdup (r_str_word_get0 (args, idx-1)); switch (size) { case 1: addr &= UT8_MAX; break; case 2: addr &= UT16_MAX; break; case 4: addr &= UT32_MAX; break; } if (*enumname == '(') { name = strchr (enumname, ')'); } else { eprintf ("Enum name missing (%s)\n", enumname); free (enumname); goto beach; } enumname++; if (name) *(name++) = '\0'; else eprintf ("No ')'\n"); if (p->get_enumname) enumvalue = p->get_enumname (p->user, enumname, addr); if (enumvalue && *enumvalue) { p->printf (" %s (enum) = 0x%"PFMT64x" ; %s\n", name, addr, enumvalue); } else { p->printf (" %s (enum) = `te %s 0x%x`\n", name, enumname, addr); } i+= (size==-1) ? 1 : size; free (osn); free (enumvalue); } break; case '?': { int s; char *structname, *osn; structname = osn = strdup (r_str_word_get0 (args, idx-1)); if (*structname == '(') { name = strchr (structname, ')'); } else { eprintf ("Struct name missing (%s)\n", structname); free (structname); goto beach; } structname++; if (name) *(name++) = '\0'; else eprintf ("No ')'\n"); p->printf ("<struct>\n"); if (flag) slide+=STRUCTFLAG; slide += (isptr) ? STRUCTPTR : NESTEDSTRUCT; s = r_print_format_struct (p, seeki, buf+i, len, structname--, slide); i+= (isptr) ? 4 : s; slide -= (isptr) ? STRUCTPTR : NESTEDSTRUCT; if (flag) slide-=STRUCTFLAG; free (osn); break; } default: /* ignore unknown chars */ invalid = 1; break; } if (!flag && (!MUSTSEE || MUSTSET)) idx++; if (viewflags && p->offname) { const char *s = p->offname (p->user, seeki); if (s) p->printf ("@(%s)", s); s = p->offname (p->user, addr); if (s) p->printf ("*(%s)", s); } if (tmp != 'D' && !invalid && name==NULL) p->printf ("\n"); last = tmp; } if (otimes>1) p->printf ("}\n"); arg = orig; } if (oldprintf) p->printf = oldprintf; beach: free (buf); if (args) free (args); return i; }