appswarm 0.0.1

data/apps/global_web_proxy/spec/res1

@@ -0,0 +1,112 @@
+#<WEBrick::HTTPResponse:0x5736a4
+ @body="sometxt",
+ @chunked=false,
+ @config=
+  {:DoNotListen=>false,
+   :ServerSoftware=>"WEBrick/1.3.1 (Ruby/1.8.6/2007-09-23)",
+   :ServerName=>"david-kamphausens-macbook-pro.local",
+   :RequestHandler=>nil,
+   :TempDir=>"/var/folders/Wp/WpBBGBk5GcuXGQrKa+99ik+++TI/-Tmp-/",
+   :StartCallback=>nil,
+   :MaxClients=>100,
+   :CGIInterpreter=>nil,
+   :ProxyAuthProc=>nil,
+   :ProxyTimeout=>true,
+   :MimeTypes=>
+    {"pgm"=>"image/x-portable-graymap",
+     "html"=>"text/html",
+     "zip"=>"application/zip",
+     "xml"=>"text/xml",
+     "jpg"=>"image/jpeg",
+     "htm"=>"text/html",
+     "dvi"=>"application/x-dvi",
+     "ppm"=>"image/x-portable-pixmap",
+     "mpe"=>"video/mpeg",
+     "doc"=>"application/msword",
+     "class"=>"application/octet-stream",
+     "xbm"=>"image/x-xbitmap",
+     "sgm"=>"text/sgml",
+     "qt"=>"video/quicktime",
+     "ps"=>"application/postscript",
+     "css"=>"text/css",
+     "rtf"=>"application/rtf",
+     "ras"=>"image/x-cmu-raster",
+     "pnm"=>"image/x-portable-anymap",
+     "mpg"=>"video/mpeg",
+     "lzh"=>"application/octet-stream",
+     "gif"=>"image/gif",
+     "xwd"=>"image/x-xwindowdump",
+     "txt"=>"text/plain",
+     "rb"=>"text/plain",
+     "pbm"=>"image/x-portable-bitmap",
+     "mpeg"=>"video/mpeg",
+     "lha"=>"application/octet-stream",
+     "crt"=>"application/x-x509-ca-cert",
+     "cer"=>"application/pkix-cert",
+     "bmp"=>"image/bmp",
+     "tif"=>"image/tiff",
+     "asc"=>"text/plain",
+     "rd"=>"text/plain",
+     "pdf"=>"application/pdf",
+     "exe"=>"application/octet-stream",
+     "crl"=>"application/pkix-crl",
+     "bin"=>"application/octet-stream",
+     "sgml"=>"text/sgml",
+     "jpeg"=>"image/jpeg",
+     "eps"=>"application/postscript",
+     "ai"=>"application/postscript",
+     "xls"=>"application/vnd.ms-excel",
+     "ppt"=>"application/vnd.ms-powerpoint",
+     "png"=>"image/png",
+     "mov"=>"video/quicktime",
+     "jpe"=>"image/jpeg",
+     "etx"=>"text/x-setext",
+     "avi"=>"video/x-msvideo",
+     "xpm"=>"image/x-xpixmap",
+     "tiff"=>"image/tiff",
+     "dms"=>"application/octet-stream"},
+   :AcceptCallback=>nil,
+   :BindAddress=>"127.0.0.1",
+   :CGIPathEnv=>nil,
+   :ProxyVia=>true,
+   :ProxyContentHandler=>nil,
+   :StopCallback=>nil,
+   :RequestTimeout=>30,
+   :Port=>7890,
+   :Escape8bitURI=>false,
+   :DocumentRootOptions=>{:FancyIndexing=>true},
+   :Logger=>
+    #<WEBrick::Log:0x579d74
+     @level=4,
+     @log=#<IO:0x22671c>,
+     @time_format="[%Y-%m-%d %H:%M:%S]">,
+   :ProxyURI=>nil,
+   :RequestCallback=>nil,
+   :AccessLog=>
+    [[#<IO:0x22671c>, "%h %l %u %t \"%r\" %s %b"],
+     [#<IO:0x22671c>, "%{Referer}i -> %U"]],
+   :ServerType=>nil,
+   :ServerAlias=>nil,
+   :DocumentRoot=>nil,
+   :DirectoryIndex=>["index.html", "index.htm", "index.cgi", "index.rhtml"],
+   :HTTPVersion=>#<WEBrick::HTTPVersion:0x57ff30 @major=1, @minor=1>},
+ @cookies=[],
+ @filename=nil,
+ @header=
+  {"connection"=>"Keep-Alive",
+   "date"=>"Tue, 06 Jan 2009 20:25:44 GMT",
+   "server"=>"WEBrick/1.3.1 (Ruby/1.8.6/2007-09-23)",
+   "content-length"=>0},
+ @http_version=#<WEBrick::HTTPVersion:0x57ff30 @major=1, @minor=1>,
+ @keep_alive=true,
+ @logger=
+  #<WEBrick::Log:0x579d74
+   @level=4,
+   @log=#<IO:0x22671c>,
+   @time_format="[%Y-%m-%d %H:%M:%S]">,
+ @reason_phrase="OK",
+ @request_http_version=#<WEBrick::HTTPVersion:0x572470 @major=1, @minor=1>,
+ @request_method="GET",
+ @request_uri=#<URI::HTTP:0x2b818a URL:http://test.appswarm/?arg1=p1>,
+ @sent_size=0,
+ @status=200>

data/apps/global_web_proxy/spec/res2

@@ -0,0 +1,125 @@
+#<WEBrick::HTTPResponse:0x5736b8
+ @body="sometxt",
+ @chunked=false,
+ @config=
+  {:DoNotListen=>false,
+   :ServerSoftware=>"WEBrick/1.3.1 (Ruby/1.8.6/2007-09-23)",
+   :ServerName=>"david-kamphausens-macbook-pro.local",
+   :RequestHandler=>nil,
+   :TempDir=>"/var/folders/Wp/WpBBGBk5GcuXGQrKa+99ik+++TI/-Tmp-/",
+   :StartCallback=>nil,
+   :MaxClients=>100,
+   :CGIInterpreter=>nil,
+   :ProxyAuthProc=>nil,
+   :ProxyTimeout=>true,
+   :MimeTypes=>
+    {"pgm"=>"image/x-portable-graymap",
+     "html"=>"text/html",
+     "zip"=>"application/zip",
+     "xml"=>"text/xml",
+     "jpg"=>"image/jpeg",
+     "htm"=>"text/html",
+     "dvi"=>"application/x-dvi",
+     "ppm"=>"image/x-portable-pixmap",
+     "mpe"=>"video/mpeg",
+     "doc"=>"application/msword",
+     "class"=>"application/octet-stream",
+     "xbm"=>"image/x-xbitmap",
+     "sgm"=>"text/sgml",
+     "qt"=>"video/quicktime",
+     "ps"=>"application/postscript",
+     "css"=>"text/css",
+     "rtf"=>"application/rtf",
+     "ras"=>"image/x-cmu-raster",
+     "pnm"=>"image/x-portable-anymap",
+     "mpg"=>"video/mpeg",
+     "lzh"=>"application/octet-stream",
+     "gif"=>"image/gif",
+     "xwd"=>"image/x-xwindowdump",
+     "txt"=>"text/plain",
+     "rb"=>"text/plain",
+     "pbm"=>"image/x-portable-bitmap",
+     "mpeg"=>"video/mpeg",
+     "lha"=>"application/octet-stream",
+     "crt"=>"application/x-x509-ca-cert",
+     "cer"=>"application/pkix-cert",
+     "bmp"=>"image/bmp",
+     "tif"=>"image/tiff",
+     "asc"=>"text/plain",
+     "rd"=>"text/plain",
+     "pdf"=>"application/pdf",
+     "exe"=>"application/octet-stream",
+     "crl"=>"application/pkix-crl",
+     "bin"=>"application/octet-stream",
+     "sgml"=>"text/sgml",
+     "jpeg"=>"image/jpeg",
+     "eps"=>"application/postscript",
+     "ai"=>"application/postscript",
+     "xls"=>"application/vnd.ms-excel",
+     "ppt"=>"application/vnd.ms-powerpoint",
+     "png"=>"image/png",
+     "mov"=>"video/quicktime",
+     "jpe"=>"image/jpeg",
+     "etx"=>"text/x-setext",
+     "avi"=>"video/x-msvideo",
+     "xpm"=>"image/x-xpixmap",
+     "tiff"=>"image/tiff",
+     "dms"=>"application/octet-stream"},
+   :AcceptCallback=>nil,
+   :BindAddress=>"127.0.0.1",
+   :CGIPathEnv=>nil,
+   :ProxyVia=>true,
+   :ProxyContentHandler=>nil,
+   :StopCallback=>nil,
+   :RequestTimeout=>30,
+   :Port=>7890,
+   :Escape8bitURI=>false,
+   :DocumentRootOptions=>{:FancyIndexing=>true},
+   :Logger=>
+    #<WEBrick::Log:0x58893c
+     @level=4,
+     @log=#<IO:0x22671c>,
+     @time_format="[%Y-%m-%d %H:%M:%S]">,
+   :ProxyURI=>nil,
+   :RequestCallback=>nil,
+   :AccessLog=>:appNodes, [:global_web, "myInstance"]]
+"STORE:"
+{[:appNodes, [:global_web, "myInstance"]]=>["udpsec://127.0.0.1:9876"],
+ [:nameService, "test.appswarm"]=>"myInstance"}
+"RESULT"
+["udpsec://127.0.0.1:9876"]
+["udpsec://127.0.0.1:9876"]
+"CALL"
+"SEND o:s:i:23:UdpTransceiver::Messageh:a:i:3:a:i:2:s:i:4:typey:s:i:3:pkga:i:2:s:i:7:contents:i:219:a:i:6:b:fy:s:i:9:globalAppi:4:a:i:2:y:s:i:10:global_webs:i:10:myInstancey:s:i:3:geta:i:1:o:s:i:16:GlobalWebRequesth:a:i:3:a:i:2:s:i:12:query_strings:i:7:arg1=p1a:i:2:s:i:4:hosts:i:13:test.appswarma:i:2:s:i:4:paths:i:1:/a:i:2:s:i:7:counteri:6: to \"127.0.0.1\" 9876"
+SENT (?)
+getFromWhiteboard 4 udpsec://127.0.0.1:9876
+["o:s:i:23:UdpTransceiver::Messageh:a:i:3:a:i:2:s:i:4:typey:s:i:3:pkga:i:2:s:i:7:contents:i:219:a:i:6:b:fy:s:i:9:globalAppi:4:a:i:2:y:s:i:10:global_webs:i:10:myInstancey:s:i:3:geta:i:1:o:s:i:16:GlobalWebRequesth:a:i:3:a:i:2:s:i:12:query_strings:i:7:arg1=p1a:i:2:s:i:4:hosts:i:13:test.appswarma:i:2:s:i:4:paths:i:1:/a:i:2:s:i:7:counteri:6:",
+ ["AF_INET", 9876, "localhost", "127.0.0.1"]]
+1
+CLEAR
+1
+RECEIVE from ::19876
+
+    [[#<IO:0x22671c>, "%h %l %u %t \"%r\" %s %b"],
+     [#<IO:0x22671c>, "%{Referer}i -> %U"]],
+   :ServerType=>nil,
+   :ServerAlias=>nil,
+   :DocumentRoot=>nil,
+   :DirectoryIndex=>["index.html", "index.htm", "index.cgi", "index.rhtml"],
+   :HTTPVersion=>#<WEBrick::HTTPVersion:0x57ff30 @major=1, @minor=1>},
+ @cookies=[],
+ @filename=nil,
+ @header={},
+ @http_version=#<WEBrick::HTTPVersion:0x57ff30 @major=1, @minor=1>,
+ @keep_alive=true,
+ @logger=
+  #<WEBrick::Log:0x58893c
+   @level=4,
+   @log=#<IO:0x22671c>,
+   @time_format="[%Y-%m-%d %H:%M:%S]">,
+ @reason_phrase=nil,
+ @request_http_version=#<WEBrick::HTTPVersion:0x572484 @major=1, @minor=1>,
+ @request_method="GET",
+ @request_uri=#<URI::HTTP:0x2b8194 URL:http://test.appswarm/?arg1=p1>,
+ @sent_size=0,
+ @status=200>

data/apps/global_web_proxy/spec/web_proxy_spec.rb

@@ -0,0 +1,88 @@
+require 'net/http'
+require 'webrick/httpproxy'
+
+describe "web proxy" do
+  if false
+  it "shoudld refer to a global_web_server through a global_application_interface" do
+    b=TestBed.new
+b.run("UdpNetwork")
+    b.run("DirectoryService")
+    ns=b.run("NameService")
+    sleep 2
+    
+    ns.export("test.appswarm","myInstance")
+    
+    b.run("GlobalWebServer")
+    b.run("GlobalApplicationInterface")
+    proxy=b.run("GlobalWebProxy")
+    
+    proxy["test.appswarm"].get("CHECK").should == "RETURN [CHECK]"
+    
+    b.stop
+  end
+end
+  
+  it "should be possible to access redmine on 127.0.0.1 3000" do
+    Net::HTTP.start("127.0.0.1",3000){|http|
+      pp http.get("/")
+    }
+    1.should == 1
+  end
+  
+  it "should be possible to access redmine across a proxy" do
+    proxy_port=9999
+    proxy_addr="127.0.0.1"
+    proxy=WEBrick::HTTPProxyServer.new(:BindAddress=>proxy_addr,:Port=>proxy_port)
+    t2=Thread.new {proxy.start}
+    Net::HTTP::Proxy(proxy_addr, proxy_port).start('127.0.0.1','3000') {|http|
+      puts "HTTP OPENED"
+      #t=Thread.new {
+      begin
+      result=http.get("/")
+      rescue Object=>e
+        pp e,e.backtrace
+      end
+      #}
+      #sleep 5
+      #t.raise Exception.new
+      puts "GETTTT"
+      pp result
+      proxy.shutdown
+    }
+  end
+  
+  
+  it "should work on a proxy-connection" do
+    b=TestBed.new
+
+b.run("UdpNetwork")
+    b.run("DirectoryService")
+    ns=b.run("NameService")
+    sleep 2
+    
+    ns.export("test.appswarm","myInstance")
+    
+    b.run("GlobalWebServer")
+    b.run("GlobalApplicationInterface")
+    proxy=b.run("GlobalWebProxy")
+  
+    sleep 2
+     proxy_addr = '127.0.0.1'
+     proxy_port = proxy.port
+
+     puts "TRYING PROXY #{proxy_addr} #{proxy_port}"
+     Net::HTTP::Proxy(proxy_addr, proxy_port).start('test.appswarm') {|http|
+       puts "HTTP OPENED"
+       result=nil
+       begin
+       result=http.get("/?arg1=p1")
+       rescue Object=>e
+         pp e,e.backtrace
+       end
+       pp "PROXY_RESULT:",result
+       pp result.body
+     }
+     b.stop
+
+  end
+end

data/apps/global_web_server/global_web_server.rb

@@ -0,0 +1,120 @@
+require 'global_application.rb'
+
+class GlobalWebServerApp<GlobalApplication
+  
+  HTTPResponse=Struct.new(:content_type,:body,:header,:status)
+  
+  class HTTPResponse
+    def initialize(*args)
+      super
+      if self.header.nil?
+        self.header||={}
+      end
+    end
+    def []=(name,value)
+      name=case name
+        when "Content-Type"
+          :content_type
+        else
+          name
+      end
+      super(name,value)
+    end
+  end
+  
+  
+  Servlet=Struct.new(:application,:controller,:url)
+  
+  provides :globalWebServer
+  provides :webServer
+  
+  def initialize(cluster,ops)
+    myInstance="myInstance"
+    
+    super(cluster,ops) #,[:global_web,myInstance])
+    provides(:globalWebServer)
+    provides(:webServer)
+    
+    @servlets=[]
+  end
+  
+  def get(req)
+    log "GLOBALWEBSERVERAPP get ",req
+    
+    servlet=getController(req)
+    raise "No servlet found for #{req.path}" unless servlet
+    controller=servlet.controller
+    app=servlet.application
+
+    args=req.args
+    res=HTTPResponse.new
+    app.handle(req,res,args,req.sessionId,req.instance,'') #FIXME
+    return res
+
+
+    log "CONTROLLER",controller
+    load controller
+    
+    controllerClassName=controller.gsub(/.*\//,"").gsub(".rb","").camelCase
+    log "className",controllerClassName
+    
+    listenerClass=getClass(controllerClassName)
+    l=listenerClass.new(app,req.instance.instanceName)
+
+    pp req.path_info
+    exit
+    #func=req.path_info.split("/")[2..-1].join("/")
+    log "PATH_INFO",req.path_info,"FUNC",func
+    l.params=req.query
+    res=HTTPResponse.new
+    begin
+      log "TRY RUNNING controller"
+      begin
+      l.run(res,func,req.args)
+      rescue Object=>e
+        pp e,e.backtrace
+        raise
+      end
+    rescue HTTPController::UnknownAction=>e
+      
+      puts "TRY FIND FILE"
+      # try to find a file
+      path=func.to_s
+      path.gsub!(/^(\.\.\/)*/,"")
+      raise e unless l.render_static(res,path)
+    end
+    return [res.content_type,res.body]
+  end
+  
+  def add(app,controller,url,instance)
+    @servlets << Servlet.new(app,controller,url)
+    
+    offer([:global_web,[app.getAppName,instance]])
+  end
+
+  def offerInstance(instance)
+    #@servlets << Servlet.new(app,controller,url)
+    offer([:global_web,[instance]])
+  end
+
+  private
+  def getController(req)
+    #exit
+    #FIXME
+    instance=req.instance
+    app=cluster.getApp(instance.instanceType)
+    funcs=req.path_info.split("/")[2..-1]
+    func=funcs.join("/") if funcs
+    func||=""
+    controller=app.getController(:urlPart=>func)
+    controller||=app.mainController
+    return s=Servlet.new(app,controller.filePath,"")
+    #Servlet=Struct.new(:application,:controller,:url)
+
+
+    @servlets.select{|servlet|
+      pp "SERVLET ",servlet.url,"REQPATH",req.path
+      req.path=~/^#{servlet.url}(\/.*)?$/
+    }[0]
+  end
+end