roadforest 0.1 → 0.5

data/lib/roadforest/interface/blob.rb

@@ -0,0 +1,38 @@
+require 'roadforest/interface/application'
+
+module RoadForest
+  module Interface
+    class Blob < Application
+      def destination_dir
+        Pathname.new(services.destination_dir)
+      end
+
+      def sub_path
+        params.remainder
+      end
+
+      def path
+        destination_dir.join(sub_path)
+      end
+
+      def retrieve
+        File::open(path)
+      end
+
+      def incomplete_path
+        [path,"incomplete"].join(".")
+      end
+
+      def update(incoming)
+        File::open(incomplete_path, "w") do |file|
+          incoming.each do |chunk|
+            file.write(chunk)
+          end
+        end
+        Pathname.new(incomplete_path).rename(path)
+
+        return nil
+      end
+    end
+  end
+end

data/lib/roadforest/interface/rdf.rb

@@ -0,0 +1,77 @@
+require 'roadforest/interface/application'
+
+module RoadForest
+  module Interface
+    class RDF < Application
+      include RoadForest::Graph::Etagging
+
+      def update(graph)
+        graph_update(start_focus(graph))
+      end
+
+      def graph_update(focus)
+        fill_graph(focus)
+      end
+
+      def add_graph_child(graph)
+        add_child(start_focus(graph))
+        new_graph
+      end
+
+      def add_child(focus)
+        new_graph
+      end
+
+      def retrieve
+        new_graph
+      end
+
+      def fill_graph(graph)
+      end
+
+      def start_focus(graph, resource_url=nil)
+        access = RoadForest::Graph::WriteManager.new
+        access.source_graph = graph
+        focus = RoadForest::Graph::GraphFocus.new(access, resource_url || my_url)
+
+        yield focus if block_given?
+        return focus
+      end
+
+      def copy_interface(node, route_name, params=nil)
+        params ||= {}
+
+        url = url_for(route_name, params)
+        source_interface = interface_for(route_name, params)
+
+        access = RoadForest::Graph::CopyManager.new
+        access.source_graph = source_interface.current_graph
+        access.target_graph = node.access_manager.destination_graph
+        copier = RoadForest::Graph::GraphFocus.new(access, url)
+
+        yield copier if block_given?
+        copier
+      end
+
+      def etag
+        @etag ||= etag_from(etag_graph)
+      end
+
+      def etag_graph
+        current_graph
+      end
+
+      def current_graph
+        return response_data if response_values.has_key?(:data)
+        new_graph
+      end
+
+      def new_graph
+        graph = ::RDF::Graph.new
+        focus = start_focus(graph, my_url)
+        fill_graph(focus)
+        self.response_data = graph
+      end
+    end
+  end
+end

data/lib/roadforest/interfaces.rb

@@ -0,0 +1,2 @@
+require 'roadforest/interface/rdf'
+require 'roadforest/interface/blob'

data/lib/roadforest/remote-host.rb

@@ -1,15 +1,15 @@
-require 'roadforest/rdf/source-rigor'
-require 'roadforest/rdf/source-rigor/credence-annealer'
-require 'roadforest/rdf/graph-store'
+require 'roadforest/source-rigor'
+require 'roadforest/source-rigor/credence-annealer'
+require 'roadforest/source-rigor/rigorous-access'
+require 'roadforest/source-rigor/graph-store' #XXX
+require 'roadforest/graph/graph-focus'
 require 'roadforest/http/user-agent'
 require 'roadforest/http/graph-transfer'
 require 'roadforest/http/adapters/excon'
-require 'roadforest/rdf/access-manager'
-require 'roadforest/rdf/graph-focus'
 
 module RoadForest
   class RemoteHost
-    include RDF::Normalization
+    include Graph::Normalization
 
     def initialize(well_known_url)
       self.url = well_known_url
@@ -21,7 +21,7 @@ module RoadForest
     end
 
     def build_graph_store
-      RDF::GraphStore.new
+      SourceRigor::GraphStore.new
     end
 
     attr_writer :http_client
@@ -48,7 +48,7 @@ module RoadForest
     def source_rigor
       @source_rigor ||=
         begin
-          rigor = RDF::SourceRigor.http
+          rigor = SourceRigor.http
           rigor.graph_transfer = graph_transfer
           rigor
         end
@@ -60,7 +60,7 @@ module RoadForest
 
     def anneal(focus)
       graph = build_graph_store
-      annealer = RDF::SourceRigor::CredenceAnnealer.new(graph)
+      annealer = SourceRigor::CredenceAnnealer.new(graph)
       annealer.resolve do
         yield focus
       end
@@ -69,12 +69,12 @@ module RoadForest
     def putting(&block)
 
       graph = build_graph_store
-      access = RDF::UpdateManager.new
+      access = SourceRigor::UpdateManager.new
       access.rigor = source_rigor
       access.source_graph = graph
-      updater = RDF::GraphFocus.new(access, url)
+      updater = Graph::GraphFocus.new(access, url)
 
-      annealer = RDF::SourceRigor::CredenceAnnealer.new(graph)
+      annealer = SourceRigor::CredenceAnnealer.new(graph)
 
       annealer.resolve do
         access.target_graph = ::RDF::Repository.new
@@ -89,13 +89,13 @@ module RoadForest
     end
 
     def posting(&block)
-      require 'roadforest/rdf/post-focus'
+      require 'roadforest/graph/post-focus'
 
       graph = build_graph_store
-      access = RDF::PostManager.new
+      access = SourceRigor::PostManager.new
       access.rigor = source_rigor
       access.source_graph = graph
-      poster = RDF::PostFocus.new(access, url)
+      poster = Graph::PostFocus.new(access, url)
 
       graphs = {}
       poster.graphs = graphs
@@ -110,10 +110,10 @@ module RoadForest
     def getting(&block)
 
       graph = build_graph_store
-      access = RDF::ReadOnlyManager.new
+      access = SourceRigor::RetrieveManager.new
       access.rigor = source_rigor
       access.source_graph = graph
-      reader = RDF::GraphFocus.new(access, url)
+      reader = Graph::GraphFocus.new(access, url)
 
       anneal(reader, &block)
     end

data/lib/roadforest/resource.rb

@@ -0,0 +1,4 @@
+require 'roadforest/resource/leaf-item'
+require 'roadforest/resource/parent-item'
+require 'roadforest/resource/list'
+require 'roadforest/resource/read-only'

data/lib/roadforest/resource/{rdf/leaf-item.rb → leaf-item.rb}

@@ -1,4 +1,4 @@
-require 'roadforest/resource/rdf/read-only'
+require 'roadforest/resource/read-only'
 require 'roadforest/resource/role/writable'
 
 module RoadForest

data/lib/roadforest/resource/{rdf/list.rb → list.rb}

@@ -1,4 +1,4 @@
-require 'roadforest/resource/rdf/read-only'
+require 'roadforest/resource/read-only'
 require 'roadforest/resource/role/has-children'
 module RoadForest
   module Resource

data/lib/roadforest/resource/{rdf/parent-item.rb → parent-item.rb}

@@ -1,4 +1,4 @@
-require 'roadforest/resource/rdf/read-only'
+require 'roadforest/resource/read-only'
 require 'roadforest/resource/role/writable'
 require 'roadforest/resource/role/has-children'
 module RoadForest

data/lib/roadforest/resource/{rdf/read-only.rb → read-only.rb}

@@ -15,7 +15,7 @@ module RoadForest
 
         register :read_only
 
-        attr_accessor :model, :trace
+        attr_accessor :interface, :trace, :content_engine
 
         ### RoadForest interface
 
@@ -43,17 +43,17 @@ module RoadForest
           response.body = body
         end
 
-        def retrieve_model
-          absolutize(@model.canonical_host, @model.retrieve)
+        def retrieve_interface
+          absolutize(@interface.canonical_host, @interface.retrieve)
         end
-        alias retreive_model retrieve_model
+        alias retreive_interface retrieve_interface
 
         #      def known_methods
         #        super + ["PATCH"]
         #      end
 
-        def model_supports(action)
-          @model.respond_to?(action)
+        def interface_supports(action)
+          @interface.respond_to?(action)
         end
         ### Webmachine interface
 
@@ -63,8 +63,8 @@ module RoadForest
 
         #Overridden rather than metaprogram content type methods
         def send(*args)
-          if args.length == 1 and not model.nil?
-            model.type_handling.fetch(args.first).call(self)
+          if args.length == 1 and not interface.nil?
+            content_engine.fetch(args.first).call(self)
           else
             super
           end
@@ -73,47 +73,47 @@ module RoadForest
         end
 
         def method(name)
-          if model.nil?
+          if interface.nil?
             super
           else
-            model.type_handling.fetch(name).method(:call)
+            content_engine.fetch(name).method(:call)
           end
         rescue KeyError
           super
         end
 
         def content_types_provided
-          model.type_handling.renderers.type_map
+          content_engine.renderers.type_map
         rescue => ex
           super
         end
 
         def is_authorized?(header)
-          @authorization = @model.authorization(request.method, header)
+          @authorization = @interface.authorization(request.method, header)
           if(@authorization == :public || @authorization == :granted)
             return true
           end
-          @model.authentication_challenge
+          @interface.authentication_challenge
         end
 
-        #Add cache-control headers here
+        #XXX Add cache-control headers here
         def finish_request
         end
 
         def resource_exists?
-          @model.exists?
+          @interface.exists?
         end
 
         def generate_etag
-          @model.etag
+          @interface.etag
         end
 
         def last_modified
-          @model.last_modified
+          @interface.last_modified
         end
 
         def expires
-          @model.expires
+          @interface.expires
         end
       end
     end

data/lib/roadforest/resource/role/has-children.rb

@@ -11,7 +11,7 @@ module RoadForest
         end
 
         def process_post
-          parser = model.type_handling.choose_parser(request.content_type || 'application/octet-stream')
+          parser = content_engine.choose_parser(request.content_type || 'application/octet-stream')
 
           parser.add_child(self)
           return true

data/lib/roadforest/resource/role/writable.rb

@@ -22,7 +22,7 @@ module RoadForest
         end
 
         def content_types_accepted
-          model.type_handling.parsers.type_map
+          content_engine.parsers.type_map
         end
 
         def request_body
@@ -35,7 +35,7 @@ module RoadForest
         end
 
         def delete_resource
-          @model.delete(params)
+          @interface.delete(params)
         end
       end
     end

data/lib/roadforest/server.rb

@@ -1,6 +1,6 @@
 #This file is intended as the single entry point for RoadForest server code
 require 'roadforest/application'
-require 'roadforest/models'
+require 'roadforest/interfaces'
 
 module RoadForest
   def self.serve(application, services)

data/lib/roadforest/source-rigor.rb

@@ -0,0 +1,9 @@
+require 'roadforest'
+
+module RoadForest
+  module SourceRigor
+  end
+end
+
+require 'roadforest/source-rigor/engine'
+require 'roadforest/source-rigor/rigorous-access.rb'

data/lib/roadforest/{rdf/source-rigor → source-rigor}/credence-annealer.rb

@@ -1,6 +1,6 @@
-require 'roadforest/rdf'
+require 'roadforest/graph'
 
-class RoadForest::RDF::SourceRigor
+module RoadForest::SourceRigor
   class CredenceAnnealer
     def initialize(graph)
       @graph = graph

data/lib/roadforest/{rdf/source-rigor → source-rigor}/credence.rb

@@ -1,9 +1,5 @@
-class RoadForest::RDF::SourceRigor
+module RoadForest::SourceRigor
   module Credence
-    require 'roadforest/rdf/source-rigor/credence/role-if-available'
-    require 'roadforest/rdf/source-rigor/credence/any'
-    require 'roadforest/rdf/source-rigor/credence/none-if-role-absent'
-
     def self.policies
       @policies ||= {
         :any => Any.new,
@@ -27,3 +23,7 @@ class RoadForest::RDF::SourceRigor
     end
   end
 end
+
+require 'roadforest/source-rigor/credence/role-if-available'
+require 'roadforest/source-rigor/credence/any'
+require 'roadforest/source-rigor/credence/none-if-role-absent'

data/lib/roadforest/{rdf/source-rigor → source-rigor}/credence/any.rb

@@ -1,4 +1,4 @@
-class RoadForest::RDF::SourceRigor
+module RoadForest::SourceRigor
   module Credence
     class Any
       def credible(contexts, results)

data/lib/roadforest/{rdf/source-rigor → source-rigor}/credence/none-if-role-absent.rb

@@ -1,4 +1,4 @@
-class RoadForest::RDF::SourceRigor
+module RoadForest::SourceRigor
   module Credence
     #Unless we have results for the subject context, nothing is valid
     class NoneIfRoleAbsent

data/lib/roadforest/{rdf/source-rigor → source-rigor}/credence/role-if-available.rb

@@ -1,4 +1,4 @@
-class RoadForest::RDF::SourceRigor
+module RoadForest::SourceRigor
   module Credence
     #If there are any results for the subject context, they're good
     class RoleIfAvailable

data/lib/roadforest/source-rigor/engine.rb

@@ -0,0 +1,45 @@
+require 'roadforest/source-rigor'
+require 'roadforest/source-rigor/investigator'
+require 'roadforest/source-rigor/credence'
+
+module RoadForest
+  module SourceRigor
+    class << self
+      def simple
+        rigor = Engine.new
+        rigor.policy_list(:must_local, :may_local)
+        rigor.investigator_list(:null)
+        rigor
+      end
+
+      def http
+        rigor = Engine.new
+        rigor.policy_list(:may_subject, :any) #XXX
+        rigor.investigator_list(:http, :null)
+        rigor
+      end
+    end
+
+    class Engine
+      def initialize
+        @investigators = []
+        @investigation_limit = 3
+        @credence_policies = []
+      end
+
+      attr_accessor :graph_transfer, :investigators, :investigation_limit, :credence_policies
+
+      def policy_list(*names)
+        self.credence_policies = names.map do |name|
+          Credence.policy(name)
+        end
+      end
+
+      def investigator_list(*names)
+        self.investigators = names.map do |name|
+          Investigator[name].new
+        end
+      end
+    end
+  end
+end