yodel_admin 0.0.1

data/lib/migrations/02_admin_default_pages.rb

@@ -0,0 +1,98 @@
+class AdminDefaultPagesMigration < Migration
+  def self.up(site)
+    home_page = site.pages.where(path: '/').first
+    
+    # root admin page
+    admin = site.admin_root_pages.new
+    admin.title = 'Admin'
+    admin.parent = home_page
+    admin.save
+    
+    # pages
+    pages = site.admin_tree_pages.new
+    pages.title = 'Pages'
+    pages.parent = admin
+    pages.root = home_page
+    pages.save
+    
+    # users
+    users = site.admin_list_pages.new
+    users.title = 'Users'
+    users.parent = admin
+    users.record_model = site.users
+    name_col = users.columns.new
+    name_col.name = 'name'
+    name_col.style = 'Text'
+    name_col.save
+    email_col = users.columns.new
+    email_col.name = 'email'
+    email_col.style = 'Text'
+    email_col.save
+    signup_col = users.columns.new
+    signup_col.name = 'created_at'
+    signup_col.as = 'Signup Date'
+    signup_col.style = 'Date'
+    signup_col.default_sort = true
+    signup_col.save
+    users.save
+    
+    # edit
+    edit_page = site.admin_editor_pages.new
+    edit_page.title = 'Edit'
+    edit_page.parent = admin
+    edit_page.save
+    
+    # settings
+    settings_page = site.admin_settings_pages.new
+    settings_page.title = 'Settings'
+    settings_page.parent = admin
+    settings_page.save
+    
+    # syncing
+    sync_page = site.admin_sync_pages.new
+    sync_page.title = 'Sync'
+    sync_page.parent = admin
+    sync_page.save
+    
+    # login
+    login_page = site.login_pages.new
+    login_page.title = 'Login'
+    login_page.page_layout = 'admin_login'
+    login_page.username_field = 'email'
+    login_page.redirect_to = admin
+    login_page.parent = admin
+    login_page.save
+    
+    # logout
+    logout_page = site.logout_pages.new
+    logout_page.title = 'Logout'
+    logout_page.redirect_to = admin
+    logout_page.parent = admin
+    logout_page.save
+    
+    # nav
+    nav = site.menus.new
+    nav.root = admin
+    nav.name = 'nav'
+    edit_exc = nav.exceptions.new
+    edit_exc.page = edit_page
+    edit_exc.save
+    settings_exc = nav.exceptions.new
+    settings_exc.page = settings_page
+    settings_exc.save
+    sync_exc = nav.exceptions.new
+    sync_exc.page = sync_page
+    sync_exc.save
+    login_exc = nav.exceptions.new
+    login_exc.page = login_page
+    login_exc.save
+    logout_exc = nav.exceptions.new
+    logout_exc.page = logout_page
+    logout_exc.save
+    nav.save
+  end
+  
+  def self.down(site)
+    site.pages.where(path: '/admin').first.destroy
+  end
+end

data/lib/models/admin_editor_page.rb

@@ -0,0 +1,27 @@
+class AdminEditorPage < Page
+  
+  class Editor
+    attr_reader :name, :command
+    def exists?; path.present?; end
+    def path; @path ||= `which #{@command}`.strip; end
+    def edit(site); `#{path} #{site.root_directory}`; end
+    def initialize(name, command)
+      @name = name
+      @command = command
+    end
+  end
+  
+  EDITORS = [Editor.new('TextMate', 'mate')]
+  
+  def self.available_editors
+    @available_editors ||= EDITORS.select(&:exists?)
+  end
+  
+  respond_to :get do
+    with :html do
+      if params['editor']
+        EDITORS.find {|e| e.command == params['editor']}.try(:edit, site)
+      end
+    end
+  end
+end

data/lib/models/admin_list_page.rb

@@ -0,0 +1,121 @@
+class AdminListPage < RecordProxyPage
+  respond_to :get do
+    with :html do
+      if params['new']
+        @record = new_record
+        render_layout(show_record_layout, :html)
+      else
+        super()
+      end
+    end
+  end
+  
+  def render_value(record, column)
+    if column.name.include?('.')
+      parts = column.name.split('.')
+      raw_value = record
+      until parts.empty?
+        raw_value = raw_value.try(parts.shift)
+      end
+    else
+      raw_value = record.get(column.name)
+    end
+    value = ''
+    
+    case column.style
+    when 'Text'
+      value = raw_value
+    
+    when 'Boolean'
+      raw_value = raw_value ? column.true_text : column.false_text
+      value = raw_value
+      
+    when 'Integer'
+      raw_value = raw_value.to_i
+      value = raw_value
+      
+    when 'Float'
+      raw_value = raw_value.to_f
+      value = raw_value.round(column.decimals)
+      
+    when 'Currency'
+      raw_value = raw_value.to_f
+      value = "#{symbol}#{raw_value.round(column.decimals)}"
+      
+    when 'Percentage'
+      raw_value = raw_value.to_f
+      value = "#{raw_value.round(column.decimals)}%"
+      
+    when 'Date'
+      if column.format
+        value = raw_value.strftime(column.format)
+      else
+        value = raw_value.strftime('%F')
+      end
+      raw_value = raw_value.strftime('%F %T')
+      
+    when 'Time'
+      if column.format
+        value = raw_value.strftime(column.format)
+      else
+        value = raw_value.strftime('%R')
+      end
+      raw_value = raw_value.strftime('%T')
+      
+    when 'DateTime'
+      if column.format
+        value = raw_value.strftime(column.format)
+      else
+        value = raw_value.strftime('%F %R')
+      end
+      raw_value = raw_value.strftime('%F %T')
+      
+    when 'Label'
+      label_color = column.colors.find {|label_color| label_color.label == raw_value}
+      value = "<span style='background-color: ##{label_color.try(:color)}'>#{raw_value}</span>"
+    end
+    
+    "<td data-value='#{raw_value}'>#{value}</td>"
+  end
+  
+  def render_record(record)
+    cells = columns.collect {|column| render_value(record, column)}.join
+    "<tr data-record-id='#{record.id}'>#{cells}</tr>"
+  end
+  
+  def parser_for_column(column)
+    case column.style
+    when 'Text'
+      'text'
+    when 'Boolean'
+      'text'
+    when 'Integer'
+      'digit'
+    when 'Float'
+      'digit'
+    when 'Currency'
+      'digit'
+    when 'Percentage'
+      'digit'
+    when 'Date'
+      'isoDate'
+    when 'Time'
+      'time'
+    when 'DateTime'
+      'isoDate'
+    when 'Label'
+      'text'
+    end
+  end
+  
+  def sort_list
+    columns.each_with_index do |column, index|
+      return "[[#{index}, 0]]" if column.default_sort
+    end
+    "[[0, 0]]"
+  end
+  
+  def format_record(record)
+    {record: record, name: record.name, '_row_html' => render_record(record)}
+  end
+end

data/lib/models/admin_root_page.rb

@@ -0,0 +1,9 @@
+class AdminRootPage < Page
+  
+  respond_to :get do
+    with :html do
+      response.redirect children.first.path
+    end
+  end
+  
+end

data/lib/models/admin_settings_page.rb

@@ -0,0 +1,20 @@
+class AdminSettingsPage < Page
+  # TODO: when Site is changed to become a normal MongoRecord, this should
+  # be replaced with a plain Page, no need for anything special
+  respond_to :get do
+    with :html do
+      return unless user_allowed_to?(:view)
+      layout('html', false).render(self)
+    end
+  end
+  
+  respond_to :put do
+    with :html do
+      return unless user_allowed_to?(:update)
+      site.name = params['name']
+      site.domains = params['domains']
+      site.save      
+      response.redirect '/admin/settings'
+    end
+  end
+end

data/lib/models/admin_sync_page.rb

@@ -0,0 +1,82 @@
+class AdminSyncPage < Page
+  REMOTE_NAME = 'yodel'
+  
+  respond_to :get do
+    with :json do
+      return {success: false, requires_push: true} if site.remote_id.nil?
+      
+      conflicts = pull
+      if conflicts.empty?
+        {success: true}
+      else
+        {success: false, conflicts: conflicts}
+      end
+    end
+  end
+  
+  respond_to :post do
+    with :json do
+      if params['remote']
+        remote = Remote.find(BSON::ObjectId.from_string(params['remote']))
+        response = remote.create_site
+        return response if !response['success']
+        
+        # link the current site to the new remote
+        site.remote = remote
+        site.remote_id = response['id']
+        
+        # add a default domain for the remote
+        raise "Could not find default yodel domain" if site.local_domain.nil?
+        site.domains << "#{site.local_domain.gsub('.yodel', '')}.#{remote.host}"
+        site.save
+        
+        # assign git remote
+        Dir.chdir(site.root_directory.to_s) do
+          `#{Yodel.config.git_path} remote rm #{REMOTE_NAME}`
+          `#{Yodel.config.git_path} remote add #{REMOTE_NAME} #{remote.git_url(site.remote_id)}`
+        end
+        {success: true}
+      else
+        conflicts = pull
+        if conflicts.empty?
+          Dir.chdir(site.root_directory.to_s) do
+            {success: true, status: `#{Yodel.config.git_path} push #{REMOTE_NAME} master`, remoteDomain: site.remote_domains.first}
+          end
+        else
+          {success: false, conflicts: conflicts}
+        end
+      end
+    end
+  end
+  
+  private
+    def commit
+      Dir.chdir(site.root_directory.to_s) do
+        status = `#{Yodel.config.git_path} status -z`.split("\0").collect(&:strip)
+        status.each do |change|
+          state, file = change.split
+          `#{Yodel.config.git_path} add #{file}` if state == '??' || state.include?('U')
+        end
+        
+        unless status.empty?
+          `#{Yodel.config.git_path} commit -a --allow-empty-message -m ''`
+        end
+      end
+    end
+    
+    def pull
+      conflicts = []
+      commit
+      
+      Dir.chdir(site.root_directory.to_s) do
+        `#{Yodel.config.git_path} pull #{REMOTE_NAME} master`
+        status = `#{Yodel.config.git_path} status -z`.split("\0").collect(&:strip)
+        status.each do |change|
+          state, file = change.split
+          conflicts << file if state.include?('U')
+        end
+      end
+      
+      conflicts
+    end
+end

data/lib/models/admin_tree_page.rb

@@ -0,0 +1,141 @@
+class AdminTreePage < Page
+  # ---------------------------
+  # show
+  # ---------------------------
+  respond_to :get do
+    with :html do
+      return unless user_allowed_to?(:view)
+      case params['action']
+      # render the main page
+      when nil
+        @record = root
+        layout('html', false).render(self)
+      
+      # show a single record
+      when 'show'
+        @record = site.records.find(BSON::ObjectId.from_string(params['id']))
+        render_layout('admin_record_form', 'html')
+      
+      # show a blank form for a new record
+      when 'new'
+        model = site.models.find(BSON::ObjectId.from_string(params['model']))
+        parent = site.records.find(BSON::ObjectId.from_string(params['parent']))
+        @record = model.new
+        @record.parent = parent
+        render_layout('admin_record_form', 'html')
+      end
+    end
+    
+    # render a record tree in json
+    with :json do
+      status 404 and return {} if root.nil?
+      if params['id']
+        record = site.records.find(BSON::ObjectId.from_string(params['id']))
+        tree_for(record, true)
+      else
+        tree_for(root, true)
+      end
+    end
+  end
+  
+  
+  # ---------------------------
+  # delete
+  # ---------------------------
+  respond_to :delete do
+    with :json do
+      record = site.records.find(BSON::ObjectId.from_string(params['id']))
+      record.destroy
+      {success: true}
+    end
+  end
+  
+  
+  # ---------------------------
+  # update
+  # ---------------------------
+  respond_to :put do
+    with :json do
+      record = site.records.find(BSON::ObjectId.from_string(params['id']))
+      
+      case params['action']
+      # udpate the record
+      when nil
+        if params.key?('record')
+          values = JSON.parse(params['record'])
+        else
+          values = params
+        end
+      
+        if record.from_json(values)
+          {success: true, record: json_for_record(record, false, []).merge({values: record.to_json})}
+        else
+          {success: false, errors: record.errors}
+        end
+      
+      # change the index of an existing record
+      when 'set_index'
+        record.insert_in_siblings(params['index'].to_i)
+        if record.save
+          {success: true}
+        else
+          {success: false}
+        end
+      end
+    end
+  end
+  
+  
+  # ---------------------------
+  # create
+  # ---------------------------
+  respond_to :post do
+    with :json do
+      # FIXME: this is copied from page.rb - should be extracted
+      model = site.models.find(BSON::ObjectId.from_string(params.delete('model')))
+      parent = site.records.find(BSON::ObjectId.from_string(params.delete('parent')))
+      new_record = model.new
+      new_record.parent = parent
+      
+      if params.key?('record')
+        values = JSON.parse(params['record'])
+      else
+        values = params
+      end
+      
+      if new_record.from_json(values)
+        {success: true, record: json_for_record(new_record, false, []).merge({values: new_record.to_json})}
+      else
+        {success: false, errors: new_record.errors}
+      end
+    end
+  end
+  
+  
+  private
+    def tree_for(record, root)
+      if record.model.menu_root? && !root
+        children = []
+      else
+        children = record.children.select {|record| visible_record(record)}.collect {|child| tree_for(child, false)}
+      end    
+      json_for_record(record, root, children)
+    end
+  
+    def json_for_record(record, root, children)
+      { id: record.id,
+        index: record.index,
+        name: record.name,
+        icon: record.model.icon,
+        type: record.model_name,
+        root: root,
+        menu_root: root ? false : record.model.menu_root?,
+        parent_id: record.parent ? record.parent.id.to_s : '',
+        children: children
+      }
+    end
+    
+    def visible_record(record)
+      !record.model.hide_in_admin
+    end
+end