diff options
author | Cyrille Bagard <nocbos@gmail.com> | 2014-11-24 06:49:23 (GMT) |
---|---|---|
committer | Cyrille Bagard <nocbos@gmail.com> | 2014-11-24 06:49:23 (GMT) |
commit | 96eee784837e6ed4cf9ce5f1cb2e0f8bff8bd9bf (patch) | |
tree | c7fd1108066e6359766bc18f8883b67b2b7f082f /src/arch/arm/v7/pseudo.c | |
parent | 2d833afa673b63a1a61e22ea2cdde59ed60b5ad1 (diff) |
Update the list of handled ARM instructions
git-svn-id: svn://svn.gna.org/svn/chrysalide/trunk@423 abbe820e-26c8-41b2-8c08-b7b2b41f8b0a
Diffstat (limited to 'src/arch/arm/v7/pseudo.c')
-rw-r--r-- | src/arch/arm/v7/pseudo.c | 464 |
1 files changed, 464 insertions, 0 deletions
diff --git a/src/arch/arm/v7/pseudo.c b/src/arch/arm/v7/pseudo.c new file mode 100644 index 0000000..4736309 --- /dev/null +++ b/src/arch/arm/v7/pseudo.c @@ -0,0 +1,464 @@ + +/* Chrysalide - Outil d'analyse de fichiers binaires + * pseudo.c - implémentation des pseudo-fonctions de spécification + * + * Copyright (C) 2014 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 <http://www.gnu.org/licenses/>. + */ + + +#include "pseudo.h" + + +#include <assert.h> +#include <libio.h> + + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* shift = nombre de décallages visés. * +* carry = retenue enventuelle à constituer. [OUT] * +* * +* Description : Traduit la fonction 'LSL_C'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_lsl_c(uint32_t x, unsigned int n, unsigned int shift, bool *carry) +{ + assert(n <= 32); + assert(shift > 0); + + if (carry != NULL) + *carry = x & (1 << (n - 1)); + + return x << shift; + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* shift = nombre de décallages visés. * +* * +* Description : Traduit la fonction 'LSL'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_lsl(uint32_t x, unsigned int n, unsigned int shift) +{ + uint32_t result; /* Valeur finale à retourner */ + + if (shift == 0) + result = x; + + else + result = armv7_lsl_c(x, n, shift, NULL); + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* shift = nombre de décallages visés. * +* carry = retenue enventuelle à constituer. [OUT] * +* * +* Description : Traduit la fonction 'LSR_C'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_lsr_c(uint32_t x, unsigned int n, unsigned int shift, bool *carry) +{ + assert(n <= 32); + assert(shift > 0); + + if (carry != NULL) + *carry = x & (1 << (shift - 1)); + + return x >> shift; + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* shift = nombre de décallages visés. * +* * +* Description : Traduit la fonction 'LSR'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_lsr(uint32_t x, unsigned int n, unsigned int shift) +{ + uint32_t result; /* Valeur finale à retourner */ + + if (shift == 0) + result = x; + + else + result = armv7_lsr_c(x, n, shift, NULL); + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* shift = nombre de décallages visés. * +* carry = retenue enventuelle à constituer. [OUT] * +* * +* Description : Traduit la fonction 'ASR_C'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_asr_c(uint32_t x, unsigned int n, unsigned int shift, bool *carry) +{ + assert(n <= 32); + assert(shift > 0); + + if (carry != NULL) + *carry = x & (1 << (shift - 1)); + + return ((int32_t)x) >> shift; + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* shift = nombre de décallages visés. * +* * +* Description : Traduit la fonction 'ASR'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_asr(uint32_t x, unsigned int n, unsigned int shift) +{ + uint32_t result; /* Valeur finale à retourner */ + + if (shift == 0) + result = x; + + else + result = armv7_asr_c(x, n, shift, NULL); + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* shift = nombre de décallages visés. * +* carry = retenue enventuelle à constituer. [OUT] * +* * +* Description : Traduit la fonction 'ROR_C'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_ror_c(uint32_t x, unsigned int n, unsigned int shift, bool *carry) +{ + uint32_t result; /* Valeur finale à retourner */ + + assert(n <= 32); + assert(shift > 0); + + result = (x >> shift) | (x << (32 - shift)); + + if (carry != NULL) + *carry = result & (1 << (n - 1)); + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* shift = nombre de décallages visés. * +* * +* Description : Traduit la fonction 'ROR'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_ror(uint32_t x, unsigned int n, unsigned int shift) +{ + uint32_t result; /* Valeur finale à retourner */ + + if (shift == 0) + result = x; + + else + result = armv7_ror_c(x, n, shift, NULL); + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* carry = retenue enventuelle à utiliser puis constituer. [OUT]* +* * +* Description : Traduit la fonction 'RRX_C'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_rrx_c(uint32_t x, unsigned int n, bool *carry) +{ + uint32_t result; /* Valeur finale à retourner */ + bool new_c; /* Nouvelle retenue à retenir */ + + assert(carry != NULL); + + new_c = x & 0x1; + + result = (*carry ? 1 : 0) << (n - 1) | x >> 1; + + *carry = new_c; + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* carry = retenue enventuelle à utiliser. * +* * +* Description : Traduit la fonction 'RRX'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_rrx(uint32_t x, unsigned int n, bool carry) +{ + return armv7_rrx_c(x, n, &carry); + +} + + +/****************************************************************************** +* * +* Paramètres : imm12 = valeur sur 32 bits maximum à traiter. * +* carry = retenue enventuelle à utiliser / constituer. [OUT] * +* * +* Description : Traduit la fonction 'ARMExpandImm_C'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_arm_expand_imm_c(uint32_t imm12, bool *carry) +{ + uint32_t result; /* Valeur finale à retourner */ + uint32_t unrotated; /* Transformation à décaller */ + + /** + * Selon les spécifications, x contient toujours 12 bits utiles seulement. + */ + + unrotated = armv7_zero_extend(imm12 & 0xff, 8, 32); + + result = armv7_shift(unrotated, 32, SRType_ROR, 2 * ((imm12 >> 8) & 0xf), carry); + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : imm12 = valeur sur 32 bits maximum à traiter. * +* carry = retenue enventuelle à utiliser / constituer. [OUT] * +* * +* Description : Traduit la fonction 'ARMExpandImm'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_arm_expand_imm(uint32_t imm12) +{ + return armv7_arm_expand_imm_c(imm12, (bool []) { false /* FIXME : APSR.C */ }); + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* type = type d'opération à mener. * +* amount = quantité liée à l'opération à mener. * +* carry = retenue enventuelle à utiliser / constituer. [OUT] * +* * +* Description : Traduit la fonction 'Shift_C'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_shift_c(uint32_t x, unsigned int n, SRType type, unsigned int amount, bool *carry) +{ + uint32_t result; /* Valeur finale à retourner */ + + assert(!(type == SRType_RRX && amount != 1)); + + if (amount == 0) return x; + + result = 0; /* Pour GCC... */ + + switch (type) + { + case SRType_LSL: + result = armv7_lsl_c(x, n, amount, carry); + break; + + case SRType_LSR: + result = armv7_lsr_c(x, n, amount, carry); + break; + + case SRType_ASR: + result = armv7_asr_c(x, n, amount, carry); + break; + + case SRType_ROR: + result = armv7_ror_c(x, n, amount, carry); + break; + + case SRType_RRX: + result = armv7_rrx_c(x, n, carry); + break; + + } + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* type = type d'opération à mener. * +* amount = quantité liée à l'opération à mener. * +* carry = retenue enventuelle à utiliser. * +* * +* Description : Traduit la fonction 'Shift'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_shift(uint32_t x, unsigned int n, SRType type, unsigned int amount, bool carry) +{ + return armv7_shift_c(x, n, type, amount, &carry); + +} + + +/****************************************************************************** +* * +* Paramètres : x = valeur sur 32 bits maximum à traiter. * +* n = nombre de bits à prendre en compte. * +* i = taille finale à obtenir. * +* * +* Description : Traduit la fonction 'ZeroExtend'. * +* * +* Retour : Nouvelle valeur calculée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +uint32_t armv7_zero_extend(uint32_t x, unsigned int n, unsigned int i) +{ + return x; + +} |