wxruby3 0.9.0.pre.beta.8

data/samples/sampler/find.xpm

@@ -0,0 +1,62 @@
+/* XPM */
+static const char *const find_xpm[] = {
+/* columns rows colors chars-per-pixel */
+"16 15 41 1",
+"y c #A06959",
+"9 c #A7DAF2",
+"$ c #B5CAD7",
+"> c #35B4E1",
+"t c #6B98B8",
+"w c #B6E0F4",
+"q c #AEC9D7",
+"1 c #5A89A6",
+"+ c #98B3C6",
+"4 c #EAF6FC",
+"3 c #DEF1FA",
+"= c #4CBCE3",
+"d c #DB916B",
+"X c #85A7BC",
+"s c #D8BCA4",
+"o c #749BB4",
+"e c #BCD9EF",
+"* c #62B4DD",
+"< c #91D2EF",
+"a c #E6DED2",
+"0 c #E9F4FB",
+"  c None",
+"@ c #A0BACB",
+"O c #AABFCD",
+"i c #6591AE",
+": c #B9CBD5",
+"- c #71C5E7",
+"5 c #D3ECF8",
+"% c #81A3B9",
+"6 c #8AD0EE",
+"8 c #FDFDFE",
+"p c #8EA9BC",
+"r c #B6D5EE",
+", c #81CCEB",
+". c #ACC4D3",
+"; c #AFD1DE",
+"7 c #EFF8FC",
+"u c #C2CBDB",
+"# c #C0D1DC",
+"2 c #CAD6E1",
+"& c #8FB0C3",
+/* pixels */
+"       .XooXO   ",
+"      +@###$+%  ",
+"     .&#*==-;@@ ",
+"     o:*>,<--:X ",
+"     12>-345-#% ",
+"     12>678392% ",
+"     %$*,3059q& ",
+"     @Oq,wwer@@ ",
+"      t@q22q&+  ",
+"    yyui+%o%p   ",
+"   yasy         ",
+"  yasdy         ",
+" yasdy          ",
+" ysdy           ",
+"  yy            "
+};

data/samples/sampler/findrepl.xpm

@@ -0,0 +1,63 @@
+/* XPM */
+static const char *const findrepl_xpm[] = {
+/* columns rows colors chars-per-pixel */
+"16 15 42 1",
+"y c #A06959",
+"9 c #A7DAF2",
+"$ c #B5CAD7",
+"> c #35B4E1",
+"t c #6B98B8",
+"w c #B6E0F4",
+"q c #AEC9D7",
+"1 c #5A89A6",
+"+ c #98B3C6",
+"4 c #EAF6FC",
+"d c #008000",
+"3 c #DEF1FA",
+"= c #4CBCE3",
+"f c #DB916B",
+"X c #85A7BC",
+"s c #D8BCA4",
+"o c #749BB4",
+"e c #BCD9EF",
+"* c #62B4DD",
+"< c #91D2EF",
+"a c #E6DED2",
+"0 c #E9F4FB",
+"  c None",
+"@ c #A0BACB",
+"O c #AABFCD",
+"i c #6591AE",
+": c #B9CBD5",
+"- c #71C5E7",
+"5 c #D3ECF8",
+"% c #81A3B9",
+"6 c #8AD0EE",
+"8 c #FDFDFE",
+"p c #8EA9BC",
+"r c #B6D5EE",
+", c #81CCEB",
+". c #ACC4D3",
+"; c #AFD1DE",
+"7 c #EFF8FC",
+"u c #C2CBDB",
+"# c #C0D1DC",
+"2 c #CAD6E1",
+"& c #8FB0C3",
+/* pixels */
+"      .XooXO    ",
+"     +@###$+%   ",
+"    .&#*==-;@@  ",
+"    o:*>,<--:X  ",
+"    12>-345-#%  ",
+"    12>678392%  ",
+"    %$*,3059q&  ",
+"    @Oq,wwer@@  ",
+"     t@q22q&+   ",
+"   yyui+%o%p    ",
+"  yasy   d   d  ",
+" yasfy  dd   dd ",
+"yasfy  ddddddddd",
+"ysfy    dd   dd ",
+" yy      d   d  "
+};

data/samples/sampler/forward.xpm

@@ -0,0 +1,21 @@
+/* XPM */
+static const char *const forward_xpm[] = {
+"16 15 3 1",
+" 	c None",
+".	c Black",
+"X	c Gray100",
+"                ",
+"                ",
+"         .      ",
+"         ..     ",
+"         .X.    ",
+"  ........XX.   ",
+"  .XXXXXXXXXX.  ",
+"  .XXXXXXXXXXX. ",
+"  .XXXXXXXXXXX. ",
+"  .XXXXXXXXXX.  ",
+"  ........XX.   ",
+"         .X.    ",
+"         ..     ",
+"         .      ",
+"                "};

data/samples/sampler/paste.xpm

@@ -0,0 +1,46 @@
+/* XPM */
+static const char *const paste_xpm[] = {
+/* columns rows colors chars-per-pixel */
+"16 15 25 1",
+"< c #FEECE4",
+"> c #FEE3D7",
+"O c #FFFFFF",
+"o c #7B767D",
+"% c #F79586",
+"& c #CAE1F3",
+"@ c #F08B62",
+"# c #FCCBB8",
+"- c #FDD8C9",
+"4 c #FFF8F4",
+"5 c #FFF5F0",
+"  c None",
+"$ c #F8AA8F",
+", c #EFF6FC",
+"1 c #F7FBFD",
+"2 c #FAFCFE",
+"; c #DAEAF7",
+": c #E9F3FA",
+"6 c #FFFAF8",
+". c #3C78A6",
+"3 c #FFF1ED",
+"X c #9B8687",
+"+ c #FBBCA4",
+"* c #B6D5EE",
+"= c #F4F9FD",
+/* pixels */
+"   ......       ",
+" .XoOOOOoo.     ",
+".+XOOOOOOX@.    ",
+".+XXXXXXXX@.    ",
+".#++$$%@.....   ",
+".##++$$%.&*.=.  ",
+".-##++$$.;&.==. ",
+".--##++$.:;.... ",
+".>--##++.,:;&*. ",
+".<>--##+.1,:;&. ",
+".<<>--##.21,:;. ",
+".3<<>--#.O21=:. ",
+".45<<>--....... ",
+".6453<>----.    ",
+"............    "
+};

data/samples/sampler/play.xpm

@@ -0,0 +1,24 @@
+/* XPM */
+static const char *const play_xpm[] = {
+/* columns rows colors chars-per-pixel */
+"16 16 2 1",
+"  c None",
+". c Black",
+/* pixels */
+"                ",
+"                ",
+"                ",
+"    .           ",
+"    ...         ",
+"    .....       ",
+"    .......     ",
+"    .........   ",
+"    .......     ",
+"    .....       ",
+"    ...         ",
+"    .           ",
+"                ",
+"                ",
+"                ",
+"                "
+};

data/samples/sampler/redo.xpm

@@ -0,0 +1,58 @@
+/* XPM */
+static const char *const redo_xpm[] = {
+/* columns rows colors chars-per-pixel */
+"16 15 37 1",
+"4 c #9BACC2",
+"; c #4C7398",
+"3 c #547B99",
+"* c #547897",
+"# c #5A89A6",
+"8 c #3A749C",
+"5 c #5A809C",
+", c #7F99B4",
+"& c #3F6F93",
+"9 c #85A7BC",
+"+ c #749BB4",
+"> c #718BA7",
+"e c #A5B3C8",
+"w c #BECAD9",
+": c #65839D",
+"u c #E1E6EE",
+"o c #236289",
+"r c #ADBED2",
+"= c #597B9A",
+"2 c #8DA0B9",
+"  c None",
+"% c #467291",
+"1 c #7393AB",
+"i c #4C809F",
+"- c #A0BACB",
+"O c #6591AE",
+"X c #407598",
+"6 c #6F90A6",
+"t c #D2D9E0",
+"7 c #ADBACE",
+"@ c #326A8F",
+"0 c #467A9C",
+". c #ACC4D3",
+"< c #7F97B0",
+"y c #B3BFD1",
+"q c #A2B3C5",
+"$ c #8FB0C3",
+/* pixels */
+"   .XoooO       ",
+"  +o@@@@@o#    +",
+" $@%%&@&%%&@  +o",
+" X*=@+-+@*=;@#&@",
+" @:=+    @=:=*:@",
+" &>:$     @:>>>@",
+" &,<X     X>,,,&",
+" +123    @<2222&",
+"  X44X  #@56<44X",
+"  O1748    .9#&o",
+"   0qwe8        ",
+"    8rty8       ",
+"     8wu+       ",
+"      i##       ",
+"                "
+};

data/samples/sampler/sample.rb

@@ -0,0 +1,347 @@
+###
+# wxRuby3 sampler application
+# Copyright (c) M.J.N. Corino, The Netherlands
+###
+
+module WxRuby
+
+  ART_FOLDER = File.join(__dir__, '..', 'art')
+
+  module Sample
+    ROOT = File.expand_path(File.join(__dir__, '..'))
+    RUBY = ENV["RUBY"] || File.join(
+      RbConfig::CONFIG["bindir"],
+      RbConfig::CONFIG["ruby_install_name"] + RbConfig::CONFIG["EXEEXT"]).
+      sub(/.*\s.*/m, '"\&"')
+
+    Description = Struct.new(:file, :summary, :description, :thumbnail, keyword_init: true) do
+      def name
+        File.basename(self.file, '.*').downcase
+      end
+
+      def path
+        File.dirname(self.file)
+      end
+
+      def category
+        File.basename(path).modulize!
+      end
+
+      def image_file
+        basename = self[:thumbnail] || "tn_#{self.name}"
+        if File.exist?(tn_file = File.join(self.path, "#{basename}_#{Wx::PLATFORM}.png"))
+          return tn_file
+        elsif File.exist?(tn_file = File.join(self.path, "#{basename}.png"))
+          return tn_file
+        end
+        nil
+      end
+
+      def image
+        if (img_file = image_file)
+          img = Wx::Image.new(img_file)
+          scale = 250.0 / img.height
+          img = img.copy.rescale((img.width*scale).to_i, (img.height*scale).to_i)
+          img.to_bitmap
+        else
+          Wx::ArtProvider::get_bitmap(Wx::ART_QUESTION)
+        end
+      end
+
+      def thumbnail
+        if (img_file = image_file)
+          img = Wx::Image.new(img_file)
+          if (scale = img.height / 50.0) > 1.0
+            img = img.copy.rescale((img.width/scale).to_i, (img.height/scale).to_i)
+          end
+          img.to_bitmap
+        else
+          Wx::ArtProvider::get_bitmap(Wx::ART_QUESTION)
+        end
+      end
+    end
+
+    class SampleEntry
+      def initialize(mod, newfiles)
+        @module = mod
+        @runner = nil
+        @description = nil
+        # filter new required files; keep only .rb from sample path
+        @files = newfiles.select { |fp| File.extname(fp) == '.rb' && fp.start_with?(path) }
+      end
+
+      attr_reader :files
+
+      def description
+        @description ||= Description.new(**@module.describe)
+      end
+
+      def file
+        description.file
+      end
+
+      def path
+        description.path
+      end
+
+      def category
+        description.category
+      end
+
+      def summary
+        description.summary
+      end
+
+      def run
+        @runner = @module.run
+      end
+
+      def running?
+        !!@runner
+      end
+
+      def active?
+        @runner && @runner.active?
+      end
+
+      def read
+        @runner ? @runner.read : ''
+      end
+
+      def close
+        begin
+          return @runner.close if @runner
+        ensure
+          @runner = nil
+        end
+        ''
+      end
+
+      def close_window(win)
+        if EmbeddedRunner === @runner && @runner.frame == win
+          @runner.frame = nil
+        end
+      end
+
+      class Copy < SampleEntry
+        def initialize(desc, files)
+          super(nil, [])
+          @description = desc
+          @files = files
+        end
+
+        def run
+          @runner = SpawnedRunner.new(description.file)
+        end
+      end
+
+      def copy_to(dest)
+        # create description clone
+        desc_clone = description.dup
+        # create sample folder at dest
+        sample_folder = File.join(dest, File.basename(path))
+        FileUtils.mkdir_p(sample_folder)
+        # copy main file
+        desc_clone.file = File.join(sample_folder, File.basename(file))
+        FileUtils.cp(file, desc_clone.file)
+        # copy required files
+        files_copy = []
+        files.each do |f|
+          files_copy << File.join(sample_folder, File.basename(f))
+          FileUtils.cp(f, files_copy.last)
+        end
+        # copy thumbnail image file if any
+        if description.image_file
+          desc_clone[:thumbnail] = File.join(sample_folder, File.basename(description.image_file))
+          FileUtils.cp(description.image_file, desc_clone[:thumbnail])
+        end
+        # copy sample specific resources (not .rb or 'tn_*.png' files and not directories)
+        Dir[File.join(path, '*')].each do |fp|
+          unless File.directory?(fp) || File.extname(fp) == '.rb' || /\Atn_.*\.png\Z/ =~ File.basename(fp)
+            FileUtils.cp(fp, File.join(sample_folder, File.basename(fp)))
+          end
+        end
+        # copy art folder to dest
+        art_dest = File.join(dest, 'art')
+        FileUtils.mkdir_p(art_dest)
+        Dir[File.join(ART_FOLDER, '*')].each do |fp|
+          FileUtils.cp(fp, File.join(art_dest, File.basename(fp)))
+        end
+        # copy sample.xpm
+        FileUtils.cp(File.join(ROOT, 'sample.xpm'), File.join(dest, 'sample.xpm'))
+        # copy and return SampleEntry::Copy
+        Copy.new(desc_clone, files_copy)
+      end
+
+      class EmbeddedRunner
+        def initialize(frame)
+          @frame = frame
+        end
+        attr_accessor :frame
+        def close
+          @frame.close(true) if @frame
+          @frame = nil
+          ''
+        end
+        def active?
+          !!@frame
+        end
+        def read
+          ''
+        end
+      end
+
+      class SpawnedRunner
+        def initialize(sample_file)
+          # capture stderr and stdout of child process
+          @r_p, @w_p = IO.pipe
+          cap_opt = {out: @w_p, :err=>[:child, :out]}
+          @pid = ::Process.spawn(RUBY, '-I', File.join(ROOT, '..', 'lib'), sample_file, cap_opt)
+        end
+
+        def check_status
+          return false unless @pid
+          begin
+            tmp, status = ::Process.waitpid2(@pid, ::Process::WNOHANG)
+            if tmp==@pid and status.success? == false
+              return false
+            end
+            return true
+          rescue Errno::ECHILD, Errno::ESRCH
+            return false
+          end
+        end
+        private :check_status
+
+        def active?
+          check_status
+        end
+
+        def read
+          if check_status
+            begin
+              @r_p.read_nonblock(4096) || ''
+            rescue EOFError
+              ''
+            rescue Errno::EAGAIN, Errno::EINTR, IO::EWOULDBLOCKWaitReadable
+              ''
+            end
+          else
+            close
+          end
+        end
+
+        def close
+          begin
+            if check_status
+              ::Process.kill('SIGKILL', @pid) rescue Errno::ESRCH
+              10.times do
+                sleep(0.1)
+                return unless check_status
+              end
+              ::Process.kill('SIGKILL', @pid) if check_status
+              @w_p.close
+              return @r_p.read
+            end
+            return ''
+          ensure
+            @r_p.close if @r_p
+            @pid = nil
+            @w_p = nil
+            @r_p = nil
+          end
+        end
+      end
+    end
+
+    class << self
+
+      def loading_sample
+        @loading_sample
+      end
+
+      def samples
+        @samples ||= []
+      end
+
+      def categories
+        @categories ||= {}
+      end
+
+      def category_samples(cat)
+        categories[cat] ||= []
+      end
+
+      def sample_captures
+        @captures ||= []
+      end
+      private :sample_captures
+
+      # determine max number of progress events (doesn't need to be exact)
+      def max_collection
+        Dir[File.join(ROOT, '*')].select do |entry|
+          'bigdemo' !=  (category = File.basename(entry)) && 'sampler' != category
+        end.size*2
+      end
+
+      def collect_samples(&block)
+        read_count = 0
+        Dir[File.join(ROOT, '*')].each do |entry|
+          if File.directory?(entry)
+            category = File.basename(entry)
+            unless 'bigdemo' ==  category || 'sampler' == category
+              category.modulize!
+              Dir[File.join(entry, '*.rb')].each do |rb|
+                # only if this is a file (paranoia check) and contains 'include WxRuby::Sample'
+                if File.file?(rb) && (sample_lns = File.readlines(rb)).any? { |ln| /\s+include\s+WxRuby::Sample/ =~ ln }
+                  # register currently required files
+                  cur_loaded = ::Set.new($LOADED_FEATURES)
+                  @loading_sample = rb
+                  # cannot use (Kernel#load with) an anonymous module because that will break the Wx::Dialog functor
+                  # functionality for one thing (that code will attempt to define a module method for a new dialog class
+                  # in the class/module scope in which the dialog class is defined working from the dialog class name;
+                  # this will fail for anonymous modules as these cannot be identified by name)
+                  sample_mod = Sample.const_set("SampleLoader_#{File.basename(rb, '.*').modulize!}", Module.new)
+                  sample_mod.module_eval File.read(rb), rb, 1
+                  # determine additionally required files
+                  new_loaded = ::Set.new($LOADED_FEATURES) - cur_loaded
+                  sample_captures.each do |mod|
+                    samples << (smpl = SampleEntry.new(mod, new_loaded))
+                    category_samples(smpl.category) << (samples.size-1)
+                  end
+                  sample_captures.clear
+                  @loading_sample = nil
+                end
+              end
+              read_count += 1
+              block.call(read_count)
+            end
+          end
+        end
+      end
+
+    end
+
+    module SampleMethods
+      def activate
+        raise NotImplementedError, '#activate needs an override'
+      end
+
+      def run
+        SampleEntry::EmbeddedRunner.new(activate)
+      end
+
+      def execute(sample_file)
+        SampleEntry::SpawnedRunner.new(sample_file)
+      end
+      private :execute
+    end
+
+    def self.included(mod)
+      mod.extend SampleMethods
+      sample_captures << mod
+    end
+
+  end
+
+end