/*
Copyright (c) 2018 tevador

This file is part of RandomX.

RandomX 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.

RandomX 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 RandomX.  If not, see<http://www.gnu.org/licenses/>.
*/

#pragma once

#include <cstdint>
#include <iostream>
#include "blake2/endian.h"

namespace randomx {

	class Instruction;

	typedef void(Instruction::*InstructionFormatter)(std::ostream&) const;

	namespace InstructionType {
		constexpr int IADD_RS = 0;
		constexpr int IADD_M = 1;
		constexpr int IADD_RC = 2;
		constexpr int ISUB_R = 3;
		constexpr int ISUB_M = 4;
		constexpr int IMUL_9C = 5;
		constexpr int IMUL_R = 6;
		constexpr int IMUL_M = 7;
		constexpr int IMULH_R = 8;
		constexpr int IMULH_M = 9;
		constexpr int ISMULH_R = 10;
		constexpr int ISMULH_M = 11;
		constexpr int IMUL_RCP = 12;
		//constexpr int ISDIV_C = 13;
		constexpr int INEG_R = 14;
		constexpr int IXOR_R = 15;
		constexpr int IXOR_M = 16;
		constexpr int IROR_R = 17;
		constexpr int IROL_R = 18;
		constexpr int ISWAP_R = 19;
		constexpr int FSWAP_R = 20;
		constexpr int FADD_R = 21;
		constexpr int FADD_M = 22;
		constexpr int FSUB_R = 23;
		constexpr int FSUB_M = 24;
		constexpr int FSCAL_R = 25;
		constexpr int FMUL_R = 26;
		constexpr int FMUL_M = 27;
		constexpr int FDIV_R = 28;
		constexpr int FDIV_M = 29;
		constexpr int FSQRT_R = 30;
		constexpr int COND_R = 31;
		constexpr int COND_M = 32;
		constexpr int CFROUND = 33;
		constexpr int ISTORE = 34;
		constexpr int FSTORE = 35;
		constexpr int NOP = 36;
	}

	class Instruction {
	public:
		uint32_t getImm32() const {
			return load32(&imm32);
		}
		void setImm32(uint32_t val) {
			return store32(&imm32, val);
		}
		const char* getName() const {
			return names[opcode];
		}
		friend std::ostream& operator<<(std::ostream& os, const Instruction& i) {
			i.print(os);
			return os;
		}
		int getModMem() const {
			return mod % 4;
		}
		int getModCond() const {
			return (mod >> 2) & 7;
		}
		int getModShift3() const {
			return mod >> 5;
		}
		int getModShift2() const {
			return mod >> 6;
		}
		void setMod(uint8_t val) {
			mod = val;
		}

		uint8_t opcode;
		uint8_t dst;
		uint8_t src;
	private:
		uint8_t mod;
		uint32_t imm32;

		void print(std::ostream&) const;
		static const char* names[256];
		static InstructionFormatter engine[256];
		void genAddressReg(std::ostream& os) const;
		void genAddressImm(std::ostream& os) const;
		void genAddressRegDst(std::ostream&) const;
		void  h_IADD_RS(std::ostream&) const;
		void  h_IADD_M(std::ostream&) const;
		void  h_IADD_RC(std::ostream&) const;
		void  h_ISUB_R(std::ostream&) const;
		void  h_ISUB_M(std::ostream&) const;
		void  h_IMUL_9C(std::ostream&) const;
		void  h_IMUL_R(std::ostream&) const;
		void  h_IMUL_M(std::ostream&) const;
		void  h_IMULH_R(std::ostream&) const;
		void  h_IMULH_M(std::ostream&) const;
		void  h_ISMULH_R(std::ostream&) const;
		void  h_ISMULH_M(std::ostream&) const;
		void  h_IMUL_RCP(std::ostream&) const;
		void  h_ISDIV_C(std::ostream&) const;
		void  h_INEG_R(std::ostream&) const;
		void  h_IXOR_R(std::ostream&) const;
		void  h_IXOR_M(std::ostream&) const;
		void  h_IROR_R(std::ostream&) const;
		void  h_IROL_R(std::ostream&) const;
		void  h_ISWAP_R(std::ostream&) const;
		void  h_FSWAP_R(std::ostream&) const;
		void  h_FADD_R(std::ostream&) const;
		void  h_FADD_M(std::ostream&) const;
		void  h_FSUB_R(std::ostream&) const;
		void  h_FSUB_M(std::ostream&) const;
		void  h_FSCAL_R(std::ostream&) const;
		void  h_FMUL_R(std::ostream&) const;
		void  h_FMUL_M(std::ostream&) const;
		void  h_FDIV_R(std::ostream&) const;
		void  h_FDIV_M(std::ostream&) const;
		void  h_FSQRT_R(std::ostream&) const;
		void  h_COND_R(std::ostream&) const;
		void  h_COND_M(std::ostream&) const;
		void  h_CFROUND(std::ostream&) const;
		void  h_ISTORE(std::ostream&) const;
		void  h_FSTORE(std::ostream&) const;
		void  h_NOP(std::ostream&) const;
	};

	static_assert(sizeof(Instruction) == 8, "Invalid size of struct randomx::Instruction");

}