polyphony 0.43.11 → 0.45.4

data/examples/core/xx-agent.rb

@@ -1,102 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'polyphony'
-
-Exception.__disable_sanitized_backtrace__ = true
-
-class Test
-  def test_sleep
-    puts "going to sleep"
-    sleep 1
-    puts "done sleeping"
-  end
-  
-  def test_spin
-    spin {
-      10.times {
-        STDOUT << '.'
-        sleep 0.1
-      }
-    }
-    
-    puts "going to sleep\n"
-    sleep 1
-    puts 'woke up'
-  end
-  
-  def test_file
-    f = File.open(__FILE__, 'r')
-    puts Thread.current.agent.read(f, +'', 10000, true)
-    
-    Thread.current.agent.write(STDOUT, "Write something: ")
-    str = +''
-    Thread.current.agent.read(STDIN, str, 5, false)
-    puts str
-  end
-  
-  def test_fork
-    pid = fork do
-      Thread.current.agent.post_fork
-      puts 'child going to sleep'
-      sleep 1
-      puts 'child done sleeping'
-      exit(42)
-    end
-    
-    puts "Waiting for pid #{pid}"
-    result = Thread.current.agent.waitpid(pid)
-    puts "Done waiting"
-    p result
-  end
-  
-  def test_async
-    async = Polyphony::Event.new
-    
-    spin {
-      puts "signaller starting"
-      sleep 1
-      puts "signal"
-      async.signal(:foo)
-    }
-    
-    puts "awaiting event"
-    p async.await
-  end
-  
-  def test_queue
-    q = Gyro::Queue.new
-    spin {
-      10.times {
-        q << Time.now.to_f
-        sleep 0.2
-      }
-      q << :STOP
-    }
-    
-    loop do
-      value = q.shift
-      break if value == :STOP
-      
-      p value
-    end
-  end
-  
-  def test_thread
-    t = Thread.new do
-      puts "thread going to sleep"
-      sleep 0.2
-      puts "thread done sleeping"
-    end
-    
-    t.await
-  end
-end
-
-t = Test.new
-
-t.methods.select { |m| m =~ /^test_/ }.each do |m|
-  puts '*' * 40
-  puts m
-  t.send(m)
-end

data/examples/core/xx-at_exit.rb

@@ -1,29 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'polyphony'
-
-Exception.__disable_sanitized_backtrace__ = true
-
-child_pid = Polyphony.fork do
-  at_exit do
-    puts "at_exit"
-    f = spin { sleep 10 }
-    trap('SIGINT') { f.stop }
-    f.await
-  end
-  
-  f1 = spin { sleep 100 }
-  
-  puts "pid: #{Process.pid}"
-  
-  pid = Process.pid
-  
-  f1.join
-end
-
-sleep 0.1
-Process.kill('INT', child_pid)
-sleep 0.1
-Process.kill('INT', child_pid)
-Process.wait(child_pid)

data/examples/core/xx-caller.rb

@@ -1,12 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'polyphony'
-
-spin {
-  spin {
-    spin {
-      pp Fiber.current.caller
-    }.await
-  }.await
-}.await

data/examples/core/xx-daemon.rb

@@ -1,14 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'polyphony'
-
-Exception.__disable_sanitized_backtrace__ = true
-
-puts "pid: #{Process.pid}"
-
-Process.daemon(true, true)
-
-Polyphony::ThreadPool.process do
-  puts "Hello world from pid #{Process.pid}"
-end

data/examples/core/xx-deadlock.rb

@@ -1,8 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'polyphony'
-
-spin { sleep }
-
-sleep

data/examples/core/xx-deferring-an-operation.rb

@@ -1,14 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'polyphony'
-
-spin do
-  puts 'two'
-  spin { puts 'four' }
-  puts 'three'
-end
-
-puts 'one'
-
-suspend

data/examples/core/xx-exception-backtrace.rb

@@ -1,40 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-
-class E < Exception
-  def initialize(msg)
-    super
-    # set_backtrace(caller)
-  end
-
-  alias_method :orig_backtrace, :backtrace
-  def backtrace
-    b = orig_backtrace
-    p [:backtrace, b, caller]
-    b
-  end
-end
-
-def e1
-  e2
-end
-
-def e2
-  E.new('foo')
-end
-
-def e3
-  raise E, 'bar'
-end
-
-e = e1
-p e
-puts e.backtrace&.join("\n")
-
-begin
-  e3
-rescue Exception => e
-  p e
-  puts e.backtrace.join("\n")
-end

data/examples/core/xx-fork-cleanup.rb

@@ -1,22 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'polyphony'
-
-Exception.__disable_sanitized_backtrace__ = true
-
-t = Thread.new do
-  async = Gyro::Async.new
-  spin { async.await }
-  sleep 100
-end
-
-sleep 0.5
-
-Polyphony.fork do
-  puts "forked #{Process.pid}"
-  sleep 1
-  puts "done sleeping"
-end
-
-sleep 50

data/examples/core/xx-fork-spin.rb

@@ -1,42 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'polyphony'
-
-Exception.__disable_sanitized_backtrace__ = true
-
-puts "Parent pid: #{Process.pid}"
-
-i, o = IO.pipe
-
-pid = Polyphony.fork do
-  puts "Child pid: #{Process.pid}"
-  i.close
-  spin do
-    spin do
-      p :sleep
-      sleep 1
-    rescue ::Interrupt => e
-      p 1
-      # the signal should be raised only in the main fiber
-      o.puts "1-interrupt"
-    end.await
-  rescue Polyphony::Terminate
-    puts "terminate!"
-  end.await
-rescue ::Interrupt => e
-  p 2
-  o.puts "3-interrupt"
-ensure
-  p 3
-  o.close
-end
-sleep 0.2
-o.close
-watcher = Gyro::Child.new(pid)
-Process.kill('INT', pid)
-watcher.await
-buffer = i.read
-
-puts '*' * 40
-p buffer

data/examples/core/xx-fork-terminate.rb

@@ -1,27 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'polyphony'
-
-Exception.__disable_sanitized_backtrace__ = true
-
-pid = Polyphony.fork do
-  f = spin do
-    p 1
-    sleep 1
-    p 2
-  ensure
-    p 2.5
-  end
-  p 3
-  snooze
-  p 4
-  # f.stop
-  # f.join
-  # Fiber.current.terminate_all_children
-  # Fiber.current.await_all_children
-  p 5
-end
-
-puts "Child pid: #{pid}"
-Process.wait(pid)

data/examples/core/xx-move_on.rb

@@ -1,23 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'polyphony'
-Exception.__disable_sanitized_backtrace__ = true
-
-puts 'going to sleep...'
-move_on_after(1) do
-  sleep 60
-  puts 'woke up'
-end
-
-puts 'going to sleep...'
-move_on_after(0.5) do
-  t0 = Time.now
-  sleep(60)
-ensure
-  puts 'woke up'
-end
-
-puts 'going to sleep...'
-value = move_on_after(1, with_value: :bar) { sleep 60 }
-puts "got value #{value.inspect}"

data/examples/core/xx-queue-async.rb

@@ -1,120 +0,0 @@
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'polyphony'
-
-Thread.event_selector = ->(thread) { Gyro::Selector.new(thread) }
-
-def bm(sym, x)
-  t0 = Time.now
-  send(sym, x)
-  elapsed = Time.now - t0
-  STDOUT.orig_puts "#{sym} #{x / elapsed}"
-end
-
-def test_queue(x)
-  queue = Queue.new
-  async = Gyro::Async.new
-  t1 = Thread.new do
-    Thread.current.setup_fiber_scheduling
-    counter = 0
-    loop {
-      async.await if queue.empty?
-      v = queue.pop
-      counter += 1
-      break if counter == x
-    }
-  ensure
-    Thread.current.stop_event_selector
-  end
-  t2 = Thread.new do
-    Thread.current.setup_fiber_scheduling
-    x.times { |i|
-      queue.push i
-      async.signal!
-    }
-  ensure
-    Thread.current.stop_event_selector
-  end
-  t1.join
-  t2.join
-end
-
-def test_array_mutex(x)
-  queue = []
-  mutex = Mutex.new
-  async = Gyro::Async.new
-  t1 = Thread.new {
-    Thread.current.setup_fiber_scheduling
-    counter = 0
-    loop {
-      async.await if mutex.synchronize { queue.empty? }
-      v = mutex.synchronize { queue.shift }
-      counter += 1
-      break if counter == x
-    }
-  }
-  t2 = Thread.new {
-    Thread.current.setup_fiber_scheduling
-    x.times { |i|
-      mutex.synchronize { queue.push i }
-      async.signal!
-    }
-  }
-  t1.join
-  t2.join
-end
-
-# class Gyro::Queue
-#   def initialize
-#     @wait_queue = []
-#     @queue = []
-#   end
-
-#   def <<(value)
-#     async = @wait_queue.pop
-#     if async
-#       async.signal! value
-#     else
-#       @queue.push value
-#     end
-#   end
-
-#   def shift
-#     if @queue.empty?
-#       async = Gyro::Async.new
-#       @wait_queue << async
-#       async.await
-#     else
-#       @queue.shift
-#     end
-#   end
-# end
-
-def test_gyro_queue(x)
-  queue = Gyro::Queue.new
-  x.times { |i| queue << i }
-  t1 = Thread.new do
-    Thread.current.setup_fiber_scheduling
-    x.times { queue.shift }
-  ensure
-    Thread.current.stop_event_selector
-  end
-  t2 = Thread.new do
-    Thread.current.setup_fiber_scheduling
-    x.times { |i| queue << i }
-  ensure
-    Thread.current.stop_event_selector
-  end
-  t1.join
-  t2.join
-end
-
-Thread.current.setup_fiber_scheduling
-# bm(:test_array_mutex,     1000000)
-loop {
-  STDOUT.orig_puts "*" * 40
-  bm(:test_queue,           1000000)
-  bm(:test_gyro_queue,      1000000)
-}
-