orange-core 0.6.0 → 0.7.0

data/README.markdown

@@ -2,12 +2,15 @@ Orange
 ======
 
 Orange is intended to be a middle ground between the simplicity of Sinatra 
-and the power of Rails. Orange is being developed by Orange Sparkle Ball, inc
-for our own use. 
+and the power of Rails. It also throws a bit of django's auto admin interface
+into the mix. Orange is being developed by Orange Sparkle Ball, inc
+for developing websites for our clients quickly and efficiently, but certainly 
+could be adapted to other uses... if you come up with something creative, let
+us know.
 
 orange-core represents the core dependencies for orange applications. If you want
-a full featured Orange-based CMS, we're working on splitting that into the Sparkles
-project.
+a full featured Orange-based CMS (where the automatic admin interface comes in), 
+look at [orange-sparkles](http://github.com/orange-project/orange-sparkles).
 
 **Note**: Orange is still in a "beta" stage. Test coverage is lack-luster at best. The library is being used on a few currently live (low traffic) sites, so it might be stable enough to use on your own projects let us know if you have issues.
 
@@ -32,8 +35,8 @@ Should I Use Orange?
     "I want to create a quick RESTful web service that does one thing and does it well"
 
 Sinatra is probably better for this kind of thing. It's perfect for creating quick web apps based on RESTful
-ideals. Or perhaps use a Sinatra clone built on Orange, so you can incorporate orange plugins... 
-but such a clone doesn't exist (yet).
+ideals. Or perhaps use a Sinatra clone built on Orange, so you can incorporate orange plugins and built in 
+database support... but such a clone doesn't exist [does it](http://github.com/therabidbanana/orange-juice)?
 
     "I want to create a powerful web application that needs to be rock solid and use a 
     well-tested foundation"
@@ -43,43 +46,31 @@ for building web applications that gives you everything you need for the lifecyc
 application
 
     "I want to deploy a website on Ruby that has some dynamic elements, maybe allowing me
-    to create parts of the page in a plugin if necessary."
+    to create my own plugin without jumping through too many hoops."
     
 Yes. This is what orange was designed for - we're building it to be able to quickly deploy
-websites that can have a Ruby base without the heavy-weight Ruby on Rails backend, but without
-feeling like you have to start from scratch like it feels in Sinatra.
+websites that can have a Ruby base without the heavy-weight Ruby on Rails backend, but also 
+without feeling like you have to start from scratch like it feels in Sinatra.
 
 
 Required Gems
 -------------
 
-To be updated... (this is full list for orange-core and orange-more, we're looking to minimize 
-orange-core dependencies).
+orange-core tries to stay light on the dependencies. 
 
-* dm-core (+ do_[sqlite3|mysql|...] )
-* dm-more
-* dm-is-awesome_set
+* dm-core (+ dm-[sqlite3|mysql|...]-adapter )
+* dm-migrations
 * rack
 * haml
-* rack-abstract-format (github)
-* ruby-openid
-* rack-openid
-* openid_dm_store
-* radius
 * crack
-* eventbright
-* spreedly
-* hominid
-* mail
-* tlsmail (If Ruby version <= 1.8.6)
-* gattica
 
 All dependencies should be loaded if you install the gem except for the datamapper
 adapter relevant to your set up. If, for example, you want to use a mysql database,
-you'll need to install do_mysql, and for an sqlite3 database, you'll need do_sqlite3
+you'll need to install dm-mysql-adapter, and for an sqlite3 database, you'll need dm-sqlite-adapter
 
 
-Also, you'll need a web server of some kind and need to set it up for rack.
+Also, you'll need a web server of some kind and need to set it up for rack. Rack supports
+WEBrick out of the box if you just want to play around though.
 
 **Testing** 
 

data/lib/orange-core/application.rb

@@ -106,11 +106,15 @@ module Orange
     # Returns an instance of Orange::Stack to be run by Rack
     #
     # Usually, you'll call this in the rackup file: `run MyApplication.app`
-    def self.app(c = false)
+    def self.app(c = false, &block)
       if c
         self.core = c 
       else
-        self.core ||= Orange::Core.new
+        if block_given?
+          self.core = Orange::Core.new(&block)
+        else
+          self.core ||= Orange::Core.new
+        end
       end
       return self.core.stack unless self.core.stack.blank?
       if self.stack_block.instance_of?(Proc)
@@ -125,6 +129,7 @@ module Orange
     # 
     # Each call to stack overrides the previous one.
     def self.stack(core = false, &block)
+      self.core.stack = nil if self.core   # Wipe old stack from core
       self.core = core if core
       self.stack_block = Proc.new           # pulls in the block and makes it a proc
     end

data/lib/orange-core/carton.rb

@@ -37,13 +37,10 @@ module Orange
       HEREDOC
     end
     
-    # Include DataMapper types (required to be able to use Serial)
-    include DataMapper::Types
-    
     # Do setup of object and declare an id
     def self.id
       include DataMapper::Resource
-      property(:id, Serial)
+      property(:id, DataMapper::Property::Serial)
       self.scaffold_properties ||= []
       self.init
     end
@@ -53,8 +50,19 @@ module Orange
     end
     
     # Return properties that should be shown for a given context
-    def self.form_props(context = :live)
-      self.scaffold_properties.select{|p| p[:levels].include?(context)  }
+    def self.form_props(context = :live, mode = :any)
+      self.scaffold_properties.select{|p| should_use?(p, context, mode)  }
+    end
+    
+    def self.should_use?(property, context, mode = :any )
+      if(mode == :any || mode.blank?)
+        property[:levels].include?(context)
+      else
+        (property[:levels].include?(context) && 
+          (property[:lazy] == false || 
+           property[:lazy] == mode || 
+           (property[:lazy].is_a?(Array) && property[:lazy].include?(mode))))
+      end
     end
     
     # Helper to wrap properties into admin level
@@ -79,7 +87,7 @@ module Orange
     end
     
     def self.add_scaffold(name, type, dm_type, opts)
-      self.scaffold_properties << {:name => name, :type => type, :levels => @levels}.merge(opts) if @levels || opts.has_key?(:levels)
+      self.scaffold_properties << {:name => name, :type => type, :levels => @levels, :lazy => false}.merge(opts) if @levels || opts.has_key?(:levels)
       opts = opts.delete_if{|k,v| SCAFFOLD_OPTIONS.include?(k)} # DataMapper doesn't like arbitrary opts
       self.property(name, dm_type, opts)
     end
@@ -111,13 +119,13 @@ module Orange
     # Define a helper for fulltext type database stuff
     # Show in a context if wrapped in one of the helpers
     def self.fulltext(name, opts = {})
-      add_scaffold(name, :fulltext, Text, opts)
+      add_scaffold(name, :fulltext, DataMapper::Property::Text, opts.with_defaults(:lazy => true))
     end
     
     # Define a helper for boolean type database stuff
     # Show in a context if wrapped in one of the helpers
     def self.boolean(name, opts = {})
-      add_scaffold(name, :boolean, Boolean, opts)
+      add_scaffold(name, :boolean, DataMapper::Property::Boolean, opts.with_defaults(:lazy => true))
     end
     
     # Define a helper for input type="text" type database stuff

data/lib/orange-core/core.rb

@@ -1,4 +1,6 @@
 require 'dm-core'
+require 'extlib/mash'
+require 'extlib/inflection'
 require 'dm-migrations'
 require 'rack'
 require 'rack/builder'
@@ -12,8 +14,15 @@ module Orange
   attr_accessor :plugins
   
   # Support for plugins
-  def self.plugins
+  def self.plugins(plugin_list = false)
     @plugins ||= []
+    return @plugins unless plugin_list
+    @plugins.select do |p| 
+      plugin_list.include?(
+        Extlib::Inflection::underscore(
+          Extlib::Inflection::demodulize(p.class.to_s)
+        ).to_sym)
+    end
   end
   
   # Allows adding plugins
@@ -46,8 +55,7 @@ module Orange
       {
         :contexts => [:live, :admin, :orange],
         :default_context => :live,
-        :default_resource => :not_found,
-        :default_database => 'sqlite3::memory:'
+        :default_resource => :not_found
       } unless defined?(DEFAULT_CORE_OPTIONS)
     
     # Args will be set to the @options array. 
@@ -64,7 +72,7 @@ module Orange
     # This method calls afterLoad when it is done. Subclasses can override
     # the afterLoad method for initialization needs.
     def initialize(*args, &block)
-      @options = Options.new(*args, &block).hash.with_defaults(DEFAULT_CORE_OPTIONS)
+      @options = Mash.new(Options.new(*args, &block).hash.with_defaults(DEFAULT_CORE_OPTIONS))
       @resources = {}
       @application = false
       @stack = false
@@ -75,14 +83,15 @@ module Orange
       load(Orange::Mapper.new, :mapper)
       load(Orange::Scaffold.new, :scaffold)
       load(Orange::PageParts.new, :page_parts)
-      Orange.plugins.each{|p| p.resources.each{|args| load(*args)} if p.has_resources?}
+      
+      Orange.plugins(@options['plugins']).each{|p| p.resources.each{|args| load(*args)} if p.has_resources?}
       self.register(:stack_loaded) do |s| 
         @middleware.each{|m| m.stack_init if m.respond_to?(:stack_init)}
         @application.stack_init if @application
       end
       self.register(:stack_reloading){|s| @middleware = []} # Dump middleware on stack reload
-      # load(Orange::AdminResource.new, :admin)
       afterLoad
+      options[:development_mode] = true if ENV['RACK_ENV'] && ENV['RACK_ENV'] == 'development'
       self
     end
     
@@ -160,12 +169,15 @@ module Orange
     # Takes an instance of Orange::Stack and saves it. 
     def stack(new_stack = false)
       @stack = new_stack if new_stack
+      @middleware = [] if new_stack
       @stack
     end
     
     # Takes an instance of Orange::Stack and saves it.
     def stack=(new_stack)
       @stack = new_stack
+      @middleware = []
+      @stack
     end
     
     # Convenience self for consistent naming across middleware
@@ -215,8 +227,9 @@ module Orange
     
     # Returns options of the orange core
     # 
-    # @return [Hash] Hash of options
-    def options
+    # @return [Mash] Hash-like mash of options
+    def options(*args, &block)
+      @options.merge(Options.new(*args, &block).hash) if (args.size > 0 || block_given?)
       @options
     end
     
@@ -263,5 +276,9 @@ module Orange
     def inspect
       "#<Orange::Core:0x#{self.object_id.to_s(16)}>"
     end
+    
+    def plugins
+      Orange.plugins(options['plugins'])
+    end
   end
 end

data/lib/orange-core/magick.rb

@@ -1,3 +1,6 @@
+# This file is a set of crazy monkey patches and other support oddities.
+#
+
 # Monkey Patch the extract_options! stolen from ActiveSupport
 # @private
 class ::Array #:nodoc:

data/lib/orange-core/middleware/abstract_format.rb

@@ -0,0 +1,46 @@
+require 'orange-core/middleware/base'
+require 'pathname'
+
+module Orange::Middleware
+  # This is an adapted Orange version of mynyml's rack-abstract-format
+  # available at http://github.com/mynyml/rack-abstract-format 
+  class AbstractFormat < Base
+    def init(opts = {})
+    end
+    
+    def packet_call(packet)
+      path_info = packet['route.path'] || packet.env['PATH_INFO']
+      path = Pathname(path_info)
+      packet['route.path'] = path.to_s.sub(/#{path.extname}$/,'') if Rack::Mime::MIME_TYPES.include?(path.extname)
+      packet.env['HTTP_ACCEPT'] = concat(packet.env['HTTP_ACCEPT'], Rack::Mime.mime_type(path.extname))
+      
+      pass packet
+    end
+    
+    private
+      def concat(accept, type)
+        (accept || '').split(',').unshift(type).compact.join(',')
+      end
+  end
+end
+
+# 
+# Copyright © 2009 Martin Aumont (mynyml)
+# 
+# Permission is hereby granted, free of charge, to any person obtaining a copy of
+# this software and associated documentation files (the "Software"), to deal in
+# the Software without restriction, including without limitation the rights to
+# use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
+# of the Software, and to permit persons to whom the Software is furnished to do
+# so, subject to the following conditions:
+# 
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+# 
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.

data/lib/orange-core/middleware/database.rb

@@ -1,5 +1,6 @@
 require 'orange-core/middleware/base'
-
+require 'dm-core'
+require 'dm-migrations'
 module Orange::Middleware
   
   class Database < Base
@@ -11,13 +12,15 @@ module Orange::Middleware
     
     def stack_init
       unless orange.options.has_key?('database') && orange.options['database'] == false
-        db = orange.options['database'] || 'sqlite3::memory:'
+        db = ENV["DATABASE_URL"] || orange.options['database'] || "sqlite3://#{orange.app_dir('dev_db.sqlite')}"
+        orange.options['database'] = db
         orange.load_db!(db) 
         orange.upgrade_db! unless @options[:no_auto_upgrade] || orange.options['db_no_auto_upgrade']
       end
     end
     
     def packet_call(packet)
+      packet["database.url"] = orange.options["database"]
       path = packet['route.path'] || packet.request.path_info
       if @options[:migration_url] && @options[:migration_url] == path
         orange.migrate_db!

data/lib/orange-core/middleware/globals.rb

@@ -8,10 +8,10 @@ module Orange::Middleware
       @globals = orange[:parser].yaml(@file) || {}
       @globals.each{|k,v| orange.options[k] = v}
     end
+    
     def packet_call(packet)
       packet['orange.globals'] ||= orange.options
       pass packet
     end
-    
   end
 end

data/lib/orange-core/middleware/restful_router.rb

@@ -20,13 +20,15 @@ module Orange::Middleware
       parts = route_parts(packet)
       if(should_route?(packet, parts))
         # Take parts of route and set packet info
-        packet['route.resource'] = parts[:resource] if parts[:resource]
-        packet['route.resource_id'] = parts[:resource_id] if parts[:resource_id]
-        packet['route.resource_action'] = parts[:resource_action] if parts[:resource_action]
+        first_part = parts.pop
         
-        # Take remainder and set to resource_path
-        packet['route.resource_path'] = parts[:remainder]
+        packet['route.resource'] = first_part[:resource] if first_part[:resource]
+        packet['route.resource_id'] = first_part[:resource_id] if first_part[:resource_id]
+        packet['route.resource_action'] = first_part[:resource_action] if first_part[:resource_action]
         
+        # Take remainder and set to resource_path
+        packet['route.resource_path'] = first_part[:remainder] if first_part[:remainder]
+        packet['route.nesting'] = parts
         # Set self as router if resource was found
         if(packet['route.resource', false]) 
           packet['route.router'] = self
@@ -39,24 +41,26 @@ module Orange::Middleware
       pass packet
     end
     
-    def route_parts(packet)
+    def get_parts(path, nested_in = nil)
       return_parts = {}
-      path = packet['route.path'] || packet.request.path_info
       parts = path.split('/')
       pad = parts.shift
       if !parts.empty?
         resource = parts.shift
-        if orange.loaded?(resource.to_sym)
+        if orange.loaded?(resource.to_sym) && (!nested_in || orange[nested_in].nests.keys.include?(resource.to_sym))
           return_parts[:resource] = resource.to_sym
           if !parts.empty?
             second = parts.shift
             if second =~ /^\d+$/
               return_parts[:resource_id] = second
-              if !parts.empty?
+              if !(parts.empty? || orange[resource.to_sym].nests.keys.include?(parts.first.to_sym))
                 return_parts[:resource_action] = parts.shift.to_sym
               else
                 return_parts[:resource_action] = :show
               end
+            elsif orange[resource.to_sym].nests.keys.include?(second.to_sym)
+              # we're nesting if the action is the same as a resource name
+              return_parts[:resource_action] = :show
             else
               return_parts[:resource_action] = second.to_sym
             end 
@@ -71,15 +75,40 @@ module Orange::Middleware
       return_parts
     end
     
+    def route_parts(packet)
+      path = packet['route.path'] || packet.request.path_info
+      my_parts = []
+      my_parts << get_parts(path)
+      new_path = my_parts.last[:remainder]
+      nested = my_parts.last[:resource]
+      until (new_path.blank? || new_path == "/" )
+        parts = get_parts(new_path, nested)
+        break if new_path == parts[:remainder]
+        my_parts << parts
+        new_path = parts[:remainder]
+        nested = my_parts.last[:resource]
+      end
+      my_parts
+    end
+    
     def should_route?(packet, parts)
       return false unless @exposed.has_key?(packet['route.context'])
-      action_exposed?(@exposed[packet['route.context']], parts)      
+      if parts.first[:resource].blank? || !(orange[parts.first[:resource]].respond_to?(:exposed))
+        action_exposed?(@exposed[packet['route.context']], parts.first)   
+      else
+        # This allows ModelResources to expose their own action.
+        # (Other resources too, but those ones have to explicitly define
+        # the #exposed(packet) method to work)
+        new_parts = parts.first.dup
+        new_parts.delete(:resource)
+        action_exposed?(orange[parts.first[:resource]].exposed(packet), new_parts)
+      end
     end
     
     def action_exposed?(list, route_parts)
       return true if list == :all
       return true if list == route_parts[:resource_action]
-      return true if list.is_a?(Array) && list.include?(route_parts[:resource_action])
+      return true if list.is_a?(Array) && (list.include?(route_parts[:resource_action]) || list.include?(:all))
       if list.is_a?(Hash)
         all = list.has_key?(:all) ? action_exposed?(list[:all], route_parts) : false
         one = list.has_key?(route_parts[:resource]) ? action_exposed?(list[route_parts[:resource]], route_parts) : false

data/lib/orange-core/middleware/root_dir.rb

@@ -0,0 +1,19 @@
+require 'orange-core/middleware/base'
+
+module Orange::Middleware
+  # This middleware handles sites in subdirs
+  class RootDir < Base
+    def packet_call(packet)
+      request = packet.request
+      path_info = packet['route.path'] || packet.env['PATH_INFO']
+      unless(orange.options['root_dir'].blank? || packet['route.root_dir'])
+        root = orange.options['root_dir']
+        packet['route.root_dir'] = root
+        my_regex = root.kind_of?(Regexp) ? root : /^#{orange.options['root_dir']}/
+        path_info = path_info.sub(my_regex, "/")
+        packet['route.path'] = path_info.blank? ? "/" : path_info
+      end
+      pass packet
+    end
+  end
+end

data/lib/orange-core/middleware/show_exceptions.rb

@@ -20,17 +20,30 @@ module Orange::Middleware
     def call(env)
       @app.call(env)
     rescue Exception => e
-      backtrace = pretty(env, e)
+      if(orange.options[:development_mode])
+        backtrace = pretty(env, e)
       
-      [500,
-       {"Content-Type" => "text/html",
-        "Content-Length" => backtrace.join.size.to_s},
-       backtrace]
+        return [500,
+         {"Content-Type" => "text/html",
+          "Content-Length" => backtrace.join.size.to_s},
+         backtrace]
+      else
+        page = error_page(env)
+        return [500, {"Content-Type" => "text/html",
+          "Content-Length" => page.join.size.to_s},
+         page]
+      end
     end
     
     def packet_call(packet)
       backtrace = pretty()
     end
+    
+    def error_page(env)
+      packet = Orange::Packet.new(@core, env)
+      parse = orange[:parser].haml("500.haml", packet, :template => true)
+      [parse]
+    end
 
     def pretty(env, exception)
       req = Rack::Request.new(env)
@@ -73,7 +86,11 @@ module Orange::Middleware
       when String
         Rack::Utils.escape_html(obj)
       else
-        Rack::Utils.escape_html(obj.inspect)
+        begin 
+          Rack::Utils.escape_html(obj.inspect)
+        rescue Exception => e
+          "Object #{obj.class.to_s} could not be inspected"
+        end
       end
     end
   end

data/lib/orange-core/middleware/static.rb

@@ -35,11 +35,11 @@ module Orange::Middleware
 
     def initialize(app, core, options={})
       @lib_urls = {'_orange_' => File.join(core.core_dir, 'assets') }
-      Orange.plugins.each{|p| @lib_urls[p.assets_name] = p.assets if p.has_assets?}
+      core.plugins.each{|p| @lib_urls[p.assets_name] = p.assets if p.has_assets?}
       
       @app = app
       @core = core      
-      @urls = options[:urls] || ["/favicon.ico", "/assets/public", "/assets/uploaded"]
+      @urls = options[:asset_urls] || ["/favicon.ico", "/assets/public", "/assets/uploaded"]
       @root = options[:root] || File.join(orange.app_dir, 'assets')
       @file_server = Orange::Middleware::StaticFile.new(@root)
     end
@@ -50,14 +50,14 @@ module Orange::Middleware
         path.index(File.join('', 'assets', url)) == 0 
       }.first
       can_serve = @urls.any?{|url| path.index(url) == 0 }
-      if can_serve_lib
+      if can_serve
+        packet['route.path'] = path.gsub(/^\/assets/, '')
+        @file_server.call(packet.env)
+      elsif can_serve_lib
         lib_url = can_serve_lib.first
         packet['file.root'] = can_serve_lib.last
         packet['route.path'] = path.split(lib_url, 2).last        
         @file_server.call(packet.env)
-      elsif can_serve
-        packet['route.path'] = path.gsub(/^\/assets/, '')
-        @file_server.call(packet.env)
       else
         pass packet
       end

data/lib/orange-core/middleware/template.rb

@@ -44,6 +44,14 @@ module Orange::Pulp::Template
       content
     end
   end
+  def template(name)
+    name = name.to_s if name.kind_of?(Symbol)
+    name = name + ".haml" unless name =~ /\.haml$/
+    packet['template.file'] == name
+  end
+  def layout(name)
+    template(name)
+  end
 end
 
 module Orange::Mixins::Template

data/lib/orange-core/resource.rb

@@ -7,9 +7,20 @@ module Orange
     # Defines a model class as an inheritable class attribute and also an instance
     # attribute
     cattr_accessor :called
+    cattr_accessor :viewable_actions
+    
+    def nests
+      {}
+    end
+    
+    def self.viewable(*args)
+      self.viewable_actions ||= []
+      args.each{|arg| self.viewable_actions << arg}
+    end
     
     def initialize(*args, &block)
       @options = DefaultHash.new.merge!(Options.new(*args, &block).hash)
+      self.class.viewable_actions ||= []
     end
     
     def set_orange(orange, name)
@@ -44,7 +55,20 @@ module Orange
     end
     
     def view(packet = false, *args)
-      ''
+      opts = args.extract_options!
+      my_action = packet['route.resource_action'] if packet
+      action = opts[:mode] || opts[:resource_action] || my_action || :index
+      viewable(packet, action, opts)
+    end
+    
+    def viewable(packet, mode, opts={})
+      if(self.respond_to?(mode))
+        self.__send__(mode, packet, opts)
+      elsif(self.class.viewable_actions.include?(mode))
+        do_view(packet, mode, opts)
+      else
+        ''
+      end
     end
     
     def orange_name

data/lib/orange-core/resources/mapper.rb

@@ -7,6 +7,12 @@ module Orange
       orange.add_pulp Pulp::Packet_Mapper
     end
     
+    def root_url(packet)
+      root = ''
+      root += packet['route.root_dir'].gsub(/\/$/,'') if packet['route.root_dir']
+      root += '/'
+    end
+    
     def route_to(packet, resource, *args)
       opts = args.extract_options!
       packet = DefaultHash.new unless packet 
@@ -16,13 +22,25 @@ module Orange
       args.unshift(resource)
       args.unshift(context)
       args.unshift(site)
-      '/'+args.compact.join('/')
+      root_url(packet) + args.compact.join('/')
     end
   end
   
   module Pulp::Packet_Mapper
     def route_to(resource, *args)
-      orange[:mapper].route_to(self, resource, *args)
+      if resource.respond_to?(:full_path)
+        orange[:mapper].root_url(packet) + resource.full_path.gsub(/^\//,'')
+      else
+        orange[:mapper].route_to(self, resource, *args)
+      end
+    end
+    
+    def root_url
+      orange[:mapper].root_url(packet)
+    end
+    
+    def full_url(*args)
+      orange[:mapper].root_url(packet) + args.compact.join('/')
     end
     
     def reroute(url, type = :real, *args)