cmis_server 1.0.3

data/lib/cmis_server/folder_type.rb

@@ -0,0 +1,34 @@
+module CmisServer
+  class FolderType < CmisServer::Type
+
+    def adapter_class
+      FolderAdapter
+    end
+
+    def self.base
+      @base||=new(id:                   'cmis:folder',
+          parent_type:          nil,
+          description:          "A CMIS folder",
+          display_name:         'Folder',
+          creatable:            true,
+          fileable:             true,
+          queryable:            true,
+          property_definitions: [
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:name'.freeze, type: String, required: true}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:description'.freeze, type: String, required: false}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:objectId'.freeze, type: CmisServer::Id, required: true, updatability: :readonly}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:baseTypeId'.freeze, type: CmisServer::Id, required: true, updatability: :readonly, value: ->(obj) { obj.type.base_id }}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:objectTypeId'.freeze, type: CmisServer::Id, required: true, updatability: :oncreate, value: ->(obj) { obj.type.id }}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:secondaryObjectTypeIds'.freeze, type: CmisServer::Id, required: false, updatability: :readonly, cardinality: :multi}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:createdBy'.freeze, type: String, required: false, updatability: :readonly, queryable: true, orderable: true}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:creationDate'.freeze, type: DateTime, required: false, updatability: :readonly, queryable: true, orderable: true}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:lastModifiedBy'.freeze, type: String, required: false, updatability: :readonly, queryable: true, orderable: true}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:lastModificationDate'.freeze, type: DateTime, required: false, updatability: :readonly, queryable: true, orderable: true}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:changeToken'.freeze, type: String, required: false, updatability: :readonly}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:parentId'.freeze, type: CmisServer::Id, required: false, updatability: :readonly}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:path'.freeze, type: CmisServer::Id, required: false, updatability: :readonly}),
+                                    CmisServer::PropertyDefinition.register_property_definition({id: 'cmis:allowedChildObjectTypeIds'.freeze, type: CmisServer::Id, required: false, updatability: :readonly, cardinality: :multi}),
+                                ])
+    end
+  end
+end

data/lib/cmis_server/id.rb

@@ -0,0 +1,18 @@
+module CmisServer
+  class Id < String
+
+    def path_sanitize
+      self.gsub(/[^a-z0-9_-]/i, '_')
+    end
+
+    def to_method_name
+      self.gsub(/[^0-9a-z]/i, '_').underscore
+    end
+
+  end
+
+  class Boolean
+
+  end
+
+end

data/lib/cmis_server/item_adapter.rb

@@ -0,0 +1,26 @@
+module CmisServer
+  class ItemAdapter < ObjectAdapter
+    class_attribute :model_class, :model_klass, :model_klass_name
+
+    class ClassAdapter < ObjectAdapter::ClassAdapter
+      def initialize(attrs)
+        super
+        @adapter_class = ItemAdapter
+      end
+
+      def find(id)
+        model=ItemObject.find(id)
+        @adapter_class.new(model, context: @context)
+      end
+    end
+    
+    def initialize(model=nil, attrs={})
+      super
+      @model ||= ItemObject.new
+    end
+
+    def self.class_adapter(attrs={})
+      ClassAdapter.new(attrs)
+    end
+  end
+end

data/lib/cmis_server/item_object.rb

@@ -0,0 +1,15 @@
+module CmisServer
+  class ItemObject < CmisObject
+    def self.base_type
+      CmisServer::ITEM_TYPE
+    end
+
+    def self.base_id
+      'cmis:item'
+    end
+
+    def ==(other)
+      other.is_a?(ItemObject) && self.cmis_object_id == other.cmis_object_id
+    end
+  end
+end

data/lib/cmis_server/item_type.rb

@@ -0,0 +1,7 @@
+module CmisServer
+  class ItemType < Type
+    def base_id
+      'cmis:item'
+    end
+  end
+end

data/lib/cmis_server/object_adapter.rb

@@ -0,0 +1,79 @@
+module CmisServer
+  class ObjectAdapter
+
+    class ObjectPersistenceError < StandardError;
+    end
+
+    class ClassAdapter
+
+      attr_reader :context
+
+      def initialize(context:)
+        @context= context
+      end
+
+      def where(conditions)
+        raise NotImplementedError
+      end
+
+      def find_by(conditions)
+        where(conditions).first
+      end
+
+      def find(id)
+        find_by(cmis_object_id: id)
+      end
+    end
+
+    def self.class_adapter(context:)
+      (self.to_s+"::ClassAdapter").constantize.new(context: context)
+    end
+
+    def class_adapter
+      (self.to_s+"::ClassAdapter").constantize.new(context: context)
+    end
+
+    attr_reader :object, :context
+
+    def initialize(object, context:)
+      @object =object
+      @context=context
+    end
+
+    def save!
+      raise ObjectPersistenceError unless save
+    end
+
+    def save
+      raise NotImplementedError
+    end
+
+    def reload!
+      object.copy_properties_values_of(self.class.find(object.cmis_object_id))
+    end
+    
+    def add_secondary_type(secondary_type_id)
+      secondary_type_ids = @object.properties["cmis:secondaryObjectTypeIds"]&.value || []
+      return false if secondary_type_ids.include?(secondary_type_id)
+      
+      secondary_type_ids << secondary_type_id
+      @object.properties["cmis:secondaryObjectTypeIds"].value = secondary_type_ids
+      save
+    end
+
+    def remove_secondary_type(secondary_type_id)
+      secondary_type_ids = @object.properties["cmis:secondaryObjectTypeIds"]&.value || []
+      return false unless secondary_type_ids.include?(secondary_type_id)
+      
+      secondary_type_ids.delete(secondary_type_id)
+      @object.properties["cmis:secondaryObjectTypeIds"].value = secondary_type_ids
+      save
+    end
+
+    def secondary_types
+      secondary_type_ids = @object.properties["cmis:secondaryObjectTypeIds"]&.value || []
+      secondary_type_ids.map { |id| CmisServer::TypeRegistry.find_type(id) }
+    end
+
+  end
+end

data/lib/cmis_server/property.rb

@@ -0,0 +1,29 @@
+module CmisServer
+  class Property
+
+    attr_reader :property_definition
+
+    def value=(v)
+      if self.property_definition.value
+        nil
+      else
+        @value=v
+      end
+    end
+
+    def value
+      self.property_definition.value ? self.property_definition.value_for(@object) : @value
+    end
+
+    def set_default
+      @value||=@property_definition.default_value.dup
+    end
+
+    def initialize(property_definition, value=nil, object=nil)
+      @object             =object
+      @property_definition=property_definition
+      @value              =value
+    end
+
+  end
+end

data/lib/cmis_server/property_definition.rb

@@ -0,0 +1,118 @@
+module CmisServer
+  class PropertyDefinition
+
+    class << self
+
+      def property_defintions
+        @property_defintions
+      end
+
+      def register_property_definition(attrs)
+        @property_defintions      ||={}
+        p                         =PropertyDefinition.new(attrs)
+        @property_defintions[p.id]=p
+        #ToDo Check definition conflicts
+      end
+    end
+
+
+    #Todo add attributes constraints
+    attr_reader :id,
+                :local_name,
+                :local_namespace,
+                :query_name,
+                :display_name,
+                :description,
+                :cardinality,
+                :updatability,
+                :required,
+                :queryable,
+                :orderable,
+                :choices,
+                :open_choice,
+                :default_value,
+                :type,
+                :value
+
+    protected
+    # Property definition are read-only for the rest of the world
+    attr_writer :id,
+                :local_name,
+                :local_namespace,
+                :query_name,
+                :display_name,
+                :description,
+                :property_type,
+                :cardinality,
+                :updatability,
+                :required,
+                :queryable,
+                :orderable,
+                :choices,
+                :open_choice,
+                :default_value,
+                :type,
+                :value
+
+    public
+
+
+    def initialize(attrs={})
+      self.id              = CmisServer::Id.new(attrs.fetch(:id).to_s)
+      self.local_name      = attrs.fetch(:local_name, id)
+      self.local_namespace = attrs.fetch(:local_namespace, 'local')
+      self.query_name      = attrs.fetch(:query_name, id)
+      self.display_name    = attrs.fetch(:display_name, id)
+      self.description     = attrs.fetch(:description, "No description provided")
+      self.property_type   = attrs.fetch(:property_type, nil)
+      self.cardinality     = attrs.fetch(:cardinality, :single)
+      self.updatability    = attrs.fetch(:updatability, :readonly)
+      self.required        = attrs.fetch(:required, false)
+      self.queryable       = attrs.fetch(:queryable, false)
+      self.orderable       = attrs.fetch(:orderable, false)
+      self.choices         = attrs.fetch(:choices, nil)
+      self.open_choice     = attrs.fetch(:open_choice, false)
+      self.default_value   = attrs.fetch(:default_value, nil)
+      self.value           = attrs.fetch(:value, nil)
+      self.type            = attrs.fetch(:type, nil)
+    end
+
+    def inherited
+      false
+    end
+
+    def property_type
+      type.name.demodulize.downcase
+    end
+
+    def getter_method_name
+      self.id.to_method_name.to_sym
+    end
+
+    def setter_method_name
+      (self.id.to_method_name+'=').to_sym
+    end
+
+    def property_method_name
+      (self.id.to_method_name+'_property').to_sym
+    end
+
+    def value_for(object)
+      case self.value
+      when Proc
+        self.value.call(object)
+      else
+        self.value
+      end
+    end
+
+  end
+
+  class InheritedDecorator < SimpleDelegator
+
+    def inherited
+      true
+    end
+
+  end
+end