/*
 * (C) Copyright 1996- ECMWF.
 *
 * This software is licensed under the terms of the Apache Licence Version 2.0
 * which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
 * In applying this licence, ECMWF does not waive the privileges and immunities
 * granted to it by virtue of its status as an intergovernmental organisation nor
 * does it submit to any jurisdiction.
 */

#include "eckit/utils/Translator.h"

#include "metkit/MarsRequest.h"

#include "metkit/types/TypesFactory.h"
#include "metkit/types/TypeRange.h"

namespace metkit {

//----------------------------------------------------------------------------------------------------------------------

TypeRange::TypeRange(const std::string &name, const eckit::Value& settings) :
    TypeToByList(name, settings) {
}

TypeRange::~TypeRange() {
}

void TypeRange::print(std::ostream &out) const {
    out << "TypeRange[name=" << name_ << "]";
}

bool TypeRange::expand(std::string &value) const  {

    long p = 0;
    if (ok(value, p)) {
        static eckit::Translator<long, std::string> l2s;
        value = l2s(p);
        return true;
    }

    long a = 0;
    long b = 0;

    long *n = &a;

    for (std::string::const_iterator j = value.begin(); j != value.end(); ++j) {
        switch (*j) {
        case '-':
            if (j != value.begin()) {
                if (n == &b) {
                    return false;
                    // throw eckit::UserError(name_ + ": invalid integer range '" + value + "' (a)");

                }
                n = &b;
            }
            else {
                return false;
                // throw eckit::UserError(name_ + ": invalid integer range '" + value + "' (b)");
            }
            break;

        case '0':
        case '1':
        case '2':
        case '3':
        case '4':
        case '5':
        case '6':
        case '7':
        case '8':
        case '9':
            (*n) *= 10;
            (*n) += (*j) - '0';
            break;


        default:
            return false;
            // throw eckit::UserError(name_ + ": invalid integer range '" + value + "' (c)");
            break;
        }
    }

    if (n == &a) {
        std::ostringstream oss;
        oss << a;

        value = oss.str();
        return true;
    }

    std::ostringstream oss;
    oss << a << "-" << b;

    value = oss.str();
    return true;
}


static TypeBuilder<TypeRange> type("range");

//----------------------------------------------------------------------------------------------------------------------

} // namespace metkit
