/* $Id$ */ /* Copyright (c) 2018 Pierre Pronchery */ /* This file is part of DeforaOS Devel Asm */ /* This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, version 3 of the License. * * This program 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 Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . */ #include #include #include "Asm.h" /* eth */ /* private */ /* variables */ static AsmArchDefinition const _eth_definition = { "flat", ASM_ARCH_ENDIAN_BIG, 8, 8, 0 }; #define REG(name, size, id, flags, description) \ { "" # name, size, id, flags, description }, static AsmArchRegister const _eth_registers[] = { #include "null.reg" }; #undef REG static AsmArchInstruction const _eth_instructions[] = { #include "eth.ins" #include "common.ins" #include "null.ins" }; typedef struct _AsmArchPlugin { AsmArchPluginHelper * helper; } EthArchPlugin; /* prototypes */ /* plug-in */ static EthArchPlugin * _eth_init(AsmArchPluginHelper * helper); static void _eth_destroy(EthArchPlugin * plugin); static int _eth_decode(EthArchPlugin * plugin, AsmArchInstructionCall * call); static int _eth_encode(EthArchPlugin * plugin, AsmArchPrefix const * prefix, AsmArchInstruction const * instruction, AsmArchInstructionCall const * call); /* protected */ /* variables */ AsmArchPluginDefinition arch_plugin = { "eth", "Ethereum", LICENSE_GNU_LGPL3_FLAGS, &_eth_definition, _eth_registers, NULL, _eth_instructions, _eth_init, _eth_destroy, _eth_encode, _eth_decode }; /* functions */ /* plug-in */ /* eth_init */ static EthArchPlugin * _eth_init(AsmArchPluginHelper * helper) { EthArchPlugin * plugin; if((plugin = object_new(sizeof(*plugin))) == NULL) return NULL; plugin->helper = helper; return plugin; } /* eth_destroy */ static void _eth_destroy(EthArchPlugin * plugin) { object_delete(plugin); } /* eth_decode */ static int _eth_decode(EthArchPlugin * plugin, AsmArchInstructionCall * call) { AsmArchPluginHelper * helper = plugin->helper; uint8_t u8; AsmArchInstruction const * ai; if(helper->read(helper->arch, &u8, sizeof(u8)) != sizeof(u8)) return -1; if((ai = helper->get_instruction_by_opcode(helper->arch, 8, u8)) == NULL) return -1; call->name = ai->name; call->operands[0].definition = ai->op1; call->operands[0].value.immediate.value = u8; call->operands_cnt = 1; return 0; } /* eth_encode */ static int _encode_immediate(AsmArchPlugin * plugin, AsmArchOperand const * operand); static int _encode_immediate8(AsmArchPlugin * plugin, uint8_t value); static int _encode_immediate16(AsmArchPlugin * plugin, uint16_t value); static int _encode_immediate24(AsmArchPlugin * plugin, uint32_t value); static int _encode_immediate32(AsmArchPlugin * plugin, uint32_t value); static int _encode_immediate40(AsmArchPlugin * plugin, uint64_t value); static int _encode_immediate48(AsmArchPlugin * plugin, uint64_t value); static int _encode_immediate56(AsmArchPlugin * plugin, uint64_t value); static int _encode_immediate64(AsmArchPlugin * plugin, uint64_t value); static int _eth_encode(EthArchPlugin * plugin, AsmArchPrefix const * prefix, AsmArchInstruction const * instruction, AsmArchInstructionCall const * call) { AsmArchPluginHelper * helper = plugin->helper; uint8_t opcode; if(prefix != NULL) return -error_set_code(1, "%s: %s", helper->get_filename(helper->arch), "Prefixes not supported for this architecture"); opcode = instruction->opcode; if(helper->write(helper->arch, &opcode, sizeof(opcode)) != sizeof(opcode)) return -1; if(call->operands_cnt >= 1) if(_encode_immediate(plugin, &call->operands[0]) != 0) return -1; return 0; } static int _encode_immediate(AsmArchPlugin * plugin, AsmArchOperand const * operand) { uint64_t value = operand->value.immediate.value; switch(AO_GET_SIZE(operand->definition) >> 3) { case 0: return 0; case sizeof(uint8_t): return _encode_immediate8(plugin, value); case sizeof(uint16_t): return _encode_immediate16(plugin, value); case 3: return _encode_immediate24(plugin, value); case sizeof(uint32_t): return _encode_immediate32(plugin, value); case 5: return _encode_immediate40(plugin, value); case 6: return _encode_immediate48(plugin, value); case 7: return _encode_immediate56(plugin, value); case sizeof(uint64_t): return _encode_immediate64(plugin, value); } return -error_set_code(1, "%s", "Invalid size for immediate value"); } static int _encode_immediate8(AsmArchPlugin * plugin, uint8_t value) { AsmArchPluginHelper * helper = plugin->helper; if(helper->write(helper->arch, &value, sizeof(value)) != sizeof(value)) return -1; return 0; } static int _encode_immediate16(AsmArchPlugin * plugin, uint16_t value) { AsmArchPluginHelper * helper = plugin->helper; value = _htob16(value); if(helper->write(helper->arch, &value, sizeof(value)) != sizeof(value)) return -1; return 0; } static int _encode_immediate24(AsmArchPlugin * plugin, uint32_t value) { AsmArchPluginHelper * helper = plugin->helper; value = _htob32(value) >> 8; if(helper->write(helper->arch, &value, 3) != 3) return -1; return 0; } static int _encode_immediate32(AsmArchPlugin * plugin, uint32_t value) { AsmArchPluginHelper * helper = plugin->helper; value = _htob32(value); if(helper->write(helper->arch, &value, sizeof(value)) != sizeof(value)) return -1; return 0; } static int _encode_immediate40(AsmArchPlugin * plugin, uint64_t value) { AsmArchPluginHelper * helper = plugin->helper; value = _htob64(value) << 24; if(helper->write(helper->arch, &value, 5) != 5) return -1; return 0; } static int _encode_immediate48(AsmArchPlugin * plugin, uint64_t value) { AsmArchPluginHelper * helper = plugin->helper; value = _htob64(value) << 16; if(helper->write(helper->arch, &value, 6) != 6) return -1; return 0; } static int _encode_immediate56(AsmArchPlugin * plugin, uint64_t value) { AsmArchPluginHelper * helper = plugin->helper; value = _htob64(value) << 8; if(helper->write(helper->arch, &value, 7) != 7) return -1; return 0; } static int _encode_immediate64(AsmArchPlugin * plugin, uint64_t value) { AsmArchPluginHelper * helper = plugin->helper; value = _htob64(value); if(helper->write(helper->arch, &value, sizeof(value)) != sizeof(value)) return -1; return 0; }