behold 0.0.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: 37890fb8452e948a00eb6cb45722089f52ddf26510986f3c57be2b81d52ac72f
+  data.tar.gz: 9d2a93f2b5a7d23f925fdbe9b62252bdf7a2501a56ab5c8e53d9a73784ed5f2f
+SHA512:
+  metadata.gz: 056f7dc6ba24fe4cf65bce11f2a151747be983be96a5209928821f60b4a330bb553085f82c6f11075444c45ce8039b5d0400464a02952dd7f7853161d99daf74
+  data.tar.gz: 9236da3dc3dd35003c4df75145eb8d1db1f353c078731a434301942d6b782c0716251bc699c4db8a64875deaf1e2575946d876d26ba7e85baf7e4bfcd91f5392

data/Gemfile

@@ -0,0 +1,5 @@
+# frozen_string_literal: true
+
+source 'https://rubygems.org'
+
+gemspec

data/LICENSE

@@ -0,0 +1,22 @@
+Copyright (c) 2020 Shannon Skipper
+
+MIT License
+
+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/README.md

@@ -0,0 +1,65 @@
+# Behold
+
+## Warning
+
+*THIS IS UNSAFE, EXPERIMENTAL CODE.*
+
+This gem runs arbitrary code and can be capriciously destructive. Be warned!
+
+## Installation
+
+```sh
+gem install behold
+```
+
+## Examples
+
+```ruby
+require 'behold'
+
+Behold.call 5, 25
+#=> [[:abs2], [:**, 2], [:pow, 2], [:*, 5], [:+, 20], [:lcm, 25]]
+
+Behold.call 'hi', 'hi!'
+#=> [[:+, "!"], [:<<, "!"], [:concat, "!"], [:<<, 33], [:concat, 33], [:insert, 2, "!"]]
+
+Behold.call [1, 2, 3], '1,2,3'
+#=> [[:*, ","], [:join, ","]]
+
+Behold.call Object, 'Object'
+#=> [[:inspect], [:to_s], [:name], [:class_name], [:pretty_print_inspect]]
+
+Behold.call 1, 2
+#=> [[:next], [:succ], [:<<, 1], [:+, 1], [:lcm, 2], [:*, 2]]
+
+Behold.call 'BBQ', ['B', 'B', 'Q']
+#=> [[:grapheme_clusters], [:chars], [:split, ""], [:lines, "B"], [:rpartition, "B"], [:split, //]]
+
+puts Behold.code 'BBQ', ['B', 'B', 'Q']
+#>> "BBQ".grapheme_clusters
+#>> "BBQ".chars
+#>> "BBQ".split("")
+#>> "BBQ".lines("B")
+#>> "BBQ".rpartition("B")
+#>> "BBQ".split(//)
+```
+
+## Command Line Examples
+
+```sh
+behold 21 42
+#>> 21.<<(1)
+#>> 21.lcm(2)
+#>> 21.*(2)
+#>> 21.lcm(6)
+#>> 21.>>(-1.0)
+#>> 21.<<(1.0)
+
+behold 42 "'42'"
+#>> 42.inspect
+#>> 42.to_s
+#>> 42.inspect(10)
+#>> 42.to_s(10)
+#>> 42.inspect(10)
+#>> 42.to_s(10)
+```

data/Rakefile

@@ -0,0 +1,9 @@
+# frozen_string_literal: true
+
+require 'rake/testtask'
+
+task default: %w[test]
+
+Rake::TestTask.new do |spec|
+  spec.pattern = 'spec/*_spec.rb'
+end

data/bin/behold

@@ -0,0 +1,5 @@
+#!/usr/bin/env ruby
+
+require 'behold'
+
+puts Behold.code eval(ARGV.shift), eval(ARGV.shift)

data/lib/behold.rb

@@ -0,0 +1,120 @@
+# frozen_string_literal: true
+
+require 'set'
+require 'timeout'
+require_relative 'behold/arity_range'
+require_relative 'behold/version'
+
+module Behold
+  using ArityRange
+
+  FORBIDDEN = %i[__binding__ byebug debugger instance_eval pry
+                 public_send __send__ send].freeze
+  EMPTY_FUZZ = [nil].freeze
+  FUZZ = [*0..10,
+          -1.0, 0.0, 1.0,
+          [], {},
+          Float::INFINITY, Float::NAN,
+          '', *' '..'~', '  ', ', ', "\n", "\t", "\r",
+          'lowercase words', 'Capitalized Words', 'UPPERCASE WORDS',
+          //, /.+/, /\h+/,
+          :to_s, :to_i, :to_h, :to_a,
+          :join, :<<, :+, :-, :*, :inject, :new,
+          nil, true, false,
+          nil..nil, 1..10, 'a'..'f',
+          Time.now, Object, Module, Kernel,
+          *-10..-1, *11..101, *-101..11, 1_000, 10_000, -1_000, -10_000].freeze
+  DOUBLE_FUZZ = FUZZ.repeated_combination(2).to_a.freeze
+  FUZZES = [EMPTY_FUZZ, FUZZ, DOUBLE_FUZZ].freeze
+  RESULT_COUNT = 6
+  DEFAULT_TIMEOUT = 3
+
+  class << self
+    def code(from, to)
+      call(from, to).map do |meth, *args|
+        "#{from.inspect}.#{meth}#{"(#{args.map(&:inspect).join ', '})" unless args.empty?}"
+      end
+    end
+
+    def call(from, to)
+      black_hole do
+        lazy_tries = FUZZES.map.with_index do |fuzz, index|
+          match(from: from, to: to, fuzz: fuzz, arg_count: index)
+        end
+
+        best_matches(lazy_tries)
+      end
+    end
+
+    private
+
+    def best_matches(lazy_tries, matches = [])
+      Timeout.timeout DEFAULT_TIMEOUT do
+        lazy_matches(lazy_tries).each { |match| matches << match }
+      end
+
+      matches
+    rescue Timeout::Error
+      matches
+    end
+
+    def match(from:, to:, fuzz:, arg_count:)
+      fuzz.lazy.flat_map do |args|
+        found = arg_methods(soft_dup(from), arg_count).select do |meth|
+          case arg_count
+          when 1
+            check_method(meth, args, from: soft_dup(from), to: to)
+          else
+            check_method(meth, *args, from: soft_dup(from), to: to)
+          end
+        end
+        found = found.with_object(args) if args
+
+        found.map { |*send_this| [*send_this].flatten }
+      end
+    end
+
+    def black_hole
+      File.open File::NULL, File::APPEND do |dev_null|
+        $stdout = $stderr = dev_null
+
+        yield
+      ensure
+        $stdout = STDOUT
+        $stderr = STDERR
+      end
+    end
+
+    def lazy_matches(matches)
+      matches.reduce(:+).lazy.take(RESULT_COUNT)
+    end
+
+    def check_method(meth, *args, from:, to:)
+      from.public_send(meth, *args) == to
+    rescue StandardError, SyntaxError
+      nil
+    end
+
+    def soft_dup(from)
+      duped_from = from.dup
+      return from unless from == from.dup
+
+      duped_from
+    rescue FrozenError
+      from
+    end
+
+    def arg_methods(object, args)
+      object.public_methods.select do |meth|
+        next if FORBIDDEN.include? meth
+
+        meth_arity_range = object.public_method(meth).arity_range
+        next unless meth_arity_range.fetch(:keywords).min.zero?
+
+        mandatory_args, allowable_args = meth_arity_range.fetch(:arguments).minmax
+
+        mandatory_args <= args && allowable_args >= args
+      end.lazy
+    end
+  end
+end

data/lib/behold/arity_range.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+module Behold
+  module ArityRange
+    refine Method do
+      def arity_range
+        args = parameters.map(&:first)
+        req = args.count :req
+        keyreq = args.count :keyreq
+        opt = args.include?(:rest) ? Float::INFINITY : args.count(:opt)
+        keyopt = args.include?(:keyrest) ? Float::INFINITY : args.count(:key)
+
+        {arguments: req..req + opt, keywords: keyreq..keyreq + keyopt}
+      end
+    end
+  end
+end

data/lib/behold/version.rb

@@ -0,0 +1,9 @@
+# frozen_string_literal: true
+
+module Behold
+  MAJOR_VERSION = 0
+  MINOR_VERSION = 0
+  TEENY_VERSION = 0
+
+  VERSION = "#{MAJOR_VERSION}.#{MINOR_VERSION}.#{TEENY_VERSION}"
+end

data/spec/behold_spec.rb

@@ -0,0 +1,39 @@
+# frozen_string_literal: true
+
+require_relative 'helper'
+
+##
+# TODO: Tests. These spiked tests arbitrarily fail since Behold writes its own assertions.
+describe Behold do
+  describe 'calling' do
+    it 'works with numbers' do
+      assert_equal Behold.call(42, 42), [[:rationalize], [:ord], [:to_int], [:to_i], [:to_f], [:to_r]]
+      assert_equal Behold.call(42, 43), [[:next], [:succ], [:|, 1], [:+, 1], [:^, 1], [:|, 3]]
+    end
+
+    it 'works with strings' do
+      assert_equal Behold.call('shannon', 'Shannon'), [[:capitalize], [:capitalize!]]
+    end
+
+    it 'works with classes' do
+      assert_equal Behold.call(Object, 'Object'), [[:inspect], [:to_s], [:name]]
+    end
+  end
+
+  describe 'code' do
+    it 'works with numbers' do
+      assert_equal Behold.code(42, 42), ['42.rationalize', '42.ord', '42.to_int',
+                                         '42.to_i', '42.to_f', '42.to_r']
+      assert_equal Behold.code(42, 43), ['42.next', '42.succ', '42.|(1)', '42.+(1)',
+                                         '42.^(1)', '42.|(3)']
+    end
+
+    it 'works with strings' do
+      assert_equal Behold.code('shannon', 'Shannon'), ['"shannon".capitalize', '"shannon".capitalize!']
+    end
+
+    it 'works with classes' do
+      assert_equal Behold.code(Object, 'Object'), ["Object.inspect", "Object.to_s", "Object.name"]
+    end
+  end
+end

data/spec/helper.rb

@@ -0,0 +1,15 @@
+# frozen_string_literal: true
+
+lib = File.expand_path '../lib', __dir__
+$LOAD_PATH.prepend lib unless $LOAD_PATH.include? lib
+
+require 'behold'
+require 'minitest/autorun'
+require 'minitest/hell'
+require 'minitest/pride'
+
+module Minitest
+  class Test
+    prove_it!
+  end
+end

metadata

@@ -0,0 +1,96 @@
+--- !ruby/object:Gem::Specification
+name: behold
+version: !ruby/object:Gem::Version
+  version: 0.0.0
+platform: ruby
+authors:
+- Shannon Skipper
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2020-04-17 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: minitest
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '5'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '5'
+- !ruby/object:Gem::Dependency
+  name: minitest-proveit
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '13'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '13'
+description: Behold!
+email:
+- shannonskipper@gmail.com
+executables:
+- behold
+extensions: []
+extra_rdoc_files: []
+files:
+- Gemfile
+- LICENSE
+- README.md
+- Rakefile
+- bin/behold
+- lib/behold.rb
+- lib/behold/arity_range.rb
+- lib/behold/version.rb
+- spec/behold_spec.rb
+- spec/helper.rb
+homepage: https://github.com/havenwood/behold
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubygems_version: 3.1.2
+signing_key: 
+specification_version: 4
+summary: I looked, and there before me was a gem.
+test_files: []