Mercurial > projects > orange
view orange/serialization/archives/Archive.d @ 46:d6fbd0b3586e
Issue 8: Wrong results for array of arrays. (Temporary fix).
author | Jacob Carlborg <doob@me.com> |
---|---|
date | Tue, 09 Aug 2011 11:38:50 +0200 |
parents | 1fef41162966 |
children | 9c9bbef6bf5e |
line wrap: on
line source
/** * Copyright: Copyright (c) 2010 Jacob Carlborg. * Authors: Jacob Carlborg * Version: Initial created: Feb 6, 2010 * License: $(LINK2 http://www.boost.org/LICENSE_1_0.txt, Boost Software License 1.0) */ module orange.serialization.archives.Archive; version (Tango) import tango.util.Convert; else { import std.array; import std.conv; import std.utf; alias ConvException ConversionException; } import orange.serialization.archives.ArchiveException; import orange.core.string; private enum ArchiveMode { archiving, unarchiving } struct Array { version (Tango) void* ptr; else mixin(`const(void)* ptr;`); size_t length; size_t elementSize; bool isSliceOf (Array b) { return ptr >= b.ptr && ptr + length * elementSize <= b.ptr + b.length * b.elementSize; } } struct Slice { size_t length; size_t offset; size_t id = size_t.max; } interface Archive { alias size_t Id; version (Tango) alias void[] UntypedData; else mixin ("alias immutable(void)[] UntypedData;"); void beginArchiving (); void beginUnarchiving (UntypedData data); UntypedData untypedData (); void reset (); void archiveArray (Array array, string type, string key, Id id, void delegate () dg); void archiveAssociativeArray (string keyType, string valueType, size_t length, string key, Id id, void delegate () dg); void archiveAssociativeArrayKey (string key, void delegate () dg); void archiveAssociativeArrayValue (string key, void delegate () dg); void archiveEnum (bool value, string baseType, string key, Id id); void archiveEnum (byte value, string baseType, string key, Id id); void archiveEnum (char value, string baseType, string key, Id id); void archiveEnum (dchar value, string baseType, string key, Id id); void archiveEnum (int value, string baseType, string key, Id id); void archiveEnum (long value, string baseType, string key, Id id); void archiveEnum (short value, string baseType, string key, Id id); void archiveEnum (ubyte value, string baseType, string key, Id id); void archiveEnum (uint value, string baseType, string key, Id id); void archiveEnum (ulong value, string baseType, string key, Id id); void archiveEnum (ushort value, string baseType, string key, Id id); void archiveEnum (wchar value, string baseType, string key, Id id); void archiveBaseClass (string type, string key, Id id); void archiveNull (string type, string key); void archiveObject (string runtimeType, string type, string key, Id id, void delegate () dg); void archivePointer (string key, Id id, void delegate () dg); void archivePointer (Id pointeeId, string key, Id id); void archiveReference (string key, Id id); void archiveSlice (Slice slice, Id sliceId, Id arrayId); void archiveStruct (string type, string key, Id id, void delegate () dg); void archiveTypedef (string type, string key, Id id, void delegate () dg); void archive (string value, string key, Id id); void archive (wstring value, string key, Id id); void archive (dstring value, string key, Id id); void archive (bool value, string key, Id id); void archive (byte value, string key, Id id); //void archive (cdouble value, string key, Id id); // currently not supported by to!() //void archive (cent value, string key, Id id); //void archive (cfloat value, string key, Id id); // currently not supported by to!() void archive (char value, string key, Id id); // currently not implemented but a reserved keyword //void archive (creal value, string key, Id id); // currently not supported by to!() void archive (dchar value, string key, Id id); void archive (double value, string key, Id id); void archive (float value, string key, Id id); //void archive (idouble value, string key, Id id); // currently not supported by to!() //void archive (ifloat value, string key, Id id); // currently not supported by to!() void archive (int value, string key, Id id); //void archive (ireal value, string key, Id id); // currently not supported by to!() void archive (long value, string key, Id id); void archive (real value, string key, Id id); void archive (short value, string key, Id id); void archive (ubyte value, string key, Id id); //void archive (ucent value, string key, Id id); // currently not implemented but a reserved keyword void archive (uint value, string key, Id id); void archive (ulong value, string key, Id id); void archive (ushort value, string key, Id id); void archive (wchar value, string key, Id id); Id unarchiveArray (string key, void delegate (size_t length) dg); void unarchiveArray (Id id, void delegate (size_t length) dg); Id unarchiveAssociativeArray (string type, void delegate (size_t length) dg); void unarchiveAssociativeArrayKey (string key, void delegate () dg); void unarchiveAssociativeArrayValue (string key, void delegate () dg); bool unarchiveEnumBool (string key); byte unarchiveEnumByte (string key); char unarchiveEnumChar (string key); dchar unarchiveEnumDchar (string key); int unarchiveEnumInt (string key); long unarchiveEnumLong (string key); short unarchiveEnumShort (string key); ubyte unarchiveEnumUbyte (string key); uint unarchiveEnumUint (string key); ulong unarchiveEnumUlong (string key); ushort unarchiveEnumUshort (string key); wchar unarchiveEnumWchar (string key); // Object unarchiveBaseClass (string key); // void unarchiveNull (string key); void unarchiveObject (string key, out Id id, out Object result, void delegate () dg); Id unarchivePointer (string key, void delegate () dg); Id unarchiveReference (string key); Slice unarchiveSlice (string key); void unarchiveStruct (string key, void delegate () dg); void unarchiveTypedef (string key, void delegate () dg); string unarchiveString (string key, out Id id); wstring unarchiveWstring (string key, out Id id); dstring unarchiveDstring (string key, out Id id); string unarchiveString (Id id); wstring unarchiveWstring (Id id); dstring unarchiveDstring (Id id); bool unarchiveBool (string key); byte unarchiveByte (string key); //cdouble unarchiveCdouble (string key); // currently not supported by to!() //cent unarchiveCent (string key); // currently not implemented but a reserved keyword //cfloat unarchiveCfloat (string key); // currently not supported by to!() char unarchiveChar (string key); // currently not implemented but a reserved keyword //creal unarchiveCreal (string key); // currently not supported by to!() dchar unarchiveDchar (string key); double unarchiveDouble (string key); float unarchiveFloat (string key); //idouble unarchiveIdouble (string key); // currently not supported by to!() //ifloat unarchiveIfloat (string key); // currently not supported by to!()*/ int unarchiveInt (string key); //int unarchiveInt (Id id); //ireal unarchiveIreal (string key); // currently not supported by to!() long unarchiveLong (string key); real unarchiveReal (string key); short unarchiveShort (string key); ubyte unarchiveUbyte (string key); //ucent unarchiveCcent (string key); // currently not implemented but a reserved keyword uint unarchiveUint (string key); ulong unarchiveUlong (string key); ushort unarchiveUshort (string key); wchar unarchiveWchar (string key); void postProcessArray (Id id); void postProcessPointer (Id id); } abstract class Base (U) : Archive { version (Tango) alias U[] Data; else mixin ("alias immutable(U)[] Data;"); alias void delegate (ArchiveException exception, string[] data) ErrorCallback; protected ErrorCallback errorCallback; protected this (ErrorCallback errorCallback) { this.errorCallback = errorCallback; } protected Data toData (T) (T value) { try return to!(Data)(value); catch (ConversionException e) throw new ArchiveException(e); } protected T fromData (T) (Data value) { try { static if (is(T == wchar)) return toWchar(value); else return to!(T)(value); } catch (ConversionException e) throw new ArchiveException(e); } protected Id toId (Data value) { return fromData!(Id)(value); } protected bool isSliceOf (T, U = T) (T[] a, U[] b) { void* aPtr = a.ptr; void* bPtr = b.ptr; return aPtr >= bPtr && aPtr + a.length * T.sizeof <= bPtr + b.length * U.sizeof; } private wchar toWchar (Data value) { version (Tango) return to!(wchar)(value); else { auto c = value.front; if (codeLength!(wchar)(c) > 2) throw new ConversionException("Could not convert `" ~ to!(string)(value) ~ "` of type " ~ Data.stringof ~ " to type wchar."); return cast(wchar) c; } } }