D4RValue.h

// -*- mode: c++; c-basic-offset:4 -*-

// This file is part of libdap, A C++ implementation of the OPeNDAP Data
// Access Protocol.

// Copyright (c) 2014 OPeNDAP, Inc.
// Author: James Gallagher <jgallagher@opendap.org>
//
// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public
// License as published by the Free Software Foundation; either
// version 2.1 of the License, or (at your option) any later version.
//
// This library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
// Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public
// License along with this library; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
//
// You can contact OPeNDAP, Inc. at PO Box 112, Saunderstown, RI. 02874-0112.

#ifndef _D4RValue_h
#define _D4RValue_h

#include <vector>
#include <string>

#include <dods-datatypes.h>
#include <D4Function.h>

namespace libdap
{

class BaseType;
class D4RValue;

// Factory class to build RValue objects. User by the parser/ce-evaluator
D4RValue *D4RValueFactory(std::string cpps);

class D4RValueList
{
private:
    std::vector<D4RValue *> d_rvalues;

    void m_duplicate(const D4RValueList &src);

public:
    typedef std::vector<D4RValue *>::iterator iter;

    D4RValueList() { }
    D4RValueList(const D4RValueList &src) { m_duplicate(src); }
    D4RValueList(D4RValue *rv) { add_rvalue(rv); }

    virtual ~D4RValueList();

    D4RValueList &operator=(const D4RValueList &rhs) {
        if (this == &rhs) return *this;
        m_duplicate(rhs);
        return *this;
    }

    void add_rvalue(D4RValue *rv) {
        d_rvalues.push_back(rv);
    }

    D4RValue *get_rvalue(unsigned int i) {
        return d_rvalues.at(i);
    }

    iter begin() { return d_rvalues.begin(); }
    iter end() { return d_rvalues.end(); }

    unsigned int size() const { return d_rvalues.size(); }

};

class D4RValue
{
public:
    enum value_kind {
        unknown,
        basetype,
        function,
        constant
    };

private:
    BaseType *d_variable;   // This is a weak pointer; do not delete

    D4Function d_func;      // (weak) pointer to a function returning BaseType *
    D4RValueList *d_args;   // pointer to arguments to the function; delete

    BaseType *d_constant;   // pointer; delete.

    value_kind d_value_kind;

    void m_duplicate(const D4RValue &src);

    friend class D4RValueList;

public:
    D4RValue() : d_variable(0), d_func(0), d_args(0), d_constant(0), d_value_kind(unknown) { }
    D4RValue(const D4RValue &src) { m_duplicate(src); }
    D4RValue(BaseType *btp)  : d_variable(btp), d_func(0), d_args(0), d_constant(0), d_value_kind(basetype) { }
    D4RValue(D4Function f, D4RValueList *args)  : d_variable(0), d_func(f), d_args(args), d_constant(0), d_value_kind(function) { }

    D4RValue(unsigned long long ui);
    D4RValue(long long i);
    D4RValue(double r);
    D4RValue(std::string s);
    D4RValue(std::vector<dods_byte> &byte_args);
    D4RValue(std::vector<dods_int8> &byte_int8);
    D4RValue(std::vector<dods_uint16> &byte_uint16);
    D4RValue(std::vector<dods_int16> &byte_int16);
    D4RValue(std::vector<dods_uint32> &byte_uint32);
    D4RValue(std::vector<dods_int32> &byte_int32);
    D4RValue(std::vector<dods_uint64> &byte_uint64);
    D4RValue(std::vector<dods_int64> &byte_int64);
    D4RValue(std::vector<dods_float32> &byte_float32);
    D4RValue(std::vector<dods_float64> &byte_float64);

    virtual ~D4RValue();

    D4RValue &operator=(D4RValue &rhs) {
        if (this == &rhs)
            return *this;

        m_duplicate(rhs);

        return *this;
    }

    value_kind get_kind() const { return d_value_kind; }

    // This is the call that will be used to return the value of a function.
    // jhrg 3/10/14
    virtual BaseType *value(DMR &dmr);
    // And this optimizes value() for filters, where functions are not supported.
    virtual BaseType *value();

};

} // namespace libdap
#endif // _RValue_h