tresse 0.1.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: a1837779d3e8be68176eb4fb52d2cc16d411ce24
+  data.tar.gz: 504b3c9a5c52290d7fd49bc9ddf24d685c4ea5be
+SHA512:
+  metadata.gz: cb7be058cf592b5ae2e0f75ce973f94acd79c7406fef6301e2b040ce19529d497013b28f95d1e029b38938fbe8c1264fdaf16b234a10d368651ea70a9f1b1a4d
+  data.tar.gz: 99b7ea37ef5ea2e2dac2e99a3336b137cd282f2aaa619a6d827d42d0f9e341a594022b04278a6be2e2ef8e7ce7ef39fec0487e1f12ea3b9afd48a8d24d88c19c

data/CHANGELOG.md

@@ -0,0 +1,8 @@
+
+# CHANGELOG.md
+
+
+## tresse 0.1.0  released 2019-09-15
+
+* Initial release
+

data/CREDITS.md

@@ -0,0 +1,5 @@
+
+# tresse credits
+
+* John Mettraux https://github.com/jmettraux author and maintainer
+

data/LICENSE.txt

@@ -0,0 +1,24 @@
+
+Copyright (c) 2019-2019, John Mettraux, jmettraux@gmail.com
+
+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.
+
+
+Made in Japan
+

data/Makefile

@@ -0,0 +1,39 @@
+
+## gem tasks ##
+
+NAME = \
+  $(shell ruby -e "s = eval(File.read(Dir['*.gemspec'][0])); puts s.name")
+VERSION = \
+  $(shell ruby -e "s = eval(File.read(Dir['*.gemspec'][0])); puts s.version")
+
+count_lines:
+	find lib -name "*.rb" | xargs cat | ruby -e "p STDIN.readlines.count { |l| l = l.strip; l[0, 1] != '#' && l != '' }"
+	find spec -name "*_spec.rb" | xargs cat | ruby -e "p STDIN.readlines.count { |l| l = l.strip; l[0, 1] != '#' && l != '' }"
+cl: count_lines
+
+gemspec_validate:
+	@echo "---"
+	ruby -e "s = eval(File.read(Dir['*.gemspec'].first)); p s.validate"
+	@echo "---"
+
+name: gemspec_validate
+	@echo "$(NAME) $(VERSION)"
+
+cw:
+	find lib -name "*.rb" -exec ruby -cw {} \;
+
+build: gemspec_validate
+	gem build $(NAME).gemspec
+	mkdir -p pkg
+	mv $(NAME)-$(VERSION).gem pkg/
+
+push: build
+	gem push pkg/$(NAME)-$(VERSION).gem
+
+spec:
+	bundle exec rspec
+test: spec
+
+
+.PHONY: count_lines gemspec_validate name cw build push spec
+

data/README.md

@@ -0,0 +1,42 @@
+
+# tresse
+
+A poorly thought out and stupid each+map+reduce contraption.
+
+
+## use
+
+```
+require 'tresse'
+
+r =
+  Tresse::Group.new('test0')
+    .append { 'b' }
+    .append { 'a' }
+    .collect { |e| e * 2 }
+
+r
+  # => %[ aa bb ]
+  # or
+  # => %[ bb aa ]
+```
+
+```ruby
+require 'tresse'
+
+r =
+  Tresse::Group.new('test0')
+    .append { [ 'a' ] }
+    .append { [ 'c' ] }
+    .append { [ 'b' ] }
+    .each { |e| e[0] = e[0] * 2 }
+    .inject([]) { |a, e| a << e.first; a.sort }
+
+r
+  # => %w[ aa bb cc ]
+```
+
+## license
+
+MIT, see [LICENSE.txt](LICENSE.txt)
+

data/lib/tresse.rb

@@ -0,0 +1,210 @@
+
+require 'thread'
+
+
+module Tresse
+
+  VERSION = '0.1.0'
+
+  class << self
+
+    attr_accessor :max_work_threads
+
+    def init
+
+      @max_work_threads = 7
+      @work_queue = Queue.new
+      @thread_queue = Queue.new
+
+      @on_error = lambda do |where, err|
+        puts "-" * 80
+        p where
+        p err
+        puts err.backtrace
+        puts "-" * 80
+      end
+
+      run
+    end
+
+    def enqueue(batch)
+
+      @work_queue << batch
+
+      batch.group
+    end
+
+    def on_error(&block)
+
+      @on_error = block
+    end
+
+    protected
+
+    def run
+
+      @max_work_threads.times { |i| @thread_queue << i }
+
+      Thread.new do
+        loop do
+          begin
+
+            i = @thread_queue.pop
+            batch = @work_queue.pop
+
+            hand_to_worker_thread(i, batch)
+
+          rescue => err
+
+            @on_error.call(:in_loop, err)
+          end
+        end
+      end
+    end
+
+    def hand_to_worker_thread(i, batch)
+
+      Thread.new do
+        begin
+
+          Thread.current[:tress] = true
+          Thread.current[:i] = i
+
+          batch.process
+
+          @thread_queue << i unless i >= @max_work_threads
+
+        rescue => err
+
+          @on_error.call(:in_worker_thread, err)
+        end
+      end
+    end
+  end
+    #
+  self.init
+
+
+  class Batch
+
+    attr_reader :group
+    attr_reader :each_index, :value
+
+    def initialize(group, block_or_group)
+
+      @group = group
+      @bog = block_or_group
+
+      @each_index = -1
+      @value = nil
+    end
+
+    def process
+
+      @each_index += 1
+      @group.send(:hand, self)
+    end
+
+    protected
+
+    def generate
+
+      args = [ group ] + [ nil ] * 7
+      args = args[0, @bog.method(:call).arity]
+
+      @value = @bog.call(*args)
+    end
+  end
+
+  class Group
+
+    attr_accessor :name
+    attr_reader :batches
+
+    def initialize(name)
+
+      @name = name
+
+      @batches = []
+      @eaches = [ nil ]
+
+      @final = nil
+      @final_batches = []
+      @final_queue = Queue.new
+    end
+
+    #
+    # appending methods
+
+    def append(o=nil, &block)
+
+      batch = Tresse::Batch.new(self, o ? o : block)
+
+      @batches << batch
+      Tresse.enqueue(batch)
+    end
+
+    #
+    # step methods
+
+    def each(&block)
+
+      @eaches << block
+
+      self
+    end
+
+    #
+    # final methods
+
+    def inject(target, &block)
+
+      @final = [ target, block ]
+
+      @final_queue.pop
+    end
+    alias reduce inject
+
+    def collect(&block)
+
+      @final = block
+
+      @final_queue.pop
+    end
+    alias map collect
+
+    protected
+
+    def hand(batch)
+
+      if batch.each_index == 0
+        batch.send(:generate)
+        Tresse.enqueue(batch)
+      elsif e = @eaches[batch.each_index]
+        args = [ batch.value, batch ]
+        args = args[0, e.method(:call).arity.abs]
+        e.call(*args)
+        Tresse.enqueue(batch)
+      else
+        queue_for_final(batch)
+      end
+    end
+
+    def queue_for_final(batch)
+
+      @final_batches << batch
+
+      return if @final_batches.size < @batches.size
+
+      es = @batches.collect(&:value)
+
+      @final_queue <<
+        if @final.is_a?(Array)
+          es.inject(@final[0], &@final[1])
+        else
+          es.collect(&@final)
+        end
+    end
+  end
+end
+

data/tresse.gemspec

@@ -0,0 +1,37 @@
+
+Gem::Specification.new do |s|
+
+  s.name = 'tresse'
+
+  s.version = File.read(
+    File.expand_path('../lib/tresse.rb', __FILE__)
+  ).match(/ VERSION *= *['"]([^'"]+)/)[1]
+
+  s.platform = Gem::Platform::RUBY
+  s.authors = [ 'John Mettraux' ]
+  s.email = [ 'jmettraux@gmail.com' ]
+  s.homepage = 'http://github.com/jmettraux/tresse'
+  #s.rubyforge_project = 'rufus'
+  s.license = 'MIT'
+  s.summary = 'a stupid each+map+reduce thing'
+
+  s.description = %{
+a poorly thought out and stupid each+map+reduce contraption
+  }.strip
+
+  #s.files = `git ls-files`.split("\n")
+  s.files = Dir[
+    'README.{md,txt}',
+    'CHANGELOG.{md,txt}', 'CREDITS.{md,txt}', 'LICENSE.{md,txt}',
+    'Makefile',
+    'lib/**/*.rb', #'spec/**/*.rb', 'test/**/*.rb',
+    "#{s.name}.gemspec",
+  ]
+
+  #s.add_runtime_dependency 'tzinfo'
+
+  s.add_development_dependency 'rspec', '~> 3.8'
+
+  s.require_path = 'lib'
+end
+

metadata

@@ -0,0 +1,65 @@
+--- !ruby/object:Gem::Specification
+name: tresse
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+platform: ruby
+authors:
+- John Mettraux
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2019-09-15 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.8'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.8'
+description: a poorly thought out and stupid each+map+reduce contraption
+email:
+- jmettraux@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- CHANGELOG.md
+- CREDITS.md
+- LICENSE.txt
+- Makefile
+- README.md
+- lib/tresse.rb
+- tresse.gemspec
+homepage: http://github.com/jmettraux/tresse
+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: []
+rubyforge_project: 
+rubygems_version: 2.5.2.3
+signing_key: 
+specification_version: 4
+summary: a stupid each+map+reduce thing
+test_files: []