(xdump,xdchr,xdhdr,xdhdr1): Add meta data dump to xdump.
This commit is contained in:
parent
71908018ec
commit
f9ac7a1f8c
1 changed files with 28 additions and 12 deletions
|
@ -198,16 +198,16 @@ xdfldnam(struct castr ca[])
|
||||||
|
|
||||||
/* Dump first line of header for dump NAME. */
|
/* Dump first line of header for dump NAME. */
|
||||||
static void
|
static void
|
||||||
xdhdr1(char *name)
|
xdhdr1(char *name, int meta)
|
||||||
{
|
{
|
||||||
pr("XDUMP %s %ld\n", name, (long)time(NULL));
|
pr("XDUMP %s%s %ld\n", meta ? "meta " : "", name, (long)time(NULL));
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Dump header for dump NAME with fields described by CA[]. */
|
/* Dump header for dump NAME with fields described by CA[]. */
|
||||||
static void
|
static void
|
||||||
xdhdr(char *name, struct castr ca[])
|
xdhdr(char *name, struct castr ca[], int meta)
|
||||||
{
|
{
|
||||||
xdhdr1(name);
|
xdhdr1(name, meta);
|
||||||
xdfldnam(ca);
|
xdfldnam(ca);
|
||||||
pr("\n");
|
pr("\n");
|
||||||
}
|
}
|
||||||
|
@ -239,7 +239,7 @@ xditem(int type, char *arg)
|
||||||
if (!snxtitem(&ni, type, arg))
|
if (!snxtitem(&ni, type, arg))
|
||||||
return RET_SYN;
|
return RET_SYN;
|
||||||
|
|
||||||
xdhdr(ef_nameof(type), ca);
|
xdhdr(ef_nameof(type), ca, 0);
|
||||||
|
|
||||||
n = 0;
|
n = 0;
|
||||||
while (nxtitem(&ni, buf)) {
|
while (nxtitem(&ni, buf)) {
|
||||||
|
@ -261,18 +261,29 @@ xditem(int type, char *arg)
|
||||||
* FIXME Merge into xditem() when nxtitem() is ready for it.
|
* FIXME Merge into xditem() when nxtitem() is ready for it.
|
||||||
*/
|
*/
|
||||||
static int
|
static int
|
||||||
xdchr(int chridx)
|
xdchr(int chridx, int meta)
|
||||||
{
|
{
|
||||||
struct empfile *ef = &empfile[chridx];
|
struct empfile *ef = &empfile[chridx];
|
||||||
struct castr *ca = ef->cadef;
|
struct castr *ca = ef->cadef;
|
||||||
char *p;
|
char *p;
|
||||||
struct valstr val;
|
struct valstr val;
|
||||||
int n;
|
int n;
|
||||||
|
int size;
|
||||||
|
|
||||||
xdhdr(ef->name, ca);
|
if (meta) {
|
||||||
|
p = (char *)ca;
|
||||||
|
size = sizeof(struct castr);
|
||||||
|
ca = mdchr_ca;
|
||||||
|
} else {
|
||||||
|
p = ef->cache;
|
||||||
|
size = ef->size;
|
||||||
|
ca = ef->cadef;
|
||||||
|
}
|
||||||
|
|
||||||
|
xdhdr(ef->name, ca, meta);
|
||||||
|
|
||||||
n = 0;
|
n = 0;
|
||||||
for (p = ef->cache; ; p += ef->size) {
|
for (;; p += size) {
|
||||||
val.val_type = ca[0].ca_type;
|
val.val_type = ca[0].ca_type;
|
||||||
val.val_cat = NSC_OFF;
|
val.val_cat = NSC_OFF;
|
||||||
val.val_as.sym.off = ca[0].ca_off;
|
val.val_as.sym.off = ca[0].ca_off;
|
||||||
|
@ -297,7 +308,7 @@ xdopt(void)
|
||||||
int i;
|
int i;
|
||||||
char *sep;
|
char *sep;
|
||||||
|
|
||||||
xdhdr1("options");
|
xdhdr1("options" , 0);
|
||||||
|
|
||||||
sep = "";
|
sep = "";
|
||||||
for (i = 0; Options[i].opt_key; ++i) {
|
for (i = 0; Options[i].opt_key; ++i) {
|
||||||
|
@ -323,7 +334,7 @@ xdver(void)
|
||||||
char *sep;
|
char *sep;
|
||||||
struct valstr val;
|
struct valstr val;
|
||||||
|
|
||||||
xdhdr1("version");
|
xdhdr1("version", 0);
|
||||||
|
|
||||||
sep = "";
|
sep = "";
|
||||||
for (kp = configkeys; kp->km_key; ++kp) {
|
for (kp = configkeys; kp->km_key; ++kp) {
|
||||||
|
@ -353,6 +364,7 @@ xdump(void)
|
||||||
char *p;
|
char *p;
|
||||||
char buf[1024];
|
char buf[1024];
|
||||||
int type;
|
int type;
|
||||||
|
int meta = 0;
|
||||||
|
|
||||||
if (!opt_GUINEA_PIGS) {
|
if (!opt_GUINEA_PIGS) {
|
||||||
pr("You are not a guinea pig!\n");
|
pr("You are not a guinea pig!\n");
|
||||||
|
@ -360,12 +372,16 @@ xdump(void)
|
||||||
}
|
}
|
||||||
|
|
||||||
p = getstarg(player->argp[1], "What? ", buf);
|
p = getstarg(player->argp[1], "What? ", buf);
|
||||||
|
if (p && strcmp(p, "meta") == 0) {
|
||||||
|
meta = 1;
|
||||||
|
p = getstarg(player->argp[2], "What? ", buf);
|
||||||
|
}
|
||||||
if (!p)
|
if (!p)
|
||||||
return RET_SYN;
|
return RET_SYN;
|
||||||
|
|
||||||
type = my_ef_byname(p);
|
type = my_ef_byname(p);
|
||||||
if (type >= EF_MAX)
|
if (type >= EF_MAX || (meta && type >=0))
|
||||||
return xdchr(type);
|
return xdchr(type, meta);
|
||||||
else if (type >= 0) {
|
else if (type >= 0) {
|
||||||
return xditem(type, player->argp[2]);
|
return xditem(type, player->argp[2]);
|
||||||
} else if (!strncmp(p, "opt", strlen(p))) {
|
} else if (!strncmp(p, "opt", strlen(p))) {
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue