/* XMRig
 * Copyright 2010      Jeff Garzik <jgarzik@pobox.com>
 * Copyright 2012-2014 pooler      <pooler@litecoinpool.org>
 * Copyright 2014      Lucas Jones <https://github.com/lucasjones>
 * Copyright 2014-2016 Wolf9466    <https://github.com/OhGodAPet>
 * Copyright 2016      Jay D Dee   <jayddee246@gmail.com>
 * Copyright 2016-2017 XMRig       <support@xmrig.com>
 *
 *
 *   This program 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.
 *
 *   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 General Public License for more details.
 *
 *   You should have received a copy of the GNU General Public License
 *   along with this program. If not, see <http://www.gnu.org/licenses/>.
 */


#include <algorithm>
#include <memory.h>

#include "crypto/CryptoNight.h"
#include "Mem.h"

bool Mem::m_useHugePages = true;
size_t Mem::m_hashFactor = 1;
int Mem::m_flags         = 0;
int Mem::m_totalPages = 0;
int Mem::m_totalHugepages = 0;
Options::Algo Mem::m_algo = Options::ALGO_CRYPTONIGHT;
Mem::ThreadBitSet Mem::m_multiHashThreadMask = Mem::ThreadBitSet(-1L);

ScratchPadMem Mem::create(ScratchPad** scratchPads, int threadId)
{
    size_t scratchPadSize;

    switch (m_algo) {
        case Options::ALGO_CRYPTONIGHT_ULTRALITE:
            scratchPadSize = MEMORY_ULTRA_LITE;
            break;
        case Options::ALGO_CRYPTONIGHT_EXTREMELITE:
            scratchPadSize = MEMORY_EXTREME_LITE;
            break;
        case Options::ALGO_CRYPTONIGHT_SUPERLITE:
            scratchPadSize = MEMORY_SUPER_LITE;
            break;
        case Options::ALGO_CRYPTONIGHT_LITE:
            scratchPadSize = MEMORY_LITE;
            break;
        case Options::ALGO_CRYPTONIGHT_HEAVY:
            scratchPadSize = MEMORY_HEAVY;
            break;
        case Options::ALGO_ARGON2_512:
            scratchPadSize = MEMORY_ARGON2_512;
            break;
        case Options::ALGO_CRYPTONIGHT:
        default:
            scratchPadSize = MEMORY;
            break;
    }

    ScratchPadMem scratchPadMem;
    scratchPadMem.realSize = Options::isCNAlgo(m_algo) ? scratchPadSize * getThreadHashFactor(threadId) : scratchPadSize;
    scratchPadMem.size = Options::isCNAlgo(m_algo) ? scratchPadSize * getThreadHashFactor(threadId) : scratchPadSize;
    scratchPadMem.pages = std::max(scratchPadMem.size / MEMORY, static_cast<size_t>(1));

    if (Options::isCNAlgo(m_algo)) {
        allocate(scratchPadMem, m_useHugePages);

        for (size_t i = 0; i < getThreadHashFactor(threadId); ++i) {
            auto *scratchPad = static_cast<ScratchPad *>(_mm_malloc(sizeof(ScratchPad), 4096));
            scratchPad->memory = scratchPadMem.memory + (i * scratchPadSize);

            auto *p = reinterpret_cast<uint8_t *>(allocateExecutableMemory(0x4000));
            scratchPad->generated_code = reinterpret_cast<cn_mainloop_fun_ms_abi>(p);
            scratchPad->generated_code_double = reinterpret_cast<cn_mainloop_double_fun_ms_abi>(p + 0x2000);

            scratchPad->generated_code_data.variant = PowVariant::LAST_ITEM;
            scratchPad->generated_code_data.height = (uint64_t) (-1);
            scratchPad->generated_code_double_data = scratchPad->generated_code_data;

            scratchPads[i] = scratchPad;
        }
    } else {
        scratchPadMem.hugePages = scratchPadMem.pages;
    }

    m_totalPages += scratchPadMem.pages;
    m_totalHugepages += scratchPadMem.hugePages;

    return scratchPadMem;
}

void Mem::release(ScratchPad** scratchPads, ScratchPadMem& scratchPadMem, int threadId)
{
    m_totalPages -= scratchPadMem.pages;
    m_totalHugepages -= scratchPadMem.hugePages;

    if (Options::isCNAlgo(m_algo)) {
        release(scratchPadMem);

        for (size_t i = 0; i < getThreadHashFactor(threadId); ++i) {
            _mm_free(scratchPads[i]);
        }
    }
}