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