/* OpenIDA - Outil d'analyse de fichiers binaires
 * array.c - décodage de l'opération récupérant la longueur d'un tableau
 *
 * Copyright (C) 2010-2012 Cyrille Bagard
 *
 *  This file is part of OpenIDA.
 *
 *  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 "opcodes.h"


#include "../instruction.h"
#include "../operand.h"



/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                len  = taille totale des données à analyser.                 *
*                addr = adresse virtuelle de l'instruction.                   *
*                proc = architecture ciblée par le désassemblage.             *
*                fmt  = format du fichier contenant le code.                  *
*                                                                             *
*  Description : Décode une instruction de type 'array-length'.               *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_array_length(const bin_t *data, off_t *pos, off_t len, vmpa_t addr, const GDalvikProcessor *proc, const GDexFormat *fmt)
{
    GArchInstruction *result;               /* Instruction à retourner     */
    SourceEndian endian;                    /* Boutisme lié au binaire     */

    result = g_dalvik_instruction_new(DOP_ARRAY_LENGTH);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

    if (!dalvik_read_operands(result, fmt, data, pos, len, endian, DALVIK_OPT_12X))
    {
        g_object_unref(G_OBJECT(result));
        return NULL;
    }

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                len  = taille totale des données à analyser.                 *
*                addr = adresse virtuelle de l'instruction.                   *
*                proc = architecture ciblée par le désassemblage.             *
*                fmt  = format du fichier contenant le code.                  *
*                                                                             *
*  Description : Décode une instruction de type 'fill-array-data'.            *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_fill_array_data(const bin_t *data, off_t *pos, off_t len, vmpa_t addr, const GDalvikProcessor *proc, const GDexFormat *fmt)
{
    GArchInstruction *result;               /* Instruction à retourner     */
    SourceEndian endian;                    /* Boutisme lié au binaire     */

    result = g_dalvik_instruction_new(DOP_FILL_ARRAY_DATA);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

    if (!dalvik_read_operands(result, fmt, data, pos, len, endian, DALVIK_OPT_31T))
    {
        g_object_unref(G_OBJECT(result));
        return NULL;
    }

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                len  = taille totale des données à analyser.                 *
*                addr = adresse virtuelle de l'instruction.                   *
*                proc = architecture ciblée par le désassemblage.             *
*                fmt  = format du fichier contenant le code.                  *
*                                                                             *
*  Description : Décode une instruction de type 'filled-new-array'.           *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_filled_new_array(const bin_t *data, off_t *pos, off_t len, vmpa_t addr, const GDalvikProcessor *proc, const GDexFormat *fmt)
{
    GArchInstruction *result;               /* Instruction à retourner     */
    SourceEndian endian;                    /* Boutisme lié au binaire     */

    result = g_dalvik_instruction_new(DOP_FILLED_NEW_ARRAY);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

    if (!dalvik_read_operands(result, fmt, data, pos, len, endian, DALVIK_OPT_35C | DALVIK_OP_POOL(DPT_TYPE)))
    {
        g_object_unref(G_OBJECT(result));
        return NULL;
    }

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                len  = taille totale des données à analyser.                 *
*                addr = adresse virtuelle de l'instruction.                   *
*                proc = architecture ciblée par le désassemblage.             *
*                fmt  = format du fichier contenant le code.                  *
*                                                                             *
*  Description : Décode une instruction de type 'filled-new-array/range'.     *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_filled_new_array_range(const bin_t *data, off_t *pos, off_t len, vmpa_t addr, const GDalvikProcessor *proc, const GDexFormat *fmt)
{
    GArchInstruction *result;               /* Instruction à retourner     */
    SourceEndian endian;                    /* Boutisme lié au binaire     */

    result = g_dalvik_instruction_new(DOP_FILLED_NEW_ARRAY_RANGE);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

    if (!dalvik_read_operands(result, fmt, data, pos, len, endian, DALVIK_OPT_3RC | DALVIK_OP_POOL(DPT_TYPE)))
    {
        g_object_unref(G_OBJECT(result));
        return NULL;
    }

    return result;

}