renamed

examples/draw.rb

@@ -0,0 +1,90 @@
+$LOAD_PATH.unshift << "../lib"
+require 'wee'
+require 'wee/webrick'
+require 'wee/utils/cache'
+require 'GD'
+
+class MainPage < Wee::Component
+
+  def initialize
+    @points = []
+    session.register_object_for_backtracking(@points)
+  end
+
+  def create_image(points)
+    im = GD::Image.newTrueColor(200,200) 
+
+    white = GD::Image.trueColor(255,255,255)
+    black = GD::Image.trueColor(0,0,0)
+    red = GD::Image.trueColor(255,0,0)
+
+    im.transparent(white)
+    im.filledRectangle(0,0,199,199,white)
+    im.rectangle(0,0,199,199,black)
+
+    points.each do |x,y|
+      im.filledRectangle(x,y,x+10,y+10, red)
+    end
+
+    im.pngStr
+  end
+
+  def clear
+    @points.clear
+  end
+
+  def process_request(context)
+    query = context.request.unparsed_uri.split('?').last
+    @x, @y = query.split(",").map {|i| i.to_i} if query
+    super
+  end
+
+  # TODO: move the above into method point (we need the current context,
+  # Session.current_context)
+  def draw_point
+    @points << [@x, @y]
+  end
+
+  def render_content_on(r)
+    r.page.title("Draw Test").with do 
+
+      ctx = r.context.context
+      img_id = ctx.handler_registry.handler_id_for_resource(
+        Wee::ResourceHandler.new(create_image(@points), 'image/png'))
+
+      img_url = ctx.application.gen_resource_url(ctx.session_id, ctx.page_id, img_id)
+
+      r.anchor.action(:draw_point).with {
+        r.image.src(img_url).ismap("")
+      }
+
+      r.break
+      r.anchor.action(:clear).with('Clear')
+    end 
+  end
+
+end
+
+class MySession < Wee::Session
+  def initialize
+    super do
+      self.root_component = MainPage.new
+      self.page_store = Wee::Utils::LRUCache.new(10) # backtrack up to 10 pages
+    end
+  end
+end
+
+class MyApplication < Wee::Application
+  def shutdown
+  end
+end
+
+if __FILE__ == $0
+  Wee::Application.new {|app|
+    app.name = 'Counter'
+    app.path = '/app'
+    app.session_class = MySession
+    app.session_store = Wee::Utils::LRUCache.new(1000) # handle up to 1000 sessions
+    app.dumpfile = ''
+  }.start
+end

examples/example.rb

@@ -0,0 +1,272 @@
+$LOAD_PATH.unshift << "../lib"
+require 'wee'
+require 'wee/webrick'
+require 'wee/utils/cache'
+require 'window'
+
+module BacktrackableDecoration
+  def decoration
+    @decoration = Wee::StateHolder.new(nil) unless @decoration
+    @decoration.value || self
+  end
+
+  def decoration=(dec)
+    @decoration = Wee::StateHolder.new(nil) unless @decoration
+    @decoration.value = dec
+  end
+end
+
+class Counter < Wee::Component
+  def initialize(cnt)
+    @cnt = cnt 
+    session.register_object_for_backtracking(self)
+  end
+
+  def dec
+    @cnt -= 1
+  end
+
+  def inc
+    @cnt += 1
+  end
+
+  def render_content_on(r)
+    r.anchor.action(:dec).with("--")
+    r.space; r.text(@cnt.to_s); r.space 
+    r.anchor.action(:inc).with("++")
+  end
+end
+
+class MessageBox < Wee::Component
+  def initialize(text)
+    @text = text 
+  end
+
+=begin
+  def ok
+    answer true
+  end
+
+  def cancel
+    answer false
+  end
+=end
+
+  def render_content_on(r)
+    r.break
+    r.text(@text)
+    r.form do 
+      r.submit_button.value('OK').action(:answer, true)
+      r.space
+      r.submit_button.value('Cancel').action(:answer, false)
+    end
+    r.break
+  end
+end
+
+class RegexpValidatedInput < Wee::Component
+
+  def initialize(init_value, regexp)
+    @regexp = regexp
+    self.value = init_value
+    @error = false
+    session.register_object_for_backtracking(self)
+  end
+
+  def value
+    @value
+  end
+
+  def value=(new_value)
+    raise unless new_value =~ @regexp
+    @input = @value = new_value
+  end
+
+  def render_content_on(r)
+    r.form do
+      r.text_input.attr(:input)
+      r.text %(<div style="color: red">Invalid input</div>) if @error
+    end
+  end
+
+  def input
+    @input
+  end
+
+  def input=(str)
+    @input = str
+
+    if @input =~ @regexp
+      @value = str 
+      @error = false
+    else
+      @error = true
+    end
+  end
+
+end
+
+#Handler[self, :obj]
+
+class EditableCounter < Counter 
+#  include BacktrackableDecoration
+
+  def initialize(cnt)
+    @cnt = cnt
+    @show_edit_field = false
+    super
+  end
+
+=begin
+  def take_snapshot
+    [@cnt, @show_edit_field]
+  end
+
+  def apply_snapshot(snap)
+    @cnt, @show_edit_field = snap
+  end
+=end
+
+  def render_content_on(r)
+    #r.form.action(:submit).with do
+      r.anchor.action(:dec).with("--")
+      r.space
+
+      if @show_edit_field
+        r.text_input.assign(:cnt=).value(@cnt).size(6)
+        r.submit_button.action(:submit).value('S')
+      else
+        r.anchor.action(:submit).with(@cnt) 
+      end
+
+      r.space
+      r.anchor.action(:inc).with("++")
+    #end
+  end
+
+  def submit
+    if @cnt.to_s !~ /^\d+$/
+      call MessageBox.new("You entered an invalid counter! Please try again!")
+      @cnt = 0
+    else
+      @show_edit_field = !@show_edit_field
+    end
+    @cnt = @cnt.to_i
+  end
+
+  def cnt=(val)
+    @cnt = val
+  end
+
+  def mesg(res)
+    p "returned"
+  end
+end
+
+
+# TODO
+class Calculator < Wee::Component
+  attr_accessor :display
+
+  def initialize
+    @number_stack = []
+    @display = 0
+  end
+
+  def render_content_on(r)
+    r.text(@display)
+
+    r.form do
+      for num in 0..9 do
+        r.submit_button.action(:num).value(num)
+        r.space
+      end
+    end
+  end
+
+  def num(n)
+    @display = (@display * 10) + n.to_i if n =~ /^\d$/
+  end
+end
+
+
+
+
+class MainPage < Wee::Component
+  include BacktrackableDecoration
+
+  def initialize
+    @counters = (1..10).map {|i| Wee::Window.new("Cnt #{ i }", "#{i*10}px", EditableCounter.new(i))}
+    add_children(*@counters)
+    add_child(@val_inp = RegexpValidatedInput.new('Michael Neumann', /^\w+\s+\w+$/))
+
+    @arr = []
+    session.register_object_for_backtracking(@arr)
+    session.register_object_for_backtracking(@text)
+  end
+
+  attr_accessor :text
+
+  def render_content_on(r)
+    r.page.title("Counter Test").with do 
+      r.form do
+
+      @counters.each { |cnt|
+        r.render(cnt)  
+      }
+
+      r.render(@val_inp)
+
+      @arr.each do |a|
+        r.text(a)
+        r.break
+      end
+
+      end
+
+      r.form do
+        r.text_input.assign(:text=)
+        r.submit_button.action(:add).value('add')
+      end
+
+    end 
+  end
+
+  def add
+    call MessageBox.new("Do you really want to add '" + @text + "'?"), :add_confirm
+  end
+
+  def add_confirm(res)
+    call MessageBox.new("Do you really really really want to add '" + @text + "'?"), :add_confirm2 if res
+  end
+
+  def add_confirm2(res)
+    @arr << @text if res
+  end
+
+end
+
+class MySession < Wee::Session
+  def initialize
+    super do
+      self.root_component = MainPage.new
+      self.page_store = Wee::Utils::LRUCache.new(10) # backtrack up to 10 pages
+    end
+  end
+end
+
+if __FILE__ == $0
+  DUMP = 'dump'
+
+  if File.exists?(DUMP)
+    Wee::Application.load_from_disk(DUMP)
+  else
+    Wee::Application.new {|app|
+      app.name = 'Counter'
+      app.path = '/app'
+      app.session_class = MySession
+      app.session_store = Wee::Utils::LRUCache.new(1000) # handle up to 1000 sessions
+      app.dumpfile = DUMP
+    }
+  end.start
+end