/* Chrysalide - Outil d'analyse de fichiers binaires
 * move.c - décodage des opérations de déplacement
 *
 * Copyright (C) 2010-2012 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 "opcodes.h"


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



/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move'.                       *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move(const bin_t *data, off_t *pos, off_t end, 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_MOVE);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move-exception'.             *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_exception(const bin_t *data, off_t *pos, off_t end, 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_MOVE_EXCEPTION);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move/16'.                    *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_16(const bin_t *data, off_t *pos, off_t end, 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_MOVE_16);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move/from16'.                *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_from_16(const bin_t *data, off_t *pos, off_t end, 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_MOVE_FROM_16);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move-object'.                *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_object(const bin_t *data, off_t *pos, off_t end, 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_MOVE_OBJECT);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move-object/16'.             *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_object_16(const bin_t *data, off_t *pos, off_t end, 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_MOVE_OBJECT_16);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move-object/from16'.         *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_object_from_16(const bin_t *data, off_t *pos, off_t end, 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_MOVE_OBJECT_FROM_16);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move-result'.                *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_result(const bin_t *data, off_t *pos, off_t end, 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_MOVE_RESULT);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move-result-object'.         *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_result_object(const bin_t *data, off_t *pos, off_t end, 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_MOVE_RESULT_OBJECT);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move-result-wide'.           *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_result_wide(const bin_t *data, off_t *pos, off_t end, 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_MOVE_RESULT_WIDE);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move-wide'.                  *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_wide(const bin_t *data, off_t *pos, off_t end, 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_MOVE_WIDE);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move-wide/16'.               *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_wide_16(const bin_t *data, off_t *pos, off_t end, 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_MOVE_WIDE_16);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : data = flux de données à analyser.                           *
*                pos  = position courante dans ce flux. [OUT]                 *
*                end  = limite 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 'move-wide/from16'.           *
*                                                                             *
*  Retour      : Instruction mise en place ou NULL.                           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GArchInstruction *dalvik_read_instr_move_wide_from_16(const bin_t *data, off_t *pos, off_t end, 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_MOVE_WIDE_FROM_16);

    endian = g_arch_processor_get_endianness(G_ARCH_PROCESSOR(proc));

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

    dalvik_mark_first_operand_as_written(result);

    return result;

}