X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=store.h;h=a77febecbe6bb3514fc1a3b07e6a9ae8e835c858;hb=2466c23751f131a07432df964658c2de90315e7b;hp=381cca7907670fe4565ad135eae331d52aa6319d;hpb=4618e826a4ebe5e60e1d2c419fca7da71657bf9b;p=odcread.git

diff --git a/store.h b/store.h
index 381cca7..a77febe 100644
--- a/store.h
+++ b/store.h
@@ -3,8 +3,19 @@
 
 #include <oberon.h>
 #include <domain.h>
+#include <typeregister.h>
+#include <visitor.h>
+
+#include <string>
+#include <vector>
 
 namespace odc {
+	class Reader; // forward decl
+
+	class TypePath : public std::vector<std::string> {
+		public:
+		std::string toString() const;
+	};
 
 	/**
 	 * TYPE Store
@@ -14,7 +25,13 @@ namespace odc {
 	 * Stores are used as base types for all objects that must be both extensible and persistent.
 	 */
 	class Store {
+	private:
+		static const TopTypeProxy<Store> PROXY;
+
+		INTEGER d_id;
+
 	public: 
+		static const std::string TYPENAME;
 		static const SHORTCHAR NEWBASE = 0xF0; // (* new base type (level = 0), i.e. not yet in dict *)
 		static const SHORTCHAR NEWEXT = 0xF1;  // (* new extension type (level = 1), i.e. not yet in dict *)
 		static const SHORTCHAR OLDTYPE = 0xF2; // (* old type, i.e. already in dict *)
@@ -23,13 +40,28 @@ namespace odc {
 		static const SHORTCHAR STORE = 0x82;   // (* general store *)
 		static const SHORTCHAR ELEM = 0x83;    // (* elem store *)
 		static const SHORTCHAR NEWLINK = 0x84; // (* link to another non-elem store in same file *)
+
+		Store(INTEGER id);
+
+		INTEGER getId();
+		
+		/**
+		 * Get the TypeName for this object.
+		 */
+		virtual const std::string &getTypeName() const;
+		/**
+		 * Get the TypePath to this object's type.
+		 * @see TypePath
+		 */
+		TypePath getTypePath() const;
+
 		/**
 		 * PROCEDURE (s: Store) Domain (): Domain
 		 * NEW
 		 * A store may be associated with a domain. This is done by the procedure InitDomain, which assigns a domain to the store.
 		 * Domain may be called by arbitrary clients.
 		 */
-		Domain* getDomain();
+		//Domain* getDomain();
 
 		/**
 		 * PROCEDURE (s: Store) CopyFrom- (source: Store)
@@ -55,7 +87,7 @@ namespace odc {
 		 * source.Domain() = NIL	guaranteed
 		 * source is not yet initialized	guaranteed
 		 */
-//		 void internalize(Reader &reader) {
+		virtual void internalize(Reader &reader);
 //	PROCEDURE (s: Store) Internalize- (VAR rd: Reader), NEW, EXTENSIBLE;
 //		VAR thisVersion: INTEGER;
 //	BEGIN
@@ -87,8 +119,53 @@ namespace odc {
 		 * s1 = s	guaranteed
 		 */
 		// FIXME
+
+		virtual std::string toString();
+
+		/**
+		 * Receiving end of the Visitor pattern.
+		 */
+		virtual void accept(Visitor &visitor) const;
+
+		private:
+		void calcTypePath(TypePath *out, const std::string &name) const;
+	};
+
+	class Elem : public Store {
+		private:
+		static const TypeProxy<Elem, Store> PROXY;
+
+		public:
+		static const std::string TYPENAME;
+		virtual const std::string &getTypeName() const;
+
+		Elem(INTEGER id);
+		virtual void internalize(Reader &reader);
 	};
 
+	class Model : public Elem {
+		private:
+		static const TypeProxy<Model, Elem> PROXY;
+
+		public:
+		static const std::string TYPENAME;
+		virtual const std::string &getTypeName() const;
+
+		Model(INTEGER id);
+		virtual void internalize(Reader &reader);
+	};
+
+	class ContainerModel : public Model {
+		private:
+		static const TypeProxy<ContainerModel, Model> PROXY;
+
+		public:
+		static const std::string TYPENAME;
+		virtual const std::string &getTypeName() const;
+
+		ContainerModel(INTEGER id);
+		virtual void internalize(Reader &reader);
+	};
 }
 
 #endif // _STORE_H_