Ejemplo n.º 1
0
        protected override void AfterLoadInternal(Stack <UniversalEditor.ObjectModel> objectModels)
        {
            base.AfterLoadInternal(objectModels);
            FileSystemObjectModel fsom = (objectModels.Pop() as FileSystemObjectModel);

            if (fsom.Title != "(c)2012 ALCEXHIM ; Cobalt Virtual Machine compiled executable")
            {
                throw new DataFormatException(UniversalEditor.Localization.StringTable.ErrorDataFormatInvalid);
            }
        }
Ejemplo n.º 2
0
        public object Convert(IList <object> values, Type targetType, object parameter, CultureInfo culture)
        {
            var type = (FileSystemObjectType)values[1];

            if (type == FileSystemObjectType.Directory)
            {
                return(string.Empty);
            }

            var sizeInBytes = values[0] as long?;

            return(FileSystemObjectModel.SizeSuffix(sizeInBytes ?? 0L, 2));
        }
Ejemplo n.º 3
0
        protected override void LoadInternal(ref ObjectModel objectModel)
        {
            FileSystemObjectModel fsom = (objectModel as FileSystemObjectModel);

            if (fsom == null)
            {
                throw new ObjectModelNotSupportedException();
            }

            Reader reader    = Accessor.Reader;
            string signature = reader.ReadFixedLengthString(8);

            if (!signature.Equals("slick!\0\0"))
            {
                Console.Error.WriteLine("expected 'slick!\\0\\0', got '{0}'", signature);
                throw new InvalidDataFormatException();
            }

            float version = reader.ReadSingle();

            if (version != 1.0f)
            {
                throw new InvalidDataFormatException();
            }

            FileNameSize = reader.ReadInt32();

            int fileCount = reader.ReadInt32();

            for (int i = 0; i < fileCount; i++)
            {
                string fileName = reader.ReadFixedLengthString(FileNameSize).TrimNull();
                int    offset   = reader.ReadInt32();
                int    length   = reader.ReadInt32();

                File file = fsom.AddFile(fileName);
                file.Properties["reader"] = reader;
                file.Properties["offset"] = offset;
                file.Properties["length"] = length;
                file.DataRequest         += File_DataRequest;
            }
        }
Ejemplo n.º 4
0
        protected override void SaveInternal(ObjectModel objectModel)
        {
            FileSystemObjectModel fsom = (objectModel as FileSystemObjectModel);

            if (fsom == null)
            {
                throw new ObjectModelNotSupportedException();
            }

            Writer writer = Accessor.Writer;

            writer.WriteFixedLengthString("slick!\0\0");
            writer.WriteSingle(1.0f);

            writer.WriteInt32(FileNameSize);

            File[] files = fsom.GetAllFiles();
            writer.WriteInt32(files.Length);

            int foffset = 20 + ((FileNameSize + 8) * files.Length);

            for (int i = 0; i < files.Length; i++)
            {
                writer.WriteFixedLengthString(files[i].Name, FileNameSize);
                writer.WriteInt32(foffset);

                int datalen = files[i].GetData().Length;
                writer.WriteInt32(datalen);

                foffset += datalen;
            }

            for (int i = 0; i < files.Length; i++)
            {
                writer.WriteBytes(files[i].GetData());
            }
        }
Ejemplo n.º 5
0
        protected override void BeforeSaveInternal(Stack<UniversalEditor.ObjectModel> objectModels)
        {
            base.BeforeSaveInternal(objectModels);

            GLVMExecutableObjectModel exe = (objectModels.Pop() as GLVMExecutableObjectModel);
            FileSystemObjectModel fsom = new FileSystemObjectModel();
            fsom.Title = "(c)2012 ALCEXHIM ; Cobalt Virtual Machine compiled executable";

            foreach (GLVMExecutableCommandSet set in exe.CommandSets)
            {
                System.IO.MemoryStream ms = new System.IO.MemoryStream();
                UniversalEditor.IO.BinaryWriter bw = new UniversalEditor.IO.BinaryWriter(ms);

                foreach (GLVMExecutableCommand cmd in set.Commands)
                {
                    if (cmd is GLVMExecutableCommandSystem)
                    {
                        bw.Write((byte)1);
                        GLVMExecutableCommandSystem syscmd = (cmd as GLVMExecutableCommandSystem);
                        switch (syscmd.FunctionName)
                        {
                            case GLVMExecutableSystemCallType.Push:
                            {
                                if (syscmd.ParameterValues.Count == 1)
                                {
                                    WriteVariantOpcode(bw, 10, syscmd.ParameterValues[0]);
                                }
                                break;
                            }
                            case GLVMExecutableSystemCallType.LoadVar:
                            {
                                if (syscmd.ParameterValues.Count == 1)
                                {
                                    bw.Write((byte)40);
                                    bw.Write((string)syscmd.ParameterValues[0]);
                                }
                                break;
                            }
                            case GLVMExecutableSystemCallType.StoreVar:
                            {
                                if (syscmd.ParameterValues.Count == 1)
                                {
                                    bw.Write((byte)41);
                                    bw.Write((string)syscmd.ParameterValues[0]);
                                }
                                break;
                            }
                            case GLVMExecutableSystemCallType.Add:
                            {
                                if (syscmd.ParameterValues.Count == 2)
                                {
                                    WriteVariantOpcode(bw, 50, syscmd.ParameterValues[0], syscmd.ParameterValues[1]);
                                }
                                break;
                            }
                        }
                    }
                    else if (cmd is GLVMExecutableCommandOpenGL)
                    {
                        GLVMExecutableCommandOpenGL cmdd = (cmd as GLVMExecutableCommandOpenGL);
                        for (int i = cmdd.ParameterValues.Count - 1; i > -1; i--)
                        {
                            WriteVariantOpcode(bw, 10, cmdd.ParameterValues[i]);
                        }

                        bw.Write((byte)2);
                        bw.Write((byte)cmdd.FunctionName);
                    }
                }
                bw.Close();

                fsom.Files.Add("Execute__" + set.Name, ms.ToArray());
            }

            foreach (GLVMExecutableResourceSet set in exe.ResourceSets)
            {
                fsom.Files.Add("ResourceSet__" + set.Name, set.Data);
            }

            objectModels.Push(fsom);
        }
Ejemplo n.º 6
0
        protected override void BeforeSaveInternal(Stack <UniversalEditor.ObjectModel> objectModels)
        {
            base.BeforeSaveInternal(objectModels);

            GLVMExecutableObjectModel exe  = (objectModels.Pop() as GLVMExecutableObjectModel);
            FileSystemObjectModel     fsom = new FileSystemObjectModel();

            fsom.Title = "(c)2012 ALCEXHIM ; Cobalt Virtual Machine compiled executable";

            foreach (GLVMExecutableCommandSet set in exe.CommandSets)
            {
                System.IO.MemoryStream          ms = new System.IO.MemoryStream();
                UniversalEditor.IO.BinaryWriter bw = new UniversalEditor.IO.BinaryWriter(ms);

                foreach (GLVMExecutableCommand cmd in set.Commands)
                {
                    if (cmd is GLVMExecutableCommandSystem)
                    {
                        bw.Write((byte)1);
                        GLVMExecutableCommandSystem syscmd = (cmd as GLVMExecutableCommandSystem);
                        switch (syscmd.FunctionName)
                        {
                        case GLVMExecutableSystemCallType.Push:
                        {
                            if (syscmd.ParameterValues.Count == 1)
                            {
                                WriteVariantOpcode(bw, 10, syscmd.ParameterValues[0]);
                            }
                            break;
                        }

                        case GLVMExecutableSystemCallType.LoadVar:
                        {
                            if (syscmd.ParameterValues.Count == 1)
                            {
                                bw.Write((byte)40);
                                bw.Write((string)syscmd.ParameterValues[0]);
                            }
                            break;
                        }

                        case GLVMExecutableSystemCallType.StoreVar:
                        {
                            if (syscmd.ParameterValues.Count == 1)
                            {
                                bw.Write((byte)41);
                                bw.Write((string)syscmd.ParameterValues[0]);
                            }
                            break;
                        }

                        case GLVMExecutableSystemCallType.Add:
                        {
                            if (syscmd.ParameterValues.Count == 2)
                            {
                                WriteVariantOpcode(bw, 50, syscmd.ParameterValues[0], syscmd.ParameterValues[1]);
                            }
                            break;
                        }
                        }
                    }
                    else if (cmd is GLVMExecutableCommandOpenGL)
                    {
                        GLVMExecutableCommandOpenGL cmdd = (cmd as GLVMExecutableCommandOpenGL);
                        for (int i = cmdd.ParameterValues.Count - 1; i > -1; i--)
                        {
                            WriteVariantOpcode(bw, 10, cmdd.ParameterValues[i]);
                        }

                        bw.Write((byte)2);
                        bw.Write((byte)cmdd.FunctionName);
                    }
                }
                bw.Close();

                fsom.Files.Add("Execute__" + set.Name, ms.ToArray());
            }

            foreach (GLVMExecutableResourceSet set in exe.ResourceSets)
            {
                fsom.Files.Add("ResourceSet__" + set.Name, set.Data);
            }

            objectModels.Push(fsom);
        }
Ejemplo n.º 7
0
        protected override void AfterLoadInternal(Stack <ObjectModel> objectModels)
        {
            base.AfterLoadInternal(objectModels);

            if (objectModels.Count < 2)
            {
                throw new ObjectModelNotSupportedException("must have a FileSystemObjectModel and a MochaClassLibraryObjectModel in the stack");
            }

            FileSystemObjectModel fsom = (objectModels.Pop() as FileSystemObjectModel);

            if (fsom == null)
            {
                throw new ObjectModelNotSupportedException();
            }

            ObjectModel om = objectModels.Pop();

            MochaSnapshotObjectModel     mcx = (om as MochaSnapshotObjectModel);
            MochaClassLibraryObjectModel mcl = (om as MochaClassLibraryObjectModel);

            if (mcl == null && mcx == null)
            {
                throw new ObjectModelNotSupportedException();
            }

            List <Guid>   _instanceGuids = new List <Guid>();
            List <string> _stringTable   = new List <string>();

            LIBRARY_INFO[] library_info = null;

            // COMMON TABLES
            #region Guid Table
            {
                File fGlobalIdentifiers = fsom.FindFile("GlobalIdentifiers");
                using (MemoryAccessor ma = new MemoryAccessor(fGlobalIdentifiers.GetData()))
                {
                    int instanceCount = ma.Reader.ReadInt32();
                    for (int i = 0; i < instanceCount; i++)
                    {
                        _instanceGuids.Add(ma.Reader.ReadGuid());
                    }
                }
            }
            #endregion
            #region String Table
            {
                File f = fsom.FindFile("StringTable");
                using (MemoryAccessor ma = new MemoryAccessor(f.GetData()))
                {
                    int stringTableCount = ma.Reader.ReadInt32();
                    for (int i = 0; i < stringTableCount; i++)
                    {
                        string value = ma.Reader.ReadNullTerminatedString();
                        _stringTable.Add(value);
                    }
                }
            }
            #endregion

            // MCL-SPECIFIC
            #region Libraries
            File fLibraries = fsom.FindFile("Libraries");
            if (mcl != null && fLibraries != null)
            {
                using (MemoryAccessor ma = new MemoryAccessor(fLibraries.GetData()))
                {
                    int libraryCount = ma.Reader.ReadInt32();
                    library_info = new LIBRARY_INFO[libraryCount];

                    for (int i = 0; i < libraryCount; i++)
                    {
                        MochaLibrary library = new MochaLibrary();
                        library.ID = ma.Reader.ReadGuid();
                        library_info[i].instanceCount = ma.Reader.ReadInt32();
                        // library_info[i].attributeValueCount = ma.Reader.ReadInt32();
                        library_info[i].relationshipCount = ma.Reader.ReadInt32();

                        mcl.Libraries.Add(library);
                    }
                }
            }
            else
            {
                Console.Error.WriteLine("mocha: mcl: error: ignoring 'Libraries' section found in non-mcl file");
            }
            #endregion

            INSTANCE_INFO[] instance_info = null;
            #region Instances
            File fInstances = fsom.FindFile("Instances");
            if (mcl != null && fInstances != null)
            {
                using (MemoryAccessor ma = new MemoryAccessor(fInstances.GetData()))
                {
                    for (int i = 0; i < mcl.Libraries.Count; i++)
                    {
                        int instanceCount = ma.Reader.ReadInt32();
                        instance_info = new INSTANCE_INFO[instanceCount];
                        for (int j = 0; j < instanceCount; j++)
                        {
                            instance_info[j].instanceIndex       = ma.Reader.ReadInt32();
                            instance_info[j].attributeValueCount = ma.Reader.ReadInt32();
                            MochaInstanceFlags flags = (MochaInstanceFlags)ma.Reader.ReadInt32();

                            int?index = null;
                            if ((flags & MochaInstanceFlags.HasIndex) == MochaInstanceFlags.HasIndex)
                            {
                                index = ma.Reader.ReadInt32();
                            }

                            MochaInstance inst = new MochaInstance();
                            inst.ID    = _instanceGuids[instance_info[j].instanceIndex];
                            inst.Index = index;
                            mcl.Libraries[i].Instances.Add(inst);
                        }
                    }
                }
            }
            else
            {
                Console.Error.WriteLine("mocha: mcl: error: ignoring 'Instances' section found in non-mcl file");
            }
            #endregion

            #region Attributes
            File fAttributes = fsom.FindFile("Attributes");
            if (mcl != null && fAttributes != null)
            {
                using (MemoryAccessor ma = new MemoryAccessor(fAttributes.GetData()))
                {
                    for (int i = 0; i < mcl.Libraries.Count; i++)
                    {
                        for (int j = 0; j < mcl.Libraries[i].Instances.Count; j++)
                        {
                            for (int k = 0; k < instance_info[j].attributeValueCount; k++)
                            {
                                int attributeInstanceIndex = ma.Reader.ReadInt32();

                                MochaAttributeValue val = new MochaAttributeValue();
                                val.AttributeInstanceID = _instanceGuids[attributeInstanceIndex];

                                MochaAttributeType attributeType = (MochaAttributeType)ma.Reader.ReadInt32();
                                switch (attributeType)
                                {
                                case MochaAttributeType.None: break;

                                case MochaAttributeType.Text:
                                {
                                    int    stringTableIndex = ma.Reader.ReadInt32();
                                    string value            = _stringTable[stringTableIndex];
                                    val.Value = value;
                                    break;
                                }

                                case MochaAttributeType.Boolean:
                                {
                                    bool value = ma.Reader.ReadBoolean();
                                    val.Value = value;
                                    break;
                                }

                                case MochaAttributeType.Date:
                                {
                                    DateTime value = ma.Reader.ReadDateTime();
                                    val.Value = value;
                                    break;
                                }

                                case MochaAttributeType.Unknown:
                                {
                                    break;
                                }
                                }

                                mcl.Libraries[i].Instances[j].AttributeValues.Add(val);
                            }
                        }
                    }
                }
            }
            else
            {
                Console.Error.WriteLine("mocha: mcl: error: ignoring 'Attributes' section found in non-mcl file");
            }
            #endregion

            #region Relationships
            File fRelationships = fsom.FindFile("Relationships");
            if (mcl != null && fRelationships != null)
            {
                using (MemoryAccessor ma = new MemoryAccessor(fRelationships.GetData()))
                {
                    for (int i = 0; i < mcl.Libraries.Count; i++)
                    {
                        for (int j = 0; j < library_info[i].relationshipCount; j++)
                        {
                            int relationshipIndex   = ma.Reader.ReadInt32();
                            int sourceInstanceIndex = ma.Reader.ReadInt32();

                            MochaRelationship rel = new MochaRelationship();
                            rel.RelationshipInstanceID = _instanceGuids[relationshipIndex];
                            rel.SourceInstanceID       = _instanceGuids[sourceInstanceIndex];

                            int targetInstanceCount = ma.Reader.ReadInt32();
                            for (int k = 0; k < targetInstanceCount; k++)
                            {
                                int instanceIndex = ma.Reader.ReadInt32();
                                rel.DestinationInstanceIDs.Add(_instanceGuids[instanceIndex]);
                            }

                            mcl.Libraries[i].Relationships.Add(rel);
                        }
                    }
                }
            }
            else
            {
                Console.Error.WriteLine("mocha: mcl: error: ignoring 'Relationships' section found in non-mcl file");
            }
            #endregion

            #region Tenants
            File fTenants = fsom.FindFile("Tenants");
            if (mcl != null && fTenants != null)
            {
                using (MemoryAccessor ma = new MemoryAccessor(fTenants.GetData()))
                {
                    int tenantCount = ma.Reader.ReadInt32();
                    for (int i = 0; i < tenantCount; i++)
                    {
                        int  instanceIndex = ma.Reader.ReadInt32();
                        Guid instanceGuid  = _instanceGuids[instanceIndex];

                        int    tenantNameIndex = ma.Reader.ReadInt32();
                        string tenantName      = _stringTable[tenantNameIndex];

                        MochaTenant tenant = new MochaTenant();
                        tenant.ID   = instanceGuid;
                        tenant.Name = tenantName;

                        int libraryReferenceCount = ma.Reader.ReadInt32();
                        for (int j = 0; j < libraryReferenceCount; j++)
                        {
                            int  libraryIndex = ma.Reader.ReadInt32();
                            Guid libraryID    = _instanceGuids[libraryIndex];
                            tenant.LibraryReferences.Add(new MochaLibraryReference(libraryID));
                        }

                        int instanceCount = ma.Reader.ReadInt32();
                        for (int j = 0; j < instanceCount; j++)
                        {
                            int           instanceIndex2 = ma.Reader.ReadInt32();
                            MochaInstance inst           = new MochaInstance();
                            inst.ID = _instanceGuids[instanceIndex2];
                            tenant.Instances.Add(inst);
                        }

                        int relationshipCount = ma.Reader.ReadInt32();
                        for (int j = 0; j < relationshipCount; j++)
                        {
                            int  sourceInex       = ma.Reader.ReadInt32();
                            Guid ssource          = _instanceGuids[sourceInex];
                            int  relationshipInex = ma.Reader.ReadInt32();
                            Guid relati           = _instanceGuids[relationshipInex];

                            MochaRelationship rel = new MochaRelationship();
                            rel.SourceInstanceID       = ssource;
                            rel.RelationshipInstanceID = relati;

                            int count = ma.Reader.ReadInt32();
                            for (int k = 0; k < count; k++)
                            {
                                int  targetIndex = ma.Reader.ReadInt32();
                                Guid targ        = _instanceGuids[targetIndex];
                                rel.DestinationInstanceIDs.Add(targ);
                            }

                            tenant.Relationships.Add(rel);
                        }
                        mcl.Tenants.Add(tenant);
                    }
                    ma.Close();
                    fTenants.SetData(ma.ToArray());
                }
            }
            else
            {
                Console.Error.WriteLine("mocha: mcl: error: ignoring 'Tenants' section found in non-mcl file");
            }
            #endregion

            #region Journal
            // journal is present in MCX / MCD (application, data files)
            // is an opcode based format
            // eg. 0x01 = create instance, 0x02 = delete instance
            //      0x04 = set attribute value, 0x05 = delete attribute value
            //		0x08 = create relationship, 0x09 = remove relationship

            File fJournal = fsom.FindFile("Journal");
            if (mcx != null && fJournal != null)
            {
                using (MemoryAccessor ma = new MemoryAccessor(fJournal.GetData()))
                {
                    MochaSnapshotTransaction currentTransaction = null;

                    while (!ma.Reader.EndOfStream)
                    {
                        MochaOpcode opcode = (MochaOpcode)ma.Reader.ReadByte();
                        switch (opcode)
                        {
                        case MochaOpcode.BeginTransaction:
                        {
                            currentTransaction            = new MochaSnapshotTransaction();
                            currentTransaction.TenantName = _stringTable[ma.Reader.ReadInt32()];
                            break;
                        }

                        case MochaOpcode.EndTransaction:
                        {
                            mcx.Transactions.Add(currentTransaction);
                            currentTransaction = null;
                            break;
                        }

                        case MochaOpcode.CreateInstance:
                        {
                            DateTime effectiveDate  = ma.Reader.ReadDateTime();
                            int      guidIndex      = ma.Reader.ReadInt32();
                            int      classGuidIndex = ma.Reader.ReadInt32();

                            MochaSnapshotCreateInstanceTransactionOperation op = new MochaSnapshotCreateInstanceTransactionOperation();
                            op.GlobalIdentifier      = _instanceGuids[guidIndex];
                            op.ClassGlobalIdentifier = _instanceGuids[classGuidIndex];
                            op.EffectiveDate         = effectiveDate;
                            currentTransaction.Operations.Add(op);
                            break;
                        }

                        case MochaOpcode.CreateRelationship:
                        case MochaOpcode.RemoveRelationship:
                        {
                            DateTime effectiveDate       = ma.Reader.ReadDateTime();
                            int      sourceInstanceIndex = ma.Reader.ReadInt32();
                            int      relationshipIndex   = ma.Reader.ReadInt32();
                            int      targetInstanceCount = ma.Reader.ReadInt32();

                            MochaSnapshotAssociateRelationshipTransactionOperation rel = new MochaSnapshotAssociateRelationshipTransactionOperation();
                            rel.RelationshipInstanceID = _instanceGuids[relationshipIndex];
                            rel.SourceInstanceID       = _instanceGuids[sourceInstanceIndex];
                            rel.EffectiveDate          = effectiveDate;

                            for (int k = 0; k < targetInstanceCount; k++)
                            {
                                int instanceIndex = ma.Reader.ReadInt32();
                                rel.TargetInstanceIDs.Add(_instanceGuids[instanceIndex]);
                            }

                            if (opcode == MochaOpcode.RemoveRelationship)
                            {
                                rel.Remove = true;
                            }

                            currentTransaction.Operations.Add(rel);
                            break;
                        }

                        case MochaOpcode.AssignAttribute:
                        {
                            DateTime effectiveDate = ma.Reader.ReadDateTime();
                            int      instanceIndex = ma.Reader.ReadInt32();
                            Guid     instanceID    = _instanceGuids[instanceIndex];

                            int  attributeIndex      = ma.Reader.ReadInt32();
                            Guid attributeInstanceID = _instanceGuids[attributeIndex];

                            object value = ReadMochaValue(ma.Reader, _stringTable);

                            MochaSnapshotAssignAttributeTransactionOperation mav = new MochaSnapshotAssignAttributeTransactionOperation();
                            mav.SourceInstanceID    = instanceID;
                            mav.AttributeInstanceID = attributeInstanceID;
                            mav.EffectiveDate       = effectiveDate;
                            mav.Value = value;
                            currentTransaction.Operations.Add(mav);
                            break;
                        }
                        }
                    }
                }
            }
            else
            {
                Console.Error.WriteLine("mocha: mcl: error: ignoring 'Journal' section found in non-mcx file");
            }
            #endregion
        }
Ejemplo n.º 8
0
        protected override void BeforeSaveInternal(Stack <ObjectModel> objectModels)
        {
            base.BeforeSaveInternal(objectModels);

            FileNameSize = 32;

            ObjectModel om = objectModels.Pop();
            MochaClassLibraryObjectModel mcl = (om as MochaClassLibraryObjectModel);
            MochaSnapshotObjectModel     mcx = (om as MochaSnapshotObjectModel);

            if (mcl == null && mcx == null)
            {
                throw new ObjectModelNotSupportedException();
            }

            FileSystemObjectModel fsom = new FileSystemObjectModel();

            List <Guid>   _instanceIndices = new List <Guid>();
            List <string> _stringTable     = new List <string>();

            if (mcl != null)
            {
                #region Libraries
                {
                    File           f  = fsom.AddFile("Libraries");
                    MemoryAccessor ma = new MemoryAccessor();
                    ma.Writer.WriteInt32(mcl.Libraries.Count);
                    for (int i = 0; i < mcl.Libraries.Count; i++)
                    {
                        ma.Writer.WriteGuid(mcl.Libraries[i].ID);
                        ma.Writer.WriteInt32(mcl.Libraries[i].Instances.Count);
                        ma.Writer.WriteInt32(mcl.Libraries[i].Relationships.Count);
                    }
                    ma.Close();
                    f.SetData(ma.ToArray());
                }
                #endregion
                #region Instances
                {
                    File           f  = fsom.AddFile("Instances");
                    MemoryAccessor ma = new MemoryAccessor();
                    for (int i = 0; i < mcl.Libraries.Count; i++)
                    {
                        ma.Writer.WriteInt32(mcl.Libraries[i].Instances.Count);
                        for (int j = 0; j < mcl.Libraries[i].Instances.Count; j++)
                        {
                            ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, mcl.Libraries[i].Instances[j].ID));
                            ma.Writer.WriteInt32(mcl.Libraries[i].Instances[j].AttributeValues.Count);

                            MochaInstanceFlags flags = MochaInstanceFlags.None;
                            if (mcl.Libraries[i].Instances[j].Index != null)
                            {
                                flags |= MochaInstanceFlags.HasIndex;
                            }
                            ma.Writer.WriteInt32((int)flags);

                            if ((flags & MochaInstanceFlags.HasIndex) == MochaInstanceFlags.HasIndex)
                            {
                                ma.Writer.WriteInt32(mcl.Libraries[i].Instances[j].Index.Value);
                            }
                        }
                    }
                    ma.Close();
                    f.SetData(ma.ToArray());
                }
                #endregion
                #region Attributes
                {
                    File           f  = fsom.AddFile("Attributes");
                    MemoryAccessor ma = new MemoryAccessor();

                    for (int i = 0; i < mcl.Libraries.Count; i++)
                    {
                        /*
                         * writer.WriteInt32(mcl.Libraries[i].Metadata.Count);
                         * for (int j = 0; j < mcl.Libraries[i].Metadata.Count; j++)
                         * {
                         *      writer.WriteNullTerminatedString(mcl.Libraries[i].Metadata[j].Name);
                         *      writer.WriteNullTerminatedString(mcl.Libraries[i].Metadata[j].Value);
                         * }
                         */
                        for (int j = 0; j < mcl.Libraries[i].Instances.Count; j++)
                        {
                            for (int k = 0; k < mcl.Libraries[i].Instances[j].AttributeValues.Count; k++)
                            {
                                ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, mcl.Libraries[i].Instances[j].AttributeValues[k].AttributeInstanceID));

                                if (mcl.Libraries[i].Instances[j].AttributeValues[k].Value == null)
                                {
                                    ma.Writer.WriteInt32((int)MochaAttributeType.None);
                                }
                                else if (mcl.Libraries[i].Instances[j].AttributeValues[k].Value is string)
                                {
                                    ma.Writer.WriteInt32((int)MochaAttributeType.Text);
                                    ma.Writer.WriteInt32(AddOrUpdateLookupTable <string>(_stringTable, mcl.Libraries[i].Instances[j].AttributeValues[k].Value as string));
                                }
                                else
                                {
                                    ma.Writer.WriteInt32((int)MochaAttributeType.Unknown);
                                    ma.Writer.WriteObject(mcl.Libraries[i].Instances[j].AttributeValues[k].Value);
                                }
                            }
                        }
                    }

                    ma.Close();
                    f.SetData(ma.ToArray());
                }
                #endregion
                #region Relationships
                {
                    File           f  = fsom.AddFile("Relationships");
                    MemoryAccessor ma = new MemoryAccessor();
                    for (int i = 0; i < mcl.Libraries.Count; i++)
                    {
                        for (int j = 0; j < mcl.Libraries[i].Relationships.Count; j++)
                        {
                            ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, mcl.Libraries[i].Relationships[j].RelationshipInstanceID));
                            ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, mcl.Libraries[i].Relationships[j].SourceInstanceID));

                            ma.Writer.WriteInt32(mcl.Libraries[i].Relationships[j].DestinationInstanceIDs.Count);
                            for (int k = 0; k < mcl.Libraries[i].Relationships[j].DestinationInstanceIDs.Count; k++)
                            {
                                ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, mcl.Libraries[i].Relationships[j].DestinationInstanceIDs[k]));
                            }
                        }
                    }
                    ma.Close();
                    f.SetData(ma.ToArray());
                }
                #endregion

                #region Tenants
                {
                    if (mcl.Tenants.Count > 0)
                    {
                        File           f  = fsom.AddFile("Tenants");
                        MemoryAccessor ma = new MemoryAccessor();
                        ma.Writer.WriteInt32(mcl.Tenants.Count);
                        foreach (MochaTenant tenant in mcl.Tenants)
                        {
                            ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, tenant.ID));
                            ma.Writer.WriteInt32(AddOrUpdateLookupTable <string>(_stringTable, tenant.Name));

                            ma.Writer.WriteInt32(tenant.LibraryReferences.Count);
                            for (int i = 0; i < tenant.LibraryReferences.Count; i++)
                            {
                                ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, tenant.LibraryReferences[i].LibraryID));
                            }

                            ma.Writer.WriteInt32(tenant.Instances.Count);
                            for (int i = 0; i < tenant.Instances.Count; i++)
                            {
                                ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, tenant.Instances[i].ID));
                            }
                            ma.Writer.WriteInt32(tenant.Relationships.Count);
                            for (int i = 0; i < tenant.Relationships.Count; i++)
                            {
                                ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, tenant.Relationships[i].SourceInstanceID));
                                ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, tenant.Relationships[i].RelationshipInstanceID));
                                ma.Writer.WriteInt32(tenant.Relationships[i].DestinationInstanceIDs.Count);
                                for (int j = 0; j < tenant.Relationships[i].DestinationInstanceIDs.Count; j++)
                                {
                                    ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, tenant.Relationships[i].DestinationInstanceIDs[j]));
                                }
                            }
                        }
                        ma.Close();
                        f.SetData(ma.ToArray());
                    }
                }
                #endregion
            }
            else if (mcx != null)
            {
                #region Journal
                {
                    if (mcx.Transactions.Count > 0)
                    {
                        File           f  = fsom.AddFile("Journal");
                        MemoryAccessor ma = new MemoryAccessor();
                        foreach (MochaSnapshotTransaction t in mcx.Transactions)
                        {
                            ma.Writer.WriteByte((byte)MochaOpcode.BeginTransaction);
                            ma.Writer.WriteInt32(AddOrUpdateLookupTable <string>(_stringTable, t.TenantName));
                            foreach (MochaSnapshotTransactionOperation op in t.Operations)
                            {
                                if (op is MochaSnapshotCreateInstanceTransactionOperation ci)
                                {
                                    ma.Writer.WriteByte((byte)MochaOpcode.CreateInstance);
                                    ma.Writer.WriteDateTime(ci.EffectiveDate);
                                    ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, ci.GlobalIdentifier));
                                    ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, ci.ClassGlobalIdentifier));
                                }
                                else if (op is MochaSnapshotAssignAttributeTransactionOperation aa)
                                {
                                    ma.Writer.WriteByte((byte)MochaOpcode.AssignAttribute);
                                    ma.Writer.WriteDateTime(aa.EffectiveDate);
                                    ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, aa.SourceInstanceID));
                                    ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, aa.AttributeInstanceID));
                                    WriteMochaValue(ma.Writer, aa.Value, _stringTable);
                                }
                                else if (op is MochaSnapshotAssociateRelationshipTransactionOperation ar)
                                {
                                    ma.Writer.WriteByte((byte)MochaOpcode.CreateRelationship);
                                    ma.Writer.WriteDateTime(ar.EffectiveDate);
                                    ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, ar.SourceInstanceID));
                                    ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, ar.RelationshipInstanceID));
                                    ma.Writer.WriteInt32(ar.TargetInstanceIDs.Count);
                                    foreach (Guid id in ar.TargetInstanceIDs)
                                    {
                                        ma.Writer.WriteInt32(AddOrUpdateLookupTable <Guid>(_instanceIndices, id));
                                    }
                                }
                            }
                            ma.Writer.WriteByte((byte)MochaOpcode.EndTransaction);
                        }
                        ma.Close();
                        f.SetData(ma.ToArray());
                    }
                }
                #endregion
            }
            #region Guid Table
            {
                File           f  = fsom.AddFile("GlobalIdentifiers");
                MemoryAccessor ma = new MemoryAccessor();
                ma.Writer.WriteInt32(_instanceIndices.Count);
                foreach (Guid id in _instanceIndices)
                {
                    ma.Writer.WriteGuid(id);
                }
                ma.Close();
                f.SetData(ma.ToArray());
            }
            #endregion
            #region String Table
            {
                File           f  = fsom.AddFile("StringTable");
                MemoryAccessor ma = new MemoryAccessor();
                ma.Writer.WriteInt32(_stringTable.Count);
                foreach (string id in _stringTable)
                {
                    ma.Writer.WriteNullTerminatedString(id);
                }
                ma.Close();
                f.SetData(ma.ToArray());
            }
            #endregion

            objectModels.Push(fsom);
        }