Class: Ruby2Ruby
- Inherits:
-
SexpProcessor
- Object
- SexpProcessor
- Ruby2Ruby
- Defined in:
- lib/ruby2ruby.rb
Overview
Generate ruby code from a sexp.
Constant Summary collapse
- VERSION =
:nodoc:
"2.4.0"
- LINE_LENGTH =
cutoff for one-liners
78
- BINARY =
binary operation messages
[:<=>, :==, :<, :>, :<=, :>=, :-, :+, :*, :/, :%, :<<, :>>, :**, :'!=']
- ASSIGN_NODES =
Nodes that represent assignment and probably need () around them.
TODO: this should be replaced with full precedence support :/
[ :dasgn, :flip2, :flip3, :lasgn, :masgn, :match3, :attrasgn, :op_asgn1, :op_asgn2, :op_asgn_and, :op_asgn_or, :return, :if, # HACK :rescue, ]
- HASH_VAL_NO_PAREN =
Some sexp types are OK without parens when appearing as hash values. This list can include ‘:call`s because they’re always printed with parens around their arguments. For example:
{ :foo => (("baz")) } # The outer parens are unnecessary { :foo => ("baz") } # This is the normal code style
[ :call, :false, :lit, :lvar, :nil, :str, :true ]
Instance Method Summary collapse
-
#cond_loop(exp, name) ⇒ Object
Generate a post-or-pre conditional loop.
-
#dthing_escape(type, lit) ⇒ Object
Utility method to escape something interpolated.
-
#indent(s) ⇒ Object
Indent all lines of
s
to the current indent level. -
#initialize ⇒ Ruby2Ruby
constructor
:nodoc:.
-
#parenthesize(exp) ⇒ Object
Wrap appropriate expressions in matching parens.
-
#process_alias(exp) ⇒ Object
Processors.
-
#process_and(exp) ⇒ Object
:nodoc:.
-
#process_arglist(exp) ⇒ Object
custom made node # :nodoc:.
-
#process_args(exp) ⇒ Object
:nodoc:.
-
#process_array(exp) ⇒ Object
:nodoc:.
-
#process_attrasgn(exp) ⇒ Object
:nodoc:.
-
#process_back_ref(exp) ⇒ Object
:nodoc:.
-
#process_begin(exp) ⇒ Object
TODO: figure out how to do rescue and ensure ENTIRELY w/o begin.
-
#process_block(exp) ⇒ Object
:nodoc:.
-
#process_block_pass(exp) ⇒ Object
:nodoc:.
-
#process_break(exp) ⇒ Object
:nodoc:.
-
#process_call(exp, safe_call = false) ⇒ Object
:nodoc:.
-
#process_case(exp) ⇒ Object
:nodoc:.
-
#process_cdecl(exp) ⇒ Object
:nodoc:.
-
#process_class(exp) ⇒ Object
:nodoc:.
-
#process_colon2(exp) ⇒ Object
:nodoc:.
-
#process_colon3(exp) ⇒ Object
:nodoc:.
-
#process_const(exp) ⇒ Object
:nodoc:.
-
#process_cvar(exp) ⇒ Object
:nodoc:.
-
#process_cvasgn(exp) ⇒ Object
:nodoc:.
-
#process_cvdecl(exp) ⇒ Object
:nodoc:.
-
#process_defined(exp) ⇒ Object
:nodoc:.
-
#process_defn(exp) ⇒ Object
:nodoc:.
-
#process_defs(exp) ⇒ Object
:nodoc:.
-
#process_dot2(exp) ⇒ Object
:nodoc:.
-
#process_dot3(exp) ⇒ Object
:nodoc:.
-
#process_dregx(exp) ⇒ Object
:nodoc:.
-
#process_dregx_once(exp) ⇒ Object
:nodoc:.
-
#process_dstr(exp) ⇒ Object
:nodoc:.
-
#process_dsym(exp) ⇒ Object
:nodoc:.
-
#process_dxstr(exp) ⇒ Object
:nodoc:.
-
#process_ensure(exp) ⇒ Object
:nodoc:.
-
#process_evstr(exp) ⇒ Object
:nodoc:.
-
#process_false(exp) ⇒ Object
:nodoc:.
-
#process_flip2(exp) ⇒ Object
:nodoc:.
-
#process_flip3(exp) ⇒ Object
:nodoc:.
-
#process_for(exp) ⇒ Object
:nodoc:.
-
#process_gasgn(exp) ⇒ Object
:nodoc:.
-
#process_gvar(exp) ⇒ Object
:nodoc:.
-
#process_hash(exp) ⇒ Object
:nodoc:.
-
#process_iasgn(exp) ⇒ Object
:nodoc:.
-
#process_if(exp) ⇒ Object
:nodoc:.
-
#process_iter(exp) ⇒ Object
:nodoc:.
-
#process_ivar(exp) ⇒ Object
:nodoc:.
- #process_kwsplat(exp) ⇒ Object
-
#process_lasgn(exp) ⇒ Object
:nodoc:.
-
#process_lit(exp) ⇒ Object
:nodoc:.
-
#process_lvar(exp) ⇒ Object
:nodoc:.
-
#process_masgn(exp) ⇒ Object
:nodoc:.
-
#process_match(exp) ⇒ Object
:nodoc:.
-
#process_match2(exp) ⇒ Object
:nodoc:.
-
#process_match3(exp) ⇒ Object
:nodoc:.
-
#process_module(exp) ⇒ Object
:nodoc:.
-
#process_next(exp) ⇒ Object
:nodoc:.
-
#process_nil(exp) ⇒ Object
:nodoc:.
-
#process_not(exp) ⇒ Object
:nodoc:.
-
#process_nth_ref(exp) ⇒ Object
:nodoc:.
-
#process_op_asgn(exp) ⇒ Object
:nodoc:.
-
#process_op_asgn1(exp) ⇒ Object
:nodoc:.
-
#process_op_asgn2(exp) ⇒ Object
:nodoc:.
-
#process_op_asgn_and(exp) ⇒ Object
:nodoc:.
-
#process_op_asgn_or(exp) ⇒ Object
:nodoc:.
-
#process_or(exp) ⇒ Object
:nodoc:.
-
#process_postexe(exp) ⇒ Object
:nodoc:.
-
#process_redo(exp) ⇒ Object
:nodoc:.
-
#process_resbody(exp) ⇒ Object
:nodoc:.
-
#process_rescue(exp) ⇒ Object
:nodoc:.
-
#process_retry(exp) ⇒ Object
:nodoc:.
-
#process_return(exp) ⇒ Object
:nodoc:.
-
#process_safe_attrasgn(exp) ⇒ Object
:nodoc:.
-
#process_safe_call(exp) ⇒ Object
:nodoc:.
-
#process_safe_op_asgn(exp) ⇒ Object
:nodoc:.
-
#process_safe_op_asgn2(exp) ⇒ Object
:nodoc:.
-
#process_sclass(exp) ⇒ Object
:nodoc:.
-
#process_self(exp) ⇒ Object
:nodoc:.
-
#process_splat(exp) ⇒ Object
:nodoc:.
-
#process_str(exp) ⇒ Object
:nodoc:.
-
#process_super(exp) ⇒ Object
:nodoc:.
-
#process_svalue(exp) ⇒ Object
:nodoc:.
-
#process_to_ary(exp) ⇒ Object
:nodoc:.
-
#process_true(exp) ⇒ Object
:nodoc:.
-
#process_undef(exp) ⇒ Object
:nodoc:.
-
#process_until(exp) ⇒ Object
:nodoc:.
-
#process_valias(exp) ⇒ Object
:nodoc:.
-
#process_when(exp) ⇒ Object
:nodoc:.
-
#process_while(exp) ⇒ Object
:nodoc:.
-
#process_xstr(exp) ⇒ Object
:nodoc:.
-
#process_yield(exp) ⇒ Object
:nodoc:.
-
#process_zsuper(exp) ⇒ Object
:nodoc:.
-
#re_opt(options) ⇒ Object
Return the appropriate regexp flags for a given numeric code.
-
#rewrite_attrasgn(exp) ⇒ Object
Rewriters:.
-
#rewrite_ensure(exp) ⇒ Object
:nodoc:.
-
#rewrite_resbody(exp) ⇒ Object
:nodoc:.
-
#rewrite_rescue(exp) ⇒ Object
:nodoc:.
-
#rewrite_svalue(exp) ⇒ Object
:nodoc:.
-
#splat(sym) ⇒ Object
Return a splatted symbol for
sym
. -
#util_dthing(type, exp) ⇒ Object
Utility method to generate something interpolated.
-
#util_module_or_class(exp, is_class = false) ⇒ Object
Utility method to generate ether a module or class.
Constructor Details
#initialize ⇒ Ruby2Ruby
:nodoc:
82 83 84 85 86 87 88 89 90 91 92 |
# File 'lib/ruby2ruby.rb', line 82 def initialize # :nodoc: super @indent = " " self.require_empty = false self.strict = true self.expected = String @calls = [] # self.debug[:defn] = /zsuper/ end |
Instance Method Details
#cond_loop(exp, name) ⇒ Object
Generate a post-or-pre conditional loop.
1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 |
# File 'lib/ruby2ruby.rb', line 1123 def cond_loop(exp, name) _, cond, body, head_controlled = exp cond = process cond body = process body body = indent(body).chomp if body code = [] if head_controlled then code << "#{name} #{cond} do" code << body if body code << "end" else code << "begin" code << body if body code << "end #{name} #{cond}" end code.join("\n") end |
#dthing_escape(type, lit) ⇒ Object
Utility method to escape something interpolated.
1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 |
# File 'lib/ruby2ruby.rb', line 1148 def dthing_escape type, lit # TODO: this needs more testing case type when :dregx then lit.gsub(/(\A|[^\\])\//, '\1\/') when :dstr, :dsym then lit.dump[1..-2] when :dxstr then lit.gsub(/`/, '\`') else raise "unsupported type #{type.inspect}" end end |
#indent(s) ⇒ Object
Indent all lines of s
to the current indent level.
1165 1166 1167 |
# File 'lib/ruby2ruby.rb', line 1165 def indent s s.to_s.split(/\n/).map{|line| @indent + line}.join("\n") end |
#parenthesize(exp) ⇒ Object
Wrap appropriate expressions in matching parens.
1172 1173 1174 1175 1176 1177 1178 1179 |
# File 'lib/ruby2ruby.rb', line 1172 def parenthesize exp case self.context[1] when nil, :defn, :defs, :class, :sclass, :if, :iter, :resbody, :when, :while then exp else "(#{exp})" end end |
#process_alias(exp) ⇒ Object
Processors
97 98 99 100 101 |
# File 'lib/ruby2ruby.rb', line 97 def process_alias exp # :nodoc: _, lhs, rhs = exp parenthesize "alias #{process lhs} #{process rhs}" end |
#process_and(exp) ⇒ Object
:nodoc:
103 104 105 106 107 |
# File 'lib/ruby2ruby.rb', line 103 def process_and exp # :nodoc: _, lhs, rhs = exp parenthesize "#{process lhs} and #{process rhs}" end |
#process_arglist(exp) ⇒ Object
custom made node # :nodoc:
109 110 111 112 113 114 115 116 |
# File 'lib/ruby2ruby.rb', line 109 def process_arglist exp # custom made node # :nodoc: _, *args = exp args.map { |arg| code = process arg arg.sexp_type == :rescue ? "(#{code})" : code }.join ", " end |
#process_args(exp) ⇒ Object
:nodoc:
118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 |
# File 'lib/ruby2ruby.rb', line 118 def process_args exp # :nodoc: _, *args = exp args = args.map { |arg| case arg when Symbol then arg when Sexp then case arg.sexp_type when :lasgn then process(arg) when :masgn then process(arg) when :kwarg then _, k, v = arg "#{k}: #{process v}" else raise "unknown arg type #{arg.first.inspect}" end else raise "unknown arg type #{arg.inspect}" end } "(#{args.join ', '})" end |
#process_array(exp) ⇒ Object
:nodoc:
145 146 147 |
# File 'lib/ruby2ruby.rb', line 145 def process_array exp # :nodoc: "[#{process_arglist exp}]" end |
#process_attrasgn(exp) ⇒ Object
:nodoc:
149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 |
# File 'lib/ruby2ruby.rb', line 149 def process_attrasgn exp # :nodoc: _, recv, name, *args = exp rhs = args.pop args = s(:array, *args) receiver = process recv case name when :[]= then args = process args "#{receiver}#{args} = #{process rhs}" else raise "dunno what to do: #{args.inspect}" if args.size != 1 # s(:array) name = name.to_s.chomp "=" if rhs && rhs != s(:arglist) then "#{receiver}.#{name} = #{process(rhs)}" else raise "dunno what to do: #{rhs.inspect}" end end end |
#process_back_ref(exp) ⇒ Object
:nodoc:
171 172 173 174 175 |
# File 'lib/ruby2ruby.rb', line 171 def process_back_ref exp # :nodoc: _, n = exp "$#{n}" end |
#process_begin(exp) ⇒ Object
TODO: figure out how to do rescue and ensure ENTIRELY w/o begin
178 179 180 181 182 183 184 185 186 187 188 189 190 |
# File 'lib/ruby2ruby.rb', line 178 def process_begin exp # :nodoc: _, *rest = exp code = rest.map { |sexp| src = process sexp src = indent src unless src =~ /(^|\n)(rescue|ensure)/ # ensure no level 0 rescues src } code.unshift "begin" code.push "end" code.join "\n" end |
#process_block(exp) ⇒ Object
:nodoc:
192 193 194 195 196 197 198 199 200 201 202 203 204 |
# File 'lib/ruby2ruby.rb', line 192 def process_block exp # :nodoc: _, *body = exp result = body.map { |sexp| process sexp } result << "# do nothing\n" if result.empty? result = parenthesize result.join "\n" result += "\n" unless result.start_with? "(" result end |
#process_block_pass(exp) ⇒ Object
:nodoc:
206 207 208 209 210 211 212 |
# File 'lib/ruby2ruby.rb', line 206 def process_block_pass exp # :nodoc: raise "huh?: #{exp.inspect}" if exp.size > 2 _, sexp = exp "&#{process sexp}" end |
#process_break(exp) ⇒ Object
:nodoc:
214 215 216 217 218 219 220 221 222 223 224 |
# File 'lib/ruby2ruby.rb', line 214 def process_break exp # :nodoc: _, arg = exp val = process arg if val then "break #{val}" else "break" end end |
#process_call(exp, safe_call = false) ⇒ Object
:nodoc:
226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 |
# File 'lib/ruby2ruby.rb', line 226 def process_call(exp, safe_call = false) # :nodoc: _, recv, name, *args = exp receiver_node_type = recv && recv.sexp_type receiver = process recv receiver = "(#{receiver})" if ASSIGN_NODES.include? receiver_node_type # args = [] # this allows us to do both old and new sexp forms: # exp.push(*exp.pop[1..-1]) if exp.size == 1 && exp.first.first == :arglist @calls.push name in_context :arglist do max = args.size-1 args = args.map.with_index { |arg, i| arg_type = arg.sexp_type is_empty_hash = arg == s(:hash) arg = process arg next if arg.empty? strip_hash = (arg_type == :hash and not BINARY.include? name and not is_empty_hash and (i == max or args[i+1].sexp_type == :splat)) wrap_arg = Ruby2Ruby::ASSIGN_NODES.include? arg_type arg = arg[2..-3] if strip_hash arg = "(#{arg})" if wrap_arg arg }.compact end case name when *BINARY then if safe_call "#{receiver}&.#{name}(#{args.join(', ')})" elsif args.length > 1 "#{receiver}.#{name}(#{args.join(', ')})" else "(#{receiver} #{name} #{args.join(', ')})" end when :[] then receiver ||= "self" "#{receiver}[#{args.join(', ')}]" when :[]= then receiver ||= "self" rhs = args.pop "#{receiver}[#{args.join(', ')}] = #{rhs}" when :"!" then "(not #{receiver})" when :"-@" then "-#{receiver}" when :"+@" then "+#{receiver}" else args = nil if args.empty? args = "(#{args.join(', ')})" if args receiver = "#{receiver}." if receiver and not safe_call receiver = "#{receiver}&." if receiver and safe_call "#{receiver}#{name}#{args}" end ensure @calls.pop end |
#process_case(exp) ⇒ Object
:nodoc:
300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 |
# File 'lib/ruby2ruby.rb', line 300 def process_case exp # :nodoc: _, expr, *rest = exp result = [] expr = process expr if expr then result << "case #{expr}" else result << "case" end result.concat rest.map { |pt| if pt and pt.sexp_type == :when "#{process pt}" else code = indent process pt code = indent("# do nothing") if code =~ /^\s*$/ "else\n#{code}" end } result << "end" result.join "\n" end |
#process_cdecl(exp) ⇒ Object
:nodoc:
328 329 330 331 332 333 334 335 336 337 |
# File 'lib/ruby2ruby.rb', line 328 def process_cdecl exp # :nodoc: _, lhs, rhs = exp lhs = process lhs if Sexp === lhs if rhs then rhs = process rhs "#{lhs} = #{rhs}" else lhs.to_s end end |
#process_class(exp) ⇒ Object
:nodoc:
339 340 341 |
# File 'lib/ruby2ruby.rb', line 339 def process_class exp # :nodoc: "#{exp.comments}class #{util_module_or_class(exp, true)}" end |
#process_colon2(exp) ⇒ Object
:nodoc:
343 344 345 346 347 |
# File 'lib/ruby2ruby.rb', line 343 def process_colon2 exp # :nodoc: _, lhs, rhs = exp "#{process lhs}::#{rhs}" end |
#process_colon3(exp) ⇒ Object
:nodoc:
349 350 351 352 353 |
# File 'lib/ruby2ruby.rb', line 349 def process_colon3 exp # :nodoc: _, rhs = exp "::#{rhs}" end |
#process_const(exp) ⇒ Object
:nodoc:
355 356 357 358 359 |
# File 'lib/ruby2ruby.rb', line 355 def process_const exp # :nodoc: _, name = exp name.to_s end |
#process_cvar(exp) ⇒ Object
:nodoc:
361 362 363 364 365 |
# File 'lib/ruby2ruby.rb', line 361 def process_cvar exp # :nodoc: _, name = exp name.to_s end |
#process_cvasgn(exp) ⇒ Object
:nodoc:
367 368 369 370 371 |
# File 'lib/ruby2ruby.rb', line 367 def process_cvasgn exp # :nodoc: _, lhs, rhs = exp "#{lhs} = #{process rhs}" end |
#process_cvdecl(exp) ⇒ Object
:nodoc:
373 374 375 376 377 |
# File 'lib/ruby2ruby.rb', line 373 def process_cvdecl exp # :nodoc: _, lhs, rhs = exp "#{lhs} = #{process rhs}" end |
#process_defined(exp) ⇒ Object
:nodoc:
379 380 381 382 |
# File 'lib/ruby2ruby.rb', line 379 def process_defined exp # :nodoc: _, rhs = exp "defined? #{process rhs}" end |
#process_defn(exp) ⇒ Object
:nodoc:
384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 |
# File 'lib/ruby2ruby.rb', line 384 def process_defn(exp) # :nodoc: _, name, args, *body = exp comm = exp.comments args = process args args = "" if args == "()" body = s() if body == s(s(:nil)) # empty it out of a default nil expression # s(:defn, name, args, ivar|iasgn) case exp when s{ s(:defn, atom, t(:args), s(:ivar, atom)) } then # TODO: atom -> _ _, ivar = body.first ivar = ivar.to_s[1..-1] # remove leading @ reader = name.to_s return "attr_reader #{name.inspect}" if reader == ivar when s{ s(:defn, atom, t(:args), s(:iasgn, atom, s(:lvar, atom))) } then _, ivar, _val = body.first ivar = ivar.to_s[1..-1] # remove leading @ reader = name.to_s.chomp "=" return "attr_writer :#{reader}" if reader == ivar end body = body.map { |ssexp| process ssexp } simple = body.size <= 1 body << "# do nothing" if body.empty? body = body.join("\n") body = body.lines.to_a[1..-2].join("\n") if simple && body =~ /^\Abegin/ && body =~ /^end\z/ body = indent(body) unless simple && body =~ /(^|\n)rescue/ return "#{comm}def #{name}#{args}\n#{body}\nend".gsub(/\n\s*\n+/, "\n") end |
#process_defs(exp) ⇒ Object
:nodoc:
422 423 424 425 426 427 428 429 430 431 432 |
# File 'lib/ruby2ruby.rb', line 422 def process_defs exp # :nodoc: _, lhs, name, args, *body = exp var = [:self, :cvar, :dvar, :ivar, :gvar, :lvar].include? lhs.sexp_type lhs = process lhs lhs = "(#{lhs})" unless var name = "#{lhs}.#{name}" process_defn s(:defn, name, args, *body) end |
#process_dot2(exp) ⇒ Object
:nodoc:
434 435 436 437 438 |
# File 'lib/ruby2ruby.rb', line 434 def process_dot2(exp) # :nodoc: _, lhs, rhs = exp "(#{process lhs}..#{process rhs})" end |
#process_dot3(exp) ⇒ Object
:nodoc:
440 441 442 443 444 |
# File 'lib/ruby2ruby.rb', line 440 def process_dot3(exp) # :nodoc: _, lhs, rhs = exp "(#{process lhs}...#{process rhs})" end |
#process_dregx(exp) ⇒ Object
:nodoc:
446 447 448 449 450 451 452 |
# File 'lib/ruby2ruby.rb', line 446 def process_dregx exp # :nodoc: _, str, *rest = exp = re_opt rest.pop if Integer === rest.last "/" << util_dthing(:dregx, s(:dregx, str, *rest)) << "/#{}" end |
#process_dregx_once(exp) ⇒ Object
:nodoc:
454 455 456 |
# File 'lib/ruby2ruby.rb', line 454 def process_dregx_once(exp) # :nodoc: process_dregx(exp) + "o" end |
#process_dstr(exp) ⇒ Object
:nodoc:
458 459 460 |
# File 'lib/ruby2ruby.rb', line 458 def process_dstr(exp) # :nodoc: "\"#{util_dthing(:dstr, exp)}\"" end |
#process_dsym(exp) ⇒ Object
:nodoc:
462 463 464 |
# File 'lib/ruby2ruby.rb', line 462 def process_dsym(exp) # :nodoc: ":\"#{util_dthing(:dsym, exp)}\"" end |
#process_dxstr(exp) ⇒ Object
:nodoc:
466 467 468 |
# File 'lib/ruby2ruby.rb', line 466 def process_dxstr(exp) # :nodoc: "`#{util_dthing(:dxstr, exp)}`" end |
#process_ensure(exp) ⇒ Object
:nodoc:
470 471 472 473 474 475 476 477 478 479 480 481 482 |
# File 'lib/ruby2ruby.rb', line 470 def process_ensure(exp) # :nodoc: _, body, ens = exp body = process body ens = nil if ens == s(:nil) ens = process(ens) || "# do nothing" ens = "begin\n#{ens}\nend\n" if ens =~ /(^|\n)rescue/ body.sub!(/\n\s*end\z/, '') body = indent(body) unless body =~ /(^|\n)rescue/ return "#{body}\nensure\n#{indent ens}" end |
#process_evstr(exp) ⇒ Object
:nodoc:
484 485 486 487 488 |
# File 'lib/ruby2ruby.rb', line 484 def process_evstr exp # :nodoc: _, x = exp x ? process(x) : "" end |
#process_false(exp) ⇒ Object
:nodoc:
490 491 492 |
# File 'lib/ruby2ruby.rb', line 490 def process_false exp # :nodoc: "false" end |
#process_flip2(exp) ⇒ Object
:nodoc:
494 495 496 497 498 |
# File 'lib/ruby2ruby.rb', line 494 def process_flip2 exp # :nodoc: _, lhs, rhs = exp "#{process lhs}..#{process rhs}" end |
#process_flip3(exp) ⇒ Object
:nodoc:
500 501 502 503 504 |
# File 'lib/ruby2ruby.rb', line 500 def process_flip3 exp # :nodoc: _, lhs, rhs = exp "#{process lhs}...#{process rhs}" end |
#process_for(exp) ⇒ Object
:nodoc:
506 507 508 509 510 511 512 513 514 515 516 517 518 |
# File 'lib/ruby2ruby.rb', line 506 def process_for exp # :nodoc: _, recv, iter, body = exp recv = process recv iter = process iter body = process(body) || "# do nothing" result = ["for #{iter} in #{recv} do"] result << indent(body) result << "end" result.join "\n" end |
#process_gasgn(exp) ⇒ Object
:nodoc:
520 521 522 |
# File 'lib/ruby2ruby.rb', line 520 def process_gasgn exp # :nodoc: process_iasgn exp end |
#process_gvar(exp) ⇒ Object
:nodoc:
524 525 526 527 528 |
# File 'lib/ruby2ruby.rb', line 524 def process_gvar exp # :nodoc: _, name = exp name.to_s end |
#process_hash(exp) ⇒ Object
:nodoc:
530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 |
# File 'lib/ruby2ruby.rb', line 530 def process_hash(exp) # :nodoc: _, *pairs = exp result = [] result = pairs.each_slice(2).map { |k, v| if k.sexp_type == :kwsplat then "%s" % process(k) else t = v.sexp_type lhs = process k rhs = process v rhs = "(#{rhs})" unless HASH_VAL_NO_PAREN.include? t "%s => %s" % [lhs, rhs] end } return result.empty? ? "{}" : "{ #{result.join(', ')} }" end |
#process_iasgn(exp) ⇒ Object
:nodoc:
552 553 554 555 556 557 558 559 560 |
# File 'lib/ruby2ruby.rb', line 552 def process_iasgn(exp) # :nodoc: _, lhs, rhs = exp if rhs then "#{lhs} = #{process rhs}" else # part of an masgn lhs.to_s end end |
#process_if(exp) ⇒ Object
:nodoc:
562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 |
# File 'lib/ruby2ruby.rb', line 562 def process_if(exp) # :nodoc: _, c, t, f = exp = Ruby2Ruby::ASSIGN_NODES.include? c.sexp_type c = process c t = process t f = process f c = "(#{c.chomp})" if c =~ /\n/ if t then unless then if f then r = "#{c} ? (#{t}) : (#{f})" r = nil if r =~ /return/ # HACK - need contextual awareness or something else r = "#{t} if #{c}" end return r if r and (@indent+r).size < LINE_LENGTH and r !~ /\n/ end r = "if #{c} then\n#{indent(t)}\n" r << "else\n#{indent(f)}\n" if f r << "end" r elsif f unless then r = "#{f} unless #{c}" return r if (@indent+r).size < LINE_LENGTH and r !~ /\n/ end "unless #{c} then\n#{indent(f)}\nend" else # empty if statement, just do it in case of side effects from condition "if #{c} then\n#{indent '# do nothing'}\nend" end end |
#process_iter(exp) ⇒ Object
:nodoc:
600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 |
# File 'lib/ruby2ruby.rb', line 600 def process_iter(exp) # :nodoc: _, iter, args, body = exp iter = process iter body = process body if body args = case args when 0 then "" else " |#{process(args)[1..-2]}|" end b, e = if iter == "END" then [ "{", "}" ] else [ "do", "end" ] end iter.sub!(/\(\)$/, '') # REFACTOR: ugh result = [] result << "#{iter} {" result << args if body then result << " #{body.strip} " else result << ' ' end result << "}" result = result.join return result if result !~ /\n/ and result.size < LINE_LENGTH result = [] result << "#{iter} #{b}" result << args result << "\n" if body then result << indent(body.strip) result << "\n" end result << e result.join end |
#process_ivar(exp) ⇒ Object
:nodoc:
646 647 648 649 |
# File 'lib/ruby2ruby.rb', line 646 def process_ivar(exp) # :nodoc: _, name = exp name.to_s end |
#process_kwsplat(exp) ⇒ Object
651 652 653 654 |
# File 'lib/ruby2ruby.rb', line 651 def process_kwsplat(exp) _, kw = exp "**#{process kw}" end |
#process_lasgn(exp) ⇒ Object
:nodoc:
656 657 658 659 660 661 662 |
# File 'lib/ruby2ruby.rb', line 656 def process_lasgn(exp) # :nodoc: _, name, value = exp s = "#{name}" s += " = #{process value}" if value s end |
#process_lit(exp) ⇒ Object
:nodoc:
664 665 666 667 668 669 670 671 672 |
# File 'lib/ruby2ruby.rb', line 664 def process_lit exp # :nodoc: _, obj = exp case obj when Range then "(#{obj.inspect})" else obj.inspect end end |
#process_lvar(exp) ⇒ Object
:nodoc:
674 675 676 677 |
# File 'lib/ruby2ruby.rb', line 674 def process_lvar(exp) # :nodoc: _, name = exp name.to_s end |
#process_masgn(exp) ⇒ Object
:nodoc:
679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 |
# File 'lib/ruby2ruby.rb', line 679 def process_masgn(exp) # :nodoc: # s(:masgn, s(:array, s(:lasgn, :var), ...), s(:to_ary, <val>, ...)) # s(:iter, <call>, s(:args, s(:masgn, :a, :b)), <body>) _, *exp = exp # HACK case exp.first when Sexp then lhs, rhs = exp case lhs.sexp_type when :array then _, *lhs = lhs # HACK lhs = lhs.map do |l| case l.sexp_type when :masgn then "(#{process(l)})" else process(l) end end else raise "no clue: #{lhs.inspect}" end if rhs then t = rhs.sexp_type rhs = process rhs rhs = rhs[1..-2] if t == :array # FIX: bad? I dunno return "#{lhs.join(", ")} = #{rhs}" else return lhs.join(", ") end when Symbol then # block arg list w/ masgn result = exp.join ", " exp.clear "(#{result})" else raise "unknown masgn: #{exp.inspect}" end end |
#process_match(exp) ⇒ Object
:nodoc:
721 722 723 724 725 |
# File 'lib/ruby2ruby.rb', line 721 def process_match exp # :nodoc: _, rhs = exp "#{process rhs}" end |
#process_match2(exp) ⇒ Object
:nodoc:
727 728 729 730 731 732 733 734 735 |
# File 'lib/ruby2ruby.rb', line 727 def process_match2 exp # :nodoc: # s(:match2, s(:lit, /x/), s(:str, "blah")) _, lhs, rhs = exp lhs = process lhs rhs = process rhs "#{lhs} =~ #{rhs}" end |
#process_match3(exp) ⇒ Object
:nodoc:
737 738 739 740 741 742 743 744 745 746 747 748 749 |
# File 'lib/ruby2ruby.rb', line 737 def process_match3 exp # :nodoc: _, rhs, lhs = exp # yes, backwards left_type = lhs.sexp_type lhs = process lhs rhs = process rhs if ASSIGN_NODES.include? left_type then "(#{lhs}) =~ #{rhs}" else "#{lhs} =~ #{rhs}" end end |
#process_module(exp) ⇒ Object
:nodoc:
751 752 753 |
# File 'lib/ruby2ruby.rb', line 751 def process_module(exp) # :nodoc: "#{exp.comments}module #{util_module_or_class(exp)}" end |
#process_next(exp) ⇒ Object
:nodoc:
755 756 757 758 759 760 761 762 763 764 |
# File 'lib/ruby2ruby.rb', line 755 def process_next(exp) # :nodoc: _, rhs = exp val = rhs && process(rhs) # maybe push down into if and test rhs? if val then "next #{val}" else "next" end end |
#process_nil(exp) ⇒ Object
:nodoc:
766 767 768 |
# File 'lib/ruby2ruby.rb', line 766 def process_nil(exp) # :nodoc: "nil" end |
#process_not(exp) ⇒ Object
:nodoc:
770 771 772 773 |
# File 'lib/ruby2ruby.rb', line 770 def process_not(exp) # :nodoc: _, sexp = exp "(not #{process sexp})" end |
#process_nth_ref(exp) ⇒ Object
:nodoc:
775 776 777 778 |
# File 'lib/ruby2ruby.rb', line 775 def process_nth_ref(exp) # :nodoc: _, n = exp "$#{n}" end |
#process_op_asgn(exp) ⇒ Object
:nodoc:
780 781 782 783 784 785 786 787 788 |
# File 'lib/ruby2ruby.rb', line 780 def process_op_asgn exp # :nodoc: # [[:lvar, :x], [:call, nil, :z, [:lit, 1]], :y, :"||"] _, lhs, rhs, index, op = exp lhs = process lhs rhs = process rhs "#{lhs}.#{index} #{op}= #{rhs}" end |
#process_op_asgn1(exp) ⇒ Object
:nodoc:
790 791 792 793 794 795 796 797 798 799 |
# File 'lib/ruby2ruby.rb', line 790 def process_op_asgn1(exp) # :nodoc: # [[:lvar, :b], [:arglist, [:lit, 1]], :"||", [:lit, 10]] _, lhs, index, msg, rhs = exp lhs = process lhs index = process index rhs = process rhs "#{lhs}[#{index}] #{msg}= #{rhs}" end |
#process_op_asgn2(exp) ⇒ Object
:nodoc:
801 802 803 804 805 806 807 808 809 810 |
# File 'lib/ruby2ruby.rb', line 801 def process_op_asgn2 exp # :nodoc: # [[:lvar, :c], :var=, :"||", [:lit, 20]] _, lhs, index, msg, rhs = exp lhs = process lhs index = index.to_s[0..-2] rhs = process rhs "#{lhs}.#{index} #{msg}= #{rhs}" end |
#process_op_asgn_and(exp) ⇒ Object
:nodoc:
812 813 814 815 816 817 |
# File 'lib/ruby2ruby.rb', line 812 def process_op_asgn_and(exp) # :nodoc: # a &&= 1 # [[:lvar, :a], [:lasgn, :a, [:lit, 1]]] _, _lhs, rhs = exp process(rhs).sub(/\=/, '&&=') end |
#process_op_asgn_or(exp) ⇒ Object
:nodoc:
819 820 821 822 823 824 |
# File 'lib/ruby2ruby.rb', line 819 def process_op_asgn_or(exp) # :nodoc: # a ||= 1 # [[:lvar, :a], [:lasgn, :a, [:lit, 1]]] _, _lhs, rhs = exp process(rhs).sub(/\=/, '||=') end |
#process_or(exp) ⇒ Object
:nodoc:
826 827 828 829 830 |
# File 'lib/ruby2ruby.rb', line 826 def process_or(exp) # :nodoc: _, lhs, rhs = exp "(#{process lhs} or #{process rhs})" end |
#process_postexe(exp) ⇒ Object
:nodoc:
832 833 834 |
# File 'lib/ruby2ruby.rb', line 832 def process_postexe(exp) # :nodoc: "END" end |
#process_redo(exp) ⇒ Object
:nodoc:
836 837 838 |
# File 'lib/ruby2ruby.rb', line 836 def process_redo(exp) # :nodoc: "redo" end |
#process_resbody(exp) ⇒ Object
:nodoc:
840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 |
# File 'lib/ruby2ruby.rb', line 840 def process_resbody exp # :nodoc: # s(:resbody, s(:array), s(:return, s(:str, "a"))) _, args, *body = exp body = body.compact.map { |sexp| process sexp } body << "# do nothing" if body.empty? name = args.lasgn true name ||= args.iasgn true args = process(args)[1..-2] args = " #{args}" unless args.empty? args += " => #{name[1]}" if name "rescue#{args}\n#{indent body.join("\n")}" end |
#process_rescue(exp) ⇒ Object
:nodoc:
859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 |
# File 'lib/ruby2ruby.rb', line 859 def process_rescue exp # :nodoc: _, *rest = exp exp = nil body = process rest.shift unless rest.first.sexp_type == :resbody els = process rest.pop unless rest.last && rest.last.sexp_type == :resbody body ||= "# do nothing" # TODO: I don't like this using method_missing, but I need to ensure tests simple = rest.size == 1 && rest.first.size <= 3 && !rest.first.block && !rest.first.return resbodies = rest.map { |resbody| _, rb_args, rb_body, *rb_rest = resbody simple &&= rb_args == s(:array) simple &&= rb_rest.empty? && rb_body && rb_body.node_type != :block process resbody } if els then "#{indent body}\n#{resbodies.join("\n")}\nelse\n#{indent els}" elsif simple then resbody = resbodies.first.sub(/\n\s*/, ' ') "#{body} #{resbody}" else "#{indent body}\n#{resbodies.join("\n")}" end end |
#process_retry(exp) ⇒ Object
:nodoc:
890 891 892 |
# File 'lib/ruby2ruby.rb', line 890 def process_retry(exp) # :nodoc: "retry" end |
#process_return(exp) ⇒ Object
:nodoc:
894 895 896 897 898 899 900 901 902 903 904 905 |
# File 'lib/ruby2ruby.rb', line 894 def process_return exp # :nodoc: _, rhs = exp unless rhs then "return" else rhs_type = rhs.sexp_type rhs = process rhs rhs = "(#{rhs})" if ASSIGN_NODES.include? rhs_type "return #{rhs}" end end |
#process_safe_attrasgn(exp) ⇒ Object
:nodoc:
907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 |
# File 'lib/ruby2ruby.rb', line 907 def process_safe_attrasgn exp # :nodoc: _, receiver, name, *rest = exp receiver = process receiver rhs = rest.pop args = rest.pop # should be nil raise "dunno what to do: #{args.inspect}" if args name = name.to_s.sub(/=$/, '') if rhs && rhs != s(:arglist) then "#{receiver}&.#{name} = #{process rhs}" else raise "dunno what to do: #{rhs.inspect}" end end |
#process_safe_call(exp) ⇒ Object
:nodoc:
296 297 298 |
# File 'lib/ruby2ruby.rb', line 296 def process_safe_call exp # :nodoc: process_call exp, :safe end |
#process_safe_op_asgn(exp) ⇒ Object
:nodoc:
925 926 927 928 929 930 931 932 933 |
# File 'lib/ruby2ruby.rb', line 925 def process_safe_op_asgn exp # :nodoc: # [[:lvar, :x], [:call, nil, :z, [:lit, 1]], :y, :"||"] _, lhs, rhs, index, op = exp lhs = process lhs rhs = process rhs "#{lhs}&.#{index} #{op}= #{rhs}" end |
#process_safe_op_asgn2(exp) ⇒ Object
:nodoc:
935 936 937 938 939 940 941 942 943 944 945 |
# File 'lib/ruby2ruby.rb', line 935 def process_safe_op_asgn2(exp) # :nodoc: # [[:lvar, :c], :var=, :"||", [:lit, 20]] _, lhs, index, msg, rhs = exp lhs = process lhs index = index.to_s[0..-2] rhs = process rhs "#{lhs}&.#{index} #{msg}= #{rhs}" end |
#process_sclass(exp) ⇒ Object
:nodoc:
947 948 949 950 951 952 953 954 |
# File 'lib/ruby2ruby.rb', line 947 def process_sclass(exp) # :nodoc: _, recv, *block = exp recv = process recv block = indent process_block s(:block, *block) "class << #{recv}\n#{block}\nend" end |
#process_self(exp) ⇒ Object
:nodoc:
956 957 958 |
# File 'lib/ruby2ruby.rb', line 956 def process_self(exp) # :nodoc: "self" end |
#process_splat(exp) ⇒ Object
:nodoc:
960 961 962 963 964 965 966 967 |
# File 'lib/ruby2ruby.rb', line 960 def process_splat(exp) # :nodoc: _, arg = exp if arg.nil? then "*" else "*#{process arg}" end end |
#process_str(exp) ⇒ Object
:nodoc:
969 970 971 972 |
# File 'lib/ruby2ruby.rb', line 969 def process_str(exp) # :nodoc: _, s = exp s.dump end |
#process_super(exp) ⇒ Object
:nodoc:
974 975 976 977 978 979 980 981 982 |
# File 'lib/ruby2ruby.rb', line 974 def process_super(exp) # :nodoc: _, *args = exp args = args.map { |arg| process arg } "super(#{args.join ", "})" end |
#process_svalue(exp) ⇒ Object
:nodoc:
984 985 986 987 988 989 990 |
# File 'lib/ruby2ruby.rb', line 984 def process_svalue(exp) # :nodoc: _, *args = exp args.map { |arg| process arg }.join ", " end |
#process_to_ary(exp) ⇒ Object
:nodoc:
992 993 994 995 996 |
# File 'lib/ruby2ruby.rb', line 992 def process_to_ary exp # :nodoc: _, sexp = exp process sexp end |
#process_true(exp) ⇒ Object
:nodoc:
998 999 1000 |
# File 'lib/ruby2ruby.rb', line 998 def process_true(exp) # :nodoc: "true" end |
#process_undef(exp) ⇒ Object
:nodoc:
1002 1003 1004 1005 1006 |
# File 'lib/ruby2ruby.rb', line 1002 def process_undef(exp) # :nodoc: _, name = exp "undef #{process name}" end |
#process_until(exp) ⇒ Object
:nodoc:
1008 1009 1010 |
# File 'lib/ruby2ruby.rb', line 1008 def process_until(exp) # :nodoc: cond_loop(exp, 'until') end |
#process_valias(exp) ⇒ Object
:nodoc:
1012 1013 1014 1015 1016 |
# File 'lib/ruby2ruby.rb', line 1012 def process_valias exp # :nodoc: _, lhs, rhs = exp "alias #{lhs} #{rhs}" end |
#process_when(exp) ⇒ Object
:nodoc:
1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 |
# File 'lib/ruby2ruby.rb', line 1018 def process_when exp # :nodoc: s(:when, s(:array, s(:lit, 1)), s(:call, nil, :puts, s(:str, "something")), s(:lasgn, :result, s(:str, "red"))) _, lhs, *rhs = exp cond = process(lhs)[1..-2] rhs = rhs.compact.map { |sexp| indent process sexp } rhs << indent("# do nothing") if rhs.empty? rhs = rhs.join "\n" "when #{cond} then\n#{rhs.chomp}" end |
#process_while(exp) ⇒ Object
:nodoc:
1037 1038 1039 |
# File 'lib/ruby2ruby.rb', line 1037 def process_while(exp) # :nodoc: cond_loop exp, "while" end |
#process_xstr(exp) ⇒ Object
:nodoc:
1041 1042 1043 |
# File 'lib/ruby2ruby.rb', line 1041 def process_xstr(exp) # :nodoc: "`#{process_str(exp)[1..-2]}`" end |
#process_yield(exp) ⇒ Object
:nodoc:
1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 |
# File 'lib/ruby2ruby.rb', line 1045 def process_yield(exp) # :nodoc: _, *args = exp args = args.map { |arg| process arg } unless args.empty? then "yield(#{args.join(', ')})" else "yield" end end |
#process_zsuper(exp) ⇒ Object
:nodoc:
1059 1060 1061 |
# File 'lib/ruby2ruby.rb', line 1059 def process_zsuper(exp) # :nodoc: "super" end |
#re_opt(options) ⇒ Object
Return the appropriate regexp flags for a given numeric code.
1184 1185 1186 1187 1188 |
# File 'lib/ruby2ruby.rb', line 1184 def re_opt bits = (0..8).map { |n| [n] * 2**n } bits.delete 0 bits.map { |n| Regexp::CODES[n] }.join end |
#rewrite_attrasgn(exp) ⇒ Object
Rewriters:
1066 1067 1068 1069 1070 1071 1072 1073 1074 |
# File 'lib/ruby2ruby.rb', line 1066 def rewrite_attrasgn exp # :nodoc: if context.first(2) == [:array, :masgn] then _, recv, msg, *args = exp exp = s(:call, recv, msg.to_s.chomp("=").to_sym, *args) end exp end |
#rewrite_ensure(exp) ⇒ Object
:nodoc:
1076 1077 1078 1079 |
# File 'lib/ruby2ruby.rb', line 1076 def rewrite_ensure exp # :nodoc: exp = s(:begin, exp) unless context.first == :begin exp end |
#rewrite_resbody(exp) ⇒ Object
:nodoc:
1081 1082 1083 1084 1085 1086 1087 |
# File 'lib/ruby2ruby.rb', line 1081 def rewrite_resbody exp # :nodoc: _, args, *_rest = exp raise "no exception list in #{exp.inspect}" unless exp.size > 2 && args raise args.inspect if args.sexp_type != :array # for now, do nothing, just check and freak if we see an errant structure exp end |
#rewrite_rescue(exp) ⇒ Object
:nodoc:
1089 1090 1091 1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 |
# File 'lib/ruby2ruby.rb', line 1089 def rewrite_rescue exp # :nodoc: complex = false complex ||= exp.size > 3 complex ||= exp.resbody.block complex ||= exp.resbody.size > 3 resbodies = exp.find_nodes(:resbody) complex ||= resbodies.any? { |n| n[1] != s(:array) } complex ||= resbodies.any? { |n| n.last.nil? } complex ||= resbodies.any? { |(_, _, body)| body and body.node_type == :block } handled = context.first == :ensure exp = s(:begin, exp) if complex unless handled exp end |
#rewrite_svalue(exp) ⇒ Object
:nodoc:
1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 |
# File 'lib/ruby2ruby.rb', line 1106 def rewrite_svalue(exp) # :nodoc: case exp.last.sexp_type when :array s(:svalue, *exp[1].sexp_body) when :splat exp else raise "huh: #{exp.inspect}" end end |
#splat(sym) ⇒ Object
Return a splatted symbol for sym
.
1193 1194 1195 |
# File 'lib/ruby2ruby.rb', line 1193 def splat(sym) :"*#{sym}" end |
#util_dthing(type, exp) ⇒ Object
Utility method to generate something interpolated.
1200 1201 1202 1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 |
# File 'lib/ruby2ruby.rb', line 1200 def util_dthing(type, exp) _, str, *rest = exp # first item in sexp is a string literal str = dthing_escape(type, str) rest = rest.map { |pt| case pt when Sexp then # TODO: what the fuck? why?? case pt.sexp_type when :str then dthing_escape(type, pt.last) when :evstr then '#{%s}' % [process(pt)] else raise "unknown type: #{pt.inspect}" end else raise "unhandled value in d-thing: #{pt.inspect}" end } [str, rest].join end |
#util_module_or_class(exp, is_class = false) ⇒ Object
Utility method to generate ether a module or class.
1228 1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251 1252 1253 1254 1255 1256 1257 1258 1259 |
# File 'lib/ruby2ruby.rb', line 1228 def util_module_or_class(exp, is_class=false) result = [] _, name, *body = exp superk = body.shift if is_class name = process name if Sexp === name result << name if superk then superk = process superk result << " < #{superk}" if superk end result << "\n" body = body.map { |sexp| process(sexp).chomp } unless body.empty? then body = indent(body.join("\n\n")) + "\n" else body = "" end result << body result << "end" result.join end |