smalruby-editor 0.1.6 → 0.1.7

data/app/models/concerns/ruby_to_block/block/character_new.rb

@@ -0,0 +1,7 @@
+module RubyToBlock
+  module Block
+    class CharacterNew < Base
+      include CharacterOperation
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/character_operation.rb

@@ -0,0 +1,80 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    # キャラクターのメソッドや属性に共通するメソッドや定数を定義するモジュール
+    module CharacterOperation
+      extend ActiveSupport::Concern
+
+      CHAR_RE = '(?:(\S+)\.)?'
+
+      attr_accessor :character
+
+      module ClassMethods
+        # コンテキストからキャラクターを取得する
+        #
+        # キャラクターの名前がnil、または'self'の場合はコンテキストのレシー
+        # バの名前を利用する。
+        #
+        # コンテキストからキャラクターが取得できない場合は例外が発生する。
+        #
+        # @param [RubyToBlock::Context] context コンテキスト
+        # @param [String] name キャラクターの名前
+        # @return [Character] キャラクター
+        def get_character(context, name)
+          name = context.receiver.try(:name) if !name || name == 'self'
+          fail unless context.characters.key?(name)
+          context.characters[name]
+        end
+
+        # 必要であればcharacter_newブロックを作成してから指定したブロッ
+        # クをcharacter_newブロックの子供として追加する
+        #
+        # @param [RubyToBlock::Context] context コンテキスト
+        # @param [String] name キャラクターの名前
+        # @param [ブロック] block ブロックのインスタンス
+        # @return [Array<ブロック, ブロック>]
+        #   最初の要素がcharacter_newブロック、次の要素がカレントブロックの配列
+        def add_child_or_create_character_new_block(context, name, block)
+          character = get_character(context, name)
+
+          block.character = character
+
+          cb = context.current_block
+          if cb && cb.type == 'character_new' && cb.character == character
+            cb.add_statement(:DO, block)
+            [cb, cb]
+          elsif character == context.receiver
+            cb.sibling = block
+            [cb.parent, block]
+          else
+            character_new =
+              create_character_new_block(context, character, block)
+            [character_new, character_new]
+          end
+        end
+
+        # character_newブロックを生成する
+        #
+        # @param [RubyToBlock::Context] context コンテキスト
+        # @param [RubyToBlock::Block::Character] character キャラクター
+        # @param [RubyToBlock::Block::Baseのサブクラス] block ブロック
+        # @return [RubyToBlock::Block::CharacterNew] character_newブロック
+        def create_character_new_block(context, character, block)
+          character_new_block = Block.new('character_new',
+                                          fields: { NAME: character.name },
+                                          statements: { DO: block })
+          character_new_block.character = character
+
+          cb = context.current_block
+          if cb && cb.type != 'character_new'
+            cb.sibling = character_new_block
+          else
+            context.blocks.push(character_new_block)
+          end
+
+          character_new_block
+        end
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/control_if.rb

@@ -0,0 +1,45 @@
+module RubyToBlock
+  module Block
+    class ControlIf < Base
+      blocknize '^\s*if\s+(.*?)\s*$',
+                statement: true, indent: true, inline: true
+
+      def self.process_match_data(md, context)
+        then_block = Block.new('null')
+        block = new(statements: { THEN: then_block })
+
+        if context.current_block
+          context.current_block.sibling = block
+        else
+          context.blocks.push(block)
+        end
+
+        md2 = regexp.match(md[type])
+        process_value_string(context, block, md2[1], :COND)
+
+        context.current_block = then_block
+
+        context.statement_stack.push([type, block])
+
+        true
+      end
+
+      def self.process_else(context)
+        block = context.statement_block
+        else_block = Block.new('null')
+        block.add_statement(:ELSE, else_block)
+        context.current_block = else_block
+
+        true
+      end
+
+      def type
+        if @statements.key?(:ELSE)
+          'control_if_else'
+        else
+          super
+        end
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/control_loop.rb

@@ -0,0 +1,19 @@
+module RubyToBlock
+  module Block
+    class ControlLoop < Base
+      blocknize '^\s*loop\s+do\s*$', statement: true, indent: true
+
+      def self.process_match_data(md, context)
+        return false unless context.receiver
+
+        do_block = Block.new('null')
+        block = new(statements: { DO: do_block })
+        context.statement_stack.push([type, block])
+        context.current_block.sibling = block
+        context.current_block = do_block
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/control_sleep.rb

@@ -0,0 +1,18 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class ControlSleep < Base
+      blocknize '^\s*sleep\((.+)\)\s*$', statement: true, inline: true
+
+      def self.process_match_data(md, context)
+        block = new
+        context.add_block(block)
+
+        md2 = regexp.match(md[type])
+        process_value_string(context, block, md2[1], :SEC)
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/do.rb

@@ -0,0 +1,24 @@
+module RubyToBlock
+  module Block
+    class Do < RubyStatement
+      blocknize '^.*?\s*do\s*$',
+                statement: true, priority: -1
+
+      def self.process_match_data(md, context)
+        block = new(fields: { STATEMENT: md.string })
+        context.add_block(block)
+        context.statement_stack.push([type, block])
+        true
+      end
+
+      def self.process_end(context)
+        context.add_block(new(fields: { STATEMENT: 'end' }))
+        super
+      end
+
+      def type
+        'ruby_statement'
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/else.rb

@@ -0,0 +1,12 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class Else < Base
+      blocknize '^\s*else\s*$', statement: true
+
+      def self.process_match_data(md, context)
+        Block.process_else(context)
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/end.rb

@@ -0,0 +1,26 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class End < Base
+      blocknize '^\s*end$', statement: true
+
+      def self.process_match_data(md, context)
+        ends_num = 1
+        context.lines.each do |l|
+          md2 = Block.statement_regexp.match(l)
+          type = md2.names.find { |n| md2[n.to_sym] }
+          if type == 'end'
+            ends_num += 1
+          elsif Block[type].indent?
+            ends_num -= 1
+          end
+        end
+        if context.statement && ends_num <= context.statement_stack.length
+          Block.process_end(context)
+        else
+          false
+        end
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/events_on_click.rb

@@ -0,0 +1,14 @@
+module RubyToBlock
+  module Block
+    class EventsOnClick < CharacterEvent
+      blocknize '^\s*' + CHAR_RE + 'on\(:click\)\s+do\s*$',
+                statement: true, indent: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_event_blocks(context, md2[1], new)
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/events_on_key_push_or_down.rb

@@ -0,0 +1,17 @@
+module RubyToBlock
+  module Block
+    class EventsOnKeyPushOrDown < CharacterEvent
+      # rubocop:disable LineLength
+      blocknize '^\s*' + CHAR_RE + 'on\(:key_(down|push),\s*([^),]+)\)\s+do\s*$',
+                statement: true, indent: true
+      # rubocop:enable LineLength
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_event_blocks(context, md2[1],
+                                   new(fields: { KEY: md2[3], POD: md2[2] }))
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/events_on_start.rb

@@ -0,0 +1,14 @@
+module RubyToBlock
+  module Block
+    class EventsOnStart < CharacterEvent
+      blocknize '^\s*' + CHAR_RE + 'on\(:start\)\s+do\s*$',
+                statement: true, indent: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_event_blocks(context, md2[1], new)
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_init_hardware.rb

@@ -0,0 +1,14 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareInitHardware < Base
+      blocknize '^\s*init_hardware\s*$', statement: true
+
+      def self.process_match_data(md, context)
+        context.blocks.push(new)
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_led_off.rb

@@ -0,0 +1,16 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareLedOff < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'led\("(D(?:[2-9]|1[0-3]))"\).off\s*$',
+                statement: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_method_call_block(context, md2[1],
+                                        new(fields: { PIN: md2[2] }))
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_led_on.rb

@@ -0,0 +1,16 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareLedOn < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'led\("(D(?:[2-9]|1[0-3]))"\).on\s*$',
+                statement: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_method_call_block(context, md2[1],
+                                        new(fields: { PIN: md2[2] }))
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_on_sensor_change.rb

@@ -0,0 +1,17 @@
+module RubyToBlock
+  module Block
+    class HardwareOnSensorChange < CharacterEvent
+      # rubocop:disable LineLength
+      blocknize '^\s*' + CHAR_RE + 'on\(:sensor_change,\s*"(A[0-5])"\s*\)\s+do\s*$',
+                statement: true, indent: true
+      # rubocop:enable LineLength
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_event_blocks(context, md2[1],
+                                   new(fields: { PIN: md2[2] }))
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_rgb_led_off.rb

@@ -0,0 +1,18 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareRgbLedOff < CharacterMethodCall
+      # rubocop:disable LineLength
+      blocknize '^\s*' + CHAR_RE + 'rgb_led_(anode|cathode)\("(D[39])"\)\.off\s*$',
+                statement: true
+      # rubocop:enable LineLength
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        block = new(fields: { AC: md2[2], PIN: md2[3] })
+        add_character_method_call_block(context, md2[1], block)
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_rgb_led_on.rb

@@ -0,0 +1,23 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareRgbLedOn < CharacterMethodCall
+      # rubocop:disable LineLength
+      blocknize '^\s*' + CHAR_RE + 'rgb_led_(anode|cathode)\("(D[39])"\).on\(color:\s*\[(\d+),\s*(\d+),\s*(\d+)\]\)\s*$',
+                statement: true
+      # rubocop:enable LineLength
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        color = [md2[4], md2[5], md2[6]].map(&:to_i)
+        return false if color.any? { |c| c < 0 || c > 255 }
+        color_code = '#' + color.map { |c| sprintf('%02x', c) }.join
+        block = new(fields: { AC: md2[2], PIN: md2[3], COLOUR: color_code })
+
+        add_character_method_call_block(context, md2[1], block)
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_sensor_value.rb

@@ -0,0 +1,23 @@
+module RubyToBlock
+  module Block
+    class HardwareSensorValue < Value
+      include CharacterOperation
+
+      blocknize '^\s*' + CHAR_RE + 'sensor\(\s*"(A[0-5])"\s*\)\.value\s*$',
+                value: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        character = get_character(context, md2[1])
+        return false if context.receiver != character
+
+        block = new(fields: { PIN: md2[2] })
+        context.add_value(block)
+        block.character = character
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_two_wheel_drive_car.rb

@@ -0,0 +1,26 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareTwoWheelDriveCar < CharacterMethodCall
+      # rubocop:disable LineLength
+      blocknize '^\s*' + CHAR_RE + 'two_wheel_drive_car\("(D(?:[2-9]|10))"\).(forward|backward|turn_left|turn_right|stop)\s*$',
+                statement: true
+      # rubocop:enable LineLength
+
+      attr_accessor :method_name
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        block =
+          add_character_method_call_block(context, md2[1],
+                                          new(fields: { PIN: md2[2] }))
+        block.method_name = md2[3]
+        true
+      end
+
+      def type
+        "hardware_two_wheel_drive_car_#{method_name}"
+      end
+    end
+  end
+end