poly-cms 0.1.0

data/core/classes/sassfile.rb

@@ -0,0 +1,95 @@
+
+require 'singleton'
+require 'fileutils'
+
+module Poly
+  module Lib
+    class SassFile
+
+      attr_accessor :scss, :css
+
+      def initialize(path, opts={})
+        @path       = path
+        @base_path  = opts[:base_path] || Poly::Lib::Theme.instance.theme_path
+        @cache_to   = opts[:cache_to]  || ''
+
+        @css_file   = File.basename(path, '.scss') + '.css'
+        @css        = File.expand_path("#{Poly::CMS::Cache::CACHE_STORE}#{@cache_to}/#{@css_file}")
+        @scss       = @base_path + "/scss" + path
+      end
+   
+      def get_css
+        if File.exists?(@scss)
+          if cached_css and Sinatra::Base.production?
+            Poly::Lib::CheapQueue.instance.add_task( @path, compilation_task )
+          else
+            compilation_task.call
+          end
+          return cached_css
+        end
+      end
+
+      def compilation_task
+        Proc.new{|i| 
+          begin
+            Compass.configuration do |config|
+              config.sass_path      = @base_path + "/scss"
+              config.css_path       = @base_path + "/css"
+              config.output_style   = Sinatra::Base.production? ? :compressed : :nested
+              config.sass_options   = { quiet: true }
+            end
+
+            base_dir = File.dirname(@css)
+            FileUtils.mkdir_p( base_dir ) unless File.exists?(base_dir)
+            Compass.compiler.compile_if_required( @scss, @css )
+          rescue Exception => e
+            `say 'Error compiling Sass file.'`
+            puts "Error: " + e.message         
+          end
+        }
+      end
+
+      def cached_css
+        @cached_css ||= Poly::Lib::CachedFile.find( @cache_to + "/" + @css_file )
+      end
+
+    end
+  end
+end
+
+module Poly
+  module Lib
+    class CheapQueue
+      include Singleton
+      SLEEP_INTERVAL = 0.1
+
+      def initialize
+        @task_list = []
+        @tasks    = {}
+        loop
+      end
+
+      def add_task(name, task)
+        @task_list  << name unless @tasks[name]
+        @tasks[name] = task
+      end
+
+      def size
+        @task_list.size
+      end
+
+      def loop
+        Thread.new do 
+          while true do
+            sleep SLEEP_INTERVAL
+            next if @task_list.empty?
+            reversed_task_list   = @task_list.reverse
+            task_name            = reversed_task_list.pop
+            @tasks.delete(task_name).call if @tasks[task_name]
+          end
+        end
+      end
+
+    end
+  end
+end

data/core/classes/settings.rb

@@ -0,0 +1,19 @@
+
+require 'singleton'
+require Poly::CORE + '/classes/theme'
+
+module Poly
+  module Lib
+    class Settings
+      include Singleton
+
+      SETTINGS_PATH         = 'settings.yml'
+      THEME_SETTINGS_PATH   = [Poly::Lib::Theme::THEMES_PATH, SETTINGS_PATH].join(':') 
+
+      def settings
+        Cabi.read(SETTINGS_PATH)
+      end
+
+    end
+  end
+end

data/core/classes/theme.rb

@@ -0,0 +1,55 @@
+
+require 'singleton'
+
+module Poly
+
+  module Lib
+    class Theme
+      include Singleton
+
+      THEMES_PATH             = 'themes'
+      LAYOUTS_PATH            = 'layouts'
+      PARTIALS_PATH           = 'partials'
+      ASSETS_PATH             = 'assets'
+      DEFAULT_THEME           = 'base'
+      DEFAULT_PAGE_LAYOUT     = 'default'
+
+      def current
+        Poly::Lib::Settings.instance.settings['theme'] || DEFAULT_THEME
+      end
+
+      def layout(layout)
+        layout = DEFAULT_PAGE_LAYOUT if layout.nil?
+        return "=yield" if layout == false
+
+        # this allows one to simply puts "layout: true"
+        layout = layout.to_s 
+
+        id_for_default = Cabi.path_to_id( File.join( path, LAYOUTS_PATH, layout ) )
+        id_for_page    = Cabi.path_to_id( File.join( path, LAYOUTS_PATH, DEFAULT_PAGE_LAYOUT ) )
+
+        Cabi.read( id_for_default ) || Cabi.read( id_for_page ) || "= yield"
+      end
+
+      def file_path
+        Cabi.file(path) 
+      end
+
+      def path
+        File.join( THEMES_PATH, current )
+      end
+
+      def theme_path
+        id = Cabi.path_to_id( File.join(path, ASSETS_PATH) )
+        Cabi.file(id) 
+      end
+
+      def settings
+        id = Cabi.path_to_id( File.join(path, Poly::Lib::Settings::SETTINGS_PATH) )
+        Cabi.read(id)
+      end
+
+    end
+  end
+
+end

data/core/helpers/base.rb

@@ -0,0 +1,46 @@
+
+module Poly
+  module CMS
+    module Helpers
+      include Sinatra
+
+      module Base
+
+        def site_setting(key)
+          Poly::Lib::Settings.instance.settings[key]
+        end
+
+        def theme_setting(key)
+          Poly::Lib::Theme.instance.settings[key]
+        end
+
+        def posts(include_unpublished=false)
+          Poly::Lib::Page.all_posts(self, { include_unpublished: include_unpublished })
+        end
+
+        def data(key)
+          path  = File.join(Poly::Lib::Path::DATA_PATH, key)
+          id    = Cabi.path_to_id( path )
+          data  = Cabi.read( id )
+          file  = Cabi.file(id) 
+
+          begin
+            (file and File.extname(file) == '.haml') ? haml(data) : data
+          rescue Exception => e
+            "<code>[Error] #{e}</code>"
+          end
+        end
+
+        def page_path
+          @page.path
+        end
+
+        def page_type
+          @page.type
+        end
+
+      end
+
+    end
+  end
+end

data/core/helpers/render.rb

@@ -0,0 +1,26 @@
+
+require 'digest/md5'
+
+module Poly
+  module CMS
+    module Helpers
+      include Sinatra
+
+      module Render
+
+        def render_page(path)
+          # Grab the page & render it.
+          page = Poly::Lib::Page.new(path, self)
+          page.html
+        end
+
+        def partial(path, locals={})
+          partial = Poly::Lib::Partial.new(path)
+          haml(partial.raw, {}, locals)
+        end
+
+      end
+
+    end
+  end
+end

data/core/helpers/truncate.rb

@@ -0,0 +1,17 @@
+
+module Poly
+  module CMS
+    module Helpers
+      include Sinatra
+
+      module Truncate
+
+        def truncate(content, length=250)
+          HTML_Truncator.truncate(content, length)
+        end
+
+      end
+
+    end
+  end
+end

data/core/routes/admin.rb

@@ -0,0 +1,139 @@
+
+module Poly
+  module CMS
+    module Admin
+      extend Sinatra::Extension
+
+      ADMIN_FILES_PATH    = File.join( Poly::CORE, 'admin' )
+      ADMIN_LAYOUTS_PATH  = File.join( ADMIN_FILES_PATH, 'layouts'  )
+      ADMIN_PARTIALS_PATH = File.join( ADMIN_FILES_PATH, 'partials'  )
+      ADMIN_ASSETS_PATH   = File.join( ADMIN_FILES_PATH, 'assets'  )
+      CM_MODES_PATH       = File.join( ADMIN_ASSETS_PATH, 'js', 'vendor', 'codemirror', 'mode'  )
+
+      helpers do
+        def logged_in?
+          Poly::Lib::Persona.logged_in?(session)
+        end
+
+        def files(id)
+          Cabi.list(id, { dirs_first: true })
+        end
+
+        def admin_partial(path, locals={})
+          haml File.read( File.join(ADMIN_PARTIALS_PATH, path) ), {}, locals
+        end
+
+        def editor_modes
+          ['plain'] + Dir.glob( CM_MODES_PATH + '/*' ).map{ |f|
+          next if !File.directory?(f) || ['.', '..'].include?(f)
+            File.basename(f) 
+          }.compact
+        end
+
+        def redirect_if_not_logged_in
+          redirect '/admin' if not logged_in?
+        end
+
+      end
+
+      get '/admin' do
+        @email = session[:auth_email]
+        haml File.read( File.join(ADMIN_LAYOUTS_PATH, 'admin.haml') )
+      end
+
+      get '/admin/logout' do
+        session[:auth_email] = nil
+        session.clear
+        redirect "/admin#logout"
+      end
+
+      get '/admin/files' do
+        redirect_if_not_logged_in
+
+        items = files( params[:id] + ':*' )
+        items.map!{ |i| admin_partial('_treeitem.haml', { item: i, level: params[:level].to_i + 1 }) }.join('') if params[:template]
+
+        content_type :json
+        { items: items }.to_json
+      end
+
+      get '/admin/file' do
+        redirect_if_not_logged_in
+        content_type :json
+        { contents: Cabi.read(params[:id], { no_yaml: true }) }.to_json
+      end
+
+      post '/admin/file' do
+        redirect_if_not_logged_in
+        Cabi.write( params[:id], params[:content] )
+
+        content_type :json
+        { message: 'ok' }.to_json
+      end
+
+      post '/admin/file/delete' do
+        redirect_if_not_logged_in
+        file = Cabi.file( params[:id] )
+        FileUtils.rm_rf(file) if File.exists?(file)
+
+        content_type :json
+        { message: "Deleted: #{Cabi.file( params[:id] )}" }.to_json
+      end
+
+      post '/admin/file/create' do
+        redirect_if_not_logged_in
+        path  = params[:path]
+        id    = Cabi.path_to_id(path)
+        
+        content_type :json
+        if !Cabi.file( id )
+          Cabi.create(id) 
+          { message: "File created: #{path}" }.to_json
+        else
+          { message: "File exists." }.to_json
+        end
+      end      
+
+      post '/admin/file/move' do
+        redirect_if_not_logged_in
+        id      = params[:id]
+        moveto  = params[:moveto]
+
+        if Cabi.file( id )
+          path          = Cabi.file( id )
+          moveto_path   = File.join(Cabi.data_dir, moveto)
+          FileUtils.mv(path, moveto_path) unless File.exists?(moveto_path)
+
+          content_type :json
+          { message: "ok" }.to_json
+        end
+      end  
+
+      get '/admin/file/tree' do
+        redirect_if_not_logged_in
+        admin_partial "_tree.haml"
+      end  
+
+      get %r{/admin/.} do
+        file = request.path_info.gsub('/admin', '')
+        
+        if File.extname(file) == '.scss'
+          scss  = Poly::Lib::SassFile.new(file, { base_path: ADMIN_ASSETS_PATH, cache_to: '/admin'})
+          css   = scss.get_css
+          raise Sinatra::NotFound unless css
+          send_file( css )
+        elsif File.exists?( File.join(ADMIN_ASSETS_PATH, file) )
+          send_file(  File.join(ADMIN_ASSETS_PATH, file) )
+        else
+          raise Sinatra::NotFound 
+        end
+      end
+
+      post '/admin/verify' do 
+        content_type :json
+        Poly::Lib::Persona.verify(params, session, request)
+      end
+
+    end
+  end
+end

data/core/routes/assetcompiler.rb

@@ -0,0 +1,23 @@
+
+require 'sass/plugin'
+
+module Poly
+  module CMS
+    module AssetCompiler
+      extend Sinatra::Extension
+
+
+      get '/*.scss' do
+        scss  = Poly::Lib::SassFile.new(request.path_info)
+        css   = scss.get_css
+
+        if css
+          send_file(css)
+        else
+          raise Sinatra::NotFound 
+        end
+      end
+
+    end
+  end
+end

data/core/routes/base.rb

@@ -0,0 +1,22 @@
+
+module Poly
+  module CMS
+    module Base
+      extend Sinatra::Extension
+
+      not_found do
+        render_page('/not-found')
+      end
+      
+      error do
+        render_page('/error')
+      end
+
+      get '*' do |path|
+        path = "/home" if path == '/'
+        render_page(path)
+      end
+
+    end
+  end
+end