#include "App.h"
#include "Logger.h"
#include "Util.h"
#include "SrvMgr.h"
#include "BTC.h"
#include "Servers.h"
#include <QCommandLineParser>
#include <QFile>
#include <QList>
#include <QPair>
#include <cstdlib>
#include <csignal>

App::App(int argc, char *argv[])
    : QCoreApplication (argc, argv)
{
    options.interfaces = {{QHostAddress("0.0.0.0"), Options::DEFAULT_PORT}};
    setApplicationName(APPNAME);
    setApplicationVersion(QString("%1 %2").arg(VERSION).arg(VERSION_EXTRA));

    _logger = new ConsoleLogger(this);

    try {
        parseArgs();
    } catch (const BadArgs &e) {
        options.syslogMode = true; // suppress timestamp stuff
        Error() << e.what();
        std::exit(1);
    }
    if (options.syslogMode) {
        delete _logger;
        _logger = new SysLogger(this);
    }

    connect(this, &App::aboutToQuit, this, &App::cleanup);
    QTimer::singleShot(0, this, &App::startup); // register to run after app event loop start
}

App::~App()
{
    Debug() << "App d'tor";
    Log() << "Shudown complete";
    /// child objects will be auto-deleted
}

void App::startup()
{
    Log() << applicationName() << " " << applicationVersion() << " starting up ...";

    try {
        BTC::CheckBitcoinEndiannessCompiledCorrectly();
        register_MetaTypes();

        auto gotsig = [](int sig) {
            static int ct = 0;
            if (!ct++) {
                Log() << "Got signal: " << sig << ", exiting ...";
                app()->exit(sig);
            } else if (ct < 5) {
                std::printf("Duplicate signal %d already being handled, ignoring\n", sig);
            } else {
                std::printf("Signal %d caught more than 5 times, aborting\n", sig);
                std::abort();
            }
        };
        std::signal(SIGINT, gotsig);
        std::signal(SIGTERM, gotsig);
#ifdef Q_OS_UNIX
        std::signal(SIGQUIT, gotsig);
        std::signal(SIGHUP, SIG_IGN);
#endif
        srvmgr = new SrvMgr(options.interfaces, this);

        srvmgr->startup(); // may throw Exception, waits for servers to bind

        if (!options.statsInterfaces.isEmpty()) {
            Log() << "Stats HTTP: starting " << options.interfaces.count() << " server(s) ...";
            // start 'stats' http servers, if any
            for (const auto & i : options.statsInterfaces)
                start_httpServer(i); // may throw
        }

    } catch (const Exception & e) {
        Error () << "Caught exception: " << e.what();
        this->exit(1);
    }
}

void App::cleanup()
{
    Debug() << __PRETTY_FUNCTION__ ;
    cleanup_RunInThreads();
    if (!httpServers.isEmpty()) {
        Log("Stopping Stats HTTP Servers ...");
        for (auto h : httpServers) { h->stop(); }
        httpServers.clear(); // deletes shared pointers
    }
    if (srvmgr) { Log("Stopping SrvMgr ... "); srvmgr->cleanup(); delete srvmgr; srvmgr = nullptr; }
}

void App::cleanup_RunInThreads()
{
    static const int timeout = 5000;
    QElapsedTimer t0; t0.start();
    Util::RunInThread::setShuttingDown(true);
    int nWorkersRunning = 0;
    if (!Util::RunInThread::waitForAll(timeout, "Waiting for extant worker threads ...", &nWorkersRunning)) {
        Warning("After %d seconds, %d worker(s) were still active. App will likely abort with an error.", qRound(double(t0.elapsed())/1e3), nWorkersRunning);
    } else if (nWorkersRunning) {
        Debug("%d worker(s) successfully waited for (elapsed: %0.3f secs)", nWorkersRunning, t0.elapsed()/1e3);
    }
}


void App::parseArgs()
{
    QCommandLineParser parser;
    parser.setApplicationDescription("A Bitcoin Cash Blockchain SPV Server.");
    parser.addHelpOption();
    parser.addVersionOption();

    parser.addOptions({
        { { "i", "interface" },
          QString("Specify which <interface:port> to listen for connections on, defaults to 0.0.0.0:%1 (all interfaces,"
                  " port %1). This option may be specified more than once to bind to multiple interfaces and/or ports.").arg(Options::DEFAULT_PORT),
          QString("interface:port")
        },
        { { "z", "stats" },
          QString("Specify listen address and port for the stats HTTP server. Format is same as the interface option, "
                  "e.g.: <interface:port>. Default is to not start any starts HTTP servers. "
                  "This option may be specified more than once to bind to multiple interfaces and/or ports."),
          QString("interface:port")
        },
        { { "b", "bitcoind" },
          QString("Specify a <hostname:port> to connect to the bitcoind rpc service. This is a required option, along "
                  "with -u and -p. This hostname:port should be the same as you specified in your bitcoin.conf file "
                  "under rpcbind= and rpcport=."),
          QString("interface:port")
        },
        { { "u", "rpcuser" },
          QString("Specify a username to use for authenticating to bitcoind. This is a required option, along "
                  "with -b and -p.  This opton should be the same username you specified in your bitcoind.conf file "
                  "under rpcuser=."),
          QString("username")
        },
        { { "p", "rpcpassword" },
          QString("Specify a password to use for authenticating to bitcoind. This is a required option, along "
                  "with -b and -u.  This opton should be the same password you specified in your bitcoind.conf file "
                  "under rpcpassword=."),
          QString("password")
        },
        { { "d", "debug" },
          QString("Print extra verbose debug output. This is the default on debug builds. This is the opposite of -q.")

        },
        { { "q", "quiet" },
          QString("Suppress debug output. This is the default on release builds. This is the opposite of -d.")
        },
        { { "S", "syslog" },
          QString("Syslog mode. If on Unix, use the syslog() facility to produce log messages. This option currently has no effect on Windows.")
        },
    });
    parser.process(*this);

    if (parser.isSet("v")) options.verboseDebug = true;
    if (parser.isSet("q")) options.verboseDebug = false;
    if (parser.isSet("S")) options.syslogMode = true;
    // make sure -b -p and -u all present and specified exactly once
    for (const auto & opt : QList<QPair<QString, QString>>({{"b", "bitcoind"},  {"u", "rpcuser"}, {"p", "rpcpassword"}})) {
        const auto & [s, l] = opt;
        if (!parser.isSet(s) || parser.value(s).isEmpty())
            throw BadArgs(QString("Required option missing or empty: -%1 (--%2)").arg(s).arg(l));
        else if (parser.values(s).count() != 1)
            throw BadArgs(QString("Option specified multiple times: -%1 (--%2)").arg(s).arg(l));
    }
    static const auto parseInterface = [](const QString &s) -> Options::Interface {
        auto toks = s.split(":");
        if (toks.length() < 2)
            throw BadArgs("Malformed interface spec. Please pass a address of the form 1.2.3.4:123 for IPv4 or ::1:123 for IPv6.");
        QString portStr = toks.last();
        toks.removeLast();
        QString hostStr = toks.join(":");
        QHostAddress h(hostStr);
        if (h.isNull())
            throw BadArgs(QString("Bad interface address: %1").arg(hostStr));
        bool ok;
        quint16 port = portStr.toUShort(&ok);
        if (!ok || port == 0)
            throw BadArgs(QString("Bad port: %1").arg(portStr));
        return {h, port};
    };
    static const auto parseInterfaces = [](decltype(Options::interfaces) & interfaces, const QStringList & l) {
        // functor parses -i and -z options, puts results in 'interfaces' passed-in reference.
        interfaces.clear();
        for (const auto & s : l)
            interfaces.push_back(parseInterface(s));
    };
    // parse bitcoind
    options.bitcoind = parseInterface(parser.value("b"));
    // grab rpcuser
    options.rpcuser = parser.value("u");
    // grab rpcpass
    options.rpcpassword = parser.value("p");
    // grab bind (listen) interfaces
    if (auto l = parser.values("i"); !l.isEmpty()) {
        parseInterfaces(options.interfaces, l);
    }
    parseInterfaces(options.statsInterfaces, parser.values("z"));
}

void App::start_httpServer(const Options::Interface &iface)
{
    std::shared_ptr<SimpleHttpServer> server(new SimpleHttpServer(iface.first, iface.second, 16384));
    httpServers.push_back(server);
    server->tryStart(); // may throw, waits for server to start
    server->set404Message("Error: Unknown endpoint. /stats is the only valid endpoint I understand.\r\n");
    server->addEndpoint("/stats",[this](SimpleHttpServer::Request &req){
        req.response.contentType = "application/json; charset=utf-8";
        auto stats = srvmgr->statsSafe();
        req.response.data = QString("%1\r\n").arg(Util::Json::toString(stats, false)).toUtf8();
    });
}