merb-words 0.1

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2008 Jamie Hoover
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README

@@ -0,0 +1,59 @@
+Prerequisite:
+
+http://github.com/uipoet/merb-ui/tree/master
+
+------------------------------------------------------------------------------
+
+Installation:
+
+1.) Install merb-words gem.
+git clone git://github.com/uipoet/merb-words.git
+cd merb-words
+sudo rake install
+
+2.) Navigate to your merb application.
+cd ~/your_merb_app/
+
+3.) Add to your dependencies file.
+vim config/dependencies.rb
+a
+
+dependency 'merb-words'
+
+esc : wq
+
+4.) Add options to your init file in the before_app_loads callback.
+vim config/init.rb
+a
+
+Merb::BootLoader.before_app_loads do
+  Merb::Slices::config[:merb_words][:title] = 'Words' #Title of the index page and/or tab.
+end
+
+esc : wq
+
+5.) Add to your router file.
+vim config/router.rb
+a
+
+slice(:merb_words)
+
+esc : wq
+
+6.) Start your merb application and browse.
+http://your_domain/photos
+
+------------------------------------------------------------------------------
+
+Advanced:
+
+# List all available tasks:
+rake -T slices:merb_words
+
+# Put your application-level overrides in:
+host-app/slices/merb-words/
+
+# Templates are located in this order:
+1. host-app/slices/merb-words/app/views/*
+2. gems/merb-words/app/views/*
+3. host-app/app/views/*

data/Rakefile

@@ -0,0 +1,68 @@
+require 'rubygems'
+require 'rake/gempackagetask'
+
+require 'merb-core'
+require 'merb-core/tasks/merb'
+
+GEM_NAME = "merb-words"
+AUTHOR = "uipoet"
+EMAIL = "dont.tase@me.com"
+HOMEPAGE = "http://uipoet.com/"
+SUMMARY = "Word management for Merb."
+GEM_VERSION = "0.1"
+
+spec = Gem::Specification.new do |s|
+  s.rubyforge_project = "mui"
+  s.name = GEM_NAME
+  s.version = GEM_VERSION
+  s.platform = Gem::Platform::RUBY
+  s.has_rdoc = true
+  s.extra_rdoc_files = ["README", "LICENSE"]
+  s.summary = SUMMARY
+  s.description = s.summary
+  s.author = AUTHOR
+  s.email = EMAIL
+  s.homepage = HOMEPAGE
+  s.add_dependency('merb', '~> 1.0.0')
+  s.add_dependency('merb-ui', '>= 0.1')
+  s.require_path = 'lib'
+  s.files = %w(LICENSE README Rakefile) + Dir.glob("{lib,app,public}/**/*")
+end
+
+Rake::GemPackageTask.new(spec) do |pkg|
+  pkg.gem_spec = spec
+end
+
+desc "Install the gem"
+task :install do
+  Merb::RakeHelper.install(GEM_NAME, :version => GEM_VERSION)
+end
+
+desc "Uninstall the gem"
+task :uninstall do
+  Merb::RakeHelper.uninstall(GEM_NAME, :version => GEM_VERSION)
+end
+
+desc "Release the gem to rubyforge"
+task :release do
+  require 'rubyforge'
+  sh %{sudo rake package}
+  begin
+    sh %{rubyforge login}
+    sh %{rubyforge add_release #{AUTHOR} #{GEM_NAME} #{GEM_VERSION} pkg/#{GEM_NAME}-#{GEM_VERSION}.gem}
+  rescue Exception => e
+    puts "Release failed: #{e.message}"
+  end
+end
+
+desc "Create a gemspec file"
+task :gemspec do
+  File.open("#{GEM_NAME}.gemspec", "w") do |file|
+    file.puts spec.to_ruby
+  end
+end
+
+require 'spec/rake/spectask'
+require 'merb-core/test/tasks/spectasks'
+desc 'Default: run spec examples'
+task :default => 'spec'

data/app/controllers/application.rb

@@ -0,0 +1,5 @@
+class MerbWords::Application < Merb::Controller
+
+  controller_for_slice
+
+end

data/app/controllers/categories.rb

@@ -0,0 +1,52 @@
+class MerbWords::Categories < MerbWords::Application
+
+  before(:mui_window_referer, :only => [:create, :update, :delete])
+
+  def create
+    display(@category = Category.new, :layout => false)
+  end
+
+  def create_post
+    category = Category.new(params[:category])
+    if category.save
+      session[:mui_message] = {:title => 'Category created', :tone => 'positive'}
+    else
+      session[:mui_message] = {:title => 'Unable to create category', :body => mui_list(category.errors), :tone => 'negative'}
+      session[:mui_window] = slice_url(:category_create)
+    end
+    mui_window_redirect
+  end
+
+  def update
+    display(@category = Category.get!(params[:category_id]), :layout => false)
+  end
+
+  def update_put
+    category = Category.get!(params[:category_id])
+    if category.update_attributes(params[:category])
+      session[:mui_message] = {:title => 'Category updated', :tone => 'positive'}
+    else
+      session[:mui_message] = {:title => 'Unable to update category', :body => mui_list(category.errors), :tone => 'negative'}
+      session[:mui_window] = slice_url(:category_update)
+    end
+    mui_window_redirect
+  end
+
+  def delete
+    display(@category = Category.get!(params[:category_id]), :layout => false)
+  end
+
+  def delete_delete
+    category = Category.get!(params[:category_id])
+    category.pages.clear
+    category.save
+    if category.destroy
+      session[:mui_message] = {:title => 'Category deleted', :tone => 'positive'}
+    else
+      session[:mui_message] = {:title => 'Unable to delete category', :body => mui_list(category.errors), :tone => 'negative'}
+      session[:mui_window] = slice_url(:category_delete)
+    end
+    mui_window_redirect
+  end
+
+end

data/app/controllers/pages.rb

@@ -0,0 +1,109 @@
+require 'cgi'
+
+class MerbWords::Pages < MerbWords::Application
+
+  before(:mui_window_referer, :only => [:create, :update, :delete])
+  before(:merb_words_password_redirect, :exclude => [:index, :feed, :read], :unless => :merb_words_password?)
+  before(:merb_words_orders, :only => [:index])
+
+  def index
+    if Page.first
+      filters = {}
+      filters[:publish] = true unless merb_words_password?
+      @order_property = params[:order_property] || MerbWords[:order] || 'created_at'
+      if @order_property == 'title'
+        filters[:order] = [@order_property.intern.asc]
+      else
+        filters[:order] = [@order_property.intern.desc]
+      end
+      if search = params[:search] and !search.blank?
+        search = CGI.escape(search).to_a
+        if searches = session[:mui_searches]
+          session[:mui_searches] = searches | search
+        else
+          session[:mui_searches] = search
+        end
+        pages_title = Page.all(:title.like => "%#{search}%")
+        pages_body = Page.all(:body.like => "%#{search}%")
+        @pages = pages_title | pages_body
+      elsif @category_id = params[:category_id]
+        @pages = Category.get!(@category_id).pages(filters)
+      else
+        @pages = Page.all(filters)
+      end
+      @categories = Category.all(:order => [:title.asc])
+      @orders = Order.all
+      display @pages
+    else
+      session[:mui_message] = {:title => 'Create the first page'} if merb_words_password?
+      session[:mui_window] = slice_url(:create)
+      render
+    end
+  end
+
+  def feed
+    only_provides :xml
+    display @pages = Page.all(:publish => true) if Page.first
+  end
+
+  def create
+    display(@page = Page.new, :layout => false)
+  end
+
+  def create_post
+    params[:page][:categories].collect!{|c| Category[c]} if params[:page][:categories]
+    page = Page.new(params[:page])
+    if page.save
+      session[:mui_message] = {:title => 'Page created', :tone => 'positive'}
+    else
+      session[:mui_message] = {:title => 'Unable to create page', :body => mui_list(page.errors), :tone => 'negative'}
+      session[:mui_window] = slice_url(:create)
+    end
+    mui_window_redirect
+  end
+
+  def read
+    display @page = Page.get!(params[:page_id])
+  end
+
+  def update
+    display(@page = Page.get!(params[:page_id]), :layout => false)
+  end
+
+  def update_put
+    page = Page.get!(params[:page_id])
+    page.categories.clear
+    page.save
+    params[:page][:categories].collect!{|c| Category[c]} if params[:page][:categories]
+    if page.update_attributes(params[:page])
+      session[:mui_message] = {:title => 'Page updated', :tone => 'positive'}
+    else
+      session[:mui_message] = {:title => 'Unable to update page', :body => mui_list(page.errors), :tone => 'negative'}
+      session[:mui_window] = slice_url(:create)
+    end
+    mui_window_redirect
+  end
+
+  def delete
+    display(@page = Page.get!(params[:page_id]), :layout => false)
+  end
+
+  def delete_delete
+    page = Page.get!(params[:page_id])
+    page.categories.clear
+    page.save
+    if page.destroy
+      session[:mui_message] = {:title => 'Page deleted', :tone => 'positive'}
+    else
+      session[:mui_message] = {:title => 'Unable to delete page', :body => mui_list(page.errors), :tone => 'negative'}
+      session[:mui_window] = slice_url(:delete)
+    end
+    redirect(slice_url(:index))
+  end
+
+  def search_delete
+    session[:mui_searches] = session[:mui_searches] - params[:search].to_a
+    redirect(slice_url(:index))
+  end
+
+end

data/app/controllers/passwords.rb

@@ -0,0 +1,89 @@
+class MerbWords::Passwords < MerbWords::Application
+
+  before(:mui_window_referer, :only => [:exit, :create, :read, :update, :delete])
+  before(:merb_words_password_redirect, :exclude => [:exit, :create, :read], :unless => :merb_words_password?)
+
+  def exit
+    session.delete(:mui_password_id)
+    session[:mui_message] = {:title => 'Exited', :tone => 'positive'}
+    mui_window_redirect
+  end
+
+  def create
+    display(@password = Password.new, :layout => false)
+  end
+
+  def create_post
+    password = Password.new(params[:password])
+    if password.save
+      session[:mui_password_id] = password.id
+      session[:mui_message] = {:title => 'Password created', :tone => 'positive'}
+      mui_window_redirect
+    else
+      session[:mui_message] = {:title => 'Unable to create password', :body => mui_list(password.errors), :tone => 'negative'}
+      session[:mui_window] = slice_url(:password_create)
+      mui_window_redirect
+    end
+  end
+
+  def read
+    if Password.first
+      display(@password = Password.new, :layout => false)
+    else
+      redirect slice_url(:password_create)
+    end
+  end
+
+  def read_post
+    encrypted = encrypt(params[:password])
+    if password_match = Password.first(:encrypted => encrypted)
+      session[:mui_password_id] = password_match.id
+      session[:mui_message] = {:title => 'Password correct', :tone => 'positive'}
+    else
+      session[:mui_message] = {:title => 'Password incorrect', :tone => 'negative'}
+      session[:mui_window] = slice_url(:password_read)
+    end
+    mui_window_redirect
+  end
+
+  def update
+    display(@password = Password.new, :layout => false)
+  end
+
+  def update_post
+    password = Password.get!(session[:mui_password_id])
+    if password.update_attributes(params[:password])
+      session[:mui_message] = {:title => 'Password updated', :tone => 'positive'}
+    else
+      session[:mui_message] = {:title => 'Unable to update password', :body => mui_list(password.errors), :tone => 'negative'}
+      session[:mui_window] = slice_url(:password_update)
+    end
+    mui_window_redirect
+  end
+
+  def delete
+    render :layout => false
+  end
+
+  def delete_delete
+    password = Password.get!(session[:mui_password_id])
+    if password.destroy
+      session.delete(:mui_password_id)
+      session[:mui_message] = {:title => 'Password deleted', :tone => 'positive'}
+      mui_window_redirect
+    else
+      session[:mui_message] = {:title => 'Unable to delete password', :body => mui_list(password.errors), :tone => 'negative'}
+      session[:mui_window] = slice_url(:password_delete)
+      mui_window_redirect
+    end
+  end
+
+  protected
+
+  require "digest/sha1"
+
+  def encrypt(password)
+    Digest::SHA1.hexdigest("--#{password[:password]}--")
+  end
+
+end

data/app/helpers/application_helper.rb

@@ -0,0 +1,55 @@
+module Merb::MerbWords::ApplicationHelper
+
+  def merb_words_categories(options = {})
+    attributes = {}
+    attributes[:class] = 'mui_menu'
+    attributes[:collection] = Category.all(:order => [:title.asc])
+    attributes[:label] = 'Categories'
+    attributes[:multiple] = 'multiple'
+    attributes[:selected] = options[:categories].all.map {|c| c.id}
+    attributes[:text_method] = :title
+    attributes[:value_method] = :id
+    select(:categories, attributes)
+  end
+
+  def merb_words_orders
+    unless Order.first
+      Order.create!(:property => 'created_at', :title => 'Date Created')
+      Order.create!(:property => 'updated_at', :title => 'Date Updated')
+      Order.create!(:property => 'title', :title => 'Title')
+    end
+  end
+
+  def merb_words_password?
+    session[:mui_password_id] ? true : false
+  end
+
+  def merb_words_password_redirect
+    if Password.first
+      redirect slice_url(:password_read)
+    else
+      redirect slice_url(:password_create)
+    end
+  end
+
+  def merb_words_password_status
+    if merb_words_password?
+      update = mui_button(:title => 'Update', :url => slice_url(:password_update), :window => 'open')
+      exit = mui_button(:title => 'Exit', :url => slice_url(:password_exit))
+      mui_block(:type => 'status'){%{Password: #{update} #{exit}}}
+    end
+  end
+
+  def merb_words_paragraph(body)
+    body.gsub(/\r\n|\r|\n/, '<br/>')
+  end
+
+  def merb_words_truncate(options = {})
+    characters = options[:characters] || 256
+    title = options[:title] || ' ...continued'
+    body = options[:body].gsub(/<\/?[^>]*>/, '')
+    body = body[0, characters] + tag(:span, title, :class => 'mui_truncate') if body.size > characters
+    merb_words_paragraph(body)
+  end
+
+end

data/app/helpers/global_helpers.rb

@@ -0,0 +1,7 @@
+module Merb::GlobalHelpers
+
+  def merb_words_title
+    MerbWords[:title]
+  end
+
+end

data/app/models/category.rb

@@ -0,0 +1,10 @@
+class Category
+
+  include DataMapper::Resource
+
+  property :id, Serial
+  property :title, String, :nullable => false
+
+  has n, :pages, :through => Resource
+
+end

data/app/models/order.rb

@@ -0,0 +1,9 @@
+class Order
+
+  include DataMapper::Resource
+
+  property :id, Serial
+  property :property, String
+  property :title, String
+
+end

data/app/models/page.rb

@@ -0,0 +1,14 @@
+class Page
+
+  include DataMapper::Resource
+
+  property :id, Serial
+  property :title, String, :nullable => false
+  property :body, Text, :nullable => false
+  property :publish, Boolean, :default => false
+  property :created_at, Date
+  property :updated_at, Date
+
+  has n, :categories, :through => Resource
+
+end

data/app/models/password.rb

@@ -0,0 +1,25 @@
+class Password
+
+  include DataMapper::Resource
+  include DataMapper::Validate
+
+  attr_accessor :password, :password_confirmation
+
+  property :id, Integer, :key => true, :serial => true
+  property :encrypted, String
+
+  validates_present(:password, :password_confirmation)
+  validates_length(:password, :within => 4..20)
+  validates_is_confirmed(:password, :groups => :create)
+
+  before :save, :encrypt
+
+  protected
+
+  require "digest/sha1"
+
+  def encrypt
+    attribute_set(:encrypted, Digest::SHA1.hexdigest("--#{password}--"))
+  end
+
+end

data/app/views/categories/_form.html.erb

@@ -0,0 +1,3 @@
+<%= mui_block do %>
+  <%= mui_text(:title, :focus => true, :title => 'Title', :width => '20em') %>
+<% end =%>

data/app/views/categories/create.html.erb

@@ -0,0 +1,8 @@
+<%= mui_window(:title => 'Create Category') do %>
+  <%= mui_form(:category, :action => slice_url(:category_create)) do %>
+    <%= partial(:form) %>
+    <%= mui_block do %>
+      <%= mui_button(:title => 'Create', :submit => true, :tone => 'positive')%>
+    <% end =%>
+  <% end =%>
+<% end =%>

data/app/views/categories/delete.html.erb

@@ -0,0 +1,8 @@
+<%= mui_window(:title => 'Delete Category') do %>
+  <%= mui_block do %>Are you sure that you want to delete <%= @category.title %>?<% end =%>
+  <%= mui_block do %>
+    <%= mui_form(:category, :action => slice_url(:category_delete, :category_id => @category.id)) do %>
+      <%= mui_button(:title => 'Delete', :submit => true, :tone => 'negative') %>
+    <% end =%>
+  <% end =%>
+<% end =%>

data/app/views/categories/update.html.erb

@@ -0,0 +1,8 @@
+<%= mui_window(:title => 'Update Category') do %>
+  <%= mui_form(:category, :action => slice_url(:category_update, :category_id => @category.id)) do %>
+    <%= partial(:form) %>
+    <%= mui_block do %>
+      <%= mui_button(:title => 'Update', :submit => true, :tone => 'positive')%>
+    <% end =%>
+  <% end =%>
+<% end =%>

data/app/views/layout/application.xml.erb

@@ -0,0 +1,8 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<rss version="2.0">
+  <channel>
+    <title><%= merb_words_title %></title>
+    <link><%= slice_url(:index) %></link>
+    <%= catch_content :for_layout %>
+  </channel>
+</rss>

data/app/views/pages/_category.html.erb

@@ -0,0 +1,41 @@
+<%
+  attributes = {}
+  attributes[:order_property] = params[:order_property]
+%>
+<%= mui_divider %>
+<%= mui_grid(:columns => 2) do %>
+  <%= mui_cell(:width => '100%') do %>
+    <%= mui_block(:title => 'Categories', :title_size => '1em') %>
+  <% end =%>
+  <% if merb_words_password? %>
+    <%= mui_cell(:align => 'right', :valign => 'bottom') do %>
+      <%= mui_button(:title => 'Create', :url => slice_url(:category_create), :window => 'open') %>
+    <% end =%>
+  <% end %>
+<% end =%>
+<% if category_id %>
+  <%= mui_link(:title => 'All', :title_size => '0.85em', :url => slice_url(:index, attributes)) %>
+<% else %>
+  <span style="font-size:0.85em;">All</span>
+<% end %>
+<% if categories %>
+  <% categories.each do |category| %>
+    <%= mui_grid(:columns => 2, :width => '100%') do %>
+      <%= mui_cell do %>
+        <% if category_id.to_i == category.id %>
+          <span style="font-size:0.85em;"><%= category.title %></span>
+        <% else %>
+          <% attributes[:category_id] = category.id %>
+          <%= mui_link(:title => category.title, :title_size => '0.85em', :url => slice_url(:index, attributes)) %>
+        <% end %>
+      <% end =%>
+      <% if merb_words_password? %>
+        <%= mui_cell(:align => 'right', :wrap => false) do %>
+          &nbsp;
+          <%= mui_button(:title => 'Update', :url => slice_url(:category_update, :category_id => category.id), :window => 'open') %>
+          <%= mui_button(:title => '&#215;', :tone => 'negative', :url => slice_url(:category_delete, :category_id => category.id), :window => 'open') %>
+        <% end =%>
+      <% end %>
+    <% end =%>
+  <% end %>
+<% end %>

data/app/views/pages/_form.html.erb

@@ -0,0 +1,29 @@
+<%= mui_grid(:columns => 2) do %>
+  <%= mui_cell do %>
+    <%= mui_block do %>
+      <%= mui_text(:title, :focus => true, :title => 'Title', :width => '23em') %>
+    <% end =%>
+  <% end =%>
+  <%= mui_cell do %>
+    <%= mui_block do %>
+      <%= mui_date(:created_at, :title => 'Date') %>
+    <% end =%>
+  <% end =%>
+<% end =%>
+<%= mui_grid(:columns => 2) do %>
+  <%= mui_cell do %>
+    <%= mui_block do %>
+      <%= mui_hyper_text(:body, :title => 'Body') %>
+    <% end =%>
+  <% end =%>
+  <% if Category.first %>
+    <%= mui_cell do %>
+      <%= mui_block do %>
+        <%= merb_words_categories(:categories => @page.categories) %>
+      <% end =%>
+    <% end =%>
+  <% end %>
+<% end =%>
+<%= mui_block do %>
+	<%= mui_check(:publish, :title => 'Publish') %>
+<% end =%>

data/app/views/pages/_order.html.erb

@@ -0,0 +1,17 @@
+<%= mui_divider %>
+<%= mui_block(:title => 'Sort by', :title_size => '1em') %>
+<% orders.each do |order| %>
+  <div>
+    <% if order_property == order.property %>
+      <span style="font-size:0.85em;"><%= order.title %></span>
+    <% else %>
+      <%
+        attributes = {}
+        attributes[:category_id] = params[:category_id]
+        attributes[:order_property] = order.property
+        attributes[:search] = params[:search]
+      %>
+      <%= mui_link(:title => order.title, :title_size => '0.85em', :url => slice_url(:index, attributes)) %>
+    <% end %>
+  </div>
+<% end %>