htmlgrid 1.0.0

data/lib/htmlgrid/datevalue.rb

@@ -0,0 +1,39 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+#
+#	HtmlGrid -- HyperTextMarkupLanguage Framework
+#	Copyright (C) 2003 ywesee - intellectual capital connected
+# Andreas Schrafl, Benjamin Fay, Hannes Wyss, Markus Huggler
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#
+#	ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zuerich, Switzerland
+#	htmlgrid@ywesee.com, www.ywesee.com/htmlgrid
+#
+# DateValue -- htmlgrid -- 10.03.2003 -- hwyss@ywesee.com 
+
+require 'htmlgrid/namedcomponent'
+
+module HtmlGrid
+	class DateValue < NamedComponent
+		LABEL = true
+		def to_html(context)
+			date = @model.send(@name)
+			if(date.respond_to?(:strftime))
+				date.strftime(@lookandfeel.lookup(:date_format)) 
+			end
+		end
+	end
+end

data/lib/htmlgrid/div.rb

@@ -0,0 +1,37 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+#
+#	HtmlGrid -- HyperTextMarkupLanguage Framework
+#	Copyright (C) 2003 ywesee - intellectual capital connected
+# Andreas Schrafl, Benjamin Fay, Hannes Wyss, Markus Huggler
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#
+#	ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zuerich, Switzerland
+#	htmlgrid@ywesee.com, www.ywesee.com
+#
+# Div -- oddb -- 12.11.2004 -- jlang@ywesee.com, usenguel@ywesee.com
+
+require 'htmlgrid/component'
+
+module HtmlGrid
+	class Div < Component
+		def to_html(context)
+			context.div(@attributes) {
+				super << dynamic_html(context)
+			}
+		end
+	end
+end

data/lib/htmlgrid/divcomposite.rb

@@ -0,0 +1,52 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# DivComposite -- HtmlGrid -- 19.04.2005 -- hwyss@ywesee.com
+
+require 'htmlgrid/composite'
+
+module HtmlGrid
+	class DivComposite < TagComposite
+		def compose(model=@model)
+			ypos = -1
+			xpos = 0
+			div = nil
+			components.sort_by { |matrix, component|
+				[matrix.at(1), matrix.at(0), matrix[2..-1]]
+			}.each { |matrix, component|
+				if((mpos = matrix.at(1).to_i) > ypos)
+					xpos = 0
+					ypos = mpos
+					div = []
+					@grid.push(div)
+					css = {}
+					if(klass = css_map[ypos])
+						css.store('class', klass)
+					end
+					if(id = css_id_map[ypos])
+						css.store('id', id)
+					end
+					if(style = css_style_map[ypos])
+						css.store('style', style)
+					end
+					@css_grid.push(css.empty? ? nil : css)
+				end
+				div.push(label(create(component, model), component))
+			}
+		end
+		def to_html(context)
+			res = ''
+			@grid.each_with_index { |div, idx|
+        res << context.div(tag_attributes(idx)) {
+          div.flatten.inject('') { |html, item|
+            html << if(item.respond_to?(:to_html))
+                      item.to_html(context)
+                    else
+                      item.to_s
+                    end
+          }
+        }
+			}
+			res
+		end
+	end
+end

data/lib/htmlgrid/divform.rb

@@ -0,0 +1,35 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+#
+#	HtmlGrid -- HyperTextMarkupLanguage Framework
+#	Copyright (C) 2003 ywesee - intellectual capital connected
+# Andreas Schrafl, Benjamin Fay, Hannes Wyss, Markus Huggler
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#
+#	ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zuerich, Switzerland
+#	htmlgrid@ywesee.com, www.ywesee.com/htmlgrid
+#
+# Form -- htmlgrid -- 23.10.2002 -- hwyss@ywesee.com 
+
+require 'htmlgrid/form'
+require 'htmlgrid/divcomposite'
+require 'htmlgrid/submit'
+
+module HtmlGrid
+	class DivForm < DivComposite
+		include FormMethods
+	end
+end

data/lib/htmlgrid/divlist.rb

@@ -0,0 +1,26 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# HtmlGrid::DivList -- davaz.com -- 20.09.2005 -- mhuggler@ywesee.com
+
+require 'htmlgrid/divcomposite'
+
+module HtmlGrid
+	class DivList < HtmlGrid::DivComposite
+		def compose
+			@model.each_with_index { |item, idx|
+        @list_index = idx
+				super(item)
+			} 
+=begin
+			if(header = self.class.const_get(:HEADER))
+				@grid.push(create(header, @model, @session))
+				@css_grid.push(nil)
+			end
+			if(footer = self.class.const_get(:FOOTER))
+				@grid.push(create(footer, @model, @session))
+				@css_grid.push(nil)
+			end
+=end
+		end
+	end
+end

data/lib/htmlgrid/divtemplate.rb

@@ -0,0 +1,12 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# DivTemplate -- htmlgrid -- 04.05.2005 -- hwyss@ywesee.com
+
+require 'htmlgrid/divcomposite'
+require 'htmlgrid/template'
+
+module HtmlGrid
+	class DivTemplate < DivComposite
+		include TemplateMethods
+	end
+end

data/lib/htmlgrid/dojotoolkit.rb

@@ -0,0 +1,173 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# HtmlGrid::DojoToolkit -- davaz.com -- 14.03.2006 -- mhuggler@ywesee.com
+
+require 'htmlgrid/component'
+require 'htmlgrid/div'
+
+module HtmlGrid
+	class Component
+    @@msie_ptrn = /MSIE\s*(\d)/
+		attr_accessor :dojo_tooltip
+    def dojo_9?
+      defined?(::DOJO_VERSION) && ::DOJO_VERSION >= '0.9'
+    end
+		def dojo_tag(widget, args={}, inner_html='')
+			# <dojo:#{widget} ...> does not work on konqueror as of 
+			# 02.06.2006. In combination with DOJO_DEBUG = true it even 
+			# hangs konqueror.
+=begin
+			dojo_tag = "<div dojoType=\"#{widget}\""
+			args.each { |key, value|
+				if(value.is_a?(Array))
+					dojo_tag << " #{key}=\"#{value.join(';')}\""	
+				else
+					dojo_tag << " #{key}=\"#{value}\""	
+				end
+			}
+			dojo_tag << "></div>"
+=end
+      div = HtmlGrid::Div.new(@model, @session, self)
+      div.set_attribute('dojoType', widget)
+      lim = dojo_9? ? "," : ";"
+      args.each { |key, value|
+        if(value.is_a?(Array))
+          value = value.join(lim)
+        end
+        div.set_attribute(key, value)
+      }
+      div.value = inner_html
+      div
+		end
+    def dojo_title=(value)
+      tooltip = HtmlGrid::Div.new(@model, @session, self)
+      tooltip.value = value
+      self.dojo_tooltip = tooltip
+    end
+		def dojo_parse_widgets
+			if(@container.respond_to?(:dojo_parse_widgets))
+				@container.dojo_parse_widgets
+			end
+		end
+		unless(method_defined?(:dojo_dynamic_html))
+			alias :dojo_dynamic_html :dynamic_html
+			def dynamic_html(context)
+				html = ''
+        attrs = {
+          'dojoType'  => dojo_9? ? 'ywesee.widget.Tooltip' : 'tooltip',
+          'connectId' =>	css_id,
+          'id'        =>  "#{css_id}_widget",
+          'style'			=>	'display: none',
+        }
+        unless((match = @@msie_ptrn.match(@session.user_agent)) \
+               && match[1].to_i < 7)
+          attrs.update({
+						'toggle'		      =>	'fade',
+						'toggleDuration'	=>	'500',
+          })
+        end
+				if(@dojo_tooltip.is_a?(String))
+          attrs.store('href', dojo_9? ? "'#@dojo_tooltip'" : @dojo_tooltip)
+					html << context.div(attrs)
+				elsif(@dojo_tooltip.respond_to?(:to_html))
+					@dojo_tooltip.attributes.update(attrs)
+					html << @dojo_tooltip.to_html(context)
+				end
+				unless(html.empty? || dojo_parse_widgets)
+					html << context.script('type' => 'text/javascript') {
+						"djConfig.searchIds.push('#{css_id}')"
+					}
+				end
+				dojo_dynamic_html(context) << html
+			end
+		end
+	end
+	module DojoToolkit
+		module DojoTemplate
+			DOJO_DEBUG = false
+			DOJO_BACK_BUTTON = false
+      DOJO_ENCODING = nil
+			DOJO_PARSE_WIDGETS = true
+			DOJO_PREFIX = []
+			DOJO_REQUIRE = []
+			def dynamic_html_headers(context) 
+				headers = super
+        encoding = self.class::DOJO_ENCODING
+        encoding ||= if RUBY_VERSION >= '1.9'
+                       Encoding.default_external
+                     else
+                       $KCODE == 'UTF8' ? 'UTF-8' : 'ISO-8859-1'
+                     end
+        dojo_path = @lookandfeel.resource_global(:dojo_js)
+        args = {
+          'type'			=>	'text/javascript',
+        }	
+        headers << context.script(args.dup) {
+          "djConfig = {
+            isDebug: #{self.class::DOJO_DEBUG},
+            parseWidgets: #{dojo_parse_widgets},
+            preventBackButtonFix: #{!self.class::DOJO_BACK_BUTTON},
+            bindEncoding: '#{encoding}',
+            searchIds: [],
+            urchin: ''
+          };"
+        }
+        if(dojo_9?)
+          dojo_path ||= '/resources/dojo/dojo/dojo.js'
+          config = [ "parseOnLoad:true",
+                     "isDebug:#{self.class::DOJO_DEBUG}",
+                     "preventBackButtonFix:#{!self.class::DOJO_BACK_BUTTON}",
+                     "bindEncoding:'#{encoding}'",
+                     "searchIds:[]",
+                     "urchin:''" ].join(',')
+          args.store('djConfig', config)
+        else
+          dojo_path ||= '/resources/dojo/dojo.js'
+        end
+				args.store('src', dojo_path)
+				headers << context.script(args)
+				unless(self.class::DOJO_PREFIX.empty?)
+          register = dojo_9? ? 'registerModulePath' : 'setModulePrefix'
+					args = {
+						'type'			=>	'text/javascript',
+					}	
+					headers << context.script(args) { 
+						self.class::DOJO_PREFIX.collect { |prefix, path|
+							"dojo.#{register}('#{prefix}', '#{path}');"
+						}.join
+					}
+				end
+				args = {
+					'type'			=>	'text/javascript',
+				}
+				headers << context.script(args) {
+					script = ''
+					self.class::DOJO_REQUIRE.each { |req|
+						script << "dojo.require('#{req}');"
+					}
+					if(@dojo_onloads)
+						@dojo_onloads.each { |onload|
+							script << "dojo.addOnLoad(function() { #{onload} });"
+						}
+					end
+					script
+				}
+        if(dojo_9?)
+          dojo_dir = File.dirname(dojo_path)
+          headers << context.style(:type => "text/css") { <<-EOS
+              @import "#{File.join(dojo_dir, "/resources/dojo.css")}";
+              @import "#{File.join(dojo_dir, "../dijit/themes/tundra/tundra.css")}";
+            EOS
+          }
+        end
+        headers
+			end
+			def dojo_parse_widgets
+				self.class::DOJO_PARSE_WIDGETS
+			end
+			def onload=(script)
+				(@dojo_onloads ||= []).push(script)
+			end
+		end
+	end
+end

data/lib/htmlgrid/errormessage.rb

@@ -0,0 +1,70 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+#
+#	HtmlGrid -- HyperTextMarkupLanguage Framework
+#	Copyright (C) 2003 ywesee - intellectual capital connected
+# Andreas Schrafl, Benjamin Fay, Hannes Wyss, Markus Huggler
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#
+#	ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zuerich, Switzerland
+#	htmlgrid@ywesee.com, www.ywesee.com/htmlgrid
+#
+# ErrorMessage -- htmlgrid -- 10.04.2003 -- benfay@ywesee.com
+
+module HtmlGrid
+	module ErrorMessage
+		private
+		def error_message(ypos = 0)
+			@displayed_messages = []
+			if(@session.warning?)
+				__messages(@session.warnings, 'warning', ypos)
+			end
+			if(@session.error?)
+				__messages(@session.errors, 'processingerror', ypos)
+			end
+		end
+		def error_text(obj)
+			message = obj.message
+			txt = HtmlGrid::Text.new(message, @model, @session, self)
+			if(txt.value.nil?)
+				txt.value = @lookandfeel.lookup(message, escape(obj.value))
+			end
+			if(txt.value.nil? && (match = /^(._[^_]+)_(.*)$/.match(message.to_s)) \
+				&& (label = @lookandfeel.lookup(match[2])))
+				txt.value = @lookandfeel.lookup(match[1], label)
+			end
+			txt
+		end
+		def __message(obj, css_class, ypos=0)
+			@displayed_messages ||= []
+			message = obj.message
+			unless(@displayed_messages.include?(message))
+				@displayed_messages.push(message)
+				txt = error_text(obj)
+				unless(txt.value.nil?)
+					insert_row(ypos, txt, css_class)
+				end
+			end
+		end
+		def __messages(ary, css_class, ypos=0)
+			ary.sort_by { |item|
+				(components.index(item.key) || [-1,-1]).reverse
+			}.reverse.each { |item|
+				__message(item, css_class, ypos)
+			}
+		end
+	end
+end

data/lib/htmlgrid/form.rb

@@ -0,0 +1,93 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+#
+#	HtmlGrid -- HyperTextMarkupLanguage Framework
+#	Copyright (C) 2003 ywesee - intellectual capital connected
+# Andreas Schrafl, Benjamin Fay, Hannes Wyss, Markus Huggler
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#
+#	ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zuerich, Switzerland
+#	htmlgrid@ywesee.com, www.ywesee.com/htmlgrid
+#
+# Form -- htmlgrid -- 23.10.2002 -- hwyss@ywesee.com 
+
+require 'htmlgrid/composite'
+require 'htmlgrid/submit'
+
+module HtmlGrid
+	module FormMethods
+		AUTOFILL = false
+    if RUBY_VERSION >= '1.9'
+      ACCEPT_CHARSET = Encoding.default_external || 'UTF-8'
+    else
+      ACCEPT_CHARSET = $KCODE == 'UTF8' ? 'UTF-8' : 'ISO-8859-1'
+    end
+		EVENT = nil
+		FORM_ACTION = nil
+		FORM_METHOD = 'POST'
+		FORM_NAME = 'stdform'
+		TAG_METHOD	= :form
+		def autofill?
+			self.class.const_get(:AUTOFILL)
+		end
+		def event
+			self::class::EVENT
+		end
+		def formname
+			if(defined? self::class::FORM_NAME)
+				self::class::FORM_NAME 
+			end
+		end
+		def onsubmit=(onsubmit)
+			@form_properties["onSubmit"] = onsubmit
+		end
+		def to_html(context)
+			context.send(self::class::TAG_METHOD, @form_properties) {
+				super << context.div('style'=>'display:none') { hidden_fields(context) }
+			}
+		end
+		private
+		def hidden_fields(context)
+			'' << 
+			context.hidden('flavor', @lookandfeel.flavor) << 
+			context.hidden('language', @lookandfeel.language) << 
+			context.hidden({'NAME' => 'event', 'ID' => 'event', 
+				'VALUE' => event.to_s}) << 
+			context.hidden('state_id', @session.state.object_id.to_s)
+		end
+		def init
+			@form_properties = {}
+			if(defined? self::class::FORM_CSS_CLASS)
+				@form_properties.store('class', self::class::FORM_CSS_CLASS)
+			end
+			if(defined? self::class::FORM_NAME)
+				@form_properties.store('NAME', self::class::FORM_NAME)
+			end
+			if(defined? self::class::FORM_ID)
+				@form_properties.store('ID', self::class::FORM_ID)
+			end
+			super
+			@form_properties.update({
+				'METHOD'					=>	self::class::FORM_METHOD.dup,
+				'ACTION'					=>	(self::class::FORM_ACTION || @lookandfeel.base_url),
+				'ACCEPT-CHARSET'	=>	self::class::ACCEPT_CHARSET,
+			})
+		end
+	end
+	class Form < Composite
+		include FormMethods
+	end
+end

data/lib/htmlgrid/formlist.rb

@@ -0,0 +1,42 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+#
+#	HtmlGrid -- HyperTextMarkupLanguage Framework
+#	Copyright (C) 2003 ywesee - intellectual capital connected
+# Andreas Schrafl, Benjamin Fay, Hannes Wyss, Markus Huggler
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#
+#	ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zuerich, Switzerland
+#	htmlgrid@ywesee.com, www.ywesee.com/htmlgrid
+#
+# FormList -- htmlgrid -- 25.03.2003 -- aschrafl@ywesee.com
+
+require 'htmlgrid/list'
+require 'htmlgrid/form'
+require 'htmlgrid/value'
+require 'htmlgrid/button'
+
+module HtmlGrid
+	class FormList < List
+		include FormMethods
+		DEFAULT_CLASS = Value
+		EVENT = :new_item
+		def compose_footer(matrix)
+			@grid.add(submit(), *matrix)
+			@grid.set_colspan(*matrix)
+		end
+	end
+end