get_ascii.cc

Go to the documentation of this file.

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

// Copyright (c) 2006 OPeNDAP, Inc.
// Author: James Gallagher <jgallagher@opendap.org>
//
// This 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 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.

// This file holds the interface for the 'get data as ascii' function of the
// OPeNDAP/HAO data server. This function is called by the BES when it loads
// this as a module. The functions in the file ascii_val.cc also use this, so
// the same basic processing software can be used both by Hyrax and tie older
// Server3.

#include <stdio.h>

#include <iostream>

using std::cerr ;
using std::endl ;

#include <DataDDS.h>

#include <BESDebug.h>

#include "get_ascii.h"
#include "AsciiOutput.h"
//#include "name_map.h"

#include "AsciiByte.h"
#include "AsciiInt16.h"
#include "AsciiUInt16.h"
#include "AsciiInt32.h"
#include "AsciiUInt32.h"
#include "AsciiFloat32.h"
#include "AsciiFloat64.h"
#include "AsciiStr.h"
#include "AsciiUrl.h"
#include "AsciiArray.h"
#include "AsciiStructure.h"
#include "AsciiSequence.h"
#include "AsciiGrid.h"

namespace dap_asciival {

void
get_data_values_as_ascii(DataDDS *dds, ostream &strm)
{
    BESDEBUG("ascii", "In get_data_values_as_ascii; dataset name = " << dds->get_dataset_name() << endl );
    strm << "Dataset: " << dds->get_dataset_name() << "\n" ;

    DDS::Vars_iter i = dds->var_begin();
    while (i != dds->var_end()) {
        if ((*i)->send_p()) {
            dynamic_cast<AsciiOutput &>(**i).print_ascii(strm);
            strm << "\n";
        }
        ++i;
    }

    BESDEBUG("ascii", "Out get_data_values_as_ascii" << endl );
}

DataDDS *datadds_to_ascii_datadds(DataDDS * dds)
{
    BESDEBUG("ascii", "In datadds_to_ascii_datadds" << endl);
    // Should the following use AsciiOutputFactory instead of the source DDS'
    // factory class? It doesn't matter for the following since the function
    // basetype_to_asciitype() doesn't use the factory. So long as no other
    // code uses the DDS' factory, this is fine. jhrg 9/5/06
    DataDDS *asciidds = new DataDDS(dds->get_factory(),
                                    dds->get_dataset_name(),
                                    dds->get_version(),
                                    dds->get_protocol());

    DDS::Vars_iter i = dds->var_begin();
    while (i != dds->var_end()) {
        BaseType *abt = basetype_to_asciitype(*i);
        asciidds->add_var(abt);
        // add_var makes a copy of the base type passed to it, so delete
        // it here
        delete abt;
        ++i;
    }

    // Calling tag_nested_sequences() makes it easier to figure out if a
    // sequence has parent or child sequences or if it is a 'flat' sequence.
    asciidds->tag_nested_sequences();

    return asciidds;
}


BaseType *
basetype_to_asciitype( BaseType *bt )
{
    switch( bt->type() )
    {
        case dods_byte_c:
                return new AsciiByte( dynamic_cast<Byte *>(bt) ) ;

        case dods_int16_c:
                return new AsciiInt16( dynamic_cast<Int16 *>(bt) ) ;

        case dods_uint16_c:
                return new AsciiUInt16( dynamic_cast<UInt16 *>(bt) ) ;

        case dods_int32_c:
                return new AsciiInt32( dynamic_cast<Int32 *>(bt) ) ;

        case dods_uint32_c:
                return new AsciiUInt32( dynamic_cast<UInt32 *>(bt) ) ;

        case dods_float32_c:
                return new AsciiFloat32( dynamic_cast<Float32 *>(bt) ) ;

        case dods_float64_c:
                return new AsciiFloat64( dynamic_cast<Float64 *>(bt) ) ;

        case dods_str_c:
                return new AsciiStr( dynamic_cast<Str *>(bt) ) ;

        case dods_url_c:
                return new AsciiUrl( dynamic_cast<Url *>(bt) ) ;

        case dods_array_c:
                return new AsciiArray( dynamic_cast<Array *>(bt) ) ;

        case dods_structure_c:
                return new AsciiStructure( dynamic_cast<Structure *>(bt) ) ;

        case dods_sequence_c:
                return new AsciiSequence( dynamic_cast<Sequence *>(bt) ) ;

        case dods_grid_c:
            return new AsciiGrid( dynamic_cast<Grid *>(bt) ) ;

    default:
        throw InternalErr(__FILE__, __LINE__, "Unknown type");
    }
}

} // namespace dap_asciival