xamplr 1.2.0

data/lib/xamplr/templates/element_empty.template

@@ -0,0 +1,285 @@
+
+  class #{@element.class_name}
+|
+|if @element.persisted then
+|
+    include Xampl::XamplPersistedObject
+
+    @@default_persister_format = nil
+
+    def default_persister_format
+      @@default_persister_format
+    end
+    def #{@element.class_name}.default_persister_format
+      @@default_persister_format
+    end
+    def #{@element.class_name}.set_default_persister_format(format)
+      @@default_persister_format = format
+    end
+
+    def #{@element.class_name}.find_by_query
+      things = Xampl.find_xampl do | q |
+         q.add_condition('class', :equals, self.name)
+         yield(q)
+       end
+    end
+
+|
+|else
+|
+    include Xampl::XamplObject
+|
+|end
+|
+    include Xampl::XamplWithoutContent
+
+    @@tag = "#{element.name}"
+    @@ns = "#{@element.namespace}"
+    @@ns_tag = "{#{@element.namespace}}#{element.name}"
+    @@module_name = "#{@package_name}"
+    @@safe_name = "#{@package_name}_#{@element.attribute_name}"
+    @@attributes = [
+|
+|@element.attribute_child.each{ | attribute |
+|  if attribute.namespace then
+|
+                     [ :@#{attribute.name}, "#{attribute.name}", "#{attribute.namespace}" ],
+|
+|  else
+|
+                     [ :@#{attribute.name}, "#{attribute.name}" ],
+|
+|  end
+|}
+|
+                   ]
+|
+|@element.child_element_child.each{ | child_element |
+|  element_class_name = @lookup_element[child_element.name].class_name
+|  element_package = @lookup_element[child_element.name].package
+|
+    include #{element_package}::#{element_class_name}AsChild
+|
+|}
+|
+|if @element.persisted then
+|
+
+    def #{@element.class_name}.lookup(pid)
+      Xampl.lookup(#{@element.class_name}, pid)
+    end
+
+    def #{@element.class_name}.[](pid)
+      Xampl.lookup(#{@element.class_name}, pid)
+    end
+|
+|end
+|
+|@element.attribute_child.each{ | attribute |
+|  if attribute.name == @element.indexed_by_attr and @element.persisted then
+|
+
+    def #{attribute.name}
+      @#{attribute.name}
+    end
+
+    def xxx#{attribute.name}=(v)
+      accessed
+			# This is kind of optimistic, I think you are in trouble if you do this
+      Xampl.auto_uncache(self) if @#{attribute.name}
+      @#{attribute.name} = v
+      changed
+      Xampl.auto_cache(self) if v
+    end
+
+    def #{attribute.name}=(v)
+      accessed
+			# This is kind of optimistic, I think you are in trouble if you do this
+      Xampl.auto_uncache(self) if @#{attribute.name}
+      @#{attribute.name} = v
+      changed
+      Xampl.auto_cache(self) if v
+    end
+|
+|  else
+|
+
+    def #{attribute.name}
+      accessed
+      @#{attribute.name}
+    end
+
+    def #{attribute.name}=(v)
+      accessed
+      changed
+      @#{attribute.name} = v
+    end
+|
+|  end
+|}
+|
+|  if @element.indexed_by_attr then
+|
+
+    def initialize(index=nil)
+      @#{@element.indexed_by_attr} = index if index
+      super()
+|
+| else
+|
+
+    def initialize
+      super
+|
+|end
+|
+|if 0 < @element.attribute_child.size then
+|
+
+|
+|end
+|
+|@element.attribute_child.each{ | attribute |
+|
+      @#{attribute.name} = nil if not defined? @#{attribute.name}
+|
+|}
+|
+
+      init_xampl_object
+|
+|@element.child_element_child.each{ | child_element |
+|  element_attribute_name = @lookup_element[child_element.name].attribute_name
+|
+      init_#{element_attribute_name}_as_child
+|
+|}
+|
+
+      yield(self) if block_given?
+      init_hook
+
+      changed
+    end
+
+    def clear_non_persistent_index_attributes
+|
+|@element.attribute_child.each{ | attribute |
+|  unless attribute.name == @element.indexed_by_attr and @element.persisted then
+|
+      @#{attribute.name} = nil
+|
+|  end
+|}
+|
+    end
+
+    def append_to(other)
+      other.add_#{element.attribute_name}(self)
+    end
+
+|
+|if @element.persisted then
+|
+    def #{@element.class_name}.persisted?
+      return :#{@element.indexed_by_attr}
+    end
+
+    def persisted?
+      return :#{@element.indexed_by_attr}
+    end
+
+|
+|else
+|
+    def #{@element.class_name}.persisted?
+      return nil
+    end
+
+    def persisted?
+      return nil
+    end
+
+|
+|end
+|
+    def #{@element.class_name}.tag
+      @@tag
+    end
+
+    def #{@element.class_name}.ns
+      @@ns
+    end
+
+    def #{@element.class_name}.ns_tag
+      @@ns_tag
+    end
+
+    def #{@element.class_name}.safe_name
+      @@safe_name
+    end
+
+    def #{@element.class_name}.module_name
+      @@module_name
+    end
+
+    def tag
+      @@tag
+    end
+
+    def ns
+      @@ns
+    end
+
+    def ns_tag
+      @@ns_tag
+    end
+
+    def safe_name
+      @@safe_name
+    end
+
+    def module_name
+      @@module_name
+    end
+
+    def attributes
+      @@attributes
+    end
+|
+|if @element.indexed_by_attr
+|
+
+    def indexed_by
+      :#{@element.indexed_by_attr}
+    end
+
+    def get_the_index
+      @#{@element.indexed_by_attr}
+    end
+
+    def set_the_index(index)
+      @#{@element.indexed_by_attr} = index
+    end
+|
+|end
+|
+
+    def substitute_in_visit(visitor)
+      return visitor.substitute_in_visit_#{@element.attribute_name}(self) || self
+    end
+
+    def before_visit(visitor)
+      visitor.before_visit_#{@element.attribute_name}(self)
+    end
+
+    def visit(visitor)
+      visitor.visit_#{@element.attribute_name}(self)
+    end
+
+    def after_visit(visitor)
+      visitor.after_visit_#{@element.attribute_name}(self)
+    end
+
+    Xampl::FromXML::register(#{@element.class_name}::tag, #{@element.class_name}::ns_tag, #{@element.class_name})
+  end

data/lib/xamplr/templates/element_mixed.template

@@ -0,0 +1,277 @@
+
+  class #{@element.class_name}
+|
+|if @element.persisted then
+|
+    include Xampl::XamplPersistedObject
+
+    @@default_persister_format = nil
+
+    def default_persister_format
+      @@default_persister_format
+    end
+    def #{@element.class_name}.default_persister_format
+      @@default_persister_format
+    end
+    def #{@element.class_name}.set_default_persister_format(format)
+      @@default_persister_format = format
+    end
+
+    def #{@element.class_name}.find_by_query
+      things = Xampl.find_xampl do | q |
+         q.add_condition('class', :equals, self.name)
+         yield(q)
+       end
+    end
+
+|
+|else
+|
+    include Xampl::XamplObject
+|
+|end
+|
+    include Xampl::XamplWithMixedContent
+
+    @@tag = "#{@element.name}"
+    @@ns = "#{@element.namespace}"
+    @@ns_tag = "{#{@element.namespace}}#{@element.name}"
+    @@module_name = "#{@package_name}"
+    @@safe_name = "#{@package_name}_#{@element.attribute_name}"
+    @@attributes = [
+|
+|@element.attribute_child.each{ | attribute |
+|  if attribute.namespace then
+|
+                     [ :@#{attribute.name}, "#{attribute.name}", "#{attribute.namespace}" ],
+|
+|  else
+|
+                     [ :@#{attribute.name}, "#{attribute.name}" ],
+|
+|  end
+|}
+|
+                   ]
+|
+|@element.child_element_child.each{ | child_element |
+|  element_class_name = @lookup_element[child_element.name].class_name
+|  element_package = @lookup_element[child_element.name].package
+|
+    include #{element_package}::#{element_class_name}AsChild
+|
+|}
+|
+|if @element.persisted then
+|
+
+    def #{@element.class_name}.lookup(pid)
+      Xampl.lookup(#{@element.class_name}, pid)
+    end
+
+    def #{@element.class_name}.[](pid)
+      Xampl.lookup(#{@element.class_name}, pid)
+    end
+|
+|end
+|
+|@element.attribute_child.each{ | attribute |
+|  if attribute.name == @element.indexed_by_attr and @element.persisted then
+|
+
+    def #{attribute.name}
+      @#{attribute.name}
+    end
+
+    def #{attribute.name}=(v)
+      accessed
+			# This is kind of optimistic, I think you are in trouble if you do this
+      Xampl.auto_uncache(self) if @#{attribute.name}
+      @#{attribute.name} = v
+      changed
+      Xampl.auto_cache(self) if v
+    end
+|
+|  else
+|
+
+    def #{attribute.name}
+      accessed
+      @#{attribute.name}
+    end
+
+    def #{attribute.name}=(v)
+      accessed
+      changed
+      @#{attribute.name} = v
+    end
+|
+|  end
+|}
+|
+|  if @element.indexed_by_attr then
+|
+
+    def initialize(index=nil)
+      @#{@element.indexed_by_attr} = index if index
+      super()
+|
+| else
+|
+
+    def initialize
+      super
+|
+|end
+|
+|if 0 < @element.attribute_child.size then
+|
+
+|
+|end
+|
+|@element.attribute_child.each{ | attribute |
+|
+      @#{attribute.name} = nil if not defined? @#{attribute.name}
+|
+|}
+|
+
+      init_xampl_object
+      init_mixed_content
+|
+|@element.child_element_child.each{ | child_element |
+|  element_attribute_name = @lookup_element[child_element.name].attribute_name
+|
+      init_#{element_attribute_name}_as_child
+|
+|}
+|
+
+      yield(self) if block_given?
+      init_hook
+
+      changed
+    end
+
+    def clear_non_persistent_index_attributes
+|
+|@element.attribute_child.each{ | attribute |
+|  unless attribute.name == @element.indexed_by_attr and @element.persisted then
+|
+      @#{attribute.name} = nil
+|
+|  end
+|}
+|
+    end
+
+    def append_to(other)
+      other.add_#{@element.attribute_name}(self)
+    end
+
+|
+|if @element.persisted then
+|
+    def #{@element.class_name}.persisted?
+      return :#{@element.indexed_by_attr}
+    end
+
+    def persisted?
+      return :#{@element.indexed_by_attr}
+    end
+
+|
+|else
+|
+    def #{@element.class_name}.persisted?
+      return nil
+    end
+
+    def persisted?
+      return nil
+    end
+
+|
+|end
+|
+    def #{@element.class_name}.tag
+      @@tag
+    end
+
+    def #{@element.class_name}.ns
+      @@ns
+    end
+
+    def #{@element.class_name}.ns_tag
+      @@ns_tag
+    end
+
+    def #{@element.class_name}.safe_name
+      @@safe_name
+    end
+
+    def #{@element.class_name}.module_name
+      @@module_name
+    end
+
+    def tag
+      @@tag
+    end
+
+    def ns
+      @@ns
+    end
+
+    def ns_tag
+      @@ns_tag
+    end
+
+    def safe_name
+      @@safe_name
+    end
+
+    def module_name
+      @@module_name
+    end
+
+    def attributes
+      @@attributes
+    end
+|
+|if @element.indexed_by_attr
+|
+
+    def indexed_by
+      :#{@element.indexed_by_attr}
+    end
+
+    def get_the_index
+      @#{@element.indexed_by_attr}
+    end
+
+    def set_the_index(index)
+      @#{@element.indexed_by_attr} = index
+    end
+|
+|end
+|
+
+    def substitute_in_visit(visitor)
+      return visitor.substitute_in_visit_#{@element.attribute_name}(self) || self
+    end
+
+    def before_visit(visitor)
+      visitor.before_visit_#{@element.attribute_name}(self)
+    end
+
+    def visit(visitor)
+      visitor.visit_#{@element.attribute_name}(self)
+    end
+
+    def after_visit(visitor)
+      visitor.after_visit_#{@element.attribute_name}(self)
+    end
+
+    Xampl::FromXML::register(#{@element.class_name}::tag, #{@element.class_name}::ns_tag, #{@element.class_name})
+  end