watobo 0.9.12 → 0.9.13

data/lib/watobo/mixins/shapers.rb

@@ -1,7 +1,7 @@
 # .
 # shapers.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,7 +19,8 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   module Mixin
     module Shaper
       module Web10
@@ -43,8 +44,9 @@ module Watobo
         def replaceFileExt(new_file)
           #   puts "replace element #{new_element}"
           begin
-            new_file.gsub!(/^\//, "")
-            self.first.gsub!(/([^\?]*\/)(.*) (HTTP.*)/i,"\\1#{new_file} \\3")
+            file = new_file.strip
+            file.gsub!(/^\//, "")
+            self.first.gsub!(/([^\?]*\/)(.*) (HTTP.*)/i,"\\1#{file} \\3")
           rescue => bang
             puts bang
           end
@@ -66,12 +68,7 @@ module Watobo
         end
 
         def strip_path()
-          if self.first =~ /(^[^[:space:]]{1,} https?:\/\/[\-0-9a-zA-Z.]*[:0-9]{0,6}[^\?]*\/).* (HTTP.*)/i then
-            new_line = "#{$1} #{$2}"
-          self.shift
-          self.unshift(new_line)
-          end
-        # puts "* StripPath: #{self.first}"
+          self.first.gsub!(/([^\?]*\/)(.*) (HTTP.*)/i,"\\1# \\3")
         end
 
         def setDir(dir)
@@ -121,6 +118,8 @@ module Watobo
           self.replace(self_copy)
 
         end
+        
+        alias_method :add_header, :addHeader
 
         def removeURI
           if self.first =~ /(^[^[:space:]]{1,}) (https?:\/\/[\-0-9a-zA-Z.]*[:0-9]{0,6}\/)/ then
@@ -139,7 +138,7 @@ module Watobo
           self.pop if self[-2].strip.empty?
         end
 
-        def set_header(header, value)
+        def set_header_UNUSED(header, value)
           self.each do |h|
             break if h.strip.empty?
             if h =~ /^#{header}:/
@@ -198,6 +197,8 @@ module Watobo
             puts "====="
           end
         end
+        
+        alias_method :remove_header, :removeHeader
 
         # removeUrlParms
         # Function: Remove all parameter within the URL
@@ -354,6 +355,33 @@ module Watobo
             end
           }
         end
+        
+        def set_content_length(length)
+          set_header("Content-Length", length)     
+        end
+        
+        def set_content_type(ctype)
+          set_header("Content-Type", ctype)
+        end
+        
+        def set_header(header, value)
+          begin
+            new_header = "#{header}: #{value}\r\n"
+          self.each_with_index do |h, i|
+            if h =~ /^#{Regexp.quote(header)}:/
+              h.replace(new_header)
+              return true
+            end
+            if h.strip.empty? or i == self.length-1
+              self.insert(i, new_header)
+              return true
+            end
+          end
+          rescue => bang
+            puts bang
+          end
+         return false      
+        end
 
         # sets post data
         def setData(data)
@@ -370,6 +398,8 @@ module Watobo
         def setMethod(method)
           self.first.gsub!(/(^[^[:space:]]{1,}) /, "#{method} ")
         end
+        
+        alias_method :set_method, :setMethod
 
         def setHTTPVersion(version)
           self.first.gsub!(/HTTP\/(.*)$/, "HTTP\/#{version}")
@@ -397,6 +427,7 @@ module Watobo
             new_body = ''
 
             body_orig = self.body
+            return true if body_orig.nil?
             # puts body_orig.class
             puts body_orig.length
             pattern = '[0-9a-fA-F]{1,6}\r?\n'

data/lib/watobo/mixins/transcoders.rb

@@ -1,7 +1,7 @@
 # .
 # transcoders.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,70 +19,74 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   module Mixin
-  module Transcoders
-    
-    def url_encode
-       CGI::escape(self)  
-    end
-    
-    def url_decode
-      CGI::unescape(self)
-    end
-    
-    
-    def b64decode
-      begin
-        b64string = self
-        rs = Base64.decode64(b64string)
-        return rs
-      rescue
-        return ""
+    module Transcoders
+      def url_encode
+        CGI::escape(self)
       end
-    end
-    
-    
-    def b64encode
-      begin
-        plain = self
-        rs = Base64.encode64(plain)
-        # we only need a simple string without linebreaks
-        rs.gsub!(/\n/,'')
-        rs.strip!
-        return rs
-      rescue
-        return ""
+
+      def url_decode
+        CGI::unescape(self)
       end
-    end
-    
-    def hex2int
-      begin
-        plain = self.strip
-        if plain =~ /^[0-9a-fA-F]{1,8}$/ then
+
+      def b64decode
+        err_count = 0
+          b64string = self
+        begin
+          rs = Base64.strict_decode64(b64string)
+          #rs = Base64.decode64(b64string)
+          return rs
+        rescue
+          b64string.gsub!(/.$/,'')
+          err_count += 1
+          retry if err_count < 4
+          return ""
+        end
+      end
+
+      def b64encode
+        begin
+          plain = self
+          #rs = Base64.strict_encode64(plain)
+          rs = Base64.strict_encode64(plain)
+          # we only need a simple string without linebreaks
+          #rs.gsub!(/\n/,'')
+          #rs.strip!
+          return rs
+        rescue
+          return ""
+        end
+      end
+
+      def hex2int
+        begin
+          plain = self.strip
+          if plain =~ /^[0-9a-fA-F]{1,8}$/ then
           return plain.hex
-        else
+          else
+            return ""
+          end
+        rescue
           return ""
         end
-      rescue
-        return ""
       end
-    end
-    
-    def hexencode
-      begin
-        
-        
-     self.unpack("H*")[0]
-      rescue
-        return ""
+
+      def hexencode
+        begin
+
+          self.unpack("H*")[0]
+        rescue
+          return ""
+        end
+
+      end
+
+      def hexdecode
+
+        [ self ].pack("H*")
       end
-      
-    end
-    def hexdecode
-      
-      [ self ].pack("H*")
     end
   end
-  end
 end

data/lib/watobo/mixins.rb

@@ -1,7 +1,7 @@
 # .
 # mixins.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,7 +19,8 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   module Mixins
     mixins_path = File.expand_path(File.join(File.dirname(__FILE__), "mixins"))
   # puts "* loading mixins #{mixins_path}"

data/lib/watobo/parser/html.rb

@@ -0,0 +1,106 @@
+# .
+# html.rb
+# 
+# Copyright 2013 by siberas, http://www.siberas.de
+# 
+# This file is part of WATOBO (Web Application Tool Box)
+#        http://watobo.sourceforge.com
+# 
+# WATOBO is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation version 2 of the License.
+# 
+# WATOBO 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 General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with WATOBO; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# .
+# @private 
+module Watobo#:nodoc: all
+  module Parser
+    module HTML
+      class Form
+        def input_fields(&block)
+          if block_given?
+            @input_fields.each do |field|
+              yield field
+            end
+          end
+          @input_fields
+        end
+
+        def initialize(form_css)
+          @form = form_css
+          @input_fields = []
+          @form.css('input').each do |i|
+            @input_fields << InputField.new(i)
+          end
+
+        end
+      end
+
+      class InputField
+        attr :id
+        attr :value
+        attr :name
+       # attr :autocomplete
+        
+        def to_www_form_parm()
+          Watobo::WWWFormParameter.new(:name => @name, :value => @value)
+        end
+        
+        def to_url_parm()
+          Watobo::UrlParameter.new(:name => @name, :value => @value)
+        end
+        
+        def initialize(input_css)  
+          @css = input_css        
+              @id = input_css["id"].nil? ? "" : input_css["id"] 
+              @value = input_css["value"].nil? ? "" : input_css["value"]
+              @name = input_css["name"].nil? ? "" : input_css["name"]  
+              #@autocomplete = input_css["autocomplete"]        
+        end
+        
+        def method_missing(name, *args, &block)
+          @css[name.to_s].nil? ? "" : input_css[name.to_s]
+        end
+
+      end
+
+      class Links
+
+      end
+      
+      def links(&block)
+        
+      end
+      
+      def input_fields(&block)
+        fields = []
+        forms do |form|
+          form.input_fields do |field|
+            yield field if block_given?
+            fields << field
+          end
+        end
+        fields
+      end
+      
+
+      def forms(&block)
+        fs = []
+        doc = Nokogiri::HTML(self.body)
+        doc.css('form').each do |f|
+          fo = Form.new(f)
+          yield fo if block_given?
+        end
+        fs
+      end
+
+    end
+  end
+end

data/lib/watobo/parser.rb

@@ -0,0 +1,22 @@
+# .
+# parser.rb
+# 
+# Copyright 2013 by siberas, http://www.siberas.de
+# 
+# This file is part of WATOBO (Web Application Tool Box)
+#        http://watobo.sourceforge.com
+# 
+# WATOBO is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation version 2 of the License.
+# 
+# WATOBO 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 General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with WATOBO; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# .
+require 'watobo/parser/html'

data/lib/watobo/utils/check_regex.rb

@@ -1,7 +1,7 @@
 # .
 # check_regex.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,7 +19,8 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   module Utils
     def Utils.checkRegex(pattern)
       begin

data/lib/watobo/utils/copy_object.rb

@@ -1,7 +1,7 @@
 # .
 # copy_object.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,7 +19,8 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   module Utils
     def Utils.copyObject(object)
        copy = secure_eval(YAML.load(YAML.dump(object.inspect)))

data/lib/watobo/utils/crypto.rb

@@ -1,7 +1,7 @@
 # .
 # crypto.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -24,7 +24,8 @@ require 'digest/sha1'
 require 'base64'
 
 # Thanks to : http://rails.brentsowers.com/2007/12/aes-encryption-and-decryption-in-ruby.html
-module Watobo
+# @private 
+module Watobo#:nodoc: all
 module Crypto
   
   def Crypto.encryptPassword(plain_password, secret)

data/lib/watobo/utils/expand_range.rb

@@ -1,7 +1,7 @@
 # .
 # expand_range.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,7 +19,8 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   module Utils
     # expand range creates an array out of 
     def self.expand_range(pattern)

data/lib/watobo/utils/file_management.rb

@@ -1,7 +1,7 @@
 # .
 # file_management.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,7 +19,8 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   module Utils
     # e.g, save_settings("test-settings.test", 0, "@saved_settings", @saved_settings) 
     
@@ -49,12 +50,15 @@ module Watobo
     end 
     
     def Utils.saveChat(chat, filename)
+      return false if filename.nil?
+      return false if chat.nil?
       chat_data = {
         :request => chat.request.map{|x| x.inspect},
         :response => chat.response.map{|x| x.inspect},
       }
       
-      chat_data.update(chat.settings)                
+      chat_data.update(chat.settings)  
+                    
       if File.exists?(filename) then
         puts "Updating #{filename}"
         File.open(filename, "w") { |fh| 

data/lib/watobo/utils/hexprint.rb

@@ -1,7 +1,7 @@
 # .
 # hexprint.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,7 +19,8 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   module Utils
     def self.hexprint(data)
       data.length.times do |i|

data/lib/watobo/utils/load_chat.rb

@@ -1,7 +1,7 @@
 # .
 # load_chat.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,7 +19,8 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   module Utils
     
     # loadChat returns a chat object imported from a yaml file
@@ -72,7 +73,7 @@ module Watobo
         puts "!!! Malformed File #{file}"
       rescue => bang
         puts "! could not load chat from file #{file}"
-        puts cdata
+        #puts cdata
         #puts bang
         #puts bang.backtrace if $DEBUG
       end

data/lib/watobo/utils/load_icon.rb

@@ -1,7 +1,7 @@
 # .
 # load_icon.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,7 +19,8 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   module Utils
     def loadIcon(app, filename)
       begin

data/lib/watobo/utils/print_debug.rb

@@ -1,7 +1,7 @@
 # .
 # print_debug.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,7 +19,8 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   def self.print_debug(*m)
     fl = m.shift
     puts "#"

data/lib/watobo/utils/response_builder.rb

@@ -1,7 +1,7 @@
 # .
 # response_builder.rb
 # 
-# Copyright 2012 by siberas, http://www.siberas.de
+# Copyright 2013 by siberas, http://www.siberas.de
 # 
 # This file is part of WATOBO (Web Application Tool Box)
 #        http://watobo.sourceforge.com
@@ -19,7 +19,8 @@
 # along with WATOBO; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 # .
-module Watobo
+# @private 
+module Watobo#:nodoc: all
   module Utils
       def self.string2response( text, opts = {} )
         options = { :update_content_length => false }
@@ -42,12 +43,13 @@ module Watobo
 
           response = raw_header.split("\n")
           response.map!{|r| "#{r.strip}\r\n" }
-          Watobo::Response.create response
+         # Watobo::Response.create response
           unless raw_body.nil?
           response << "\r\n"
           response << raw_body unless raw_body.strip.empty?
           end
-          return response
+          #return response
+          return Watobo::Response.new(response)
 
         rescue => bang
           puts bang