shaf_client 0.6.1 → 1.0.0

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 7fbc814d168650a7fd1464610ae0c6e87cf7f68b8cf5e3e1e139e2bb71e6891f
-  data.tar.gz: 3de3b4941071c1afeebbd27327f5642074dfc1e418beb9625e1efcf9e98db58e
+  metadata.gz: 11ccc3070c77ca9f04b3a54599437752022c2de7b6bf51f5d3cf7d6bf25bb147
+  data.tar.gz: 73658cc5c27287a677e82a935ced861e8775355ee84df02bc10631e33a13a2e8
 SHA512:
-  metadata.gz: 3b69fbe36290bda8d3323b6dab93d3931e796667ee85ce92edb383e80e7ea849b2296baefbe2726bab6effe148dfdcfd7a5e896dcf68c71b50a25f730ac90caa
-  data.tar.gz: c9be99a9577a0d09039bc4208989074a77ad6eb836802b27a362945c6d55a3f6d82c7257502b97cd5f591b86cbe0e6c9191474085c91e87029640ce2aac48d6d
+  metadata.gz: 322b0537cb301169f77dc76b078c11d74d60b156718b9bdef1cf019d3983fb2c6e3aab01750bd309b6e7e672e0fa7f987b74d2ddd6d0edac21ff03088ddb724e
+  data.tar.gz: 3d8f6b58ed02af7892425fa39eb1bfb9f52845cba81cff2a8e9204e2dd1780ceafb8bf6b13f2b12f77a7ee6a74ecafcca60a631dacf28dd66e06c7d98a3b4726

data/bin/shaf_client

@@ -0,0 +1,30 @@
+#!/usr/bin/env ruby
+
+$:.unshift File.join(__dir__, '../lib/')
+
+require 'irb'
+require 'optparse'
+require 'shaf_client'
+
+url = ARGV.shift || String(ENV['SHAF_CLIENT_URL'])
+options = {
+  user: ENV['SHAF_CLIENT_USER'],
+  password: ENV['SHAF_CLIENT_PASSWORD']
+}
+
+OptionParser.new do |opts|
+  opts.banner = "Usage: shaf_client [url]"
+
+  opts.on("-u", "--user user", "Username used for authentication") do |user|
+    options[:user] = user
+  end
+
+  opts.on("-p", "--password password", "Password used for authentication") do |pass|
+    options[:password] = pass
+  end
+end.parse! ARGV
+
+client = ShafClient.new(url, **options) unless url.empty?
+TOPLEVEL_BINDING.local_variable_set(:client, client)
+
+IRB.start

data/lib/faraday_http_cache_patch.rb

@@ -0,0 +1,17 @@
+faraday_version = Gem.loaded_specs['faraday']&.version.to_s
+faraday_http_cache_version = Gem.loaded_specs['faraday-http-cache']&.version.to_s
+
+if faraday_version.start_with?("0.16") && faraday_http_cache_version <= '2.0.0'
+  module Faraday
+    class HttpCache < Faraday::Middleware
+      def create_response(env)
+        hash = env.to_hash
+        {
+          status: hash[:status],
+          body: hash[:response_body] || hash[:body],
+          response_headers: hash[:response_headers]
+        }
+      end
+    end
+  end
+end

data/lib/shaf_client.rb

@@ -2,20 +2,36 @@
 
 require 'faraday'
 require 'faraday-http-cache'
+
+# FIXME remove this when faraday-http-cache has released  this fix
+# https://github.com/plataformatec/faraday-http-cache/pull/116
+require 'faraday_http_cache_patch'
+
 require 'json'
 require 'shaf_client/error'
+require 'shaf_client/mime_types'
 require 'shaf_client/middleware/redirect'
 require 'shaf_client/resource'
 require 'shaf_client/shaf_form'
 require 'shaf_client/hal_form'
 require 'shaf_client/api_error'
+require 'shaf_client/problem_json'
+require 'shaf_client/alps_json'
 require 'shaf_client/empty_resource'
 require 'shaf_client/unknown_resource'
+require 'shaf_client/hypertext_cache_strategy'
 
 class ShafClient
-  MIME_TYPE_JSON = 'application/json'
-  MIME_TYPE_HAL  = 'application/hal+json'
+  extend HypertextCacheStrategy
+  include MimeTypes
+
   DEFAULT_ADAPTER = :net_http
+  DEFAULT_ACCEPT_HEADER = [
+    MIME_TYPE_HAL,
+    MIME_TYPE_PROBLEM_JSON,
+    MIME_TYPE_ALPS_JSON,
+    '*/*;q=0.8',
+  ].join(', ')
 
   def initialize(root_uri, **options)
     @root_uri = root_uri.dup
@@ -30,12 +46,7 @@ class ShafClient
     get(@root_uri, **options)
   end
 
-  def get_doc(uri, **options)
-    response = request(method: :get, uri: uri, opts: options)
-    response&.body || ''
-  end
-
-  %i[get put post delete patch].each do |method|
+  %i[head get put post delete patch].each do |method|
     define_method(method) do |uri, payload: nil, **options|
       response = request(
         method: method,
@@ -45,17 +56,12 @@ class ShafClient
       )
 
       body = String(response.body)
-      response.headers['content-type'] = nil if body.empty?
+      content_type = response.headers['content-type'] unless body.empty?
 
-      Resource.build(self, body, response.status, response.headers)
+      Resource.build(self, body, content_type, response.status, response.headers)
     end
   end
 
-  def stubs
-    return unless @adapter == :test
-    @stubs ||= Faraday::Adapter::Test::Stubs.new
-  end
-
   private
 
   attr_reader :options, :auth_header
@@ -63,7 +69,7 @@ class ShafClient
   def setup_default_headers
     @default_headers = {
       'Content-Type' => options.fetch(:content_type, MIME_TYPE_JSON),
-      'Accept' => options.fetch(:accept, MIME_TYPE_HAL)
+      'Accept' => options.fetch(:accept, DEFAULT_ACCEPT_HEADER)
     }
     return unless token = options[:auth_token]
 
@@ -96,13 +102,16 @@ class ShafClient
     options.fetch(:faraday_http_cache, {}).tap do |cache_params|
       cache_params[:store] ||= options[:http_cache_store] if options[:http_cache_store]
       cache_params[:shared_cache] ||= false
+      cache_params[:serializer] ||= Marshal
     end
   end
 
   def connect_adapter(connection)
-    args = [@adapter]
-    args << stubs if @adapter == :test
-    connection.adapter(*args)
+    connection.adapter(*adapter_args)
+  end
+
+  def adapter_args
+    [@adapter]
   end
 
   def request(method:, uri:, payload: nil, opts: {})

data/lib/shaf_client/alps/descriptor.rb

@@ -0,0 +1,60 @@
+require 'shaf_client/alps/extension'
+
+class ShafClient
+  module Alps
+    class Descriptor
+      attr_reader :id, :href, :name, :type, :doc, :ext
+
+      def initialize(id:, **kwargs)
+        @id   = id.to_sym
+        @href = kwargs[:href]
+        @name = kwargs[:name]
+        @type = kwargs[:type]
+        @doc  = kwargs[:doc]
+        @ext  = parse_extentions(kwargs[:ext])
+      end
+
+      alias extensions ext
+
+      def to_h
+        {
+          id: id,
+          href: href,
+          name: name,
+          type: type,
+          doc: doc,
+          ext: extensions.map(&:to_h),
+        }
+      end
+
+      def semantic?
+        type == 'semantic'
+      end
+
+      def safe?
+        type == 'safe'
+      end
+
+      def idempotent?
+        type == 'idempotent'
+      end
+
+      def unsafe?
+        type == 'unsafe'
+      end
+
+      def extension(id)
+        extensions.find { |ext| ext.id == id.to_sym }
+      end
+
+      private
+
+      def parse_extentions(extensions)
+        extensions ||= []
+        extensions = [extensions] unless extensions.is_a? Array
+        extensions.map { |ext| Extension.new(**ext.transform_keys(&:to_sym)) }
+      end
+    end
+  end
+end
+

data/lib/shaf_client/alps/extension.rb

@@ -0,0 +1,35 @@
+class ShafClient
+  module Alps
+    class Extension
+      attr_reader :id, :href, :value
+
+      def initialize(id:, href: nil, value: nil)
+        @id = id.to_sym
+        @href = href
+        @value = value
+      end
+
+      def to_h
+        {
+          id: id,
+          href: href,
+          value: value,
+        }
+      end
+
+      private
+
+      def method_missing(method_name, *args, &block)
+        name = method_name.to_s
+        return super unless name.end_with? '?'
+
+        id.to_s == name[0..-2]
+      end
+
+      def respond_to_missing?(method_name, include_private = false)
+        return true if method_name.to_s.end_with? '?'
+        super
+      end
+    end
+  end
+end

data/lib/shaf_client/alps_json.rb

@@ -0,0 +1,44 @@
+require 'shaf_client/alps/descriptor'
+
+class ShafClient
+  class AlpsJson < Resource
+    content_type MIME_TYPE_ALPS_JSON
+
+    attr_reader :descriptors
+
+    def initialize(_client, payload, status = nil, headers = {})
+      super
+
+      @links = {}.freeze
+      @curies = {}.freeze
+      @embedded_resources = {}.freeze
+    end
+
+    def to_h
+      attributes.merge(
+        descriptors: descriptors.map(&:to_h)
+      )
+    end
+
+    def descriptor(id)
+      descriptors.find { |desc| desc.id == id.to_sym }
+    end
+
+    def each_descriptor(&block)
+      descriptors.each(&block)
+    end
+
+    private
+
+    def parse
+      alps = payload&.dig('alps') || {}
+      @attributes = {
+        version: alps['version'],
+        doc: alps['doc'],
+      }
+      @descriptors = alps.fetch('descriptor', []).map do |desc|
+        Alps::Descriptor.new(**desc.transform_keys(&:to_sym))
+      end
+    end
+  end
+end

data/lib/shaf_client/base_resource.rb

@@ -10,8 +10,13 @@ class ShafClient
       @payload =
         if payload&.is_a? String
           JSON.parse(payload)
+        elsif payload.respond_to? :to_h
+          payload.to_h
         else
-          payload
+          raise Error, <<~ERR
+            Trying to create an instance of #{self.class} with a payload that
+            cannot be coerced into a Hash
+          ERR
         end
 
       parse
@@ -19,8 +24,9 @@ class ShafClient
 
     def to_h
       attributes.dup.tap do |hash|
-        hash[:_links] = transform_values_to_s(links)
-        embedded = transform_values_to_s(embedded_resources)
+        hash[:_links] = transform_values_to_h(links)
+        hash[:_links].merge!(curies: curies.values.map(&:to_h)) unless curies.empty?
+        embedded = transform_values_to_h(embedded_resources)
         hash[:_embedded] = embedded unless embedded.empty?
       end
     end
@@ -29,32 +35,32 @@ class ShafClient
       JSON.pretty_generate(to_h)
     end
 
-    def attribute(key)
-      raise Error, "No attribute for key: #{key}" unless attributes.key? key
-      attributes.fetch(key.to_sym)
+    def inspect
+      to_s
     end
 
-    def link(rel)
-      rewritten_rel = best_match(links.keys, rel)
-      raise Error, "No link with rel: #{rel}" unless links.key? rewritten_rel
-      links[rewritten_rel]
+    def attribute(key, &block)
+      block ||= proc { raise Error, "No attribute for key: #{key}" }
+      _attribute(key, &block)
     end
 
-    def curie(rel)
-      raise Error, "No curie with rel: #{rel}" unless curies.key? rel.to_sym
-      curies[rel.to_sym]
+    def link(rel, &block)
+      block ||= proc { raise Error, "No link with rel: #{rel}" }
+      _link(rel, &block)
     end
 
-    def embedded(rel)
-      rewritten_rel = best_match(embedded_resources.keys, rel)
-      unless embedded_resources.key? rewritten_rel
-        raise Error, "No embedded resources with rel: #{rel}"
-      end
-      embedded_resources[rewritten_rel]
+    def curie(rel, &block)
+      block ||= proc { raise Error, "No curie with rel: #{rel}" }
+      _curie(rel, &block)
+    end
+
+    def embedded(rel, &block)
+      block ||= proc { raise Error, "No embedded resources with rel: #{rel}" }
+      _embedded(rel, &block)
     end
 
     def rel?(rel)
-      !link(rel).nil?
+      !link(rel).nil? || !embedded(rel).nil?
     rescue StandardError
       false
     end
@@ -73,6 +79,40 @@ class ShafClient
       @payload ||= {}
     end
 
+    def _attribute(key, &block)
+      if block
+        attributes.fetch(key.to_sym, &block)
+      else
+        attributes[key.to_sym]
+      end
+    end
+
+    def _link(rel, &block)
+      rewritten_rel = best_match(links.keys, rel)
+      if block
+        links.fetch(rewritten_rel, &block)
+      else
+        links[rewritten_rel]
+      end
+    end
+
+    def _curie(rel, &block)
+      if block
+        curies.fetch(rel.to_sym, &block)
+      else
+        curies[rel.to_sym]
+      end
+    end
+
+    def _embedded(rel, &block)
+      rewritten_rel = best_match(embedded_resources.keys, rel)
+      if block
+        embedded_resources.fetch(rewritten_rel, &block)
+      else
+        embedded_resources[rewritten_rel]
+      end
+    end
+
     def <<(other)
       @payload            = other.payload.dup
       @attributes         = other.attributes.dup
@@ -114,13 +154,17 @@ class ShafClient
       embedded.each do |key, value|
         @embedded_resources[key.to_sym] =
           if value.is_a? Array
-            value.map { |d| BaseResource.new(d) }
+            value.map { |d| build_embedded_resource(d) }
           else
-            BaseResource.new(value)
+            build_embedded_resource(value)
           end
       end
     end
 
+    def build_embedded_resource(payload)
+      BaseResource.new(payload)
+    end
+
     def method_missing(method_name, *args, &block)
       return super unless attributes.key?(method_name)
       attribute(method_name)
@@ -144,7 +188,7 @@ class ShafClient
       best_match(rels, rel.to_s.tr('_', '-')) if rel.to_s.include? '_'
     end
 
-    def transform_values_to_s(hash)
+    def transform_values_to_h(hash)
       hash.transform_values do |value|
         if value.is_a? Array
           value.map(&:to_h)