nesta 0.9.0

data/lib/nesta/overrides.rb

@@ -0,0 +1,59 @@
+module Nesta
+  module Overrides
+    module Renderers
+      def haml(template, options = {}, locals = {})
+        defaults = Overrides.render_options(template, :haml)
+        super(template, defaults.merge(options), locals)
+      end
+
+      def scss(template, options = {}, locals = {})
+        defaults = Overrides.render_options(template, :scss)
+        super(template, defaults.merge(options), locals)
+      end
+
+      def sass(template, options = {}, locals = {})
+        defaults = Overrides.render_options(template, :sass)
+        super(template, defaults.merge(options), locals)
+      end
+    end
+
+    def self.load_local_app
+      require Nesta::Path.local("app")
+    rescue LoadError
+    end
+    
+    def self.load_theme_app
+      if Nesta::Config.theme
+        require Nesta::Path.themes(Nesta::Config.theme, "app")
+      end
+    rescue LoadError
+    end
+
+    private
+      def self.template_exists?(engine, views, template)
+        views && File.exist?(File.join(views, "#{template}.#{engine}"))
+      end
+
+      def self.render_options(template, engine)
+        if template_exists?(engine, local_view_path, template)
+          { :views => local_view_path }
+        elsif template_exists?(engine, theme_view_path, template)
+          { :views => theme_view_path }
+        else
+          {}
+        end
+      end
+
+      def self.local_view_path
+        Nesta::Path.local("views")
+      end
+    
+      def self.theme_view_path
+        if Nesta::Config.theme.nil?
+          nil
+        else
+          Nesta::Path.themes(Nesta::Config.theme, "views")
+        end
+      end
+  end
+end

data/lib/nesta/path.rb

@@ -0,0 +1,11 @@
+module Nesta
+  class Path
+    def self.local(*args)
+      File.expand_path(File.join(args), Nesta::App.root)
+    end
+
+    def self.themes(*args)
+      File.expand_path(File.join('themes', *args), Nesta::App.root)
+    end
+  end
+end

data/lib/nesta/plugins.rb

@@ -0,0 +1,15 @@
+module Nesta
+  module Plugins
+    def self.load_local_plugins
+      plugins = Dir.glob(File.expand_path('../plugins/*', File.dirname(__FILE__)))
+      plugins.each { |plugin| require_plugin(plugin) }
+    end
+
+    private
+      def self.require_plugin(plugin)
+        require File.join(plugin, 'lib', File.basename(plugin))
+      rescue LoadError => e
+        $stderr.write("Couldn't load plugins/#{File.basename(plugin)}: #{e}\n")
+      end
+  end
+end

data/lib/nesta/version.rb

@@ -0,0 +1,3 @@
+module Nesta
+  VERSION = "0.9.0"
+end

data/nesta.gemspec

@@ -0,0 +1,49 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "nesta/version"
+
+Gem::Specification.new do |s|
+  s.name        = "nesta"
+  s.version     = Nesta::VERSION
+  s.platform    = Gem::Platform::RUBY
+  s.authors     = ["Graham Ashton"]
+  s.email       = ["graham@effectif.com"]
+  s.homepage    = "http://effectif.com/nesta"
+  s.summary     = %q{Ruby CMS, written in Sinatra}
+  s.description = <<-EOF
+Nesta is a lightweight Content Management System, written in Ruby using
+the Sinatra web framework. Nesta has the simplicity of a static site
+generator, but (being a fully fledged Rack application) allows you to
+serve dynamic content on demand.
+
+Content is stored on disk in plain text files (there is no database).
+Edit your content in a text editor and keep it under version control
+(most people use git, but any version control system will do fine).
+
+Implementing your site's design is easy, but Nesta also has a small
+selection of themes to choose from.
+EOF
+
+  s.rubyforge_project = "nesta"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+
+  s.add_dependency("builder", "2.1.2")
+  s.add_dependency("haml", "3.0.12")
+  s.add_dependency("maruku", "0.6.0")
+  s.add_dependency("RedCloth", "4.2.2")
+  s.add_dependency("sinatra", "1.1.0")
+  
+  # Useful in development
+  s.add_dependency("shotgun", ">= 0.8")
+
+  # Test libraries
+  s.add_development_dependency("hpricot", "0.8.2")
+  s.add_development_dependency("rack-test", "0.5.3")
+  s.add_development_dependency("rspec", "1.3.0")
+  s.add_development_dependency("rspec_hpricot_matchers", "1.0")
+  s.add_development_dependency("test-unit", "1.2.3")
+end

data/scripts/import-from-mephisto

@@ -0,0 +1,207 @@
+#!/usr/bin/env ruby
+
+# Assumptions:
+#
+# - It's okay to ignore mephisto's sections and sites.
+# - Each mephisto tag should be converted to a Nesta category.
+
+require "getoptlong"
+require "time"
+
+require "rubygems"
+require "active_record"
+
+require File.join(File.dirname(__FILE__), *%w[.. lib config])
+require File.join(File.dirname(__FILE__), *%w[.. lib models])
+
+class Content < ActiveRecord::Base
+  has_many :taggings, :as => :taggable
+  has_many :tags, :through => :taggings
+  
+  def self.inheritance_column
+    @inheritance_column = "none"
+  end
+  
+  def self.articles
+    conditions = "type = 'Article' and published_at is not NULL"
+    find(:all, :conditions => conditions).map { |c| ArticleLoader.new(c) }
+  end
+end
+
+class Tagging < ActiveRecord::Base
+  belongs_to :content
+  belongs_to :tag
+end
+
+class Tag < ActiveRecord::Base
+  has_many :taggings
+  has_many :contents, :through => :taggings
+
+  def filename
+    File.join(Nesta::Config.page_path, "#{name}.mdown")
+  end
+end
+
+module ContentWrapper
+  def initialize(content)
+    @content = content
+  end
+  
+  def permalink
+    @content.permalink
+  end
+  
+  private
+    def metadata_string(metadata)
+      metadata.map { |key, value| "#{key}: #{value}" }.sort.join("\n")
+    end
+end  
+
+class ArticleLoader
+  include ContentWrapper
+  
+  def filename
+    File.join(Nesta::Config.page_path, "#{permalink}.mdown")
+  end
+
+  def date
+    @content.published_at
+  end
+  
+  def categories
+    @content.tags.map { |t| t.name }.sort.join(", ")
+  end
+  
+  def summary
+    @content.excerpt.strip.gsub(/\r?\n/, '\n')
+  end
+  
+  def atom_id(domain)
+    published = "#{@content.created_at.strftime('%Y-%m-%d')}"
+    "tag:#{domain},#{published}:#{@content.id}"
+  end
+
+  def metadata(domain)
+    metadata = {
+      "Date" => date,
+      "Categories" => categories,
+      "Summary" => summary
+    }
+    metadata.merge!("Atom ID" => atom_id(domain)) if domain
+    metadata_string(metadata)
+  end
+  
+  def content
+    ["# #{@content.title}", @content.body.gsub("\r\n", "\n")].join("\n\n")
+  end
+end
+
+class App
+  def usage
+    $stderr.write <<-EOF
+Usage: #{File.basename $0} [OPTIONS] -u <username> -p <password>
+
+OPTIONS (defaults shown in brackets)
+
+    -a, --adapter     Database adapter (mysql)
+    --domain          Site's domain name (for preserving <id/> tags in feed)
+    --clobber         Overwrite existing files
+    -d, --database    Database name (mephisto_production)
+    -h, --host        Database hostname (localhost)
+    -p, --password    Database password
+    -u, --username    Database username
+
+    EOF
+    exit 1
+  end
+  
+  def parse_command_line
+    parser = GetoptLong.new
+    parser.set_options(
+        ["-a", "--adapter", GetoptLong::REQUIRED_ARGUMENT],
+        ["--domain", GetoptLong::REQUIRED_ARGUMENT],
+        ["--clobber", GetoptLong::NO_ARGUMENT],
+        ["-d", "--database", GetoptLong::REQUIRED_ARGUMENT],
+        ["-h", "--host", GetoptLong::REQUIRED_ARGUMENT],
+        ["-u", "--username", GetoptLong::REQUIRED_ARGUMENT],
+        ["-p", "--password", GetoptLong::REQUIRED_ARGUMENT])
+    loop do
+      opt, arg = parser.get
+      break if not opt
+      case opt
+        when "-a"
+          @adapter = arg
+        when "--domain"
+          @domain = arg
+        when "--clobber"
+          @clobber = true
+        when "-d"
+          @database = arg
+        when "-h"
+          @host = arg
+        when "-p"
+          @password = arg
+        when "-u"
+          @username = arg
+      end
+    end
+    @adapter ||= "mysql"
+    @clobber.nil? && @clobber = false
+    @host ||= "localhost"
+    @database ||= "mephisto_production"
+    usage if @username.nil? || @password.nil?
+  end
+  
+  def connect_to_database
+    ActiveRecord::Base.establish_connection( 
+      :adapter => @adapter,
+      :host => @host,
+      :username => @username,
+      :password => @password,
+      :database => @database
+    ) 
+  end
+  
+  def should_import?(item)
+    if File.exist?(item.filename) && (! @clobber)
+      puts "skipping (specify --clobber to overwrite)"
+      false
+    else
+      true
+    end
+  end
+  
+  def import_articles
+    Content.articles.each do |article|
+      puts "Importing article: #{article.permalink}"
+      if should_import?(article)
+        File.open(article.filename, "w") do |file|
+          file.write [article.metadata(@domain), article.content].join("\n\n")
+        end
+      end
+    end
+  end
+  
+  def import_tags
+    Tag.find(:all).each do |tag|
+      puts "Importing tag: #{tag.name}"
+      if should_import?(tag)
+        File.open(tag.filename, "w") do |file|
+          file.write("# #{tag.name.capitalize}\n")
+        end
+      end
+    end
+  end
+  
+  def main
+    parse_command_line
+    connect_to_database
+    import_articles
+    import_tags
+  rescue GetoptLong::Error
+    exit 1
+  end
+end
+
+app = App.new
+app.main

data/spec/atom_spec.rb

@@ -0,0 +1,138 @@
+require File.expand_path('spec_helper', File.dirname(__FILE__))
+require File.expand_path('model_factory', File.dirname(__FILE__))
+
+describe "atom feed" do
+  include ConfigSpecHelper
+  include ModelFactory
+  include RequestSpecHelper
+  
+  before(:each) do
+    stub_configuration
+    stub_config_key("author", {
+      "name" => "Fred Bloggs",
+      "uri" => "http://fredbloggs.com",
+      "email" => "fred@fredbloggs.com"
+    })
+    get "/articles.xml"
+  end
+  
+  after(:each) do
+    remove_fixtures
+  end
+  
+  it "should render successfully" do
+    last_response.should be_ok
+  end
+  
+  it "should use Atom's XML namespace" do
+    body.should have_tag("/feed[@xmlns=http://www.w3.org/2005/Atom]")
+  end
+  
+  it "should have an ID element" do
+    body.should have_tag("/feed/id", "tag:example.org,2009:/")
+  end
+  
+  it "should have an alternate link element" do
+    body.should have_tag("/feed/link[@rel=alternate][@href='http://example.org']")
+  end
+
+  it "should have a self link element" do
+    body.should have_tag(
+        "/feed/link[@rel=self][@href='http://example.org/articles.xml']")
+  end
+  
+  it "should have title and subtitle" do
+    body.should have_tag("/feed/title[@type=text]", "My blog")
+    body.should have_tag("/feed/subtitle[@type=text]", "about stuff")
+  end
+  
+  it "should include the author details" do
+    body.should have_tag("/feed/author/name", "Fred Bloggs")
+    body.should have_tag("/feed/author/uri", "http://fredbloggs.com")
+    body.should have_tag("/feed/author/email", "fred@fredbloggs.com")
+  end
+
+  describe "for article" do
+    before(:each) do
+      @heading = "Heading"
+      @articles = []
+      @category = create_category
+      11.times do |i|
+        @articles << create_article(
+          :heading => "Article #{i + 1}",
+          :path => "article-#{i + 1}",
+          :metadata => {
+            "categories" => @category.path,
+            "date" => "#{i + 1} January 2009"
+          },
+          :content => "Blah blah\n\n## #{@heading}\n\n[link](/foo)"
+        )
+      end
+      @article = @articles.last
+      get "/articles.xml"
+    end
+    
+    it "should set title" do
+      body.should have_tag("entry/title", "Article 11")
+    end
+    
+    it "should link to the HTML version" do
+      url = "http://example.org/#{@article.path}"
+      body.should have_tag(
+          "entry/link[@href='#{url}'][@rel=alternate][@type='text/html']")
+    end
+    
+    it "should define unique ID" do
+      body.should have_tag(
+          "entry/id", "tag:example.org,2009-01-11:#{@article.abspath}")
+    end
+    
+    it "should specify date published" do
+      body.should have_tag("entry/published", "2009-01-11T00:00:00+00:00")
+    end
+
+    it "should specify article categories" do
+      body.should have_tag("category[@term=#{@category.permalink}]")
+    end
+
+    it "should have article content" do
+      body.should have_tag(
+          "entry/content[@type=html]", /<h2[^>]*>#{@heading}<\/h2>/)
+    end
+    
+    it "should include hostname in URLs" do
+      body.should have_tag("entry/content", /href='http:\/\/example.org\/foo/)
+    end
+    
+    it "should not include article heading in content" do
+      body.should_not have_tag("entry/summary", /#{@article.heading}/)
+    end
+    
+    it "should list the latest 10 articles" do
+      body.should have_tag("entry", :count => 10)
+      body.should_not have_tag("entry/title", @articles.first.heading)
+    end
+  end
+  
+  describe "page with no date" do
+    before(:each) do
+      create_category(:path => "no-date")
+      get "/articles.xml"
+    end
+
+    it "should not appear in feed" do
+      body.should_not have_tag("entry/id", /tag.*no-date/)
+    end
+  end
+  
+  describe "article with atom ID" do
+    it "should use pre-defined ID" do
+      create_article(:metadata => {
+        "date" => "1 January 2009",
+        "atom id" => "use-this-id"
+      })
+      get "/articles.xml"
+      body.should have_tag("entry/id", "use-this-id")
+    end
+  end
+end