Pistos-ramaze 2008.09

data/examples/app/todolist/spec/todolist.rb

@@ -0,0 +1,132 @@
+require 'ramaze'
+require 'ramaze/spec/helper'
+
+spec_require 'hpricot'
+
+$LOAD_PATH.unshift base = __DIR__/'..'
+require 'start'
+
+describe 'todolist' do
+  behaves_like 'http'
+
+  def h_get(*args)
+    Hpricot(get(*args).body)
+  end
+
+  def task_titles
+    doc = h_get('/')
+    doc.search("td[@class='title']").
+      map{|t| t.inner_html.strip}.sort
+  end
+
+  def tasks
+    (h_get('/')/:tr)
+  end
+
+  def task(name)
+    tasks.find do |task|
+      (task/:td).find do |td|
+        td['class'] == 'title' and
+        td.inner_html.strip == name
+      end
+    end
+  end
+
+  def spectask
+    task('spectask')
+  end
+
+  def spectask_status
+    spectask.search("td[@class='status']").inner_html.strip
+  end
+
+  def error_on_page(url, response)
+    doc = h_get(url, :cookie => response.headers['Set-Cookie'])
+
+    error = doc.search("div[@class='error']")
+    error.inner_html.strip
+  end
+
+  it 'should start' do
+    ramaze :public_root => base/:public,
+           :view_root   => base/:template
+    get('/').status.should == 200
+  end
+
+  it 'should have no empty mainpage' do
+    get('/').body.should.not == nil
+  end
+
+  it 'should have two preset tasks' do
+    task_titles.should == %w[Laundry Wash\ dishes]
+  end
+
+  it 'should have a link to new tasks' do
+    doc = h_get('/')
+    link = (doc/:a).find{|a| a.inner_html == 'New Task'}
+    link['href'].should == '/new'
+  end
+
+  it 'should have a page to create new tasks' do
+    get('/new').body.should.not == nil
+  end
+
+  it 'should have a form to create a tasks on the /new page' do
+    doc = h_get('/new')
+    form = doc.at :form
+    form.should.not == nil
+    input = form.at(:input)
+    input['type'].should == 'text'
+    input['name'].should == 'title'
+  end
+
+  it 'should POST new task and redirect to /' do
+    result = post('/create', 'title' => 'spectask')
+    result.status.should == 302
+  end
+
+  it 'should show have the new task' do
+    task_titles.should.include('spectask')
+  end
+
+  it 'should toggle the spectask' do
+    get('/close/spectask').status.should == 302
+    spectask.should.not == nil
+    spectask_status.should == 'done'
+    get('/open/spectask').status.should == 302
+    spectask.should.not == nil
+    spectask_status.should == 'not done'
+  end
+
+  it 'should raise on modifying a not existing task' do
+    %w[open close].each do |action|
+      response = get("/#{action}/nothere", :referrer => "/")
+      response.status.should == 302
+      response.original_headers['Location'].should == '/'
+      error_on_page('/', response).should == "No such Task: `nothere'"
+    end
+  end
+
+  it 'should delete the new task' do
+    get('/delete/spectask').status.should == 302
+    task_titles.should.not.include('spectask')
+  end
+
+  it 'should not create empty tasks but show a subtle error message' do
+    response = post('/create', 'title' => '', :referrer => "/new")
+
+    response.status.should == 302
+    response.original_headers['Location'].should == '/new'
+
+    error_on_page('/new', response).should == 'Please enter a title'
+  end
+
+  it 'should escape harmful titles' do
+    response = post('/create', 'title' => '#{puts "gotcha"}')
+
+    task('#{puts "gotcha"}').should.be.nil
+    task('#{puts "gotcha"}').should.not.be.nil
+  end
+
+  FileUtils.rm('todolist.db') rescue nil
+end

data/examples/app/todolist/src/controller/main.rb

@@ -0,0 +1,70 @@
+#          Copyright (c) 2006 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+# Default url mappings are:
+#  a controller called Main is mapped on the root of the site: /
+#  a controller called Something is mapped on: /something
+# If you want to override this, add a line like this inside the class
+#  map '/otherurl'
+# this will force the controller to be mounted on: /otherurl
+
+class MainController < Ramaze::Controller
+
+  def index
+    @tasks = []
+    TodoList.original.each do |title, value|
+      if value[:done]
+        status = 'done'
+        toggle = A('Open Task', :href => Rs(:open, title))
+      else
+        status = 'not done'
+        toggle = A('Close Task', :href => Rs(:close, title))
+      end
+      delete = A('Delete', :href => Rs(:delete, title))
+      @tasks << [title, status, toggle, delete]
+    end
+    @tasks.sort!
+  end
+
+  def create
+    if title = request['title']
+      title.strip!
+      if title.empty?
+        failed("Please enter a title")
+        redirect '/new'
+      end
+      TodoList[title] = {:done => false}
+    end
+  end
+
+  def open title
+    task_status title, false
+  end
+
+  def close title
+    task_status title, true
+  end
+
+  def delete title
+    TodoList.delete title
+  end
+
+  helper :aspect
+  after(:create, :open, :close, :delete){ redirect(Rs()) unless redirected? }
+
+  private
+
+  def failed(message)
+    flash[:error] = message
+  end
+
+  def task_status title, status
+    unless task = TodoList[title]
+      failed "No such Task: `#{title}'"
+      redirect_referer
+    end
+
+    task[:done] = status
+    TodoList[title] = task
+  end
+end

data/examples/app/todolist/src/element/page.rb

@@ -0,0 +1,31 @@
+#          Copyright (c) 2006 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+class Page < Ezamar::Element
+  def render
+    %{
+    <html>
+      <head>
+        <title>TodoList</title>
+        <style>
+          table     { width:       100%;              }
+          tr        { background:  #efe; width: 100%; }
+          tr:hover  { background:  #dfd;              }
+          td.title  { font-weight: bold; width: 60%;  }
+          td.status { margin:      1em;               }
+          a         { color:       #3a3;              }
+        </style>
+      </head>
+      <body>
+        <h1>#{@title}</h1>
+        <?r if flash[:error] ?>
+          <div class="error">
+            \#{flash[:error]}
+          </div>
+        <?r end ?>
+        #{content}
+      </body>
+    </html>
+    }
+  end
+end

data/examples/app/todolist/src/model.rb

@@ -0,0 +1,14 @@
+#          Copyright (c) 2006 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+require 'ramaze/store/default'
+
+TodoList = Ramaze::Store::Default.new('todolist.db')
+
+{
+  'Laundry'     => {:done => false},
+  'Wash dishes' => {:done => false},
+
+}.each do |title, value|
+  TodoList[title] = value
+end

data/examples/app/todolist/start.rb

@@ -0,0 +1,11 @@
+#          Copyright (c) 2006 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+require 'rubygems'
+require 'ramaze'
+
+require 'src/controller/main'
+require 'src/element/page'
+require 'src/model'
+
+Ramaze.start

data/examples/app/todolist/template/index.xhtml

@@ -0,0 +1,17 @@
+<Page title="TodoList">
+  <a href="/new">New Task</a>
+  <?r if @tasks.empty? ?>
+    No Tasks
+  <?r else ?>
+    <table>
+      <?r @tasks.each do |title, status, toggle, delete| ?>
+        <tr>
+          <td class="title">  #{h title}  </td>
+          <td class="status"> #{status} </td>
+          <td class="toggle"> #{toggle} </td>
+          <td class="delete"> #{delete} </td>
+        </tr>
+      <?r end ?>
+    </table>
+  <?r end ?>
+</Page>

data/examples/app/todolist/template/new.xhtml

@@ -0,0 +1,7 @@
+<Page title="New Task">
+  <a href="/">Back to TodoList</a>
+  <form method="POST" action="create">
+    Task: <input type="text" name="title" /><br />
+    <input type="submit" />
+  </form>
+</Page>

data/examples/app/upload/start.rb

@@ -0,0 +1,19 @@
+require 'rubygems'
+require 'ramaze'
+
+class MainController < Ramaze::Controller
+  def index
+    return unless request.post?
+    @inspection = h(request.params.pretty_inspect)
+    tempfile, filename, @type =
+      request[:file].values_at(:tempfile, :filename, :type)
+    @extname, @basename = File.extname(filename), File.basename(filename)
+    @file_size = tempfile.size
+
+    FileUtils.move(tempfile.path, Ramaze::Global.public_root/@basename)
+
+    @is_image = @type.split('/').first == 'image'
+  end
+end
+
+Ramaze.start

data/examples/app/upload/view/index.xhtml

@@ -0,0 +1,25 @@
+<html>
+
+  <body>
+    <form method="POST" enctype="multipart/form-data">
+      Upload file: <input type="file" name="file" /><br />
+      <input type="submit" name="submit" value="Submit" />
+    </form>
+
+    <?r if @inspection ?>
+      <h3>#{@basename}</h3>
+      File size: #{@file_size} bytes
+
+      <?r if @is_image ?>
+        <h4>Uploaded Image</h4>
+        <img src="#{@basename}" alt="Uploaded Image"/><br/>
+      <?r else ?>
+        <p>You uploaded a #{@type} file.  Upload an image file to see it here.</p>
+      <?r end ?>
+
+      <h4>request.params.inspect:</h4>
+      <pre>#{@inspection}</pre>
+    <?r end ?>
+  </body>
+
+</html>

data/examples/app/whywiki/spec/whywiki.rb

@@ -0,0 +1,58 @@
+require 'ramaze'
+require 'ramaze/spec/helper'
+
+spec_require 'bluecloth', 'hpricot'
+
+$LOAD_PATH.unshift base = __DIR__/'..'
+
+Db = Ramaze::YAMLStoreCache.new("#{base}/testwiki.yaml")
+require 'start'
+
+describe 'WikiController' do
+  behaves_like 'http'
+
+  def page(name)
+    page = get(name)
+    page.status.should == 200
+    page.body.should.not == nil
+
+    doc = Hpricot(page.body)
+    title = doc.at('title').inner_html
+
+    body = doc.at('body')
+    return title, body
+  end
+
+  it 'should start' do
+    ramaze :public_root => base/:public,
+           :view_root   => base/:template
+    get('/').status.should == 302
+  end
+
+  it 'should have main page' do
+    t,body = page('/show/Home')
+    t.should.match(/^MicroWiki Home$/)
+    body.at('h1').inner_html.should == 'Home'
+    body.at('a[@href=/edit/Home]').inner_html.should == 'Create Home'
+  end
+
+  it 'should have edit page' do
+    t,body = page('/edit/Home')
+    t.should.match(/^MicroWiki Edit Home$/)
+
+    body.at('a[@href=/]').inner_html.should == '< Home'
+    body.at('h1').inner_html.should == 'Edit Home'
+    body.at('form/textarea').should.not == nil
+  end
+
+  it 'should create pages' do
+    post('/save','text'=>'the text','page'=>'ThePage').status.should == 302
+    page = Hpricot(get('/show/ThePage').body)
+    body = page.at('body>div')
+    body.should.not == nil
+    body.at('a[@href=/edit/ThePage]').inner_html.should =='Edit ThePage'
+    body.at('p').inner_html.should == 'the text'
+  end
+
+  FileUtils.rm("#{base}/testwiki.yaml")
+end

data/examples/app/whywiki/start.rb

@@ -0,0 +1,46 @@
+# written as an example of how to implement the minimal _why wiki
+
+require 'rubygems'
+require 'ramaze'
+require 'bluecloth'
+
+Db = Ramaze::YAMLStoreCache.new('wiki.yaml') unless defined?(Db)
+
+class WikiController < Ramaze::Controller
+  map :/
+
+  def index
+    redirect R(:show, 'Home')
+  end
+
+  def show page = 'Home'
+    @page = url_decode(page)
+    @text = Db[page].to_s
+    @edit_link = "/edit/#{page}"
+
+    @text.gsub!(/\[\[(.*?)\]\]/) do |m|
+      exists = Db[$1] ? 'exists' : 'nonexists'
+      A($1, :href => Rs(:show, url_encode($1)), :class => exists)
+    end
+
+    @text = BlueCloth.new(@text).to_html
+  end
+
+  def edit page = 'Home'
+    @page = url_decode(page)
+    @text = Db[page]
+  end
+
+  def save
+    redirect_referer unless request.post?
+
+    page = request['page'].to_s
+    text = request['text'].to_s
+
+    Db[page] = text
+
+    redirect Rs(:show, url_encode(page))
+  end
+end
+
+Ramaze.start :adapter => :mongrel

data/examples/app/whywiki/template/edit.xhtml

@@ -0,0 +1,14 @@
+<html>
+  <head>
+    <title>MicroWiki Edit #{@page}</title>
+  </head>
+  <body>
+    <h1>Edit #{@page}</h1>
+    #{ A("&lt; Home", :href => Rs()) }
+    <form method="POST" action="#{Rs(:save)}">
+      <input type="hidden" name="page" value="#{url_encode(@page)}" />
+      <textarea name="text" style="width: 90%; height: 20em;">#{@text}</textarea>
+      <input type="submit" />
+    </form>
+  </body>
+</html>

data/examples/app/whywiki/template/show.xhtml

@@ -0,0 +1,18 @@
+<html>
+  <head>
+    <title>MicroWiki #{@page}</title>
+    <style>
+      a.exists{ color: #00f; }
+      a.nonexists{ color: #f00; }
+    </style>
+  </head>
+  <body>
+    <a href="/show/Home" unless="@page == 'Home'">&lt; Home</a>
+    <h1>#{@page}</h1>
+    <a href="#@edit_link" if="@text.empty?">Create #@page</a>
+    <div unless="@text.empty?">
+      <a href="#@edit_link">Edit #@page</a>
+      #@text
+    </div>
+  </body>
+</html>

data/examples/app/wikore/spec/wikore.rb

@@ -0,0 +1,111 @@
+require 'ramaze'
+require 'ramaze/spec/helper'
+
+spec_require 'hpricot', 'sequel'
+
+$LOAD_PATH.unshift base = __DIR__/'..'
+require 'start'
+
+describe 'Wikore' do
+  behaves_like 'http'
+  ramaze :public_root => base/:public,
+         :view_root   => base/:template
+
+  def check_redirect(to = '/')
+    response = yield
+    response.status.should == 302
+    response.body.should =~ /<a href="#{to}">/
+  end
+
+  def page_should_exist(name, *matches)
+    page = get("/#{name}")
+    page.status.should == 200
+    matches.each do |match|
+      page.body.should =~ match
+    end
+  end
+
+  it 'should have no Main page' do
+    page = get('/Main')
+    page.status.should == 200
+    page.body.should =~ /No Page known as 'Main'/
+  end
+
+  it 'should create a Main page' do
+    check_redirect '/Main' do
+      post('/page/create', 'title' => 'Main', 'text' => 'Newly created Main page')
+    end
+
+    matches = [
+      /Newly created Main page/,
+      /Version: 1/
+    ]
+    page_should_exist('Main', *matches)
+  end
+
+  it 'should update Main page' do
+    check_redirect '/Main' do
+      post('/page/save', 'title' => 'Main', 'text' => 'Newly updated Main page')
+    end
+
+    matches = [
+      /Newly updated Main page/,
+      /Version: 2/
+    ]
+    page_should_exist('Main', *matches)
+  end
+
+  it 'should maintain a backup' do
+    matches = [
+      /Newly created Main page/,
+      /Version: 1/
+    ]
+    page_should_exist('Main/1', *matches)
+  end
+
+  it 'should revert' do
+    get('/page/revert/Main')
+
+    matches = [
+      /Newly created Main page/,
+      /Version: 1/
+    ]
+    page_should_exist('Main', *matches)
+  end
+
+
+  it 'should incrememt version of Main page' do
+    (2..4).each do |n|
+      post('/page/save', 'title' => 'Main', 'text' => 'updated Main page')
+
+      matches = [ /updated Main page/, /Version: #{n}/ ]
+      page_should_exist('Main', *matches)
+    end
+  end
+
+  it 'should rename Main page to Other and back' do
+    check_redirect '/Other' do
+      get('/page/rename/Main/Other')
+    end
+    check_redirect '/Main' do
+      get('/page/rename/Other/Main')
+    end
+  end
+
+  it 'should delete Main page' do
+    get('/page/delete/Main')
+
+    page_should_exist('Main', /No Page known as 'Main'/)
+  end
+
+  it 'should fail if create/save is not POSTed to' do
+    check_redirect '/' do
+      get('/page/save', 'title' => 'Main', 'text' => 'Newly updated Main page')
+    end
+    check_redirect '/' do
+      get('/page/create', 'title' => 'Main', 'text' => 'Newly updated Main page')
+    end
+  end
+
+  FileUtils.rm_f(DB_FILE)
+end

data/examples/app/wikore/src/controller.rb

@@ -0,0 +1,80 @@
+class Ramaze::Controller
+  Page = Model::Page
+  OldPage = Model::OldPage
+end
+
+class MainController < Ramaze::Controller
+  def index(title = 'Main', version = nil)
+    query = {:title => title}
+    query[:version] = version.to_i if version
+    model = version ? OldPage : Page
+
+    if page = model[query]
+      @text, @version = page.text, page.version
+    else
+      @text = "No Page known as '#{title}'"
+      @version = false
+    end
+  end
+end
+
+class PageController < Ramaze::Controller
+  map '/page'
+
+  helper :aspect
+
+  def create
+    change "Created Page '%s'" do |title, text|
+      Page.create(:title => title, :text => text, :version => 1)
+      redirect R(MainController, title)
+    end
+  end
+
+  def save
+    change "Updated Page '%s'" do |title, text|
+      page = Page[:title => title]
+      page.backup
+      page.text = text
+      page.version += 1
+      page.save
+      redirect R(MainController, title)
+    end
+  end
+
+  def delete(title)
+    page = Page[:title => title]
+    page.backup
+    page.delete
+  end
+
+  def rename(title, to)
+    change("Renamed #{title} to '%s'", to) do |title, text|
+      page = Page[:title => title]
+      page.backup
+      page.title = to
+      page.version += 1
+      page.save
+    end
+  end
+
+  def revert(title)
+    page = Page[:title => title]
+    page.revert
+    redirect R(MainController, title)
+  end
+
+  before :create, :save do
+    redirect_referer unless request.post?
+  end
+
+  private
+
+  def change(message, redirect_to = '/')
+    if title = request['title'] and text = request['text']
+      yield(title, text)
+      message % title
+    end
+
+    redirect(R(MainController, redirect_to))
+  end
+end