tp_plus 0.0.73

data/test/tp_plus/test_scanner.rb

@@ -0,0 +1,522 @@
+require 'test_helper'
+
+class TestScanner < Test::Unit::TestCase
+  def setup
+    @scanner = TPPlus::Scanner.new
+  end
+
+  def assert_token(token, text)
+    assert_equal [token,text], @scanner.next_token
+  end
+
+  def test_blank_string
+    @scanner.scan_setup ""
+    assert_nil @scanner.next_token
+  end
+
+  def test_ignore_whitespace
+    @scanner.scan_setup " "
+    assert_nil @scanner.next_token
+  end
+
+  def test_newline
+    @scanner.scan_setup "\n"
+    assert_token :NEWLINE, "\n"
+  end
+
+  def test_no_combine_newlines
+    @scanner.scan_setup "\n\n"
+    assert_token :NEWLINE, "\n"
+    assert_token :NEWLINE, "\n"
+  end
+
+  def test_semicolon
+    @scanner.scan_setup ";"
+    assert_token :SEMICOLON,";"
+  end
+
+  def test_real_with_dot
+    @scanner.scan_setup "3.14"
+    assert_token :REAL, 3.14
+  end
+
+  def test_real_with_no_lead
+    @scanner.scan_setup ".10"
+    assert_token :REAL, 0.1
+  end
+
+  def test_digit
+    @scanner.scan_setup "42"
+    assert_token :DIGIT, 42
+  end
+
+  def test_true
+    @scanner.scan_setup "true"
+    assert_token :TRUE_FALSE, true
+  end
+
+  def test_false
+    @scanner.scan_setup "false"
+    assert_token :TRUE_FALSE, false
+  end
+
+  def test_numreg
+    @scanner.scan_setup "R[42]"
+    assert_token :NUMREG, "R"
+  end
+
+  def test_posreg
+    @scanner.scan_setup "PR[42]"
+    assert_token :POSREG, "PR"
+  end
+
+  def test_timer
+    @scanner.scan_setup "TIMER[1]"
+    assert_token :TIMER, "TIMER"
+  end
+
+  def test_position
+    @scanner.scan_setup "P[42]"
+    assert_token :POSITION, "P"
+  end
+
+  def test_vreg
+    @scanner.scan_setup "VR[1]"
+    assert_token :VREG, "VR"
+  end
+
+  def test_sreg
+    @scanner.scan_setup "SR[1]"
+    assert_token :SREG, "SR"
+  end
+
+  def test_flag
+    @scanner.scan_setup "F[1]"
+    assert_token :OUTPUT, "F"
+  end
+
+  def test_di
+    @scanner.scan_setup "DI[1]"
+    assert_token :INPUT, "DI"
+  end
+
+  def test_do
+    @scanner.scan_setup "DO[1]"
+    assert_token :OUTPUT, "DO"
+  end
+
+  def test_ri
+    @scanner.scan_setup "RI[1]"
+    assert_token :INPUT, "RI"
+  end
+
+  def test_ro
+    @scanner.scan_setup "RO[1]"
+    assert_token :OUTPUT, "RO"
+  end
+
+  def test_ui
+    @scanner.scan_setup "UI[1]"
+    assert_token :INPUT, "UI"
+  end
+
+  def test_uo
+    @scanner.scan_setup "UO[1]"
+    assert_token :OUTPUT, "UO"
+  end
+
+  def test_si
+    @scanner.scan_setup "SI[1]"
+    assert_token :INPUT, "SI"
+  end
+
+  def test_so
+    @scanner.scan_setup "SO[1]"
+    assert_token :OUTPUT, "SO"
+  end
+
+  def test_equal
+    @scanner.scan_setup "="
+    assert_token :EQUAL, "="
+  end
+
+  def test_not_equal
+    @scanner.scan_setup "<>"
+    assert_token :NOTEQUAL, "<>"
+    @scanner.scan_setup "!="
+    assert_token :NOTEQUAL, "!="
+  end
+
+  def test_eequal
+    @scanner.scan_setup "=="
+    assert_token :EEQUAL, "=="
+  end
+
+  def test_gte
+    @scanner.scan_setup ">="
+    assert_token :GTE, ">="
+  end
+
+  def test_lte
+    @scanner.scan_setup "<="
+    assert_token :LTE, "<="
+  end
+
+  def test_lt
+    @scanner.scan_setup "<"
+    assert_token :LT, "<"
+  end
+
+  def test_gt
+    @scanner.scan_setup ">"
+    assert_token :GT, ">"
+  end
+
+  def test_plus
+    @scanner.scan_setup "+"
+    assert_token :PLUS, "+"
+  end
+
+  def test_minus
+    @scanner.scan_setup "-"
+    assert_token :MINUS, "-"
+  end
+
+  def test_star
+    @scanner.scan_setup "*"
+    assert_token :STAR, "*"
+  end
+
+  def test_slash
+    @scanner.scan_setup "/"
+    assert_token :SLASH, "/"
+  end
+
+  def test_and
+    @scanner.scan_setup "&&"
+    assert_token :AND, "&&"
+  end
+
+  def test_or
+    @scanner.scan_setup "||"
+    assert_token :OR, "||"
+  end
+
+  def test_mod
+    @scanner.scan_setup "%"
+    assert_token :MOD, "%"
+  end
+
+  def test_comment
+    @scanner.scan_setup "# foo"
+    assert_token :COMMENT, "# foo"
+  end
+
+  def test_assign
+    @scanner.scan_setup ":="
+    assert_token :ASSIGN, ":="
+  end
+
+  def test_at_sym
+    @scanner.scan_setup "@"
+    assert_token :AT_SYM, "@"
+  end
+
+  def test_jump_to
+    @scanner.scan_setup "jump_to"
+    assert_token :JUMP, "jump_to"
+  end
+
+  def test_turn_on
+    @scanner.scan_setup "turn_on"
+    assert_token :IO_METHOD, "turn_on"
+  end
+
+  def test_turn_off
+    @scanner.scan_setup "turn_off"
+    assert_token :IO_METHOD, "turn_off"
+  end
+
+  def test_toggle
+    @scanner.scan_setup "toggle"
+    assert_token :IO_METHOD, "toggle"
+  end
+
+  def test_linear_move
+    @scanner.scan_setup "linear_move"
+    assert_token :MOVE, "linear_move"
+  end
+
+  def test_joint_move
+    @scanner.scan_setup "joint_move"
+    assert_token :MOVE, "joint_move"
+  end
+
+  def test_circular_move
+    @scanner.scan_setup "circular_move"
+    assert_token :MOVE, "circular_move"
+  end
+
+  def test_dot
+    @scanner.scan_setup "."
+    assert_token :DOT, "."
+  end
+
+  def test_to
+    @scanner.scan_setup "to"
+    assert_token :TO, "to"
+  end
+
+  def test_at
+    @scanner.scan_setup "at"
+    assert_token :AT, "at"
+  end
+
+   def test_term
+     @scanner.scan_setup "term"
+     assert_token :TERM, "term"
+   end
+
+   def test_if
+     @scanner.scan_setup "if"
+     assert_token :IF, "if"
+   end
+
+   def test_else
+     @scanner.scan_setup "else"
+     assert_token :ELSE, "else"
+   end
+
+   def test_end
+     @scanner.scan_setup "end"
+     assert_token :END, "end"
+   end
+
+   def test_unless
+     @scanner.scan_setup "unless"
+     assert_token :UNLESS, "unless"
+   end
+
+   def test_carriage_return_newline_as_one
+     @scanner.scan_setup "\r\n"
+     assert_token :NEWLINE, "\r\n"
+   end
+
+   def test_use_uframe
+     @scanner.scan_setup "use_uframe"
+     assert_token :FANUC_USE, "use_uframe"
+   end
+
+   def test_use_utool
+     @scanner.scan_setup "use_utool"
+     assert_token :FANUC_USE, "use_utool"
+   end
+
+   def test_use_payload
+     @scanner.scan_setup "use_payload"
+     assert_token :FANUC_USE, "use_payload"
+   end
+
+   def test_offset
+     @scanner.scan_setup "offset"
+     assert_token :OFFSET, "offset"
+   end
+
+   def test_time_before
+     @scanner.scan_setup "time_before"
+     assert_token :TIME_SEGMENT, "time_before"
+   end
+
+   def test_time_after
+     @scanner.scan_setup "time_after"
+     assert_token :TIME_SEGMENT, "time_after"
+   end
+
+   def test_word_with_end_in_it
+     @scanner.scan_setup "end_zone"
+     assert_token :WORD, "end_zone"
+   end
+
+   def test_scan_wait_for
+     @scanner.scan_setup "wait_for"
+     assert_token :WAIT_FOR, "wait_for"
+   end
+
+   def test_scan_wait_until
+     @scanner.scan_setup "wait_until"
+     assert_token :WAIT_UNTIL, "wait_until"
+   end
+
+   def test_scan_case
+     @scanner.scan_setup "case"
+     assert_token :CASE, "case"
+   end
+
+   def test_scan_when
+     @scanner.scan_setup "when"
+     assert_token :WHEN, "when"
+   end
+
+   def test_scan_argument
+     @scanner.scan_setup "AR[1]"
+     assert_token :ARG, "AR"
+   end
+
+   def test_scan_set_uframe
+     @scanner.scan_setup "set_uframe"
+     assert_token :FANUC_SET, "set_uframe"
+   end
+
+   def test_scan_set_skip_condition
+     @scanner.scan_setup "set_skip_condition"
+     assert_token :FANUC_SET, "set_skip_condition"
+   end
+
+   def test_scan_skip_to
+     @scanner.scan_setup "skip_to"
+     assert_token :SKIP, "skip_to"
+   end
+
+   def test_scans_bang_separate_from_word
+     @scanner.scan_setup "!foo"
+     assert_token :BANG, "!"
+     assert_token :WORD, "foo"
+   end
+
+   def test_timeout_to
+     @scanner.scan_setup "timeout_to"
+     assert_token :TIMEOUT, "timeout_to"
+   end
+
+   def test_after
+     @scanner.scan_setup "after"
+     assert_token :AFTER, "after"
+   end
+
+   def test_scanning_single_quoted_string
+     @scanner.scan_setup "'string'"
+     assert_token :STRING, "string"
+   end
+
+   def test_scanning_double_quoted_string
+     @scanner.scan_setup '"string"'
+     assert_token :STRING, "string"
+   end
+
+   def test_scan_namespace
+     @scanner.scan_setup "namespace"
+     assert_token :NAMESPACE, "namespace"
+   end
+
+   def test_scan_eval
+     @scanner.scan_setup "eval"
+     assert_token :EVAL, "eval"
+   end
+
+   def test_scan_for
+     @scanner.scan_setup "for"
+     assert_token :FOR, "for"
+   end
+
+   def test_scan_in
+     @scanner.scan_setup "in"
+     assert_token :IN, "in"
+   end
+
+   def test_scan_indirect
+     @scanner.scan_setup "indirect"
+     assert_token :INDIRECT, "indirect"
+   end
+
+   def test_scan_while
+     @scanner.scan_setup "while"
+     assert_token :WHILE, "while"
+   end
+
+   def test_start
+     @scanner.scan_setup "start"
+     assert_token :TIMER_METHOD, :start
+   end
+
+   def test_stop
+     @scanner.scan_setup "stop"
+     assert_token :TIMER_METHOD, :stop
+   end
+
+   def test_reset
+     @scanner.scan_setup "reset"
+     assert_token :TIMER_METHOD, :reset
+   end
+
+   def test_restart
+     @scanner.scan_setup "restart"
+     assert_token :TIMER_METHOD, :restart
+   end
+
+   def test_position_data
+     @scanner.scan_setup "position_data"
+     assert_token :POSITION_DATA, "position_data"
+   end
+
+   def test_pulse
+     @scanner.scan_setup "pulse"
+     assert_token :IO_METHOD, "pulse"
+   end
+
+   def test_scan_ualm
+     @scanner.scan_setup "UALM[1]"
+     assert_token :UALM, "UALM"
+   end
+
+   def test_scan_raise
+     @scanner.scan_setup "raise"
+     assert_token :RAISE, "raise"
+   end
+
+   def test_scan_run
+     @scanner.scan_setup "run"
+     assert_token :RUN, "run"
+   end
+
+   def test_tp_ignore_pause
+     @scanner.scan_setup "TP_IGNORE_PAUSE"
+     assert_token :TP_HEADER, "TP_IGNORE_PAUSE"
+   end
+
+   def test_tp_comment
+     @scanner.scan_setup "TP_COMMENT"
+     assert_token :TP_HEADER, "TP_COMMENT"
+   end
+
+   def test_tp_groupmask
+     @scanner.scan_setup "TP_GROUPMASK"
+     assert_token :TP_HEADER, "TP_GROUPMASK"
+   end
+
+   def test_tp_subtype
+     @scanner.scan_setup "TP_SUBTYPE"
+     assert_token :TP_HEADER, "TP_SUBTYPE"
+   end
+
+   def test_tool_offset
+     @scanner.scan_setup "tool_offset to toff"
+     assert_token :OFFSET, "tool_offset"
+     assert_token :TO, "to"
+     assert_token :WORD, "toff"
+   end
+
+   def test_vision_offset
+     @scanner.scan_setup "vision_offset"
+     assert_token :OFFSET, "vision_offset"
+   end
+
+   def test_pause
+     @scanner.scan_setup "pause"
+     assert_token :PAUSE, "pause"
+   end
+
+   def test_abort
+     @scanner.scan_setup "abort"
+     assert_token :ABORT, "abort"
+   end
+end

data/tp_plus.gemspec

@@ -0,0 +1,28 @@
+# encoding: utf-8
+require File.expand_path('../lib/tp_plus/version', __FILE__)
+
+Gem::Specification.new do |spec|
+  spec.add_development_dependency 'rexical', '~> 1.0'
+  spec.add_development_dependency 'racc', '~> 1.4'
+  spec.add_development_dependency 'test-unit', '~> 2.0'
+
+  spec.authors                   = ["Jay Strybis"]
+  spec.email                     = ['jay.strybis@gmail.com']
+
+  spec.name                      = 'tp_plus'
+  spec.description               = %q{TP+}
+  spec.summary                   = 'A higher-level abstraction of FANUC TP'
+  spec.homepage                  = 'http://github.com/onerobotics/tp_plus/'
+  spec.licenses                  = ['MIT']
+  spec.version                   = TPPlus::VERSION
+
+  spec.executables               = ['tpp']
+  spec.files                     = %w(README.md Rakefile tp_plus.gemspec)
+  spec.files                    += Dir.glob("lib/**/*.rb")
+  spec.files                    += Dir.glob("test/**/*")
+  spec.test_files                = Dir.glob("test/**/*")
+
+  spec.require_paths             = ['lib']
+  spec.required_rubygems_version = Gem::Requirement.new('>= 1.3.6')
+end
+

metadata

@@ -0,0 +1,156 @@
+--- !ruby/object:Gem::Specification
+name: tp_plus
+version: !ruby/object:Gem::Version
+  version: 0.0.73
+platform: ruby
+authors:
+- Jay Strybis
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2015-02-04 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rexical
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.0'
+- !ruby/object:Gem::Dependency
+  name: racc
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.4'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.4'
+- !ruby/object:Gem::Dependency
+  name: test-unit
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '2.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '2.0'
+description: TP+
+email:
+- jay.strybis@gmail.com
+executables:
+- tpp
+extensions: []
+extra_rdoc_files: []
+files:
+- README.md
+- Rakefile
+- bin/tpp
+- lib/tp_plus.rb
+- lib/tp_plus/interpreter.rb
+- lib/tp_plus/namespace.rb
+- lib/tp_plus/nodes/abort_node.rb
+- lib/tp_plus/nodes/argument_node.rb
+- lib/tp_plus/nodes/assignment_node.rb
+- lib/tp_plus/nodes/call_node.rb
+- lib/tp_plus/nodes/case_condition_node.rb
+- lib/tp_plus/nodes/case_node.rb
+- lib/tp_plus/nodes/comment_node.rb
+- lib/tp_plus/nodes/conditional_node.rb
+- lib/tp_plus/nodes/definition_node.rb
+- lib/tp_plus/nodes/digit_node.rb
+- lib/tp_plus/nodes/eval_node.rb
+- lib/tp_plus/nodes/expression_node.rb
+- lib/tp_plus/nodes/for_node.rb
+- lib/tp_plus/nodes/header_node.rb
+- lib/tp_plus/nodes/indirect_node.rb
+- lib/tp_plus/nodes/inline_conditional_node.rb
+- lib/tp_plus/nodes/io_method_node.rb
+- lib/tp_plus/nodes/io_node.rb
+- lib/tp_plus/nodes/jump_node.rb
+- lib/tp_plus/nodes/label_definition_node.rb
+- lib/tp_plus/nodes/motion_node.rb
+- lib/tp_plus/nodes/namespace_node.rb
+- lib/tp_plus/nodes/namespaced_var_node.rb
+- lib/tp_plus/nodes/numreg_node.rb
+- lib/tp_plus/nodes/offset_node.rb
+- lib/tp_plus/nodes/operator_node.rb
+- lib/tp_plus/nodes/pause_node.rb
+- lib/tp_plus/nodes/position_data_node.rb
+- lib/tp_plus/nodes/position_node.rb
+- lib/tp_plus/nodes/posreg_node.rb
+- lib/tp_plus/nodes/raise_node.rb
+- lib/tp_plus/nodes/real_node.rb
+- lib/tp_plus/nodes/set_node.rb
+- lib/tp_plus/nodes/skip_node.rb
+- lib/tp_plus/nodes/speed_node.rb
+- lib/tp_plus/nodes/string_node.rb
+- lib/tp_plus/nodes/string_register_node.rb
+- lib/tp_plus/nodes/termination_node.rb
+- lib/tp_plus/nodes/terminator_node.rb
+- lib/tp_plus/nodes/time_node.rb
+- lib/tp_plus/nodes/timer_method_node.rb
+- lib/tp_plus/nodes/timer_node.rb
+- lib/tp_plus/nodes/units_node.rb
+- lib/tp_plus/nodes/use_node.rb
+- lib/tp_plus/nodes/user_alarm_node.rb
+- lib/tp_plus/nodes/var_method_node.rb
+- lib/tp_plus/nodes/var_node.rb
+- lib/tp_plus/nodes/vision_register_node.rb
+- lib/tp_plus/nodes/wait_for_node.rb
+- lib/tp_plus/nodes/wait_until_node.rb
+- lib/tp_plus/nodes/while_node.rb
+- lib/tp_plus/parser.rb
+- lib/tp_plus/scanner.rb
+- lib/tp_plus/version.rb
+- test/test_helper.rb
+- test/tp_plus/test_interpreter.rb
+- test/tp_plus/test_parser.rb
+- test/tp_plus/test_scanner.rb
+- tp_plus.gemspec
+homepage: http://github.com/onerobotics/tp_plus/
+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: 1.3.6
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.4.5
+signing_key: 
+specification_version: 4
+summary: A higher-level abstraction of FANUC TP
+test_files:
+- test/test_helper.rb
+- test/tp_plus/test_interpreter.rb
+- test/tp_plus/test_parser.rb
+- test/tp_plus/test_scanner.rb