D4BaseTypeFactory.cc

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

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

// Copyright (c) 2005 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.

#include "config.h"

#include <string>

#include "BaseType.h"
#include "Type.h"

#include "Byte.h"
#include "Int16.h"
#include "Int32.h"
#include "Int8.h"
#include "UInt16.h"
#include "UInt32.h"

#include "Int64.h"
#include "UInt64.h"

#include "Float32.h"
#include "Float64.h"

#include "D4Enum.h"

#include "Str.h"
#include "Url.h"

#include "D4Opaque.h"

#include "Array.h"

#include "D4Sequence.h"
#include "Structure.h"

#include "D4Group.h"

#include "D4BaseTypeFactory.h"
#include "debug.h"

namespace libdap {

BaseType *D4BaseTypeFactory::NewVariable(Type t, const string &name) const {
    switch (t) {
    case dods_byte_c:
        return NewByte(name);
    case dods_char_c:
        return NewChar(name);
    case dods_uint8_c:
        return NewUInt8(name);
    case dods_int8_c:
        return NewInt8(name);

    case dods_int16_c:
        return NewInt16(name);
    case dods_uint16_c:
        return NewUInt16(name);
    case dods_int32_c:
        return NewInt32(name);
    case dods_uint32_c:
        return NewUInt32(name);

    case dods_int64_c:
        return NewInt64(name);
    case dods_uint64_c:
        return NewUInt64(name);

    case dods_float32_c:
        return NewFloat32(name);
    case dods_float64_c:
        return NewFloat64(name);

    case dods_enum_c:
        return NewEnum(name);

    case dods_str_c:
        return NewStr(name);
    case dods_url_c:
        return NewURL(name);

    case dods_opaque_c:
        return NewOpaque(name);

    case dods_structure_c:
        return NewStructure(name);

    case dods_sequence_c:
        return NewD4Sequence(name);

    case dods_array_c:
        return NewArray(name);

    case dods_group_c:
        return NewGroup(name);

    default:
        throw InternalErr(__FILE__, __LINE__, "Unimplemented type in DAP4");
    }
}

Byte *D4BaseTypeFactory::NewByte(const string &n) const {
    Byte *b = new Byte(n);
    b->set_is_dap4(true);
    return b;
}

// Use the type constants specific to Char and UInt8 so the print reps will
// match the server's idea of the types.
Byte *D4BaseTypeFactory::NewChar(const string &n) const {
    Byte *b = new Byte(n);
    b->set_type(dods_char_c);
    b->set_is_dap4(true);
    return b;
}

Byte *D4BaseTypeFactory::NewUInt8(const string &n) const {
    Byte *b = new Byte(n);
    b->set_type(dods_uint8_c);
    b->set_is_dap4(true);
    return b;
}

Int8 *D4BaseTypeFactory::NewInt8(const string &n) const {
    Int8 *b = new Int8(n);
    b->set_is_dap4(true);
    return b;
}

Int16 *D4BaseTypeFactory::NewInt16(const string &n) const {
    Int16 *b = new Int16(n);
    b->set_is_dap4(true);
    return b;
}

UInt16 *D4BaseTypeFactory::NewUInt16(const string &n) const {
    UInt16 *b = new UInt16(n);
    b->set_is_dap4(true);
    return b;
}

Int32 *D4BaseTypeFactory::NewInt32(const string &n) const {
    DBG(cerr << "Inside DAP4BaseTypeFactory::NewInt32" << endl);
    Int32 *b = new Int32(n);
    b->set_is_dap4(true);
    return b;
}

UInt32 *D4BaseTypeFactory::NewUInt32(const string &n) const {
    UInt32 *b = new UInt32(n);
    b->set_is_dap4(true);
    return b;
}

Int64 *D4BaseTypeFactory::NewInt64(const string &n) const {
    DBG(cerr << "Inside DAP4BaseTypeFactory::NewInt64" << endl);
    Int64 *b = new Int64(n);
    b->set_is_dap4(true);
    return b;
}

UInt64 *D4BaseTypeFactory::NewUInt64(const string &n) const {
    UInt64 *b = new UInt64(n);
    b->set_is_dap4(true);
    return b;
}

Float32 *D4BaseTypeFactory::NewFloat32(const string &n) const {
    Float32 *b = new Float32(n);
    b->set_is_dap4(true);
    return b;
}

Float64 *D4BaseTypeFactory::NewFloat64(const string &n) const {
    Float64 *b = new Float64(n);
    b->set_is_dap4(true);
    return b;
}

/**
 * Enums need a name and the name of an enumeration that was defined by the
 * dataset. If the later is not known, it must be set before the enum is used.
 * @param name
 * @param enum_name
 * @return
 */
D4Enum *D4BaseTypeFactory::NewEnum(const string &name, Type type) const { return new D4Enum(name, type); }

Str *D4BaseTypeFactory::NewStr(const string &n) const {
    Str *b = new Str(n);
    b->set_is_dap4(true);
    return b;
}

Url *D4BaseTypeFactory::NewUrl(const string &n) const {
    Url *b = new Url(n);
    b->set_is_dap4(true);
    return b;
}

D4Opaque *D4BaseTypeFactory::NewOpaque(const string &n) const { return new D4Opaque(n); }

/** Note that this method is called NewURL - URL in caps.
 */
Url *D4BaseTypeFactory::NewURL(const string &n) const {
    Url *b = new Url(n);
    b->set_is_dap4(true);
    return b;
}

Array *D4BaseTypeFactory::NewArray(const string &n, BaseType *v) const { return new Array(n, v, true /* is_dap4 */); }

Structure *D4BaseTypeFactory::NewStructure(const string &n) const {
    Structure *b = new Structure(n);
    b->set_is_dap4(true);
    return b;
}

D4Sequence *D4BaseTypeFactory::NewD4Sequence(const string &n) const { return new D4Sequence(n); }

D4Group *D4BaseTypeFactory::NewGroup(const string &n) const { return new D4Group(n); }

} // namespace libdap