furnace-avm2 0.0.1

data/lib/avm2/abc/opcodes/control_transfer/as3_ifeq.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfEq < ControlTransferOpcode
+    instruction 0x13
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_iffalse.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfFalse < ControlTransferOpcode
+    instruction 0x12
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 1
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_ifge.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfGe < ControlTransferOpcode
+    instruction 0x18
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_ifgt.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfGt < ControlTransferOpcode
+    instruction 0x17
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_ifle.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfLe < ControlTransferOpcode
+    instruction 0x16
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_iflt.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfLt < ControlTransferOpcode
+    instruction 0x15
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_ifne.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfNe < ControlTransferOpcode
+    instruction 0x14
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_ifnge.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfNge < ControlTransferOpcode
+    instruction 0x0f
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_ifngt.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfNgt < ControlTransferOpcode
+    instruction 0x0e
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_ifnle.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfNle < ControlTransferOpcode
+    instruction 0x0d
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_ifnlt.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfNlt < ControlTransferOpcode
+    instruction 0x0c
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_ifstricteq.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfStrictEq < ControlTransferOpcode
+    instruction 0x19
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_ifstrictne.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfStrictNe < ControlTransferOpcode
+    instruction 0x1a
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 2
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_iftrue.rb

@@ -0,0 +1,14 @@
+module AVM2::ABC
+  class AS3IfTrue < ControlTransferOpcode
+    instruction 0x11
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 1
+    produce 0
+
+    conditional true
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_jump.rb

@@ -0,0 +1,22 @@
+module AVM2::ABC
+  class AS3Jump < ControlTransferOpcode
+    instruction 0x10
+
+    body do
+      int24     :jump_offset
+    end
+
+    consume 0
+    produce 0
+
+    conditional false
+
+    def disassemble_parameters
+      if body.jump_offset >= 0
+        "+#{body.jump_offset}"
+      else
+        body.jump_offset.to_s
+      end
+    end
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer/as3_lookupswitch.rb

@@ -0,0 +1,34 @@
+module AVM2::ABC
+  class AS3LookupSwitch < Opcode
+    instruction 0x1b
+
+    body do
+      int24   :default_offset
+      vuint30 :case_count,   :value => lambda { case_offsets.count - 1 }
+      array   :case_offsets, :type => :int24, :initial_length => lambda { case_count + 1 }
+    end
+
+    consume 1
+    produce 0
+
+    attr_accessor :default_target, :case_targets
+
+    def parameters
+      [ body.default_offset ].concat(body.case_offsets)
+    end
+
+    def resolve!
+      @default_target = @sequence.opcode_at(offset + body.default_offset)
+      @case_targets = body.case_offsets.map do |case_offset|
+        @sequence.opcode_at(offset + case_offset)
+      end
+    end
+
+    def lookup!
+      body.default_offset = @default_target.offset - offset
+      body.case_offsets = @case_targets.map do |case_target|
+        case_target.offset - offset
+      end
+    end
+  end
+end

data/lib/avm2/abc/opcodes/control_transfer_opcode.rb

@@ -0,0 +1,37 @@
+module AVM2::ABC
+  class ControlTransferOpcode < Opcode
+    define_property :conditional
+
+    def parameters
+      [ target_offset ]
+    end
+
+    attr_accessor :target
+
+    def target_offset
+      self.offset + byte_length + body.jump_offset
+    end
+
+    def target_offset=(new_offset)
+      body.jump_offset = new_offset - offset - byte_length
+    end
+
+    def target_offsets
+      [ target_offset ]
+    end
+
+    def resolve!
+      @target = @sequence.opcode_at(target_offset)
+
+      if !@target
+        # Probably, we're in the middle of invalid code emitted by this fucking braindead
+        # compiler. Do something equally insane.
+        @target = self
+      end
+    end
+
+    def lookup!
+      self.target_offset = @target.offset
+    end
+  end
+end

data/lib/avm2/abc/opcodes/exception/as3_newcatch.rb

@@ -0,0 +1,16 @@
+module AVM2::ABC
+  class AS3NewCatch < ExceptionOpcode
+    instruction 0x5a
+
+    body do
+      vuint30 :catch_index
+    end
+
+    consume 0
+    produce 1
+
+    def parameters
+      [ body.catch_index ]
+    end
+  end
+end

data/lib/avm2/abc/opcodes/exception_opcode.rb

@@ -0,0 +1,4 @@
+module AVM2::ABC
+  class ExceptionOpcode < Opcode
+  end
+end

data/lib/avm2/abc/opcodes/function_invocation/as3_call.rb

@@ -0,0 +1,16 @@
+module AVM2::ABC
+  class AS3Call < Opcode
+    instruction 0x41
+
+    body do
+      vuint30 :arg_count
+    end
+
+    consume { 2 + body.arg_count }
+    produce 1
+
+    def disassemble_parameters
+      "(#{body.arg_count})"
+    end
+  end
+end

data/lib/avm2/abc/opcodes/function_invocation/as3_callproperty.rb

@@ -0,0 +1,7 @@
+module AVM2::ABC
+  class AS3CallProperty < FunctionInvocationOpcode
+    instruction 0x46
+
+    produce 1
+  end
+end

data/lib/avm2/abc/opcodes/function_invocation/as3_callpropvoid.rb

@@ -0,0 +1,7 @@
+module AVM2::ABC
+  class AS3CallPropertyVoid < FunctionInvocationOpcode
+    instruction 0x4f
+
+    produce 0
+  end
+end

data/lib/avm2/abc/opcodes/function_invocation/as3_callsuper.rb

@@ -0,0 +1,7 @@
+module AVM2::ABC
+  class AS3CallSuper < FunctionInvocationOpcode
+    instruction 0x45
+
+    produce 1
+  end
+end

data/lib/avm2/abc/opcodes/function_invocation/as3_callsupervoid.rb

@@ -0,0 +1,7 @@
+module AVM2::ABC
+  class AS3CallSuperVoid < FunctionInvocationOpcode
+    instruction 0x4e
+
+    produce 0
+  end
+end

data/lib/avm2/abc/opcodes/function_invocation_opcode.rb

@@ -0,0 +1,17 @@
+module AVM2::ABC
+  class FunctionInvocationOpcode < Opcode
+    include ContextualOpcode
+
+    body do
+      const_ref :property, :multiname
+      vuint30   :arg_count
+    end
+
+    implicit_operand false
+    consume { body.arg_count }
+
+    def disassemble_parameters
+      "#{body.property} #{body.arg_count}"
+    end
+  end
+end

data/lib/avm2/abc/opcodes/function_return/as3_returnvalue.rb

@@ -0,0 +1,8 @@
+module AVM2::ABC
+  class AS3ReturnValue < FunctionReturnOpcode
+    instruction 0x48
+
+    consume 1
+    produce 0
+  end
+end

data/lib/avm2/abc/opcodes/function_return/as3_returnvoid.rb

@@ -0,0 +1,8 @@
+module AVM2::ABC
+  class AS3ReturnVoid < FunctionReturnOpcode
+    instruction 0x47
+
+    consume 0
+    produce 0
+  end
+end

data/lib/avm2/abc/opcodes/function_return_opcode.rb

@@ -0,0 +1,4 @@
+module AVM2::ABC
+  class FunctionReturnOpcode < Opcode
+  end
+end