Begins implementation of ARM neon instructions.

runtime/vm/simulator_arm.cc

 // Copyright (c) 2013, the Dart project authors.  Please see the AUTHORS file
 // for details. All rights reserved. Use of this source code is governed by a
 // BSD-style license that can be found in the LICENSE file.
 
 #include <math.h>  // for isnan.
 #include <setjmp.h>
 #include <stdlib.h>
 
 #include "vm/globals.h"
 #if defined(TARGET_ARCH_ARM)
@@ skipping 905 matching lines @@
   dregisters_[reg] = bit_cast<int64_t, double>(value);
 }
 
 
 double Simulator::get_dregister(DRegister reg) const {
   ASSERT((reg >= 0) && (reg < kNumberOfDRegisters));
   return bit_cast<double, int64_t>(dregisters_[reg]);
 }
 
 
+void Simulator::set_qregister(QRegister reg, simd_value_t value) {
+  ASSERT((reg >= 0) && (reg < kNumberOfQRegisters));
+  qregisters_[reg].data_[0] = value.data_[0];
+  qregisters_[reg].data_[1] = value.data_[1];
+  qregisters_[reg].data_[2] = value.data_[2];
+  qregisters_[reg].data_[3] = value.data_[3];
+}
+
+
+simd_value_t Simulator::get_qregister(QRegister reg) const {
+  ASSERT((reg >= 0) && (reg < kNumberOfQRegisters));
+  return qregisters_[reg];
+}
+
+
 void Simulator::set_sregister_bits(SRegister reg, int32_t value) {
   ASSERT((reg >= 0) && (reg < kNumberOfSRegisters));
   sregisters_[reg] = value;
 }
 
 
 int32_t Simulator::get_sregister_bits(SRegister reg) const {
   ASSERT((reg >= 0) && (reg < kNumberOfSRegisters));
   return sregisters_[reg];
 }
@@ skipping 1941 matching lines @@
       } else {
         UnimplementedInstruction(instr);
       }
     }
   } else {
     UnimplementedInstruction(instr);
   }
 }
 
 
+void Simulator::DecodeSIMDDataProcessing(Instr* instr) {
+  ASSERT(instr->ConditionField() == kSpecialCondition);
+
+  if (instr->Bit(6) == 1) {
+    // Q = 1, Using 128-bit Q registers.
+    const QRegister qd = instr->QdField();
+    const QRegister qn = instr->QnField();
+    const QRegister qm = instr->QmField();
+    simd_value_t s8d;
+    simd_value_t s8n = get_qregister(qn);
+    simd_value_t s8m = get_qregister(qm);
+    int8_t* s8d_8 = reinterpret_cast<int8_t*>(&s8d);
+    int8_t* s8n_8 = reinterpret_cast<int8_t*>(&s8n);
+    int8_t* s8m_8 = reinterpret_cast<int8_t*>(&s8m);
+    int16_t* s8d_16 = reinterpret_cast<int16_t*>(&s8d);
+    int16_t* s8n_16 = reinterpret_cast<int16_t*>(&s8n);
+    int16_t* s8m_16 = reinterpret_cast<int16_t*>(&s8m);
+    int64_t* s8d_64 = reinterpret_cast<int64_t*>(&s8d);
+    int64_t* s8n_64 = reinterpret_cast<int64_t*>(&s8n);
+    int64_t* s8m_64 = reinterpret_cast<int64_t*>(&s8m);
+
+    if ((instr->Bits(8, 4) == 8) && (instr->Bit(4) == 0) &&
+        (instr->Bit(24) == 0)) {
+      // Uses q registers.
+      // Format(instr, "vadd.'sz 'qd, 'qn, 'qm");
+      const int size = instr->Bits(20, 2);
+      if (size == 0) {
+        for (int i = 0; i < 16; i++) {
+          s8d_8[i] = s8n_8[i] + s8m_8[i];
+        }
+      } else if (size == 1) {
+        for (int i = 0; i < 8; i++) {
+          s8d_16[i] = s8n_16[i] + s8m_16[i];
+        }
+      } else if (size == 2) {
+        for (int i = 0; i < 4; i++) {
+          s8d.data_[i].u = s8n.data_[i].u + s8m.data_[i].u;
+        }
+      } else if (size == 3) {
+        for (int i = 0; i < 2; i++) {
+          s8d_64[i] = s8n_64[i] + s8m_64[i];
+        }
+      } else {
+        UNREACHABLE();
+      }
+    } else if ((instr->Bits(8, 4) == 13) && (instr->Bit(4) == 0) &&
+               (instr->Bit(24) == 0)) {
+      // Format(instr, "vadd.F32 'qd, 'qn, 'qm");
+      for (int i = 0; i < 4; i++) {
+        s8d.data_[i].f = s8n.data_[i].f + s8m.data_[i].f;
+      }
+    } else {
+      UnimplementedInstruction(instr);
+    }
+
+    set_qregister(qd, s8d);
+  } else {
+    // Q == 0, Uses 64-bit D registers.
+    UnimplementedInstruction(instr);
+  }
+}
+
+
 // Executes the current instruction.
 void Simulator::InstructionDecode(Instr* instr) {
   pc_modified_ = false;
   if (FLAG_trace_sim) {
     const uword start = reinterpret_cast<uword>(instr);
     const uword end = start + Instr::kInstrSize;
     Disassembler::Disassemble(start, end);
   }
   if (instr->ConditionField() == kSpecialCondition) {
     if (instr->InstructionBits() == static_cast<int32_t>(0xf57ff01f)) {
       // Format(instr, "clrex");
       ClearExclusive();
     } else {
-      UnimplementedInstruction(instr);
+      if (instr->IsSIMDDataProcessing()) {
+        DecodeSIMDDataProcessing(instr);
+      } else {
+        UnimplementedInstruction(instr);
+      }
     }
   } else if (ConditionallyExecute(instr)) {
     switch (instr->TypeField()) {
       case 0:
       case 1: {
         DecodeType01(instr);
         break;
       }
       case 2: {
         DecodeType2(instr);
@@ skipping 203 matching lines @@
   set_register(kExceptionObjectReg, bit_cast<int32_t>(raw_exception));
   set_register(kStackTraceObjectReg, bit_cast<int32_t>(raw_stacktrace));
   buf->Longjmp();
 }
 
 }  // namespace dart
 
 #endif  // !defined(HOST_ARCH_ARM)
 
 #endif  // defined TARGET_ARCH_ARM