fuzed 0.1.0

data/History.txt

@@ -0,0 +1,5 @@
+== 1.0.0 / 2007-06-24
+
+* 1 major enhancement
+  * Birthday!
+

data/LICENSE

@@ -0,0 +1,23 @@
+Copyright (c) 2007,2008, Dave Fayram, Tom Preston-Werner
+
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:
+
+* Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.
+
+*  Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution.
+
+* Neither the name of the <ORGANIZATION> nor the names of its contributors may be used to endorse or promote products derived from this software without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
+A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
+CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

data/Manifest.txt

@@ -0,0 +1,32 @@
+History.txt
+LICENSE
+Manifest.txt
+README.txt
+Rakefile
+bin/fuzed
+bin/fuzed-adapter
+bin/fuzed-conf
+elibs/port_wrapper.beam
+elibs/port_wrapper.erl
+elibs/rails_connection_pool.beam
+elibs/rails_connection_pool.erl
+elibs/rails_forwarder.beam
+elibs/rails_forwarder.erl
+elibs/resource_manager.beam
+elibs/resource_manager.erl
+elibs/test_rails_handler.beam
+elibs/test_rails_handler.erl
+join_cluster.beam
+join_cluster.erl
+lib/fuzed.rb
+rails_responder
+sample.fuzed.conf
+start_node
+start_yaws
+templates/fuzed.conf
+testing.conf
+yaws_includes/erlsom.hrl
+yaws_includes/soap.hrl
+yaws_includes/yaws.hrl
+yaws_includes/yaws_api.hrl
+yaws_includes/yaws_dav.hrl

data/README.txt

@@ -0,0 +1,81 @@
+fuzed
+    by Dave Fayram, Tom Preston-Werner
+    fuzed.rubyforge.org
+    
+    
+== Summary
+Leverage the YAWS webserver (and additional erlang-based infrastructure) to run Rails.
+
+
+== Dependencies
+* Erlang: http://www.erlang.org
+* Yaws: http://yaws.hyber.org
+* Ruby: http://www.ruby-lang.org
+* Ruby Gems: 
+  * rake: http://rake.rubyforge.org
+  * erlectricty: http://code.google.com/p/erlectricity
+  * rack: http://rack.rubyforge.org
+
+
+== Installation (from gem)
+
+  gem install fuzed
+  
+
+== Installation (from git)
+
+Get it from the git repo:
+
+  git clone git://repo.or.cz/fuzed.git
+  
+Change to the fuzed working copy:
+
+  cd fuzed
+    
+Build Fuzed:
+
+  rake build
+
+
+== Configuration
+
+Generate a starter Yaws config file with:
+
+  fuzed-conf RAILS_ROOT 8080
+  
+where RAILS_ROOT is the absolute path to the root directory of your Rails project. You may
+optionally specify a port as the second argument. This will generate a file called
+'fuzed.conf' which contains a sample Yaws config file that should be suitable for initial
+testing.
+
+
+== Starting fuzed
+
+Start the fuzed master server (yaws) locally:
+
+  fuzed start -n server@127.0.0.1 -c fuzed.conf
+  
+In another terminal, start a fuzed client locally:
+
+  fuzed join -n client@127.0.0.1 -m server@127.0.0.1 -r RAILS_ROOT
+  
+where RAILS_ROOT is the same as before.
+    
+Point your browser at:
+
+  http://localhost
+  
+If everything worked out, you'll see your Rails app!
+
+
+== What is a Valid Hostname?
+  Erlang has a funny notion about what a valid hostname is. Localhost won't
+  cut it. I recommend using rendezvous to point to your local host. Short of
+  that, 127.0.0.1 works.
+
+
+== Contribution Notes
+* Please note that empty directories should contain a .placeholder file
+  (which should be empty), to facilitate the use of other version
+  control systems which bridge to subversion but don't support empty
+  directories.

data/Rakefile

@@ -0,0 +1,36 @@
+require 'rubygems'
+require 'hoe'
+require './lib/fuzed.rb'
+
+Hoe.new('fuzed', Fuzed::VERSION) do |p|
+  p.rubyforge_name = 'fuzed'
+  p.author = ['Dave Fayram', 'Tom Preston-Werner']
+  p.email = ['tom@rubyisawesome.com']
+  p.summary = 'Leverage the YAWS webserver (and additional erlang-based infrastructure) to run Rails.'
+  p.url = 'fuzed.rubyforge.org'
+  # p.description = p.paragraphs_of('README.txt', 2..5).join("\n\n")
+  # p.url = p.paragraphs_of('README.txt', 0).first.split(/\n/)[1..-1]
+  p.changes = p.paragraphs_of('History.txt', 0..1).join("\n\n")
+  p.extra_deps << ['erlectricity', '>= 0.1.0']
+end
+
+task :build do
+  Dir['./**/*.erl'].each do |source|
+    unless File.open(source).read =~ /#!/
+      puts "compiling #{source}"
+      Dir.chdir(File.dirname(source)) do |dir|
+        puts `erlc #{File.basename(source)}`
+      end
+    end
+  end
+end
+
+desc 'Generate manifest from git files'
+task :manifest do
+  sh 'git ls-tree --name-only -r HEAD > Manifest.txt'
+end
+
+desc "Upload site to Rubyforge"
+task :site do
+  sh "scp -r site/* mojombo@god.rubyforge.org:/var/www/gforge-projects/fuzed"
+end

data/bin/fuzed

@@ -0,0 +1,49 @@
+#!/usr/bin/env ruby
+
+# require 'fuzed'
+require File.join(File.dirname(__FILE__), *%w[.. lib fuzed])
+
+require 'optparse'
+require 'pp'
+
+options = {}
+OptionParser.new do |opts|
+  opts.banner = "Usage: fuzed command [options]"
+
+  opts.on("-c CONFIG", "--config CONFIG", "Path to Yaws config file") do |n|
+    options[:config] = n
+  end
+  
+  opts.on("-n NAME", "--name NAME", "Node name") do |n|
+    options[:name] = n
+  end
+  
+  opts.on("-m NAME", "--master NAME", "Master node name") do |n|
+    options[:master_name] = n
+  end
+  
+  opts.on("-r RAILS_ROOT", "--rails RAILS_ROOT", "Path to Rails root") do |a|
+    options[:rails] = a
+  end
+end.parse!
+  
+command = ARGV[0]
+
+case command
+when 'start'
+  config = options[:config]
+  nodename = options[:name]
+  
+  puts "Starting yaws server with name: #{nodename}"
+  system %Q{yaws --conf #{config} --pa #{Fuzed.relative 'elibs'} -name "#{nodename}" --runmod rails_connection_pool}
+when 'join'
+  nodename = options[:name]
+  master = options[:master_name]
+  rails = options[:rails]
+  
+  puts "Starting a client named #{nodename} offering service to #{master}"
+  puts "Each node will run: 'fuzed-adapter #{rails}'"
+  system %Q{cd #{Fuzed.root}; erl -noshell -name #{nodename} -eval "join_cluster:start('#{master}','fuzed-adapter #{rails}')."}
+else
+  puts 'Invalid command'
+end

data/bin/fuzed-adapter

@@ -0,0 +1,291 @@
+#!/usr/bin/env ruby
+
+rails_root = ARGV[0]
+
+require File.join(rails_root, 'config/boot')
+require RAILS_ROOT + "/config/environment"
+
+require 'erlectricity'
+require 'stringio'
+require 'logger'
+
+$logger = Logger.new(RAILS_ROOT + "/log/fuzed.#{Process.pid}.log")
+
+def log(msg)
+  $logger.info(msg)
+end
+
+module Rack
+  module Handler
+    class Fuzed
+      def self.run(app)
+        Fuzed.new(app).listen
+      end
+      
+      def initialize(app)
+        @app = app
+      end
+      
+      def listen
+        log "Waiting for connections"
+        
+        me = self
+        
+        receive(IO.new(3), IO.new(4)) do
+          match(:request, list(:request)) do
+            $t = Time.now
+            log('------------MATCH------------')
+            log request.inspect
+            res = me.service(request)
+            send!(res)
+            log(">> Total in " + (Time.now - $t).to_s + " sec\n")
+            receive_loop
+          end
+          
+          match(:ping) do
+            send!(:pong)
+            receive_loop
+          end
+          
+          match(any(:any)) do
+            log('------------NO-MATCH------------')
+            log any.inspect
+            receive_loop
+          end
+        end
+      end
+      
+      def service(vars)
+        request = vars.inject({}) { |a, x| a[x[0]] = x[1]; a }
+        
+        method = request[:method]
+        version = request[:http_version] # => e.g. [1, 1]
+        path = request[:querypath]
+        query = request[:querydata]
+        server = request[:servername]
+        headers = request[:headers]
+        cookies = request[:cookies]
+        postdata = request[:postdata] == :undefined ? '' : request[:postdata]
+                
+        translate = {:content_type => 'CONTENT_TYPE',
+                     :content_length => 'CONTENT_LENGTH',
+                     :accept => 'HTTP_ACCEPT',
+                     :'Accept-Charset' => 'HTTP_ACCEPT_CHARSET',
+                     :'Accept-Encoding' => 'HTTP_ACCEPT_ENCODING',
+                     :'Accept-Language' => 'HTTP_ACCEPT_LANGUAGE',
+                     :connection => 'HTTP_CONNECTION',
+                     :keep_alive => 'HTTP_KEEP_ALIVE',
+                     :host => 'HTTP_HOST',
+                     :referer => 'HTTP_REFERER',
+                     :user_agent => 'HTTP_USER_AGENT',
+                     'X-Prototype-Version' => 'HTTP_X_PROTOTYPE_VERSION',
+                     'X-Requested-With' => 'HTTP_X_REQUESTED_WITH'}
+                     
+        env = {}
+        env['REQUEST_METHOD'] = method.to_s
+        env['QUERY_STRING'] = query
+        env["PATH_INFO"] = path == '/' ? '' : path
+        env = headers.inject(env) { |a, x| a[translate[x[0]] || x[0].to_s] = x[1]; a }
+        env.delete_if { |k, v| v.nil? }
+        
+        env.update({"rack.version" => [0,2],
+                     "rack.input" => StringIO.new(postdata),
+                     "rack.errors" => STDERR,
+                     
+                     "rack.multithread" => true,
+                     "rack.multiprocess" => false,
+                     "rack.run_once" => false,
+                     
+                     "rack.url_scheme" => ["yes", "on", "1"].include?(ENV["HTTPS"]) ? "https" : "http"
+                   })
+                   
+        env['SERVER_NAME'] = server.split(':')[0]
+        env['SERVER_PORT'] = server.split(':')[1]
+        env['HTTP_VERSION'] = version.join('.')
+        
+        env["HTTP_VERSION"] ||= env["SERVER_PROTOCOL"]
+        env["QUERY_STRING"] ||= ""
+        env["REQUEST_PATH"] ||= "/"
+        env.delete "PATH_INFO" if env["PATH_INFO"] == ""
+        
+        cookies.each do |cookie|
+          env["HTTP_COOKIE"] = cookie.to_s
+        end
+        
+        log('------------IN------------')
+        log(env.inspect)
+        
+        begin
+          t1 = Time.now
+          status, headers, body = @app.call(env)
+          log(">> Rails in " + (Time.now - t1).to_s + " sec")
+        
+          html = ''
+          body.each do |part|
+            html << part
+          end
+          
+          headers['Server'] = 'YAWS + Fuzed 0.0.1'
+          headers['Connection'] = 'close'
+          
+          cookies = headers.delete('cookie')
+          #cookies.map! {|c| c.include?('path=') ? c : c + "; path=/"}
+          headers['Set-Cookie'] = cookies if cookies
+          
+          # p headers
+
+          res = 
+          [:response,
+           [[:status, status.to_i],
+            [:allheaders, headers.inject([]) { |a, x| a += x[1].map { |y| [:header, x[0], y] } }],
+            [:html, html]]]
+        rescue => e
+          res = 
+          [:response, 
+            [[:status, 500],
+             [:allheaders, [
+               [:header, "Content-Type", "text/plain; charset=utf-8"], 
+               [:header, "Cache-Control", "no-cache"]]], 
+             [:html, "500 Internal Error\n\n#{e}\n\n#{e.backtrace}"]]]
+        end
+          
+        log('-----------OUT------------')
+        log(res.inspect)
+        
+        res
+      end
+    end
+  end
+end
+
+###############################################################################
+
+unless defined? RAILS_ROOT
+  raise "Rails' environment has to be loaded before using Rack::Adapter::Rails"
+end
+
+require "rack/request"
+require "rack/response"
+require "dispatcher"
+
+module Rack
+  module Adapter 
+    class Rails
+      def call(env)
+        request = Request.new(env)
+        response = Response.new
+        
+        cgi = CGIStub.new(request, response)
+        
+        Dispatcher.dispatch(cgi, ActionController::CgiRequest::DEFAULT_SESSION_OPTIONS, response)
+        
+        response.finish
+      end
+      
+      protected
+      
+      class CGIStub < ::CGI
+        
+        def initialize(request, response, *args)
+          @request = request
+          @response = response
+          @args = *args
+          @input = request.body
+          super(*args)
+        end
+        
+        IGNORED_HEADERS = [ "Status" ]
+        
+        def header(options = "text/html")
+          # puts 'header---------------'
+          # p options
+          # puts '---------------------'
+          
+          if options.instance_of?(String)
+            @response['Content-Type'] = options unless @response['Content-Type']
+          else
+            @response['Content-Length'] = options.delete('Content-Length').to_s if options['Content-Length']
+            
+            @response['Content-Type'] = options.delete('type') || "text/html"
+            @response['Content-Type'] += "; charset=" + options.delete('charset') if options['charset']
+                        
+            @response['Status'] = options.delete('status') if options['status']
+            @response['Content-Language'] = options.delete('language') if options['language']
+            @response['Expires'] = options.delete('expires') if options['expires']
+        
+            IGNORED_HEADERS.each {|k| options.delete(k) }
+        
+            options.each{|k,v| @response[k] = v}
+            
+            # convert 'cookie' header to 'Set-Cookie' headers
+            if cookie = @response['cookie']
+              case cookie
+                when Array
+                  cookie.each {|c| @response['Set-Cookie'] = c.to_s }
+                when Hash
+                  cookie.each_value {|c| @response['Set-Cookie'] = c.to_s}
+                else
+                  @response['Set-Cookie'] = options['cookie'].to_s
+              end
+        
+              @output_cookies.each { |c| @response['Set-Cookie'] = c.to_s } if @output_cookies
+            end
+          end
+        
+          ""
+        end
+                        
+        def params
+          @request.params
+        end
+        
+        def cookies
+          @request.cookies
+        end
+        
+        def query_string
+          @request.query_string
+        end
+          
+        # Used to wrap the normal args variable used inside CGI.
+        def args
+          @args
+        end
+    
+        # Used to wrap the normal env_table variable used inside CGI.
+        def env_table
+          @request.env
+        end
+    
+        # Used to wrap the normal stdinput variable used inside CGI.
+        def stdinput
+          @input
+        end
+        
+        def stdoutput
+          STDERR.puts "stdoutput should not be used."
+          @response.body
+        end  
+      end
+    end
+  end
+end
+
+###############################################################################
+
+require 'rack'
+require 'rack/cascade'
+require 'rack/showexceptions'
+# Rack::Handler::Fuzed.run \
+#   Rack::ShowExceptions.new(Rack::Lint.new(Rack::Adapter::Rails.new))
+
+if ARGV.first != 'test'
+  Rack::Handler::Fuzed.run(Rack::Adapter::Rails.new)
+else
+  req = 
+  [[:method, :POST], [:http_version, [1, 1]], [:querypath, "/main/go"], [:querydata, ""], [:servername, "testing:8002"], [:headers, [[:connection, "keep-alive"], [:accept, "text/xml,application/xml,application/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,image/png,*/*;q=0.5"], [:host, "localhost:8002"], [:referer, "http://localhost:8002/main/ready"], [:user_agent, "Mozilla/5.0 (Macintosh; U; Intel Mac OS X; en-US; rv:1.8.1.3) Gecko/20070309 Firefox/2.0.0.3"], [:keep_alive, "300"], [:content_length, "7"], [:content_type, "application/x-www-form-urlencoded"], [:"Cache-Control", "max-age=0"], [:"Accept-Charset", "ISO-8859-1,utf-8;q=0.7,*;q=0.7"], [:"Accept-Encoding", "gzip,deflate"], [:"Accept-Language", "en-us,en;q=0.5"]]], [:cookies, ["_helloworld_session_id=d3eae987aab3230377abc433b7a8d7c1"]], [:pathinfo, "/Users/tom/dev/fuzed/helloworld/public"], [:postdata, "val=foo"]]
+  
+  # [[:method, :GET], [:http_version, [1, 1]], [:querypath, "/main/say"], [:querydata, ""], [:servername, "testing:8002"], [:headers, [[:connection, "keep-alive"], [:accept, "text/xml,application/xml,application/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,image/png,*/*;q=0.5"], [:host, "localhost:8002"], [:user_agent, "Mozilla/5.0 (Macintosh; U; Intel Mac OS X; en-US; rv:1.8.1.3) Gecko/20070309 Firefox/2.0.0.3"], [:keep_alive, "300"], [:"Cache-Control", "max-age=0"], [:"Accept-Charset", "ISO-8859-1,utf-8;q=0.7,*;q=0.7"], [:"Accept-Encoding", "gzip,deflate"], [:"Accept-Language", "en-us,en;q=0.5"]]], [:cookies, ["_helloworld_session_id=166098a3c3f702698d0529c6148c6164"]], [:pathinfo, "/Users/tom/dev/fuzed/helloworld/public"], [:postdata, :undefined]]
+
+  p Rack::Handler::Fuzed.new(Rack::Adapter::Rails.new).service(req)
+end