nitro 0.3.0 → 0.4.1

data/lib/{n → nitro}/server/request.rb

@@ -2,16 +2,16 @@
 # * George Moschovitis  <gm@navel.gr>
 #
 # (c) 2004 Navel, all rights reserved.
-# $Id: request.rb 124 2004-11-01 12:34:17Z gmosx $
+# $Id: request.rb 155 2004-11-13 20:32:12Z gmosx $
 
 require "cgi"
 require "ftools"
 
-require "n/utils/string"
-require "n/utils/uri"
-require "n/utils/http"
-require "n/server/cookie"
-require "n/server/requestpart"
+require "nitro/utils/string"
+require "nitro/utils/uri"
+require "nitro/utils/http"
+require "nitro/server/cookie"
+require "nitro/server/requestpart"
 
 module N
 

data/lib/{n → nitro}/server/requestpart.rb

@@ -2,15 +2,15 @@
 # * George Moschovitis  <gm@navel.gr>
 #
 # (c) 2004 Navel, all rights reserved.
-# $Id: requestpart.rb 112 2004-10-27 10:59:55Z gmosx $
+# $Id: requestpart.rb 155 2004-11-13 20:32:12Z gmosx $
 
 require "cgi"
 require "ftools"
 
-require "n/utils/string"
-require "n/utils/uri"
-require "n/utils/http"
-require "n/server/cookie"
+require "nitro/utils/string"
+require "nitro/utils/uri"
+require "nitro/utils/http"
+require "nitro/server/cookie"
 
 module N
 

data/lib/{n → nitro}/server/script.rb

@@ -2,12 +2,12 @@
 # * George Moschovitis  <gm@navel.gr>
 #
 # (c) 2004 Navel, all rights reserved.
-# $Id: script.rb 112 2004-10-27 10:59:55Z gmosx $
+# $Id: script.rb 155 2004-11-13 20:32:12Z gmosx $
 
 require "fileutils"
 
-require "n/utils/cache"
-require "n/server/fragment"
+require "nitro/utils/cache"
+require "nitro/server/fragment"
 
 module N
 

data/lib/{n → nitro}/server/server.rb

@@ -2,13 +2,13 @@
 # * George Moschovitis  <gm@navel.gr>
 #
 # (c) 2004 Navel, all rights reserved.
-# $Id: server.rb 111 2004-10-27 09:30:19Z gmosx $
+# $Id: server.rb 155 2004-11-13 20:32:12Z gmosx $
 
 require "drb"
 
-require "n/application"
-require "n/server"
-require "n/app/session"
+require "nitro/application"
+require "nitro/server"
+require "nitro/app/session"
 
 module N; module App
 

data/lib/{n → nitro}/server/session.rb

@@ -2,12 +2,12 @@
 # * George Moschovitis  <gm@navel.gr>
 #
 # (c) 2002-2003 Navel, all rights reserved.
-# $Id: session.rb 124 2004-11-01 12:34:17Z gmosx $
+# $Id: session.rb 155 2004-11-13 20:32:12Z gmosx $
 
 require "md5"
 
-require "n/utils/hash"
-require "n/server/user"
+require "nitro/utils/hash"
+require "nitro/server/user"
 
 module N
 

data/lib/nitro/server/shaders.rb

@@ -0,0 +1,165 @@
+# code:
+# * George Moschovitis  <gm@navel.gr>
+#
+# (c) 2004 Navel, all rights reserved.
+# $Id: shaders.rb 152 2004-11-13 20:02:35Z gmosx $
+
+module N
+
+# = Shader
+#
+# The equivalent of a 3d engine shader. In essence it defines a
+# transformation-pipeline that tansforms the .xhtml files to actual
+# ruby code ready for evaluation (compilation) by the engine.
+#
+# Shaders are equivalend to the render-pipeline filters, ie they
+# share their folded-filter design.
+#--
+# TODO: pipeline stage mixin to be reused in filters too.
+#++
+#
+class Shader
+	# the next stage in the Shader pipeline.
+	attr :next_stage
+	
+	def initialize(next_stage = nil)
+		@next_stage = next_stage
+	end
+	
+	# Process the text and optionally update the hash.
+	# The hash is a short, unique representation of the input text,
+	# typically used as a caching key.
+	#
+	def process(hash, text)
+		process_next(hash, text)
+	end
+
+	# Set the next stage of the pipeline.
+	#
+	def << (next_stage = nil)
+		@next_stage = next_stage
+		return self
+	end
+	
+	# Process the next stage of the pipeline.
+	#
+	def process_next(hash, text)
+		if @next_stage
+			return @next_stage.process(hash, text)
+		else
+			return hash, text
+		end
+	end	
+end
+
+# = RubyShader
+#
+# Convert the xhtml script to actual Ruby code, ready to be 
+# evaluated.
+#
+class RubyShader < N::Shader
+
+	# Convert the xhtml script to actual Ruby code, ready to be 
+	# evaluated.
+	#
+	def process(hash, text)
+		# strip the xml header! (interracts with the following gsub!)
+		text.gsub!(/<\?xml.*\?>/, "")
+
+		# xform include instructions <include href="xxx" />
+		# must be transformed before the processinc instructions.
+		text.gsub!(/<include href="(.*?)"(.*)(.?)\/>/) { |match|
+			"<?r render '/#$1' ?>"
+		}
+		
+		# remove <root> elements. typically removed by xslt but lets
+		# play it safe.
+		text.gsub!(/<(\/)?root>/, '')
+				
+		# xform the processing instructions, use <?r as
+		# a marker.
+		text.gsub!(/\?>/, "\n@out << %^")
+		text.gsub!(/<\?r /, "^\n")
+		
+		# xform alternative code tags (used in xsl stylesheets)
+		#
+		text.gsub!(/<\/ruby>/, "\n@out << %^")
+		text.gsub!(/<ruby>/, "^\n")
+		
+		text =  "@out << %^" + text + "^"
+		
+		process_next(hash, text)
+	end
+
+end
+
+# = XSLTShader
+#
+# Apply an XSL transformation to the script code.
+# There is no need to keep post xsl. I can reuse the same xsl 
+# by calling transform again. 
+#
+class XSLTShader < N::Shader
+	# The name
+	attr :name
+	# The xslt filename.
+	attr :xsl_filename
+	# The xslt transformer.
+	attr :xslt
+	# Last modified time of the xslt.
+	attr :mtime
+	
+	def initialize(xsl_filename, next_stage = nil)
+		# leave this require here. only inlcude the xslt 
+		# library if the project needs it.
+		require "xml/xslt"
+
+		@name = File.basename(xsl_filename, '.*')
+		@xsl_filename = xsl_filename
+		@xslt = XML::XSLT.new
+		@next_stage = next_stage
+	end
+	
+	# Transform the given text
+	#
+	def process(hash, text)
+		parse_xsl()
+		@xslt.xml = text
+		hash += @name
+
+		process_next(hash, xslt.serve)
+	end
+	
+	private 
+	
+	# Parse the xsl.
+	#
+	def parse_xsl
+		$log.debug "Parsing xsl '#{@xsl_filename}'" if $DBG
+		@mtime = File.mtime(@xsl_filename)
+		@xslt.xsl = File.read(@xsl_filename)
+	end
+
+end
+
+# = CompressShader
+# 
+# Compress the inline xhtml. Does not touch the ruby code.
+# 
+class CompressShader < N::Shader
+	
+	# Compress the inline xhtml. Does not touch the ruby code.
+	# 
+	def process(hash, text)
+		text.gsub!(/\@out \<\< \%\^(.*?)\^/m) do |match|
+			c = $1.gsub(/^(\s*)/m, '').squeeze(" \t").tr("\n", '').tr("\t", ' ')
+			"@out << %{#{c}}"
+		end
+		
+		process_next(hash, text)
+	end
+	
+end
+
+end # module
+

data/lib/{n → nitro}/server/user.rb

@@ -2,7 +2,7 @@
 # * George Moschovitis  <gm@navel.gr>
 #
 # (c) 2004 Navel, all rights reserved.
-# $Id: user.rb 111 2004-10-27 09:30:19Z gmosx $
+# $Id: user.rb 152 2004-11-13 20:02:35Z gmosx $
 
 require "singleton"
 

data/lib/nitro/server/webrick.rb

@@ -0,0 +1,175 @@
+# code:
+# * George Moschovitis  <gm@navel.gr>
+#
+# (c) 2004 Navel, all rights reserved.
+# $Id: webrick.rb 155 2004-11-13 20:32:12Z gmosx $
+
+require "webrick"
+
+require "nitro/server/appserver"
+require "nitro/server/dispatcher"
+require "nitro/server/render"
+
+# Override WEBrick to suit our needs.
+# Did I mention that WEBrick SUCKS ?
+#
+module WEBrick
+	
+	class HTTPRequest
+	
+		# Allow external setting of cookies.
+		#
+		def cookies=(val)
+			@cookies = val
+		end
+	
+		# Allow external setting of query.
+		#
+		def set_query(query_string)
+			@query_string = query_string
+			@query = WEBrick::HTTPUtils::parse_query(query_string)
+		end
+			
+		# Return the referer to this resource. For the initial page in the
+		# clickstream there is no referer, set "/" by default.
+		#
+		def referer
+			return @header["referer"].shift || "/"
+		end
+		alias_method :referrer, :referer
+
+		# Populate an object from request parameters.
+		# This is a truly dangerous method.
+		#
+		EXCLUDED_PARAMETERS = %w{ oid name }
+		def fill(obj, name = nil)
+			# if an object is passed create an instance.
+			obj = obj.new if obj.is_a?(Class)
+			
+			@query.each do |param, val|
+				begin
+					# gmosx: DO NOT escape by default !!!
+					if not EXCLUDED_PARAMETERS.include?(param)
+						obj.send("__force_#{param}", val)
+					end
+				rescue NameError
+					next
+				end
+			end
+			
+			return obj
+		end		
+		alias_method :populate, :fill
+
+	end
+	
+end # module
+
+module N
+
+# = WebrickServer
+#
+# The Application Server. Handles dynamic requests in a web application.
+# Dont keepalive (or use a VERY SMALL keepalive). Typically this server
+# is used along with a standard http server that handles static
+# resources like images, css.
+#
+# Used temporarily unitl we build our own app server.
+#
+class WebrickServer < N::AppServer
+	include WEBrick
+
+	# the integrated webrick server.
+	attr_accessor :webrick
+	
+	def initialize(name = "WebrickServer")
+		super
+	end
+
+	# Start the application server.
+	#
+	def start
+    Socket.do_not_reverse_lookup = true # patch for OS X
+		
+		accesslog = WEBrick::BasicLog::new("/dev/null") 
+		referer = WEBrick::BasicLog::new("/dev/null")	
+
+    @webrick = WEBrick::HTTPServer.new(
+			:BindAddress => $appsrv_address, 
+			:Port => $appsrv_port, 
+			:DocumentRoot => $root_dir,
+			:AccessLog => [
+				[accesslog, AccessLog::COMMON_LOG_FORMAT],
+				[referer, AccessLog::REFERER_LOG_FORMAT]
+			]
+		)
+    
+		@webrick.mount('/', N::WebrickDispatcher)
+
+    trap("INT") { @webrick.shutdown }
+    @webrick.start
+	end
+	
+	# Stop the application server.
+	#
+	def stop
+		@webrick.stop
+	end
+	
+end
+
+# = WebrickDispatcher
+#
+class WebrickDispatcher < WEBrick::HTTPServlet::AbstractServlet
+	include N::Dispatcher
+	
+  def initialize(server)
+		# Handles static resources. Useful when running a standalone
+		# webrick server.
+    @file_handler = WEBrick::HTTPServlet::FileHandler.new(server, $root_dir, {:FancyIndexing => true })
+  end
+
+  def do_GET(request, response)
+		path = request.request_uri.path
+		
+		# rationalize cookies, WEBrick just SUCKS!!
+		tmp = {}
+		request.cookies.each { |c|
+			tmp[c.name] = c
+		}
+		request.cookies = tmp
+		
+    if path =~ /\./
+			@file_handler.do_GET(request, response)
+		else
+			process(request, response)
+		end
+  end
+
+  alias :do_POST :do_GET
+
+
+	# Create session
+	#
+	def create_session(request, response)
+		session = nil
+
+		if cookie = request.cookies[N::Session::COOKIE_NAME]
+			session = $sessions[cookie.value]
+		end	
+			
+		unless session
+			$log.debug 'Creating new session.' if $DBG
+			# no session cookie or stale session (garbage collected).
+			session_id = N::Session.calculate_id()
+			cookie = WEBrick::Cookie.new(N::Session::COOKIE_NAME, session_id)
+			response.cookies << cookie
+			session = $sessions[session_id] = N::Session.new(session_id)
+		end
+		
+		return session
+	end
+	
+end
+
+end # module

data/lib/nitro/service.rb

@@ -0,0 +1,25 @@
+# code:
+# * George Moschovitis  <gm@navel.gr>
+#
+# (c) 2004 Navel, all rights reserved.
+# $Id: service.rb 155 2004-11-13 20:32:12Z gmosx $
+
+require 'nitro/server/render'
+
+module N
+
+# = Service
+#
+# An Application Server  service.
+#
+class Service
+	include N::Render
+	
+	# The base path of the service, essentially the mount point.
+	attr :base_path
+end
+
+class Methods
+end
+
+end # module