]> gerrit.simantics Code Review - simantics/platform.git/blobdiff - bundles/org.simantics.db.procore/src/org/simantics/db/procore/cluster/ClusterSmall.java
Removed contact application support prints
[simantics/platform.git] / bundles / org.simantics.db.procore / src / org / simantics / db / procore / cluster / ClusterSmall.java
index 12936da61cd69acb60e9ff578a0ee1a94afe94bf..b24862a67ba190fbda07166346724a934c2e8d64 100644 (file)
-/*******************************************************************************\r
- * Copyright (c) 2007, 2010 Association for Decentralized Information Management\r
- * in Industry THTH ry.\r
- * All rights reserved. This program and the accompanying materials\r
- * are made available under the terms of the Eclipse Public License v1.0\r
- * which accompanies this distribution, and is available at\r
- * http://www.eclipse.org/legal/epl-v10.html\r
- *\r
- * Contributors:\r
- *     VTT Technical Research Centre of Finland - initial API and implementation\r
- *******************************************************************************/\r
-package org.simantics.db.procore.cluster;\r
-\r
-import java.io.ByteArrayInputStream;\r
-import java.io.InputStream;\r
-\r
-import org.simantics.db.Resource;\r
-import org.simantics.db.exception.DatabaseException;\r
-import org.simantics.db.exception.ExternalValueException;\r
-import org.simantics.db.exception.ValidationException;\r
-import org.simantics.db.impl.ClusterI;\r
-import org.simantics.db.impl.ClusterSupport;\r
-import org.simantics.db.impl.ClusterTraitsBase;\r
-import org.simantics.db.impl.ForEachObjectContextProcedure;\r
-import org.simantics.db.impl.ForEachObjectProcedure;\r
-import org.simantics.db.impl.ForPossibleRelatedValueContextProcedure;\r
-import org.simantics.db.impl.ForPossibleRelatedValueProcedure;\r
-import org.simantics.db.impl.Table;\r
-import org.simantics.db.impl.TableHeader;\r
-import org.simantics.db.impl.graph.ReadGraphImpl;\r
-import org.simantics.db.procedure.AsyncContextMultiProcedure;\r
-import org.simantics.db.procedure.AsyncMultiProcedure;\r
-import org.simantics.db.service.ClusterUID;\r
-import org.simantics.db.service.ResourceUID;\r
-import org.simantics.utils.datastructures.Callback;\r
-\r
-import fi.vtt.simantics.procore.DebugPolicy;\r
-import fi.vtt.simantics.procore.internal.ClusterChange;\r
-import fi.vtt.simantics.procore.internal.ClusterStream;\r
-import fi.vtt.simantics.procore.internal.ClusterTable;\r
-import fi.vtt.simantics.procore.internal.SessionImplSocket;\r
-import gnu.trove.map.hash.TIntShortHashMap;\r
-import gnu.trove.procedure.TIntProcedure;\r
-import gnu.trove.set.hash.TIntHashSet;\r
-\r
-final public class ClusterSmall extends ClusterImpl {\r
-    \r
-    private static final int TABLE_HEADER_SIZE = TableHeader.HEADER_SIZE + TableHeader.EXTRA_SIZE;\r
-    private static final int RESOURCE_TABLE_OFFSET = 0;\r
-    private static final int PREDICATE_TABLE_OFFSET = RESOURCE_TABLE_OFFSET + TABLE_HEADER_SIZE;\r
-    private static final int OBJECT_TABLE_OFFSET = PREDICATE_TABLE_OFFSET + TABLE_HEADER_SIZE;\r
-    private static final int VALUE_TABLE_OFFSET = OBJECT_TABLE_OFFSET + TABLE_HEADER_SIZE;\r
-    private static final int FLAT_TABLE_OFFSET = VALUE_TABLE_OFFSET + TABLE_HEADER_SIZE;\r
-    private static final int COMPLETE_TABLE_OFFSET = FLAT_TABLE_OFFSET + TABLE_HEADER_SIZE;\r
-    private static final int FOREIGN_TABLE_OFFSET = COMPLETE_TABLE_OFFSET + TABLE_HEADER_SIZE;\r
-    private static final int INT_HEADER_SIZE = FOREIGN_TABLE_OFFSET + TABLE_HEADER_SIZE;\r
-    private final int clusterBits;\r
-    public final ResourceTableSmall resourceTable;\r
-    private PredicateTable predicateTable;\r
-    final ObjectTable objectTable;\r
-    public final ValueTableSmall valueTable;\r
-    public final ForeignTableSmall foreignTable;\r
-    private final CompleteTableSmall completeTable;\r
-    private final ClusterMapSmall clusterMap;\r
-    private final int[] headerTable;\r
-    private final ClusterSupport clusterSupport;\r
-    private boolean proxy;\r
-    private boolean deleted = false;\r
-    \r
-    public ClusterSmall(ClusterUID clusterUID, int clusterKey, ClusterTable clusterTable, ClusterSupport support) {\r
-        super(clusterUID, clusterKey, support);\r
-        if(DebugPolicy.REPORT_CLUSTER_EVENTS)\r
-            new Exception(clusterUID.toString()).printStackTrace();\r
-        this.proxy = true;\r
-        this.headerTable = null;\r
-        this.resourceTable = null;\r
-        this.foreignTable = null;\r
-        this.predicateTable = null;\r
-        this.objectTable = null;\r
-        this.valueTable = null;\r
-        this.completeTable = null;\r
-        this.clusterMap = null;\r
-        this.clusterSupport = null;\r
-        this.clusterBits = 0;\r
-        this.importance = 0;\r
-    }\r
-    public ClusterSmall(ClusterUID clusterUID, int clusterKey, ClusterSupport support) {\r
-        super(clusterUID, clusterKey, support);\r
-        if(DebugPolicy.REPORT_CLUSTER_EVENTS)\r
-            new Exception(clusterUID.toString()).printStackTrace();\r
-        this.proxy = false;\r
-        this.headerTable = new int[INT_HEADER_SIZE];\r
-        this.resourceTable = new ResourceTableSmall(this, headerTable, RESOURCE_TABLE_OFFSET);\r
-        this.foreignTable = new ForeignTableSmall(this, headerTable, FOREIGN_TABLE_OFFSET);\r
-        this.predicateTable = new PredicateTable(this, headerTable, PREDICATE_TABLE_OFFSET);\r
-        this.objectTable = new ObjectTable(this, headerTable, OBJECT_TABLE_OFFSET);\r
-        this.valueTable = new ValueTableSmall(this, headerTable, VALUE_TABLE_OFFSET);\r
-        this.completeTable = new CompleteTableSmall(this, headerTable, COMPLETE_TABLE_OFFSET);\r
-        this.clusterMap = new ClusterMapSmall(this, foreignTable);\r
-        this.clusterSupport = support;\r
-        this.clusterBits = ClusterTraitsBase.getClusterBits(clusterKey);\r
-        this.importance = -clusterTable.timeCounter();\r
-    }\r
-    protected ClusterSmall(long[] longs, int[] ints, byte[] bytes, ClusterSupport support, int clusterKey)\r
-    throws DatabaseException {\r
-        super(checkValidity(-1, longs, ints, bytes), clusterKey, support);\r
-        this.proxy = false;\r
-        if (ints.length < INT_HEADER_SIZE)\r
-            throw new IllegalArgumentException("Too small integer table for cluster.");\r
-        this.headerTable = ints;\r
-        if(DebugPolicy.REPORT_CLUSTER_EVENTS) new Exception(Long.toString(clusterId)).printStackTrace();\r
-        this.resourceTable = new ResourceTableSmall(this, ints, RESOURCE_TABLE_OFFSET, longs);\r
-        this.foreignTable = new ForeignTableSmall(this, headerTable, FOREIGN_TABLE_OFFSET, longs);\r
-        this.predicateTable = new PredicateTable(this, ints, PREDICATE_TABLE_OFFSET, ints);\r
-        this.objectTable = new ObjectTable(this, ints, OBJECT_TABLE_OFFSET, ints);\r
-        this.valueTable = new ValueTableSmall(this, ints, VALUE_TABLE_OFFSET, bytes);\r
-        this.completeTable = new CompleteTableSmall(this, headerTable, COMPLETE_TABLE_OFFSET, ints);\r
-        this.clusterMap = new ClusterMapSmall(this, foreignTable);\r
-        this.clusterSupport = support;\r
-        this.clusterBits = ClusterTraitsBase.getClusterBits(clusterKey);\r
-        this.importance = clusterTable.timeCounter();\r
-        clusterTable.markImmutable(this, getImmutable());\r
-    }\r
-    void analyse() {\r
-        System.out.println("Cluster " + clusterId);\r
-        System.out.println("-size:" + getUsedSpace());\r
-        System.out.println(" -rt:" + (resourceTable.getTableCapacity() * 8 + 8));\r
-        System.out.println(" -ft:" + foreignTable.getTableCapacity() * 8);\r
-        System.out.println(" -pt:" + predicateTable.getTableCapacity() * 4);\r
-        System.out.println(" -ot:" + objectTable.getTableCapacity() * 4);\r
-        System.out.println(" -ct:" + completeTable.getTableCapacity() * 4);\r
-        System.out.println(" -vt:" + valueTable.getTableCapacity());\r
-\r
-        System.out.println("-resourceTable:");\r
-        System.out.println(" -resourceCount=" + resourceTable.getResourceCount());\r
-        System.out.println(" -size=" + resourceTable.getTableSize());\r
-        System.out.println(" -capacity=" + resourceTable.getTableCapacity());\r
-        System.out.println(" -count=" + resourceTable.getTableCount());\r
-        System.out.println(" -size=" + resourceTable.getTableSize());\r
-        //resourceTable.analyse();\r
-    }\r
-    public void checkDirectReference(int dr)\r
-    throws DatabaseException {\r
-        if (deleted) return;\r
-        if (!ClusterTraits.statementIndexIsDirect(dr))\r
-            throw new ValidationException("Reference is not direct. Reference=" + dr);\r
-        if (ClusterTraits.isFlat(dr))\r
-            throw new ValidationException("Reference is flat. Reference=" + dr);\r
-        if (ClusterTraits.isLocal(dr)) {\r
-            if (dr < 1 || dr > resourceTable.getUsedSize())\r
-                throw new ValidationException("Illegal local reference. Reference=" + dr);\r
-        } else {\r
-            int fi = ClusterTraits.getForeignIndexFromReference(dr);\r
-            int ri = ClusterTraits.getResourceIndexFromForeignReference(dr);\r
-            if (fi < 1 || fi > foreignTable.getUsedSize())\r
-                throw new ValidationException("Illegal foreign reference. Reference=" + dr + " foreign index=" + fi);\r
-            if (ri < 1 || ri > ClusterTraits.getMaxNumberOfResources())\r
-                throw new ValidationException("Illegal foreign reference. Reference=" + dr + " resource index=" + ri);\r
-        }\r
-    }\r
-    public void checkPredicateIndex(int pi)\r
-    throws DatabaseException {\r
-        if (deleted) return;\r
-        //        predicateTable.checkPredicateSetIndex(this, pi);\r
-    }\r
-    public void checkObjectSetReference(int or)\r
-    throws DatabaseException {\r
-        if (deleted) return;\r
-        if (ClusterTraits.statementIndexIsDirect(or))\r
-            throw new ValidationException("Illegal object set reference. Reference=" + or);\r
-        int oi = ClusterTraits.statementIndexGet(or);\r
-        this.objectTable.checkObjectSetIndex(this, oi);\r
-    }\r
-\r
-    public void checkValueInit()\r
-    throws DatabaseException {\r
-        valueTable.checkValueInit();\r
-    }\r
-    public void checkValue(int capacity, int index)\r
-    throws DatabaseException {\r
-        valueTable.checkValue(capacity, index);\r
-    }\r
-    public void checkValueFini()\r
-    throws DatabaseException {\r
-        valueTable.checkValueFini();\r
-    }\r
-    public void checkForeingIndex(int fi)\r
-    throws DatabaseException {\r
-        if (deleted) return;\r
-        if (fi<1 || fi > foreignTable.getUsedSize())\r
-            throw new ValidationException("Illegal foreign index=" + fi);\r
-    }\r
-    public void checkCompleteSetReference(int cr)\r
-    throws DatabaseException {\r
-        if (!ClusterTraits.completeReferenceIsMultiple(cr))\r
-            throw new ValidationException("Illegal complete set reference. Reference=" + cr);\r
-        int ci = cr;\r
-        this.completeTable.checkCompleteSetIndex(this, ci);\r
-    }\r
-    public void check()\r
-    throws DatabaseException {\r
-        if (deleted) return;\r
-//        this.completeTable.check(this);\r
-//        this.objectTable.check(this);\r
-//        // Must be after object table check.\r
-//        this.predicateTable.check(this);\r
-//        this.resourceTable.check(this);\r
-    }\r
-    @Override\r
-    public CompleteTypeEnum getCompleteType(int resourceKey, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return CompleteTypeEnum.NotComplete;\r
-        final int resourceRef = getLocalReference(resourceKey);\r
-        CompleteTypeEnum ct = resourceTable.getCompleteType(resourceRef);\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.getCompleteType rk=" + resourceKey + " ct=" + ct);\r
-        return ct;\r
-    }\r
-\r
-    @Override\r
-    public int getCompleteObjectKey(int resourceKey, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return 0;\r
-        final int resourceIndexOld = getLocalReference(resourceKey);\r
-        short completeRef = resourceTable.getCompleteObjectRef(resourceIndexOld);\r
-        int clusterIndex;\r
-        int resourceIndex;\r
-        if (0 == completeRef)\r
-            throw new DatabaseException("Resource's complete object refernce is null. Resource key=" + resourceKey + ".");\r
-        ClusterI.CompleteTypeEnum completeType = resourceTable.getCompleteType(resourceIndexOld);\r
-        if (completeType == ClusterI.CompleteTypeEnum.NotComplete)\r
-            throw new DatabaseException("Resource has multiple complete objects. Resource key=" + resourceKey + ".");\r
-        if (ClusterTraitsSmall.resourceRefIsLocal(completeRef)) {\r
-            clusterIndex = clusterKey;\r
-            resourceIndex = completeRef;\r
-        } else { // Resource has one complete statement.\r
-            ResourceUID resourceUID = clusterMap.getForeignResourceUID(completeRef);\r
-            ClusterI c = support.getClusterByClusterUIDOrMake(resourceUID.asCID());\r
-            clusterIndex = c.getClusterKey();\r
-            resourceIndex = resourceUID.getIndex();\r
-        }\r
-        int key = ClusterTraits.createResourceKey(clusterIndex, resourceIndex);\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.complete object rk=" + resourceKey + " ck=" + key);\r
-        return key;\r
-    }\r
-\r
-    @Override\r
-    public boolean isComplete(int resourceKey, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return false;\r
-        final int resourceRef = getLocalReference(resourceKey);\r
-        final ClusterI.CompleteTypeEnum completeType = resourceTable.getCompleteType(resourceRef);\r
-        boolean complete = completeType != ClusterI.CompleteTypeEnum.NotComplete;\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.key=" + resourceKey + " isComplete=" + complete);\r
-        return complete;\r
-    }\r
-    public int getSingleObject(int resourceKey, int predicateKey, int objectIndex, ClusterSupport support) throws DatabaseException {\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.getSingleObject: rk=" + resourceKey + " pk=" + predicateKey);\r
-        if (deleted) return 0;\r
-        if (0 == objectIndex) {\r
-            final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKeyNoThrow(resourceKey);\r
-            final short pRef = getInternalReferenceOrZero2(predicateKey, support);\r
-            final ClusterI.CompleteTypeEnum pCompleteType = ClusterTraitsBase.getCompleteTypeFromResourceKey(predicateKey);\r
-            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);\r
-        }\r
-        return objectTable.getSingleObject(objectIndex, support, this);\r
-    }\r
-\r
-    public void forObjects(ReadGraphImpl graph, int resourceKey, int predicateKey, int objectIndex, AsyncMultiProcedure<Resource> procedure,\r
-            ClusterSupport support) throws DatabaseException {\r
-        if (deleted) return;\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.forObjects1: rk=" + resourceKey + " pk=" + predicateKey);\r
-        if (0 == objectIndex) {\r
-            final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);\r
-            final int pRef = getInternalReferenceOrZero2(predicateKey, support);\r
-            final ClusterI.CompleteTypeEnum pCompleteType = ClusterTraitsBase.getCompleteTypeFromResourceKey(predicateKey);\r
-            resourceTable.foreachObject(resourceIndex, graph, procedure, support, pRef, pCompleteType, completeTable, this);\r
-            return;\r
-        }\r
-        objectTable.foreachObject(graph, objectIndex, procedure, this);\r
-    }\r
-\r
-    public <C> void forObjects(ReadGraphImpl graph, int resourceKey, int predicateKey, int objectIndex, C context, AsyncContextMultiProcedure<C, Resource> procedure,\r
-            ClusterSupport support) throws DatabaseException {\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.forObjects1: rk=" + resourceKey + " pk=" + predicateKey);\r
-        if (deleted) return;\r
-        if (0 == objectIndex) {\r
-            final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);\r
-            final int pRef = getInternalReferenceOrZero2(predicateKey, support);\r
-            final ClusterI.CompleteTypeEnum pCompleteType = ClusterTraitsBase.getCompleteTypeFromResourceKey(predicateKey);\r
-            resourceTable.foreachObject(resourceIndex, graph, context, procedure, support, pRef, pCompleteType, completeTable, this);\r
-            return;\r
-        }\r
-        objectTable.foreachObject(graph, objectIndex, context, procedure, this);\r
-    }\r
-\r
-    @Override\r
-    public <Context> boolean forObjects(int resourceKey, int predicateKey, int objectIndex, ObjectProcedure<Context> procedure,\r
-            Context context, ClusterSupport support) throws DatabaseException {\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.forObjects2: rk=" + resourceKey + " pk=" + predicateKey);\r
-        if (deleted) return false;\r
-        if (0 == objectIndex) {\r
-            final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);\r
-            final short pRef = getInternalReferenceOrZero2(predicateKey, support);\r
-            final ClusterI.CompleteTypeEnum pCompleteType = ClusterTraitsBase.getCompleteTypeFromResourceKey(predicateKey);\r
-            return resourceTable.foreachObject(resourceIndex, procedure, context, support, this, pRef, pCompleteType, completeTable);\r
-        }\r
-        return objectTable.foreachObject(objectIndex, procedure, context, support, this);\r
-    }\r
-\r
-    @Override\r
-    public int getSingleObject(int resourceKey, int predicateKey, ClusterSupport support) throws DatabaseException {\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.getSingleObject2: rk=" + resourceKey + " pk=" + predicateKey);\r
-        if (deleted) return 0;\r
-        final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);\r
-        final short pRef = getInternalReferenceOrZero2(predicateKey, support);\r
-        final int completeType = ClusterTraitsBase.getCompleteTypeIntFromResourceKey(predicateKey);\r
-        final ClusterI.CompleteTypeEnum pCompleteType = CompleteTypeEnum.make(completeType);\r
-        if (completeType > 0)\r
-            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);\r
-        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;\r
-        if (0 == predicateIndex) // All relevant data is in resource table.\r
-            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);\r
-        int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);\r
-        return getSingleObject(resourceKey, predicateKey, objectIndex, support);\r
-    }\r
-\r
-    @Override\r
-    public <T> int getSingleObject(int resourceKey, ForPossibleRelatedValueProcedure<T> procedure, ClusterSupport support) throws DatabaseException {\r
-        if (deleted) return 0;\r
-        final short resourceIndex = (short)ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);\r
-        final int predicateKey = procedure.predicateKey;\r
-        int clusterKey = ClusterTraitsBase.getClusterMaskFromResourceKey(resourceKey);\r
-        short pRef = 0;\r
-        if(procedure.clusterKey[0] == clusterKey) {\r
-            pRef = (short)procedure.predicateReference[0];\r
-        } else {\r
-            pRef = getInternalReferenceOrZero2(predicateKey, support);\r
-            procedure.clusterKey[0] = clusterKey;\r
-            procedure.predicateReference[0] = pRef;\r
-        }\r
-\r
-        final ClusterI.CompleteTypeEnum pCompleteType = procedure.completeType;\r
-        if (CompleteTypeEnum.NotComplete != pCompleteType)\r
-            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);\r
-        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;\r
-        if (0 == predicateIndex) // All relevant data is in resource table.\r
-            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);\r
-        int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);\r
-        return getSingleObject(resourceKey, predicateKey, objectIndex, support);\r
-    }\r
-\r
-    @Override\r
-    public <C, T> int getSingleObject(int resourceKey, ForPossibleRelatedValueContextProcedure<C, T> procedure, ClusterSupport support) throws DatabaseException {\r
-        if (deleted) return 0;\r
-        final short resourceIndex = (short)ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);\r
-        final int predicateKey = procedure.predicateKey;\r
-        int clusterKey = ClusterTraitsBase.getClusterMaskFromResourceKey(resourceKey);\r
-        short pRef = 0;\r
-        if(procedure.clusterKey[0] == clusterKey) {\r
-            pRef = (short)procedure.predicateReference[0];\r
-        } else {\r
-            pRef = getInternalReferenceOrZero2(predicateKey, support);\r
-            procedure.clusterKey[0] = clusterKey;\r
-            procedure.predicateReference[0] = pRef;\r
-        }\r
-        final ClusterI.CompleteTypeEnum pCompleteType = procedure.completeType;\r
-        if (CompleteTypeEnum.NotComplete != pCompleteType)\r
-            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);\r
-        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;\r
-        if (0 == predicateIndex) // All relevant data is in resource table.\r
-            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);\r
-        int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);\r
-        return getSingleObject(resourceKey, predicateKey, objectIndex, support);\r
-    }\r
-\r
-    @Override\r
-    public void forObjects(ReadGraphImpl graph, int resourceKey,\r
-            int predicateKey, AsyncMultiProcedure<Resource> procedure) throws DatabaseException {\r
-        if (deleted) return;\r
-        SessionImplSocket session = (SessionImplSocket)graph.getSession();\r
-        ClusterSupport support = session.clusterTranslator;\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.forObjects3: rk=" + resourceKey + " pk=" + predicateKey);\r
-        final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);\r
-        final int pRef = getInternalReferenceOrZero2(predicateKey, support);\r
-        final int completeType = ClusterTraitsBase.getCompleteTypeIntFromResourceKey(predicateKey);\r
-        final ClusterI.CompleteTypeEnum pCompleteType = CompleteTypeEnum.make(completeType);\r
-        if (completeType > 0) {\r
-            resourceTable.foreachObject(resourceIndex, graph, procedure, support, pRef, pCompleteType, completeTable, this);\r
-            return;\r
-        }\r
-        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;\r
-        if (0 == predicateIndex) {\r
-            resourceTable.foreachObject(resourceIndex, graph, procedure, support, pRef, pCompleteType, completeTable, this);\r
-            return;\r
-        }\r
-        int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);\r
-        forObjects(graph, resourceKey, predicateKey, objectIndex, procedure, support);\r
-    }\r
-\r
-    public void forObjects(ReadGraphImpl graph, int resourceKey, ForEachObjectProcedure procedure) throws DatabaseException {\r
-        if (deleted) return;\r
-        final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);\r
-        final int predicateKey = procedure.predicateKey;\r
-        int clusterKey = ClusterTraitsBase.getClusterMaskFromResourceKey(resourceKey);\r
-        int pRef = 0;\r
-        if(procedure.clusterKey[0] == clusterKey) {\r
-            pRef = procedure.predicateReference[0];\r
-        } else {\r
-            SessionImplSocket session = (SessionImplSocket)graph.getSession();\r
-            ClusterSupport support = session.clusterTranslator;\r
-            pRef = getInternalReferenceOrZero2(predicateKey, support);\r
-            procedure.clusterKey[0] = clusterKey;\r
-            procedure.predicateReference[0] = pRef;\r
-        }\r
-        final ClusterI.CompleteTypeEnum pCompleteType = procedure.completeType;\r
-        if (ClusterI.CompleteTypeEnum.NotComplete != pCompleteType) {\r
-            SessionImplSocket session = (SessionImplSocket)graph.getSession();\r
-            ClusterSupport support = session.clusterTranslator;\r
-            resourceTable.foreachObject(resourceIndex, graph, procedure, support, pRef, pCompleteType, completeTable, this);\r
-            return;\r
-        }\r
-        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;\r
-        if (0 == predicateIndex) {\r
-            SessionImplSocket session = (SessionImplSocket)graph.getSession();\r
-            ClusterSupport support = session.clusterTranslator;\r
-            resourceTable.foreachObject(resourceIndex, graph, procedure, support, pRef, pCompleteType, completeTable, this);\r
-            return;\r
-        }\r
-        int hashBase = predicateIndex + predicateTable.offset;\r
-        if (predicateTable.table[hashBase-1] < 0) {\r
-            int objectIndex = TableIntArraySet2.get(predicateTable.table, hashBase, pRef & 0xFFFF);\r
-            //int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);\r
-            SessionImplSocket session = (SessionImplSocket)graph.getSession();\r
-            ClusterSupport support = session.clusterTranslator;\r
-            forObjects(graph, resourceKey, predicateKey, objectIndex, procedure, support);\r
-        } else {\r
-            procedure.finished(graph);\r
-//            graph.dec();\r
-        }\r
-}\r
-\r
-    public <C> void forObjects(ReadGraphImpl graph, int resourceKey, C context, ForEachObjectContextProcedure<C> procedure) throws DatabaseException {\r
-        if (deleted) return;\r
-        final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);\r
-        final int predicateKey = procedure.predicateKey;\r
-        int clusterKey = ClusterTraitsBase.getClusterMaskFromResourceKey(resourceKey);\r
-        int pRef = 0;\r
-        if(procedure.clusterKey[0] == clusterKey) {\r
-            pRef = procedure.predicateReference[0];\r
-        } else {\r
-            SessionImplSocket session = (SessionImplSocket)graph.getSession();\r
-            ClusterSupport support = session.clusterTranslator;\r
-            pRef = getInternalReferenceOrZero2(predicateKey, support);\r
-            procedure.clusterKey[0] = clusterKey;\r
-            procedure.predicateReference[0] = pRef;\r
-        }\r
-\r
-        final ClusterI.CompleteTypeEnum pCompleteType = procedure.completeType;\r
-        if (ClusterI.CompleteTypeEnum.NotComplete != pCompleteType) {\r
-            SessionImplSocket session = (SessionImplSocket)graph.getSession();\r
-            ClusterSupport support = session.clusterTranslator;\r
-            resourceTable.foreachObject(resourceIndex, graph, context, procedure, support, pRef, pCompleteType, completeTable, this);\r
-            return;\r
-        }\r
-        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;\r
-        if (0 == predicateIndex) {\r
-            SessionImplSocket session = (SessionImplSocket)graph.getSession();\r
-            ClusterSupport support = session.clusterTranslator;\r
-            resourceTable.foreachObject(resourceIndex, graph, context, procedure, support, pRef, pCompleteType, completeTable, this);\r
-            return;\r
-        }\r
-        int hashBase = predicateIndex + predicateTable.offset;\r
-        if(predicateTable.table[hashBase-1] < 0) {\r
-            int objectIndex = TableIntArraySet2.get(predicateTable.table, hashBase, pRef & 0xFFFF);\r
-            SessionImplSocket session = (SessionImplSocket)graph.getSession();\r
-            ClusterSupport support = session.clusterTranslator;\r
-            forObjects(graph, resourceKey, predicateKey, objectIndex, context, procedure, support);\r
-        } else {\r
-            int objectIndex = TableIntSet2.get(predicateTable.table, hashBase, pRef & 0xFFFF);\r
-            SessionImplSocket session = (SessionImplSocket)graph.getSession();\r
-            ClusterSupport support = session.clusterTranslator;\r
-            forObjects(graph, resourceKey, predicateKey, objectIndex, context, procedure, support);\r
-        }\r
-    }\r
-    @Override\r
-    public <Context> boolean forObjects(int resourceKey, int predicateKey,\r
-            ObjectProcedure<Context> procedure, Context context, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.forObjects4: rk=" + resourceKey + " pk=" + predicateKey);\r
-        if (deleted) return false;\r
-        final short resourceIndex = (short)ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);\r
-        final short pRef = getInternalReferenceOrZero2(predicateKey, support);\r
-        final ClusterI.CompleteTypeEnum pCompleteType = ClusterTraitsBase.getCompleteTypeFromResourceKey(predicateKey);\r
-        // PredicateType is complete i.e. all relevant data is in resource table.\r
-        if (ClusterI.CompleteTypeEnum.NotComplete != pCompleteType) {\r
-            if (DEBUG)\r
-                System.out.println("ClusterSmall.forObjects: complete type was " + pCompleteType + " cluster=" + getClusterUID());\r
-            return resourceTable.foreachObject(resourceIndex, procedure, context, support, this, pRef, pCompleteType, completeTable);\r
-        }\r
-        final int predicateIndex = resourceTable.getPredicateIndex(resourceIndex);\r
-        if (0 == predicateIndex) { // All relevant data is in resource table.\r
-            if (DEBUG)\r
-                System.out.println("ClusterSmall.forObjects: no predicate table " + pCompleteType);\r
-            return resourceTable.foreachObject(resourceIndex, procedure, context, support, this, pRef, pCompleteType, completeTable);\r
-        }\r
-        int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);\r
-        return forObjects(resourceKey, predicateKey, objectIndex, procedure, context, support);\r
-    }\r
-    @Override\r
-    public <Context> boolean forPredicates(int resourceKey,\r
-            PredicateProcedure<Context> procedure, Context context, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.forPredicates: rk=" + resourceKey );\r
-        if (deleted) return false;\r
-        final int resourceIndex = getLocalReference(resourceKey);\r
-        final int predicateIndex = resourceTable.getPredicateIndex(resourceIndex);\r
-        if (0 == predicateIndex)\r
-            return resourceTable.foreachPredicate(resourceIndex,\r
-                    procedure, context, support, this, completeTable);\r
-        else {\r
-            boolean broken = resourceTable.foreachPredicate(resourceIndex,\r
-                    procedure, context, support, this, completeTable);\r
-            if (broken)\r
-                return true;\r
-        }\r
-        return predicateTable.foreachPredicate(predicateIndex,\r
-                procedure, context, support, this);\r
-    }\r
-    @Override\r
-    public ClusterI addRelation(int sResourceKey, int pResourceKey, int oResourceKey, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (DEBUG)\r
-            System.out.println("add rk=" + sResourceKey + " pk=" + pResourceKey + " ok=" + oResourceKey);\r
-        if (deleted) return null;\r
-        if(proxy) {\r
-            ClusterImpl cluster = clusterTable.load2(clusterId, clusterKey);\r
-            return cluster.addRelation(sResourceKey, pResourceKey, oResourceKey, support);\r
-        }\r
-\r
-        //        check();\r
-        boolean ret;\r
-        try {\r
-            short sri = getLocalReferenceAnd(sResourceKey, support, ClusterChange.ADD_OPERATION);\r
-            short pri = getReferenceOrCreateIfForeign(pResourceKey, support, ClusterStream.NULL_OPERATION);\r
-            short ori = getReferenceOrCreateIfForeign(oResourceKey, support, ClusterStream.NULL_OPERATION);\r
-            ClusterI.CompleteTypeEnum completeType = ClusterTraitsBase.getCompleteTypeFromResourceKey(pResourceKey);\r
-            ret = addRelationInternal(sri, pri, ori, completeType);\r
-            calculateModifiedId();\r
-        } catch (OutOfSpaceException e) {\r
-            boolean streamOff = support.getStreamOff();\r
-            if (!streamOff) {\r
-                support.cancelStatement(this);\r
-                support.setStreamOff(true);\r
-            }\r
-            ClusterI cluster = toBig(support);\r
-            if (!streamOff)\r
-                support.setStreamOff(false);\r
-            ClusterI cluster2 = cluster.addRelation(sResourceKey, pResourceKey, oResourceKey, support);\r
-            if (cluster != cluster2)\r
-                throw new DatabaseException("Internal error. Contact application support.");\r
-            return cluster;\r
-        }\r
-//        check();\r
-        if (ret) {\r
-            support.addStatement(this);\r
-            return this;\r
-        } else {\r
-            support.cancelStatement(this);\r
-            return null;\r
-        }\r
-    }\r
-    @Override\r
-    public boolean removeRelation(int sResourceKey, int pResourceKey, int oResourceKey, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return false;\r
-        short sri = getLocalReferenceAnd(sResourceKey, support, ClusterChange.REMOVE_OPERATION);\r
-        short pri = getInternalReferenceOrZeroAnd(pResourceKey, support, ClusterStream.NULL_OPERATION);\r
-        short ori = getInternalReferenceOrZeroAnd(oResourceKey, support, ClusterStream.NULL_OPERATION);\r
-        boolean ret = false;\r
-        if (0 != pri && 0 != ori) {\r
-            ClusterI.CompleteTypeEnum completeType = ClusterTraitsBase.getCompleteTypeFromResourceKey(pResourceKey);\r
-            ret = removeRelationInternal(sri, pri, ori, completeType, support);\r
-            calculateModifiedId();\r
-        }\r
-        if (ret)\r
-            support.removeStatement(this);\r
-        else\r
-            support.cancelStatement(this);\r
-        //        check();\r
-        return ret;\r
-    }\r
-    @Override\r
-    public void denyRelation(int sResourceKey, int pResourceKey, int oResourceKey, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return;\r
-        short s = checkResourceKeyIsOursAndGetResourceIndexIf(sResourceKey, support);\r
-        ResourceReferenceAndCluster p = checkResourceKeyAndGetResourceIndexIf(pResourceKey, support);\r
-        ResourceReferenceAndCluster o = checkResourceKeyAndGetResourceIndexIf(oResourceKey, support);\r
-        if (0 == s || 0 == p.reference || 0 == o.reference)\r
-            return;\r
-        //        check();\r
-        ClusterI.CompleteTypeEnum completeType = ClusterTraitsBase.getCompleteTypeFromResourceKey(pResourceKey);\r
-        boolean ret = removeRelationInternal(s, p.reference, o.reference, completeType, support);\r
-        if (ret) {\r
-            support.addStatementIndex(this, sResourceKey, getClusterUID(), ClusterChange.REMOVE_OPERATION);\r
-            support.addStatementIndex(this, pResourceKey, p.clusterUID, ClusterStream.NULL_OPERATION);\r
-            support.addStatementIndex(this, oResourceKey, o.clusterUID, ClusterStream.NULL_OPERATION);\r
-            support.removeStatement(this);\r
-        }\r
-        calculateModifiedId();\r
-        //        check();\r
-        return;\r
-    }\r
-    @Override\r
-    public InputStream getValueStream(int resourceKey, ClusterSupport support) throws DatabaseException {\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.getValue " + resourceKey);\r
-        if (deleted) return null;\r
-        int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKeyNoThrow(resourceKey);\r
-        try {\r
-            byte[] buffer = resourceTable.getValue(valueTable, resourceIndex);\r
-            if(buffer == null) return null;\r
-            return new ByteArrayInputStream(buffer);\r
-        } catch (ExternalValueException e) {\r
-            return support.getValueStreamEx(resourceIndex, clusterId);\r
-        }\r
-    }\r
-    @Override\r
-    public byte[] getValue(int resourceKey, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.getValue " + resourceKey);\r
-        if (deleted) return null;\r
-        int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKeyNoThrow(resourceKey);\r
-        try {\r
-            return resourceTable.getValue(valueTable, resourceIndex);\r
-        } catch (ExternalValueException e) {\r
-            return support.getValueEx(resourceIndex, clusterId);\r
-        }\r
-    }\r
-    @Override\r
-    public boolean hasValue(int resourceKey, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return false;\r
-        int resourceIndex = getLocalReference(resourceKey);\r
-        return resourceTable.hasValue(resourceIndex);\r
-    }\r
-    @Override\r
-    public boolean removeValue(int resourceKey, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return false;\r
-        int resourceIndex = getLocalReferenceAnd(resourceKey, support, ClusterChange.DELETE_OPERATION);\r
-        support.removeValue(this);\r
-        calculateModifiedId();\r
-        return resourceTable.removeValue(valueTable, resourceIndex);\r
-    }\r
-    @Override\r
-    public ClusterI setValue(int rResourceId, byte[] value, int length, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return null;\r
-        int resourceIndex = getLocalReferenceAnd(rResourceId, support, ClusterStream.SET_OPERATION);\r
-        support.setValue(this, getClusterId(), value, length);\r
-        try {\r
-            resourceTable.setValue(valueTable, resourceIndex, value, length);\r
-            calculateModifiedId();\r
-            return this;\r
-        } catch (OutOfSpaceException e) {\r
-            boolean streamOff = support.getStreamOff();\r
-            if (!streamOff)\r
-                support.setStreamOff(true);\r
-            ClusterI cluster = toBig(support);\r
-            cluster.setValue(rResourceId, value, length, support);\r
-            if (!streamOff)\r
-                support.setStreamOff(false);\r
-            return cluster;\r
-        }\r
-    }\r
-    @Override\r
-    public ClusterI modiValueEx(int rResourceId, long voffset, int length, byte[] value, int offset, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return null;\r
-        int resourceIndex = getLocalReferenceAnd(rResourceId, support, ClusterStream.MODI_OPERATION);\r
-        support.modiValue(this, getClusterId(), voffset, length, value, offset);\r
-        resourceTable.setValueEx(valueTable, resourceIndex);\r
-        calculateModifiedId();\r
-        return this;\r
-    }\r
-    @Override\r
-    public byte[] readValueEx(int rResourceId, long voffset, int length, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return null;\r
-        int resourceIndex = getLocalReference(rResourceId);\r
-        boolean isExternal = resourceTable.isValueEx(valueTable, resourceIndex);\r
-        if (!isExternal)\r
-            throw new DatabaseException("ClusterI.readValue supported only for external value. Resource key=" + rResourceId);\r
-        return support.getValueEx(resourceIndex, getClusterId(), voffset, length);\r
-    }\r
-    @Override\r
-    public long getValueSizeEx(int rResourceId, ClusterSupport support)\r
-    throws DatabaseException, ExternalValueException {\r
-        if (deleted) return 0;\r
-        int resourceIndex = getLocalReference(rResourceId);\r
-        boolean isExternal = resourceTable.isValueEx(valueTable, resourceIndex);\r
-        if (!isExternal)\r
-            throw new ExternalValueException("ClusterI.getValueSizeEx supported only for external value. Resource key=" + rResourceId);\r
-        return support.getValueSizeEx(resourceIndex, getClusterId());\r
-    }\r
-    @Override\r
-    public void setValueEx(int rResourceId)\r
-    throws DatabaseException {\r
-        int resourceIndex = getLocalReference(rResourceId);\r
-        resourceTable.setValueEx(valueTable, resourceIndex);\r
-    }\r
-    @Override\r
-    public int createResource(ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return 0;\r
-        if(proxy) {\r
-            ClusterImpl cluster = clusterTable.load2(clusterId, clusterKey);\r
-            return cluster.createResource(support);\r
-        }\r
-\r
-        short resourceIndex = resourceTable.createResource();\r
-        calculateModifiedId();\r
-        if(DebugPolicy.REPORT_RESOURCE_ID_ALLOCATION)\r
-            System.out.println("[RID_ALLOCATION]: ClusterSmall[" + clusterId + "] allocates " + resourceIndex);\r
-        support.createResource(this, resourceIndex, getClusterId());\r
-        return ClusterTraits.createResourceKey(clusterKey, resourceIndex);\r
-    }\r
-    @Override\r
-    public boolean hasResource(int resourceKey, ClusterSupport support) {\r
-        if (deleted) return false;\r
-        int clusterKey = ClusterTraitsBase.getClusterKeyFromResourceKeyNoThrow(resourceKey);\r
-        if (this.clusterKey != clusterKey) // foreign resource\r
-            return false;\r
-        int resourceIndex;\r
-        try {\r
-            resourceIndex = ClusterTraits.getResourceIndexFromResourceKey(resourceKey);\r
-        } catch (DatabaseException e) {\r
-            return false;\r
-        }\r
-        if (resourceIndex > 0 & resourceIndex <= resourceTable.getTableCount())\r
-            return true;\r
-        else\r
-            return false;\r
-    }\r
-    @Override\r
-    public int getNumberOfResources(ClusterSupport support)\r
-    throws DatabaseException  {\r
-        if (deleted) return 0;\r
-        if(proxy) {\r
-            ClusterImpl cluster = clusterTable.load2(clusterId, clusterKey);\r
-            return cluster.getNumberOfResources(support);\r
-        }\r
-\r
-        return resourceTable.getUsedSize();\r
-    }\r
-\r
-    public int getNumberOfResources() {\r
-        if (deleted || proxy)\r
-            return 0;\r
-        return resourceTable.getUsedSize();\r
-    }\r
-\r
-    @Override\r
-    public long getUsedSpace() {\r
-        if (deleted) return 0;\r
-        if(isEmpty()) return 0;\r
-        long rt = resourceTable.getTableCapacity() * 8 + 8; // (8 = cluster id)\r
-        long ft = foreignTable.getTableCapacity() * 8;\r
-        long pt = predicateTable.getTableCapacity() * 4;\r
-        long ot = objectTable.getTableCapacity() * 4;\r
-        long ct = completeTable.getTableCapacity() * 4;\r
-        long vt = valueTable.getTableCapacity() * 1;\r
-        long cm = clusterMap.getUsedSpace();\r
-        return rt + ft + pt + ot + ct + vt + cm;\r
-    }\r
-    @Override\r
-    public boolean isEmpty() {\r
-        if (deleted) return true; // Deleted cluster is always empty.\r
-        if(resourceTable == null) return true;\r
-        return resourceTable.getTableCount() == 0;\r
-    }\r
-    @Override\r
-    public void printDebugInfo(String message, ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (deleted) return;\r
-        throw new DatabaseException("Not implemented!");\r
-    }\r
-    private short getInternalReferenceOrZero2(int resourceKey, ClusterSupport support) throws DatabaseException {\r
-        int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKeyNoThrow(resourceKey);\r
-        if (!ClusterTraitsBase.isCluster(clusterBits, resourceKey)) {\r
-            return clusterMap.getForeignReferenceOrZero(resourceKey);\r
-        } else {\r
-            return (short)resourceIndex;\r
-        }\r
-    }\r
-    private short getInternalReferenceOrZeroAnd(int resourceKey, ClusterSupport support, byte op)\r
-    throws DatabaseException {\r
-        int clusterKey = ClusterTraits.getClusterKeyFromResourceKey(resourceKey);\r
-        int resourceIndex = ClusterTraits.getResourceIndexFromResourceKey(resourceKey);\r
-        if (this.clusterKey != clusterKey) { // foreign resource\r
-            ClusterI foreignCluster = support.getClusterByClusterKey(clusterKey);\r
-            ClusterUID clusterUID = foreignCluster.getClusterUID();\r
-            short foreignRef = clusterMap.getForeignReferenceOrZero(resourceKey);\r
-            support.addStatementIndex(this, resourceKey, clusterUID, op);\r
-            return foreignRef;\r
-        }\r
-        support.addStatementIndex(this, resourceKey, getClusterUID(), op);\r
-        return (short)resourceIndex;\r
-    }\r
-    private final short getLocalReference(int resourceKey) throws DatabaseException {\r
-        return ClusterTraits.getResourceIndexFromResourceKeyNoThrow(resourceKey);\r
-    }\r
-    private final short getLocalReferenceAnd(int resourceKey, ClusterSupport support, byte op)\r
-    throws DatabaseException {\r
-        short resourceIndex = getLocalReference(resourceKey);\r
-        support.addStatementIndex(this, resourceKey, getClusterUID(), op);\r
-        return resourceIndex;\r
-    }\r
-    private short checkResourceKeyIsOursAndGetResourceIndexIf(int resourceKey, ClusterSupport support)\r
-    throws DatabaseException {\r
-        int clusterShortId = ClusterTraits.getClusterKeyFromResourceKey(resourceKey);\r
-        if (this.clusterKey != clusterShortId)\r
-            return 0;\r
-        int resourceIndex = ClusterTraits.getResourceIndexFromResourceKey(resourceKey);\r
-        return (short)resourceIndex;\r
-    }\r
-    private short getReferenceOrCreateIfForeign(int resourceKey, ClusterSupport support, byte op)\r
-    throws DatabaseException {\r
-        int clusterKey = ClusterTraits.getClusterKeyFromResourceKey(resourceKey);\r
-        short resourceIndex = (short)ClusterTraits.getResourceIndexFromResourceKey(resourceKey);\r
-        if (this.clusterKey != clusterKey) {\r
-            ClusterI foreignCluster = support.getClusterByClusterKey(clusterKey);\r
-            ClusterUID clusterUID = foreignCluster.getClusterUID();\r
-            support.addStatementIndex(this, resourceKey, clusterUID, op);\r
-            short ref = clusterMap.getForeignReferenceOrCreateByResourceKey(resourceKey, clusterUID);\r
-            return ref;\r
-        }\r
-        support.addStatementIndex(this, resourceKey, getClusterUID(), op);\r
-        return resourceIndex;\r
-    }\r
-    private class ResourceReferenceAndCluster {\r
-        ResourceReferenceAndCluster(short reference, ClusterUID clusterUID) {\r
-            this.reference = reference;\r
-            this.clusterUID = clusterUID;\r
-        }\r
-        public final short reference;\r
-        public final ClusterUID clusterUID;\r
-    }\r
-    private ResourceReferenceAndCluster checkResourceKeyAndGetResourceIndexIf(int resourceKey, ClusterSupport support)\r
-    throws DatabaseException {\r
-        int clusterKey = ClusterTraits.getClusterKeyFromResourceKey(resourceKey);\r
-        short resourceIndex = (short)ClusterTraits.getResourceIndexFromResourceKey(resourceKey);\r
-        if (this.clusterKey != clusterKey) { // foreign resource\r
-            ClusterI foreignCluster = support.getClusterByClusterKey(clusterKey);\r
-            ClusterUID clusterUID = foreignCluster.getClusterUID();\r
-            short ref = clusterMap.getForeignReferenceOrZero(resourceKey);\r
-            return new ResourceReferenceAndCluster(ref, clusterUID);\r
-        }\r
-        return new ResourceReferenceAndCluster(resourceIndex, getClusterUID());\r
-    }\r
-\r
-    static long fTime = 0;\r
-    \r
-    int executeIndex = 0;\r
-    long clusterUID1 = 0;\r
-    long clusterUID2 = 0;\r
-\r
-    @Override\r
-    final public int execute(int resourceReference) throws DatabaseException {\r
-       \r
-        if (deleted) return 0;\r
-        short resourceRef = (short)resourceReference;\r
-        int key;\r
-        if (ClusterTraitsSmall.resourceRefIsLocal(resourceRef)) {\r
-            key = clusterBits | resourceRef;\r
-        } else {\r
-            foreignTable.fillResourceUID(ClusterTraitsSmall.resourceRefGetForeignIndex((short)resourceRef), this);\r
-            key = ClusterTraitsBase.createResourceKey(clusterSupport.getClusterKeyByClusterUIDOrMake(clusterUID1, clusterUID2), executeIndex);\r
-        }\r
-        if (DEBUG)\r
-            System.out.println("ClusterSmall.execute key=" + key);\r
-        return key;\r
-    }\r
-\r
-    private boolean addRelationInternal(short sReference, short pReference, short oReference, ClusterI.CompleteTypeEnum completeType)\r
-    throws DatabaseException {\r
-        int predicateIndex = resourceTable.addStatement(sReference, pReference, oReference, predicateTable, objectTable, completeType, completeTable);\r
-        if (0 == predicateIndex)\r
-            return true; // added to resourceTable\r
-        else if (0 > predicateIndex)\r
-            return false; // old complete statemenent\r
-        int newPredicateIndex = predicateTable.addPredicate(predicateIndex, 0xFFFF & pReference, 0xFFFF & oReference, objectTable);\r
-        if (0 == newPredicateIndex)\r
-            return false;\r
-        if (predicateIndex != newPredicateIndex)\r
-            resourceTable.setPredicateIndex(sReference, newPredicateIndex);\r
-        return true;\r
-    }\r
-    private boolean removeRelationInternal(int sResourceIndex, short pResourceIndex,\r
-            short oResourceIndex, ClusterI.CompleteTypeEnum completeType, ClusterSupport support)\r
-    throws DatabaseException {\r
-        int predicateIndex = resourceTable.getPredicateIndex(sResourceIndex);\r
-        if (0 == predicateIndex || ClusterI.CompleteTypeEnum.NotComplete != completeType)\r
-            return resourceTable.removeStatementFromCache(sResourceIndex,\r
-                    pResourceIndex, oResourceIndex, completeType, completeTable);\r
-        PredicateTable.Status ret = predicateTable.removePredicate(predicateIndex, 0xFFFF & pResourceIndex, 0xFFFF & oResourceIndex, objectTable);\r
-        switch (ret) {\r
-        case NothingRemoved:\r
-            return false;\r
-        case PredicateRemoved: {\r
-            if (0 == predicateTable.getPredicateSetSize(predicateIndex))\r
-                resourceTable.setPredicateIndex(sResourceIndex, 0);\r
-            // intentionally dropping to next case\r
-        } default:\r
-            break;\r
-        }\r
-        resourceTable.removeStatement(sResourceIndex,\r
-                pResourceIndex, oResourceIndex,\r
-                completeType, completeTable,\r
-                predicateTable, objectTable, support);\r
-        return true;\r
-    }\r
-    @Override\r
-    public void load() {\r
-        if (deleted) return;\r
-        throw new Error("Not supported.");\r
-    }\r
-\r
-    @Override\r
-    public void load(Callback<DatabaseException> r) {\r
-        if (deleted) return;\r
-        throw new Error("Not supported.");\r
-    }\r
-\r
-    public boolean contains(int resourceKey) {\r
-        if (deleted) return false;\r
-        return ClusterTraitsBase.isCluster(clusterBits, resourceKey);\r
-    }\r
-    @Override\r
-    public void load(final ClusterSupport support, final Runnable callback) {\r
-        if (deleted) return;\r
-        try {\r
-            clusterTable.load2(clusterId, clusterKey);\r
-            callback.run();\r
-        } catch (DatabaseException e) {\r
-            e.printStackTrace();\r
-        }\r
-\r
-    }\r
-    @Override\r
-    public ClusterI getClusterByResourceKey(int resourceKey,\r
-            ClusterSupport support) {\r
-        if (deleted) return null;\r
-        throw new Error();\r
-    }\r
-    @Override\r
-    public void increaseReferenceCount(int amount) {\r
-        if (deleted) return;\r
-        throw new Error();\r
-    }\r
-    @Override\r
-    public void decreaseReferenceCount(int amount) {\r
-        if (deleted) return;\r
-        throw new Error();\r
-    }\r
-    @Override\r
-    public int getReferenceCount() {\r
-        if (deleted) return 0;\r
-        throw new Error();\r
-    }\r
-    @Override\r
-    public void releaseMemory() {\r
-    }\r
-    @Override\r
-    public void compact() {\r
-        if (deleted) return;\r
-        clusterMap.compact();\r
-    }\r
-    @Override\r
-    public boolean isLoaded() {\r
-        return !proxy || deleted; // Deleted cluster is always loaded.\r
-    }\r
-\r
-    public ClusterImpl tryLoad(SessionImplSocket sessionImpl) throws DatabaseException {\r
-        if (deleted) return this; // Never load deleted cluster.\r
-        return clusterTable.tryLoad(clusterId, clusterKey);\r
-    }\r
-\r
-\r
-    @Override\r
-    public ClusterBig toBig(ClusterSupport support)\r
-    throws DatabaseException {\r
-        if (DEBUG) {\r
-            System.out.println("DEBUG: toBig cluster=" + clusterId);\r
-            new Exception().printStackTrace();\r
-        }\r
-        if (deleted) return null; // Can't convert deleted cluster to big.\r
-        ClusterBig big = new ClusterBig(getClusterUID(), clusterKey, support);\r
-        big.cc = this.cc;\r
-        big.cc.clusterImpl = this;\r
-        resourceTable.toBig(big, support, this);\r
-        big.foreignLookup = this.foreignLookup;\r
-        big.change = this.change;\r
-        this.cc = null;\r
-        this.foreignLookup = null;\r
-        this.change = null;\r
-        return big;\r
-    }\r
-\r
-    @Override\r
-    public ClusterTypeEnum getType() {\r
-        return ClusterTypeEnum.SMALL;\r
-    }\r
-    @Override\r
-    public boolean getImmutable() {\r
-        if (deleted) return false;\r
-        if (null == resourceTable)\r
-            return false;\r
-        int status = resourceTable.getClusterStatus();\r
-        return (status & ClusterStatus.ImmutableMaskSet) == ClusterStatus.ImmutableMaskSet;\r
-    }\r
-    @Override\r
-    public void setImmutable(boolean immutable, ClusterSupport support) {\r
-        if (deleted) return;\r
-        if(resourceTable != null) {\r
-            int status = resourceTable.getClusterStatus();\r
-            if (immutable)\r
-                status |= ClusterStatus.ImmutableMaskSet;\r
-            else\r
-                status &= ClusterStatus.ImmutableMaskClear;\r
-            resourceTable.setClusterStatus(status);\r
-        }\r
-        support.setImmutable(this, immutable);\r
-    }\r
-    @Override\r
-    public boolean getDeleted() {\r
-        if (deleted) return true;\r
-        int status = resourceTable.getClusterStatus();\r
-        return (status & ClusterStatus.DeletedMaskSet) == ClusterStatus.DeletedMaskSet;\r
-    }\r
-    @Override\r
-    public void setDeleted(boolean set, ClusterSupport support) {\r
-        deleted = set;\r
-        if(resourceTable != null) {\r
-            int status = resourceTable.getClusterStatus();\r
-            if (set)\r
-                status |= ClusterStatus.DeletedMaskSet;\r
-            else\r
-                status &= ClusterStatus.DeletedMaskClear;\r
-            resourceTable.setClusterStatus(status);\r
-        }\r
-        if (null != support)\r
-            support.setDeleted(this, set);\r
-    }\r
-    @Override\r
-    public String toString() {\r
-        if (deleted) return "ClusterSmall[" + getClusterId() + " - has been deleted or hasn't been created.]";\r
-        try {\r
-            final TIntHashSet set = new TIntHashSet();\r
-            TIntShortHashMap map = foreignTable.getResourceHashMap();\r
-            map.forEachKey(new TIntProcedure() {\r
-                @Override\r
-                public boolean execute(int value) {\r
-                    set.add(value & 0xfffff000);\r
-                    return true;\r
-                }\r
-            });\r
-            return "ClusterSmall[" + getClusterId() + " - " + getNumberOfResources() + " - " + foreignTable.getResourceHashMap().size() + " - " + set.size() + "]";\r
-        } catch (Throwable e) {\r
-            return "ClusterSmall[" + getNumberOfResources() + "]";\r
-        }\r
-    }\r
-    @Override\r
-    public Table<?> getPredicateTable() {\r
-        return predicateTable;\r
-    }\r
-    @Override\r
-    public Table<?> getForeignTable() {\r
-        return foreignTable;\r
-    }\r
-    @Override\r
-    public int makeResourceKey(int pRef) throws DatabaseException {\r
-        throw new UnsupportedOperationException();\r
-    }\r
-    @Override\r
-    public Table<?> getCompleteTable() {\r
-        return completeTable;\r
-    }\r
-    @Override\r
-    public Table<?> getValueTable() {\r
-        return valueTable;\r
-    }\r
-    @Override\r
-    public Table<?> getObjectTable() {\r
-        return objectTable;\r
-    }\r
-\r
-}\r
-\r
-class ClusterStatus {\r
-    public static final int ImmutableMaskClear = 0xFFFFFFFE;\r
-    public static final int ImmutableMaskSet = 0x00000001;\r
-    public static final int DeletedMaskClear = 0xFFFFFFFD;\r
-    public static final int DeletedMaskSet = 0x00000002;\r
-}\r
+/*******************************************************************************
+ * Copyright (c) 2007, 2010 Association for Decentralized Information Management
+ * in Industry THTH ry.
+ * All rights reserved. This program and the accompanying materials
+ * are made available under the terms of the Eclipse Public License v1.0
+ * which accompanies this distribution, and is available at
+ * http://www.eclipse.org/legal/epl-v10.html
+ *
+ * Contributors:
+ *     VTT Technical Research Centre of Finland - initial API and implementation
+ *******************************************************************************/
+package org.simantics.db.procore.cluster;
+
+import java.io.ByteArrayInputStream;
+import java.io.InputStream;
+import java.util.function.Consumer;
+
+import org.simantics.db.Resource;
+import org.simantics.db.exception.DatabaseException;
+import org.simantics.db.exception.ExternalValueException;
+import org.simantics.db.exception.ValidationException;
+import org.simantics.db.impl.ClusterI;
+import org.simantics.db.impl.ClusterSupport;
+import org.simantics.db.impl.ClusterTraitsBase;
+import org.simantics.db.impl.ForEachObjectContextProcedure;
+import org.simantics.db.impl.ForEachObjectProcedure;
+import org.simantics.db.impl.ForPossibleRelatedValueContextProcedure;
+import org.simantics.db.impl.ForPossibleRelatedValueProcedure;
+import org.simantics.db.impl.Table;
+import org.simantics.db.impl.TableHeader;
+import org.simantics.db.impl.graph.ReadGraphImpl;
+import org.simantics.db.procedure.SyncContextMultiProcedure;
+import org.simantics.db.procedure.SyncMultiProcedure;
+import org.simantics.db.service.ClusterUID;
+import org.simantics.db.service.ResourceUID;
+import org.slf4j.Logger;
+import org.slf4j.LoggerFactory;
+
+import fi.vtt.simantics.procore.DebugPolicy;
+import fi.vtt.simantics.procore.internal.ClusterChange;
+import fi.vtt.simantics.procore.internal.ClusterStream;
+import fi.vtt.simantics.procore.internal.ClusterTable;
+import fi.vtt.simantics.procore.internal.SessionImplSocket;
+import gnu.trove.map.hash.TIntShortHashMap;
+import gnu.trove.set.hash.TIntHashSet;
+
+final public class ClusterSmall extends ClusterImpl {
+       
+       private static final Logger LOGGER = LoggerFactory.getLogger(ClusterSmall.class);
+    
+    private static final int TABLE_HEADER_SIZE = TableHeader.HEADER_SIZE + TableHeader.EXTRA_SIZE;
+    private static final int RESOURCE_TABLE_OFFSET = 0;
+    private static final int PREDICATE_TABLE_OFFSET = RESOURCE_TABLE_OFFSET + TABLE_HEADER_SIZE;
+    private static final int OBJECT_TABLE_OFFSET = PREDICATE_TABLE_OFFSET + TABLE_HEADER_SIZE;
+    private static final int VALUE_TABLE_OFFSET = OBJECT_TABLE_OFFSET + TABLE_HEADER_SIZE;
+    private static final int FLAT_TABLE_OFFSET = VALUE_TABLE_OFFSET + TABLE_HEADER_SIZE;
+    private static final int COMPLETE_TABLE_OFFSET = FLAT_TABLE_OFFSET + TABLE_HEADER_SIZE;
+    private static final int FOREIGN_TABLE_OFFSET = COMPLETE_TABLE_OFFSET + TABLE_HEADER_SIZE;
+    private static final int INT_HEADER_SIZE = FOREIGN_TABLE_OFFSET + TABLE_HEADER_SIZE;
+    private final int clusterBits;
+    public final ResourceTableSmall resourceTable;
+    private PredicateTable predicateTable;
+    final ObjectTable objectTable;
+    public final ValueTableSmall valueTable;
+    public final ForeignTableSmall foreignTable;
+    private final CompleteTableSmall completeTable;
+    private final ClusterMapSmall clusterMap;
+    private final int[] headerTable;
+    private final ClusterSupport clusterSupport;
+    private boolean proxy;
+    private boolean deleted = false;
+    
+    public ClusterSmall(ClusterUID clusterUID, int clusterKey, ClusterTable clusterTable, ClusterSupport support) {
+        super(clusterUID, clusterKey, support);
+        if(DebugPolicy.REPORT_CLUSTER_EVENTS)
+            new Exception(clusterUID.toString()).printStackTrace();
+        this.proxy = true;
+        this.headerTable = null;
+        this.resourceTable = null;
+        this.foreignTable = null;
+        this.predicateTable = null;
+        this.objectTable = null;
+        this.valueTable = null;
+        this.completeTable = null;
+        this.clusterMap = null;
+        this.clusterSupport = null;
+        this.clusterBits = 0;
+        this.importance = 0;
+    }
+    public ClusterSmall(ClusterUID clusterUID, int clusterKey, ClusterSupport support) {
+        super(clusterUID, clusterKey, support);
+        if(DebugPolicy.REPORT_CLUSTER_EVENTS)
+            new Exception(clusterUID.toString()).printStackTrace();
+        this.proxy = false;
+        this.headerTable = new int[INT_HEADER_SIZE];
+        this.resourceTable = new ResourceTableSmall(this, headerTable, RESOURCE_TABLE_OFFSET);
+        this.foreignTable = new ForeignTableSmall(this, headerTable, FOREIGN_TABLE_OFFSET);
+        this.predicateTable = new PredicateTable(this, headerTable, PREDICATE_TABLE_OFFSET);
+        this.objectTable = new ObjectTable(this, headerTable, OBJECT_TABLE_OFFSET);
+        this.valueTable = new ValueTableSmall(this, headerTable, VALUE_TABLE_OFFSET);
+        this.completeTable = new CompleteTableSmall(this, headerTable, COMPLETE_TABLE_OFFSET);
+        this.clusterMap = new ClusterMapSmall(this, foreignTable);
+        this.clusterSupport = support;
+        this.clusterBits = ClusterTraitsBase.getClusterBits(clusterKey);
+        this.importance = -clusterTable.timeCounter();
+    }
+    protected ClusterSmall(long[] longs, int[] ints, byte[] bytes, ClusterSupport support, int clusterKey)
+    throws DatabaseException {
+        super(checkValidity(-1, longs, ints, bytes), clusterKey, support);
+        this.proxy = false;
+        if (ints.length < INT_HEADER_SIZE)
+            throw new IllegalArgumentException("Too small integer table for cluster.");
+        this.headerTable = ints;
+        if(DebugPolicy.REPORT_CLUSTER_EVENTS) new Exception(Long.toString(clusterId)).printStackTrace();
+        this.resourceTable = new ResourceTableSmall(this, ints, RESOURCE_TABLE_OFFSET, longs);
+        this.foreignTable = new ForeignTableSmall(this, headerTable, FOREIGN_TABLE_OFFSET, longs);
+        this.predicateTable = new PredicateTable(this, ints, PREDICATE_TABLE_OFFSET, ints);
+        this.objectTable = new ObjectTable(this, ints, OBJECT_TABLE_OFFSET, ints);
+        this.valueTable = new ValueTableSmall(this, ints, VALUE_TABLE_OFFSET, bytes);
+        this.completeTable = new CompleteTableSmall(this, headerTable, COMPLETE_TABLE_OFFSET, ints);
+        this.clusterMap = new ClusterMapSmall(this, foreignTable);
+        this.clusterSupport = support;
+        this.clusterBits = ClusterTraitsBase.getClusterBits(clusterKey);
+        this.importance = clusterTable.timeCounter();
+        clusterTable.markImmutable(this, getImmutable());
+    }
+    void analyse() {
+        System.out.println("Cluster " + clusterId);
+        System.out.println("-size:" + getUsedSpace());
+        System.out.println(" -rt:" + (resourceTable.getTableCapacity() * 8 + 8));
+        System.out.println(" -ft:" + foreignTable.getTableCapacity() * 8);
+        System.out.println(" -pt:" + predicateTable.getTableCapacity() * 4);
+        System.out.println(" -ot:" + objectTable.getTableCapacity() * 4);
+        System.out.println(" -ct:" + completeTable.getTableCapacity() * 4);
+        System.out.println(" -vt:" + valueTable.getTableCapacity());
+
+        System.out.println("-resourceTable:");
+        System.out.println(" -resourceCount=" + resourceTable.getResourceCount());
+        System.out.println(" -size=" + resourceTable.getTableSize());
+        System.out.println(" -capacity=" + resourceTable.getTableCapacity());
+        System.out.println(" -count=" + resourceTable.getTableCount());
+        System.out.println(" -size=" + resourceTable.getTableSize());
+        //resourceTable.analyse();
+    }
+    public void checkDirectReference(int dr)
+    throws DatabaseException {
+        if (deleted) return;
+        if (!ClusterTraits.statementIndexIsDirect(dr))
+            throw new ValidationException("Reference is not direct. Reference=" + dr);
+        if (ClusterTraits.isFlat(dr))
+            throw new ValidationException("Reference is flat. Reference=" + dr);
+        if (ClusterTraits.isLocal(dr)) {
+            if (dr < 1 || dr > resourceTable.getUsedSize())
+                throw new ValidationException("Illegal local reference. Reference=" + dr);
+        } else {
+            int fi = ClusterTraits.getForeignIndexFromReference(dr);
+            int ri = ClusterTraits.getResourceIndexFromForeignReference(dr);
+            if (fi < 1 || fi > foreignTable.getUsedSize())
+                throw new ValidationException("Illegal foreign reference. Reference=" + dr + " foreign index=" + fi);
+            if (ri < 1 || ri > ClusterTraits.getMaxNumberOfResources())
+                throw new ValidationException("Illegal foreign reference. Reference=" + dr + " resource index=" + ri);
+        }
+    }
+    public void checkPredicateIndex(int pi)
+    throws DatabaseException {
+        if (deleted) return;
+        //        predicateTable.checkPredicateSetIndex(this, pi);
+    }
+    public void checkObjectSetReference(int or)
+    throws DatabaseException {
+        if (deleted) return;
+        if (ClusterTraits.statementIndexIsDirect(or))
+            throw new ValidationException("Illegal object set reference. Reference=" + or);
+        int oi = ClusterTraits.statementIndexGet(or);
+        this.objectTable.checkObjectSetIndex(this, oi);
+    }
+
+    public void checkValueInit()
+    throws DatabaseException {
+        valueTable.checkValueInit();
+    }
+    public void checkValue(int capacity, int index)
+    throws DatabaseException {
+        valueTable.checkValue(capacity, index);
+    }
+    public void checkValueFini()
+    throws DatabaseException {
+        valueTable.checkValueFini();
+    }
+    public void checkForeingIndex(int fi)
+    throws DatabaseException {
+        if (deleted) return;
+        if (fi<1 || fi > foreignTable.getUsedSize())
+            throw new ValidationException("Illegal foreign index=" + fi);
+    }
+    public void checkCompleteSetReference(int cr)
+    throws DatabaseException {
+        if (!ClusterTraits.completeReferenceIsMultiple(cr))
+            throw new ValidationException("Illegal complete set reference. Reference=" + cr);
+        int ci = cr;
+        this.completeTable.checkCompleteSetIndex(this, ci);
+    }
+    public void check()
+    throws DatabaseException {
+        if (deleted) return;
+//        this.completeTable.check(this);
+//        this.objectTable.check(this);
+//        // Must be after object table check.
+//        this.predicateTable.check(this);
+//        this.resourceTable.check(this);
+    }
+    @Override
+    public CompleteTypeEnum getCompleteType(int resourceKey, ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return CompleteTypeEnum.NotComplete;
+        final int resourceRef = getLocalReference(resourceKey);
+        CompleteTypeEnum ct = resourceTable.getCompleteType(resourceRef);
+        if (DEBUG)
+            System.out.println("ClusterSmall.getCompleteType rk=" + resourceKey + " ct=" + ct);
+        return ct;
+    }
+
+    @Override
+    public int getCompleteObjectKey(int resourceKey, ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return 0;
+        final int resourceIndexOld = getLocalReference(resourceKey);
+        short completeRef = resourceTable.getCompleteObjectRef(resourceIndexOld);
+        int clusterIndex;
+        int resourceIndex;
+        if (0 == completeRef)
+            throw new DatabaseException("Resource's complete object refernce is null. Resource key=" + resourceKey + ".");
+        ClusterI.CompleteTypeEnum completeType = resourceTable.getCompleteType(resourceIndexOld);
+        if (completeType == ClusterI.CompleteTypeEnum.NotComplete)
+            throw new DatabaseException("Resource has multiple complete objects. Resource key=" + resourceKey + ".");
+        if (ClusterTraitsSmall.resourceRefIsLocal(completeRef)) {
+            clusterIndex = clusterKey;
+            resourceIndex = completeRef;
+        } else { // Resource has one complete statement.
+            ResourceUID resourceUID = clusterMap.getForeignResourceUID(completeRef);
+            ClusterI c = support.getClusterByClusterUIDOrMake(resourceUID.asCID());
+            clusterIndex = c.getClusterKey();
+            resourceIndex = resourceUID.getIndex();
+        }
+        int key = ClusterTraits.createResourceKey(clusterIndex, resourceIndex);
+        if (DEBUG)
+            System.out.println("ClusterSmall.complete object rk=" + resourceKey + " ck=" + key);
+        return key;
+    }
+
+    @Override
+    public boolean isComplete(int resourceKey, ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return false;
+        final int resourceRef = getLocalReference(resourceKey);
+        final ClusterI.CompleteTypeEnum completeType = resourceTable.getCompleteType(resourceRef);
+        boolean complete = completeType != ClusterI.CompleteTypeEnum.NotComplete;
+        if (DEBUG)
+            System.out.println("ClusterSmall.key=" + resourceKey + " isComplete=" + complete);
+        return complete;
+    }
+    public int getSingleObject(int resourceKey, int predicateKey, int objectIndex, ClusterSupport support) throws DatabaseException {
+        if (DEBUG)
+            System.out.println("ClusterSmall.getSingleObject: rk=" + resourceKey + " pk=" + predicateKey);
+        if (deleted) return 0;
+        if (0 == objectIndex) {
+            final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKeyNoThrow(resourceKey);
+            final short pRef = getInternalReferenceOrZero2(predicateKey, support);
+            final ClusterI.CompleteTypeEnum pCompleteType = ClusterTraitsBase.getCompleteTypeFromResourceKey(predicateKey);
+            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);
+        }
+        return objectTable.getSingleObject(objectIndex, support, this);
+    }
+
+    public void forObjects(ReadGraphImpl graph, int resourceKey, int predicateKey, int objectIndex, SyncMultiProcedure<Resource> procedure,
+            ClusterSupport support) throws DatabaseException {
+        if (deleted) return;
+        if (DEBUG)
+            System.out.println("ClusterSmall.forObjects1: rk=" + resourceKey + " pk=" + predicateKey);
+        if (0 == objectIndex) {
+            final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);
+            final int pRef = getInternalReferenceOrZero2(predicateKey, support);
+            final ClusterI.CompleteTypeEnum pCompleteType = ClusterTraitsBase.getCompleteTypeFromResourceKey(predicateKey);
+            resourceTable.foreachObject(resourceIndex, graph, procedure, support, pRef, pCompleteType, completeTable, this);
+            return;
+        }
+        objectTable.foreachObject(graph, objectIndex, procedure, this);
+    }
+
+    public <C> void forObjects(ReadGraphImpl graph, int resourceKey, int predicateKey, int objectIndex, C context, SyncContextMultiProcedure<C, Resource> procedure,
+            ClusterSupport support) throws DatabaseException {
+        if (DEBUG)
+            System.out.println("ClusterSmall.forObjects1: rk=" + resourceKey + " pk=" + predicateKey);
+        if (deleted) return;
+        if (0 == objectIndex) {
+            final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);
+            final int pRef = getInternalReferenceOrZero2(predicateKey, support);
+            final ClusterI.CompleteTypeEnum pCompleteType = ClusterTraitsBase.getCompleteTypeFromResourceKey(predicateKey);
+            resourceTable.foreachObject(resourceIndex, graph, context, procedure, support, pRef, pCompleteType, completeTable, this);
+            return;
+        }
+        objectTable.foreachObject(graph, objectIndex, context, procedure, this);
+    }
+
+    @Override
+    public <Context> boolean forObjects(int resourceKey, int predicateKey, int objectIndex, ObjectProcedure<Context> procedure,
+            Context context, ClusterSupport support) throws DatabaseException {
+        if (DEBUG)
+            System.out.println("ClusterSmall.forObjects2: rk=" + resourceKey + " pk=" + predicateKey);
+        if (deleted) return false;
+        if (0 == objectIndex) {
+            final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);
+            final short pRef = getInternalReferenceOrZero2(predicateKey, support);
+            final ClusterI.CompleteTypeEnum pCompleteType = ClusterTraitsBase.getCompleteTypeFromResourceKey(predicateKey);
+            return resourceTable.foreachObject(resourceIndex, procedure, context, support, this, pRef, pCompleteType, completeTable);
+        }
+        return objectTable.foreachObject(objectIndex, procedure, context, support, this);
+    }
+
+    @Override
+    public int getSingleObject(int resourceKey, int predicateKey, ClusterSupport support) throws DatabaseException {
+        if (DEBUG)
+            System.out.println("ClusterSmall.getSingleObject2: rk=" + resourceKey + " pk=" + predicateKey);
+        if (deleted) return 0;
+        final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);
+        final short pRef = getInternalReferenceOrZero2(predicateKey, support);
+        final int completeType = ClusterTraitsBase.getCompleteTypeIntFromResourceKey(predicateKey);
+        final ClusterI.CompleteTypeEnum pCompleteType = CompleteTypeEnum.make(completeType);
+        if (completeType > 0)
+            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);
+        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;
+        if (0 == predicateIndex) // All relevant data is in resource table.
+            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);
+        int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);
+        return getSingleObject(resourceKey, predicateKey, objectIndex, support);
+    }
+
+    @Override
+    public <T> int getSingleObject(int resourceKey, ForPossibleRelatedValueProcedure<T> procedure, ClusterSupport support) throws DatabaseException {
+        if (deleted) return 0;
+        final short resourceIndex = (short)ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);
+        final int predicateKey = procedure.predicateKey;
+        int clusterKey = ClusterTraitsBase.getClusterMaskFromResourceKey(resourceKey);
+        short pRef = 0;
+        if(procedure.clusterKey[0] == clusterKey) {
+            pRef = (short)procedure.predicateReference[0];
+        } else {
+            pRef = getInternalReferenceOrZero2(predicateKey, support);
+            procedure.clusterKey[0] = clusterKey;
+            procedure.predicateReference[0] = pRef;
+        }
+
+        final ClusterI.CompleteTypeEnum pCompleteType = procedure.completeType;
+        if (CompleteTypeEnum.NotComplete != pCompleteType)
+            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);
+        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;
+        if (0 == predicateIndex) // All relevant data is in resource table.
+            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);
+        int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);
+        return getSingleObject(resourceKey, predicateKey, objectIndex, support);
+    }
+
+    @Override
+    public <C, T> int getSingleObject(int resourceKey, ForPossibleRelatedValueContextProcedure<C, T> procedure, ClusterSupport support) throws DatabaseException {
+        if (deleted) return 0;
+        final short resourceIndex = (short)ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);
+        final int predicateKey = procedure.predicateKey;
+        int clusterKey = ClusterTraitsBase.getClusterMaskFromResourceKey(resourceKey);
+        short pRef = 0;
+        if(procedure.clusterKey[0] == clusterKey) {
+            pRef = (short)procedure.predicateReference[0];
+        } else {
+            pRef = getInternalReferenceOrZero2(predicateKey, support);
+            procedure.clusterKey[0] = clusterKey;
+            procedure.predicateReference[0] = pRef;
+        }
+        final ClusterI.CompleteTypeEnum pCompleteType = procedure.completeType;
+        if (CompleteTypeEnum.NotComplete != pCompleteType)
+            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);
+        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;
+        if (0 == predicateIndex) // All relevant data is in resource table.
+            return resourceTable.getSingleObject(resourceIndex, support, pRef, pCompleteType, completeTable, this);
+        int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);
+        return getSingleObject(resourceKey, predicateKey, objectIndex, support);
+    }
+
+    @Override
+    public void forObjects(ReadGraphImpl graph, int resourceKey,
+            int predicateKey, SyncMultiProcedure<Resource> procedure) throws DatabaseException {
+        if (deleted) return;
+        SessionImplSocket session = (SessionImplSocket)graph.getSession();
+        ClusterSupport support = session.clusterTranslator;
+        if (DEBUG)
+            System.out.println("ClusterSmall.forObjects3: rk=" + resourceKey + " pk=" + predicateKey);
+        final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);
+        final int pRef = getInternalReferenceOrZero2(predicateKey, support);
+        final int completeType = ClusterTraitsBase.getCompleteTypeIntFromResourceKey(predicateKey);
+        final ClusterI.CompleteTypeEnum pCompleteType = CompleteTypeEnum.make(completeType);
+        if (completeType > 0) {
+            resourceTable.foreachObject(resourceIndex, graph, procedure, support, pRef, pCompleteType, completeTable, this);
+            return;
+        }
+        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;
+        if (0 == predicateIndex) {
+            resourceTable.foreachObject(resourceIndex, graph, procedure, support, pRef, pCompleteType, completeTable, this);
+            return;
+        }
+        int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);
+        forObjects(graph, resourceKey, predicateKey, objectIndex, procedure, support);
+    }
+
+    public void forObjects(ReadGraphImpl graph, int resourceKey, ForEachObjectProcedure procedure) throws DatabaseException {
+        if (deleted) return;
+        final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);
+        final int predicateKey = procedure.predicateKey;
+        int clusterKey = ClusterTraitsBase.getClusterMaskFromResourceKey(resourceKey);
+        int pRef = 0;
+        if(procedure.clusterKey[0] == clusterKey) {
+            pRef = procedure.predicateReference[0];
+        } else {
+            SessionImplSocket session = (SessionImplSocket)graph.getSession();
+            ClusterSupport support = session.clusterTranslator;
+            pRef = getInternalReferenceOrZero2(predicateKey, support);
+            procedure.clusterKey[0] = clusterKey;
+            procedure.predicateReference[0] = pRef;
+        }
+        final ClusterI.CompleteTypeEnum pCompleteType = procedure.completeType;
+        if (ClusterI.CompleteTypeEnum.NotComplete != pCompleteType) {
+            SessionImplSocket session = (SessionImplSocket)graph.getSession();
+            ClusterSupport support = session.clusterTranslator;
+            resourceTable.foreachObject(resourceIndex, graph, procedure, support, pRef, pCompleteType, completeTable, this);
+            return;
+        }
+        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;
+        if (0 == predicateIndex) {
+            SessionImplSocket session = (SessionImplSocket)graph.getSession();
+            ClusterSupport support = session.clusterTranslator;
+            resourceTable.foreachObject(resourceIndex, graph, procedure, support, pRef, pCompleteType, completeTable, this);
+            return;
+        }
+        int hashBase = predicateIndex + predicateTable.offset;
+        if (predicateTable.table[hashBase-1] < 0) {
+            int objectIndex = TableIntArraySet2.get(predicateTable.table, hashBase, pRef & 0xFFFF);
+            //int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);
+            SessionImplSocket session = (SessionImplSocket)graph.getSession();
+            ClusterSupport support = session.clusterTranslator;
+            forObjects(graph, resourceKey, predicateKey, objectIndex, procedure, support);
+        } else {
+            procedure.finished(graph);
+//            graph.dec();
+        }
+}
+
+    public <C> void forObjects(ReadGraphImpl graph, int resourceKey, C context, ForEachObjectContextProcedure<C> procedure) throws DatabaseException {
+        if (deleted) return;
+        final int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);
+        final int predicateKey = procedure.predicateKey;
+        int clusterKey = ClusterTraitsBase.getClusterMaskFromResourceKey(resourceKey);
+        int pRef = 0;
+        if(procedure.clusterKey[0] == clusterKey) {
+            pRef = procedure.predicateReference[0];
+        } else {
+            SessionImplSocket session = (SessionImplSocket)graph.getSession();
+            ClusterSupport support = session.clusterTranslator;
+            pRef = getInternalReferenceOrZero2(predicateKey, support);
+            procedure.clusterKey[0] = clusterKey;
+            procedure.predicateReference[0] = pRef;
+        }
+
+        final ClusterI.CompleteTypeEnum pCompleteType = procedure.completeType;
+        if (ClusterI.CompleteTypeEnum.NotComplete != pCompleteType) {
+            SessionImplSocket session = (SessionImplSocket)graph.getSession();
+            ClusterSupport support = session.clusterTranslator;
+            resourceTable.foreachObject(resourceIndex, graph, context, procedure, support, pRef, pCompleteType, completeTable, this);
+            return;
+        }
+        final int predicateIndex = (int)resourceTable.table[(resourceIndex<<1) - 1 + resourceTable.offset] & 0xFFFFFF;
+        if (0 == predicateIndex) {
+            SessionImplSocket session = (SessionImplSocket)graph.getSession();
+            ClusterSupport support = session.clusterTranslator;
+            resourceTable.foreachObject(resourceIndex, graph, context, procedure, support, pRef, pCompleteType, completeTable, this);
+            return;
+        }
+        int hashBase = predicateIndex + predicateTable.offset;
+        if(predicateTable.table[hashBase-1] < 0) {
+            int objectIndex = TableIntArraySet2.get(predicateTable.table, hashBase, pRef & 0xFFFF);
+            SessionImplSocket session = (SessionImplSocket)graph.getSession();
+            ClusterSupport support = session.clusterTranslator;
+            forObjects(graph, resourceKey, predicateKey, objectIndex, context, procedure, support);
+        } else {
+            int objectIndex = TableIntSet2.get(predicateTable.table, hashBase, pRef & 0xFFFF);
+            SessionImplSocket session = (SessionImplSocket)graph.getSession();
+            ClusterSupport support = session.clusterTranslator;
+            forObjects(graph, resourceKey, predicateKey, objectIndex, context, procedure, support);
+        }
+    }
+    @Override
+    public <Context> boolean forObjects(int resourceKey, int predicateKey,
+            ObjectProcedure<Context> procedure, Context context, ClusterSupport support)
+    throws DatabaseException {
+        if (DEBUG)
+            System.out.println("ClusterSmall.forObjects4: rk=" + resourceKey + " pk=" + predicateKey);
+        if (deleted) return false;
+        final short resourceIndex = (short)ClusterTraitsBase.getResourceIndexFromResourceKey(resourceKey);
+        final short pRef = getInternalReferenceOrZero2(predicateKey, support);
+        final ClusterI.CompleteTypeEnum pCompleteType = ClusterTraitsBase.getCompleteTypeFromResourceKey(predicateKey);
+        // PredicateType is complete i.e. all relevant data is in resource table.
+        if (ClusterI.CompleteTypeEnum.NotComplete != pCompleteType) {
+            if (DEBUG)
+                System.out.println("ClusterSmall.forObjects: complete type was " + pCompleteType + " cluster=" + getClusterUID());
+            return resourceTable.foreachObject(resourceIndex, procedure, context, support, this, pRef, pCompleteType, completeTable);
+        }
+        final int predicateIndex = resourceTable.getPredicateIndex(resourceIndex);
+        if (0 == predicateIndex) { // All relevant data is in resource table.
+            if (DEBUG)
+                System.out.println("ClusterSmall.forObjects: no predicate table " + pCompleteType);
+            return resourceTable.foreachObject(resourceIndex, procedure, context, support, this, pRef, pCompleteType, completeTable);
+        }
+        int objectIndex = predicateTable.getObjectIndex(predicateIndex, pRef & 0xFFFF);
+        return forObjects(resourceKey, predicateKey, objectIndex, procedure, context, support);
+    }
+    @Override
+    public <Context> boolean forPredicates(int resourceKey,
+            PredicateProcedure<Context> procedure, Context context, ClusterSupport support)
+    throws DatabaseException {
+        if (DEBUG)
+            System.out.println("ClusterSmall.forPredicates: rk=" + resourceKey );
+        if (deleted) return false;
+        if(proxy) {
+            ClusterImpl cluster = clusterTable.load2(clusterId, clusterKey);
+            return cluster.forPredicates(resourceKey, procedure, context, support);
+        }
+
+        final int resourceIndex = getLocalReference(resourceKey);
+        final int predicateIndex = resourceTable.getPredicateIndex(resourceIndex);
+        if (0 == predicateIndex)
+            return resourceTable.foreachPredicate(resourceIndex,
+                    procedure, context, support, this, completeTable);
+        else {
+            boolean broken = resourceTable.foreachPredicate(resourceIndex,
+                    procedure, context, support, this, completeTable);
+            if (broken)
+                return true;
+        }
+        return predicateTable.foreachPredicate(predicateIndex,
+                procedure, context, support, this);
+    }
+    @Override
+    public ClusterI addRelation(int sResourceKey, int pResourceKey, int oResourceKey, ClusterSupport support)
+    throws DatabaseException {
+        if (DEBUG)
+            System.out.println("add rk=" + sResourceKey + " pk=" + pResourceKey + " ok=" + oResourceKey);
+        if (deleted) return null;
+        if(proxy) {
+            ClusterImpl cluster = clusterTable.load2(clusterId, clusterKey);
+            return cluster.addRelation(sResourceKey, pResourceKey, oResourceKey, support);
+        }
+
+        //        check();
+        boolean ret;
+        try {
+            short sri = getLocalReferenceAnd(sResourceKey, support, ClusterChange.ADD_OPERATION);
+            short pri = getReferenceOrCreateIfForeign(pResourceKey, support, ClusterStream.NULL_OPERATION);
+            short ori = getReferenceOrCreateIfForeign(oResourceKey, support, ClusterStream.NULL_OPERATION);
+            ClusterI.CompleteTypeEnum completeType = ClusterTraitsBase.getCompleteTypeFromResourceKey(pResourceKey);
+            ret = addRelationInternal(sri, pri, ori, completeType);
+            calculateModifiedId();
+        } catch (OutOfSpaceException e) {
+            boolean streamOff = support.getStreamOff();
+            if (!streamOff) {
+                support.cancelStatement(this);
+                support.setStreamOff(true);
+            }
+            ClusterI cluster = toBig(support);
+            if (!streamOff)
+                support.setStreamOff(false);
+            ClusterI cluster2 = cluster.addRelation(sResourceKey, pResourceKey, oResourceKey, support);
+            if (cluster != cluster2)
+                throw new DatabaseException("Internal error, cluster mismatch.");
+            return cluster;
+        }
+//        check();
+        if (ret) {
+            support.addStatement(this);
+            return this;
+        } else {
+            support.cancelStatement(this);
+            return null;
+        }
+    }
+    @Override
+    public boolean removeRelation(int sResourceKey, int pResourceKey, int oResourceKey, ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return false;
+        short sri = getLocalReferenceAnd(sResourceKey, support, ClusterChange.REMOVE_OPERATION);
+        short pri = getInternalReferenceOrZeroAnd(pResourceKey, support, ClusterStream.NULL_OPERATION);
+        short ori = getInternalReferenceOrZeroAnd(oResourceKey, support, ClusterStream.NULL_OPERATION);
+        boolean ret = false;
+        if (0 != pri && 0 != ori) {
+            ClusterI.CompleteTypeEnum completeType = ClusterTraitsBase.getCompleteTypeFromResourceKey(pResourceKey);
+            ret = removeRelationInternal(sri, pri, ori, completeType, support);
+            calculateModifiedId();
+        }
+        if (ret)
+            support.removeStatement(this);
+        else
+            support.cancelStatement(this);
+        //        check();
+        return ret;
+    }
+    @Override
+    public void denyRelation(int sResourceKey, int pResourceKey, int oResourceKey, ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return;
+        short s = checkResourceKeyIsOursAndGetResourceIndexIf(sResourceKey, support);
+        ResourceReferenceAndCluster p = checkResourceKeyAndGetResourceIndexIf(pResourceKey, support);
+        ResourceReferenceAndCluster o = checkResourceKeyAndGetResourceIndexIf(oResourceKey, support);
+        if (0 == s || 0 == p.reference || 0 == o.reference)
+            return;
+        //        check();
+        ClusterI.CompleteTypeEnum completeType = ClusterTraitsBase.getCompleteTypeFromResourceKey(pResourceKey);
+        boolean ret = removeRelationInternal(s, p.reference, o.reference, completeType, support);
+        if (ret) {
+            support.addStatementIndex(this, sResourceKey, getClusterUID(), ClusterChange.REMOVE_OPERATION);
+            support.addStatementIndex(this, pResourceKey, p.clusterUID, ClusterStream.NULL_OPERATION);
+            support.addStatementIndex(this, oResourceKey, o.clusterUID, ClusterStream.NULL_OPERATION);
+            support.removeStatement(this);
+        }
+        calculateModifiedId();
+        //        check();
+        return;
+    }
+    @Override
+    public InputStream getValueStream(int resourceKey, ClusterSupport support) throws DatabaseException {
+        if (DEBUG)
+            System.out.println("ClusterSmall.getValue " + resourceKey);
+        if (deleted) return null;
+        int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKeyNoThrow(resourceKey);
+        try {
+            byte[] buffer = resourceTable.getValue(valueTable, resourceIndex);
+            if(buffer == null) return null;
+            return new ByteArrayInputStream(buffer);
+        } catch (ExternalValueException e) {
+            return support.getValueStreamEx(resourceIndex, clusterId);
+        }
+    }
+    @Override
+    public byte[] getValue(int resourceKey, ClusterSupport support)
+    throws DatabaseException {
+        if (DEBUG)
+            System.out.println("ClusterSmall.getValue " + resourceKey);
+        if (deleted) return null;
+        int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKeyNoThrow(resourceKey);
+        try {
+            return resourceTable.getValue(valueTable, resourceIndex);
+        } catch (ExternalValueException e) {
+            return support.getValueEx(resourceIndex, clusterId);
+        }
+    }
+    @Override
+    public boolean hasValue(int resourceKey, ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return false;
+        if(proxy) {
+            ClusterImpl cluster = clusterTable.load2(clusterId, clusterKey);
+            return cluster.hasValue(resourceKey, support);
+        }
+        int resourceIndex = getLocalReference(resourceKey);
+        return resourceTable.hasValue(resourceIndex);
+    }
+    @Override
+    public boolean removeValue(int resourceKey, ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return false;
+        int resourceIndex = getLocalReferenceAnd(resourceKey, support, ClusterChange.DELETE_OPERATION);
+        support.removeValue(this);
+        calculateModifiedId();
+        return resourceTable.removeValue(valueTable, resourceIndex);
+    }
+    @Override
+    public ClusterI setValue(int rResourceId, byte[] value, int length, ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return null;
+        int resourceIndex = getLocalReferenceAnd(rResourceId, support, ClusterStream.SET_OPERATION);
+        support.setValue(this, getClusterId(), value, length);
+        try {
+            resourceTable.setValue(valueTable, resourceIndex, value, length);
+            calculateModifiedId();
+            return this;
+        } catch (OutOfSpaceException e) {
+            boolean streamOff = support.getStreamOff();
+            if (!streamOff)
+                support.setStreamOff(true);
+            ClusterI cluster = toBig(support);
+            cluster.setValue(rResourceId, value, length, support);
+            if (!streamOff)
+                support.setStreamOff(false);
+            return cluster;
+        }
+    }
+    @Override
+    public ClusterI modiValueEx(int rResourceId, long voffset, int length, byte[] value, int offset, ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return null;
+        int resourceIndex = getLocalReferenceAnd(rResourceId, support, ClusterStream.MODI_OPERATION);
+        support.modiValue(this, getClusterId(), voffset, length, value, offset);
+        resourceTable.setValueEx(valueTable, resourceIndex);
+        calculateModifiedId();
+        return this;
+    }
+    @Override
+    public byte[] readValueEx(int rResourceId, long voffset, int length, ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return null;
+        int resourceIndex = getLocalReference(rResourceId);
+        boolean isExternal = resourceTable.isValueEx(valueTable, resourceIndex);
+        if (!isExternal)
+            throw new DatabaseException("ClusterI.readValue supported only for external value. Resource key=" + rResourceId);
+        return support.getValueEx(resourceIndex, getClusterId(), voffset, length);
+    }
+    @Override
+    public long getValueSizeEx(int rResourceId, ClusterSupport support)
+    throws DatabaseException, ExternalValueException {
+        if (deleted) return 0;
+        int resourceIndex = getLocalReference(rResourceId);
+        boolean isExternal = resourceTable.isValueEx(valueTable, resourceIndex);
+        if (!isExternal)
+            throw new ExternalValueException("ClusterI.getValueSizeEx supported only for external value. Resource key=" + rResourceId);
+        return support.getValueSizeEx(resourceIndex, getClusterId());
+    }
+    @Override
+    public void setValueEx(int rResourceId)
+    throws DatabaseException {
+        int resourceIndex = getLocalReference(rResourceId);
+        resourceTable.setValueEx(valueTable, resourceIndex);
+    }
+    @Override
+    public int createResource(ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return 0;
+        if(proxy) {
+            ClusterImpl cluster = clusterTable.load2(clusterId, clusterKey);
+            return cluster.createResource(support);
+        }
+
+        short resourceIndex = resourceTable.createResource();
+        calculateModifiedId();
+        if(DebugPolicy.REPORT_RESOURCE_ID_ALLOCATION)
+            System.out.println("[RID_ALLOCATION]: ClusterSmall[" + clusterId + "] allocates " + resourceIndex);
+        support.createResource(this, resourceIndex, getClusterId());
+        return ClusterTraits.createResourceKey(clusterKey, resourceIndex);
+    }
+    @Override
+    public boolean hasResource(int resourceKey, ClusterSupport support) {
+        if(proxy) {
+                       try {
+                               ClusterImpl cluster = clusterTable.load2(clusterId, clusterKey);
+                   return cluster.hasResource(resourceKey, support);
+                       } catch (DatabaseException e) {
+                               LOGGER.error("Failed to load cluster with clusterId " + clusterId);
+                               return false;
+                       }
+        }
+        if (deleted) return false;
+        int clusterKey = ClusterTraitsBase.getClusterKeyFromResourceKeyNoThrow(resourceKey);
+        if (this.clusterKey != clusterKey) // foreign resource
+            return false;
+        int resourceIndex;
+        try {
+            resourceIndex = ClusterTraits.getResourceIndexFromResourceKey(resourceKey);
+        } catch (DatabaseException e) {
+            return false;
+        }
+        if (resourceIndex > 0 & resourceIndex <= resourceTable.getTableCount())
+            return true;
+        else
+            return false;
+    }
+    @Override
+    public int getNumberOfResources(ClusterSupport support)
+    throws DatabaseException  {
+        if (deleted) return 0;
+        if(proxy) {
+            ClusterImpl cluster = clusterTable.load2(clusterId, clusterKey);
+            return cluster.getNumberOfResources(support);
+        }
+
+        return resourceTable.getUsedSize();
+    }
+
+    public int getNumberOfResources() {
+        if (deleted || proxy)
+            return 0;
+        return resourceTable.getUsedSize();
+    }
+
+    @Override
+    public long getUsedSpace() {
+        if (deleted) return 0;
+        if(isEmpty()) return 0;
+        long rt = resourceTable.getTableCapacity() * 8 + 8; // (8 = cluster id)
+        long ft = foreignTable.getTableCapacity() * 8;
+        long pt = predicateTable.getTableCapacity() * 4;
+        long ot = objectTable.getTableCapacity() * 4;
+        long ct = completeTable.getTableCapacity() * 4;
+        long vt = valueTable.getTableCapacity() * 1;
+        long cm = clusterMap.getUsedSpace();
+        return rt + ft + pt + ot + ct + vt + cm;
+    }
+    @Override
+    public boolean isEmpty() {
+        if (deleted) return true; // Deleted cluster is always empty.
+        if(resourceTable == null) return true;
+        return resourceTable.getTableCount() == 0;
+    }
+    @Override
+    public void printDebugInfo(String message, ClusterSupport support)
+    throws DatabaseException {
+        if (deleted) return;
+        throw new DatabaseException("Not implemented!");
+    }
+    private short getInternalReferenceOrZero2(int resourceKey, ClusterSupport support) throws DatabaseException {
+        int resourceIndex = ClusterTraitsBase.getResourceIndexFromResourceKeyNoThrow(resourceKey);
+        if (!ClusterTraitsBase.isCluster(clusterBits, resourceKey)) {
+            return clusterMap.getForeignReferenceOrZero(resourceKey);
+        } else {
+            return (short)resourceIndex;
+        }
+    }
+    private short getInternalReferenceOrZeroAnd(int resourceKey, ClusterSupport support, byte op)
+    throws DatabaseException {
+        int clusterKey = ClusterTraits.getClusterKeyFromResourceKey(resourceKey);
+        int resourceIndex = ClusterTraits.getResourceIndexFromResourceKey(resourceKey);
+        if (this.clusterKey != clusterKey) { // foreign resource
+            ClusterI foreignCluster = support.getClusterByClusterKey(clusterKey);
+            ClusterUID clusterUID = foreignCluster.getClusterUID();
+            short foreignRef = clusterMap.getForeignReferenceOrZero(resourceKey);
+            support.addStatementIndex(this, resourceKey, clusterUID, op);
+            return foreignRef;
+        }
+        support.addStatementIndex(this, resourceKey, getClusterUID(), op);
+        return (short)resourceIndex;
+    }
+    private final short getLocalReference(int resourceKey) throws DatabaseException {
+        return ClusterTraits.getResourceIndexFromResourceKeyNoThrow(resourceKey);
+    }
+    private final short getLocalReferenceAnd(int resourceKey, ClusterSupport support, byte op)
+    throws DatabaseException {
+        short resourceIndex = getLocalReference(resourceKey);
+        support.addStatementIndex(this, resourceKey, getClusterUID(), op);
+        return resourceIndex;
+    }
+    private short checkResourceKeyIsOursAndGetResourceIndexIf(int resourceKey, ClusterSupport support)
+    throws DatabaseException {
+        int clusterShortId = ClusterTraits.getClusterKeyFromResourceKey(resourceKey);
+        if (this.clusterKey != clusterShortId)
+            return 0;
+        int resourceIndex = ClusterTraits.getResourceIndexFromResourceKey(resourceKey);
+        return (short)resourceIndex;
+    }
+    private short getReferenceOrCreateIfForeign(int resourceKey, ClusterSupport support, byte op)
+    throws DatabaseException {
+        int clusterKey = ClusterTraits.getClusterKeyFromResourceKey(resourceKey);
+        short resourceIndex = (short)ClusterTraits.getResourceIndexFromResourceKey(resourceKey);
+        if (this.clusterKey != clusterKey) {
+            ClusterI foreignCluster = support.getClusterByClusterKey(clusterKey);
+            ClusterUID clusterUID = foreignCluster.getClusterUID();
+            support.addStatementIndex(this, resourceKey, clusterUID, op);
+            short ref = clusterMap.getForeignReferenceOrCreateByResourceKey(resourceKey, clusterUID);
+            return ref;
+        }
+        support.addStatementIndex(this, resourceKey, getClusterUID(), op);
+        return resourceIndex;
+    }
+    private class ResourceReferenceAndCluster {
+        ResourceReferenceAndCluster(short reference, ClusterUID clusterUID) {
+            this.reference = reference;
+            this.clusterUID = clusterUID;
+        }
+        public final short reference;
+        public final ClusterUID clusterUID;
+    }
+    private ResourceReferenceAndCluster checkResourceKeyAndGetResourceIndexIf(int resourceKey, ClusterSupport support)
+    throws DatabaseException {
+        int clusterKey = ClusterTraits.getClusterKeyFromResourceKey(resourceKey);
+        short resourceIndex = (short)ClusterTraits.getResourceIndexFromResourceKey(resourceKey);
+        if (this.clusterKey != clusterKey) { // foreign resource
+            ClusterI foreignCluster = support.getClusterByClusterKey(clusterKey);
+            ClusterUID clusterUID = foreignCluster.getClusterUID();
+            short ref = clusterMap.getForeignReferenceOrZero(resourceKey);
+            return new ResourceReferenceAndCluster(ref, clusterUID);
+        }
+        return new ResourceReferenceAndCluster(resourceIndex, getClusterUID());
+    }
+
+    static long fTime = 0;
+    
+    int executeIndex = 0;
+    long clusterUID1 = 0;
+    long clusterUID2 = 0;
+
+    @Override
+    final public int execute(int resourceReference) throws DatabaseException {
+       
+        if (deleted) return 0;
+        short resourceRef = (short)resourceReference;
+        int key;
+        if (ClusterTraitsSmall.resourceRefIsLocal(resourceRef)) {
+            key = clusterBits | resourceRef;
+        } else {
+            // TODO: not so nice
+            synchronized(this) {
+                foreignTable.fillResourceUID(ClusterTraitsSmall.resourceRefGetForeignIndex((short)resourceRef), this);
+                key = ClusterTraitsBase.createResourceKey(clusterSupport.getClusterKeyByClusterUIDOrMake(clusterUID1, clusterUID2), executeIndex);
+            }
+        }
+        if (DEBUG)
+            System.out.println("ClusterSmall.execute key=" + key);
+        return key;
+    }
+
+    private boolean addRelationInternal(short sReference, short pReference, short oReference, ClusterI.CompleteTypeEnum completeType)
+    throws DatabaseException {
+        int predicateIndex = resourceTable.addStatement(sReference, pReference, oReference, predicateTable, objectTable, completeType, completeTable);
+        if (0 == predicateIndex)
+            return true; // added to resourceTable
+        else if (0 > predicateIndex)
+            return false; // old complete statemenent
+        int newPredicateIndex = predicateTable.addPredicate(predicateIndex, 0xFFFF & pReference, 0xFFFF & oReference, objectTable);
+        if (0 == newPredicateIndex)
+            return false;
+        if (predicateIndex != newPredicateIndex)
+            resourceTable.setPredicateIndex(sReference, newPredicateIndex);
+        return true;
+    }
+    private boolean removeRelationInternal(int sResourceIndex, short pResourceIndex,
+            short oResourceIndex, ClusterI.CompleteTypeEnum completeType, ClusterSupport support)
+    throws DatabaseException {
+        int predicateIndex = resourceTable.getPredicateIndex(sResourceIndex);
+        if (0 == predicateIndex || ClusterI.CompleteTypeEnum.NotComplete != completeType)
+            return resourceTable.removeStatementFromCache(sResourceIndex,
+                    pResourceIndex, oResourceIndex, completeType, completeTable);
+        PredicateTable.Status ret = predicateTable.removePredicate(predicateIndex, 0xFFFF & pResourceIndex, 0xFFFF & oResourceIndex, objectTable);
+        switch (ret) {
+        case NothingRemoved:
+            return false;
+        case PredicateRemoved: {
+            if (0 == predicateTable.getPredicateSetSize(predicateIndex))
+                resourceTable.setPredicateIndex(sResourceIndex, 0);
+            // intentionally dropping to next case
+        } default:
+            break;
+        }
+        resourceTable.removeStatement(sResourceIndex,
+                pResourceIndex, oResourceIndex,
+                completeType, completeTable,
+                predicateTable, objectTable, support);
+        return true;
+    }
+    @Override
+    public void load() {
+        if (deleted) return;
+        try {
+               clusterTable.load2(clusterId, clusterKey);
+        } catch (DatabaseException e) {
+               LOGGER.error("Failed to load cluster with clusterId " + clusterId, e);
+        }
+    }
+
+    @Override
+    public void load(Consumer<DatabaseException> r) {
+        if (deleted) return;
+        try {
+               clusterTable.load2(clusterId, clusterKey);
+        } catch (DatabaseException e) {
+               r.accept(e);
+        }
+    }
+
+    public boolean contains(int resourceKey) {
+        if (deleted) return false;
+        return ClusterTraitsBase.isCluster(clusterBits, resourceKey);
+    }
+    @Override
+    public void load(final ClusterSupport support, final Runnable callback) {
+        if (deleted) return;
+        try {
+            clusterTable.load2(clusterId, clusterKey);
+            callback.run();
+        } catch (DatabaseException e) {
+               LOGGER.error("Failed to load cluster with clusterId " + clusterId, e);
+        }
+
+    }
+    @Override
+    public ClusterI getClusterByResourceKey(int resourceKey,
+            ClusterSupport support) {
+        if (deleted) return null;
+        throw new Error();
+    }
+    @Override
+    public void increaseReferenceCount(int amount) {
+        if (deleted) return;
+        throw new Error();
+    }
+    @Override
+    public void decreaseReferenceCount(int amount) {
+        if (deleted) return;
+        throw new Error();
+    }
+    @Override
+    public int getReferenceCount() {
+        if (deleted) return 0;
+        throw new Error();
+    }
+    @Override
+    public void releaseMemory() {
+    }
+    @Override
+    public void compact() {
+        if (deleted) return;
+        clusterMap.compact();
+    }
+    @Override
+    public boolean isLoaded() {
+        return !proxy || deleted; // Deleted cluster is always loaded.
+    }
+
+    public ClusterImpl tryLoad(SessionImplSocket sessionImpl) throws DatabaseException {
+        if (deleted) return this; // Never load deleted cluster.
+        return clusterTable.tryLoad(clusterId, clusterKey);
+    }
+
+
+    @Override
+    public ClusterBig toBig(ClusterSupport support)
+    throws DatabaseException {
+        if (DEBUG) {
+            System.out.println("DEBUG: toBig cluster=" + clusterId);
+            new Exception().printStackTrace();
+        }
+        if (deleted) return null; // Can't convert deleted cluster to big.
+        ClusterBig big = new ClusterBig(getClusterUID(), clusterKey, support);
+        big.setImportance(importance);
+        big.cc = this.cc;
+        big.cc.clusterImpl = this;
+        resourceTable.toBig(big, support, this);
+        big.foreignLookup = this.foreignLookup;
+        big.change = this.change;
+        this.cc = null;
+        this.foreignLookup = null;
+        this.change = null;
+        return big;
+    }
+
+    @Override
+    public ClusterTypeEnum getType() {
+        return ClusterTypeEnum.SMALL;
+    }
+    @Override
+    public boolean getImmutable() {
+        if (deleted) return false;
+        if (null == resourceTable)
+            return false;
+        int status = resourceTable.getClusterStatus();
+        return (status & ClusterStatus.ImmutableMaskSet) == ClusterStatus.ImmutableMaskSet;
+    }
+    @Override
+    public void setImmutable(boolean immutable, ClusterSupport support) {
+        if (deleted) return;
+        if(resourceTable != null) {
+            int status = resourceTable.getClusterStatus();
+            if (immutable)
+                status |= ClusterStatus.ImmutableMaskSet;
+            else
+                status &= ClusterStatus.ImmutableMaskClear;
+            resourceTable.setClusterStatus(status);
+        }
+        support.setImmutable(this, immutable);
+    }
+    @Override
+    public boolean getDeleted() {
+        if (deleted) return true;
+        int status = resourceTable.getClusterStatus();
+        return (status & ClusterStatus.DeletedMaskSet) == ClusterStatus.DeletedMaskSet;
+    }
+    @Override
+    public void setDeleted(boolean set, ClusterSupport support) {
+        deleted = set;
+        if(resourceTable != null) {
+            int status = resourceTable.getClusterStatus();
+            if (set)
+                status |= ClusterStatus.DeletedMaskSet;
+            else
+                status &= ClusterStatus.DeletedMaskClear;
+            resourceTable.setClusterStatus(status);
+        }
+        if (null != support)
+            support.setDeleted(this, set);
+    }
+    @Override
+    public String toString() {
+        if (deleted) return "ClusterSmall[" + getClusterId() + " - has been deleted or hasn't been created.]";
+        try {
+            ForeignTableSmall ft = foreignTable;
+            if (ft == null)
+                return "ClusterSmall[" + getClusterId() + " - " + getNumberOfResources() + "]";
+            TIntShortHashMap map = ft.getResourceHashMap();
+            TIntHashSet set = new TIntHashSet();
+            map.forEachKey(value -> {
+                set.add(value & 0xfffff000);
+                return true;
+            });
+            return "ClusterSmall[" + getClusterId() + " - " + getNumberOfResources() + " - " + foreignTable.getResourceHashMap().size() + " - " + set.size() + "]";
+        } catch (Throwable e) {
+            return "ClusterSmall[" + getNumberOfResources() + "]";
+        }
+    }
+    @Override
+    public Table<?> getPredicateTable() {
+        return predicateTable;
+    }
+    @Override
+    public Table<?> getForeignTable() {
+        return foreignTable;
+    }
+    @Override
+    public int makeResourceKey(int pRef) throws DatabaseException {
+        throw new UnsupportedOperationException();
+    }
+    @Override
+    public Table<?> getCompleteTable() {
+        return completeTable;
+    }
+    @Override
+    public Table<?> getValueTable() {
+        return valueTable;
+    }
+    @Override
+    public Table<?> getObjectTable() {
+        return objectTable;
+    }
+
+}
+
+class ClusterStatus {
+    public static final int ImmutableMaskClear = 0xFFFFFFFE;
+    public static final int ImmutableMaskSet = 0x00000001;
+    public static final int DeletedMaskClear = 0xFFFFFFFD;
+    public static final int DeletedMaskSet = 0x00000002;
+}