statsailr 0.7.1

data/lib/statsailr/sts_runner.rb

@@ -0,0 +1,17 @@
+require_relative "sts_build_exec.rb"
+
+module StatSailr
+  def self.run( **kw_args )
+
+    if FileTest.exist?( $script_file_path )
+      script_file = File.open( $script_file_path, "r")
+      script = script_file.read()
+      script_file.close()
+    else
+      raise( $script_file_path + ":StatSailr source file does not exit")
+    end
+
+    StatSailr.build_exec(script, initR_beforeExec: true, endR_afterExec: true, block_idx_start: 1, set_working_dir: File.dirname( $script_file_path ),
+                         **kw_args )
+  end
+end

data/lib/statsailr/sts_server.rb

@@ -0,0 +1,85 @@
+require_relative "sts_build_exec.rb"
+
+module StatSailr
+  module Service
+    def self.start( reader , writer , fork_or_thread: "fork", **kwparams )
+      if $service_started
+        puts "StatSailr::Service has already started"
+        return false
+      else
+        $service_started = true
+      end
+
+      child_exec = lambda{
+        p self
+        if fork_or_thread == "fork"    
+          writer.close()  # close child's writer
+        end
+        script = ""
+        block_idx = 1
+        @first_time = true
+
+        puts "Ready to input"
+        print "(^0^): "
+        while line = reader.gets() do  # !exit is dealt by REPL.
+          if line[0] == "!"
+            if line =~ /^!exec/ || line =~ /^!!$/
+                ### Execute script ###
+                begin
+                  if @first_time
+                    num_executed = StatSailr.build_exec( script, initR_beforeExec: true, endR_afterExec: false , **kwparams )  # start R
+                    @first_time = false
+                  else
+                    num_executed = StatSailr.build_exec( script, initR_beforeExec: false, endR_afterExec: false , block_idx_start: block_idx )
+                  end
+                rescue RuntimeError => e
+                  print e.backtrace.map.with_index{|elem, idx| idx.to_s + " " + elem }.reverse.join("\n")
+                  puts "  \e[1m#{e.message}\e[22m"  # show in bold
+                  if e.respond_to? "block_num_executed"
+                    num_executed = e.block_num_executed
+                  end
+                ensure
+                  if num_executed.nil?
+                    puts "Information about num_executed is not returned: set 0"
+                    num_executed = 0
+                  end
+                  block_idx = block_idx + num_executed
+                end
+                script = ""
+            elsif line =~ /^!clear/
+              script = ""
+              puts "script is cleared"
+            elsif line =~ /^!script/
+              puts "script currently in queue"
+              puts script
+            else
+              puts "Unknown command line is ignored : " + line
+              puts "Available commends: !exec !exit !clear !script"
+            end
+          else
+            script << line
+          end
+        end # end of while
+
+        puts "Finish child process/thread"
+        reader.close()
+        puts "Reader pipe closed"
+        StatSailr.build_exec( " ", initR_beforeExec: false, endR_afterExec: true ) # stop R
+        $service_started = false
+        puts "R program finished"
+      } # end of lambda
+
+      case fork_or_thread
+      when "fork"
+        child_pid = fork &child_exec
+        reader.close() # close parent's reader
+        return child_pid
+      when "thread"
+        child_thread = Thread.start &child_exec
+        return child_thread
+      end
+    end
+  end
+end
+
+

data/lib/statsailr/version.rb

@@ -0,0 +1,3 @@
+module StatSailr
+  VERSION = "0.7.1"
+end

data/statsailr.gemspec

@@ -0,0 +1,32 @@
+require_relative 'lib/statsailr/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "statsailr"
+  spec.version       = StatSailr::VERSION
+  spec.authors       = ["Toshihiro Umehara"]
+  spec.email         = ["toshi@niceume.com"]
+
+  spec.summary       = %q{Provides a platform to focus on statistics}
+  spec.description   = %q{StatSailr is a Ruby program that enables users to manipulate data and to apply statistical procedures in an intuiitive way. Internally, StatSailr converts StatSailr script into R's internal representation via Ruby, and executes it. }
+  spec.homepage      = "https://github.com/niceume/statsailr"
+  spec.license       = "GPL-3.0"
+  spec.required_ruby_version = Gem::Requirement.new(">= 2.3.0")
+
+#  spec.metadata["allowed_push_host"] = "TODO: Set to 'http://mygemserver.com'"
+
+  spec.metadata["homepage_uri"] = spec.homepage
+  spec.metadata["source_code_uri"] = spec.homepage
+  spec.metadata["changelog_uri"] = spec.homepage
+
+  # Specify which files should be added to the gem when it is released.
+  # The `git ls-files -z` loads the files in the RubyGem that have been added into git.
+  spec.files         = Dir.chdir(File.expand_path('..', __FILE__)) do
+    `git ls-files -z`.split("\x0").reject { |f| f.match(%r{^(test|spec|features)/}) }
+  end
+  spec.bindir        = "exe"
+  spec.executables   = spec.files.grep(%r{^exe/}) { |f| File.basename(f) }
+  spec.require_paths = ["lib"]
+
+  spec.add_runtime_dependency "r_bridge" , '~> 0.5', '>= 0.5.1'
+  spec.add_runtime_dependency "statsailr_procs_base" , '~> 0.1', '>= 0.1.0'
+end

metadata

@@ -0,0 +1,133 @@
+--- !ruby/object:Gem::Specification
+name: statsailr
+version: !ruby/object:Gem::Version
+  version: 0.7.1
+platform: ruby
+authors:
+- Toshihiro Umehara
+autorequire: 
+bindir: exe
+cert_chain: []
+date: 2021-02-22 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: r_bridge
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.5'
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: 0.5.1
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.5'
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: 0.5.1
+- !ruby/object:Gem::Dependency
+  name: statsailr_procs_base
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.1'
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: 0.1.0
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.1'
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: 0.1.0
+description: 'StatSailr is a Ruby program that enables users to manipulate data and
+  to apply statistical procedures in an intuiitive way. Internally, StatSailr converts
+  StatSailr script into R''s internal representation via Ruby, and executes it. '
+email:
+- toshi@niceume.com
+executables:
+- sailr
+- sailrREPL
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- ".travis.yml"
+- Gemfile
+- HISTORY.md
+- LICENSE.txt
+- README.md
+- Rakefile
+- bin/console
+- bin/setup
+- example/blank.slr
+- example/category.slr
+- example/example_read.slr
+- example/iris.csv
+- example/mtcars.rda
+- example/new_mtcars.csv
+- example/new_mtcars.rda
+- example/plot_reg_example.slr
+- example/scatter.png
+- exe/sailr
+- exe/sailrREPL
+- lib/statsailr.rb
+- lib/statsailr/block_builder/sts_block.rb
+- lib/statsailr/block_builder/sts_block_parse_proc_opts.rb
+- lib/statsailr/block_to_r/proc_setting_support/proc_opt_validator.rb
+- lib/statsailr/block_to_r/proc_setting_support/proc_setting_manager.rb
+- lib/statsailr/block_to_r/proc_setting_support/proc_setting_module.rb
+- lib/statsailr/block_to_r/sts_block_to_r.rb
+- lib/statsailr/block_to_r/sts_lazy_func_gen.rb
+- lib/statsailr/block_to_r/top_stmt/top_stmt_to_r_func.rb
+- lib/statsailr/parser/sts_gram_node.rb
+- lib/statsailr/parser/sts_parse.output
+- lib/statsailr/parser/sts_parse.ry
+- lib/statsailr/parser/sts_parse.tab.rb
+- lib/statsailr/scanner/sample1.sts
+- lib/statsailr/scanner/sts_scanner.rb
+- lib/statsailr/scanner/test_sample1.rb
+- lib/statsailr/sts_build_exec.rb
+- lib/statsailr/sts_controller.rb
+- lib/statsailr/sts_output/output_manager.rb
+- lib/statsailr/sts_runner.rb
+- lib/statsailr/sts_server.rb
+- lib/statsailr/version.rb
+- statsailr.gemspec
+homepage: https://github.com/niceume/statsailr
+licenses:
+- GPL-3.0
+metadata:
+  homepage_uri: https://github.com/niceume/statsailr
+  source_code_uri: https://github.com/niceume/statsailr
+  changelog_uri: https://github.com/niceume/statsailr
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: 2.3.0
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubygems_version: 3.1.4
+signing_key: 
+specification_version: 4
+summary: Provides a platform to focus on statistics
+test_files: []