rom-files 0.2.0

data/bin/console

@@ -0,0 +1,7 @@
+#!/usr/bin/env ruby
+
+require 'bundler/setup'
+require 'rom-files'
+require 'pry'
+
+binding.pry

data/bin/guard

@@ -0,0 +1,21 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+#
+# This file was generated by Bundler.
+#
+# The application 'guard' is installed as part of a gem, and
+# this file is here to facilitate running it.
+#
+
+bundle_binstub = File.expand_path("../bundle", __FILE__)
+load(bundle_binstub) if File.file?(bundle_binstub)
+
+require "pathname"
+ENV["BUNDLE_GEMFILE"] ||= File.expand_path("../../Gemfile",
+  Pathname.new(__FILE__).realpath)
+
+require "rubygems"
+require "bundler/setup"
+
+load Gem.bin_path("guard", "guard")

data/bin/rake

@@ -0,0 +1,21 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+#
+# This file was generated by Bundler.
+#
+# The application 'rake' is installed as part of a gem, and
+# this file is here to facilitate running it.
+#
+
+bundle_binstub = File.expand_path("../bundle", __FILE__)
+load(bundle_binstub) if File.file?(bundle_binstub)
+
+require "pathname"
+ENV["BUNDLE_GEMFILE"] ||= File.expand_path("../../Gemfile",
+  Pathname.new(__FILE__).realpath)
+
+require "rubygems"
+require "bundler/setup"
+
+load Gem.bin_path("rake", "rake")

data/bin/rspec

@@ -0,0 +1,21 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+#
+# This file was generated by Bundler.
+#
+# The application 'rspec' is installed as part of a gem, and
+# this file is here to facilitate running it.
+#
+
+bundle_binstub = File.expand_path("../bundle", __FILE__)
+load(bundle_binstub) if File.file?(bundle_binstub)
+
+require "pathname"
+ENV["BUNDLE_GEMFILE"] ||= File.expand_path("../../Gemfile",
+  Pathname.new(__FILE__).realpath)
+
+require "rubygems"
+require "bundler/setup"
+
+load Gem.bin_path("rspec-core", "rspec")

data/bin/yard

@@ -0,0 +1,21 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+#
+# This file was generated by Bundler.
+#
+# The application 'yard' is installed as part of a gem, and
+# this file is here to facilitate running it.
+#
+
+bundle_binstub = File.expand_path("../bundle", __FILE__)
+load(bundle_binstub) if File.file?(bundle_binstub)
+
+require "pathname"
+ENV["BUNDLE_GEMFILE"] ||= File.expand_path("../../Gemfile",
+  Pathname.new(__FILE__).realpath)
+
+require "rubygems"
+require "bundler/setup"
+
+load Gem.bin_path("yard", "yard")

data/bin/yardoc

@@ -0,0 +1,21 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+#
+# This file was generated by Bundler.
+#
+# The application 'yardoc' is installed as part of a gem, and
+# this file is here to facilitate running it.
+#
+
+bundle_binstub = File.expand_path("../bundle", __FILE__)
+load(bundle_binstub) if File.file?(bundle_binstub)
+
+require "pathname"
+ENV["BUNDLE_GEMFILE"] ||= File.expand_path("../../Gemfile",
+  Pathname.new(__FILE__).realpath)
+
+require "rubygems"
+require "bundler/setup"
+
+load Gem.bin_path("yard", "yardoc")

data/bin/yri

@@ -0,0 +1,21 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+#
+# This file was generated by Bundler.
+#
+# The application 'yri' is installed as part of a gem, and
+# this file is here to facilitate running it.
+#
+
+bundle_binstub = File.expand_path("../bundle", __FILE__)
+load(bundle_binstub) if File.file?(bundle_binstub)
+
+require "pathname"
+ENV["BUNDLE_GEMFILE"] ||= File.expand_path("../../Gemfile",
+  Pathname.new(__FILE__).realpath)
+
+require "rubygems"
+require "bundler/setup"
+
+load Gem.bin_path("yard", "yri")

data/lib/dry/types/pathname.rb

@@ -0,0 +1,25 @@
+# frozen_string_literal: true
+
+require 'dry-types'
+require 'dry/types/core'
+require 'pathname'
+
+module Dry
+  module Types
+    def self.register_if_needed(key, value)
+      register(key, value) unless registered?(key)
+    end
+
+    def self.Pathname(path)
+      path.is_a?(Pathname) ? path : Kernel::Pathname(path.to_s)
+    end
+
+    register_if_needed 'pathname', simple = Definition[Pathname].new(Pathname)
+    register_if_needed 'strict.pathname', strict = simple.constrained(type: Pathname)
+    register_if_needed 'coercible.pathname',
+                       coercible = simple.constructor(method(:Pathname))
+    register_if_needed 'optional.pathname', simple.optional
+    register_if_needed 'optional.strict.pathname', strict.optional
+    register_if_needed 'optional.coercible.pathname', coercible.optional
+  end
+end

data/lib/pathname/extensions.rb

@@ -0,0 +1,32 @@
+# frozen_string_literal: true
+
+require 'pathname'
+require 'dry/core/extensions'
+
+class Pathname
+  extend Dry::Core::Extensions
+
+  register_extension :constants do
+    require_relative 'extensions/constants'
+  end
+
+  register_extension :explode do
+    require_relative 'extensions/explode'
+    include Extensions::Explode
+  end
+
+  register_extension :ext do
+    require_relative 'extensions/ext'
+    include Extensions::Ext
+  end
+
+  register_extension :partial do
+    require_relative 'extensions/partial'
+    include Extensions::Partial
+  end
+
+  register_extension :pathmap do
+    require_relative 'extensions/pathmap'
+    include Extensions::Pathmap
+  end
+end

data/lib/pathname/extensions/constants.rb

@@ -0,0 +1,12 @@
+# frozen_string_literal: true
+
+require 'pathname/extensions'
+require 'dry/core/constants'
+
+class Pathname
+  include Dry::Core::Constants
+
+  HERE = Pathname('.').freeze
+  UPPER = Pathname('..').freeze
+  ROOT = Pathname('/').freeze
+end

data/lib/pathname/extensions/explode.rb

@@ -0,0 +1,27 @@
+# frozen_string_literal: true
+
+require 'pathname/extensions'
+
+class Pathname
+  module Extensions
+    module Explode
+      def self.included(host)
+        super
+        host.load_extensions :constants
+      end
+
+      # Explode a path into individual components
+      #
+      # @return [Array<Pathname>]
+      #
+      # @see Pathmap#pathmap Used by `#pathmap`
+      def explode
+        head, tail = split
+        return [self] if head == self
+        return [tail] if head == HERE || tail == ROOT
+        return [head, tail] if head == ROOT
+        head.explode + [tail]
+      end
+    end
+  end
+end

data/lib/pathname/extensions/ext.rb

@@ -0,0 +1,28 @@
+# frozen_string_literal: true
+
+require 'pathname/extensions'
+
+class Pathname
+  module Extensions
+    # Changes extension of file
+    module Ext
+      def self.included(host)
+        host.load_extensions :constants
+        super
+      end
+
+      # Replace the file extension with +new_extension+.
+      # If there is no extension on the string, append the new extension to the end.
+      # If the new extension is not given, or is the empty string, remove any existing extension.
+      # @param new_extension [String]
+      # @return [Pathname]
+      def ext(new_extension = EMPTY_STRING)
+        return dup if [HERE, UPPER].include? self
+        unless new_extension == EMPTY_STRING
+          new_extension = '.' + new_extension unless new_extension.match?(/^\./)
+        end
+        sub_ext(new_extension)
+      end
+    end
+  end
+end

data/lib/pathname/extensions/partial.rb

@@ -0,0 +1,30 @@
+# frozen_string_literal: true
+
+require 'pathname/extensions'
+
+class Pathname
+  module Extensions
+    module Partial
+      def self.included(host)
+        host.load_extensions :explode
+        super
+      end
+
+      # Extract a partial path from the path.  Include +n+ directories from the
+      # front end (left hand side) if +n+ is positive.  Include |+n+|
+      # directories from the back end (right hand side) if +n+ is negative.
+      def partial(n)
+        dirs = dirname.explode
+        partial_dirs =
+          if n.positive?
+            dirs[0...n]
+          elsif n.negative?
+            dirs.reverse[0...-n].reverse
+          else
+            HERE
+          end
+        Pathname(File.join(partial_dirs))
+      end
+    end
+  end
+end

data/lib/pathname/extensions/pathmap.rb

@@ -0,0 +1,128 @@
+# frozen_string_literal: true
+
+require 'pathname/extensions'
+
+class Pathname
+  module Extensions
+    module Pathmap
+      def self.included(host)
+        host.load_extensions :ext, :explode, :partial
+        super
+      end
+
+      # Map the path according to the given specification. The specification
+      # controls the details of the mapping. The following special patterns are
+      # recognized:
+      #
+      # * `%p` - The complete path.
+      # * `%f` - The base file name of the path, with its file extension,
+      #                but without any directories.
+      # * `%n` - The file name of the path without its file extension.
+      # * `%d` - The directory list of the path.
+      # * `%x` - The file extension of the path.  An empty string if there
+      #                is no extension.
+      # * `%X` - Everything *but* the file extension.
+      # * `%s` - The alternate file separator if defined, otherwise use #
+      #                the standard file separator.
+      # * `%%` - A percent sign.
+      #
+      # @note
+      #   The `%d` specifier can also have a numeric prefix (e.g. `%2d`).
+      #
+      #   If the number is positive, only return (up to) `n` directories in the
+      #   path, starting from the left hand side.
+      #
+      #   If `n` is negative, return (up to) `n` directories from the
+      #   right hand side of the path.
+      #
+      # @example
+      #   'a/b/c/d/file.txt'.pathmap("%2d")   => 'a/b'
+      #   'a/b/c/d/file.txt'.pathmap("%-2d")  => 'c/d'
+      #
+      # Also the `%d`, `%p`, `%f`, `%n`,
+      # `%x`, and `%X` operators can take a pattern/replacement
+      # argument to perform simple string substitutions on a particular part of
+      # the path.  The pattern and replacement are separated by a comma and are
+      # enclosed by curly braces.  The replacement spec comes after the %
+      # character but before the operator letter.  (e.g. `%{old,new}d`).
+      # Multiple replacement specs should be separated by semi-colons (e.g.
+      # `%{old,new;src,bin}d`).
+      #
+      # Regular expressions may be used for the pattern, and back refs may be
+      # used in the replacement text.  Curly braces, commas and semi-colons are
+      # excluded from both the pattern and replacement text (let's keep parsing
+      # reasonable).
+      #
+      # @example
+      #   "src/org/onestepback/proj/A.java".pathmap("%{^src,class}X.class")
+      #   #=> "class/org/onestepback/proj/A.class"
+      #
+      #
+      # @example If the replacement text is '*', then a block may be provided to perform some arbitrary calculation for the replacement.
+      #   "/path/to/file.TXT".pathmap("%X%{.*,*}x") { |ext|
+      #      ext.downcase
+      #   } #=> "/path/to/file.txt"
+      def pathmap(spec = nil, &block)
+        return self if spec.nil?
+        result = +''
+        # noinspection SpellCheckingInspection
+        spec.scan(/%\{[^}]*\}-?\d*[sdpfnxX%]|%-?\d+d|%.|[^%]+/) do |frag|
+          # noinspection SpellCheckingInspection
+          case frag
+          when '%f'
+            result << basename.to_s
+          when '%n'
+            result << basename.ext.to_s
+          when '%d'
+            result << dirname.to_s
+          when '%x'
+            result << extname.to_s
+          when '%X'
+            result << ext.to_s
+          when '%p'
+            result << to_s
+          when '%s'
+            result << (File::ALT_SEPARATOR || File::SEPARATOR)
+          when '%-'
+            result
+          when '%%'
+            result << '%'
+          when /%(-?\d+)d/
+            result << partial(Regexp.last_match(1).to_i).to_s
+          when /^%{([^}]*)}(\d*[dpfnxX])/
+            patterns = Regexp.last_match(1)
+            operator = Regexp.last_match(2)
+            result << pathmap('%' + operator).pathmap_replace(patterns, &block).to_s
+          when /^%/
+            raise ArgumentError, "Unknown pathmap specifier #{frag} in '#{spec}'"
+          else
+            result << frag
+          end
+        end
+        Pathname(result)
+      end
+
+      # Perform the pathmap replacement operations on the given path. The
+      # patterns take the form 'pat1,rep1;pat2,rep2...'.
+      #
+      # @param patterns [String]
+      # @param block [Proc]
+      # @return [Pathname]
+      def pathmap_replace(patterns, &block)
+        result = self
+        patterns.split(';').each do |pair|
+          pattern, replacement = pair.split(',')
+          pattern = Regexp.new(pattern)
+          result = if replacement == '*' && block_given?
+                     result.sub(pattern, &block)
+                   elsif replacement
+                     result.sub(pattern, replacement)
+                   else
+                     result.sub(pattern, '')
+                   end
+        end
+        result
+      end
+    end
+  end
+end

data/lib/rom-files.rb

@@ -0,0 +1,3 @@
+# frozen_string_literal: true
+
+require 'rom/files'

data/lib/rom/files.rb

@@ -0,0 +1,28 @@
+# frozen_string_literal: true
+
+require 'dry/types/pathname'
+require 'rom'
+
+require 'rom/files/version'
+require 'rom/files/gateway'
+require 'rom/files/relation'
+
+ROM.register_adapter :files, ROM::Files
+
+require 'rom/files/plugins/relation/instrumentation'
+require 'rom/files/plugins/schema/contents'
+require 'rom/files/plugins/schema/mime'
+require 'rom/files/plugins/schema/shebang'
+require 'rom/files/plugins/schema/stat'
+require 'rom/files/plugins/configuration/gem'
+
+ROM.plugins do
+  adapter :files do
+    register :instrumentation, ROM::Files::Plugins::Relation::Instrumentation, type: :relation
+    register :contents, ROM::Files::Plugins::Schema::Contents, type: :schema
+    register :mime, ROM::Files::Plugins::Schema::Mime, type: :schema
+    register :shebang, ROM::Files::Plugins::Schema::Shebang, type: :schema
+    register :stat, ROM::Files::Plugins::Schema::Stat, type: :schema
+  end
+  register :gem, ROM::Files::Plugins::Configuration::Gem, type: :configuration
+end