1 7a4ee46d 2003-11-23 devnull #include "stdinc.h"
 2 7a4ee46d 2003-11-23 devnull #include "dat.h"
 3 7a4ee46d 2003-11-23 devnull #include "fns.h"
 4 7a4ee46d 2003-11-23 devnull #include "httpd.h"
 5 7a4ee46d 2003-11-23 devnull #include "xml.h"
 6 7a4ee46d 2003-11-23 devnull 
 7 7a4ee46d 2003-11-23 devnull void xmlarena(Hio *hout, Arena *s, char *tag, int indent){
 8 7a4ee46d 2003-11-23 devnull 	xmlindent(hout, indent);
 9 7a4ee46d 2003-11-23 devnull 	hprint(hout, "<%s", tag);
10 7a4ee46d 2003-11-23 devnull 	xmlaname(hout, s->name, "name");
11 7a4ee46d 2003-11-23 devnull 	xmlu32int(hout, s->version, "version");
12 7a4ee46d 2003-11-23 devnull 	xmlaname(hout, s->part->name, "partition");
13 7a4ee46d 2003-11-23 devnull 	xmlu32int(hout, s->blocksize, "blocksize");
14 7a4ee46d 2003-11-23 devnull 	xmlu64int(hout, s->base, "start");
15 7a4ee46d 2003-11-23 devnull 	xmlu64int(hout, s->base+2*s->blocksize, "stop");
16 7a4ee46d 2003-11-23 devnull 	xmlu32int(hout, s->ctime, "created");
17 7a4ee46d 2003-11-23 devnull 	xmlu32int(hout, s->wtime, "modified");
18 7a4ee46d 2003-11-23 devnull 	xmlsealed(hout, s->sealed, "sealed");
19 7a4ee46d 2003-11-23 devnull 	xmlscore(hout, s->score, "score");
20 7a4ee46d 2003-11-23 devnull 	xmlu32int(hout, s->clumps, "clumps");
21 7a4ee46d 2003-11-23 devnull 	xmlu32int(hout, s->cclumps, "compressedclumps");
22 7a4ee46d 2003-11-23 devnull 	xmlu64int(hout, s->uncsize, "data");
23 7a4ee46d 2003-11-23 devnull 	xmlu64int(hout, s->used - s->clumps * ClumpSize, "compresseddata");
24 7a4ee46d 2003-11-23 devnull 	xmlu64int(hout, s->used + s->clumps * ClumpInfoSize, "storage");
25 7a4ee46d 2003-11-23 devnull 	hprint(hout, "/>\n");
26 7a4ee46d 2003-11-23 devnull }
27 7a4ee46d 2003-11-23 devnull 
28 7a4ee46d 2003-11-23 devnull void xmlindex(Hio *hout, Index *s, char *tag, int indent){
29 7a4ee46d 2003-11-23 devnull 	int i;
30 7a4ee46d 2003-11-23 devnull 	xmlindent(hout, indent);
31 7a4ee46d 2003-11-23 devnull 	hprint(hout, "<%s", tag);
32 7a4ee46d 2003-11-23 devnull 	xmlaname(hout, s->name, "name");
33 7a4ee46d 2003-11-23 devnull 	xmlu32int(hout, s->version, "version");
34 7a4ee46d 2003-11-23 devnull 	xmlu32int(hout, s->blocksize, "blocksize");
35 7a4ee46d 2003-11-23 devnull 	xmlu32int(hout, s->tabsize, "tabsize");
36 7a4ee46d 2003-11-23 devnull 	xmlu32int(hout, s->buckets, "buckets");
37 7a4ee46d 2003-11-23 devnull 	xmlu32int(hout, s->div, "buckdiv");
38 7a4ee46d 2003-11-23 devnull 	hprint(hout, ">\n");
39 7a4ee46d 2003-11-23 devnull 	xmlindent(hout, indent + 1);
40 7a4ee46d 2003-11-23 devnull 	hprint(hout, "<sects>\n");
41 7a4ee46d 2003-11-23 devnull 	for(i = 0; i < s->nsects; i++)
42 7a4ee46d 2003-11-23 devnull 		xmlamap(hout, &s->smap[i], "sect", indent + 2);
43 7a4ee46d 2003-11-23 devnull 	xmlindent(hout, indent + 1);
44 7a4ee46d 2003-11-23 devnull 	hprint(hout, "</sects>\n");
45 7a4ee46d 2003-11-23 devnull 	xmlindent(hout, indent + 1);
46 7a4ee46d 2003-11-23 devnull 	hprint(hout, "<amaps>\n");
47 7a4ee46d 2003-11-23 devnull 	for(i = 0; i < s->narenas; i++)
48 7a4ee46d 2003-11-23 devnull 		xmlamap(hout, &s->amap[i], "amap", indent + 2);
49 7a4ee46d 2003-11-23 devnull 	xmlindent(hout, indent + 1);
50 7a4ee46d 2003-11-23 devnull 	hprint(hout, "</amaps>\n");
51 7a4ee46d 2003-11-23 devnull 	xmlindent(hout, indent + 1);
52 7a4ee46d 2003-11-23 devnull 	hprint(hout, "<arenas>\n");
53 7a4ee46d 2003-11-23 devnull 	for(i = 0; i < s->narenas; i++)
54 7a4ee46d 2003-11-23 devnull 		xmlarena(hout, s->arenas[i], "arena", indent + 2);
55 7a4ee46d 2003-11-23 devnull 	xmlindent(hout, indent + 1);
56 7a4ee46d 2003-11-23 devnull 	hprint(hout, "</arenas>\n");
57 7a4ee46d 2003-11-23 devnull 	xmlindent(hout, indent);
58 7a4ee46d 2003-11-23 devnull 	hprint(hout, "</%s>\n", tag);
59 7a4ee46d 2003-11-23 devnull }
60 7a4ee46d 2003-11-23 devnull 
61 7a4ee46d 2003-11-23 devnull void xmlamap(Hio *hout, AMap *s, char *tag, int indent){
62 7a4ee46d 2003-11-23 devnull 	xmlindent(hout, indent);
63 7a4ee46d 2003-11-23 devnull 	hprint(hout, "<%s", tag);
64 7a4ee46d 2003-11-23 devnull 	xmlaname(hout, s->name, "name");
65 7a4ee46d 2003-11-23 devnull 	xmlu64int(hout, s->start, "start");
66 7a4ee46d 2003-11-23 devnull 	xmlu64int(hout, s->stop, "stop");
67 7a4ee46d 2003-11-23 devnull 	hprint(hout, "/>\n");
68 7a4ee46d 2003-11-23 devnull }
69 7a4ee46d 2003-11-23 devnull