cuca 0.06 → 0.07

data/lib/cuca/generator_context.rb

@@ -0,0 +1,42 @@
+# A good context for generators. It will find and run widgets on method_missing.
+#
+class GeneratorContext
+    def get_bindings
+       binding
+    end
+
+    def initialize(assigns, base_object)
+      assigns.each_pair do |k,v|
+         instance_variable_set("@#{k}", v)
+      end
+      @base = base_object
+    end
+        
+    def method_missing(sym, *args, &block )
+      class_name = sym.id2name
+
+         
+      # 1st try to find method in the base widget
+      if @base.respond_to?(class_name.intern) then 
+            return @base.send(class_name, *args, &block)
+      end
+      c = nil
+      # 2nd try to find a widget
+      if Object.const_defined?(class_name+'Widget') then
+           c = Object::const_get(class_name+'Widget')
+      else
+           # ...try to find in action namespace
+           mod = $app.urlmap.action_module
+           c = mod.const_get(class_name+'Widget') if mod.const_defined?(class_name+'Widget')
+      end
+         
+      raise NameError.new "Undefined method: #{class_name}" unless c
+ 
+      widget = c.new({:args => args,
+                    :assigns => @assigns },
+                    &block)
+
+      return widget.to_s
+    end
+end  
+  

data/lib/cuca/layout.rb

@@ -1,6 +1,6 @@
 module Cuca
 
-# === Layout
+# = Layout
 # A Layout just behaves as a normal widget plus it will give you the @content_for_layout
 # instance variable with the content generated from the controller.
 # 

data/lib/cuca/session.rb-cgi

@@ -0,0 +1,171 @@
+
+require 'cgi/session'
+require 'cgi/session/pstore'
+
+require 'cuca/app'
+require 'cuca/widget'
+require 'cuca/sessionflash'
+require 'cuca/sessionpage'
+
+module Cuca
+
+
+# == Description
+# Session can be used to store stateful data. It is not loaded by default, to make
+# use of it you must require this module and tell a controller to use a session.
+#
+# == Example Use (permanent data)
+#
+# Initialize (using a controller):
+#
+#  class ApplicationController < Cuca::Controller
+#    use_session
+#  end
+#
+# Save and Load data (from any widgets e.g. controller):
+#
+#  class IndexController < ApplicationController
+#
+#    def run
+#       session[:stuff_to_remember] = "hello world"
+#       @stuff = session[:stuff_to_remember]
+#    end
+# end
+#
+# == Flash Memory
+#
+# The flash memory can be used to store temporarily data for the current and
+# next action. A typical example are messages after a post event, like:
+#
+#  class LoginController < ApplicationController
+#      (...)
+#     def post
+#         if (params['username'] == 'root' && params['pass'] == 'stuff') then 
+#            session.flash[:message] = "You are logged in"
+#            session[:username] = 'root'
+#            stop :redirect => 'index'
+#         end
+#     end
+#  end
+#
+# If you want to keep the flash memory for another cycle you can call:
+#
+#  session.flash.keep
+#
+#
+# == Page Memory
+#
+# Page memory is a container to store data only valid for the current action.
+# It will be erased once you leave to a different action.
+# Current request and query parameters (get/post) are automatically available in this
+# container.
+#
+#
+# 
+# == Configuration
+#
+# Session is using some values from App::Config :
+#
+# 'session_prefix'
+# 'session_valid'
+# 'session_key'
+#
+class Session
+ attr_reader :flash
+ attr_reader :page
+ attr_reader :cgi
+
+ private
+ def make_session
+   @sess = CGI::Session.new(@cgi, @session_parameters)
+ end
+
+ public
+ def reset
+   begin
+     @sess.delete
+   rescue
+   end
+   make_session
+ end
+
+
+ # returns true/false if a session exists
+ def exists?
+   begin
+      p = @session_parameters.clone
+      p['new_session'] = false
+      session = CGI::Session.new(cgi, p)
+   rescue ArgumentError
+      return false
+   end
+   return true
+ end
+
+ def initialize(cgi)
+   @cgi = cgi
+
+   @session_parameters = {
+          'database_manager' => CGI::Session::PStore,
+          'session_key' => App::config["session_key"],
+          'session_path' => '/',
+#          'new_session' => false,
+          'session_expires' => Time.now + App::config["session_valid"].to_i,
+          'prefix' => App::config["session_prefix"] }
+
+   make_session
+
+
+   @flash = SessionFlash.new(self)
+   @page  = SessionPage.new(self)
+ end
+
+ def []=(key, value) 
+   @sess[key] = value
+ end
+ 
+ def [](key)
+   return @sess[key]
+ end
+
+ def close
+   @sess.close
+ end
+
+ def update
+   @sess.update
+ end
+ 
+ def delete
+   @sess.delete
+ end
+
+ 
+end
+
+class Controller
+  # This will create filters that initialize the session before the action and
+  # close it afterwards.
+  def self.use_session
+     priority_before_filter('ses_initialize_session')
+     priority_after_filter('ses_close_session')
+  end
+
+  def ses_initialize_session
+    $session = Session.new($app.cgi)
+  end
+  def ses_close_session
+    $session.close
+#    $session = nil
+  end
+end
+
+
+class Widget
+  def session
+     $session
+  end
+end
+
+end
+

data/lib/cuca/sessionpage.rb

@@ -4,6 +4,7 @@ module Cuca
 # for the current action. Once you leave to another page it will
 # be erased. (see Cuca::Session)
 class SessionPage
+
  private 
  def pagekey
    "Pk_#{$app.urlmap.script.gsub(/[\/\\]/, '_')}".intern
@@ -23,18 +24,28 @@ class SessionPage
  end
 
  def [](key)
-    pagemem[pagekey][key] ? pagemem[pagekey][key] : nil
+    pagemem[pagekey][key]
  end
 
  def []=(key,value)
     pagemem[pagekey][key] = value
  end
- 
+
  # remove a variable from page memory
  def delete(key)
     pagemem[pagekey].delete(key)
  end
 
+ # delete all from current page memory 
+ def reset
+   pagemem[pagekey] = {}
+ end
+
+ # access to pagemem
+ def memory
+   pagemem[pagekey]
+ end
+
  private
  def expire
     pagemem.each_pair do |k,v| 

data/lib/cuca/stdlib/arform.rb

@@ -28,6 +28,8 @@ class ARFormWidget < FormWidget
  #     switch off fields on new records
  # * :diabled_on_update =>  ['field_name_1', 'field_name_2', ..]
  #     switch off fields on existing records
+ # * :save_attribs => ['attr1', 'attr2']
+ #     allow to call a setter even if it's not a db column
  # * .. options from FormWidgets ...
  def output(form_name, model, options = {})
    @model = model
@@ -35,8 +37,16 @@ class ARFormWidget < FormWidget
    @disabled_on_create = options[:disabled_on_create] || []
    @hidden_on_update     = options[:hidden_on_update] || []
    @hidden_on_create     = options[:hidden_on_create] || []
+   @save_attribs         = options[:save_attribs]     || []
+
+
+   setup if self.respond_to?(:setup)		# you might want to use a method for setup
+
 
    options[:default_values] = model.attributes.merge(options[:default_values] || {})
+   @save_attribs.each do |sa|
+      options[:default_values][sa] = model.send(sa.intern) if model.respond_to?(sa.intern)
+   end
 
    super(form_name, options)
  end
@@ -73,8 +83,15 @@ class ARFormWidget < FormWidget
    @password_fields.each do |pwf|
       p.delete(pwf) if p[pwf].chomp.empty?
    end
-   
-   @model.attributes = p
+
+   # remove possible additional data that model doesn't support to
+#   p.delete_if { |k,v| !@mode.respond_to?("#{k}=") }
+
+   column_names = @model.class.columns.map { |c| c.name }
+   p.each do |k,v|
+     @model.send("#{k}=".intern, v) if (column_names.include?(k) && @model.respond_to?("#{k}=")) || @save_attribs.include?(k)
+   end
+   # @model.attributes = p
    
    return true if @model.valid?
 

data/lib/cuca/stdlib/form.rb

@@ -71,7 +71,6 @@
 #  end
 # end
 #
-
 class FormWidget < Cuca::Widget
 
  # Returns true if this form was posted
@@ -89,7 +88,7 @@ class FormWidget < Cuca::Widget
  # it will get the variables from the options[:default_values]
  def get_form_variables
    var = @options[:default_values] || {}
-   params.each_pair { |k,v| var[k] = v } if posted?
+   params.each_pair { |k,v| var[k] = v } if posted? # request_method == 'POST'
    @variables = {}
    var.each_pair { |k,v| @variables[k.to_s] = v }		# this allows is to pass symbols to default_values
    @variables
@@ -167,5 +166,9 @@ class FormWidget < Cuca::Widget
      form
    end
  end
+ 
+ def self.run(*args)
+   w = self.class.new
+   w.output(args)
+ end
 end
-

data/lib/cuca/stdlib/formelements.rb

@@ -33,7 +33,6 @@ module FormElements
     fe_text(name, attribs)
  end
 
-
  def fe_textarea(name, attribs = {})
    a = { :rows => 5, :cols => 50 }.merge(attribs)
    "<textarea name='#{name}' #{a2p(a)}>#{get_value(name, attribs)}</textarea>\n"
@@ -41,7 +40,8 @@ module FormElements
  
  # build a form start tag
  def fe_formstart(attribs = {})
-   a = {:name=>@form_name, :method=>'post', :action=>@post_to }.merge(attribs)
+   form_name = attribs[:form_name] || @form_name
+   a = {:name=>form_name, :method=>'post', :action=>@post_to }.merge(attribs)
    "<form #{a2p(a)}>\n"
  end
 
@@ -51,21 +51,46 @@ module FormElements
     attribs.delete(:showvalue)
     "<input type='password' name='#{name}' value='#{v}' #{a2p(attribs)}>\n"
  end
- 
+
+ # :default_value is 'on' or 'off' for checkboxes
+ def fe_checkbox(name, attribs = {})
+    checker_name = "#{name}_checker"
+    newval  = !!(request_parameters[name] || query_parameters[name])
+    posted  = (request_parameters[checker_name] || query_parameters[checker_name])
+    
+    # checkbox html element isn't sent to cgi if not selected
+    # so cuca's page variables won't work - this fixes it for most cases.
+    if (session.page && (posted && !newval)) then
+      session.page[name] = 'off' 
+    end
+    
+    checked = v[name] && (v[name].to_s != 'off')
+    checked = attribs[:default_value] == 'on' if (!posted and !v[name]) 
+    
+    checkedval = checked ? ' CHECKED' : ''
+     "<input type='checkbox' name='#{name}' #{a2p(attribs)}#{checkedval}>"+
+     "<input type='hidden' name='#{checker_name}' value='1'>\n"		# Needed to detect if element was submitted
+ end
+         
+
  
  # this is to build a select box, example:
  # fe_select('gender', [['f', 'female'],['m','Male']]) or
+ # ...with options parameters...:
+ # fe_select('gender', [['f', 'female', { :id => 'f'} ],['m','Male', {:id=>'m'}]])
+ # ...simple...:
  # fe_select('gender', ['f','m'])
  def fe_select(name, options, attribs = {})
    r = "<select name='#{name}' #{a2p(attribs)}>\n"
    options.each do |o|
      ov = o.instance_of?(Array) ? o[0] : o
+     params = o[2].inject('') { |m,(k,v)| m << " #{k}='#{v}'" } rescue ''
      sel = ''
-     sel = ' selected' if v[name] == ov
+     sel = ' selected' if get_value(name, attribs).to_s == ov.to_s     
      if o.instance_of?(Array) then
-       r+="<option value='#{o[0]}'#{sel}>#{o[1]}</option>\n"
+       r+="<option value='#{o[0]}'#{sel}#{params}>#{o[1]}</option>\n"
      else
-      r+="<option value='#{o}'#{sel}>#{o}</option>\n"
+      r+="<option value='#{o}'#{sel}#{params}>#{o}</option>\n"
      end
    end
    r+="</select>\n" 
@@ -86,8 +111,8 @@ end
 
     
     r << "\n<select name='#{name}' #{a2p(attribs)}>\n"
-    r << "<option #{"selected" if v[name] == trueval} value='#{trueval}'>#{truename}</option>\n"
-    r << "<option #{"selected" if v[name] == falseval} value='#{falseval}'>#{falsename}</option>\n"
+    r << "<option #{"selected" if get_value(name, attribs) == trueval} value='#{trueval}'>#{truename}</option>\n"
+    r << "<option #{"selected" if get_value(name, attribs) == falseval} value='#{falseval}'>#{falsename}</option>\n"
     r << "</select>\n"
  end
 

data/lib/cuca/stdlib/formelements.rbs

@@ -0,0 +1,157 @@
+# mixin this module to build form elements
+
+module Cuca
+module FormElements
+
+ private 
+ def a2p(attribs)
+   a = attribs.dup
+   a.delete(:default_value) # reserved attribute
+   a.inject([]) { |m,e| m << ((e[1].to_s != '') ? "#{e[0].to_s}='#{e[1].to_s}'" : e[0].to_s) }.join(' ')
+ end
+ 
+ private
+ def twodig(n)
+   n.to_s.length == 1 ? "0"+n.to_s : n.to_s
+ end
+ 
+ # this allows to pass a :default_value to the set of attribs 
+ private 
+ def get_value(name, attribs)
+    v[name] || (attribs[:default_value] || '')
+ end
+ 
+ def fe_text(name, attribs = {})
+    "<input type='text' name='#{name}' value='#{get_value(name, attribs)}' #{a2p(attribs)}>\n"
+ end
+
+ def fe_hidden(name, attribs = {})
+   "<input type='hidden' name='#{name}' value='#{get_value(name, attribs)}' #{a2p(attribs)}>\n"
+ end
+
+ def fe_int(name, attribs = {})
+    fe_text(name, attribs)
+ end
+
+ def fe_textarea(name, attribs = {})
+   a = { :rows => 5, :cols => 50 }.merge(attribs)
+   "<textarea name='#{name}' #{a2p(a)}>#{get_value(name, attribs)}</textarea>\n"
+ end
+ 
+ # build a form start tag
+ def fe_formstart(attribs = {})
+   form_name = attribs[:form_name] || @form_name
+   a = {:name=>form_name, :method=>'post', :action=>@post_to }.merge(attribs)
+   "<form #{a2p(a)}>\n"
+ end
+
+ # fe password doesn't show passwords content but default (unless :showvalue defined in attribs)
+ def fe_password(name, attribs = {})
+    v = attribs[:showvalue] ? get_value(name, attribs) : ''
+    attribs.delete(:showvalue)
+    "<input type='password' name='#{name}' value='#{v}' #{a2p(attribs)}>\n"
+ end
+
+ def fe_checkbox(name, attribs = {})
+    checker_name = "#{name}_checker"
+    newval  = !!(request_parameters[name] || query_parameters[name])
+    posted  = (request_parameters[checker_name] || query_parameters[checker_name])
+    
+    # checkbox html element isn't sent to cgi if not selected
+    # so cuca's page variables won't work - this fixes it.
+    app.logger.info "TEST #{name} #{posted.inspect} #{newval.inspect}"
+    
+    if (session.page && (posted && !newval)) then
+      app.logger.info "Setting OFF #{name} #{posted.inspect} #{newval.inspect}"
+      session.page[name] = 'off' 
+    end
+    
+    app.logger.info "Checkbox #{name} - #{get_value(name, attribs)}"
+    checked = v[name] != 'off' 
+    
+    checkedval = checked ? ' CHECKED' : ''
+     "<input type='checkbox' name='#{name}' #{a2p(attribs)}#{checkedval}>\n"
+ end
+         
+
+ 
+ # this is to build a select box, example:
+ # fe_select('gender', [['f', 'female'],['m','Male']]) or
+ # fe_select('gender', ['f','m'])
+ def fe_select(name, options, attribs = {})
+   r = "<select name='#{name}' #{a2p(attribs)}>\n"
+   options.each do |o|
+     ov = o.instance_of?(Array) ? o[0] : o
+     sel = ''
+     sel = ' selected' if get_value(name, attribs).to_s == ov.to_s
+     if o.instance_of?(Array) then
+       r+="<option value='#{o[0]}'#{sel}>#{o[1]}</option>\n"
+     else
+      r+="<option value='#{o}'#{sel}>#{o}</option>\n"
+     end
+   end
+   r+="</select>\n" 
+end
+
+  def fe_bool(name,attribs = {})
+    r = ''
+    attribs = attribs.dup
+    truename = attribs[:true] || 'true'   
+    falsename = attribs[:false] || 'false'
+    trueval = attribs.has_key?(:trueval) ? attribs[:trueval] : 't'
+    falseval = attribs.has_key?(:falseval) ? attribs[:falseval] : 'f'
+    $stderr.puts "#{name}: #{v[name].inspect} #{trueval.inspect} #{falseval.inspect}"
+    attribs.delete(:true)
+    attribs.delete(:false)
+    attribs.delete(:trueval)
+    attribs.delete(:falseval)
+
+    
+    r << "\n<select name='#{name}' #{a2p(attribs)}>\n"
+    r << "<option #{"selected" if get_value(name, attribs) == trueval} value='#{trueval}'>#{truename}</option>\n"
+    r << "<option #{"selected" if get_value(name, attribs) == falseval} value='#{falseval}'>#{falsename}</option>\n"
+    r << "</select>\n"
+ end
+
+ 
+ def fe_submit(attribs = {})
+   a = { :value => 'Submit', :name=>@submit_name }.merge(attribs)
+   "<input type='submit' #{a2p(a)}>\n"
+ end
+ 
+ 
+ def fe_formend
+   "</form>\n"
+ end
+ 
+ 
+ def fe_datetime(name, attribs = {})
+   require 'date'
+   begin
+     val = v[name].instance_of?(Time) ? v[name] : DateTime.parse(v[name] || 'now')
+   rescue ArgumentError
+     val = DateTime.now
+   end
+   value = "#{val.year}/#{twodig(val.month)}/#{twodig(val.day)} #{val.hour}:#{val.min}"
+   "<input type='text' name='#{name}' value='#{value}' #{a2p(attribs)}>\n"
+ end
+ 
+ def fe_date(name, attribs = {})
+   require 'date'
+   if v[name].instance_of?(Date) then
+      value = "#{v[name].year}/#{twodig(v[name].month)}/#{twodig(v[name].day)}"
+   end
+   if v[name].nil? || (v[name].instance_of?(String) && v[name].empty?) then
+      value = ''
+   end
+   if value.nil? then
+      val = Date.today
+      value = "#{val.year}/#{twodig(val.month)}/#{twodig(val.day)}"
+   end
+   
+   "<input type='text' name='#{name}' value='#{value}' #{a2p(attribs)}> (yyyy/mm/dd)\n"
+ end
+ 
+
+end
+end