Blame XDRStreamUnMarshaller.cc

Packit a4aae4
// XDRStreamUnMarshaller.cc
Packit a4aae4
Packit a4aae4
// -*- mode: c++; c-basic-offset:4 -*-
Packit a4aae4
Packit a4aae4
// This file is part of libdap, A C++ implementation of the OPeNDAP Data
Packit a4aae4
// Access Protocol.
Packit a4aae4
Packit a4aae4
// Copyright (c) 2002,2003 OPeNDAP, Inc.
Packit a4aae4
// Author: Patrick West <pwest@ucar.edu>
Packit a4aae4
//
Packit a4aae4
// This library is free software; you can redistribute it and/or
Packit a4aae4
// modify it under the terms of the GNU Lesser General Public
Packit a4aae4
// License as published by the Free Software Foundation; either
Packit a4aae4
// version 2.1 of the License, or (at your option) any later version.
Packit a4aae4
//
Packit a4aae4
// This library is distributed in the hope that it will be useful,
Packit a4aae4
// but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit a4aae4
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit a4aae4
// Lesser General Public License for more details.
Packit a4aae4
//
Packit a4aae4
// You should have received a copy of the GNU Lesser General Public
Packit a4aae4
// License along with this library; if not, write to the Free Software
Packit a4aae4
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
Packit a4aae4
//
Packit a4aae4
// You can contact OPeNDAP, Inc. at PO Box 112, Saunderstown, RI. 02874-0112.
Packit a4aae4
Packit a4aae4
// (c) COPYRIGHT URI/MIT 1994-1999
Packit a4aae4
// Please read the full copyright statement in the file COPYRIGHT_URI.
Packit a4aae4
//
Packit a4aae4
// Authors:
Packit a4aae4
//      pwest       Patrick West <pwest@ucar.edu>
Packit a4aae4
#include "config.h"
Packit a4aae4
#include "XDRStreamUnMarshaller.h"
Packit a4aae4
Packit a4aae4
#include <cstring> // for memcpy
Packit a4aae4
#include <string>
Packit a4aae4
#include <sstream>
Packit a4aae4
Packit a4aae4
//#define DODS_DEBUG2 1
Packit a4aae4
//#define DODS_DEBUG 1
Packit a4aae4
Packit a4aae4
#include "Str.h"
Packit a4aae4
// #include "Vector.h"
Packit a4aae4
#include "Array.h"
Packit a4aae4
#include "util.h"
Packit a4aae4
#include "InternalErr.h"
Packit a4aae4
#include "debug.h"
Packit a4aae4
Packit a4aae4
namespace libdap {
Packit a4aae4
Packit a4aae4
char *XDRStreamUnMarshaller::d_buf = 0;
Packit a4aae4
Packit a4aae4
XDRStreamUnMarshaller::XDRStreamUnMarshaller(istream &in) : /*&d_source( 0 ),*/
Packit a4aae4
        d_in(in)
Packit a4aae4
{
Packit a4aae4
    if (!d_buf)
Packit a4aae4
        d_buf = (char *) malloc(XDR_DAP_BUFF_SIZE);
Packit a4aae4
    if (!d_buf)
Packit a4aae4
        throw Error(internal_error, "Failed to allocate memory for data serialization.");
Packit a4aae4
Packit a4aae4
    //&d_source = new XDR;
Packit a4aae4
    xdrmem_create(&d_source, d_buf, XDR_DAP_BUFF_SIZE, XDR_DECODE);
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
XDRStreamUnMarshaller::XDRStreamUnMarshaller() :
Packit a4aae4
        UnMarshaller(), /*&d_source( 0 ),*/d_in(cin)
Packit a4aae4
{
Packit a4aae4
    throw InternalErr(__FILE__, __LINE__, "Default constructor not implemented.");
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
XDRStreamUnMarshaller::XDRStreamUnMarshaller(const XDRStreamUnMarshaller &um) :
Packit a4aae4
        UnMarshaller(um), /*&d_source( 0 ),*/d_in(cin)
Packit a4aae4
{
Packit a4aae4
    throw InternalErr(__FILE__, __LINE__, "Copy constructor not implemented.");
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
XDRStreamUnMarshaller &
Packit a4aae4
XDRStreamUnMarshaller::operator=(const XDRStreamUnMarshaller &)
Packit a4aae4
{
Packit a4aae4
    throw InternalErr(__FILE__, __LINE__, "Copy operator not implemented.");
Packit a4aae4
Packit a4aae4
    return *this;
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
XDRStreamUnMarshaller::~XDRStreamUnMarshaller()
Packit a4aae4
{
Packit a4aae4
    xdr_destroy( &d_source );
Packit a4aae4
    //&d_source = 0;
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_byte(dods_byte &val)
Packit a4aae4
{
Packit a4aae4
    if (xdr_setpos( &d_source, 0 ) < 0)
Packit a4aae4
        throw Error("Failed to reposition input stream");
Packit a4aae4
    if (!(d_in.read(d_buf, 4))) {
Packit a4aae4
        if (d_in.eof())
Packit a4aae4
            throw Error("Premature EOF in input stream");
Packit a4aae4
        else {
Packit a4aae4
            ostringstream ss("Error reading from input stream: ");
Packit a4aae4
            ss << d_in.rdstate();
Packit a4aae4
            throw Error(ss.str());
Packit a4aae4
        }
Packit a4aae4
    }
Packit a4aae4
Packit a4aae4
    DBG2( std::cerr << "_in.gcount(): " << d_in.gcount() << std::endl );
Packit a4aae4
    DBG2( std::cerr << "_in.tellg(): " << d_in.tellg() << std::endl );
Packit a4aae4
    DBG2( std::cerr << "_buf[0]: " << hex << d_buf[0] << "; _buf[1]: " << d_buf[1]
Packit a4aae4
            << "; _buf[2]: " << d_buf[2] << "; _buf[3]: " << d_buf[3]
Packit a4aae4
            << dec << std::endl );
Packit a4aae4
Packit a4aae4
    if (!xdr_char(&d_source, (char *) &val))
Packit a4aae4
        throw Error("Network I/O Error. Could not read byte data.");
Packit a4aae4
Packit a4aae4
    DBG2(std::cerr << "get_byte: " << val << std::endl );
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_int16(dods_int16 &val)
Packit a4aae4
{
Packit a4aae4
    xdr_setpos( &d_source, 0);
Packit a4aae4
    d_in.read(d_buf, 4);
Packit a4aae4
Packit a4aae4
    if (!XDR_INT16(&d_source, &val))
Packit a4aae4
        throw Error("Network I/O Error. Could not read int 16 data.");
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_int32(dods_int32 &val)
Packit a4aae4
{
Packit a4aae4
    xdr_setpos( &d_source, 0);
Packit a4aae4
    d_in.read(d_buf, 4);
Packit a4aae4
Packit a4aae4
    if (!XDR_INT32(&d_source, &val))
Packit a4aae4
        throw Error("Network I/O Error. Could not read int 32 data.");
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_float32(dods_float32 &val)
Packit a4aae4
{
Packit a4aae4
    xdr_setpos( &d_source, 0);
Packit a4aae4
    d_in.read(d_buf, 4);
Packit a4aae4
Packit a4aae4
    if (!xdr_float(&d_source, &val))
Packit a4aae4
        throw Error("Network I/O Error. Could not read float 32 data.");
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_float64(dods_float64 &val)
Packit a4aae4
{
Packit a4aae4
    xdr_setpos( &d_source, 0);
Packit a4aae4
    d_in.read(d_buf, 8);
Packit a4aae4
Packit a4aae4
    if (!xdr_double(&d_source, &val))
Packit a4aae4
        throw Error("Network I/O Error. Could not read float 64 data.");
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_uint16(dods_uint16 &val)
Packit a4aae4
{
Packit a4aae4
    xdr_setpos( &d_source, 0);
Packit a4aae4
    d_in.read(d_buf, 4);
Packit a4aae4
Packit a4aae4
    if (!XDR_UINT16(&d_source, &val))
Packit a4aae4
        throw Error("Network I/O Error. Could not read uint 16 data.");
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_uint32(dods_uint32 &val)
Packit a4aae4
{
Packit a4aae4
    xdr_setpos( &d_source, 0);
Packit a4aae4
    d_in.read(d_buf, 4);
Packit a4aae4
Packit a4aae4
    if (!XDR_UINT32(&d_source, &val))
Packit a4aae4
        throw Error("Network I/O Error. Could not read uint 32 data.");
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_str(string &val)
Packit a4aae4
{
Packit a4aae4
    int i;
Packit a4aae4
    get_int(i);
Packit a4aae4
    DBG(std::cerr << "i: " << i << std::endl);
Packit a4aae4
Packit a4aae4
    // Must round up string size to next 4
Packit a4aae4
    i = ((i + 3) / 4) * 4;
Packit a4aae4
    DBG(std::cerr << "i: " << i << std::endl);
Packit a4aae4
Packit a4aae4
    char *in_tmp = 0;
Packit a4aae4
    //char *buf = 0;
Packit a4aae4
    //XDR *source = 0;
Packit a4aae4
    // Must address the case where the string is larger than the buffer
Packit a4aae4
    if (i + 4 > XDR_DAP_BUFF_SIZE) {
Packit a4aae4
#if 0
Packit a4aae4
        char *buf = (char *) malloc(i + 4);
Packit a4aae4
        if (!buf)
Packit a4aae4
            throw InternalErr(__FILE__, __LINE__, "Error allocating memory");
Packit a4aae4
#endif
Packit a4aae4
        vector<char> buf(i+4);
Packit a4aae4
Packit a4aae4
        XDR source;// = new XDR;
Packit a4aae4
        xdrmem_create(&source, &buf[0], i + 4, XDR_DECODE);
Packit a4aae4
        memcpy(&buf[0], d_buf, 4);
Packit a4aae4
Packit a4aae4
        d_in.read(&buf[0] + 4, i);
Packit a4aae4
Packit a4aae4
        xdr_setpos( &source, 0);
Packit a4aae4
        if (!xdr_string( &source, &in_tmp, max_str_len)) {
Packit a4aae4
            xdr_destroy( &source );
Packit a4aae4
            throw Error("Network I/O Error. Could not read string data.");
Packit a4aae4
        }
Packit a4aae4
Packit a4aae4
        xdr_destroy( &source );
Packit a4aae4
    }
Packit a4aae4
    else {
Packit a4aae4
        d_in.read(d_buf + 4, i);
Packit a4aae4
Packit a4aae4
        xdr_setpos( &d_source, 0);
Packit a4aae4
        if (!xdr_string(&d_source, &in_tmp, max_str_len))
Packit a4aae4
            throw Error("Network I/O Error. Could not read string data.");
Packit a4aae4
    }
Packit a4aae4
Packit a4aae4
    val = in_tmp;
Packit a4aae4
Packit a4aae4
    free(in_tmp);
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_url(string &val)
Packit a4aae4
{
Packit a4aae4
    get_str(val);
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_opaque(char *val, unsigned int len)
Packit a4aae4
{
Packit a4aae4
    xdr_setpos( &d_source, 0);
Packit a4aae4
Packit a4aae4
    // Round len up to the next multiple of 4. There is also the RNDUP()
Packit a4aae4
    // macro in xdr.h, at least on OS/X.
Packit a4aae4
    len += len & 3;
Packit a4aae4
    if (static_cast<int>(len) > XDR_DAP_BUFF_SIZE)
Packit a4aae4
        throw Error("Network I/O Error. Length of opaque data larger than allowed");
Packit a4aae4
Packit a4aae4
    d_in.read(d_buf, len);
Packit a4aae4
Packit a4aae4
    xdr_opaque(&d_source, val, len);
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_int(int &val)
Packit a4aae4
{
Packit a4aae4
    xdr_setpos( &d_source, 0);
Packit a4aae4
    d_in.read(d_buf, 4);
Packit a4aae4
Packit a4aae4
    if (!xdr_int(&d_source, &val))
Packit a4aae4
        throw Error("Network I/O Error(1).");
Packit a4aae4
Packit a4aae4
    DBG(std::cerr << "get_int: " << val << std::endl);
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_vector(char **val, unsigned int &num, Vector &)
Packit a4aae4
{
Packit a4aae4
    int i;
Packit a4aae4
    get_int(i); // This leaves the XDR encoded value in d_buf; used later
Packit a4aae4
    DBG(std::cerr << "i: " << i << std::endl);
Packit a4aae4
Packit a4aae4
    // Must round up string size to next 4
Packit a4aae4
    i += i & 3;
Packit a4aae4
    DBG(std::cerr << "i: " << i << std::endl);
Packit a4aae4
Packit a4aae4
    //char *buf = 0;
Packit a4aae4
    //XDR *source = 0;
Packit a4aae4
    // Must address the case where the string is larger than the buffer
Packit a4aae4
    if (i + 4 > XDR_DAP_BUFF_SIZE) {
Packit a4aae4
    	vector<char> buf(i+4);
Packit a4aae4
        XDR source;
Packit a4aae4
        xdrmem_create(&source, &buf[0], i + 4, XDR_DECODE);
Packit a4aae4
        memcpy(&buf[0], d_buf, 4);
Packit a4aae4
Packit a4aae4
        d_in.read(&buf[0] + 4, i);
Packit a4aae4
        DBG2(cerr << "bytes read: " << d_in.gcount() << endl);
Packit a4aae4
Packit a4aae4
        xdr_setpos(&source, 0);
Packit a4aae4
        if (!xdr_bytes(&d_source, val, &num, DODS_MAX_ARRAY)) {
Packit a4aae4
            xdr_destroy(&source);
Packit a4aae4
            throw Error("Network I/O Error. Could not read byte array data.");
Packit a4aae4
        }
Packit a4aae4
Packit a4aae4
        xdr_destroy( &source );
Packit a4aae4
    }
Packit a4aae4
    else {
Packit a4aae4
        d_in.read(d_buf + 4, i);
Packit a4aae4
        DBG2(cerr << "bytes read: " << d_in.gcount() << endl);
Packit a4aae4
Packit a4aae4
        xdr_setpos(&d_source, 0);
Packit a4aae4
        if (!xdr_bytes(&d_source, val, &num, DODS_MAX_ARRAY))
Packit a4aae4
            throw Error("Network I/O Error. Could not read byte array data.");
Packit a4aae4
    }
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_vector(char **val, unsigned int &num, int width, Vector &vec)
Packit a4aae4
{
Packit a4aae4
    get_vector(val, num, width, vec.var()->type());
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::get_vector(char **val, unsigned int &num, int width, Type type)
Packit a4aae4
{
Packit a4aae4
    int i;
Packit a4aae4
    get_int(i); // This leaves the XDR encoded value in d_buf; used later
Packit a4aae4
    DBG(std::cerr << "i: " << i << std::endl);
Packit a4aae4
Packit a4aae4
    width += width & 3;
Packit a4aae4
    DBG(std::cerr << "width: " << width << std::endl);
Packit a4aae4
Packit a4aae4
    int size = i * width; // + 4; // '+ 4' to hold the int already read
Packit a4aae4
Packit a4aae4
    // Must address the case where the string is larger than the buffer
Packit a4aae4
    if (size > XDR_DAP_BUFF_SIZE) {
Packit a4aae4
    	vector<char> buf(size+4);
Packit a4aae4
        XDR source;
Packit a4aae4
        xdrmem_create(&source, &buf[0], size + 4, XDR_DECODE);
Packit a4aae4
        DBG(cerr << "size: " << size << endl);
Packit a4aae4
        memcpy(&buf[0], d_buf, 4);
Packit a4aae4
Packit a4aae4
        d_in.read(&buf[0] + 4, size); // +4 for the int already read
Packit a4aae4
        DBG(cerr << "bytes read: " << d_in.gcount() << endl);
Packit a4aae4
Packit a4aae4
        xdr_setpos(&source, 0);
Packit a4aae4
        if (!xdr_array(&source, val, &num, DODS_MAX_ARRAY, width, XDRUtils::xdr_coder(type))) {
Packit a4aae4
            xdr_destroy( &source );
Packit a4aae4
            throw Error("Network I/O Error. Could not read array data.");
Packit a4aae4
        }
Packit a4aae4
Packit a4aae4
        xdr_destroy( &source );
Packit a4aae4
    }
Packit a4aae4
    else {
Packit a4aae4
        d_in.read(d_buf + 4, size);
Packit a4aae4
        DBG(cerr << "bytes read (2): " << d_in.gcount() << endl);
Packit a4aae4
Packit a4aae4
        xdr_setpos( &d_source, 0);
Packit a4aae4
        if (!xdr_array(&d_source, val, &num, DODS_MAX_ARRAY, width, XDRUtils::xdr_coder(type)))
Packit a4aae4
            throw Error("Network I/O Error. Could not read array data.");
Packit a4aae4
    }
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
void XDRStreamUnMarshaller::dump(ostream &strm) const
Packit a4aae4
{
Packit a4aae4
    strm << DapIndent::LMarg << "XDRStreamUnMarshaller::dump - (" << (void *) this << ")" << endl;
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
} // namespace libdap
Packit a4aae4