annotate orange/serialization/archives/XMLArchive.d @ 6:ae24aae69a3b

Added logo
author Jacob Carlborg <doob@me.com>
date Fri, 25 Jun 2010 20:27:27 +0200
parents f7b078e85f7f
children 99c52d46822a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
1 /**
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
2 * Copyright: Copyright (c) 2010 Jacob Carlborg.
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
3 * Authors: Jacob Carlborg
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
4 * Version: Initial created: Jan 26, 2010
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
5 * License: $(LINK2 http://www.boost.org/LICENSE_1_0.txt, Boost Software License 1.0)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
6 */
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
7 module orange.serialization.archives.XMLArchive;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
8
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
9 version (Tango)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
10 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
11 import tango.text.xml.DocPrinter;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
12 import tango.text.xml.Document;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
13 import tango.util.Convert : to;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
14 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
15
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
16 import orange.serialization.archives._;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
17 import orange.util._;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
18
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
19 private enum ArchiveMode
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
20 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
21 archiving,
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
22 unarchiving
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
23 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
24
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
25 class XMLArchive (U = char) : Archive!(U)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
26 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
27 static assert (isChar!(U), format!(`The given type "`, U, `" is not a valid type. Valid types are: "char", "wchar" and "dchar".`));
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
28
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
29 private struct Tags
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
30 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
31 static const DataType structTag = "struct";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
32 static const DataType dataTag = "data";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
33 static const DataType archiveTag = "archive";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
34 static const DataType arrayTag = "array";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
35 static const DataType objectTag = "object";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
36 static const DataType baseTag = "base";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
37 static const DataType stringTag = "string";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
38 static const DataType referenceTag = "reference";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
39 static const DataType pointerTag = "pointer";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
40 static const DataType associativeArrayTag = "associativeArray";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
41 static const DataType typedefTag = "typedef";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
42 static const DataType nullTag = "null";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
43 static const DataType enumTag = "enum";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
44 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
45
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
46 private struct Attributes
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
47 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
48 static const DataType typeAttribute = "type";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
49 static const DataType versionAttribute = "version";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
50 static const DataType lengthAttribute = "length";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
51 static const DataType keyAttribute = "key";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
52 static const DataType runtimeTypeAttribute = "runtimeType";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
53 static const DataType idAttribute = "id";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
54 static const DataType keyTypeAttribute = "keyType";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
55 static const DataType valueTypeAttribute = "valueType";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
56 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
57
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
58 private
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
59 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
60 DataType archiveType = "org.dsource.orange.xml";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
61 DataType archiveVersion = "0.1";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
62
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
63 Document!(U) doc;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
64 doc.Node lastElement;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
65 DocPrinter!(U) printer;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
66 doc.Node lastElementSaved;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
67
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
68 bool hasBegunArchiving;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
69 bool hasBegunUnarchiving;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
70
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
71 DataType[void*] archivedReferences;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
72 void*[DataType] unarchivedReferences;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
73
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
74 size_t idCounter;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
75 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
76
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
77 this ()
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
78 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
79 doc = new Document!(U);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
80 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
81
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
82 public void beginArchiving ()
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
83 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
84 if (!hasBegunArchiving)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
85 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
86 doc.header;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
87 lastElement = doc.tree.element(null, Tags.archiveTag)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
88 .attribute(null, Attributes.typeAttribute, archiveType)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
89 .attribute(null, Attributes.versionAttribute, archiveVersion);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
90 lastElement = lastElement.element(null, Tags.dataTag);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
91
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
92 hasBegunArchiving = true;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
93 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
94 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
95
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
96 public void beginUnarchiving (DataType data)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
97 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
98 if (!hasBegunUnarchiving)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
99 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
100 doc.parse(data);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
101 hasBegunUnarchiving = true;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
102
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
103 auto set = doc.query[Tags.archiveTag][Tags.dataTag];
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
104
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
105 if (set.nodes.length == 1)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
106 lastElement = set.nodes[0];
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
107
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
108 else if (set.nodes.length == 0)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
109 throw new ArchiveException(errorMessage!(ArchiveMode.unarchiving) ~ `The "` ~ to!(string)(Tags.dataTag) ~ `" tag could not be found.`, __FILE__, __LINE__);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
110
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
111 else
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
112 throw new ArchiveException(errorMessage!(ArchiveMode.unarchiving) ~ `There were more than one "` ~ to!(string)(Tags.dataTag) ~ `" tag.`, __FILE__, __LINE__);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
113 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
114 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
115
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
116 public DataType data ()
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
117 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
118 if (!printer)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
119 printer = new DocPrinter!(U);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
120
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
121 return printer.print(doc);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
122 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
123
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
124 public void reset ()
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
125 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
126 hasBegunArchiving = false;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
127 hasBegunUnarchiving = false;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
128 idCounter = 0;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
129 doc.reset;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
130 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
131
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
132 private void begin ()
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
133 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
134 lastElementSaved = lastElement;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
135 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
136
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
137 private void end ()
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
138 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
139 lastElement = lastElementSaved;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
140 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
141
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
142 public void archive (T) (T value, DataType key, void delegate () dg = null)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
143 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
144 if (!hasBegunArchiving)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
145 beginArchiving();
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
146
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
147 restore(lastElement) in {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
148 bool callDelegate = true;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
149
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
150 static if (isTypeDef!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
151 archiveTypeDef(value, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
152
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
153 else static if (isObject!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
154 archiveObject(value, key, callDelegate);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
155
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
156 else static if (isStruct!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
157 archiveStruct(value, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
158
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
159 else static if (isString!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
160 archiveString(value, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
161
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
162 else static if (isArray!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
163 archiveArray(value, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
164
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
165 else static if (isAssociativeArray!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
166 archiveAssociativeArray(value, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
167
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
168 else static if (isPrimitive!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
169 archivePrimitive(value, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
170
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
171 else static if (isPointer!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
172 archivePointer(value, key, callDelegate);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
173
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
174 else static if (isEnum!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
175 archiveEnum(value, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
176
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
177 else
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
178 static assert(false, format!(`The type "`, T, `" cannot be archived.`));
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
179
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
180 if (callDelegate && dg)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
181 dg();
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
182 };
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
183 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
184
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
185 private void archiveObject (T) (T value, DataType key, ref bool callDelegate)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
186 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
187 if (!value)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
188 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
189 lastElement.element(null, Tags.nullTag)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
190 .attribute(null, Attributes.typeAttribute, toDataType(T.stringof))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
191 .attribute(null, Attributes.keyAttribute, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
192 callDelegate = false;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
193 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
194
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
195 else if (auto reference = getArchivedReference(value))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
196 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
197 archiveReference(key, reference);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
198 callDelegate = false;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
199 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
200
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
201 else
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
202 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
203 DataType id = nextId;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
204
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
205 lastElement = lastElement.element(null, Tags.objectTag)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
206 .attribute(null, Attributes.runtimeTypeAttribute, toDataType(value.classinfo.name))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
207 .attribute(null, Attributes.typeAttribute, toDataType(T.stringof))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
208 .attribute(null, Attributes.keyAttribute, key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
209 .attribute(null, Attributes.idAttribute, id);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
210
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
211 addArchivedReference(value, id);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
212 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
213 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
214
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
215 private void archiveStruct (T) (T value, DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
216 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
217 lastElement = lastElement.element(null, Tags.structTag)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
218 .attribute(null, Attributes.typeAttribute, toDataType(T.stringof))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
219 .attribute(null, Attributes.keyAttribute, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
220 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
221
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
222 private void archiveString (T) (T value, DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
223 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
224 lastElement.element(null, Tags.stringTag, toDataType(value))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
225 .attribute(null, Attributes.typeAttribute, toDataType(BaseTypeOfArray!(T).stringof))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
226 .attribute(null, Attributes.keyAttribute, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
227 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
228
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
229 private void archiveArray (T) (T value, DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
230 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
231 lastElement = lastElement.element(null, Tags.arrayTag)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
232 .attribute(null, Attributes.typeAttribute, toDataType(BaseTypeOfArray!(T).stringof))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
233 .attribute(null, Attributes.lengthAttribute, toDataType(value.length))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
234 .attribute(null, Attributes.keyAttribute, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
235 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
236
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
237 private void archiveAssociativeArray (T) (T value, DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
238 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
239 lastElement = lastElement.element(null, Tags.associativeArrayTag)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
240 .attribute(null, Attributes.keyTypeAttribute, toDataType(KeyTypeOfAssociativeArray!(T).stringof))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
241 .attribute(null, Attributes.valueTypeAttribute, toDataType(ValueTypeOfAssociativeArray!(T).stringof))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
242 .attribute(null, Attributes.lengthAttribute, toDataType(value.length))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
243 .attribute(null, Attributes.keyAttribute, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
244 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
245
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
246 private void archivePointer (T) (T value, DataType key, ref bool callDelegate)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
247 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
248 if (auto reference = getArchivedReference(value))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
249 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
250 archiveReference(key, reference);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
251 callDelegate = false;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
252 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
253
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
254 else
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
255 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
256 DataType id = nextId;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
257
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
258 lastElement = lastElement.element(null, Tags.pointerTag)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
259 .attribute(null, Attributes.keyAttribute, key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
260 .attribute(null, Attributes.idAttribute, id);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
261
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
262 addArchivedReference(value, id);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
263 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
264 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
265
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
266 private void archiveEnum (T) (T value, DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
267 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
268 lastElement.element(null, Tags.enumTag, toDataType(value))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
269 .attribute(null, Attributes.typeAttribute, toDataType(T.stringof))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
270 .attribute(null, Attributes.keyAttribute, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
271 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
272
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
273 private void archivePrimitive (T) (T value, DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
274 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
275 lastElement.element(null, toDataType(T.stringof), toDataType(value))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
276 .attribute(null, Attributes.keyAttribute, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
277 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
278
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
279 private void archiveTypeDef (T) (T value, DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
280 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
281 lastElement = lastElement.element(null, Tags.typedefTag)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
282 .attribute(null, Attributes.typeAttribute, toDataType(BaseTypeOfTypeDef!(T).stringof));
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
283 .attribute(null, Attributes.key, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
284 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
285
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
286 public T unarchive (T) (DataType key, T delegate (T) dg = null)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
287 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
288 if (!hasBegunUnarchiving)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
289 beginUnarchiving(data);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
290
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
291 return restore!(T)(lastElement) in {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
292 T value;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
293
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
294 bool callDelegate = true;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
295
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
296 static if (isTypeDef!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
297 value = unarchiveTypeDef!(T)(key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
298
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
299 else static if (isObject!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
300 value = unarchiveObject!(T)(key, callDelegate);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
301
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
302 else static if (isStruct!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
303 value = unarchiveStruct!(T)(key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
304
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
305 else static if (isString!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
306 value = unarchiveString!(T)(key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
307
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
308 else static if (isArray!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
309 value = unarchiveArray!(T)(key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
310
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
311 else static if (isAssociativeArray!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
312 value = unarchiveAssociativeArray!(T)(key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
313
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
314 else static if (isPrimitive!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
315 value = unarchivePrimitive!(T)(key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
316
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
317 else static if (isPointer!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
318 value = unarchivePointer!(T)(key, callDelegate);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
319
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
320 else static if (isEnum!(T))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
321 value = unarchiveEnum!(T)(key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
322
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
323 else
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
324 static assert(false, format!(`The type "`, T, `" cannot be unarchived.`));
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
325
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
326 if (callDelegate && dg)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
327 return dg(value);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
328
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
329 return value;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
330 };
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
331 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
332
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
333 private T unarchiveObject (T) (DataType key, ref bool callDelegate)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
334 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
335 DataType id = unarchiveReference(key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
336
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
337 if (auto reference = getUnarchivedReference!(T)(id))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
338 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
339 callDelegate = false;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
340 return *reference;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
341 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
342
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
343 auto tmp = getElement(Tags.objectTag, key, Attributes.keyAttribute, false);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
344
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
345 if (!tmp)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
346 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
347 lastElement = getElement(Tags.nullTag, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
348 callDelegate = false;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
349 return null;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
350 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
351
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
352 lastElement = tmp;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
353
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
354 auto runtimeType = getValueOfAttribute(Attributes.runtimeTypeAttribute);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
355 auto name = fromDataType!(string)(runtimeType);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
356 id = getValueOfAttribute(Attributes.idAttribute);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
357
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
358 T result;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
359
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
360 static if (is(typeof(T._ctor)))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
361 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
362 ParameterTupleOf!(typeof(T._ctor)) params;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
363 result = factory!(T, typeof(params))(name, params);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
364 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
365
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
366 else
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
367 result = factory!(T)(name);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
368
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
369 addUnarchivedReference(result, id);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
370
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
371 return result;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
372 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
373
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
374 private T unarchiveStruct (T) (DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
375 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
376 lastElement = getElement(Tags.structTag, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
377
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
378 return T.init;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
379 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
380
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
381 private T unarchiveString (T) (DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
382 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
383 return fromDataType!(T)(getElement(Tags.stringTag, key).value);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
384 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
385
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
386 private T unarchiveArray (T) (DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
387 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
388 T value;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
389
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
390 lastElement = getElement(Tags.arrayTag, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
391 auto length = getValueOfAttribute(Attributes.lengthAttribute);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
392 value.length = fromDataType!(size_t)(length);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
393
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
394 return value;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
395 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
396
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
397 private T unarchiveAssociativeArray (T) (DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
398 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
399 lastElement = getElement(Tags.associativeArrayTag, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
400
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
401 return T.init;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
402 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
403
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
404 private T unarchivePointer (T) (DataType key, ref bool callDelegate)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
405 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
406 DataType id = unarchiveReference(key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
407
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
408 if (auto reference = getUnarchivedReference!(T)(id))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
409 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
410 callDelegate = false;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
411 return *reference;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
412 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
413
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
414 lastElement = getElement(Tags.pointerTag, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
415 id = getValueOfAttribute(Attributes.idAttribute);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
416
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
417 T result = new BaseTypeOfPointer!(T);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
418
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
419 addUnarchivedReference(result, id);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
420
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
421 return result;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
422 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
423
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
424 private T unarchiveEnum (T) (DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
425 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
426 return fromDataType!(T)(getElement(Tags.enumTag, key).value);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
427 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
428
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
429 private T unarchivePrimitive (T) (DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
430 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
431 return fromDataType!(T)(getElement(toDataType(T.stringof), key).value);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
432 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
433
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
434 private T unarchiveTypeDef (T) (DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
435 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
436 lastElement = getElement(Tags.typedefTag, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
437
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
438 return T.init;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
439 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
440
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
441 public AssociativeArrayVisitor!(KeyTypeOfAssociativeArray!(T), ValueTypeOfAssociativeArray!(T)) unarchiveAssociativeArrayVisitor (T) ()
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
442 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
443 return AssociativeArrayVisitor!(KeyTypeOfAssociativeArray!(T), ValueTypeOfAssociativeArray!(T))(this);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
444 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
445
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
446 public void archiveBaseClass (T : Object) (DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
447 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
448 lastElement = lastElement.element(null, Tags.baseTag)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
449 .attribute(null, Attributes.typeAttribute, toDataType(T.stringof))
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
450 .attribute(null, Attributes.keyAttribute, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
451 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
452
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
453 public void unarchiveBaseClass (T : Object) (DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
454 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
455 lastElement = getElement(Tags.baseTag, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
456 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
457
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
458 template errorMessage (ArchiveMode mode = ArchiveMode.archiving)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
459 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
460 static if (mode == ArchiveMode.archiving)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
461 const errorMessage = "Could not continue archiving due to unrecognized data format: ";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
462
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
463 else static if (mode == ArchiveMode.unarchiving)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
464 const errorMessage = "Could not continue unarchiving due to unrecognized data format: ";
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
465 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
466
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
467 private doc.Node getElement (DataType tag, DataType key, DataType attribute = Attributes.keyAttribute, bool throwOnError = true)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
468 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
469 auto set = lastElement.query[tag].attribute((doc.Node node) {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
470 if (node.name == attribute && node.value == key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
471 return true;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
472
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
473 return false;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
474 });
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
475
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
476 if (set.nodes.length == 1)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
477 return set.nodes[0].parent;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
478
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
479 else
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
480 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
481 if (throwOnError)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
482 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
483 if (set.nodes.length == 0)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
484 throw new ArchiveException(`Could not find an element "` ~ to!(string)(tag) ~ `" with the attribute "` ~ to!(string)(Attributes.keyAttribute) ~ `" with the value "` ~ to!(string)(key) ~ `".`, __FILE__, __LINE__);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
485
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
486 else
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
487 throw new ArchiveException(`Could not unarchive the value with the key "` ~ to!(string)(key) ~ `" due to malformed data.`, __FILE__, __LINE__);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
488 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
489
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
490 return null;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
491 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
492 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
493
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
494 private DataType getValueOfAttribute (DataType attribute)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
495 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
496 auto set = lastElement.query.attribute(attribute);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
497
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
498 if (set.nodes.length == 1)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
499 return set.nodes[0].value;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
500
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
501 else if (set.nodes.length == 0)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
502 throw new ArchiveException(`Could not find the attribute "` ~ to!(string)(attribute) ~ `".`, __FILE__, __LINE__);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
503
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
504 else
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
505 throw new ArchiveException(`Could not unarchive the value of the attribute "` ~ to!(string)(attribute) ~ `" due to malformed data.`, __FILE__, __LINE__);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
506 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
507
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
508 private void addArchivedReference (T) (T value, DataType id)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
509 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
510 static assert(isReference!(T), format!(`The given type "`, T, `" is not a reference type, i.e. object or pointer.`));
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
511
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
512 archivedReferences[cast(void*) value] = id;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
513 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
514
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
515 private void addUnarchivedReference (T) (T value, DataType id)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
516 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
517 static assert(isReference!(T), format!(`The given type "`, T, `" is not a reference type, i.e. object or pointer.`));
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
518
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
519 unarchivedReferences[id] = cast(void*) value;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
520 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
521
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
522 private DataType getArchivedReference (T) (T value)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
523 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
524 if (auto tmp = cast(void*) value in archivedReferences)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
525 return *tmp;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
526
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
527 return null;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
528 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
529
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
530 private T* getUnarchivedReference (T) (DataType id)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
531 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
532 if (auto reference = id in unarchivedReferences)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
533 return cast(T*) reference;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
534
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
535 return null;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
536 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
537
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
538 private DataType nextId ()
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
539 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
540 return toDataType(idCounter++);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
541 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
542
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
543 private void archiveReference (DataType key, DataType id)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
544 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
545 lastElement.element(null, Tags.referenceTag, id)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
546 .attribute(null, Attributes.keyAttribute, key);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
547 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
548
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
549 private DataType unarchiveReference (DataType key)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
550 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
551 auto element = getElement(Tags.referenceTag, key, Attributes.keyAttribute, false);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
552
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
553 if (element)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
554 return element.value;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
555
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
556 return cast(DataType) null;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
557 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
558
6
ae24aae69a3b Added logo
Jacob Carlborg <doob@me.com>
parents: 0
diff changeset
559 private struct AssociativeArrayVisitor (Key, Value)
0
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
560 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
561 private XMLArchive archive;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
562
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
563 static AssociativeArrayVisitor opCall (XMLArchive archive)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
564 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
565 AssociativeArrayVisitor aai;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
566 aai.archive = archive;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
567
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
568 return aai;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
569 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
570
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
571 int opApply(int delegate(ref Key, ref Value) dg)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
572 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
573 int result;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
574
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
575 foreach (node ; archive.lastElement.children)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
576 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
577 restore(archive.lastElement) in {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
578 archive.lastElement = node;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
579
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
580 if (node.attributes.exist)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
581 {
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
582 Key key = to!(Key)(archive.getValueOfAttribute(Attributes.keyAttribute));
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
583 Value value = to!(Value)(node.value);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
584
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
585 result = dg(key, value);
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
586 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
587 };
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
588
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
589 if (result)
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
590 break;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
591 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
592
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
593 return result;
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
594 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
595 }
f7b078e85f7f First commit
Jacob Carlborg <doob@me.com>
parents:
diff changeset
596 }