nitro 0.1.2

data/examples/tiny/conf/config.rb

@@ -0,0 +1,67 @@
+# = Configuration
+#
+# === Design:
+#
+# Use a separate file for configuration, makes the
+# main file more readable, and allows for reconfiguring
+# (reload) the webapp without restarting the server.
+#
+# FIXME: redesign this!
+#
+# code: gmosx
+#
+# (c) 2004 Navel, all rights reserved.
+# $Id: config.rb 90 2004-10-20 12:56:43Z gmosx $
+
+require "n/std"
+require "n/properties"
+require "n/logger"
+require "n/config"
+
+$name = "Tiny"
+$root_dir = "tiny/root"
+
+# Main logger
+$log = Logger.new(STDERR, 10); 
+
+$reload_scripts = $DBG
+
+require "n/config"
+
+require "tiny/conf/requires"
+
+$srv_extension_map = {
+	"sx" => ["text/html",
+		N::App::PageHandler.new
+	],
+	"si" => ["text/html",
+		N::App::PageHandler.new
+	],
+	"rx" => ["text/html",
+		N::App::CodeHandler.new
+	]
+}
+
+$appsrv_address = "127.0.0.1"
+$appsrv_port = 9090
+$srv_url = "http://127.0.0.1:8080"
+
+module App
+
+# Config
+#
+module Config
+
+	def initialize_sitemap
+	end
+	
+	def initialize_shaders
+		$default_shader = N::NilShader.new
+	end
+
+	def initialize_events
+	end	
+
+end
+
+end # module

data/examples/tiny/conf/requires.rb

@@ -0,0 +1,40 @@
+# = Requires all needed files
+#
+# === Design:
+#
+# Collect all requires in one file includable
+# in multiple executable scripts. Moreover, it
+# makes the main script file more readable.
+#
+# === Ideas:
+#
+# - use load instead of require to make reloadable?
+#
+# code: 
+# George Moschovitis  <gm@navel.gr>
+#
+# (c) 2004 Navel, all rights reserved.
+# $Id: requires.rb 90 2004-10-20 12:56:43Z gmosx $
+
+require "n/std"
+require "n/properties"
+
+require "n/db"
+require "n/l10n"
+require "n/logger"
+require "n/parts"
+require "n/events"
+require "n/shaders"
+require "n/mixins"
+require "n/sitemap"
+
+require "n/utils/number"
+require "n/utils/string"
+require "n/utils/gfx"
+require "n/utils/html"
+require "n/utils/hash"
+require "n/utils/array"
+
+require "n/app/handlers/page-handler"
+require "n/app/handlers/code-handler"
+

data/examples/tiny/ctl

@@ -0,0 +1,31 @@
+#! /bin/sh
+
+ARGV="$@"
+
+case $ARGV in
+start)
+  /usr/sbin/httpd -d `pwd` -f conf/apache.conf
+  ruby -C.. tiny/app.rb --start # --daemon
+  ERROR=$?
+  ;;
+restart)
+  # restart appserver only!
+  export ASPID= `ps ax | grep app.rb | grep ruby | cut -d" " -f1`
+  if [ -n "$ASPID" ]; then   
+    echo $ASPID
+    kill -9 $ASPID
+  fi 
+  ruby -C.. tiny/app.rb --restart # --daemon
+  ERROR=$?
+  ;;
+stop)
+  killall -9 ruby httpd
+  ERROR=$?
+  ;;
+*)
+  echo "NOP"
+  ERROR=$?
+esac
+
+exit $ERROR
+

data/examples/tiny/logs/access_log

@@ -0,0 +1,9 @@
+127.0.0.1 - - [20/Oct/2004:16:50:12 +0300] "GET /favicon.ico HTTP/1.1" 404 209
+127.0.0.1 - - [20/Oct/2004:16:50:14 +0300] "GET /index.sx HTTP/1.1" 200 390
+127.0.0.1 - - [20/Oct/2004:16:50:14 +0300] "GET /favicon.ico HTTP/1.1" 404 209
+127.0.0.1 - - [20/Oct/2004:16:50:16 +0300] "GET /index.sx?name=dasdsa HTTP/1.1" 200 403
+127.0.0.1 - - [20/Oct/2004:16:50:17 +0300] "GET /favicon.ico HTTP/1.1" 404 209
+127.0.0.1 - - [20/Oct/2004:16:50:20 +0300] "GET /index.sx?name=dasdsa HTTP/1.1" 200 403
+127.0.0.1 - - [20/Oct/2004:16:50:20 +0300] "GET /favicon.ico HTTP/1.1" 404 209
+127.0.0.1 - - [20/Oct/2004:17:55:45 +0300] "GET / HTTP/1.1" 200 390
+127.0.0.1 - - [20/Oct/2004:17:55:45 +0300] "GET /favicon.ico HTTP/1.1" 404 209

data/examples/tiny/logs/apache.log

@@ -0,0 +1,9 @@
+[Wed Oct 20 16:50:06 2004] [warn] pid file /tmp/tiny-apache.pid overwritten -- Unclean shutdown of previous Apache run?
+[Wed Oct 20 16:50:06 2004] [notice] Apache/2.0.50 (Fedora) configured -- resuming normal operations
+[Wed Oct 20 16:50:12 2004] [error] [client 127.0.0.1] File does not exist: /navel/nitro/examples/tiny/root/favicon.ico
+[Wed Oct 20 16:50:14 2004] [error] [client 127.0.0.1] File does not exist: /navel/nitro/examples/tiny/root/favicon.ico
+[Wed Oct 20 16:50:17 2004] [error] [client 127.0.0.1] File does not exist: /navel/nitro/examples/tiny/root/favicon.ico
+[Wed Oct 20 16:50:20 2004] [error] [client 127.0.0.1] File does not exist: /navel/nitro/examples/tiny/root/favicon.ico
+[Wed Oct 20 17:55:39 2004] [warn] pid file /tmp/tiny-apache.pid overwritten -- Unclean shutdown of previous Apache run?
+[Wed Oct 20 17:55:39 2004] [notice] Apache/2.0.50 (Fedora) configured -- resuming normal operations
+[Wed Oct 20 17:55:45 2004] [error] [client 127.0.0.1] File does not exist: /navel/nitro/examples/tiny/root/favicon.ico

data/examples/tiny/root/index.sx

@@ -0,0 +1,35 @@
+<?xml version="1.0"?>
+
+<html>
+
+<?r 
+	# the code that populates the template comes here
+
+	unless name = request["name"]
+		name = "World"
+	end
+	
+	# maintain a session variable
+	
+	session = request.session 
+	session[:counter] = 0 unless session[:counter]
+	session[:counter] += 1
+?>
+
+<!-- the template comes here -->
+
+<h1>Hello #{name}</h1>
+
+<p>
+<form id="my_form" action="#{request.uri}">
+	<b>Enter your name:</b>
+	<input type="text" name="name" />
+	<br />
+	<input type="submit" />
+</form>
+</p>
+<p>
+	Counter: #{session[:counter]}
+</p>
+
+</html>

data/lib/n/app/cluster.rb

@@ -0,0 +1,219 @@
+# = Cluster
+#
+# TODO: use Sync instead of Monitor
+#
+# code:: gmosx
+#
+# (c) 2004 Navel, all rights reserved.
+# $Id: cluster.rb 74 2004-10-18 11:30:20Z gmosx $
+
+$:.unshift "nitro/lib"
+
+require "drb"
+require "monitor"
+
+require "n/application"
+require "n/server"
+require "n/utils/cache"
+require "n/app/session"
+
+module N
+
+# = Cluster
+#
+# A Cluster is a collection of servers. The cluster synchronizes the
+# servers and distributes the state. An older version used a polling
+# system, ie: the servers polled the cluster to obtain the state. This
+# version uses a push system, ie when the state is changed a delta
+# is pushed to the clients.
+#
+class Cluster < N::Application
+
+	# = CHash ClusterHash
+	#
+	class CHash < Hash
+		attr :mon
+		
+		# drbobject for this hash (local)
+		attr_accessor :ldrb
+		
+		# the cluster, use a cluster to implement a set
+		# (one server per drb_uri)
+		attr_accessor :cluster
+		
+		#
+		#
+		def initialize(ldrb_uri = "druby://:8000")
+			@mon = Monitor.new
+			@ldrb = DRb.start_service(ldrb_uri, self)
+			@cluster = {}
+		end
+
+		#  
+		#		
+		def join(sdrb_uri)
+			@mon.synchronize {
+				cluster[sdrb_uri] = DRbObject.new(nil, sdrb_uri)
+			}
+		end
+		
+		alias_method :old_set, :[]=
+
+		# Not really usefull
+		#		
+		def []=(key, value)
+			# store the value (useful on server restarts)
+			@mon.synchronize {
+				old_set(key, value)
+
+				puts "CLUSTER #{key} = #{value}"
+		
+				cluster.each { |uri, sdrb|
+					begin
+						sdrb.server_sync(key, value)
+					rescue => ex
+						$log.error "Server at #{uri} is down, removing from cluster"
+						cluster.delete(uri)
+					end
+				}
+			}
+		end
+		
+		# Use this, avoids syncing the original server, and avoids a 
+		# nasty deadlock.
+		#
+		def cluster_sync(key, value, server_uri)
+			# store the value (useful on server restarts)
+			@mon.synchronize {
+				old_set(key, value)
+
+				puts "CLUSTER #{key} = #{value}"
+		
+				cluster.each { |uri, sdrb|
+					begin
+						sdrb.server_sync(key, value) unless uri == server_uri
+					rescue => ex
+						$log.error "Server at #{uri} is down, removing from cluster"
+						cluster.delete(uri)
+					end
+				}
+			}		
+		end
+		
+		def [](key)
+			@mon.synchronize {
+				puts "LOOKUP #{key}"
+				return super
+			}
+		end
+		
+	end
+	
+	# = SHash ServerHash
+	#
+	class SHash < Hash
+		attr :mon
+	
+		# drbobject for this hash (local)
+		attr_accessor :ldrb
+	
+		# drb for the cluster hash
+		attr_accessor :cdrb
+		
+		# ldrb = local drb uri
+		# cdrb = cluster drb uri
+		#
+		def initialize(ldrb_uri = "druby://:9000", cdrb_uri = "druby://:8000")
+			@mon = Monitor.new
+			@ldrb_uri = ldrb_uri
+			@ldrb = DRb.start_service(ldrb_uri, self)
+			@cdrb = DRbObject.new(nil, cdrb_uri)
+			@cdrb.join(ldrb_uri)
+		end
+		
+		alias_method :old_set, :[]=
+		
+		#
+		#
+		def []=(key, value)
+			# store the value in the local hash
+			@mon.synchronize {
+				puts "LOCAL #{key} = #{value}"
+				old_set(key, value)
+				@cdrb.cluster_sync(key, value, @ldrb_uri)
+			}
+		end
+		
+		# If the key is not found in the local hash, try the 
+		# cluster hash.
+		#
+		def [](key)
+			@mon.synchronize {
+				unless value = super
+					value = @cdrb[key]
+					old_set(key, value)
+				end
+				return value
+			}
+		end
+		
+		# Called by the cluster
+		#
+		def server_sync(key, value)
+			puts "SYNC #{key} = #{value}"
+			@mon.synchronize {
+				old_set(key, value)
+			}
+		end
+			
+	end
+
+	# = Clm Cluster Last Modified Hash
+	#
+	class Clm < CHash
+		def [](key)
+			@mon.synchronize {
+				unless value = super
+					puts "INIT #{key}"
+					value = Time.now.to_i
+					old_set(key, value)
+				end
+				return value
+			}
+		end
+	end
+	
+	# = Slm Server Last Modified Hash
+	#
+	class Slm < SHash
+		def set!(key, lm = nil)
+			lm = Time.now.to_i unless lm
+			self[key] = lm
+			return lm
+		end
+	end
+	
+	def initialize(name = "Cluster")
+		super
+	end
+	
+	def run
+		N::Cluster::Clm.new
+		DRb.start_service("druby://:8001", N::App::SessionManager.new)
+	
+		while true
+			sleep(5000)
+		end
+		
+		super
+	end
+	
+end
+
+end # module
+
+if $0 == __FILE__
+	require "logger"; $log = Logger.new(STDERR)
+	
+	N::Cluster.new.exec()
+end

data/lib/n/app/cookie.rb

@@ -0,0 +1,86 @@
+# = Http Cookie
+#
+# code:: gmosx
+#
+# (c) 2004 Navel, all rights reserved.
+# $Id: cookie.rb 71 2004-10-18 10:50:22Z gmosx $
+
+require "cgi"
+
+class CGI
+
+# Override the default class.
+
+class Cookie
+
+=begin
+	# Override default implementation to convert a single value
+	# array to a simple value.
+
+	def value
+		val = @value
+
+		if 1 == val.size
+			return val.first
+		else
+			return val
+		end
+	end
+=end
+
+end
+
+end # class CGI
+
+module N; module App
+
+# Cookie
+#
+# === Design:
+#
+# Ruby's default cgi library implements the functionality,
+# so we reuse it here!
+#
+# The http request contains only key/values pairs so we
+# dont keep a full object.
+#
+# === Todo:
+#
+# - switch to libapreq!
+#
+class Cookie < CGI::Cookie
+
+	# Override default implementation
+
+	def initialize(name, *value)
+		super
+
+		# this is a temporal fix! We should switch to libapreq,
+		# or a custom implementation anyway, because cgi.rb
+		# sucks.
+		@path = "/"
+	end
+
+	# parse:
+	# parses cookies from a header string
+	#
+	# Example cookie string, all cookies in one line separated by ;
+	#
+	# Cookie: nsid=293230807; nauth=gmosx:meMXs0ifW7JBQ; multi=123&456
+	#
+	# Input:
+	# the header string
+	# Output:
+	# a hash object containing key-values pairs. notice that multiple
+	# values can be assigned to one key, so values is an array. The
+	# separator for mulriple values is '&'
+	#
+	# uses the default CGI implementation
+	#
+	# === Todo:
+	#
+	# - change this to return an array of Cookie objects!
+
+end
+
+end; end # module