/**
 * \file
 * \copyright
 * Copyright (c) 2012-2021, OpenGeoSys Community (http://www.opengeosys.org)
 *            Distributed under a Modified BSD License.
 *              See accompanying file LICENSE.txt or
 *              http://www.opengeosys.org/project/license
 */

#pragma once

#include <tclap/Arg.h>
#include <tclap/CmdLineInterface.h>
#include <tclap/CmdLineOutput.h>
#include <tclap/StdOutput.h>
#include <tclap/XorHandler.h>

#include <algorithm>
#include <iosfwd>
#include <list>
#include <string>
#include <vector>

namespace BaseLib
{
/**
 * TCLAP standard output modified as follows
 * - Print arguments in the order of added to Command object
 */
class TCLAPCustomOutput : public TCLAP::StdOutput
{
public:
    /**
     * Prints the usage to stdout.  Can be overridden to
     * produce alternative behavior.
     * \param cmd_ - The CmdLine object the output is generated for.
     */
    virtual void usage(TCLAP::CmdLineInterface& cmd_);

    /**
     * Prints (to stderr) an error message, short usage
     * Can be overridden to produce alternative behavior.
     * \param cmd_ - The CmdLine object the output is generated for.
     * \param e - The ArgException that caused the failure.
     */
    virtual void failure(TCLAP::CmdLineInterface& cmd_, TCLAP::ArgException& e);

protected:
    /**
     * Writes a brief usage message with short args.
     * \param cmd_ - The CmdLine object the output is generated for.
     * \param os - The stream to write the message to.
     */
    void shortUsage_(TCLAP::CmdLineInterface& cmd_, std::ostream& os) const;

    /**
     * Writes a longer usage message with long and short args,
     * provides descriptions and prints message.
     * \param cmd_ - The CmdLine object the output is generated for.
     * \param os - The stream to write the message to.
     */
    void longUsage_(TCLAP::CmdLineInterface& cmd_, std::ostream& os) const;
};

inline void TCLAPCustomOutput::usage(TCLAP::CmdLineInterface& cmd_)
{
    std::cout << std::endl << "USAGE: " << std::endl << std::endl;

    shortUsage_(cmd_, std::cout);

    std::cout << std::endl << std::endl << "Where: " << std::endl << std::endl;

    longUsage_(cmd_, std::cout);

    std::cout << std::endl;
}

inline void TCLAPCustomOutput::failure(TCLAP::CmdLineInterface& cmd_,
                                       TCLAP::ArgException& e)
{
    std::string progName = cmd_.getProgramName();

    std::cerr << "PARSE ERROR: " << e.argId() << std::endl
              << "             " << e.error() << std::endl
              << std::endl;

    if (cmd_.hasHelpAndVersion())
    {
        std::cerr << "Brief USAGE: " << std::endl;

        shortUsage_(cmd_, std::cerr);

        std::cerr << std::endl
                  << "For complete USAGE and HELP type: " << std::endl
                  << "   " << progName << " --help" << std::endl
                  << std::endl;
    }
    else
    {
        usage(cmd_);
    }

    throw TCLAP::ExitException(1);
}

inline void TCLAPCustomOutput::shortUsage_(TCLAP::CmdLineInterface& cmd_,
                                           std::ostream& os) const
{
    std::list<TCLAP::Arg*> argList = cmd_.getArgList();
    std::string progName = cmd_.getProgramName();
    TCLAP::XorHandler xorHandler = cmd_.getXorHandler();
    std::vector<std::vector<TCLAP::Arg*>> xorList = xorHandler.getXorList();

    std::string s = progName + " ";

    // first the xor
    for (int i = 0; static_cast<unsigned int>(i) < xorList.size(); i++)
    {
        s += " {";
        for (TCLAP::ArgVectorIterator it = xorList[i].begin();
             it != xorList[i].end();
             it++)
        {
            s += (*it)->shortID() + "|";
        }

        s[s.length() - 1] = '}';
    }

    // then the rest
    for (auto it = argList.rbegin(); it != argList.rend(); ++it)
    {  // here modified
        if (!xorHandler.contains((*it)))
        {
            s += " " + (*it)->shortID();
        }
    }

    // if the program name is too long, then adjust the second line offset
    int secondLineOffset = static_cast<int>(progName.length()) + 2;
    if (secondLineOffset > 75 / 2)
    {
        secondLineOffset = static_cast<int>(75 / 2);
    }

    spacePrint(os, s, 75, 3, secondLineOffset);
}

inline void TCLAPCustomOutput::longUsage_(TCLAP::CmdLineInterface& cmd_,
                                          std::ostream& os) const
{
    std::list<TCLAP::Arg*> argList = cmd_.getArgList();
    std::string message = cmd_.getMessage();
    TCLAP::XorHandler xorHandler = cmd_.getXorHandler();
    std::vector<std::vector<TCLAP::Arg*>> xorList = xorHandler.getXorList();

    // first the xor
    for (int i = 0; static_cast<unsigned int>(i) < xorList.size(); i++)
    {
        for (TCLAP::ArgVectorIterator it = xorList[i].begin();
             it != xorList[i].end();
             it++)
        {
            this->spacePrint(os, (*it)->longID(), 75, 3, 3);
            spacePrint(os, (*it)->getDescription(), 75, 5, 0);

            if (it + 1 != xorList[i].end())
            {
                spacePrint(os, "-- OR --", 75, 9, 0);
            }
        }
        os << std::endl << std::endl;
    }

    // then the rest
    for (auto it = argList.rbegin(); it != argList.rend(); it++)
    {  // here modified
        if (!xorHandler.contains((*it)))
        {
            spacePrint(os, (*it)->longID(), 75, 3, 3);
            spacePrint(os, (*it)->getDescription(), 75, 5, 0);
            os << std::endl;
        }
    }

    os << std::endl;

    spacePrint(os, message, 75, 3, 0);
}

}  // namespace BaseLib