orange-more 0.5.7

data/lib/orange-more/sitemap/views/default_resource/sitemap_row.haml

@@ -0,0 +1,30 @@
+- if route
+  .sitemap_item{:class => "sitemap_level_#{route.level}"}
+    - if route.level > 0
+      .move_actions.dent_actions
+        = form_link('Outdent', route_to(:sitemap, route.id, 'outdent'), false, {:method => 'post', :class => 'outdent arrow'}) if route.level > 1
+        %p= ' '
+      .move_actions
+        - if route.previous_sibling
+          = form_link('Up', route_to(:sitemap, route.id, 'higher'), false, {:method => 'post', :class => 'up arrow'}) 
+        - else
+          %p.disabled_up.arrow= ' '
+        - if route.next_sibling
+          = form_link('Down', route_to(:sitemap, route.id, 'lower'), false, {:method => 'post', :class => 'down arrow'}) 
+        - else
+          %p.disabled_down.arrow= ' '
+      .move_actions.dent_actions
+        = form_link('Indent', route_to(:sitemap, route.id, 'indent'), false, {:method => 'post', :class => 'indent arrow'}) if route.previous_sibling && route.previous_sibling.level == route.level
+        %p= ' '
+    %h4 #{route.link_text} <span>(#{route.full_path})</span>
+    .linked_to
+      %p 
+        Linked to: 
+        %a{:href => route.resource.blank? ?  '#' : route_to(route.resource, route.resource_id, 'edit')} [#{route.resource}] ##{route.resource_id}
+      %p  
+        Views:
+        = orange[:analytics].pageviews(route.full_path)
+    .actions
+      = form_link('Delete', route_to(:sitemap, route.id, 'delete'), 'Are you sure you want to delete this?', {:method => 'delete'})
+      %a{:href => route_to(:sitemap, route.id, 'edit')} Edit
+    %br.clear

data/lib/orange-more/sitemap/views/sitemap/breadcrumb.haml

@@ -0,0 +1,12 @@
+- if model
+  %p
+    - for a in model.ancestors
+      %a{:href => a.full_path}= a.link_text
+      >
+    %span.here= model.link_text
+- else # Possibly a restful route
+  %p
+    - home = orange[:sitemap].home(packet)
+    %a{:href => home.full_path}= home.link_text
+    >
+    %span.here= packet['route.resource'].to_s.capitalize

data/lib/orange-more/sitemap/views/sitemap/list.haml

@@ -0,0 +1,4 @@
+#sitemap_list
+  - for obj in list
+    = view_table_row(model_name, :model => obj)
+%a{:href => route_to(model_name, 'create')} New

data/lib/orange-more/sitemap/views/sitemap/one_level.haml

@@ -0,0 +1,7 @@
+%ul.nav
+  %li.first
+    %a{:href => model.full_path} Home
+  - for item in model.children
+    - next unless item.show_in_nav
+    %li
+      %a{:href => item.full_path}= orange[:sitemap].link_text_for(item)

data/lib/orange-more/sitemap/views/sitemap/route_actions.haml

@@ -0,0 +1,15 @@
+.move_actions.dent_actions
+  = form_link('Outdent', route_to(:sitemap, model.id, 'outdent'), false, {:method => 'post', :class => 'outdent arrow'}) if model.level > 1
+  %p= ' '
+.move_actions
+  - if model.previous_sibling
+    = form_link('Up', route_to(:sitemap, model.id, 'higher'), false, {:method => 'post', :class => 'up arrow'}) 
+  - else
+    %p.disabled_up.arrow= ' '
+  - if model.next_sibling
+    = form_link('Down', route_to(:sitemap, model.id, 'lower'), false, {:method => 'post', :class => 'down arrow'}) 
+  - else
+    %p.disabled_down.arrow= ' '
+.move_actions.dent_actions
+  = form_link('Indent', route_to(:sitemap, model.id, 'indent'), false, {:method => 'post', :class => 'indent arrow'}) if model.previous_sibling && model.previous_sibling.level == model.level
+  %p= ' '

data/lib/orange-more/sitemap/views/sitemap/sitemap_links.haml

@@ -0,0 +1,14 @@
+- if list.empty?
+  .sitemap_links_info.notice
+    %p
+      This resource is not in the sitemap.
+      %a{:href => add_route_link + '/' + slug_me} Add one?
+- else
+  .sitemap_links_info.success
+    %h4 Current Route: #{list.first.full_path} #{list.size > 1 ? '(and ' + (list.size - 1).to_s + ' others)' : ''}
+    %a.more_info{:href=>'#'} More Info
+    .sitemap_links{:style => 'display:none'}
+      - for obj in list
+        .sitemap_link
+          %span Path: #{obj.full_path}
+      %a{:href => add_route_link + '/' + slug_me} Add another?

data/lib/orange-more/sitemap/views/sitemap/table_row.haml

@@ -0,0 +1,30 @@
+- if model
+  .sitemap_item{:class => "sitemap_level_#{model.level}"}
+    - if model.level > 0
+      .move_actions.dent_actions
+        = form_link('Outdent', route_to(model_name, model.id, 'outdent'), false, {:method => 'post', :class => 'outdent arrow'}) if model.level > 1
+        %p= ' '
+      .move_actions
+        - if model.previous_sibling
+          = form_link('Up', route_to(model_name, model.id, 'higher'), false, {:method => 'post', :class => 'up arrow'}) 
+        - else
+          %p.disabled_up.arrow= ' '
+        - if model.next_sibling
+          = form_link('Down', route_to(model_name, model.id, 'lower'), false, {:method => 'post', :class => 'down arrow'}) 
+        - else
+          %p.disabled_down.arrow= ' '
+      .move_actions.dent_actions
+        = form_link('Indent', route_to(model_name, model.id, 'indent'), false, {:method => 'post', :class => 'indent arrow'}) if model.previous_sibling && model.previous_sibling.level == model.level
+        %p= ' '
+    %h4 #{orange[:sitemap].link_text_for(model)} <span>(#{model.full_path})</span>
+    .linked_to
+      %p 
+        Linked to: 
+        %a{:href => model.resource.blank? ?  '#' : route_to(model.resource, model.resource_id, 'edit')} [#{model.resource}] ##{model.resource_id}
+      %p  
+        Views:
+        = orange[:analytics].pageviews(route.full_path)
+    .actions
+      = form_link('Delete', route_to(model_name, model.id, 'delete'), 'Are you sure you want to delete this?', {:method => 'delete'})
+      %a{:href => route_to(model_name, model.id, 'edit')} Edit
+    %br.clear

data/lib/orange-more/sitemap/views/sitemap/two_level.haml

@@ -0,0 +1,13 @@
+%ul.nav
+  %li.first
+    %a{:href => model.full_path} Home
+  - for item in model.children
+    - next unless item.show_in_nav
+    %li
+      %a{:href => item.full_path}= orange[:sitemap].link_text_for(item)
+      - unless item.descendants.empty?
+        %ul.subnav
+          - for x in item.children
+            - next unless x.show_in_nav
+            %li
+              %a{:href => x.full_path}= orange[:sitemap].link_text_for(x)

data/lib/orange-more/slices.rb

@@ -0,0 +1 @@
+require File.join('orange-more', 'slices', 'plugin')

data/lib/orange-more/slices/middleware/radius_parser.rb

@@ -0,0 +1,24 @@
+require 'orange-core/middleware/base'
+
+module Orange::Middleware
+  # The RadiusParser middleware will parse all outgoing content with 
+  # Radius.
+  #
+  # For more details on how Radius works, see http://radius.rubyforge.org/
+  # This middleware also loads a resource: "Orange::Radius", for the
+  # purpose of exposing the context object.
+  class RadiusParser < Base
+    def init(opts = {})
+      @contexts = opts[:radius_contexts] || [:live]
+      # orange.load Orange::Radius.new, :radius
+    end
+    
+    # Passes packet then parses the return
+    def packet_call(packet)
+      pass packet
+      orange[:radius].parse packet if @contexts.include? packet['route.context']
+      packet.finish
+    end
+    
+  end
+end

data/lib/orange-more/slices/plugin.rb

@@ -0,0 +1,15 @@
+Dir.glob(File.join(File.dirname(__FILE__), 'resources', '*.rb')).each {|f| require f }
+Dir.glob(File.join(File.dirname(__FILE__), 'middleware', '*.rb')).each {|f| require f }
+
+module Orange::Plugins
+  class Slices < Base    
+    resource    Orange::Radius.new
+    resource    Orange::Slices.new
+    
+    postrouter  Orange::Middleware::RadiusParser
+    
+  end
+end
+
+Orange.plugin(Orange::Plugins::Slices.new)
+

data/lib/orange-more/slices/resources/radius.rb

@@ -0,0 +1,117 @@
+require 'radius'
+
+module Orange
+  # Radius resource is for exposing the Radius context
+  # and allowing parsing.
+  class Radius < Resource
+    call_me :radius
+    def afterLoad
+      @context = ::Radius::PacketContext.new
+      @defined_tags = []
+      orange.fire(:radius_loaded, self)
+    end
+    
+    def context
+      @context
+    end
+    
+    def defined_tags
+      @defined_tags
+    end
+    
+    def define_tag(*args, &block)
+      @defined_tags << args.first unless @defined_tags.include? args.first
+      @context.define_tag(*args, &block)
+    end
+    
+    def parse_text(packet, text = false)
+      content = text
+      unless content.blank? 
+        parser = ::Radius::PacketParser.new(context, :tag_prefix => 'o')
+        parser.parse(content, packet)
+      end
+    end
+    
+    def parse(packet)
+      content = packet[:content, false]
+      unless content.blank? 
+        parser = ::Radius::PacketParser.new(context, :tag_prefix => 'o')
+        packet[:content] = parser.parse(content, packet)
+      end
+    end
+  end
+end
+
+module Radius
+  #
+  # The Radius parser. Initialize a parser with a Context object that
+  # defines how tags should be expanded. See the QUICKSTART[link:files/QUICKSTART.html]
+  # for a detailed explaination of its usage.
+  #
+  class PacketParser < Parser
+    def parse(string, packet = false)
+      @stack = [ParseContainerTag.new { |t| t.contents.to_s }]
+      tokenize(string)
+      stack_up(packet)
+      @stack.last.to_s
+    end
+ 
+    protected
+    
+    def stack_up(packet = false)
+      @tokens.each do |t|
+        if t.is_a? String
+          @stack.last.contents << t
+          next
+        end
+        case t[:flavor]
+        when :open
+          @stack.push(ParseContainerTag.new(t[:name], t[:attrs]))
+        when :self
+          @stack.last.contents << ParseTag.new {@context.render_tag(t[:name], t[:attrs], packet)}
+        when :close
+          popped = @stack.pop
+          raise WrongEndTagError.new(popped.name, t[:name], @stack) if popped.name != t[:name]
+          popped.on_parse { |b| @context.render_tag(popped.name, popped.attributes, packet) { b.contents.to_s } }
+          @stack.last.contents << popped
+        when :tasteless
+          raise TastelessTagError.new(t, @stack)
+        else
+          raise UndefinedFlavorError.new(t, @stack)
+        end
+      end
+      raise MissingEndTagError.new(@stack.last.name, @stack) if @stack.length != 1
+    end
+  end
+  class PacketContext < Context
+
+    # Returns the value of a rendered tag. Used internally by Parser#parse.
+    def render_tag(name, attributes = {}, packet = false, &block)
+      if name =~ /^(.+?):(.+)$/
+        render_tag($1) { render_tag($2, attributes, packet, &block) }
+      else
+        tag_definition_block = @definitions[qualified_tag_name(name.to_s)]
+        if tag_definition_block
+          stack(name, attributes, packet, block) do |tag|
+            tag_definition_block.call(tag).to_s
+          end
+        else
+          tag_missing(name, attributes, &block)
+        end
+      end
+    end
+    # A convienence method for managing the various parts of the
+    # tag binding stack.
+    def stack(name, attributes, packet, block)
+      previous = @tag_binding_stack.last
+      previous_locals = previous.nil? ? @globals : previous.locals
+      locals = DelegatingOpenStruct.new(previous_locals)
+      locals.packet = packet
+      binding = TagBinding.new(self, locals, name, attributes, block)
+      @tag_binding_stack.push(binding)
+      result = yield(binding)
+      @tag_binding_stack.pop
+      result
+    end
+  end
+end

data/lib/orange-more/slices/resources/slices.rb

@@ -0,0 +1,35 @@
+module Orange
+  class Slices < Orange::Resource
+    call_me :slices
+    def stack_init
+      orange[:radius].define_tag "slice" do |tag|
+        content = ''
+        resource = (tag.attr['resource'] || :slices).to_sym
+        id = tag.attr['id'] || nil
+        mode = (tag.attr['mode'] || tag.attr['chunk'] || (id ? :show : :index )).to_sym
+        if orange.loaded?(resource)
+          if orange[resource].respond_to?(mode) || resource == :slices
+            content << (id ? orange[resource].__send__(mode, tag.locals.packet, :id => id) : orange[resource].__send__(mode, tag.locals.packet, {:attrs => tag.attr}))
+          else
+            content << "resource #{resource} doesn't respond to #{mode}"
+          end
+        else
+          content << "resource #{resource} not loaded"
+        end  
+        content
+      end
+    end
+    
+    def view(packet, *args)
+      mode = packet['route.resource_action']
+      do_view(packet, mode, args.extract_options!)
+    end
+    
+    def method_missing(mode, *args)
+      packet = args.first if args.first.kind_of? Orange::Packet
+      opts = args.extract_options!
+      opts[:resource_name] = 'slices'
+      do_view(packet, mode, opts)
+    end
+  end
+end

data/lib/orange-more/subsites.rb

@@ -0,0 +1 @@
+require File.join('orange-more', 'subsites', 'plugin')

data/lib/orange-more/subsites/cartons/subsite.rb

@@ -0,0 +1,8 @@
+class OrangeSite < Orange::Carton
+  property :type, Discriminator
+  has n, :subsites, 'OrangeSubsite'
+end
+
+class OrangeSubsite < OrangeSite
+  belongs_to :orange_site, :required => false
+end

data/lib/orange-more/subsites/middleware/subsite_load.rb

@@ -0,0 +1,29 @@
+require 'orange-core/middleware/base'
+module Orange::Middleware
+  # This will load information about the site to into the orange env
+  # - packet['site'] will be an instance of the site object
+  # 
+  class SubsiteLoad < Base    
+    def packet_call(packet)
+      if packet['site']
+        site = packet['site']
+        path = packet['route.path'] || packet.request.path_info
+        
+        # Find the subsite in the sitemap table
+        extras, matched = orange[:sitemap].find_route_info(packet, path)
+        
+        # If matched, update the loaded site and trim the path down a bit
+        if !matched.resource.blank? && matched.resource.to_sym == :subsites
+          if(m = site.subsites.first(:id => matched.resource_id))
+            packet['route.main_site_route'] = matched
+            packet['route.path'] = extras
+            packet['subsite'] = m
+          end
+        end
+      end
+      pass packet
+    end
+  end
+  
+end
+

data/lib/orange-more/subsites/plugin.rb

@@ -0,0 +1,17 @@
+Dir.glob(File.join(File.dirname(__FILE__), 'cartons', '*.rb')).each {|f| require f }
+Dir.glob(File.join(File.dirname(__FILE__), 'resources', '*.rb')).each {|f| require f }
+Dir.glob(File.join(File.dirname(__FILE__), 'middleware', '*.rb')).each {|f| require f }
+
+module Orange::Plugins
+  class Subsites < Base
+    views_dir       File.join(File.dirname(__FILE__), 'views')
+    
+    resource    Orange::SubsiteResource.new
+    
+    prerouter   Orange::Middleware::SubsiteLoad
+    
+  end
+end
+
+Orange.plugin(Orange::Plugins::Subsites.new)
+

data/lib/orange-more/subsites/resources/subsite_resource.rb

@@ -0,0 +1,54 @@
+module Orange
+  class SubsiteResource < Orange::ModelResource
+    use OrangeSubsite
+    call_me :subsites
+    def stack_init
+      orange[:admin, true].add_link("Settings", :resource => @my_orange_name, :text => 'Subsites')
+    end
+    
+    # Creates a new model object and saves it (if a post), then reroutes to the main page
+    # @param [Orange::Packet] packet the packet being routed
+    def new(packet, *opts)
+      if packet.request.post?
+          m = packet['site'].subsites.new(packet.request.params[@my_orange_name.to_s])
+          m.save
+          orange[:sitemap].add_route_for(packet,
+            :orange_site_id => packet['site'].id, 
+            :resource => :subsites, 
+            :resource_id => m.id,
+            :slug => 'subsite', 
+            :link_text => 'Orange Subsite'
+          )
+        end
+      packet.reroute(@my_orange_name, :orange)
+    end
+    
+    def url_for(packet, opts = {})
+      orange[:sitemap].url_for(packet, {:resource => 'subsites', :resource_id => (opts.is_a?(model_class) ? opts.id : packet['subsite'].id)})
+    end
+    
+    def subsite_nav(packet, opts = {})
+      orange[:sitemap].one_level(packet, :model => orange[:sitemap].home(packet, :subsite => true))
+    end
+    
+    def sitemap_row(packet, opts = {})
+      do_view(packet, :sitemap_row, opts)
+    end
+    
+  end
+  
+  class Mapper < Resource
+    def route_to(packet, resource, *args)
+      opts = args.extract_options!
+      packet = DefaultHash.new unless packet 
+      context = opts[:context]
+      context = packet['route.context', nil] unless (context || (packet['route.context'] == :live))
+      site = packet['route.faked_site'] ? packet['route.site_url', nil] : nil
+      args.unshift(resource)
+      args.unshift(orange[:subsites].url_for(packet).gsub(/^\//, '').gsub(/\/$/, '')) if(packet['subsite'])
+      args.unshift(context)
+      args.unshift(site)
+      '/'+args.compact.join('/')
+    end
+  end
+end