rhodes 0.1.0

data/lib/find.rb

@@ -0,0 +1,81 @@
+#
+# find.rb: the Find module for processing all files under a given directory.
+#
+
+#
+# The +Find+ module supports the top-down traversal of a set of file paths.
+#
+# For example, to total the size of all files under your home directory,
+# ignoring anything in a "dot" directory (e.g. $HOME/.ssh):
+#
+#   require 'find'
+#
+#   total_size = 0
+#
+#   Find.find(ENV["HOME"]) do |path|
+#     if FileTest.directory?(path)
+#       if File.basename(path)[0] == ?.
+#         Find.prune       # Don't look any further into this directory.
+#       else
+#         next
+#       end
+#     else
+#       total_size += FileTest.size(path)
+#     end
+#   end
+#
+module Find
+
+  #
+  # Calls the associated block with the name of every file and directory listed
+  # as arguments, then recursively on their subdirectories, and so on.
+  #
+  # See the +Find+ module documentation for an example.
+  #
+  def find(*paths) # :yield: path
+    block_given? or return enum_for(__method__, *paths)
+
+    paths.collect!{|d| raise Errno::ENOENT unless File.exist?(d); d.dup}
+    while file = paths.shift
+      catch(:prune) do
+	yield file.dup.taint
+        next unless File.exist? file
+	begin
+	  if File.lstat(file).directory? then
+	    d = Dir.open(file)
+	    begin
+	      for f in d
+		next if f == "." or f == ".."
+		if File::ALT_SEPARATOR and file =~ /^(?:[\/\\]|[A-Za-z]:[\/\\]?)$/ then
+		  f = file + f
+		elsif file == "/" then
+		  f = "/" + f
+		else
+		  f = File.join(file, f)
+		end
+		paths.unshift f.untaint
+	      end
+	    ensure
+	      d.close
+	    end
+	  end
+       rescue Errno::ENOENT, Errno::EACCES
+	end
+      end
+    end
+  end
+
+  #
+  # Skips the current file or directory, restarting the loop with the next
+  # entry. If the current file is a directory, that directory will not be
+  # recursively entered. Meaningful only within the block associated with
+  # Find::find.
+  #
+  # See the +Find+ module documentation for an example.
+  #
+  def prune
+    throw :prune
+  end
+
+  module_function :find, :prune
+end

data/lib/rational.rb

@@ -0,0 +1,19 @@
+class Fixnum
+
+  alias quof fdiv
+  alias rdiv quo
+
+  alias power! **
+  alias rpower **
+
+end
+
+class Bignum
+
+  alias quof fdiv
+  alias rdiv quo
+
+  alias power! **
+  alias rpower **
+
+end

data/lib/rho.rb

@@ -0,0 +1 @@
+require 'rho/rho'

data/lib/rho/render.rb

@@ -0,0 +1,9 @@
+require 'erb'
+	
+module Rho
+  class RhoController
+    def render(view)
+		ERB.new(IO.read(@request[:modelpath]+view.to_s+'.erb')).result(binding)
+    end
+  end # RhoController
+end # Rho

data/lib/rho/renderME.rb

@@ -0,0 +1,8 @@
+
+module Rho
+  class RhoController
+    def render(view)
+		eval(@request[:modelpath]+view.to_s+'_erb', binding )
+    end
+  end # RhoController
+end # Rho

data/lib/rho/rho.rb

@@ -0,0 +1,173 @@
+require 'time'
+require 'rho/rhoapplication'
+require 'rhom'
+require 'rhofsconnector'
+
+module Rho
+  class RHO
+    APPLICATIONS = {}
+	
+    def initialize(app_base_path=nil)
+      puts "Calling RHO.initialize"
+      Rhom::RhomDbAdapter::open(Rho::RhoFSConnector::get_db_fullpathname)
+      if app_base_path
+        process_model_dirs(app_base_path)
+      else
+        process_model_dirs(RhoApplication::get_base_app_path)
+      end
+      init_sources
+    end
+    
+    # make sure we close the database file
+    def self.finalize
+      Rhom::RhomDbAdapter::close
+    end
+    
+    # Return the directories where we need to load configuration files
+    def process_model_dirs(app_base_path=nil)
+      Rho::RhoFSConnector::enum_files(app_base_path,'config.rb') do |path|
+        require path
+      end
+    end
+    
+    # setup the sources table and model attributes for all applications
+    def init_sources
+      if defined? Rho::RhoConfig::sources
+        Rhom::RhomDbAdapter::delete_all_from_table('sources')
+        src_attribs = []
+        attribs_empty = false
+        
+        # quick and dirty way to get unique array of hashes
+        uniq_sources = Rho::RhoConfig::sources.values.inject([]) { |result,h| 
+          result << h unless result.include?(h); result
+        }
+		
+        # generate unique source list in databse for sync
+        uniq_sources.each do |source|
+          src_id = source['source_id']
+          url = source['url']
+          Rhom::RhomDbAdapter::insert_into_table('sources',
+                                                 {"source_id"=>src_id,"source_url"=>url})
+        end
+      end
+    end
+	
+    def get_app(appname)
+      if (APPLICATIONS[appname].nil?)
+        require RhoApplication::get_app_path(appname)+'application'
+        APPLICATIONS[appname] = Object.const_get(appname+'Application').new
+      end
+      APPLICATIONS[appname]
+    end
+
+    def serve(req)
+      begin
+	    puts 'inside RHO.serve...'
+        res = init_response
+        get_app(req['application']).send :serve, req, res
+        return send_response(res)
+      rescue Exception => e
+        return send_error(e.message)
+      end	
+    end
+
+    def serve_hash(req)
+		begin
+			puts 'inside RHO.serve...'
+			res = init_response
+			get_app(req['application']).send :serve, req, res
+			return send_response_hash(res)
+		rescue Exception => e
+			return send_error(e.message,500,true)
+		end	
+    end
+	
+    def init_response(status=200,message="OK",body="")
+      res = Hash.new
+      res['status'] = status
+      res['message'] = message
+      res['headers'] = 
+        {
+        'Date' => Time.now.httpdate,
+        'Content-Type' => 'text/html',
+        'Content-Length' => 0,
+        'Connection' => 'close' 
+      }
+      res['request-body'] = body
+      res
+    end
+
+    CR   = "\x0d"
+    LF   = "\x0a"
+    CRLF = "\x0d\x0a"
+	
+    def send_response(res)
+      res['headers']['Content-Length'] = res['request-body'].nil? ? 0 : res['request-body'].length
+      data = "HTTP/1.1 #{res['status'].to_s} #{res['message']}" + CRLF
+      res['headers'].each{|key, value|
+        tmp = key.gsub(/\bwww|^te$|\b\w/){|s| s.upcase }
+        data << "#{tmp}: #{value}" << CRLF
+      }
+      data << CRLF
+      data << res['request-body']
+      data
+    end
+
+    def send_response_hash(res)
+		resp = Hash.new
+		res['headers']['Content-Length'] = res['request-body'].nil? ? 0 : res['request-body'].length
+		res['headers'].each{|key, value|
+			tmp = key.gsub(/\bwww|^te$|\b\w/){|s| s.upcase }
+			resp[tmp] = value
+		}
+        resp['request-body'] = res['request-body']
+        resp['status'] = res['status']        
+        resp['message'] = res['message']
+        
+		resp
+    end
+	
+    def send_error(msg="",status=500,hash=false)
+      body=''
+      body << <<-_HTML_STRING_
+		<html>
+			<head>
+				<title>Server Error</title>
+				<meta name="viewport" content="width=320"/>
+			</head>
+			<body>
+				<p>
+      _HTML_STRING_
+      body << 'Error message: ' << msg		
+      body << <<-_HTML_STRING_
+				</p>	
+			</body>
+		</html>
+		
+      _HTML_STRING_
+      if ( hash )
+        send_response_hash(init_response(status,"Server error",body))
+      else
+        send_response(init_response(status,"Server error",body))
+      end
+    end
+  end # RHO
+  
+  # Generic configuration class which accepts hashes with unique keys
+  class RhoConfig
+    @@sources = {}
+    class << self
+      def sources
+        @@sources
+      end
+      
+      def add_source(modelname, new_source=nil)
+        if new_source
+          unless @@sources[new_source]
+            @@sources[modelname] = new_source
+          end
+        end
+      end
+    end
+  end # RhoConfig
+end # Rho

data/lib/rho/rhoapplication.rb

@@ -0,0 +1,36 @@
+require 'rhom'
+require 'rhofsconnector'
+
+module Rho
+  class RhoApplication
+	
+    def initialize
+      if @rhom.nil?
+        @rhom = Rhom::Rhom.new
+      end
+    end
+	
+    class << self
+	
+      def get_app_path(appname)
+        Rho::RhoFSConnector::get_app_path(appname)
+      end
+      
+      def get_base_app_path
+        Rho::RhoFSConnector::get_base_app_path
+      end
+
+      def get_model_path(appname, modelname)
+        Rho::RhoFSConnector::get_model_path(appname, modelname)
+      end
+	
+    end
+
+    def serve(req,res)
+      req[:modelpath] = self.class.get_model_path req['application'], req['model']
+      require req[:modelpath]+'controller'
+      res['request-body'] = (Object.const_get(req['model']+'Controller').new).send :serve, @rhom, req, res
+    end
+
+  end # RhoApplication
+end # Rho

data/lib/rho/rhocontroller.rb

@@ -0,0 +1,51 @@
+if defined? RHO_ME
+	require 'rho/renderME'
+else
+	require 'rho/render'
+end
+
+require 'rho/rhosupport'
+
+module Rho
+  class RhoController
+	
+    def default_action
+      return Hash['GET','show','PUT','update','POST','update',
+        'DELETE','delete'][@request['request-method']] unless @request['id'].nil?
+      return Hash['GET','index','POST','create'][@request['request-method']]
+    end 
+	
+    def serve(object_mapping,req,res)
+      @request, @response = req, res;
+      @object_mapping = object_mapping
+      @params = RhoSupport::query_params req
+      send req['action'].nil? ? default_action : req['action']
+    end
+	
+    def link_to(name,action,id=nil,confirm=nil)
+      action = action.to_s
+      if (action != 'delete')
+        "<a href=\"#{url_for(action,id)}\">#{name}</a>"
+      else
+        "<a href=\"#{url_for(action,id)}\" onclick=\""+  #if (confirm('#{confirm}')) { 
+        "var f = document.createElement('form'); f.style.display = 'none';" + 
+          "this.parentNode.appendChild(f); f.method = 'POST'; f.action = this.href;f.submit();"+
+          "return false;\">#{name}</a>"
+      end	
+    end
+	
+    def url_for(action,id=nil)
+      action = action.to_s
+      amurl = '/'+@request['application']+'/'+@request['model'] 
+      return amurl if action == 'create' or action == 'index'
+      return amurl +'/'+ (id.nil? ? action.to_s : id.to_s + '/' + action.to_s)
+    end
+	
+    def redirect(action,id=nil)
+      @response['status'] = 302
+      @response['headers']['Location'] = url_for(action,id)
+      @response['message'] = 'Moved temporarily'
+      return ''
+    end
+  end # RhoController
+end # Rho

data/lib/rho/rhofsconnector.rb

@@ -0,0 +1,39 @@
+require 'find'
+
+module Rho
+  class RhoFSConnector
+
+    class << self
+	
+      def get_app_path(appname)
+        File.join(File.dirname(File.expand_path(__FILE__)), '../../apps/'+appname+'/')
+      end
+      
+      def get_base_app_path
+        File.join(File.dirname(File.expand_path(__FILE__)), '../../apps/')
+      end
+
+      def get_model_path(appname, modelname)
+        File.join(File.dirname(File.expand_path(__FILE__)), '../../apps/'+appname+'/'+modelname+'/')
+      end
+
+	    def get_db_fullpathname
+  		  if defined? SYNC_DB_FILE
+  			  File.join(File.dirname(File.expand_path(__FILE__)), SYNC_DB_FILE)
+  		  else
+  			  File.join(File.dirname(File.expand_path(__FILE__)), '../../db/syncdb.sqlite')
+  		  end
+  	  end
+	  
+  	  def enum_files(paths, filename) # :yield: path
+  		  Find.find(paths) do |path| 
+  		    if File.basename(path) == filename
+  		      yield path
+  		    end
+  		  end
+  	  end
+		  
+    end
+
+  end # RhoApplication
+end # Rho

data/lib/rho/rhofsconnectorME.rb

@@ -0,0 +1,36 @@
+
+module Rho
+  class RhoFSConnector
+
+    class << self
+	
+      def get_app_path(appname)
+		    'apps/'+appname+'/'
+      end
+      
+      def get_base_app_path
+	      'apps/'  
+      end
+
+      def get_model_path(appname, modelname)
+		    'apps/'+appname+'/'+modelname+'/'  
+      end
+
+	    def get_db_fullpathname
+  		  if defined? SYNC_DB_FILE
+  			  SYNC_DB_FILE
+  		  else
+  			  'syncdb_.dbs'
+  		  end
+  	  end
+	  
+      def enum_files(paths, filename) # :yield: path
+		yield get_app_path('Rhosugar/Account') + filename
+		yield get_app_path('Rhosugar/Case') + filename  
+		yield get_app_path('Rhosugar/Employee') + filename  
+  	  end
+		  
+    end
+
+  end # RhoApplication
+end # Rho