/* 
 * File:   runSimpleMQStateMachine.h
 * Author: winckler
 *
 * Created on July 2, 2015, 2:07 PM
 */

#ifndef RUNSIMPLEMQSTATEMACHINE_H
#define RUNSIMPLEMQSTATEMACHINE_H

#include "FairMQLogger.h"
#include "FairMQConfigPlugin.h"
#include "FairMQControlPlugin.h"
#include "FairMQParser.h"
#include "FairMQProgOptions.h"

#include <iostream>
#include <string>
#include <chrono>
#include <dlfcn.h>

// template function that takes any device
// and runs a simple MQ state machine configured from a JSON file and/or a plugin.
template<typename TMQDevice>
inline int runStateMachine(TMQDevice& device, FairMQProgOptions& cfg)
{
    if (cfg.GetValue<int>("catch-signals") > 0)
    {
        device.CatchSignals();
    }
    else
    {
        LOG(WARN) << "Signal handling (e.g. ctrl+C) has been deactivated via command line argument";
    }

    device.SetConfig(cfg);
    std::string config = cfg.GetValue<std::string>("config");
    std::string control = cfg.GetValue<std::string>("control");

    // plugin objects
    void* ldConfigHandle = nullptr;
    void* ldControlHandle = nullptr;
    FairMQConfigPlugin* fairmqConfigPlugin = nullptr;
    FairMQControlPlugin* fairmqControlPlugin = nullptr;

    std::clock_t cStart = std::clock();
    auto tStart = std::chrono::high_resolution_clock::now();

    device.ChangeState(TMQDevice::INIT_DEVICE);
    // Wait for the binding channels to bind
    device.WaitForInitialValidation();

    if (config != "static")
    {
        LOG(DEBUG) << "Opening config plugin: " << config;
        ldConfigHandle = dlopen(config.c_str(), RTLD_LAZY);

        if (!ldConfigHandle)
        {
            LOG(ERROR) << "Cannot open library: " << dlerror();
            return 1;
        }

        // load the fairmqConfigPlugin
        dlerror();
        fairmqConfigPlugin = static_cast<FairMQConfigPlugin*>(dlsym(ldConfigHandle, "fairmqConfigPlugin"));
        const char* dlsymError = dlerror();
        if (dlsymError)
        {
            LOG(ERROR) << "Cannot load fairmqConfigPlugin() from: " << dlsymError;
            fairmqConfigPlugin = nullptr;
            dlclose(ldConfigHandle);
            return 1;
        }

        fairmqConfigPlugin->initConfig(device);
    }

    if (control != "interactive" && control != "static")
    {
        LOG(DEBUG) << "Opening control plugin: " << control;
        ldControlHandle = dlopen(control.c_str(), RTLD_LAZY);

        if (!ldControlHandle)
        {
            LOG(ERROR) << "Cannot open library: " << dlerror();
            return 1;
        }

        // load the fairmqControlPlugin
        dlerror();
        fairmqControlPlugin = static_cast<FairMQControlPlugin*>(dlsym(ldControlHandle, "fairmqControlPlugin"));
        const char* dlsymError = dlerror();
        if (dlsymError)
        {
            LOG(ERROR) << "Cannot load fairmqControlPlugin(): " << dlsymError;
            fairmqControlPlugin = nullptr;
            dlclose(ldControlHandle);
            return 1;
        }

        fairmqControlPlugin->initControl(device);
    }

    if (config != "static")
    {
        if (fairmqConfigPlugin)
        {
            fairmqConfigPlugin->handleInitialConfig(device);
        }
    }

    device.WaitForEndOfState(TMQDevice::INIT_DEVICE);

    std::clock_t cEnd = std::clock();
    auto tEnd = std::chrono::high_resolution_clock::now();

    LOG(DEBUG) << "Init time (CPU) : " << std::fixed << std::setprecision(2) << 1000.0 * (cEnd - cStart) / CLOCKS_PER_SEC << " ms";
    LOG(DEBUG) << "Init time (Wall): " << std::chrono::duration<double, std::milli>(tEnd - tStart).count() << " ms";

    device.ChangeState(TMQDevice::INIT_TASK);
    device.WaitForEndOfState(TMQDevice::INIT_TASK);

    device.ChangeState(TMQDevice::RUN);

    if (control == "interactive")
    {
        device.InteractiveStateLoop();
    }
    else if (control == "static")
    {
        device.WaitForEndOfState(TMQDevice::RUN);

        if (!device.CheckCurrentState(TMQDevice::EXITING))
        {
            device.ChangeState(TMQDevice::RESET_TASK);
            device.WaitForEndOfState(TMQDevice::RESET_TASK);

            device.ChangeState(TMQDevice::RESET_DEVICE);
            device.WaitForEndOfState(TMQDevice::RESET_DEVICE);

            device.ChangeState(TMQDevice::END);
        }
    }
    else
    {
        if (fairmqControlPlugin)
        {
            fairmqControlPlugin->handleStateChanges(device);
        }
    }

    if (config != "static")
    {
        if (fairmqConfigPlugin)
        {
            LOG(DEBUG) << "Closing FairMQConfigPlugin...";
            fairmqConfigPlugin->stopConfig();
            dlclose(ldConfigHandle);
        }
    }

    if (control != "interactive" && control != "static")
    {
        if (fairmqControlPlugin)
        {
            LOG(DEBUG) << "Closing FairMQControlPlugin...";
            fairmqControlPlugin->stopControl();
            dlclose(ldControlHandle);
        }
    }

    return 0;
}

#endif /* RUNSIMPLEMQSTATEMACHINE_H */