diff -uNr sajax-0.8/Changes.txt sajax-0.9/Changes.txt
--- sajax-0.8/Changes.txt	Wed Mar  9 16:58:31 2005
+++ sajax-0.9/Changes.txt	Tue Mar 15 01:09:54 2005
@@ -1,6 +1,20 @@
 SAJAX CHANGELOG
 ---------------
 
+Sajax version 0.9 (March 15, 2005)
+
+* [php] Major changes to the PHP backend: 
+* [php] Renamed incl_sajax.php to Sajax.php to fit PEAR and other language
+		naming conventions
+* [php] Functions and vars previously named rs_* are now sajax_*
+* [php] Function stubs all call one generalized sajax_do_call() dispatcher
+* [php] Added non-echoing version of sajax_echo_javascript() called
+		sajax_get_javascript via the magic of output buffering
+* [php] Changed all examples to support new framework
+* [perl] Applied fix for URL encoding of space (Thanks Max Maischein)
+* [ruby] Added Ruby backend contributed by anonymous author
+* [io] Added Io (http://www.iolanguage.com/) backend by Sajax team @ MM
+
 Sajax version 0.8 (March 9, 2005)
 
 * [php] Bug in the long-open-tags changes. Thanks to Matthew M. Vince.
diff -uNr sajax-0.8/io/Sajax.io sajax-0.9/io/Sajax.io
--- sajax-0.8/io/Sajax.io	Wed Dec 31 19:00:00 1969
+++ sajax-0.9/io/Sajax.io	Fri Mar 11 20:01:29 2005
@@ -0,0 +1,203 @@
+//
+// Sajax Io Backend
+// (C) Copyright 2005 ModernMethod, Inc.
+// Released under BSD license
+//
+
+String interpolate := method(
+	work := self clone
+	last_idx := 0
+	while (1,
+		idx := work find("<?io", last_idx)
+		if (idx == Nil,
+			// no more interps.. 
+			break)
+		idx := idx + 3
+		end_idx := work find("?>", idx + 1)
+		if (end_idx == Nil,
+			// invalid interp expression.. we're done. 
+			break)
+		
+ 		// in the case of an empty interpolated expression, 
+ 		// lets move on
+		if (end_idx - idx == 1,
+			continue)
+				
+		// otherwise proceed with replacement. 
+		slotName := work substring(idx+1, end_idx)
+		find_str := "<?io" .. slotName .. "?>"
+		// write("doString(" .. slotName .. ")")
+		replace_str := sender doString(slotName)
+		work := work replace(find_str, replace_str)
+		last_idx = end_idx + 1
+	)
+	return work
+)
+
+Sajax := Object clone do (
+
+	debug_mode := 0
+	export_list := List clone
+	js_has_been_shown := Nil
+	
+	init := method(
+		return self
+	)
+	
+	handle_client_request := method(
+	
+		if (my_getenv("QUERY_STRING") == Nil,
+			return
+		)
+		
+		form := CGI clone parse
+		if (form hasKey("rs") == Nil,
+			return
+		)
+
+		write("Content-type: text/html\n");
+		write("Expires: Mon, 26 Jul 1997 05:00:00 GMT\n");   
+		write("Cache-Control: no-cache, must-revalidate\n");
+		write("Pragma: no-cache\n\n");
+		
+		func_name := form at("rs")	
+		if (export_list contains(func_name) == Nil) then (
+			write("-:$func_name not callable\n")
+		) else (
+			write("+:")
+			args := form at("rsargs[]")
+			result := sender performWithArgList(func_name, args)
+			write(result)
+		)
+		exit;
+	}
+	
+	show_common_js := method(
+		
+		if (debug_mode == 1,
+			debugModeTrueFalse := "true",
+			debugModeTrueFalse := "false")
+		
+		html := """
+
+		// remote scripting library
+		// (c) copyright 2005 modernmethod, inc
+		var rs_debug_mode = <?io debugModeTrueFalse ?>;
+		
+		function rs_debug(text) {
+			if (rs_debug_mode)
+				alert("RSD: " + text)
+		}
+ 		function rs_init_object() {
+ 			rs_debug("rs_init_object() called..")
+ 			
+ 			var A;
+			try {
+				A=new ActiveXObject("Msxml2.XMLHTTP");
+			} catch (e) {
+				try {
+					A=new ActiveXObject("Microsoft.XMLHTTP");
+				} catch (oc) {
+					A=null;
+				}
+			}
+			if(!A && typeof XMLHttpRequest != "undefined")
+				A = new XMLHttpRequest();
+			if (!A)
+				rs_debug("Could not create connection object.");
+			return A;
+		}
+		
+		"""
+		write(html interpolate)
+	}
+	
+	esc := method(val,
+		return val replace("\"", "\\\\\"");
+	)
+	
+	my_getenv := method(val,
+		my_get := Nil
+		if (?System) then (
+			my_get := System getSlot("getenv")
+		) else (
+			my_get := Object getSlot("getenv")
+		)
+		return my_get(val)
+	)
+	
+	get_my_uri := method(
+		uri := "http://www.example.com/"
+		if (my_getenv("REQUEST_URI") != Nil) then (
+			uri := my_getenv("REQUEST_URI")
+		) else (
+			if (my_getenv("SCRIPT_NAME") != Nil) then (
+				uri := my_getenv("SCRIPT_NAME")
+				if (my_getenv("QUERY_STRING") != Nil) then (
+					uri := uri .. "?" .. my_getenv("QUERY_STRING")
+				)
+			)
+		)
+		return uri
+	)
+
+	show_one := method(func_name,
+		uri := get_my_uri
+		func_name_encoded := CGI encodeUrlParam(func_name)
+		if (uri contains("?") == Nil) then (
+        	uri = uri .. "?rs=" .. func_name_encoded
+        ) else (
+			uri = uri .. "&rs=" .. func_name_encoded
+		)
+			
+		html := """
+		// wrapper for <?io func_name ?>
+		
+		function x_<?io func_name ?>() {
+			// count args; build URL
+			var i, x, n;
+			var url = "<?io esc(uri) ?>";
+			var a = x_<?io func_name ?>.arguments;
+			for (i = 0; i < a.length-1; i++) 
+				url = url + "&rsargs[]=" + escape(a[i]);
+			url = url + "&rsrnd=" + new Date().getTime();
+			x = rs_init_object();
+			x.open("GET", url, true);
+			x.onreadystatechange = function() {
+				if (x.readyState != 4) 
+					return;
+				rs_debug("received " + x.responseText);
+				
+				var status;
+				var data;
+				status = x.responseText.charAt(0);
+				data = x.responseText.substring(2);
+				if (status == "-") 
+					alert("Error: " + callback_n);
+				else  
+					a[a.length-1](data);
+			}
+			x.send(null);
+			rs_debug("x_<?io func_name ?> url = " + url);
+			rs_debug("x_<?io func_name ?> waiting..");
+			delete x;
+		}
+		"""
+		write(html interpolate)
+	)
+
+	export := method(func,
+		export_list add(func)
+	}
+	
+	show_javascript := method(
+		if (js_has_been_shown == Nil,
+			show_common_js
+		)
+		export_list foreach(index, func_name,
+			show_one(func_name)
+		)
+	)
+	
+)
+
diff -uNr sajax-0.8/io/example_multiply.io sajax-0.9/io/example_multiply.io
--- sajax-0.8/io/example_multiply.io	Wed Dec 31 19:00:00 1969
+++ sajax-0.9/io/example_multiply.io	Fri Mar 11 20:03:13 2005
@@ -0,0 +1,53 @@
+#!/usr/bin/env ioServer
+
+c := CGI clone
+
+multiply := method(x, y,
+	x := x asNumber
+	y := y asNumber
+	return x * y
+)
+
+s := Sajax clone
+s debug_mode := 1
+s init
+s export("multiply")
+s handle_client_request
+
+write("Content-type: text/html\n\n")
+
+html := """
+<html>
+<head>
+	<title>Multiplier</title>
+	<script>"""
+write(html)
+s show_javascript
+html := """
+	function do_multiply_cb(z) {
+		document.getElementById("z").value = z;
+	}
+	
+	function do_multiply() {
+		// get the folder name
+		var x, y;
+		
+		x = document.getElementById("x").value;
+		y = document.getElementById("y").value;
+		x_multiply(x, y, do_multiply_cb);
+	}
+	</script>
+	
+</head>
+<body>
+	<input type="text" name="x" id="x" value="2" size="3">
+	*
+	<input type="text" name="y" id="y" value="3" size="3">
+	=
+	<input type="text" name="z" id="z" value="" size="3">
+	<input type="button" name="check" value="Calculate"
+		onclick="do_multiply(); return false;">
+</body>
+</html>
+"""
+write(html)
diff -uNr sajax-0.8/perl/Sajax.pm sajax-0.9/perl/Sajax.pm
--- sajax-0.8/perl/Sajax.pm	Wed Mar  9 16:54:26 2005
+++ sajax-0.9/perl/Sajax.pm	Tue Mar 15 01:06:37 2005
@@ -1,183 +1,184 @@
-package Sajax;
-use Data::Dumper;
-
-my $rs_debug_mode = 0;
-my $rs_js_has_been_shown = 0;
-my %rs_export_list = ();
-my %rs_coderef_list = ();
-
-sub incl_sajax {
-}
-sub rs_init {
-    $rs_debug_mode = 0;
-    $rs_js_has_been_shown = 0;
-    %rs_export_list = ();
-    %rs_coderef_list = ();
-
-}
-	
-sub rs_handle_client_request {
-    my($q)=@_;
-    my $rv="";
-    
-    if (!defined $q->param("rs")) {
-	return undef;
-    }
-    
-    my $func_name = $q->param("rs");
-
-    if ( defined $rs_export_list{$func_name}) {
-	$rv .= "+:";
-	eval {
-	    $rv .= &$func_name($q->param("rsargs"));
-	};
-	if($@) {
-	    print STDERR "Err:[$@]\n";
-	}
-    } elsif ( defined $rs_coderef_list{$func_name}) {
-	$rv .= "+:";
-	my $cr = $rs_coderef_list{$func_name};
-	eval {
-	    $rv .= &$cr($q->param("rsargs"));
-	};
-	if($@) {
-	    print STDERR "Err:[$@]\n";
-	}
-    } else {
-	$rv .= "-:$func_name not callable";
-    }
-    
-    return $rv;
-}
-	
-sub rs_show_common_js() {
-    my $rv = "";
-    my $debug_mode = $rs_debug_mode ? "true" : "false";
-    my $CC = "\n// Perl backend version (c) copyright 2005 Nathan Schmidt";
-    $CC = "";
-    $rv .= <<EOT;
-// remote scripting library
-// (c) copyright 2005 modernmethod, inc$CC
-var rs_debug_mode = $debug_mode;
-var rs_obj = false;
-var rs_callback = false;
-
-function rs_debug(text) {
-	if (rs_debug_mode)
-		alert("RSD: " + text)
-}
-function rs_init_object() {
-	rs_debug("rs_init_object() called..")
-	
-	var A;
-	try {
-		A=new ActiveXObject("Msxml2.XMLHTTP");
-	} catch (e) {
-		try {
-			A=new ActiveXObject("Microsoft.XMLHTTP");
-		} catch (oc) {
-			A=null;
-		}
-	}
-	if(!A && typeof XMLHttpRequest != "undefined")
-		A = new XMLHttpRequest();
-	if (!A)
-		rs_debug("Could not create connection object.");
-	return A;
-}
-EOT
-    return $rv;
-}	
-
-
-#javascript escape a value
-sub rs_esc {
-    my ($val)=@_;
-    $val =~ s/\"/\\\\\"/;
-    return $val;
-}	
-
-sub rs_urlencode {
-    my($enc) = @_;
-    $enc =~ s/^\s+|\s+$//gs;
-    $enc =~ s/([^a-zA-Z0-9_\-.])/uc sprintf("%%%02x",ord($1))/eg;
-    $enc =~ s/ /\+/g;
-    $enc =~ s/%20/\+/g;
-    return $enc;
-}    
-
-sub rs_show_one {
-    my($q,$func_name)=@_;
-    my $rv = "";
-    my $uri = $q->url(-query=>1);
-    if ($uri =~ m/\?/) {
-	$uri .= "&rs=".rs_urlencode($func_name);
-    } else {
-	$uri .= "?rs=".rs_urlencode($func_name);
-    }
-
-    my $urie = rs_esc($uri);
-
-    $rv .= <<EOT;	
-
-    // wrapper for $func_name
-    function x_$func_name() {
-	// count args; build URL
-	var i, x, n;
-	var url = "$urie", a = x_$func_name.arguments;
-	for (i = 0; i < a.length-1; i++) 
-	    url = url + "&rsargs=" + escape(a[i]);
-	x = rs_init_object();
-	x.open("GET", url, true);
-	x.onreadystatechange = function() {
-	    if (x.readyState != 4) 
-		return;
-	    rs_debug("received " + x.responseText);
-	    
-	    var status;
-	    var data;
-	    status = x.responseText.charAt(0);
-	    data = x.responseText.substring(2);
-	    if (status == "-") 
-		alert("Error: " + callback_n);
-	    else  
-		a[a.length-1](data);
-	}
-	x.send(null);
-	rs_debug("x_$func_name url = " + url);
-	rs_debug("x_$func_name waiting..");
-    }
-
-
-EOT
-    return $rv;
-}
-
-sub rs_register {
-    my($fn,$coderef)=@_;
-    $rs_coderef_list{$fn} = $coderef;
-}	
-sub rs_export {
-    map {$rs_export_list{$_}=$_} @_;
-    return;
-}	
-
-sub rs_show_javascript {
-    my ($q) = @_;
-    my $rv = "";
-    if (! $rs_js_has_been_shown) {
-	$rv .= rs_show_common_js();
-	$rs_js_has_been_shown = 1;
-    }
-
-    foreach my $func (keys %rs_export_list) {
-	$rv .= rs_show_one($q,$func);
-    }
-    foreach my $func (keys %rs_coderef_list) {
-	$rv .= rs_show_one($q,$func);
-    }
-
-    return $rv;
-}
-
-1;
+package Sajax;
+use Data::Dumper;
+
+my $rs_debug_mode = 0;
+my $rs_js_has_been_shown = 0;
+my %rs_export_list = ();
+my %rs_coderef_list = ();
+
+sub incl_sajax {
+}
+sub rs_init {
+    $rs_debug_mode = 0;
+    $rs_js_has_been_shown = 0;
+    %rs_export_list = ();
+    %rs_coderef_list = ();
+
+}
+	
+sub rs_handle_client_request {
+    my($q)=@_;
+    my $rv="";
+    
+    if (!defined $q->param("rs")) {
+	return undef;
+    }
+    
+    my $func_name = $q->param("rs");
+
+    if ( defined $rs_export_list{$func_name}) {
+	$rv .= "+:";
+	eval {
+	    $rv .= &$func_name($q->param("rsargs"));
+	};
+	if($@) {
+	    print STDERR "Err:[$@]\n";
+	}
+    } elsif ( defined $rs_coderef_list{$func_name}) {
+	$rv .= "+:";
+	my $cr = $rs_coderef_list{$func_name};
+	eval {
+	    $rv .= &$cr($q->param("rsargs"));
+	};
+	if($@) {
+	    print STDERR "Err:[$@]\n";
+	}
+    } else {
+	$rv .= "-:$func_name not callable";
+    }
+    
+    return $rv;
+}
+	
+sub rs_show_common_js() {
+    my $rv = "";
+    my $debug_mode = $rs_debug_mode ? "true" : "false";
+    my $CC = "\n// Perl backend version (c) copyright 2005 Nathan Schmidt";
+    $CC = "";
+    $rv .= <<EOT;
+// remote scripting library
+// (c) copyright 2005 modernmethod, inc$CC
+var rs_debug_mode = $debug_mode;
+var rs_obj = false;
+var rs_callback = false;
+
+function rs_debug(text) {
+	if (rs_debug_mode)
+		alert("RSD: " + text)
+}
+function rs_init_object() {
+	rs_debug("rs_init_object() called..")
+	
+	var A;
+	try {
+		A=new ActiveXObject("Msxml2.XMLHTTP");
+	} catch (e) {
+		try {
+			A=new ActiveXObject("Microsoft.XMLHTTP");
+		} catch (oc) {
+			A=null;
+		}
+	}
+	if(!A && typeof XMLHttpRequest != "undefined")
+		A = new XMLHttpRequest();
+	if (!A)
+		rs_debug("Could not create connection object.");
+	return A;
+}
+EOT
+    return $rv;
+}	
+
+
+#javascript escape a value
+sub rs_esc {
+    my ($val)=@_;
+    $val =~ s/\"/\\\\\"/;
+    return $val;
+}	
+
+sub rs_urlencode {
+    my($enc) = @_;
+    $enc =~ s/^\s+|\s+$//gs;
+    $enc =~ s/([^a-zA-Z0-9_\-.])/uc sprintf("%%%02x",ord($1))/eg;
+    $enc =~ s/ /\+/g;
+    $enc =~ s/%20/\+/g;
+    return $enc;
+}    
+
+sub rs_show_one {
+    my($q,$func_name)=@_;
+    my $rv = "";
+    my $uri = $q->url(-query=>1);
+    if ($uri =~ m/\?/) {
+	$uri .= "&rs=".rs_urlencode($func_name);
+    } else {
+	$uri .= "?rs=".rs_urlencode($func_name);
+    }
+
+    my $urie = rs_esc($uri);
+
+    $rv .= <<EOT;	
+
+    // wrapper for $func_name
+    function x_$func_name() {
+	// count args; build URL
+	var i, x, n;
+	var url = "$urie", a = x_$func_name.arguments;
+	for (i = 0; i < a.length-1; i++) 
+	    url = url + "&rsargs=" + escape(a[i]);
+	url = url.replace( /[+]/g, '%2B'); // fix the unescaped plus signs 
+	x = rs_init_object();
+	x.open("GET", url, true);
+	x.onreadystatechange = function() {
+	    if (x.readyState != 4) 
+		return;
+	    rs_debug("received " + x.responseText);
+	    
+	    var status;
+	    var data;
+	    status = x.responseText.charAt(0);
+	    data = x.responseText.substring(2);
+	    if (status == "-") 
+		alert("Error: " + callback_n);
+	    else  
+		a[a.length-1](data);
+	}
+	x.send(null);
+	rs_debug("x_$func_name url = " + url);
+	rs_debug("x_$func_name waiting..");
+    }
+
+
+EOT
+    return $rv;
+}
+
+sub rs_register {
+    my($fn,$coderef)=@_;
+    $rs_coderef_list{$fn} = $coderef;
+}	
+sub rs_export {
+    map {$rs_export_list{$_}=$_} @_;
+    return;
+}	
+
+sub rs_show_javascript {
+    my ($q) = @_;
+    my $rv = "";
+    if (! $rs_js_has_been_shown) {
+	$rv .= rs_show_common_js();
+	$rs_js_has_been_shown = 1;
+    }
+
+    foreach my $func (keys %rs_export_list) {
+	$rv .= rs_show_one($q,$func);
+    }
+    foreach my $func (keys %rs_coderef_list) {
+	$rv .= rs_show_one($q,$func);
+    }
+
+    return $rv;
+}
+
+1;
diff -uNr sajax-0.8/php/Sajax.php sajax-0.9/php/Sajax.php
--- sajax-0.8/php/Sajax.php	Wed Dec 31 19:00:00 1969
+++ sajax-0.9/php/Sajax.php	Tue Mar 15 01:03:43 2005
@@ -0,0 +1,178 @@
+<?php	
+if (!isset($SAJAX_INCLUDED)) {
+
+	$sajax_debug_mode = 0;
+	$sajax_export_list = array();
+	
+	function sajax_init() {
+	}
+	
+	function sajax_handle_client_request() {
+		global $sajax_export_list;
+		
+		if (empty($_GET["rs"])) 
+			return;
+
+		// Bust cache in the head
+		header ("Expires: Mon, 26 Jul 1997 05:00:00 GMT");    // Date in the past
+		header ("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
+		// always modified
+		header ("Cache-Control: no-cache, must-revalidate");  // HTTP/1.1
+		header ("Pragma: no-cache");                          // HTTP/1.0
+			
+		$func_name = $_GET["rs"];
+		if (! in_array($func_name, $sajax_export_list))
+			echo "-:$func_name not callable";
+		else {
+			echo "+:";
+			if (empty($_GET["rsargs"])) 
+				$result = call_user_func($_GET["rs"]);
+			else
+				$result = call_user_func_array($_GET["rs"], $_GET["rsargs"]);
+			echo $result;
+		}
+		exit;
+	}
+	
+	function sajax_get_common_js() {
+		global $sajax_debug_mode;
+		
+		ob_start();
+		?>
+		
+		// remote scripting library
+		// (c) copyright 2005 modernmethod, inc
+		var sajax_debug_mode = <?php echo $sajax_debug_mode ? "true" : "false"; ?>;
+		
+		function sajax_debug(text) {
+			if (sajax_debug_mode)
+				alert("RSD: " + text)
+		}
+ 		function sajax_init_object() {
+ 			sajax_debug("sajax_init_object() called..")
+ 			
+ 			var A;
+			try {
+				A=new ActiveXObject("Msxml2.XMLHTTP");
+			} catch (e) {
+				try {
+					A=new ActiveXObject("Microsoft.XMLHTTP");
+				} catch (oc) {
+					A=null;
+				}
+			}
+			if(!A && typeof XMLHttpRequest != "undefined")
+				A = new XMLHttpRequest();
+			if (!A)
+				sajax_debug("Could not create connection object.");
+			return A;
+		}
+		function sajax_do_call(func_name, url, args) {
+			var i, x, n;
+			for (i = 0; i < args.length-1; i++) 
+				url = url + "&rsargs[]=" + escape(args[i]);
+			url = url + "&rsrnd=" + new Date().getTime();
+			x = sajax_init_object();
+			x.open("GET", url, true);
+			x.onreadystatechange = function() {
+				if (x.readyState != 4) 
+					return;
+				sajax_debug("received " + x.responseText);
+				
+				var status;
+				var data;
+				status = x.responseText.charAt(0);
+				data = x.responseText.substring(2);
+				if (status == "-") 
+					alert("Error: " + data);
+				else  
+					args[args.length-1](data);
+			}
+			x.send(null);
+			sajax_debug(func_name + " url = " + url);
+			sajax_debug(func_name + " waiting..");
+			delete x;
+		}
+		
+		<?php
+		$html = ob_get_contents();
+		ob_end_clean();
+		return $html;
+	}
+	
+	function sajax_show_common_js() {
+		echo sajax_get_common_js();
+	}
+	
+	// javascript escape a value
+	function sajax_esc($val)
+	{
+		return str_replace('"', '\\\\"', $val);
+	}
+
+	function sajax_get_one_stub($func_name) {
+		global $REQUEST_URI;
+		
+		$uri = $REQUEST_URI;
+		if (strpos($uri,"?") === false) 
+			$uri .= "?rs=".urlencode($func_name);
+		else
+			$uri .= "&rs=".urlencode($func_name);
+		
+		ob_start();	
+		?>
+		
+		// wrapper for <?php echo $func_name; ?>
+		
+		function x_<?php echo $func_name; ?>() {
+			// count args; build URL
+			
+			sajax_do_call("<?php echo $func_name; ?>",
+				"<?php echo sajax_esc($uri); ?>",
+				x_<?php echo $func_name; ?>.arguments);
+		}
+		
+		<?php
+		$html = ob_get_contents();
+		ob_end_clean();
+		return $html;
+	}
+	
+	function sajax_show_one_stub($func_name) {
+		echo sajax_get_one_stub($func_name);
+	}
+	
+	function sajax_export() {
+		global $sajax_export_list;
+		
+		$n = func_num_args();
+		for ($i = 0; $i < $n; $i++) {
+			$sajax_export_list[] = func_get_arg($i);
+		}
+	}
+	
+	$sajax_js_has_been_shown = 0;
+	function sajax_get_javascript()
+	{
+		global $sajax_js_has_been_shown;
+		global $sajax_export_list;
+		
+		$html = "";
+		if (! $sajax_js_has_been_shown) {
+			$html .= sajax_get_common_js();
+			$sajax_js_has_been_shown = 1;
+		}
+		foreach ($sajax_export_list as $func) {
+			$html .= sajax_get_one_stub($func);
+		}
+		return $html;
+	}
+	
+	function sajax_show_javascript()
+	{
+		echo sajax_get_javascript();
+	}
+	
+	$SAJAX_INCLUDED = 1;
+}
+?>
diff -uNr sajax-0.8/php/Sajax.php.txt sajax-0.9/php/Sajax.php.txt
--- sajax-0.8/php/Sajax.php.txt	Wed Dec 31 19:00:00 1969
+++ sajax-0.9/php/Sajax.php.txt	Tue Mar 15 01:03:43 2005
@@ -0,0 +1,178 @@
+<?php	
+if (!isset($SAJAX_INCLUDED)) {
+
+	$sajax_debug_mode = 0;
+	$sajax_export_list = array();
+	
+	function sajax_init() {
+	}
+	
+	function sajax_handle_client_request() {
+		global $sajax_export_list;
+		
+		if (empty($_GET["rs"])) 
+			return;
+
+		// Bust cache in the head
+		header ("Expires: Mon, 26 Jul 1997 05:00:00 GMT");    // Date in the past
+		header ("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
+		// always modified
+		header ("Cache-Control: no-cache, must-revalidate");  // HTTP/1.1
+		header ("Pragma: no-cache");                          // HTTP/1.0
+			
+		$func_name = $_GET["rs"];
+		if (! in_array($func_name, $sajax_export_list))
+			echo "-:$func_name not callable";
+		else {
+			echo "+:";
+			if (empty($_GET["rsargs"])) 
+				$result = call_user_func($_GET["rs"]);
+			else
+				$result = call_user_func_array($_GET["rs"], $_GET["rsargs"]);
+			echo $result;
+		}
+		exit;
+	}
+	
+	function sajax_get_common_js() {
+		global $sajax_debug_mode;
+		
+		ob_start();
+		?>
+		
+		// remote scripting library
+		// (c) copyright 2005 modernmethod, inc
+		var sajax_debug_mode = <?php echo $sajax_debug_mode ? "true" : "false"; ?>;
+		
+		function sajax_debug(text) {
+			if (sajax_debug_mode)
+				alert("RSD: " + text)
+		}
+ 		function sajax_init_object() {
+ 			sajax_debug("sajax_init_object() called..")
+ 			
+ 			var A;
+			try {
+				A=new ActiveXObject("Msxml2.XMLHTTP");
+			} catch (e) {
+				try {
+					A=new ActiveXObject("Microsoft.XMLHTTP");
+				} catch (oc) {
+					A=null;
+				}
+			}
+			if(!A && typeof XMLHttpRequest != "undefined")
+				A = new XMLHttpRequest();
+			if (!A)
+				sajax_debug("Could not create connection object.");
+			return A;
+		}
+		function sajax_do_call(func_name, url, args) {
+			var i, x, n;
+			for (i = 0; i < args.length-1; i++) 
+				url = url + "&rsargs[]=" + escape(args[i]);
+			url = url + "&rsrnd=" + new Date().getTime();
+			x = sajax_init_object();
+			x.open("GET", url, true);
+			x.onreadystatechange = function() {
+				if (x.readyState != 4) 
+					return;
+				sajax_debug("received " + x.responseText);
+				
+				var status;
+				var data;
+				status = x.responseText.charAt(0);
+				data = x.responseText.substring(2);
+				if (status == "-") 
+					alert("Error: " + data);
+				else  
+					args[args.length-1](data);
+			}
+			x.send(null);
+			sajax_debug(func_name + " url = " + url);
+			sajax_debug(func_name + " waiting..");
+			delete x;
+		}
+		
+		<?php
+		$html = ob_get_contents();
+		ob_end_clean();
+		return $html;
+	}
+	
+	function sajax_show_common_js() {
+		echo sajax_get_common_js();
+	}
+	
+	// javascript escape a value
+	function sajax_esc($val)
+	{
+		return str_replace('"', '\\\\"', $val);
+	}
+
+	function sajax_get_one_stub($func_name) {
+		global $REQUEST_URI;
+		
+		$uri = $REQUEST_URI;
+		if (strpos($uri,"?") === false) 
+			$uri .= "?rs=".urlencode($func_name);
+		else
+			$uri .= "&rs=".urlencode($func_name);
+		
+		ob_start();	
+		?>
+		
+		// wrapper for <?php echo $func_name; ?>
+		
+		function x_<?php echo $func_name; ?>() {
+			// count args; build URL
+			
+			sajax_do_call("<?php echo $func_name; ?>",
+				"<?php echo sajax_esc($uri); ?>",
+				x_<?php echo $func_name; ?>.arguments);
+		}
+		
+		<?php
+		$html = ob_get_contents();
+		ob_end_clean();
+		return $html;
+	}
+	
+	function sajax_show_one_stub($func_name) {
+		echo sajax_get_one_stub($func_name);
+	}
+	
+	function sajax_export() {
+		global $sajax_export_list;
+		
+		$n = func_num_args();
+		for ($i = 0; $i < $n; $i++) {
+			$sajax_export_list[] = func_get_arg($i);
+		}
+	}
+	
+	$sajax_js_has_been_shown = 0;
+	function sajax_get_javascript()
+	{
+		global $sajax_js_has_been_shown;
+		global $sajax_export_list;
+		
+		$html = "";
+		if (! $sajax_js_has_been_shown) {
+			$html .= sajax_get_common_js();
+			$sajax_js_has_been_shown = 1;
+		}
+		foreach ($sajax_export_list as $func) {
+			$html .= sajax_get_one_stub($func);
+		}
+		return $html;
+	}
+	
+	function sajax_show_javascript()
+	{
+		echo sajax_get_javascript();
+	}
+	
+	$SAJAX_INCLUDED = 1;
+}
+?>
diff -uNr sajax-0.8/php/example_multiply.php sajax-0.9/php/example_multiply.php
--- sajax-0.8/php/example_multiply.php	Wed Mar  9 16:54:26 2005
+++ sajax-0.9/php/example_multiply.php	Tue Mar 15 00:58:03 2005
@@ -1,14 +1,14 @@
 <?
-	require("incl_sajax.php");
+	require("Sajax.php");
 	
 	function multiply($x, $y) {
 		return $x * $y;
 	}
 	
-	rs_init();
-	// $rs_debug_mode = 1;
-	rs_export("multiply");
-	rs_handle_client_request();
+	sajax_init();
+	// $sajax_debug_mode = 1;
+	sajax_export("multiply");
+	sajax_handle_client_request();
 	
 ?>
 <html>
@@ -16,7 +16,7 @@
 	<title>Multiplier</title>
 	<script>
 	<?
-	rs_show_javascript();
+	sajax_show_javascript();
 	?>
 	
 	function do_multiply_cb(z) {
diff -uNr sajax-0.8/php/example_multiply.php.txt sajax-0.9/php/example_multiply.php.txt
--- sajax-0.8/php/example_multiply.php.txt	Wed Mar  9 16:54:26 2005
+++ sajax-0.9/php/example_multiply.php.txt	Tue Mar 15 00:58:03 2005
@@ -1,14 +1,14 @@
 <?
-	require("incl_sajax.php");
+	require("Sajax.php");
 	
 	function multiply($x, $y) {
 		return $x * $y;
 	}
 	
-	rs_init();
-	// $rs_debug_mode = 1;
-	rs_export("multiply");
-	rs_handle_client_request();
+	sajax_init();
+	// $sajax_debug_mode = 1;
+	sajax_export("multiply");
+	sajax_handle_client_request();
 	
 ?>
 <html>
@@ -16,7 +16,7 @@
 	<title>Multiplier</title>
 	<script>
 	<?
-	rs_show_javascript();
+	sajax_show_javascript();
 	?>
 	
 	function do_multiply_cb(z) {
diff -uNr sajax-0.8/php/example_wall.php sajax-0.9/php/example_wall.php
--- sajax-0.8/php/example_wall.php	Wed Mar  9 16:54:26 2005
+++ sajax-0.9/php/example_wall.php	Tue Mar 15 00:57:44 2005
@@ -1,5 +1,5 @@
 <?
-	require("incl_sajax.php");
+	require("Sajax.php");
 	
 	//
 	// The world's least efficient wall implementation
@@ -34,10 +34,10 @@
 		return join("\n", array_slice($lines, -25));
 	}
 	
-	rs_init();
-	// $rs_debug_mode = 1;
-	rs_export("add_line", "refresh");
-	rs_handle_client_request();
+	sajax_init();
+	// $sajax_debug_mode = 1;
+	sajax_export("add_line", "refresh");
+	sajax_handle_client_request();
 	
 ?>
 <html>
@@ -50,7 +50,7 @@
 	</style>
 	<script>
 	<?
-	rs_show_javascript();
+	sajax_show_javascript();
 	?>
 	
 	var check_n = 0;
diff -uNr sajax-0.8/php/example_wall.php.txt sajax-0.9/php/example_wall.php.txt
--- sajax-0.8/php/example_wall.php.txt	Wed Mar  9 16:54:26 2005
+++ sajax-0.9/php/example_wall.php.txt	Tue Mar 15 00:57:44 2005
@@ -1,5 +1,5 @@
 <?
-	require("incl_sajax.php");
+	require("Sajax.php");
 	
 	//
 	// The world's least efficient wall implementation
@@ -34,10 +34,10 @@
 		return join("\n", array_slice($lines, -25));
 	}
 	
-	rs_init();
-	// $rs_debug_mode = 1;
-	rs_export("add_line", "refresh");
-	rs_handle_client_request();
+	sajax_init();
+	// $sajax_debug_mode = 1;
+	sajax_export("add_line", "refresh");
+	sajax_handle_client_request();
 	
 ?>
 <html>
@@ -50,7 +50,7 @@
 	</style>
 	<script>
 	<?
-	rs_show_javascript();
+	sajax_show_javascript();
 	?>
 	
 	var check_n = 0;
diff -uNr sajax-0.8/php/incl_sajax.php sajax-0.9/php/incl_sajax.php
--- sajax-0.8/php/incl_sajax.php	Wed Mar  9 16:54:53 2005
+++ sajax-0.9/php/incl_sajax.php	Wed Dec 31 19:00:00 1969
@@ -1,150 +0,0 @@
-<?php	
-if (!isset($INCL_REMOTE_SCRIPTING)) {
-
-	$rs_debug_mode = 0;
-	$rs_export_list = array();
-	
-	function rs_init() {
-	}
-	
-	function rs_handle_client_request() {
-		global $rs_export_list;
-		
-		if (empty($_GET["rs"])) 
-			return;
-
-		// Bust cache in the head
-		header ("Expires: Mon, 26 Jul 1997 05:00:00 GMT");    // Date in the past
-		header ("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
-		// always modified
-		header ("Cache-Control: no-cache, must-revalidate");  // HTTP/1.1
-		header ("Pragma: no-cache");                          // HTTP/1.0
-			
-		$func_name = $_GET["rs"];
-		if (! in_array($func_name, $rs_export_list))
-			echo "-:$func_name not callable";
-		else {
-			echo "+:";
-			if (empty($_GET["rsargs"])) 
-				$result = call_user_func($_GET["rs"]);
-			else
-				$result = call_user_func_array($_GET["rs"], $_GET["rsargs"]);
-			echo $result;
-		}
-		exit;
-	}
-	
-	function rs_show_common_js() {
-		global $rs_debug_mode;
-		
-		?>
-		
-		// remote scripting library
-		// (c) copyright 2005 modernmethod, inc
-		var rs_debug_mode = <?php echo $rs_debug_mode ? "true" : "false"; ?>;
-		
-		function rs_debug(text) {
-			if (rs_debug_mode)
-				alert("RSD: " + text)
-		}
- 		function rs_init_object() {
- 			rs_debug("rs_init_object() called..")
- 			
- 			var A;
-			try {
-				A=new ActiveXObject("Msxml2.XMLHTTP");
-			} catch (e) {
-				try {
-					A=new ActiveXObject("Microsoft.XMLHTTP");
-				} catch (oc) {
-					A=null;
-				}
-			}
-			if(!A && typeof XMLHttpRequest != "undefined")
-				A = new XMLHttpRequest();
-			if (!A)
-				rs_debug("Could not create connection object.");
-			return A;
-		}
-		<?php
-	}
-	
-	// javascript escape a value
-	function rs_esc($val)
-	{
-		return str_replace('"', '\\\\"', $val);
-	}
-	
-	function rs_show_one($func_name) {
-		global $REQUEST_URI;
-		
-		$uri = $REQUEST_URI;
-		if (strpos($uri,"?") === false) 
-			$uri .= "?rs=".urlencode($func_name);
-		else
-			$uri .= "&rs=".urlencode($func_name);
-			
-		?>
-		
-		// wrapper for <?php echo $func_name; ?>
-		
-		function x_<?php echo $func_name; ?>() {
-			// count args; build URL
-			var i, x, n;
-			var url = "<?php echo rs_esc($uri); ?>";
-			var a = x_<?php echo $func_name; ?>.arguments;
-			for (i = 0; i < a.length-1; i++) 
-				url = url + "&rsargs[]=" + escape(a[i]);
-			url = url + "&rsrnd=" + new Date().getTime();
-			x = rs_init_object();
-			x.open("GET", url, true);
-			x.onreadystatechange = function() {
-				if (x.readyState != 4) 
-					return;
-				rs_debug("received " + x.responseText);
-				
-				var status;
-				var data;
-				status = x.responseText.charAt(0);
-				data = x.responseText.substring(2);
-				if (status == "-") 
-					alert("Error: " + callback_n);
-				else  
-					a[a.length-1](data);
-			}
-			x.send(null);
-			rs_debug("x_<?php echo $func_name; ?> url = " + url);
-			rs_debug("x_<?php echo $func_name; ?> waiting..");
-			delete x;
-		}
-		
-		<?php
-	}
-	
-	function rs_export() {
-		global $rs_export_list;
-		
-		$n = func_num_args();
-		for ($i = 0; $i < $n; $i++) {
-			$rs_export_list[] = func_get_arg($i);
-		}
-	}
-	
-	$rs_js_has_been_shown = 0;
-	function rs_show_javascript()
-	{	
-		global $rs_js_has_been_shown;
-		global $rs_export_list;
-		
-		if (! $rs_js_has_been_shown) {
-			rs_show_common_js();
-			$rs_js_has_been_shown = 1;
-		}
-		foreach ($rs_export_list as $func) {
-			rs_show_one($func);
-		}
-	}
-	
-	$INCL_REMOTE_SCRIPTING = 1;
-}
-?>
diff -uNr sajax-0.8/php/incl_sajax.php.txt sajax-0.9/php/incl_sajax.php.txt
--- sajax-0.8/php/incl_sajax.php.txt	Wed Mar  9 16:54:53 2005
+++ sajax-0.9/php/incl_sajax.php.txt	Wed Dec 31 19:00:00 1969
@@ -1,150 +0,0 @@
-<?php	
-if (!isset($INCL_REMOTE_SCRIPTING)) {
-
-	$rs_debug_mode = 0;
-	$rs_export_list = array();
-	
-	function rs_init() {
-	}
-	
-	function rs_handle_client_request() {
-		global $rs_export_list;
-		
-		if (empty($_GET["rs"])) 
-			return;
-
-		// Bust cache in the head
-		header ("Expires: Mon, 26 Jul 1997 05:00:00 GMT");    // Date in the past
-		header ("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
-		// always modified
-		header ("Cache-Control: no-cache, must-revalidate");  // HTTP/1.1
-		header ("Pragma: no-cache");                          // HTTP/1.0
-			
-		$func_name = $_GET["rs"];
-		if (! in_array($func_name, $rs_export_list))
-			echo "-:$func_name not callable";
-		else {
-			echo "+:";
-			if (empty($_GET["rsargs"])) 
-				$result = call_user_func($_GET["rs"]);
-			else
-				$result = call_user_func_array($_GET["rs"], $_GET["rsargs"]);
-			echo $result;
-		}
-		exit;
-	}
-	
-	function rs_show_common_js() {
-		global $rs_debug_mode;
-		
-		?>
-		
-		// remote scripting library
-		// (c) copyright 2005 modernmethod, inc
-		var rs_debug_mode = <?php echo $rs_debug_mode ? "true" : "false"; ?>;
-		
-		function rs_debug(text) {
-			if (rs_debug_mode)
-				alert("RSD: " + text)
-		}
- 		function rs_init_object() {
- 			rs_debug("rs_init_object() called..")
- 			
- 			var A;
-			try {
-				A=new ActiveXObject("Msxml2.XMLHTTP");
-			} catch (e) {
-				try {
-					A=new ActiveXObject("Microsoft.XMLHTTP");
-				} catch (oc) {
-					A=null;
-				}
-			}
-			if(!A && typeof XMLHttpRequest != "undefined")
-				A = new XMLHttpRequest();
-			if (!A)
-				rs_debug("Could not create connection object.");
-			return A;
-		}
-		<?php
-	}
-	
-	// javascript escape a value
-	function rs_esc($val)
-	{
-		return str_replace('"', '\\\\"', $val);
-	}
-	
-	function rs_show_one($func_name) {
-		global $REQUEST_URI;
-		
-		$uri = $REQUEST_URI;
-		if (strpos($uri,"?") === false) 
-			$uri .= "?rs=".urlencode($func_name);
-		else
-			$uri .= "&rs=".urlencode($func_name);
-			
-		?>
-		
-		// wrapper for <?php echo $func_name; ?>
-		
-		function x_<?php echo $func_name; ?>() {
-			// count args; build URL
-			var i, x, n;
-			var url = "<?php echo rs_esc($uri); ?>";
-			var a = x_<?php echo $func_name; ?>.arguments;
-			for (i = 0; i < a.length-1; i++) 
-				url = url + "&rsargs[]=" + escape(a[i]);
-			url = url + "&rsrnd=" + new Date().getTime();
-			x = rs_init_object();
-			x.open("GET", url, true);
-			x.onreadystatechange = function() {
-				if (x.readyState != 4) 
-					return;
-				rs_debug("received " + x.responseText);
-				
-				var status;
-				var data;
-				status = x.responseText.charAt(0);
-				data = x.responseText.substring(2);
-				if (status == "-") 
-					alert("Error: " + callback_n);
-				else  
-					a[a.length-1](data);
-			}
-			x.send(null);
-			rs_debug("x_<?php echo $func_name; ?> url = " + url);
-			rs_debug("x_<?php echo $func_name; ?> waiting..");
-			delete x;
-		}
-		
-		<?php
-	}
-	
-	function rs_export() {
-		global $rs_export_list;
-		
-		$n = func_num_args();
-		for ($i = 0; $i < $n; $i++) {
-			$rs_export_list[] = func_get_arg($i);
-		}
-	}
-	
-	$rs_js_has_been_shown = 0;
-	function rs_show_javascript()
-	{	
-		global $rs_js_has_been_shown;
-		global $rs_export_list;
-		
-		if (! $rs_js_has_been_shown) {
-			rs_show_common_js();
-			$rs_js_has_been_shown = 1;
-		}
-		foreach ($rs_export_list as $func) {
-			rs_show_one($func);
-		}
-	}
-	
-	$INCL_REMOTE_SCRIPTING = 1;
-}
-?>
diff -uNr sajax-0.8/ruby/Readme.txt sajax-0.9/ruby/Readme.txt
--- sajax-0.8/ruby/Readme.txt	Wed Dec 31 19:00:00 1969
+++ sajax-0.9/ruby/Readme.txt	Tue Mar 15 01:05:17 2005
@@ -0,0 +1,9 @@
+SAJAX RUBY BACKEND
+------------------
+
+Contributed and put into the public domain by an anonymous member
+of the Sajax forum. If anyone wants to take control of this port
+and improve it, it would be welcomed.
+
+
+
diff -uNr sajax-0.8/ruby/Sajax.rb sajax-0.9/ruby/Sajax.rb
--- sajax-0.8/ruby/Sajax.rb	Wed Dec 31 19:00:00 1969
+++ sajax-0.9/ruby/Sajax.rb	Tue Mar 15 01:04:36 2005
@@ -0,0 +1,134 @@
+#!/usr/bin/env ruby
+require 'cgi'
+require 'date'
+
+class Sajax
+ 
+  def initialize(debug_mode=false)
+    @debug_mode = debug_mode
+    @export_list = Hash.new
+    @js_has_been_shown = false
+    @cgi = CGI.new
+  end
+
+  def handle_client_request
+    func_name = @cgi.params['rs'].to_s
+    if func_name == ""
+      return
+    end 
+    # Bust cache in the head
+    @cgi.out({
+      "Expires"    => "Mon, 26 Jul 1997 05:00:00 GMT",
+      "Last-Modified" => DateTime.now.new_offset.strftime("%a, %d %m %H:%M:%S GMT"), # always modified
+      "Cache-Control" => "no-cache, must-revalidate",  # HTTP/1.1
+      "Pragma" => "no-cache",  # HTTP/1.0
+      })
+   
+    unless @export_list.has_key?(func_name)
+      print "-:%s not callable" % func_name
+    else
+      print "+:"
+      rsargs = @cgi.params['rsargs[]']
+      result = __send__(@export_list[func_name],*rsargs)
+      print result
+    end
+    exit()
+  end
+ 
+  def show_common_js
+    js_debug_mode = @debug_mode.to_s.downcase
+    print <<-"EOS"
+      // remote scripting library
+      // (c) copyright 2005 modernmethod, inc
+      var rs_debug_mode = #{js_debug_mode};
+      var rs_obj = false;
+      var rs_callback = false;
+      
+      function rs_debug(text) {
+         if (rs_debug_mode)
+            alert("RSD: " + text)
+      }
+      
+       function rs_init_object() {
+          rs_debug("rs_init_object() called..")
+          
+          var A;
+         try {
+            A=new ActiveXObject("Msxml2.XMLHTTP");
+         } catch (e) {
+            try {
+               A=new ActiveXObject("Microsoft.XMLHTTP");
+            } catch (oc) {
+               A=null;
+            }
+         }
+         if(!A && typeof XMLHttpRequest != "undefined")
+            A = new XMLHttpRequest();
+         if (!A)
+            rs_debug("Could not create connection object.");
+         return A;
+      }
+EOS
+  end
+ 
+  def rs_esc(val)
+    return val.gsub('"', '\\\\"')   
+  end
+       
+  def show_one(func_name)
+    uri = ENV['REQUEST_URI']
+    unless uri.include?('?')
+      uri += "?rs=%s" % CGI.escape(func_name)
+    else
+      uri += "&rs=%s" % CGI.escape(func_name)
+    end
+    escapeduri = rs_esc(uri)
+    print <<-"EOS"
+   // wrapper for #{func_name}
+   function x_#{func_name}(){
+      // count args; build URL
+         var i, x, n;
+         var url = "#{escapeduri}", a = x_#{func_name}.arguments;
+         for (i = 0; i < a.length-1; i++)
+            url = url + "&rsargs[]=" + escape(a[i]);
+         x = rs_init_object();
+         x.open("GET", url, true);
+         x.onreadystatechange = function() {
+            if (x.readyState != 4)
+               return;
+            rs_debug("received " + x.responseText);
+            
+            var status;
+            var data;
+            status = x.responseText.charAt(0);
+            data = x.responseText.substring(2);
+            if (status == "-")
+               alert("Error: " + callback_n);
+            else 
+               a[a.length-1](data);
+         }
+         x.send(null);
+         rs_debug("x_#{func_name} url = " + url);
+         rs_debug("x_#{func_name} waiting..");
+      }
+     
+    EOS
+  end
+ 
+  def export(*args)
+   for f in args
+      @export_list[f] = f       
+   end                 
+  end
+         
+  def show_javascript
+    unless @js_has_been_shown
+      show_common_js()
+      @js_has_been_shown = true
+    end
+    for func_name in @export_list.keys
+      show_one(func_name)
+    end
+  end
+               
+end