knjrbfw 0.0.7 → 0.0.8

data/lib/knj/http2.rb

@@ -0,0 +1,249 @@
+class Knj::Http2
+  attr_reader :cookies
+  
+  def initialize(args)
+    @args = args
+    @cookies = {}
+    @debug = @args[:debug]
+    
+    if !@args[:port]
+      if @args[:ssl]
+        @args[:port] = 443
+      else
+        @args[:port] = 80
+      end
+    end
+    
+    if @args[:nl]
+      @nl = @args[:nl]
+    else
+      @nl = "\r\n"
+    end
+    
+    if @args[:user_agent]
+      @uagent = @args[:user_agent]
+    else
+      @uagent = "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)"
+    end
+    
+    raise "No host was given." if !@args[:host]
+    
+    @sock_plain = TCPSocket.new(@args[:host], @args[:port])
+    
+    if @args[:ssl]
+      require "openssl"
+      
+      ssl_context = OpenSSL::SSL::SSLContext.new
+      #ssl_context.verify_mode = OpenSSL::SSL::VERIFY_PEER
+      #ssl_context.ca_file = CA_FILE
+      
+      @sock_ssl = OpenSSL::SSL::SSLSocket.new(@sock_plain, ssl_context)
+      @sock_ssl.sync_close = true
+      @sock_ssl.connect
+      
+      @sock = @sock_ssl
+    else
+      @sock = @sock_plain
+    end
+  end
+  
+  def get(addr)
+    header_str = "GET /#{addr} HTTP/1.1#{@nl}"
+    header_str += self.header_str(
+      "Host" => @args[:host],
+      "Connection" => "Keep-Alive",
+      "User-Agent" => @uagent
+    )
+    header_str += "#{@nl}"
+    
+    @sock.puts(header_str)
+    return self.read_response
+  end
+  
+  def post(addr, pdata = {})
+    praw = ""
+    pdata.each do |key, val|
+      praw += "&" if praw != ""
+      praw += "#{Knj::Web.urlenc(key)}=#{Knj::Web.urlenc(val)}"
+    end
+    
+    header_str = "POST /#{addr} HTTP/1.1#{@nl}"
+    header_str += self.header_str(
+      "Host" => @args[:host],
+      "Connection" => "Keep-Alive",
+      "User-Agent" => @uagent,
+      "Content-Length" => praw.length
+    )
+    header_str += "#{@nl}"
+    header_str += praw
+    
+    @sock.puts(header_str)
+    return self.read_response
+  end
+  
+  def header_str(headers_hash)
+    if @cookies.length > 0
+      cstr = ""
+      
+      first = true
+      @cookies.each do |cookie_name, cookie_data|
+        cstr += "; " if !first
+        first = false if first
+        
+        cstr += "#{Knj::Web.urlenc(cookie_data["name"])}=#{Knj::Web.urlenc(cookie_data["value"])}"
+      end
+      
+      headers_hash["Cookie"] = cstr
+    end
+    
+    headers_str = ""
+    
+    headers_hash.each do |key, val|
+      headers_str += "#{key}: #{val}#{@nl}"
+    end
+    
+    return headers_str
+  end
+  
+  def read_response
+    @mode = "headers"
+    @resp = Knj::Http2::Response.new
+    
+    loop do
+      print "Reading next line.\n" if @debug
+      line = @sock.gets
+      break if line.to_s == ""
+      
+      if @mode == "headers" and line == @nl
+        break if @resp.header("content-length") == "0"
+        @mode = "body"
+        next
+      end
+      
+      if @mode == "headers"
+        self.parse_header(line)
+      elsif @mode == "body"
+        stat = self.parse_body(line)
+        break if stat == "break"
+        next if stat == "next"
+      end
+    end
+    
+    #Release variables.
+    resp = @resp
+    @resp = nil
+    @mode = nil
+    
+    if resp.args[:code] == "302" and resp.header?("location")
+      uri = URI.parse(resp.header("location"))
+      
+      args = {:host => uri.host}
+      args[:ssl] = true if uri.scheme == "https"
+      args[:port] = uri.port if uri.port
+      
+      if !args[:host] or args[:host] == @args[:host]
+        return self.get(resp.header("location"))
+      else
+        http = Knj::Http2.new(args)
+        return http.get(uri.path)
+      end
+    else
+      return resp
+    end
+  end
+  
+  def parse_header(line)
+    if match = line.match(/^(.+?):\s*(.+)#{@nl}$/)
+      key = match[1].to_s.downcase
+      
+      if key == "set-cookie"
+        Knj::Web.parse_set_cookies(match[2]).each do |cookie_data|
+          @cookies[cookie_data["name"]] = cookie_data
+        end
+      end
+      
+      @resp.headers[key] = [] if !@resp.headers.key?(key)
+      @resp.headers[key] << match[2]
+    elsif match = line.match(/^HTTP\/([\d\.]+)\s+(\d+)\s+(.+)$/)
+      @resp.args[:code] = match[2]
+      @resp.args[:http_version] = match[1]
+    else
+      raise "Could not understand header string: '#{line}'."
+    end
+  end
+  
+  def parse_body(line)
+    if @resp.args[:http_version] = "1.1"
+      return "break" if @resp.header("content-length") == "0"
+      
+      if @resp.header("transfer-encoding").to_s.downcase == "chunked"
+        len = line.strip.hex
+        
+        print "Content-Length: #{@resp.header("content-length")}\n" if @debug
+        print "Current body length: #{@resp.args[:body].length}\n" if @debug
+        print "Chunk length: #{len}\n" if @debug
+        
+        print "Reading chunked.\n" if @debug
+        if len > 0
+          read = @sock.read(len)
+          return "break" if read == "" or read == @nl
+          @resp.args[:body] += read
+        end
+        
+        print "Reading trailing NL.\n" if @debug
+        nl = @sock.gets
+        if len == 0
+          if nl == @nl
+            return "break"
+          else
+            raise "Dont know what to do :'-("
+          end
+        end
+        
+        #print "Test: '#{nl}'\n"
+        raise "Should have read newline but didnt: '#{nl}'." if nl != @nl
+      else
+        @resp.args[:body] += line.to_s
+        return "break" if @resp.header?("content-length") and @resp.args[:body].length >= @resp.header("content-length").to_i
+      end
+    else
+      raise "Dont know how to read HTTP version: '#{@resp.args[:http_version]}'."
+    end
+  end
+end
+
+class Knj::Http2::Response
+  attr_reader :args
+  
+  def initialize(args = {})
+    @args = args
+    @args[:headers] = {} if !@args.key?(:headers)
+    @args[:body] = "" if !@args.key?(:body)
+  end
+  
+  def headers
+    return @args[:headers]
+  end
+  
+  def header(key)
+    return false if !@args[:headers].key?(key)
+    return @args[:headers][key].first.to_s
+  end
+  
+  def header?(key)
+    return true if @args[:headers].key?(key) and @args[:headers][key].first.to_s.length > 0
+    return false
+  end
+  
+  def code
+    return @args[:code]
+  end
+  
+  def http_version
+    return @args[:http_version]
+  end
+  
+  def body
+    return @args[:body]
+  end
+end

data/lib/knj/image.rb

@@ -0,0 +1,128 @@
+class Knj::Image
+  #This function can make rounded transparent corners on an image with a given radius. Further more it can also draw borders around the entire image in a given color and take the border into account.
+  def self.rounded_corners(args)
+    raise "No or invalid ':img' given." if !args[:img]
+    raise "No or invalid ':radius' given." if args[:radius].to_i <= 0
+    
+    pic = args[:img]
+    
+    r = args[:radius].to_i
+    r_half = r / 2
+    r2 = r * r
+    d = r * 2
+    
+    center_x = r - 1
+    center_y = 1
+    
+    coords = {}
+    0.upto(r) do |x|
+      y = center_y + Math.sqrt(r2 - ((x - center_x) * (x - center_x)))
+      coords[x] = y.to_i
+    end
+    
+    if args[:border]
+      draw = Magick::Draw.new
+      draw.stroke(args[:border_color])
+      draw.stroke_width(1)
+      
+      0.upto(args[:border] - 1) do |x|
+        draw.line(x, 0, x, pic.rows)
+        draw.line(pic.columns-x-1, 0, pic.columns-x-1, pic.rows)
+        
+        draw.line(0, x, pic.columns, x)
+        draw.line(0, pic.rows-x-1, pic.columns, pic.rows-x-1)
+      end
+      
+      draw.draw(pic)
+    end
+    
+    borders = [] if args[:border]
+    
+    1.upto(4) do |count|
+      r.times do |x|
+        border_from = nil
+        border_to = nil
+        border_mode = nil
+        
+        case count
+          when 1
+            x_from = x
+            
+            y_from = 0
+            y_to = r - coords[x]
+            
+            if borders and x > 0 and x < r_half
+              border_from = y_to
+              border_to = r - coords[x - 1]
+              border_to = 1 if border_to < 1
+              
+              #top left
+              borders << {:x => x_from, :yf => border_from, :yt => border_to}
+              borders << {:y => x_from, :xf => border_from, :xt => border_to}
+              
+              #top right
+              borders << {:x => pic.columns - x - 1, :yf => border_from, :yt => border_to}
+              borders << {:y => x_from, :xf => pic.columns - border_to, :xt => pic.columns - border_from}
+              
+              #bottom left
+              borders << {:x => x_from, :yf => pic.rows - border_to, :yt => pic.rows - border_from}
+              borders << {:y => pic.rows - x - 1, :xf => border_from, :xt => border_to}
+              
+              #bottom right
+              borders << {:x => pic.columns - x - 1, :yf => pic.rows - border_to, :yt => pic.rows - border_from}
+              borders << {:y => pic.rows - x - 1, :xf => pic.columns - border_to, :xt => pic.columns - border_from}
+            end
+          when 2
+            x_from = pic.columns - r + x
+            
+            y_from = 0
+            y_to = r - coords[r - x - 1]
+          when 3
+            x_from = x
+            
+            y_from = pic.rows - r + coords[x]
+            y_to = pic.rows - y_from
+          when 4
+            x_from = pic.columns - r + x
+            
+            y_from = pic.rows - r + coords[r - x - 1]
+            y_to = pic.rows - y_from
+        end
+        
+        next if y_to <= 0
+        
+        #Make corners transparent.
+        pixels = pic.get_pixels(x_from, y_from, 1, y_to)
+        pixels.each do |pixel|
+          pixel.opacity = Magick::TransparentOpacity
+        end
+        
+        pic.store_pixels(x_from, y_from, 1, y_to, pixels)
+      end
+    end
+    
+    if borders
+      borders.each do |border|
+        if border.key?(:x)
+          count_from = border[:yf]
+          count_to = border[:yt]
+        elsif border.key?(:y)
+          count_from = border[:xf]
+          count_to = border[:xt]
+        end
+        
+        count_from.upto(count_to - 1) do |coord|
+          pixel = Magick::Pixel.from_color(args[:border_color])
+          
+          if border.key?(:x)
+            pic.pixel_color(border[:x], coord, pixel)
+          elsif border.key?(:y)
+            pic.pixel_color(coord, border[:y], pixel)
+          end
+        end
+      end
+    end
+    
+    pic.matte = true
+  end
+end

data/lib/knj/jruby-gtk2/gtk2.rb

@@ -44,7 +44,7 @@ module Gtk
 		"org.gnome.gtk.Window" => org.gnome.gtk.Window
 	}
 	def self.evalob(evalobstr)
-		if !@evalobs.has_key?(evalobstr)
+		if !@evalobs.key?(evalobstr)
 			print "Not statically written: #{evalobstr}\n"
 			@evalobs[evalobstr] = eval(evalobstr)
 		end

data/lib/knj/knj.rb

@@ -4,7 +4,7 @@ else
 	autoload_path = "#{File.dirname(__FILE__)}/autoload.rb"
 end
 
-require autoload_path
+require autoload_path if $knjautoload != false
 
 module Knj
 	def self.appserver_cli(filename)

data/lib/knj/knj_controller.rb

@@ -1,7 +1,5 @@
 #This files makes the framework able to receive calls from the Rhodes framework from RhoMobile.
 class KnjController < Rho::RhoController
-	include BrowserHelper
-
 	#GET /Server
 	def index
 		render

data/lib/knj/knjdb/drivers/mysql/knjdb_mysql.rb

@@ -12,7 +12,7 @@ class KnjDB_mysql
 		@esc_col = "`"
 		@mutex = Mutex.new
 		
-		if @knjdb.opts.has_key?(:port)
+		if @knjdb.opts.key?(:port)
 			@port = @knjdb.opts[:port].to_i
 		else
 			@port = 3306
@@ -43,7 +43,7 @@ class KnjDB_mysql
 			
 			pos_args = [:as, :async, :cast_booleans, :database_timezone, :application_timezone, :cache_rows, :connect_flags, :cast]
 			pos_args.each do |key|
-        args[key] = @knjdb.opts[key] if @knjdb.opts.has_key?(key)
+        args[key] = @knjdb.opts[key] if @knjdb.opts.key?(key)
 			end
 			
 			@conn = Mysql2::Client.new(args)
@@ -175,7 +175,7 @@ class KnjDB_mysql
 			end
 		else
 			data = self.query("SELECT LAST_INSERT_ID() AS id").fetch
-			return data[:id] if data.has_key?(:id)
+			return data[:id] if data.key?(:id)
 			raise "Could not figure out last inserted ID."
 		end
 	end

data/lib/knj/knjdb/drivers/mysql/knjdb_mysql_columns.rb

@@ -10,7 +10,7 @@ class KnjDB_mysql::Columns
 	def data_sql(data)
 		raise "No type given." if !data["type"]
 		
-		data["maxlength"] = 255 if data["type"] == "varchar" and !data.has_key?("maxlength")
+		data["maxlength"] = 255 if data["type"] == "varchar" and !data.key?("maxlength")
 		
 		sql = "`#{data["name"]}` #{data["type"]}"
 		sql += "(#{data["maxlength"]})" if data["maxlength"]
@@ -18,13 +18,13 @@ class KnjDB_mysql::Columns
 		sql += " AUTO_INCREMENT" if data["autoincr"]
 		sql += " NOT NULL" if !data["null"]
 		
-		if data.has_key?("default_func")
+		if data.key?("default_func")
 			sql += " DEFAULT #{data["default_func"]}"
-		elsif data.has_key?("default") and data["default"] != false
+		elsif data.key?("default") and data["default"] != false
 			sql += " DEFAULT '#{@db.escape(data["default"])}'"
 		end
 		
-		sql += " COMMENT '#{@db.escape(data["comment"])}'" if data.has_key?("comment")
+		sql += " COMMENT '#{@db.escape(data["comment"])}'" if data.key?("comment")
 		sql += " AFTER `#{@db.esc_col(data["after"])}`" if data["after"] and !data["first"]
 		sql += " FIRST" if data["first"]
 		
@@ -116,15 +116,15 @@ class KnjDB_mysql::Columns::Column
 		table_escape = "#{@args[:driver].escape_table}#{@args[:driver].esc_table(@args[:table].name)}#{@args[:driver].escape_table}"
 		newdata = data.clone
 		
-		newdata["name"] = self.name if !newdata.has_key?("name")
-		newdata["type"] = self.type if !newdata.has_key?("type")
-		newdata["maxlength"] = self.maxlength if !newdata.has_key?("maxlength") and self.maxlength
-		newdata["null"] = self.null? if !newdata.has_key?("null")
-		newdata["default"] = self.default if !newdata.has_key?("default")
-		newdata.delete("primarykey") if newdata.has_key?("primarykey")
+		newdata["name"] = self.name if !newdata.key?("name")
+		newdata["type"] = self.type if !newdata.key?("type")
+		newdata["maxlength"] = self.maxlength if !newdata.key?("maxlength") and self.maxlength
+		newdata["null"] = self.null? if !newdata.key?("null")
+		newdata["default"] = self.default if !newdata.key?("default")
+		newdata.delete("primarykey") if newdata.key?("primarykey")
 		
 		type_s = newdata["type"].to_s
 		@db.query("ALTER TABLE #{table_escape} CHANGE #{col_escaped} #{@db.cols.data_sql(newdata)}")
-		@args[:table].list = nil if data.has_key?("name") and data["name"] != self.name
+		@args[:table].list = nil if data.key?("name") and data["name"] != self.name
 	end
 end