libdap Updated for version 3.20.9
libdap4 is an implementation of OPeNDAP's DAP protocol.
Float32.cc
1
2// -*- mode: c++; c-basic-offset:4 -*-
3
4// This file is part of libdap, A C++ implementation of the OPeNDAP Data
5// Access Protocol.
6
7// Copyright (c) 2002,2003 OPeNDAP, Inc.
8// Author: James Gallagher <jgallagher@opendap.org>
9//
10// This library is free software; you can redistribute it and/or
11// modify it under the terms of the GNU Lesser General Public
12// License as published by the Free Software Foundation; either
13// version 2.1 of the License, or (at your option) any later version.
14//
15// This library is distributed in the hope that it will be useful,
16// but WITHOUT ANY WARRANTY; without even the implied warranty of
17// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18// Lesser General Public License for more details.
19//
20// You should have received a copy of the GNU Lesser General Public
21// License along with this library; if not, write to the Free Software
22// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
23//
24// You can contact OPeNDAP, Inc. at PO Box 112, Saunderstown, RI. 02874-0112.
25
26// (c) COPYRIGHT URI/MIT 1999
27// Please read the full copyright statement in the file COPYRIGHT_URI.
28//
29// Authors:
30// jhrg,jimg James Gallagher <jgallagher@gso.uri.edu>
31
32// Implementation for Float32.
33//
34// 3/22/99 jhrg
35
36#include "config.h"
37
38//#define DODS_DEBUG
39
40#include <sstream>
41#include <iomanip>
42
43#include "Byte.h" // synonymous with UInt8 and Char
44#include "Int8.h"
45#include "Int16.h"
46#include "UInt16.h"
47#include "Int32.h"
48#include "UInt32.h"
49#include "Int64.h"
50#include "UInt64.h"
51#include "Float32.h"
52#include "Float64.h"
53#include "Str.h"
54#include "Url.h"
55
56#include "DDS.h"
57#include "Marshaller.h"
58#include "UnMarshaller.h"
59
60#include "DMR.h"
61#include "D4StreamMarshaller.h"
62#include "D4StreamUnMarshaller.h"
63
64#include "parser.h"
65#include "Operators.h"
66#include "dods-limits.h"
67#include "InternalErr.h"
68
69#include "util.h"
70#include "debug.h"
71#include "DapIndent.h"
72
73using std::cerr;
74using std::endl;
75
76namespace libdap {
77
85Float32::Float32(const string &n) : BaseType(n, dods_float32_c), d_buf(0)
86{}
87
95Float32::Float32(const string &n, const string &d) : BaseType(n, d, dods_float32_c), d_buf(0)
96{}
97
98Float32::Float32(const Float32 &copy_from) : BaseType(copy_from)
99{
100 d_buf = copy_from.d_buf;
101}
102
103BaseType *
105{
106 return new Float32(*this);
107}
108
109Float32 &
110Float32::operator=(const Float32 &rhs)
111{
112 if (this == &rhs)
113 return *this;
114
115 dynamic_cast<BaseType &>(*this) = rhs;
116
117 d_buf = rhs.d_buf;
118
119 return *this;
120}
121
122unsigned int
123Float32::width(bool) const
124{
125 return sizeof(dods_float32);
126}
127
128bool
130{
131#if USE_LOCAL_TIMEOUT_SCHEME
132 dds.timeout_on();
133#endif
134 if (!read_p())
135 read(); // read() throws Error and InternalErr
136
137 if (ce_eval && !eval.eval_selection(dds, dataset()))
138 return true;
139#if USE_LOCAL_TIMEOUT_SCHEME
140 dds.timeout_off();
141#endif
142 m.put_float32( d_buf ) ;
143
144 return true;
145}
146
147bool
149{
150 um.get_float32( d_buf ) ;
151
152 return false;
153}
154
155void
157{
158 checksum.AddData(reinterpret_cast<uint8_t*>(&d_buf), sizeof(d_buf));
159}
160
169void
170Float32::serialize(D4StreamMarshaller &m, DMR &, /*ConstraintEvaluator &,*/ bool)
171{
172 if (!read_p())
173 read(); // read() throws Error
174
175 m.put_float32( d_buf ) ;
176}
177
178void
180{
181 um.get_float32( d_buf ) ;
182}
183
184unsigned int
185Float32::val2buf(void *val, bool)
186{
187 // Jose Garcia This method is public I believe it has been
188 // designed to be used by read which must be implemented in a
189 // subclass, thus if the pointer val is NULL, is an Internal
190 // Error.
191 // Changed to InternalErr. jhrg
192 if (!val)
193 throw InternalErr(__FILE__, __LINE__,
194 "The incoming pointer does not contain any data.");
195
196 d_buf = *(dods_float32 *)val;
197
198 return width();
199}
200
201unsigned int
203{
204 // Jose Garcia
205 // The same comment justifying throwing an Error in val2buf applies here.
206 if (!val)
207 throw InternalErr(__FILE__, __LINE__, "NULL pointer.");
208
209 if (!*val)
210 *val = new dods_float32;
211
212 *(dods_float32 *)*val = d_buf;
213
214 return width();
215}
216
217bool
218Float32::set_value(dods_float32 f)
219{
220 d_buf = f;
221 set_read_p(true);
222
223 return true;
224}
225
231dods_float32
233{
234 return d_buf;
235}
236
237void
238Float32::print_val(FILE *out, string space, bool print_decl_p)
239{
240 ostringstream oss;
241 print_val(oss, space, print_decl_p);
242 fwrite(oss.str().data(), sizeof(char), oss.str().length(), out);
243}
244
245void
246Float32::print_val(ostream &out, string space, bool print_decl_p)
247{
248 // FIX: need to set precision in the printing somehow.
249 // os.precision(DODS_FLT_DIG);
250
251 if (print_decl_p) {
252 print_decl(out, space, false);
253 out << " = " << std::setprecision( 6 ) << d_buf << ";\n" ;
254 }
255 else
256 out << std::setprecision( 6 ) << d_buf ;
257}
258
259bool
261{
262 // Get this instance's value
263 if (!read_p() && !read()) {
264 // Jose Garcia Since the read method is virtual and
265 // implemented outside libdap++ if we cannot read the data
266 // that is the problem of whomever wrote the implementation of
267 // read and therefore it is an internal error.
268 throw InternalErr(__FILE__, __LINE__, "This value not read!");
269 }
270
271 // Extract the second arg's value.
272 if (!b || !(b->read_p() || b->read())) {
273 throw InternalErr(__FILE__, __LINE__, "This value not read!");
274 }
275
276 return d4_ops(b, op);
277}
278
282bool Float32::d4_ops(BaseType *b, int op)
283{
284 DBG(cerr << "b->typename(): " << b->type_name() << endl);
285
286 switch (b->type()) {
287 case dods_int8_c:
288 return Cmp<dods_float32, dods_int8>(op, d_buf, static_cast<Int8*>(b)->value());
289 case dods_byte_c:
290 return Cmp<dods_float32, dods_byte>(op, d_buf, static_cast<Byte*>(b)->value());
291 case dods_int16_c:
292 return Cmp<dods_float32, dods_int16>(op, d_buf, static_cast<Int16*>(b)->value());
293 case dods_uint16_c:
294 return Cmp<dods_float32, dods_uint16>(op, d_buf, static_cast<UInt16*>(b)->value());
295 case dods_int32_c:
296 return Cmp<dods_float32, dods_int32>(op, d_buf, static_cast<Int32*>(b)->value());
297 case dods_uint32_c:
298 return Cmp<dods_float32, dods_uint32>(op, d_buf, static_cast<UInt32*>(b)->value());
299 case dods_int64_c:
300 return Cmp<dods_float32, dods_int64>(op, d_buf, static_cast<Int64*>(b)->value());
301 case dods_uint64_c:
302 return Cmp<dods_float32, dods_uint64>(op, d_buf, static_cast<UInt64*>(b)->value());
303 case dods_float32_c:
304 return Cmp<dods_float32, dods_float32>(op, d_buf, static_cast<Float32*>(b)->value());
305 case dods_float64_c:
306 DBG(cerr << "arg1: " << d_buf << " " << op << " arg2: " << static_cast<Float64*>(b)->value() << endl);
307 // See the code in Float64::d4_ops() for an explanation of this odd-looking cast.
308 return Cmp<dods_float32, dods_float32>(op, d_buf, (float)static_cast<Float64*>(b)->value());
309 case dods_str_c:
310 case dods_url_c:
311 throw Error(malformed_expr, "Relational operators can only compare compatible types (number, string).");
312 default:
313 throw Error(malformed_expr, "Relational operators only work with scalar types.");
314 }
315}
316
325void
326Float32::dump(ostream &strm) const
327{
328 strm << DapIndent::LMarg << "Float32::dump - (" << (void *)this << ")"
329 << endl ;
330 DapIndent::Indent() ;
331 BaseType::dump(strm) ;
332 strm << DapIndent::LMarg << "value: " << d_buf << endl ;
333 DapIndent::UnIndent() ;
334}
335
336} // namespace libdap
337
Definition: crc.h:77
void AddData(const uint8_t *pData, const uint32_t length)
Definition: crc.h:98
The basic data type for the DODS DAP types.
Definition: BaseType.h:118
virtual string type_name() const
Returns the type of the class instance as a string.
Definition: BaseType.cc:379
virtual bool read()
Read data into a local buffer.
Definition: BaseType.cc:899
virtual void print_decl(FILE *out, string space=" ", bool print_semi=true, bool constraint_info=false, bool constrained=false)
Print an ASCII representation of the variable structure.
Definition: BaseType.cc:1003
virtual bool read_p()
Has this variable been read?
Definition: BaseType.cc:480
virtual void set_read_p(bool state)
Sets the value of the read_p property.
Definition: BaseType.cc:516
virtual string dataset() const
Returns the name of the dataset used to create this instance.
Definition: BaseType.cc:358
virtual void dump(ostream &strm) const
dumps information about this object
Definition: BaseType.cc:291
virtual Type type() const
Returns the type of the class instance.
Definition: BaseType.cc:365
Holds a single byte.
Definition: Byte.h:61
Evaluate a constraint expression.
bool eval_selection(DDS &dds, const std::string &dataset)
Evaluate a boolean-valued constraint expression. This is main method for the evaluator and is called ...
Marshaller that knows how to marshal/serialize dap data objects to a C++ iostream using DAP4's receiv...
Read data from the stream made by D4StreamMarshaller.
A class for error processing.
Definition: Error.h:94
Holds a 32-bit floating point value.
Definition: Float32.h:62
virtual BaseType * ptr_duplicate()
Definition: Float32.cc:104
virtual void compute_checksum(Crc32 &checksum)
include the data for this variable in the checksum DAP4 includes a checksum with every data response....
Definition: Float32.cc:156
virtual unsigned int val2buf(void *val, bool reuse=false)
Loads class data.
Definition: Float32.cc:185
virtual bool d4_ops(BaseType *b, int op)
Definition: Float32.cc:282
Float32(const string &n)
Definition: Float32.cc:85
virtual void print_val(FILE *out, string space="", bool print_decl_p=true)
Prints the value of the variable.
Definition: Float32.cc:238
virtual dods_float32 value() const
Definition: Float32.cc:232
virtual bool deserialize(UnMarshaller &um, DDS *dds, bool reuse=false)
Receive data from the net.
Definition: Float32.cc:148
virtual void dump(ostream &strm) const
dumps information about this object
Definition: Float32.cc:326
virtual bool ops(BaseType *b, int op)
Evaluate relational operators.
Definition: Float32.cc:260
virtual unsigned int width(bool constrained=false) const
How many bytes does this variable use Return the number of bytes of storage this variable uses....
Definition: Float32.cc:123
virtual bool serialize(ConstraintEvaluator &eval, DDS &dds, Marshaller &m, bool ce_eval=true)
Move data to the net, then remove them from the object.
Definition: Float32.cc:129
virtual unsigned int buf2val(void **val)
Reads the class data.
Definition: Float32.cc:202
Holds a 64-bit (double precision) floating point value.
Definition: Float64.h:61
Holds a 16-bit signed integer value.
Definition: Int16.h:60
Holds a 32-bit signed integer.
Definition: Int32.h:66
Holds a64-bit signed integer.
Definition: Int64.h:50
Holds an 8-bit signed integer value.
Definition: Int8.h:43
A class for software fault reporting.
Definition: InternalErr.h:65
abstract base class used to marshal/serialize dap data objects
Definition: Marshaller.h:50
Holds an unsigned 16-bit integer.
Definition: UInt16.h:58
Holds a 32-bit unsigned integer.
Definition: UInt32.h:60
Holds a 64-bit unsigned integer.
Definition: UInt64.h:50
abstract base class used to unmarshall/deserialize dap data objects
Definition: UnMarshaller.h:55
top level DAP object to house generic methods
Definition: AlarmHandler.h:36