/* Chrysalide - Outil d'analyse de fichiers binaires
* simd.c - désassemblage des instructions ARMv7 SIMD
*
* Copyright (C) 2016 Cyrille Bagard
*
* This file is part of Chrysalide.
*
* OpenIDA is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 3 of the License, or
* (at your option) any later version.
*
* OpenIDA is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with Foobar. If not, see .
*/
#include "simd.h"
#include
//#include "opcodes/simd_opcodes.h"
#include "opcodes/opcodes_tmp_simd.h"
#include "../../undefined.h"
#include "../../../common/bconst.h"
/* Désassemble une instruction ARMv7 liées au chapitre A7.4.1. */
static GArchInstruction *process_armv7_simd_three_registers_of_the_same_length(uint32_t, bool);
/* Désassemble une instruction ARMv7 liées au chapitre A7.4.2. */
static GArchInstruction *process_armv7_simd_three_registers_of_different_lengths(uint32_t, bool);
/* Désassemble une instruction ARMv7 liées au chapitre A7.4.3. */
static GArchInstruction *process_armv7_simd_two_registers_and_a_scalar(uint32_t, bool);
/* Désassemble une instruction ARMv7 liées au chapitre A7.4.4. */
static GArchInstruction *process_armv7_simd_two_registers_and_a_shift_amount(uint32_t, bool);
/* Désassemble une instruction ARMv7 liées au chapitre A7.4.5. */
static GArchInstruction *process_armv7_simd_two_registers_miscellaneous(uint32_t, bool);
/* Désassemble une instruction ARMv7 liées au chapitre A7.4.6. */
static GArchInstruction *process_armv7_simd_one_register_and_a_modified_immediate_value(uint32_t, bool);
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.4. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
GArchInstruction *process_armv7_simd_advanced_simd_data_processing_instructions(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t u; /* Champ 'u' à retrouver */
uint32_t a; /* Champ 'a' à retrouver */
uint32_t b; /* Champ 'b' à retrouver */
uint32_t c; /* Champ 'c' à retrouver */
/**
* Suit les directives de :
* § A7.4 Advanced SIMD data-processing instructions
*/
if (arm)
{
if ((raw & 0xfe000000) != 0xf2000000) return NULL;
}
else
{
if ((raw & 0xef000000) != 0xef000000) return NULL;
}
result = NULL;
if (arm)
{
u = (raw >> 24) & b1;
a = (raw >> 19) & b11111;
b = (raw >> 8) & b1111;
c = (raw >> 4) & b1111;
}
else
{
u = (raw >> 28) & b1;
a = (raw >> 19) & b11111;
b = (raw >> 8) & b1111;
c = (raw >> 4) & b1111;
}
if ((a & b10000) == b00000)
result = process_armv7_simd_three_registers_of_the_same_length(raw, arm);
else if ((a & b10111) == b10000 && (c & b1001) == b0001)
result = process_armv7_simd_one_register_and_a_modified_immediate_value(raw, arm);
else if ((a & b10111) == b10001 && (c & b1001) == b0001)
result = process_armv7_simd_two_registers_and_a_shift_amount(raw, arm);
else if ((a & b10110) == b10010 && (c & b1001) == b0001)
result = process_armv7_simd_two_registers_and_a_shift_amount(raw, arm);
else if ((a & b10100) == b10100 && (c & b1001) == b0001)
result = process_armv7_simd_two_registers_and_a_shift_amount(raw, arm);
else if ((a & b10000) == b10000 && (c & b1001) == b1001)
result = process_armv7_simd_two_registers_and_a_shift_amount(raw, arm);
else if ((a & b10100) == b10000 && (c & b0101) == b0000)
result = process_armv7_simd_three_registers_of_different_lengths(raw, arm);
else if ((a & b10110) == b10100 && (c & b0101) == b0000)
result = process_armv7_simd_three_registers_of_different_lengths(raw, arm);
else if ((a & b10100) == b10000 && (c & b0101) == b0100)
result = process_armv7_simd_two_registers_and_a_scalar(raw, arm);
else if ((a & b10110) == b10100 && (c & b0101) == b0100)
result = process_armv7_simd_two_registers_and_a_scalar(raw, arm);
else if (u == b0 && (a & b10110) == b10110 && (c & b0001) == b0000)
result = armv7_read_simd_instr_vext(raw, arm);
else if (u == b1 && (a & b10110) == b10110)
{
if ((b & b1000) == b0000 && (c & b0001) == b0000)
result = process_armv7_simd_two_registers_miscellaneous(raw, arm);
else if ((b & b1100) == b1000 && (c & b0001) == b0000)
result = armv7_read_simd_instr_vtbl_vtbx(raw, arm);
else if (b == b1100 && (c & b1001) == b0000)
result = armv7_read_simd_instr_vdup_scalar(raw, arm);
}
return result;
}
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.4.1. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
static GArchInstruction *process_armv7_simd_three_registers_of_the_same_length(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t u; /* Champ 'u' à retrouver */
uint32_t c; /* Champ 'c' à retrouver */
uint32_t a; /* Champ 'a' à retrouver */
uint32_t b; /* Champ 'b' à retrouver */
/**
* Suit les directives de :
* § A7.4.1 Three registers of the same length
*/
if (arm)
{
if ((raw & 0xfe800000) != 0xf2000000) return NULL;
}
else
{
if ((raw & 0xef800000) != 0xef000000) return NULL;
}
result = NULL;
if (arm)
{
u = (raw >> 24) & b1;
c = (raw >> 20) & b11;
a = (raw >> 8) & b1111;
b = (raw >> 4) & b1;
}
else
{
u = (raw >> 28) & b1;
c = (raw >> 20) & b11;
a = (raw >> 8) & b1111;
b = (raw >> 4) & b1;
}
if (a == b0000)
{
if (b == b0)
result = armv7_read_simd_instr_vhadd_vhsub(raw, arm);
else/* if (b == b1)*/
result = armv7_read_simd_instr_vqadd(raw, arm);
}
else if (a == b0001)
{
if (b == b0)
result = armv7_read_simd_instr_vrhadd(raw, arm);
else/* if (b == b1)*/
{
if (u == b0)
switch (c)
{
case b00:
result = armv7_read_simd_instr_vand_register(raw, arm);
break;
case b01:
result = armv7_read_simd_instr_vbic_register(raw, arm);
break;
case b10:
/* Cf. vmov_register aussi */
result = armv7_read_simd_instr_vorr_register(raw, arm);
break;
case b11:
result = armv7_read_simd_instr_vorn_register(raw, arm);
break;
}
else/* if (u == b1)*/
switch (c)
{
case b00:
result = armv7_read_simd_instr_veor(raw, arm);
break;
case b01:
result = armv7_read_simd_instr_vbif_vbit_vbsl(raw, arm);
break;
case b10:
result = armv7_read_simd_instr_vbif_vbit_vbsl(raw, arm);
break;
case b11:
result = armv7_read_simd_instr_vbif_vbit_vbsl(raw, arm);
break;
}
}
}
else if (a == b0010)
{
if (b == b0)
result = armv7_read_simd_instr_vhadd_vhsub(raw, arm);
else/* if (b == b1)*/
result = armv7_read_simd_instr_vqsub(raw, arm);
}
else if (a == b0011)
{
if (b == b0)
result = armv7_read_simd_instr_vcgt_register(raw, arm);
else/* if (b == b1)*/
result = armv7_read_simd_instr_vcge_register(raw, arm);
}
else if (a == b0100)
{
if (b == b0)
result = armv7_read_simd_instr_vshl_register(raw, arm);
else/* if (b == b1)*/
result = armv7_read_simd_instr_vqshl_register(raw, arm);
}
else if (a == b0101)
{
if (b == b0)
result = armv7_read_simd_instr_vrshl(raw, arm);
else/* if (b == b1)*/
result = armv7_read_simd_instr_vqrshl(raw, arm);
}
else if (a == b0110)
result = armv7_read_simd_instr_vmax_vmin_integer(raw, arm);
else if (a == b0111)
{
if (b == b0)
result = armv7_read_simd_instr_vabd_vabdl_integer(raw, arm);
else/* if (b == b1)*/
result = armv7_read_simd_instr_vaba_vabal(raw, arm);
}
else if (a == b1000)
{
if (b == b0)
{
if (u == b0)
result = armv7_read_simd_instr_vadd_integer(raw, arm);
else/* if (u == b1)*/
result = armv7_read_simd_instr_vsub_integer(raw, arm);
}
else/* if (b == b1)*/
{
if (u == b0)
result = armv7_read_simd_instr_vtst(raw, arm);
else/* if (u == b1)*/
result = armv7_read_simd_instr_vceq_register(raw, arm);
}
}
else if (a == b1001)
{
if (b == b0)
result = armv7_read_simd_instr_vmla_vmlal_vmls_vmlsl_integer(raw, arm);
else/* if (b == b1)*/
result = armv7_read_simd_instr_vmul_vmull_integer_and_polynomial(raw, arm);
}
else if (a == b1010)
result = armv7_read_simd_instr_vpmax_vpmin_integer(raw, arm);
else if (a == b1011)
{
if (b == b0)
{
if (u == b0)
result = armv7_read_simd_instr_vqdmulh(raw, arm);
else/* if (u == b1)*/
result = armv7_read_simd_instr_vqrdmulh(raw, arm);
}
else/* if (b == b1)*/
{
if (u == b0)
result = armv7_read_simd_instr_vpadd_integer(raw, arm);
}
}
else if (a == b1100)
{
if (b == b1 && u == b0)
result = armv7_read_simd_instr_vfma_vfms(raw, arm);
}
else if (a == b1101)
{
if (b == b0)
{
if (u == b0)
{
if ((c & b10) == b00)
result = armv7_read_simd_instr_vadd_floating_point(raw, arm);
else/* if ((c & b10) == b10)*/
result = armv7_read_simd_instr_vsub_floating_point(raw, arm);
}
else/* if (u == b1)*/
{
if ((c & b10) == b00)
result = armv7_read_simd_instr_vpadd_floating_point(raw, arm);
else/* if ((c & b10) == b10)*/
result = armv7_read_simd_instr_vabd_floating_point(raw, arm);
}
}
else/* if (b == b1)*/
{
if (u == b0)
result = armv7_read_simd_instr_vmla_vmls_floating_point(raw, arm);
else/* if (u == b1)*/
{
if ((c & b10) == b00)
result = armv7_read_simd_instr_vmul_floating_point(raw, arm);
}
}
}
else if (a == b1110)
{
if (b == b0)
{
if (u == b0)
{
if ((c & b10) == b00)
result = armv7_read_simd_instr_vceq_register(raw, arm);
}
else/* if (u == b1)*/
{
if ((c & b10) == b00)
result = armv7_read_simd_instr_vcge_register(raw, arm);
else/* if ((c & b10) == b10)*/
result = armv7_read_simd_instr_vcgt_register(raw, arm);
}
}
else/* if (b == b1)*/
{
if (u == b1)
result = armv7_read_simd_instr_vacge_vacgt_vacle_vaclt(raw, arm);
}
}
else if (a == b1111)
{
if (b == b0)
{
if (u == b0)
result = armv7_read_simd_instr_vmax_vmin_floating_point(raw, arm);
else/* if (u == b1)*/
result = armv7_read_simd_instr_vpmax_vpmin_floating_point(raw, arm);
}
else/* if (b == b1)*/
{
if (u == b0)
{
if ((c & b10) == b00)
result = armv7_read_simd_instr_vrecps(raw, arm);
else/* if ((c & b10) == b10)*/
result = armv7_read_simd_instr_vrsqrts(raw, arm);
}
}
}
return result;
}
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.4.2. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
static GArchInstruction *process_armv7_simd_three_registers_of_different_lengths(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t u; /* Champ 'u' à retrouver */
uint32_t a; /* Champ 'a' à retrouver */
/**
* Suit les directives de :
* § A7.4.2 Three registers of different lengths
*/
if (arm)
{
if ((raw & 0xfe800050) != 0xf2800000) return NULL;
}
else
{
if ((raw & 0xef800050) != 0xef800000) return NULL;
}
result = NULL;
if (arm)
{
u = (raw >> 24) & b1;
a = (raw >> 8) & b1111;
}
else
{
u = (raw >> 28) & b1;
a = (raw >> 8) & b1111;
}
if ((a & b1110) == b0000)
result = armv7_read_simd_instr_vaddl_vaddw(raw, arm);
else if ((a & b1110) == b0010)
result = armv7_read_simd_instr_vsubl_vsubw(raw, arm);
else if (a == b0100)
{
if (u == b0)
result = armv7_read_simd_instr_vaddhn(raw, arm);
else/* if (u == b1)*/
result = armv7_read_simd_instr_vraddhn(raw, arm);
}
else if (a == b0101)
result = armv7_read_simd_instr_vaba_vabal(raw, arm);
else if (a == b0110)
{
if (u == b0)
result = armv7_read_simd_instr_vsubhn(raw, arm);
else/* if (u == b1)*/
result = armv7_read_simd_instr_vrsubhn(raw, arm);
}
else if (a == b0111)
result = armv7_read_simd_instr_vabd_vabdl_integer(raw, arm);
else if ((a & b1101) == b1000)
result = armv7_read_simd_instr_vmla_vmlal_vmls_vmlsl_integer(raw, arm);
else if ((a & b1101) == b1001)
{
if (u == b0)
result = armv7_read_simd_instr_vqdmlal_vqdmlsl(raw, arm);
}
else if (a == b1100)
result = armv7_read_simd_instr_vmul_vmull_integer_and_polynomial(raw, arm);
else if (a == b1101)
{
if (u == b0)
result = armv7_read_simd_instr_vqdmull(raw, arm);
}
else if (a == b1110)
result = armv7_read_simd_instr_vmul_vmull_integer_and_polynomial(raw, arm);
return result;
}
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.4.3. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
static GArchInstruction *process_armv7_simd_two_registers_and_a_scalar(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t u; /* Champ 'u' à retrouver */
uint32_t a; /* Champ 'a' à retrouver */
/**
* Suit les directives de :
* § A7.4.3 Two registers and a scalar
*/
if (arm)
{
if ((raw & 0xfe800050) != 0xf2800040) return NULL;
}
else
{
if ((raw & 0xef800050) != 0xef800040) return NULL;
}
result = NULL;
if (arm)
{
u = (raw >> 24) & b1;
a = (raw >> 8) & b1111;
}
else
{
u = (raw >> 28) & b1;
a = (raw >> 8) & b1111;
}
if ((a & b1010) == b0000)
result = armv7_read_simd_instr_vmla_vmlal_vmls_vmlsl_by_scalar(raw, arm);
else if ((a & b1010) == b0010)
result = armv7_read_simd_instr_vmla_vmlal_vmls_vmlsl_by_scalar(raw, arm);
else if ((a & b1011) == b0011 && u == b0)
result = armv7_read_simd_instr_vqdmlal_vqdmlsl(raw, arm);
else if ((a & b1110) == b1000)
result = armv7_read_simd_instr_vmul_vmull_by_scalar(raw, arm);
else if (a == b1010)
result = armv7_read_simd_instr_vmul_vmull_by_scalar(raw, arm);
else if (a == b1011 && u == b0)
result = armv7_read_simd_instr_vqdmull(raw, arm);
else if (a == b1100)
result = armv7_read_simd_instr_vqdmulh(raw, arm);
else if (a == b1101)
result = armv7_read_simd_instr_vqrdmulh(raw, arm);
return result;
}
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.4.4. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
static GArchInstruction *process_armv7_simd_two_registers_and_a_shift_amount(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t u; /* Champ 'u' à retrouver */
uint32_t a; /* Champ 'a' à retrouver */
uint32_t l; /* Champ 'l' à retrouver */
uint32_t b; /* Champ 'b' à retrouver */
/**
* Suit les directives de :
* § A7.4.4 Two registers and a shift amount
*/
if (arm)
{
if ((raw & 0xfe800010) != 0xf2800010) return NULL;
}
else
{
if ((raw & 0xef800010) != 0xef800010) return NULL;
}
result = NULL;
if (arm)
{
u = (raw >> 24) & b1;
a = (raw >> 8) & b1111;
l = (raw >> 7) & b1;
b = (raw >> 6) & b1;
}
else
{
u = (raw >> 28) & b1;
a = (raw >> 8) & b1111;
l = (raw >> 7) & b1;
b = (raw >> 6) & b1;
}
if (a == b0000)
result = armv7_read_simd_instr_vshr(raw, arm);
else if (a == b0001)
result = armv7_read_simd_instr_vsra(raw, arm);
else if (a == b0010)
result = armv7_read_simd_instr_vrshr(raw, arm);
else if (a == b0011)
result = armv7_read_simd_instr_vrsra(raw, arm);
else if (a == b0100 && u == b1)
result = armv7_read_simd_instr_vsri(raw, arm);
else if (a == b0101)
{
if (u == b0)
result = armv7_read_simd_instr_vshl_immediate(raw, arm);
else/* if (u == b1)*/
result = armv7_read_simd_instr_vsli(raw, arm);
}
else if ((a & b1110) == b0110)
result = armv7_read_simd_instr_vqshl_vqshlu_immediate(raw, arm);
else if (a == b1000)
{
if (u == b0)
{
if (b == b0 && l == b0)
result = armv7_read_simd_instr_vshrn(raw, arm);
else if (b == b1 && l == b0)
result = armv7_read_simd_instr_vrshrn(raw, arm);
}
else/* if (u == b1)*/
{
if (b == b0 && l == b0)
result = armv7_read_simd_instr_vqshrn_vqshrun(raw, arm);
else if (b == b1 && l == b0)
result = armv7_read_simd_instr_vqrshrn_vqrshrun(raw, arm);
}
}
else if (a == b1001)
{
if (b == b0 && l == b0)
result = armv7_read_simd_instr_vqshrn_vqshrun(raw, arm);
else if (b == b1 && l == b0)
result = armv7_read_simd_instr_vqrshrn_vqrshrun(raw, arm);
}
else if (a == b1010 && b == b0 && l == b0)
{
result = armv7_read_simd_instr_vshll(raw, arm);
/* ??? */
if (result == NULL)
result = armv7_read_simd_instr_vmovl(raw, arm);
}
else if ((a & b1110) == b1110 && l == b0)
result = armv7_read_simd_instr_vcvt_between_floating_point_and_fixed_point_advanced_simd(raw, arm);
return result;
}
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.4.5. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
static GArchInstruction *process_armv7_simd_two_registers_miscellaneous(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t a; /* Champ 'a' à retrouver */
uint32_t b; /* Champ 'b' à retrouver */
/**
* Suit les directives de :
* § A7.4.5 Two registers, miscellaneous
*/
if (arm)
{
if ((raw & 0xffb00810) != 0xf3b00000) return NULL;
}
else
{
if ((raw & 0xffb00810) != 0xffb00000) return NULL;
}
result = NULL;
a = (raw >> 16) & b11;
b = (raw >> 6) & b11111;
if (a == b00)
{
if ((b & b11110) == b00000)
result = armv7_read_simd_instr_vrev16_vrev32_vrev64(raw, arm);
else if ((b & b11110) == b00010)
result = armv7_read_simd_instr_vrev16_vrev32_vrev64(raw, arm);
else if ((b & b11110) == b00100)
result = armv7_read_simd_instr_vrev16_vrev32_vrev64(raw, arm);
else if ((b & b11100) == b01000)
result = armv7_read_simd_instr_vpaddl(raw, arm);
else if ((b & b11110) == b10000)
result = armv7_read_simd_instr_vcls(raw, arm);
else if ((b & b11110) == b10010)
result = armv7_read_simd_instr_vclz(raw, arm);
else if ((b & b11110) == b10100)
result = armv7_read_simd_instr_vcnt(raw, arm);
else if ((b & b11110) == b10110)
result = armv7_read_simd_instr_vmvn_register(raw, arm);
else if ((b & b11100) == b11000)
result = armv7_read_simd_instr_vpadal(raw, arm);
else if ((b & b11110) == b11100)
result = armv7_read_simd_instr_vqabs(raw, arm);
else if ((b & b11110) == b11110)
result = armv7_read_simd_instr_vqneg(raw, arm);
}
else if (a == b01)
{
if ((b & b01110) == b00000)
result = armv7_read_simd_instr_vcgt_immediate_0(raw, arm);
else if ((b & b01110) == b00010)
result = armv7_read_simd_instr_vcge_immediate_0(raw, arm);
else if ((b & b01110) == b00100)
result = armv7_read_simd_instr_vceq_immediate_0(raw, arm);
else if ((b & b01110) == b00110)
result = armv7_read_simd_instr_vcle_immediate_0(raw, arm);
else if ((b & b01110) == b01000)
result = armv7_read_simd_instr_vclt_immediate_0(raw, arm);
else if ((b & b01110) == b01100)
result = armv7_read_simd_instr_vabs(raw, arm);
else if ((b & b01110) == b01110)
result = armv7_read_simd_instr_vneg(raw, arm);
}
return result;
}
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.4.6. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
static GArchInstruction *process_armv7_simd_one_register_and_a_modified_immediate_value(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t cmode; /* Champ 'cmode' à retrouver */
uint32_t op; /* Champ 'op' à retrouver */
/**
* Suit les directives de :
* § A7.4.6 One register and a modified immediate value
*/
if (arm)
{
if ((raw & 0xfeb80090) != 0xf2800010) return NULL;
}
else
{
if ((raw & 0xefb80090) != 0xef800010) return NULL;
}
result = NULL;
cmode = (raw >> 8) & b1111;
op = (raw >> 5) & b1;
if (op == b0)
{
if ((cmode & b1001) == b0000)
result = armv7_read_simd_instr_vmov_immediate(raw, arm);
else if ((cmode & b1001) == b0001)
result = armv7_read_simd_instr_vorr_immediate(raw, arm);
else if ((cmode & b1101) == b1000)
result = armv7_read_simd_instr_vmov_immediate(raw, arm);
else if ((cmode & b1101) == b1001)
result = armv7_read_simd_instr_vorr_immediate(raw, arm);
else if ((cmode & b1100) == b1100)
result = armv7_read_simd_instr_vmov_immediate(raw, arm);
}
else/* if (op == b1)*/
{
if ((cmode & b1001) == b0000)
result = armv7_read_simd_instr_vmvn_immediate(raw, arm);
else if ((cmode & b1001) == b0001)
result = armv7_read_simd_instr_vbic_immediate(raw, arm);
else if ((cmode & b1101) == b1000)
result = armv7_read_simd_instr_vmvn_immediate(raw, arm);
else if ((cmode & b1101) == b1001)
result = armv7_read_simd_instr_vbic_immediate(raw, arm);
else if ((cmode & b1110) == b1100)
result = armv7_read_simd_instr_vmvn_immediate(raw, arm);
else if (cmode == b1110)
result = armv7_read_simd_instr_vmov_immediate(raw, arm);
else if (cmode == b1111)
result = g_undef_instruction_new(IBS_UNDEFINED);
}
return result;
}
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.5. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
GArchInstruction *process_armv7_simd_floating_point_data_processing_instructions(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t opc1; /* Champ 'opc1' à retrouver */
uint32_t opc2; /* Champ 'opc2' à retrouver */
uint32_t opc3; /* Champ 'opc3' à retrouver */
/**
* Suit les directives de :
* § A7.5 Floating-point data-processing instructions
*/
if (arm)
{
if ((raw & 0x0f000e10) != 0xee000a00) return NULL;
}
else
{
if ((raw & 0xef000e10) != 0x0e000a00) return NULL;
}
result = NULL;
opc1 = (raw >> 20) & b1111;
opc2 = (raw >> 16) & b1111;
opc3 = (raw >> 6) & b11;
if ((opc1 & b1011) == b0000)
result = armv7_read_simd_instr_vmla_vmls_floating_point(raw, arm);
else if ((opc1 & b1011) == b0001)
result = armv7_read_simd_instr_vnmla_vnmls_vnmul(raw, arm);
else if ((opc1 & b1011) == b0010)
{
if ((opc3 & b01) == b01)
result = armv7_read_simd_instr_vnmla_vnmls_vnmul(raw, arm);
else/* if ((opc3 & b01) == b00)*/
result = armv7_read_simd_instr_vmul_floating_point(raw, arm);
}
else if ((opc1 & b1011) == b0011)
{
if ((opc3 & b01) == b00)
result = armv7_read_simd_instr_vadd_floating_point(raw, arm);
else/* if ((opc3 & b01) == b01)*/
result = armv7_read_simd_instr_vsub_floating_point(raw, arm);
}
else if ((opc1 & b1011) == b1000)
{
if ((opc3 & b01) == b00)
result = armv7_read_simd_instr_vdiv(raw, arm);
}
else if ((opc1 & b1011) == b1001)
result = armv7_read_simd_instr_vfnma_vfnms(raw, arm);
else if ((opc1 & b1011) == b1010)
result = armv7_read_simd_instr_vfma_vfms(raw, arm);
else if ((opc1 & b1011) == b1011)
{
if ((opc3 & b01) == b00)
result = armv7_read_simd_instr_vmov_immediate(raw, arm);
else if (opc2 == b0000)
{
if (opc3 == b01)
result = armv7_read_simd_instr_vmov_register(raw, arm);
else if (opc3 == b11)
result = armv7_read_simd_instr_vabs(raw, arm);
}
else if (opc2 == b0001)
{
if (opc3 == b01)
result = armv7_read_simd_instr_vneg(raw, arm);
else if (opc3 == b11)
result = armv7_read_simd_instr_vsqrt(raw, arm);
}
else if ((opc2 & b1110) == b0010 && (opc3 & b01) == b01)
result = armv7_read_simd_instr_vcvtb_vcvtt(raw, arm);
else if ((opc2 & b1110) == b0100 && (opc3 & b01) == b01)
result = armv7_read_simd_instr_vcmp_vcmpe(raw, arm);
else if (opc2 == b0111 && opc3 == b11)
result = armv7_read_simd_instr_vcvt_between_double_precision_and_single_precision(raw, arm);
else if (opc2 == b1000 && (opc3 & b01) == b01)
result = armv7_read_simd_instr_vcvt_vcvtr_between_floating_point_and_integer_floating_point(raw, arm);
else if ((opc2 & b1110) == b1010 && (opc3 & b01) == b01)
result = armv7_read_simd_instr_vcvt_between_floating_point_and_fixed_point_floating_point(raw, arm);
else if ((opc2 & b1110) == b1100 && (opc3 & b01) == b01)
result = armv7_read_simd_instr_vcvt_vcvtr_between_floating_point_and_integer_floating_point(raw, arm);
else if ((opc2 & b1110) == b1110 && (opc3 & b01) == b01)
result = armv7_read_simd_instr_vcvt_between_floating_point_and_fixed_point_floating_point(raw, arm);
}
return result;
}
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.6. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
GArchInstruction *process_armv7_simd_extension_register_load_store_instructions(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t opcode; /* Champ 'opcode' à retrouver */
uint32_t rn; /* Champ 'rn' à retrouver */
/**
* Suit les directives de :
* § A7.6 Extension register load/store instructions
*/
if (arm)
{
if ((raw & 0x0e000e00) != 0x0c000a00) return NULL;
}
else
{
if ((raw & 0xee000e00) != 0xec000a00) return NULL;
}
result = NULL;
opcode = (raw >> 20) & b11111;
rn = (raw >> 16) & b1111;
if ((opcode & b11110) == b00100)
result = process_armv7_simd_64_bit_transfers_between_arm_core_and_extension_registers(raw, arm);
else if ((opcode & b11011) == b01000)
result = armv7_read_simd_instr_vstm(raw, arm);
else if ((opcode & b11011) == b01010)
result = armv7_read_simd_instr_vstm(raw, arm);
else if ((opcode & b10011) == b10000)
result = armv7_read_simd_instr_vstr(raw, arm);
else if ((opcode & b11011) == b10010)
{
if (rn != b1101)
result = armv7_read_simd_instr_vstm(raw, arm);
else/* if (rn == b1101)*/
result = armv7_read_simd_instr_vpush(raw, arm);
}
else if ((opcode & b11011) == b01001)
result = armv7_read_simd_instr_vldm(raw, arm);
else if ((opcode & b11011) == b01011)
{
if (rn != 1101)
result = armv7_read_simd_instr_vldm(raw, arm);
else/* if (rn == 1101)*/
result = armv7_read_simd_instr_vpop(raw, arm);
}
else if ((opcode & b10011) == b10001)
result = armv7_read_simd_instr_vldr(raw, arm);
else if ((opcode & b11011) == b10011)
result = armv7_read_simd_instr_vldm(raw, arm);
return result;
}
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.7. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
GArchInstruction *process_armv7_simd_advanced_simd_element_or_structure_load_store_instructions(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t a; /* Champ 'a' à retrouver */
uint32_t l; /* Champ 'l' à retrouver */
uint32_t b; /* Champ 'b' à retrouver */
/**
* Suit les directives de :
* § A7.7 Advanced SIMD element or structure load/store instructions
*/
if (arm)
{
if ((raw & 0xff100000) != 0xf4000000) return NULL;
}
else
{
if ((raw & 0xff100000) != 0xf9000000) return NULL;
}
result = NULL;
a = (raw >> 23) & b1;
l = (raw >> 21) & b1;
b = (raw >> 8) & b1111;
if (l == b0)
{
if (a == b0)
{
if (b == b0010)
result = armv7_read_simd_instr_vst1_multiple_single_elements(raw, arm);
else if ((b & b1110) == b0110)
result = armv7_read_simd_instr_vst1_multiple_single_elements(raw, arm);
else if (b == b1010)
result = armv7_read_simd_instr_vst1_multiple_single_elements(raw, arm);
else if (b == b0011)
result = armv7_read_simd_instr_vst2_multiple_2_element_structures(raw, arm);
else if ((b & b1110) == b1000)
result = armv7_read_simd_instr_vst2_multiple_2_element_structures(raw, arm);
else if ((b & b1110) == b0100)
result = armv7_read_simd_instr_vst3_multiple_3_element_structures(raw, arm);
else if ((b & b1110) == b0000)
result = armv7_read_simd_instr_vst4_multiple_4_element_structures(raw, arm);
}
else/* if (a == b1)*/
{
if ((b & b1011) == b0000)
result = armv7_read_simd_instr_vst1_single_element_from_one_lane(raw, arm);
else if (b == b1000)
result = armv7_read_simd_instr_vst1_single_element_from_one_lane(raw, arm);
else if ((b & b1011) == b0001)
result = armv7_read_simd_instr_vst2_single_2_element_structure_from_one_lane(raw, arm);
else if (b == b1001)
result = armv7_read_simd_instr_vst2_single_2_element_structure_from_one_lane(raw, arm);
else if ((b & b1011) == b0010)
result = armv7_read_simd_instr_vst3_single_3_element_structure_from_one_lane(raw, arm);
else if (b == b1010)
result = armv7_read_simd_instr_vst3_single_3_element_structure_from_one_lane(raw, arm);
else if ((b & b1011) == b0011)
result = armv7_read_simd_instr_vst4_single_4_element_structure_from_one_lane(raw, arm);
else if (b == b1011)
result = armv7_read_simd_instr_vst4_single_4_element_structure_from_one_lane(raw, arm);
}
}
else/* if (l == b1)*/
{
if (a == b0)
{
if (b == b0010)
result = armv7_read_simd_instr_vld1_multiple_single_elements(raw, arm);
else if ((b & b1110) == b0110)
result = armv7_read_simd_instr_vld1_multiple_single_elements(raw, arm);
else if (b == b1010)
result = armv7_read_simd_instr_vld1_multiple_single_elements(raw, arm);
else if (b == b0011)
result = armv7_read_simd_instr_vld2_multiple_2_element_structures(raw, arm);
else if ((b & b1110) == b1000)
result = armv7_read_simd_instr_vld2_multiple_2_element_structures(raw, arm);
else if ((b & b1110) == b0100)
result = armv7_read_simd_instr_vld3_multiple_3_element_structures(raw, arm);
else if ((b & b1110) == b0000)
result = armv7_read_simd_instr_vld4_multiple_4_element_structures(raw, arm);
}
else/* if (a == b1)*/
{
if ((b & b1011) == b0000)
result = armv7_read_simd_instr_vld1_single_element_to_one_lane(raw, arm);
else if (b == b1000)
result = armv7_read_simd_instr_vld1_single_element_to_one_lane(raw, arm);
else if (b == b1100)
result = armv7_read_simd_instr_vld1_single_element_to_all_lanes(raw, arm);
else if ((b & b1011) == b0001)
result = armv7_read_simd_instr_vld2_single_2_element_structure_to_one_lane(raw, arm);
else if (b == b1001)
result = armv7_read_simd_instr_vld2_single_2_element_structure_to_one_lane(raw, arm);
else if (b == b1101)
result = armv7_read_simd_instr_vld2_single_2_element_structure_to_all_lanes(raw, arm);
else if ((b & b1011) == b0010)
result = armv7_read_simd_instr_vld3_single_3_element_structure_to_one_lane(raw, arm);
else if (b == b1010)
result = armv7_read_simd_instr_vld3_single_3_element_structure_to_one_lane(raw, arm);
else if (b == b1110)
result = armv7_read_simd_instr_vld3_single_3_element_structure_to_all_lanes(raw, arm);
else if ((b & b1011) == b0011)
result = armv7_read_simd_instr_vld4_single_4_element_structure_to_one_lane(raw, arm);
else if (b == b1011)
result = armv7_read_simd_instr_vld4_single_4_element_structure_to_one_lane(raw, arm);
else if (b == b1111)
result = armv7_read_simd_instr_vld4_single_4_element_structure_to_all_lanes(raw, arm);
}
}
return result;
}
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.8. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
GArchInstruction *process_armv7_simd_8_16_and_32_bit_transfer_between_arm_core_and_extension_registers(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t a; /* Champ 'a' à retrouver */
uint32_t l; /* Champ 'l' à retrouver */
uint32_t c; /* Champ 'c' à retrouver */
uint32_t b; /* Champ 'b' à retrouver */
/**
* Suit les directives de :
* § A7.8 8, 16, and 32-bit transfer between ARM core and extension registers
*/
if (arm)
{
if ((raw & 0x0f000e10) != 0x0e000a10) return NULL;
}
else
{
if ((raw & 0xef000e10) != 0xee000a10) return NULL;
}
result = NULL;
a = (raw >> 21) & b111;
l = (raw >> 20) & b1;
c = (raw >> 8) & b1;
b = (raw >> 5) & b11;
if (l == b0)
{
if (c == b0)
{
if (a == b000)
result = armv7_read_simd_instr_vmov_between_arm_core_register_and_single_precision_register(raw, arm);
else if (a == b111)
{
result = armv7_read_simd_instr_vmsr(raw, arm);
if (result == NULL /* ! */)
result = armv7_read_simd_instr_vmsr_b9(raw, arm);
}
}
else/* if (c == b1)*/
{
if ((a & b100) == b000)
result = armv7_read_simd_instr_vmov_arm_core_register_to_scalar(raw, arm);
else if (/*(a & b100) == b000) && */(b & b10) == b00)
result = armv7_read_simd_instr_vdup_arm_core_register(raw, arm);
}
}
else/* if (l == b1)*/
{
if (c == b0)
{
if (a == b000)
result = armv7_read_simd_instr_vmov_between_arm_core_register_and_single_precision_register(raw, arm);
else if (a == b111)
{
result = armv7_read_simd_instr_vmrs(raw, arm);
if (result == NULL /* ! */)
result = armv7_read_simd_instr_vmrs_b9(raw, arm);
}
}
else/* if (c == b1)*/
result = armv7_read_simd_instr_vmov_scalar_to_arm_core_register(raw, arm);
}
return result;
}
/******************************************************************************
* *
* Paramètres : raw = donnée brute de 16 bits à désassembler. *
* arm = précise si l'encodage est en mode ARM ou Thumb. *
* *
* Description : Désassemble une instruction ARMv7 liées au chapitre A7.9. *
* *
* Retour : Instruction mise en place ou NULL en cas d'échec. *
* *
* Remarques : - *
* *
******************************************************************************/
GArchInstruction *process_armv7_simd_64_bit_transfers_between_arm_core_and_extension_registers(uint32_t raw, bool arm)
{
GArchInstruction *result; /* Instruction à renvoyer */
uint32_t c; /* Champ 'c' à retrouver */
uint32_t op; /* Champ 'op' à retrouver */
/**
* Suit les directives de :
* § A7.9 64-bit transfers between ARM core and extension registers
*/
if (arm)
{
if ((raw & 0x0fe00e00) != 0x0c400a00) return NULL;
}
else
{
if ((raw & 0xefe00e00) != 0xec400a00) return NULL;
}
result = NULL;
c = (raw >> 8) & b1;
op = (raw >> 4) & b1111;
if (c == b0 && (op & b1101) == 0001)
result = armv7_read_simd_instr_vmov_between_two_arm_core_registers_and_two_single_precision_registers(raw, arm);
else if (c == b1 && (op & b1101) == 0001)
result = armv7_read_simd_instr_vmov_between_two_arm_core_registers_and_a_doubleword_extension_register(raw, arm);
return result;
}