/* 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 <cmath>
#include <string.h>
#include <uv.h>

#if _WIN32
#   include "winsock2.h"
#else
#   include "unistd.h"
#endif


#include "api/ApiState.h"
#include "Cpu.h"
#include "Mem.h"
#include "net/Job.h"
#include "Options.h"
#include "Platform.h"
#include "version.h"
#include "workers/Hashrate.h"


extern "C"
{
#include "crypto/c_keccak.h"
}


static inline double normalize(double d)
{
    if (!std::isnormal(d)) {
        return 0.0;
    }

    return std::floor(d * 10.0) / 10.0;
}


ApiState::ApiState()
{
    m_threads  = Options::i()->threads();
    m_hashrate = new double[m_threads * 3]();

    memset(m_totalHashrate, 0, sizeof(m_totalHashrate));
    memset(m_workerId, 0, sizeof(m_workerId));

    if (Options::i()->apiWorkerId()) {
        strncpy(m_workerId, Options::i()->apiWorkerId(), sizeof(m_workerId) - 1);
    }
    else {
        gethostname(m_workerId, sizeof(m_workerId) - 1);
    }

    genId();
}


ApiState::~ApiState()
{
    delete [] m_hashrate;
}


const char *ApiState::get(const char *url, size_t *size) const
{
    json_t *reply = json_object();

    getIdentify(reply);
    getMiner(reply);
    getHashrate(reply);
    getResults(reply);
    getConnection(reply);

    return finalize(reply, size);
}


void ApiState::tick(const Hashrate *hashrate)
{
    for (int i = 0; i < m_threads; ++i) {
        m_hashrate[i * 3]     = hashrate->calc((size_t) i, Hashrate::ShortInterval);
        m_hashrate[i * 3 + 1] = hashrate->calc((size_t) i, Hashrate::MediumInterval);
        m_hashrate[i * 3 + 2] = hashrate->calc((size_t) i, Hashrate::LargeInterval);
    }

    m_totalHashrate[0] = hashrate->calc(Hashrate::ShortInterval);
    m_totalHashrate[1] = hashrate->calc(Hashrate::MediumInterval);
    m_totalHashrate[2] = hashrate->calc(Hashrate::LargeInterval);
    m_highestHashrate  = hashrate->highest();
}


void ApiState::tick(const NetworkState &network)
{
    m_network = network;
}


const char *ApiState::finalize(json_t *reply, size_t *size) const
{
    *size = json_dumpb(reply, m_buf, sizeof(m_buf) - 1, JSON_INDENT(4) | JSON_REAL_PRECISION(15));

    json_decref(reply);
    return m_buf;
}


void ApiState::genId()
{
    memset(m_id, 0, sizeof(m_id));

    uv_interface_address_t *interfaces;
    int count = 0;

    if (uv_interface_addresses(&interfaces, &count) < 0) {
        return;
    }

    for (int i = 0; i < count; i++) {
        if (!interfaces[i].is_internal && interfaces[i].address.address4.sin_family == AF_INET) {
            uint8_t hash[200];

            keccak(reinterpret_cast<const uint8_t *>(interfaces[i].phys_addr), static_cast<int>(sizeof(interfaces[i].phys_addr)), hash, sizeof(hash));
            Job::toHex(hash, 8, m_id);
            break;
        }
    }

    uv_free_interface_addresses(interfaces, count);
}


void ApiState::getConnection(json_t *reply) const
{
    json_t *connection = json_object();

    json_object_set(reply, "connection", connection);
}


void ApiState::getHashrate(json_t *reply) const
{
    json_t *hashrate = json_object();
    json_t *threads  = json_array();
    json_t *total    = json_array();

    json_object_set(reply,    "hashrate", hashrate);
    json_object_set(hashrate, "total",    total);
    json_object_set(hashrate, "highest",  json_real(normalize(m_highestHashrate)));
    json_object_set(hashrate, "threads",  threads);

    for (int i = 0; i < m_threads * 3; i += 3) {
        json_t *thread  = json_array();
        json_array_append(thread, json_real(normalize(m_hashrate[i])));
        json_array_append(thread, json_real(normalize(m_hashrate[i + 1])));
        json_array_append(thread, json_real(normalize(m_hashrate[i + 2])));

        json_array_append(threads, thread);
    }

    for (int i = 0; i < 3; ++i) {
        json_array_append(total, json_real(normalize(m_totalHashrate[i])));
    }
}


void ApiState::getIdentify(json_t *reply) const
{
    json_object_set(reply, "id",        json_string(m_id));
    json_object_set(reply, "worker_id", json_string(m_workerId));
}


void ApiState::getMiner(json_t *reply) const
{
    json_t *cpu = json_object();
    json_object_set(reply, "version",   json_string(APP_VERSION));
    json_object_set(reply, "kind",      json_string(APP_KIND));
    json_object_set(reply, "ua",        json_string(Platform::userAgent()));
    json_object_set(reply, "cpu",       cpu);
    json_object_set(reply, "algo",      json_string(Options::i()->algoName()));
    json_object_set(reply, "hugepages", json_boolean(Mem::isHugepagesEnabled()));
    json_object_set(reply, "donate",    json_integer(Options::i()->donateLevel()));

    json_object_set(cpu, "brand",       json_string(Cpu::brand()));
    json_object_set(cpu, "aes",         json_boolean(Cpu::hasAES()));
    json_object_set(cpu, "x64",         json_boolean(Cpu::isX64()));
    json_object_set(cpu, "sockets",     json_integer(Cpu::sockets()));
}


void ApiState::getResults(json_t *reply) const
{
    json_t *results = json_object();
    json_t *best    = json_array();

    json_object_set(reply,   "results",      results);
    json_object_set(results, "diff_current", json_integer(m_network.diff));
    json_object_set(results, "shares_good",  json_integer(m_network.accepted));
    json_object_set(results, "shares_total", json_integer(m_network.accepted + m_network.rejected));
    json_object_set(results, "hashes_total", json_integer(m_network.total));
    json_object_set(results, "best",         best);
    json_object_set(results, "error_log",    json_array());

    for (size_t i = 0; i < m_network.topDiff.size(); ++i) {
        json_array_append(best, json_integer(m_network.topDiff[i]));
    }
}