|
| 1 | +require 'active_support/concern' |
| 2 | + |
| 3 | +module CodeBreaker |
| 4 | + module Parsable |
| 5 | + module Keywords |
| 6 | + |
| 7 | + extend ActiveSupport::Concern |
| 8 | + include Parsable::Node |
| 9 | + |
| 10 | + included do |
| 11 | + alias :parse_or_node :parse_as_hash |
| 12 | + alias :parse_and_node :parse_as_hash |
| 13 | + alias :parse_def_node :parse_as_hash |
| 14 | + alias :parse_module_node :parse_as_hash |
| 15 | + alias :parse_yield_node :parse_as_hash |
| 16 | + |
| 17 | + alias :parse_break_node :parse_as_node_type |
| 18 | + alias :parse_next_node :parse_as_node_type |
| 19 | + alias :parse_retry_node :parse_as_node_type |
| 20 | + alias :parse_self_node :parse_as_node_type |
| 21 | + alias :parse_rescue_node :parse_as_hash |
| 22 | + alias :parse_resbody_node :parse_as_hash |
| 23 | + alias :parse_case_node :parse_as_hash |
| 24 | + |
| 25 | + def parse_loop_node(node) |
| 26 | + condition = node.children[0] |
| 27 | + body = node.children[1] |
| 28 | + |
| 29 | + { node.type => parse(condition), do: parse(body) } |
| 30 | + end |
| 31 | + |
| 32 | + alias :parse_while_node :parse_loop_node |
| 33 | + alias :parse_until_node :parse_loop_node |
| 34 | + |
| 35 | + def parse_for_node(node) |
| 36 | + variable = node.children[0] |
| 37 | + range = node.children[1] |
| 38 | + body = node.children[2] |
| 39 | + |
| 40 | + { node.type => parse(variable), in: parse(range), do: parse(body) } |
| 41 | + end |
| 42 | + |
| 43 | + def parse_if_node(node) |
| 44 | + condition = node.children[0] |
| 45 | + if_body = node.children[1] |
| 46 | + else_body = node.children[2] |
| 47 | + |
| 48 | + clause = { node.type => parse(condition), then: parse(if_body) } |
| 49 | + clause[:else] = parse(else_body) if else_body |
| 50 | + |
| 51 | + clause |
| 52 | + end |
| 53 | + |
| 54 | + def parse_module_node(node) |
| 55 | + name = parse(node.children[0]) |
| 56 | + body = node.children[1].nil? ? nil : parse(node.children[1]) |
| 57 | + value = body ? [name, body] : [name] |
| 58 | + |
| 59 | + { node.type => value } |
| 60 | + end |
| 61 | + |
| 62 | + def parse_return_node(node) |
| 63 | + children = parse_children(node) |
| 64 | + values = children.length == 1 ? children[0] : children |
| 65 | + |
| 66 | + { node.type => values } |
| 67 | + end |
| 68 | + |
| 69 | + def parse_kwbegin_node(node) |
| 70 | + rescue_given = node.children.first.type == :rescue |
| 71 | + |
| 72 | + if rescue_given |
| 73 | + rescue_part = parse(node.children.first)[:rescue] |
| 74 | + |
| 75 | + { |
| 76 | + begin: rescue_part.first, |
| 77 | + rescue: rescue_part.last[:resbody].first |
| 78 | + } |
| 79 | + else |
| 80 | + { begin: parse(node.children.last) } |
| 81 | + end |
| 82 | + end |
| 83 | + |
| 84 | + def parse_case_node(node) |
| 85 | + case_part = parse(node.children.first) |
| 86 | + when_parts = node.children[1...-1].map { |child| parse(child) } |
| 87 | + else_part = parse(node.children.last) |
| 88 | + |
| 89 | + statement = { case: when_parts.unshift(case_part) } |
| 90 | + statement[:case] << { else: else_part } if else_part |
| 91 | + statement |
| 92 | + end |
| 93 | + |
| 94 | + def parse_when_node(node) |
| 95 | + when_part = parse(node.children[0]) |
| 96 | + then_part = parse(node.children[1]) |
| 97 | + |
| 98 | + { when: when_part, then: then_part } |
| 99 | + end |
| 100 | + end |
| 101 | + |
| 102 | + end |
| 103 | + end |
| 104 | +end |
0 commit comments