spiderfw 0.5

data/apps/core/forms/widgets/inputs/checkbox/checkbox.shtml

@@ -0,0 +1,3 @@
+<sp:template>
+    <input type="checkbox" name="{ @name }" value="1" size="{ @size }" sp:attr-if="@value,checked">
+</sp:template>

data/apps/core/forms/widgets/inputs/date_time/date_time.rb

@@ -0,0 +1,48 @@
+module Spider; module Forms
+    
+    class DateTime < Input
+        tag 'datetime'
+        is_attr_accessor :size, :type => Fixnum, :default => nil
+        is_attr_accessor :mode, :type => Symbol, :default => :date
+        i_attr_accessor :format, :type => String
+        i_attr_accessor :lformat, :type => Symbol, :default => :short
+        
+        def prepare_value(val)
+            return val if val.respond_to?(:strftime)
+            return nil unless val.is_a?(String) && !val.empty?
+            klass = @mode == :date ? ::Date : ::DateTime
+            begin
+                return klass.lparse(val, :short)
+            rescue => exc
+                add_error(_("%s is not a valid date") % val)
+            end
+        end
+        
+        def prepare
+            unless @size
+                @size = case @mode
+                when :date then 10
+                when :date_time then 15
+                when :time then 8
+                end
+            end
+            super
+        end
+        
+        def format_value
+            return '' unless @value
+            if (@lformat && @value.respond_to?(:lformat))
+                return @value.lformat(@lformat)
+            elsif @format && @value.respond_to?(:strftime)
+                return @value.strftime(@format)
+            else
+                return @value
+            end
+            return @value unless @value.respond_to?(:strftime)
+            return @value.strftime("%d/%m/%Y %H:%M") if @value
+            return ''
+        end
+
+    end
+    
+end; end

data/apps/core/forms/widgets/inputs/date_time/date_time.shtml

@@ -0,0 +1,4 @@
+<sp:template>
+    <tpl:asset type="js" src="date_time.js" />
+    <input type="text" name="{ @name }" value="{ @formatted_value }" size="{ @size }" class="{ @mode }">
+</sp:template>

data/apps/core/forms/widgets/inputs/hidden/hidden.rb

@@ -0,0 +1,8 @@
+module Spider; module Forms
+    
+    class Hidden < Input
+        tag 'hidden'
+
+    end
+    
+end; end

data/apps/core/forms/widgets/inputs/hidden/hidden.shtml

@@ -0,0 +1,3 @@
+<sp:template>
+    <input type="hidden" name="{ @name }" value="{ @value }">
+</sp:template>

data/apps/core/forms/widgets/inputs/input/input.rb

@@ -0,0 +1,105 @@
+module Spider; module Forms
+    
+    class Input < Spider::Widget
+        attr_accessor :element, :form, :errors
+        i_attr_accessor :name
+        is_attribute :value
+        is_attr_accessor :label
+        
+        def self.template_path_parent
+            File.dirname(File.dirname(__FILE__))
+        end
+        
+        def init
+            @done = true
+            @errors = []
+            @modified = true
+            @connections = {}
+        end
+        
+        def prepare_scene(scene)
+            scene = super
+            scene.name = @name || '_w'+param_name(self)
+            scene.formatted_value = format_value
+            return scene
+        end
+        
+        def prepare_value(val)
+            val == {} ? nil : val
+        end
+        
+        def prepare
+            prepared = prepare_value(params)
+            self.value = prepared if prepared
+            super
+        end
+        
+        def value
+            @value
+        end
+        
+        def value=(val)
+            @value = val
+        end
+        
+        def format_value
+            @value
+        end
+        
+        def done?
+            @done
+        end
+        
+        def error?
+            @error
+        end
+        
+        def add_error(str)
+            @errors << str
+            @error = true
+        end
+        
+        def modified?
+            @modified
+        end
+        
+        def read_only
+            @read_only = true
+            if template_exists?(@use_template+'_readonly')
+                @use_template += '_readonly'
+            elsif template_exists?('readonly')
+                @use_template = 'readonly'
+            else
+                @use_template = 'SPIDER/apps/core/forms/widgets/inputs/input/readonly'
+            end
+        end
+        
+        def read_only?
+            @read_only
+        end
+        
+        def parse_runtime_content(doc, src_path=nil)
+            doc.search('input:connect').each do |connect|
+                options = {}
+                options[:required] = connect.attributes['required'] ? true : false
+                connect(connect.attributes['element'].to_sym, connect.attributes['target'].to_sym, options)
+            end
+        end
+        
+        def connect(element_name, target, options)
+            @connections[element_name] = ({
+              :target => target  
+            }).merge(options)
+            @css_classes << "connect-#{target}"
+        end
+        
+        
+        # def execute
+        #     @scene.name = 
+        #     @scene.value = @value
+        # end
+            
+        
+    end
+    
+end; end

data/apps/core/forms/widgets/inputs/input/input.shtml

@@ -0,0 +1,3 @@
+<div class="input">
+    { @value }
+</div>

data/apps/core/forms/widgets/inputs/input/readonly.shtml

@@ -0,0 +1,6 @@
+<sp:template>
+    <div class="input">
+        { @formatted_value }
+    </div>
+    <div style="clear: both"></div>
+</sp:template>

data/apps/core/forms/widgets/inputs/password/password.rb

@@ -0,0 +1,24 @@
+module Spider; module Forms
+    
+    class Password < Input
+        tag 'password'
+        is_attr_accessor :size, :type => Fixnum, :default => 25
+
+        def prepare
+            @modified = false
+            if (params['pwd1'] && !params['pwd1'].empty? && params['pwd2'])
+                if (params['pwd1'] != params['pwd2'])
+                    add_error("Le due password non corrispondono")
+                else
+                    @value = params['pwd1']
+                    @modified = true
+                end
+            end
+        end
+        
+        def value=(val)
+        end
+
+    end
+    
+end; end

data/apps/core/forms/widgets/inputs/password/password.shtml

@@ -0,0 +1,5 @@
+<div class="input">
+    <input type="password" name="{ @name }[pwd1]" value="" size="{ @size }"><br>
+    <div class="notice">Ripeti la password:</div>
+    <input type="password" name="{ @name }[pwd2]" value="" size="{ @size }"><br>
+</div>

data/apps/core/forms/widgets/inputs/search_select/search_select.rb

@@ -0,0 +1,168 @@
+module Spider; module Forms
+    
+    class SearchSelect < Select
+        tag 'search-select'
+        i_attr_accessor :model
+        is_attr_accessor :blank_option, :type => TrueClass, :default => true
+        
+        def prepare_value(params)
+            return nil
+        end
+
+        
+        # FIXME: change Select to avoid this
+        def prepare_scene(scene)
+            multi = @multiple
+            @multiple = false
+            scene = super
+            @multiple = multi
+            scene.multiple = @multiple
+            scene.value_param = "#{scene.name}[value]"
+            if (@multiple)
+                scene.value_param += "[]"
+            end
+            scene.size ||= 40
+            return scene
+        end
+        
+        def prepare
+            @modified = true
+            self.value = params['value']
+            if (params['clear'])
+                self.value = nil
+                @scene.next_step = :text
+                @scene.clear = true
+            end
+            did_set_value = false
+            @model = const_get_full(@model) if @model.is_a?(String)
+            if (params['text'] && !params['text'].empty?)
+                @data = @model.all
+                @scene.text_query = params['text']
+                cond = search_condition(params['text'])
+                @data.condition = @data.condition.and(cond)
+                if (@data.length == 0)
+                    @scene.no_result = true
+                    @scene.next_step = :text
+                elsif (@data.length == 1)
+                    set_or_add_value(@data[0])
+                    did_set_value = true
+                else
+                    @scene.next_step = :select
+                end
+                @scene.clear = false
+            end
+            if (params['delete'])
+                delete_keys = params['delete'].keys
+                new_val = Spider::Model::QuerySet.new(@model)
+                @value.each do |row|
+                    new_val << row unless delete_keys.include?(row.keys_string)
+                end
+                @value = new_val
+            end
+            if (params['add'])
+                add = params['add'].is_a?(Array) ? params['add'] : [params['add']]
+                add.each do |a|
+                    set_or_add_value(a)
+                end
+            end
+            @done = false if @scene.next_step && !did_set_value
+            @scene.delete_param = "_w#{param_name(self)}[delete]"
+            @scene.value = @value
+            @scene.list_value = @value
+            if (@multiple && !@value)
+                @scene.list_value = Spider::Model::QuerySet.static(@model)
+            end
+            @scene.keys = []
+            if (@value)
+                if (@multiple)
+                    @value.each do |val|
+                        @scene.keys << obj_to_key_str(val)
+                    end
+                else
+                    @scene.key = obj_to_key_str(@value)
+                end
+            end
+            @scene.data = @data
+            super
+        end
+        
+        def set_or_add_value(vals)
+            vals = [vals] unless vals.is_a?(Array)
+            vals.each do |val|
+                unless val.is_a?(@model)
+                    val = @model.new(val)
+                end
+                if (@multiple)
+                    self.value ||= Spider::Model::QuerySet.new(@model)
+                    self.value << val
+                else
+                    self.value = val
+                end
+            end
+        end
+        
+        def run
+            if (@value && !@multiple)
+                @scene.value_desc = @value.to_s
+            else
+                @scene.next_step ||= :text
+            end
+            if (@value)
+                @scene.selected = {}
+                val = @multiple ? @value : [@value]
+                val.each do |v|
+                    @scene.selected[@model.primary_keys.map{|k| v.get(k) }.join(',')]
+                end
+            end
+            if (@data)
+                @scene.search_values = {}
+                @data.each_index do |i|
+                    @scene.search_values[i] = @model.primary_keys.map{|k| @data[i][k] }.join(',')
+                end
+                super
+            end
+        end
+        
+        def search_condition(q)
+            cond = @model.free_query_condition(q)
+            conn_cond = connection_condition
+            return nil if conn_cond == false
+            if (conn_cond)
+                cond = cond.and(conn_cond)
+            end
+            # if (@value)
+            #     @value.each do |v|
+            #         k_cond = Spider::Model::Condition.or
+            #         @model.primary_keys.each do |k| 
+            #             k_cond[k].set(k, '<>', v.get(k))
+            #         end
+            #         cond.and(k_cond)
+            #     end
+            # els
+            if (@request.params['not'])
+                @request.params['not'].each do |v|
+                    k_cond = Spider::Model::Condition.or
+                    keys = v.split(',')
+                    @model.primary_keys.each_index do |i| 
+                        k = @model.primary_keys[i]
+                        k_cond[k].set(k, '<>', keys[i])
+                    end
+                    cond = cond.and(k_cond)
+                end
+            end
+            return cond
+        end
+                
+        __.text
+        def jquery_autocomplete
+            cond = search_condition(@request.params['q'])
+            return unless cond
+            @search_results = @model.find(cond).limit(@request.params['limit'])
+            @search_results.each do |row|
+                $out << "#{row.to_s}|#{obj_to_key_str(row)}\n"
+            end
+        end
+
+    end
+    
+end; end

data/apps/core/forms/widgets/inputs/search_select/search_select.shtml

@@ -0,0 +1,42 @@
+<div class="input{ @multiple ? ' multiple' : '' }">
+	<tpl:asset type="js" app="core/components" src="js/jquery/plugins/jquery-autocomplete/jquery.autocomplete.js" />
+	<tpl:asset type="js" src="input.js" />
+	<tpl:asset type="js" src="search_select.js" />
+	<tpl:asset type="css" app="core/components" src="js/jquery/plugins/jquery-autocomplete/jquery.autocomplete.css" />
+    <div sp:if="@no_result" class="notice">
+        Nessun risultato trovato per "{ @text_query }".
+    </div>
+    <div sp:if="@next_step == :text" class="add_box">
+        <span sp:if="@multiple" class="add_text">Aggiungi:</span>
+        <input type="text" name="{ @name }[text]" value="" size="{ @size }" />
+		<input sp:if="!@multiple" type="hidden" name="_w{ @widget[:param] }[clear]" value="true">
+    </div>
+    <div sp:if="@next_step == :select" class="notice">
+        Per favore, affina la ricerca:
+    </div>
+    <select name="{ @value_param }" sp:if="@next_step == :select">
+        <option sp:if="@blank_option"> </option>
+        <option sp:each_index="@data |i|" value="{ @search_values[i] }" sp:attr-if="@selected[@search_values[i]],selected">
+            { @data[i].to_s }
+        </option>
+    </select>
+    <div sp:if="@value_desc">
+        { @value_desc } 
+        <span sp:if="!@next_step">
+			<span class="change_action">
+            (<span class="action_text">Cambia</span> <input type="checkbox" name="{ @name }[clear]" value="1">)
+        </span>
+    </div>
+    <core:list sp:if="@multiple" id="list" class="values_list" queryset="@list_value" >
+		<tpl:append search=".actions">
+			<span class="delete_action">
+				(<span class="action_text">Cancella</span> <input type="checkbox" name="{ @_parent.delete_param }[{ @delete_keys[i] }]" value="true">)
+			</span>
+		</tpl:append>
+	</core:list>
+	<!---
+	<core:search-table class="search_table" id="table" sp:target-only="true" queryset="@data" row_limit="5" num_elements="3" />
+	-->
+	<input sp:if="@multiple" type="hidden" name="{ @value_param }" sp:each="@keys |key|" value="{ key }">
+	<input sp:if="!@multiple" type="hidden" name="{ @value_param }" value="{ @key }">
+</div>

data/apps/core/forms/widgets/inputs/select/select.rb

@@ -0,0 +1,126 @@
+module Spider; module Forms
+    
+    class Select < Input
+        tag 'select'
+        i_attr_accessor :model
+        is_attr_accessor :multiple
+        is_attr_accessor :blank_option, :type => TrueClass, :default => true
+        is_attr_accessor :condition
+        is_attr_accessor :show_element
+        attr_accessor :data
+        
+        def widget_init(action='')
+            super
+            @model = const_get_full(@model) if @model.is_a?(String)
+        end
+        
+        def prepare_scene(scene)
+            scene = super
+            scene.value_param = "#{scene.name}[value]"
+            scene.value_param += '[]' if @multiple
+            return scene
+        end
+        
+        def prepare_value(p)
+            if (p && p['value'])
+                self.value = p['value']
+            else
+                self.value = nil
+            end
+        end
+        
+        def run
+            
+            @scene.data = @data || @model.all
+            if (@condition)
+                @scene.data.condition = @condition
+            end
+            conn_cond = connection_condition
+            if (conn_cond == false)
+                @scene.data = Spider::Model::QuerySet.static(@model)
+            elsif (conn_cond)
+                @scene.data.condition.and(conn_cond)
+            end
+            @scene.values = {}
+            @scene.strings = {}
+            debug("SELECT VALUE:")
+            debug(@value)
+            @scene.selected = {}
+            if (@value)
+                val = @multiple ? @value : [@value]
+                val.each do |v|
+                    @scene.selected[@model.primary_keys.map{|k| v.get(k) }.join(',')] = true
+                end
+            end
+            @scene.data.each_index do |i|
+                @scene.values[i] = @model.primary_keys.map{|k| @scene.data[i][k] }.join(',')
+                @scene.strings[i] = format_string(@scene.data[i])
+            end
+            super
+        end
+        
+        def format_string(obj)
+            if (@show_element)
+                return obj.get(@show_element).to_s
+            else
+                return obj.to_s
+            end
+        end
+
+        
+        def value=(val)
+            debug("SETTING SELECT VALUE TO")
+            debug(val)
+            return if (val.nil? || (val.is_a?(String) && val.empty?))
+            if (val.is_a?(@model) || val.is_a?(Spider::Model::QuerySet))
+                return super
+            else
+                if (@multiple)
+                    val = [val] unless val.is_a?(Array)
+                    qs = Spider::Model::QuerySet.static(@model)
+                    val.each do |v|
+                        obj = @model.new(str_to_pks(v))
+                        qs << obj
+                    end
+                    return super(qs)
+                else
+                    return super(@model.new(str_to_pks(val)))
+                end
+            end
+        end
+        
+        def obj_to_key_str(obj)
+            @model.primary_keys.map{|k| obj.get(k) }.join(',')
+        end
+        
+        def str_to_pks(val)
+            if (val.is_a?(String))
+                parts = val.split(',')
+                pk = {}
+                @model.primary_keys.each{ |k| pk[k.name] = parts.shift}
+            else
+                pk = val
+            end
+            return pk
+        end
+        
+        def connection_condition
+#           debugger
+            if (@connections && @form)
+                conn_cond = Spider::Model::Condition.and
+                conn_param = params['connected'] || {}
+                @connections.each do |el, conn|
+                    val = @form.inputs[el].value
+                    val = conn_param[el.to_s] if (conn_param[el.to_s])
+                    return false if (conn[:required] && !val)
+                    next unless val
+                    conn_cond.set(conn[:target], '=', val)
+                end
+                return conn_cond
+            end
+            return nil
+        end
+
+    end
+    
+end; end

data/apps/core/forms/widgets/inputs/select/select.shtml

@@ -0,0 +1,8 @@
+<select name="{ @value_param }" sp:attr-if="@multiple,multiple" class="">
+	<tpl:asset type="js" src="input.js" />
+	<tpl:asset type="js" src="select.js" />
+    <option sp:if="@blank_option"> </option>
+    <option sp:each_index="@data |i|" value="{ @values[i] }" sp:attr-if="@selected[values[i]],selected">
+        { @data[i].to_s }
+    </option>
+</select>

data/apps/core/forms/widgets/inputs/subform/subform.rb

@@ -0,0 +1,10 @@
+module Spider; module Forms
+    
+    class SubForm < Input
+        tag 'subform'
+        
+        i_attr_accessor :model
+
+    end
+    
+end; end

data/apps/core/forms/widgets/inputs/subform/subform.shtml

@@ -0,0 +1,5 @@
+<div>
+	<div sp:if="!@value && !@shown">
+	Crea nuovo: <input type="checkbox" name="{ @name }[create]" value="true">
+	<forms:form id="form" model="@model" />
+</div>

data/apps/core/forms/widgets/inputs/text/text.rb

@@ -0,0 +1,9 @@
+module Spider; module Forms
+    
+    class Text < Input
+        tag 'text'
+        is_attr_accessor :size, :type => Fixnum, :default => 25
+
+    end
+    
+end; end

data/apps/core/forms/widgets/inputs/text/text.shtml

@@ -0,0 +1,3 @@
+<sp:template>
+    <input type="text" name="{ @name }" value="{ @value }" size="{ @size }">
+</sp:template>

data/apps/core/forms/widgets/inputs/text_area/text_area.rb

@@ -0,0 +1,10 @@
+module Spider; module Forms
+    
+    class TextArea < Input
+        tag 'textarea'
+        is_attr_accessor :rows, :type => Fixnum, :default => 6
+        is_attr_accessor :cols, :type => Fixnum, :default => 40
+
+    end
+    
+end; end

data/apps/core/forms/widgets/inputs/text_area/text_area.shtml

@@ -0,0 +1 @@
+<textarea name="{ @name }" rows="{ @rows }" cols="{ @cols }">{ @value }</textarea>

data/apps/drb_server/_init.rb

@@ -0,0 +1,8 @@
+module SpiderApps
+    module DrbServer
+        @description = ""
+        @version = 0.1
+        @path = File.dirname(__FILE__)
+        include Spider::App
+    end
+end

data/apps/drb_server/lib/model_server.rb

@@ -0,0 +1,41 @@
+require 'drb'
+
+module SpiderApps; module DrbServer
+    
+    class ModelServer
+        
+        def initialize(uri=nil)
+            @models = {}
+            @uri = uri
+        end
+        
+        def add(mod)
+            if (mod.is_a?(Module) && mod.include?(Spider::App))
+                mod.models.each { |m| @models[m] = true }
+            elsif (mod.is_a?(Spider::Model::BaseModel))
+                @models[mod] = true
+            end
+        end
+        
+        def start
+            DRb.start_service @uri, self
+            trap('TERM') { DRb.stop_service }
+            trap('INT') { DRb.stop_service }
+            Spider::Logger.debug("Model server listening on #{DRb.uri}")
+            DRb.thread.join
+        end
+        
+        def get(model_name, *args)
+            model = const_get_full(model_name)
+            return model.new(*args)
+        end
+        
+        def method_missing(method, *args)
+            model = const_get_full(args.shift)
+            return model.send(method, *args)
+        end
+        
+    end
+    
+    
+end; end