uzuuzu-cms 0.0.0

data/lib/uzuuzu-cms/model/blog_comment.rb

@@ -0,0 +1,29 @@
+# coding: utf-8
+
+module UzuUzu
+  #
+  #
+  #
+  class BlogComment
+    include DataMapper::Resource
+    include DataMapper::Timestamps
+
+    property :id, Serial
+    property :name, String,
+             :required => false,
+             :length => 255
+    property :url, String,
+              :length => 255
+    property :title, String,
+              :required => true,
+              :length => 255
+    property :body, Text,
+              :required => true
+    property :status, Enum[:new, :allowed, :deleted]
+    timestamps :at
+
+    belongs_to :user, :required => false
+    belongs_to :blog_entry
+
+  end #BlogComment
+end #UzuUzu

data/lib/uzuuzu-cms/model/blog_entry.rb

@@ -0,0 +1,24 @@
+# coding: utf-8
+
+module UzuUzu
+  class BlogEntry
+    include DataMapper::Resource
+    include DataMapper::Timestamps
+
+    property :id, Serial
+    property :format, String,
+              :length => 32
+    property :title, String,
+              :required => true,
+              :length => 255
+    property :body, Text,
+              :required => true
+    timestamps :at
+
+    has n, :blog_categories, :through => Resource
+    has n, :blog_comments
+
+    belongs_to :blog
+
+  end #BlogEntry
+end #UzuUzu

data/lib/uzuuzu-cms/model/contents.rb

@@ -0,0 +1,43 @@
+# coding: utf-8
+require 'uzuuzu/adapter/datamapper/model/css'
+require 'uzuuzu/adapter/datamapper/model/javascript'
+
+module UzuUzu
+  class Css
+    has n, :contents, 'UzuUzu::Contents', :through => Resource
+  end
+
+  class Javascript
+    has n, :contents, 'UzuUzu::Contents', :through => Resource
+  end
+
+  class Contents
+    include DataMapper::Resource
+    include DataMapper::Timestamps
+
+    property :id, Serial
+    property :format, Enum[:none, :erb, :markdown],
+              :required => true
+    property :name, String,
+              :required => true,
+              :length => 255
+    property :body, Text,
+              :required => true
+    timestamps :at
+
+    has n, :csses, :through => Resource
+    has n, :javascripts, :through => Resource
+    
+    def render
+      UzuUzu.render_engine(nil, self.body, self.format, options, locals)
+    end
+  end # Contents
+
+  if auto_upgrade?
+    repository do
+      Contents.auto_upgrade!
+      ContentsJavascript.auto_upgrade!
+      ContentsCss.auto_upgrade!
+    end
+  end
+end # UzuUzu

data/lib/uzuuzu-cms/model/css.rb

@@ -0,0 +1,22 @@
+# coding: utf-8
+
+module UzuUzu
+  class Css
+    include DataMapper::Resource
+    include DataMapper::Timestamps
+
+    property :id, Serial
+    property :url, Text
+    property :format, String,
+              :length => 10
+    property :body, Text
+    timestamps :updated_at
+
+  end #Css
+
+  if auto_upgrade?
+    repository do
+      Css.auto_upgrade!
+    end
+  end
+end #UzuUzu

data/lib/uzuuzu-cms/model/file.rb

@@ -0,0 +1,41 @@
+# coding: utf-8
+require 'uzuuzu/adapter/datamapper/model/user'
+
+module UzuUzu
+  class User
+    has n, :files
+  end
+
+  class File
+    include DataMapper::Resource
+    include DataMapper::Timestamps
+
+    property :id, Serial
+    property :file_name, String,
+              :required => true,
+              :unique => true,
+              :length => 255
+    property :content_type, String,
+              :required => true,
+              :length => 255
+    timestamps :updated_at
+
+    if UzuUzu.gae?
+      property :file_data, Blob,
+                :required => true,
+                :length => 2 ** 32
+    else
+      property :file_data, Binary,
+                :required => true,
+                :length => 2 ** 32
+    end
+
+    belongs_to :user
+  end #File
+
+  if auto_upgrade?
+    repository do
+      File.auto_upgrade!
+    end
+  end
+end #UzuUzu

data/lib/uzuuzu-cms/model/image.rb

@@ -0,0 +1,41 @@
+# coding: utf-8
+require 'uzuuzu/adapter/datamapper/model/user'
+
+module UzuUzu
+  class User
+    has n, :images
+  end
+
+  class Image
+    include DataMapper::Resource
+    include DataMapper::Timestamps
+
+    property :id, Serial
+    property :file_name, String,
+              :required => true,
+              :unique => true,
+              :length => 255
+    property :content_type, String,
+              :required => true,
+              :length => 255
+    timestamps :updated_at
+
+    if UzuUzu.gae?
+      property :image, Blob,
+                :required => true,
+                :length => 2 ** 32
+    else
+      property :image, Binary,
+                :required => true,
+                :length => 2 ** 32
+    end
+
+    belongs_to :user
+  end #Image
+
+  if auto_upgrade?
+    repository do
+      Image.auto_upgrade!
+    end
+  end
+end #UzuUzu

data/lib/uzuuzu-cms/model/info.rb

@@ -0,0 +1,127 @@
+# coding: utf-8
+require 'uzuuzu/adapter/datamapper/model/user'
+require 'uzuuzu/adapter/datamapper/model/css'
+require 'uzuuzu/adapter/datamapper/model/javascript'
+require 'uzuuzu/adapter/datamapper/model/layout'
+require 'uzuuzu/adapter/datamapper/model/page_body'
+require 'uzuuzu/adapter/datamapper/model/page'
+
+module UzuUzu
+  class User
+    has n, :infos
+  end
+  
+  class Css
+    has n, :infos, :through => Resource
+  end
+  
+  class Javascript
+    has n, :infos, :through => Resource
+  end
+  
+  class Layout
+    has n, :infos
+  end
+  
+  class PageBody
+    has n, :info_headers, 'UzuUzu::Info', :child_key => [ :header_id ]
+    has n, :info_footers, 'UzuUzu::Info', :child_key => [ :footer_id ]
+    has n, :info_navigators, 'UzuUzu::Info', :child_key => [ :navigator_id ]
+    has n, :info_lefts, 'UzuUzu::Info', :child_key => [ :left_id ]
+    has n, :info_rights, 'UzuUzu::Info', :child_key => [ :right_id ]
+  end
+  
+  class Page
+    has n, :infos
+  end
+  
+  class Info
+    include DataMapper::Resource
+
+    property :id, Serial
+    property :title, String,
+             :required => true,
+             :default => '',
+             :length => 255
+    property :step, Integer,
+             :default => 1
+    property :use_navigator, Boolean,
+             :default => false
+    
+    belongs_to :top_page, 'UzuUzu::Page', :required => false
+    belongs_to :layout, :required => false
+    belongs_to :admin, 'UzuUzu::User', :required => false
+    belongs_to :header, 'UzuUzu::PageBody'
+    belongs_to :footer, 'UzuUzu::PageBody'
+    belongs_to :navigator, 'UzuUzu::PageBody'
+    belongs_to :left, 'UzuUzu::PageBody'
+    belongs_to :right, 'UzuUzu::PageBody'
+
+    has n, :csses, 'UzuUzu::Css', :through => Resource
+    has n, :javascripts, 'UzuUzu::Javascript', :through => Resource
+    
+    def self.uniq
+      ret = nil
+      UzuUzu.transaction do |tr|
+        tr.begin
+        ary = self.all
+        if ary.empty?
+          ret = self.new
+          ret.title = "UzuUzu"
+          ret.header = ::UzuUzu::PageBody.new
+          ret.footer = ::UzuUzu::PageBody.new
+          ret.navigator = ::UzuUzu::PageBody.new
+          ret.left = ::UzuUzu::PageBody.new
+          ret.right = ::UzuUzu::PageBody.new
+          if ret.save
+            tr.commit
+          else
+            tr.rollback
+          end
+          break
+        end
+        
+        ret = ary.pop
+        ary.each do |record|
+          record.destroy
+        end
+
+        tr.commit
+      end
+      ret
+    end #self.uniq
+    
+    def initialize?
+      self.step == 4
+    end
+    
+    def self.initialize?
+      info = self.uniq
+      info.initialize?
+    end
+    
+    def render(contents=nil, instance=nil, options={})
+        locals = {
+          :@header => self.header.render(instance, options),
+          :@footer => self.footer.render(instance, options),
+          :@left => self.left.render(instance, options),
+          :@right => self.right.render(instance, options),
+          :@css => self.csses,
+          :@js => self.javascripts
+        }
+        locals[:@navigator] = self.navigator.render(instance, options) if self.use_navigator
+        locals[:@contents] = contents
+        locals[:@contents] ||= yield if block_given?
+        locals[:@contents] ||= ""
+        UzuUzu.render_engine(instance, self.layout.body, self.layout.engine, options, locals)
+    end # render
+  end #Info
+  
+  if auto_upgrade?
+    repository do
+      Info.auto_upgrade!
+      InfoJavascript.auto_upgrade!
+      CssInfo.auto_upgrade!      
+    end
+  end
+end #UzuUzu

data/lib/uzuuzu-cms/model/javascript.rb

@@ -0,0 +1,22 @@
+# coding: utf-8
+
+module UzuUzu
+  class Javascript
+    include DataMapper::Resource
+    include DataMapper::Timestamps
+
+    property :id, Serial
+    property :url, Text
+    property :format, String,
+              :length => 10
+    property :body, Text
+    timestamps :updated_at
+    
+  end #Js
+  
+  if auto_upgrade?
+    repository do
+      Javascript.auto_upgrade!
+    end
+  end
+end #UzuUzu

data/lib/uzuuzu-cms/model/layout.rb

@@ -0,0 +1,22 @@
+# coding: utf-8
+
+module UzuUzu
+  class Layout
+    include DataMapper::Resource
+
+    property :id, Serial
+    property :name, String,
+              :length => 255
+    property :format, String,
+              :required => true,
+              :length => 10
+    property :body, Text,
+              :required => true
+  end #Page
+  
+  if auto_upgrade?
+    repository do
+      Layout.auto_upgrade!
+    end
+  end
+end #UzuUzu

data/lib/uzuuzu-cms/model/movie.rb

@@ -0,0 +1,39 @@
+# coding: utf-8
+require 'uzuuzu/adapter/datamapper/model/user'
+
+module UzuUzu
+  class Movie
+    include DataMapper::Resource
+    include DataMapper::Timestamps
+
+    property :id, Serial    
+    property :file_name, String,
+              :required => true,
+              :length => 255
+    property :extension, String,
+              :required => true,
+              :length => 255
+    property :content_type, String,
+              :required => true,
+              :length => 255
+    timestamps :updated_at
+              
+    if UzuUzu.gae?
+      property :movie, Blob,
+                :required => true,
+                :length => 2 ** 32
+    else
+      property :movie, Binary,
+                :required => true,
+                :length => 2 ** 32
+    end
+    
+    belongs_to :user
+  end #Movie
+  
+  if auto_upgrade?
+    repository do
+      Movie.auto_upgrade!
+    end
+  end
+end #UzuUzu

data/lib/uzuuzu-cms/model/page.rb

@@ -0,0 +1,167 @@
+# coding: utf-8
+require 'uzuuzu/adapter/datamapper/model/css'
+require 'uzuuzu/adapter/datamapper/model/javascript'
+require 'uzuuzu/adapter/datamapper/model/layout'
+require 'uzuuzu/adapter/datamapper/model/page_body'
+
+module UzuUzu
+  class Css
+    has n, :pages, :through => Resource
+  end
+  
+  class Javascript
+    has n, :pages, :through => Resource
+  end
+  
+  class Layout
+    has n, :pages
+  end
+  
+  class PageBody
+    has n, :pages
+    has n, :page_headers, 'UzuUzu::Page', :child_key => :header_id
+    has n, :page_footers, 'UzuUzu::Page', :child_key => :footer_id
+    has n, :page_navigators, 'UzuUzu::Page', :child_key => :navigator_id
+    has n, :page_lefts, 'UzuUzu::Page', :child_key => :left_id
+    has n, :page_rights, 'UzuUzu::Page', :child_key => :right_id
+  end
+
+  class Page
+    include DataMapper::Resource
+    include DataMapper::Timestamps
+
+    property :id, Serial
+    property :name, String,
+              :required => true,
+              :length => 255
+    property :title, String,
+              :required => true,
+              :length => 255
+    property :use_navigator, Boolean
+    timestamps :at
+
+    belongs_to :layout,
+                :required => false
+    belongs_to :parent, 'UzuUzu::Page',
+                :required => false
+    belongs_to :page_body
+    belongs_to :header, 'UzuUzu::PageBody',
+                :required => false
+    belongs_to :footer, 'UzuUzu::PageBody',
+                :required => false
+    belongs_to :navigator, 'UzuUzu::PageBody',
+                :required => false
+    belongs_to :left, 'UzuUzu::PageBody',
+                :required => false
+    belongs_to :right, 'UzuUzu::PageBody',
+                :required => false
+                
+    has n, :csses, :through => Resource
+    has n, :javascripts, :through => Resource
+    has n, :childs, 'UzuUzu::Page', :child_key => :parent
+    
+    #
+    #
+    #
+    def css_urls
+      self.csses.map do |css|
+        css.url
+      end
+    end
+    
+    #
+    #
+    #
+    def javascript_urls
+      _javascript = []
+      
+    end
+    
+    def reverse_look_up(column=nil)
+      if column
+        key = self.send(column)
+      else
+        key = self
+      end
+      child_tree = parent.reverse_look_up(self) if parent
+      {key => child_tree}
+    end
+    
+    def breadcrumbs
+      _breadcrumbs = []
+      tree = reverse_look_up
+      while(tree)
+        tree.each do |key, value|
+          _breadcrumbs.push({:id => key.id, :name => key.name})
+          tree = value
+        end
+      end
+      _breadcrumbs.reverse
+    end
+
+    #
+    #
+    #
+    def self.top_page
+      self.first(:top_page => true)
+    end
+    
+    #
+    #
+    #
+    def self.page_id_tree(parent_page_id=nil)
+      self.tree(:id, parent_page_id)
+    end
+    
+    #
+    #
+    #
+    def self.page_name_tree(parent_page_id=nil)
+      self.tree(:name, parent_page_id)
+    end
+    
+    #
+    #
+    #
+    def self.tree(column=nil, parent_page_id=nil)
+      ary = self.all(:parent_page_id => parent_page_id)
+      return nil if ary.nil? or ary.length <= 0
+      tree_map = {}
+      ary.each do |record|
+        child_tree = self.tree(column, record.id)
+        if colomn
+          key = record.send(column)
+        else
+          key = self
+        end
+        tree_map[key] = self.tree(column, record.id)
+      end
+      tree_map
+    end
+    
+    def render(contents=nil, instance=nil, options={})
+        locals = {
+          :@header => self.header.render(instance, options),
+          :@footer => self.footer.render(instance, options),
+          :@left => self.left.render(instance, options),
+          :@right => self.right.render(instance, options),
+          :@css => self.csses,
+          :@js => self.javascripts
+        }
+        locals[:@navigator] = self.navigator.render(instance, options) if self.use_navigator
+        locals[:@contents] = contents
+        locals[:@contents] ||= yield if block_given?
+        locals[:@contents] ||= self.page_body.render(instance, options)
+        locals[:@contents] ||= ""
+        UzuUzu.render_engine(instance, self.layout.body, self.layout.engine, options, locals)
+    end # render
+  end #Page
+  
+  if auto_upgrade?
+    repository do
+      Page.auto_upgrade!
+      JavascriptPage.auto_upgrade!
+      CssPage.auto_upgrade!
+    end
+  end
+end #UzuUzu

data/lib/uzuuzu-cms/model/page_body.rb

@@ -0,0 +1,28 @@
+# coding: utf-8
+
+module UzuUzu
+  class Contents
+    has n, :page_bodies, :through => Resource
+  end
+  
+  class PageBody
+    include DataMapper::Resource
+
+    property :id, Serial
+    
+    has n, :contents, 'UzuUzu::Contents', :through => Resource
+    
+    def render(instance=nil, options={})
+      self.contents.map do |c|
+        c.render(instance=nil, options={})
+      end.join('\n')
+    end
+  end # PageBody
+  
+  if auto_upgrade?
+    repository do
+      PageBody.auto_upgrade!
+      ContentsPageBody.auto_upgrade!
+    end
+  end
+end # UzuUzu

data/lib/uzuuzu-cms/model/user.rb

@@ -0,0 +1,30 @@
+# coding: utf-8
+
+module UzuUzu
+  class User
+    include DataMapper::Resource
+    include DataMapper::Timestamps
+    
+    property :id, Serial
+    property :user_id, Text,
+              :required => true,
+              :unique => true
+    property :name, String,
+              :required => true,
+              :length => 255
+    property :domain, String,
+              :required => true,
+              :length => 255
+    property :email, String,
+              :length => 255
+    property :web, Text
+    timestamps :at
+    
+  end #User
+  
+  if auto_upgrade?
+    repository do
+      User.auto_upgrade!
+    end
+  end
+end #UzuUzu

data/lib/uzuuzu-cms/model/wiki.rb

@@ -0,0 +1,43 @@
+# coding: utf-8
+
+require 'uzuuzu/adapter/datamapper/model/css'
+require 'uzuuzu/adapter/datamapper/model/javascript'
+require 'uzuuzu/adapter/datamapper/model/wiki_layout'
+require 'uzuuzu/adapter/datamapper/model/wiki_attache'
+require 'uzuuzu/adapter/datamapper/model/wiki_entry'
+
+module UzuUzu
+
+  class Css
+    has n, :wikis, :through => Resource
+  end
+  
+  class Javascript
+    has n, :wikis, :through => Resource
+  end
+  
+  class Wiki
+    include DataMapper::Resource
+
+    property :id, Serial
+    property :title, String,
+              :required => true,
+              :length => 255
+    
+    has n, :wiki_layouts
+    has n, :wiki_entries
+    has n, :csses, :through => Resource
+    has n, :javascripts, :through => Resource
+  end
+  
+  if auto_upgrade?
+    repository do
+      Wiki.auto_upgrade!
+      WikiJavascript.auto_upgrade!
+      WikiCss.auto_upgrade!
+      WikiLayout.auto_upgrade!
+      WikiEntry.auto_upgrade!
+      WikiAttache.auto_upgrade!
+    end
+  end
+end