/*
 * Copyright (c) 2017 TOYOTA MOTOR CORPORATION
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *      http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */
#include <iostream>
#include <algorithm>
#include "applist.hpp"
#include "../include/hmi-debug.h"

using std::shared_ptr;
using std::string;
using std::unique_ptr;
using std::vector;

namespace wm {


AppList::AppList()
    : req_list(0),
      client_list(0),
      current_seq(1)
{}

AppList::~AppList(){}

void AppList::addClient(const string &appid, const string &role){
    shared_ptr<WMClient> client = std::make_shared<WMClient>(appid, role);
    client_list[appid] = client;
    client_dump();
}

void AppList::removeClient(const string &appid){
    client_list.erase(appid);
}

bool AppList::contains(const string &appid){
    auto result = client_list.find(appid);
    return (client_list.end() != result) ? true : false;
}

/**
 * @brief  get WMClient object. Before call this function, must call "contains"
 * to check the key is contained, otherwise, you have to take care of std::out_of_range.
 * @param string[in] application id(key)
 * @return WMClient object
 */
shared_ptr <WMClient> AppList::lookUpClient(const string &appid)
{
    return client_list.at(appid);
}

int AppList::countClient()
{
    return client_list.size();
}

unsigned AppList::currentSequenceNumber(){
    return current_seq;
}

// Is this function necessary ?
unsigned AppList::getSequenceNumber(const string &appid){
    for(const auto& x : req_list){
        // Since app will not request twice and more, comparing appid is enough?
        if( (x.trigger.appid == appid))
        {
            return x.seq_num;
        }
    }
    return 0;
}

unsigned AppList::addAllocateRequest(WMRequest req){
    if(req_list.size() == 0){
        req.seq_num = current_seq;
    }
    else{
        HMI_SEQ_DEBUG(current_seq, "real: %d", req_list.back().seq_num + 1);
        req.seq_num = req_list.back().seq_num + 1;
    }
    req_list.push_back(req);
    return req.seq_num; // return 1; if you test time_expire
}

bool AppList::requestFinished(){
    return req_list.empty();
}

struct WMTrigger AppList::getRequest(unsigned req_num){
    for(auto& x : req_list){
        if (req_num == x.seq_num)
        {
            return x.trigger;
        }
    }
}

const vector<struct WMAction>& AppList::getActions(unsigned req_num){
    for (auto &x : req_list)
    {
        if (req_num == x.seq_num)
        {
            return x.sync_draw_req;
        }
    }
}

bool AppList::setAction(unsigned req_num, const struct WMAction &action){
    bool result = false;
    for (auto &x : req_list)
    {
        if (req_num != x.seq_num)
        {
            continue;
        }
        x.sync_draw_req.push_back(action);
        result = true;
        break;
    }

    return result;
}

bool AppList::setAction(unsigned req_num, const string &appid, const string &role, const string &area, bool visible){
    bool result = false;
    for (auto& x : req_list)
    {
        if (req_num != x.seq_num)
        {
            continue;
        }
        WMAction action{appid, role, area, visible, false};

        x.sync_draw_req.push_back(action);
        result = true;
        break;
    }
    return result;
}

bool AppList::setEndDrawFinished(unsigned req_num, const string &appid, const string &role){
    bool result = false;
    for (auto& x : req_list)
    {
        if (req_num < x.seq_num)
        {
            break;
        }
        if (req_num == x.seq_num)
        {
            for(auto& y : x.sync_draw_req){
                if (y.appid == appid && y.role == role)
                {
                    y.end_draw_finished = true;
                    result = true;
                }
            }
        }
    }
    req_dump();
    return result;
}

/**
 * @brief  check all actions of the requested sequence is finished
 * @param  unsigned sequence_num
 * @return true if all action is set.
 */
bool AppList::endDrawFullfilled(unsigned req_num){
    bool result = false;
    for (const auto& x : req_list)
    {
        if(req_num < x.seq_num){
            break;
        }
        if(req_num == x.seq_num){
            result = true;
            for(const auto& y : x.sync_draw_req){
                result &= y.end_draw_finished;
                if(!result){
                    break;
                }
            }
        }
    }
    return result;
}

void AppList::removeRequest(unsigned req_seq){
    req_list.erase(remove_if(req_list.begin(), req_list.end(),
        [req_seq](WMRequest x) {
            return x.seq_num == req_seq;
        }));
}

void AppList::next(){
    ++this->current_seq;
    if (0 == this->current_seq)
    {
        this->current_seq = 1;
    }
}

bool AppList::haveRequest(){
    return !req_list.empty();
}

void AppList::client_dump(){
    DUMP("======= client dump =====");
    for(const auto& x : client_list){
        const auto& y = x.second;
        DUMP("APPID : %s", y->appID().c_str());
    }
    DUMP("======= client dump end=====");
}

void AppList::req_dump()
{
    DUMP("======= req dump =====");
    DUMP("current request : %d", current_seq);
    for(const auto& x : req_list){
        DUMP("requested with  : %d", x.seq_num);
        DUMP("Trigger : (APPID :%s, ROLE :%s, AREA :%s, TASK: %d)",
             x.trigger.appid.c_str(),
             x.trigger.role.c_str(),
             x.trigger.area.c_str(),
             x.trigger.task);

        for (const auto& y : x.sync_draw_req){
            DUMP(
                "Action  : (APPID :%s, ROLE :%s, AREA :%s, END_DRAW_FINISHED: %d)",
                y.appid.c_str(),
                y.role.c_str(),
                y.area.c_str(),
                y.end_draw_finished);
        }
    }
    DUMP("======= req dump end =====\n");
}
}