libdap  Updated for version 3.19.1
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 
72 using std::cerr;
73 using std::endl;
74 
75 namespace libdap {
76 
84 Float32::Float32(const string &n) : BaseType(n, dods_float32_c), d_buf(0)
85 {}
86 
94 Float32::Float32(const string &n, const string &d) : BaseType(n, d, dods_float32_c), d_buf(0)
95 {}
96 
97 Float32::Float32(const Float32 &copy_from) : BaseType(copy_from)
98 {
99  d_buf = copy_from.d_buf;
100 }
101 
102 BaseType *
104 {
105  return new Float32(*this);
106 }
107 
108 Float32 &
109 Float32::operator=(const Float32 &rhs)
110 {
111  if (this == &rhs)
112  return *this;
113 
114  dynamic_cast<BaseType &>(*this) = rhs;
115 
116  d_buf = rhs.d_buf;
117 
118  return *this;
119 }
120 
121 unsigned int
122 Float32::width(bool) const
123 {
124  return sizeof(dods_float32);
125 }
126 
127 bool
128 Float32::serialize(ConstraintEvaluator &eval, DDS &dds, Marshaller &m, bool ce_eval)
129 {
130 #if USE_LOCAL_TIMEOUT_SCHEME
131  dds.timeout_on();
132 #endif
133  if (!read_p())
134  read(); // read() throws Error and InternalErr
135 
136  if (ce_eval && !eval.eval_selection(dds, dataset()))
137  return true;
138 #if USE_LOCAL_TIMEOUT_SCHEME
139  dds.timeout_off();
140 #endif
141  m.put_float32( d_buf ) ;
142 
143  return true;
144 }
145 
146 bool
148 {
149  um.get_float32( d_buf ) ;
150 
151  return false;
152 }
153 
154 void
156 {
157  checksum.AddData(reinterpret_cast<uint8_t*>(&d_buf), sizeof(d_buf));
158 }
159 
168 void
169 Float32::serialize(D4StreamMarshaller &m, DMR &, /*ConstraintEvaluator &,*/ bool)
170 {
171  if (!read_p())
172  read(); // read() throws Error
173 
174  m.put_float32( d_buf ) ;
175 }
176 
177 void
179 {
180  um.get_float32( d_buf ) ;
181 }
182 
183 unsigned int
184 Float32::val2buf(void *val, bool)
185 {
186  // Jose Garcia This method is public I believe it has been
187  // designed to be used by read which must be implemented in a
188  // subclass, thus if the pointer val is NULL, is an Internal
189  // Error.
190  // Changed to InternalErr. jhrg
191  if (!val)
192  throw InternalErr(__FILE__, __LINE__,
193  "The incoming pointer does not contain any data.");
194 
195  d_buf = *(dods_float32 *)val;
196 
197  return width();
198 }
199 
200 unsigned int
201 Float32::buf2val(void **val)
202 {
203  // Jose Garcia
204  // The same comment justifying throwing an Error in val2buf applies here.
205  if (!val)
206  throw InternalErr(__FILE__, __LINE__, "NULL pointer.");
207 
208  if (!*val)
209  *val = new dods_float32;
210 
211  *(dods_float32 *)*val = d_buf;
212 
213  return width();
214 }
215 
216 bool
217 Float32::set_value(dods_float32 f)
218 {
219  d_buf = f;
220  set_read_p(true);
221 
222  return true;
223 }
224 
230 dods_float32
232 {
233  return d_buf;
234 }
235 
236 void
237 Float32::print_val(FILE *out, string space, bool print_decl_p)
238 {
239  ostringstream oss;
240  print_val(oss, space, print_decl_p);
241  fwrite(oss.str().data(), sizeof(char), oss.str().length(), out);
242 }
243 
244 void
245 Float32::print_val(ostream &out, string space, bool print_decl_p)
246 {
247  // FIX: need to set precision in the printing somehow.
248  // os.precision(DODS_FLT_DIG);
249 
250  if (print_decl_p) {
251  print_decl(out, space, false);
252  out << " = " << std::setprecision( 6 ) << d_buf << ";\n" ;
253  }
254  else
255  out << std::setprecision( 6 ) << d_buf ;
256 }
257 
258 bool
260 {
261  // Get this instance's value
262  if (!read_p() && !read()) {
263  // Jose Garcia Since the read method is virtual and
264  // implemented outside libdap++ if we cannot read the data
265  // that is the problem of whomever wrote the implementation of
266  // read and therefore it is an internal error.
267  throw InternalErr(__FILE__, __LINE__, "This value not read!");
268  }
269 
270  // Extract the second arg's value.
271  if (!b || !(b->read_p() || b->read())) {
272  throw InternalErr(__FILE__, __LINE__, "This value not read!");
273  }
274 
275  return d4_ops(b, op);
276 }
277 
281 bool Float32::d4_ops(BaseType *b, int op)
282 {
283  DBG(cerr << "b->typename(): " << b->type_name() << endl);
284 
285  switch (b->type()) {
286  case dods_int8_c:
287  return Cmp<dods_float32, dods_int8>(op, d_buf, static_cast<Int8*>(b)->value());
288  case dods_byte_c:
289  return SUCmp<dods_float32, dods_byte>(op, d_buf, static_cast<Byte*>(b)->value());
290  case dods_int16_c:
291  return Cmp<dods_float32, dods_int16>(op, d_buf, static_cast<Int16*>(b)->value());
292  case dods_uint16_c:
293  return SUCmp<dods_float32, dods_uint16>(op, d_buf, static_cast<UInt16*>(b)->value());
294  case dods_int32_c:
295  return Cmp<dods_float32, dods_int32>(op, d_buf, static_cast<Int32*>(b)->value());
296  case dods_uint32_c:
297  return SUCmp<dods_float32, dods_uint32>(op, d_buf, static_cast<UInt32*>(b)->value());
298  case dods_int64_c:
299  return Cmp<dods_float32, dods_int64>(op, d_buf, static_cast<Int64*>(b)->value());
300  case dods_uint64_c:
301  return SUCmp<dods_float32, dods_uint64>(op, d_buf, static_cast<UInt64*>(b)->value());
302  case dods_float32_c:
303  return Cmp<dods_float32, dods_float32>(op, d_buf, static_cast<Float32*>(b)->value());
304  case dods_float64_c:
305  DBG(cerr << "arg1: " << d_buf << " " << op << " arg2: " << static_cast<Float64*>(b)->value() << endl);
306  // See the code in Float64::d4_ops() for an explanation of this odd-looking cast.
307  return Cmp<dods_float32, dods_float32>(op, d_buf, (float)static_cast<Float64*>(b)->value());
308  case dods_str_c:
309  case dods_url_c:
310  throw Error(malformed_expr, "Relational operators can only compare compatible types (number, string).");
311  default:
312  throw Error(malformed_expr, "Relational operators only work with scalar types.");
313  }
314 }
315 
324 void
325 Float32::dump(ostream &strm) const
326 {
327  strm << DapIndent::LMarg << "Float32::dump - (" << (void *)this << ")"
328  << endl ;
329  DapIndent::Indent() ;
330  BaseType::dump(strm) ;
331  strm << DapIndent::LMarg << "value: " << d_buf << endl ;
332  DapIndent::UnIndent() ;
333 }
334 
335 } // namespace libdap
336 
virtual bool read()
Read data into a local buffer.
Definition: BaseType.cc:890
Holds an 8-bit signed integer value.
Definition: Int8.h:42
Holds a64-bit signed integer.
Definition: Int64.h:49
virtual bool read_p()
Has this variable been read?
Definition: BaseType.cc:471
abstract base class used to unmarshall/deserialize dap data objects
Definition: UnMarshaller.h:54
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:994
virtual void dump(ostream &strm) const
dumps information about this object
Definition: BaseType.cc:282
virtual void print_val(FILE *out, string space="", bool print_decl_p=true)
Prints the value of the variable.
Definition: Float32.cc:237
virtual bool deserialize(UnMarshaller &um, DDS *dds, bool reuse=false)
Receive data from the net.
Definition: Float32.cc:147
Read data from the stream made by D4StreamMarshaller.
Holds an unsigned 16-bit integer.
Definition: UInt16.h:57
Definition: crc.h:76
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:128
virtual unsigned int val2buf(void *val, bool reuse=false)
Loads class data.
Definition: Float32.cc:184
virtual unsigned int width(bool constrained=false) const
How many bytes does this use Return the number of bytes of storage this variable uses. For scalar types, this is pretty simple (an int32 uses 4 bytes, etc.). For arrays and Constructors, it is a bit more complex. Note that a scalar String variable uses sizeof(String*) bytes, not the length of the string. In other words, the value returned is independent of the type. Also note width() of a String array returns the number of elements in the array times sizeof(String*). That is, each different array size is a different data type.
Definition: Float32.cc:122
Holds a 32-bit floating point value.
Definition: Float32.h:61
A class for software fault reporting.
Definition: InternalErr.h:64
virtual void dump(ostream &strm) const
dumps information about this object
Definition: Float32.cc:325
Float32(const string &n)
Definition: Float32.cc:84
Marshaller that knows how to marshal/serialize dap data objects to a C++ iostream using DAP4&#39;s receiv...
Holds a 16-bit signed integer value.
Definition: Int16.h:59
virtual Type type() const
Returns the type of the class instance.
Definition: BaseType.cc:356
virtual bool d4_ops(BaseType *b, int op)
Definition: Float32.cc:281
virtual void set_read_p(bool state)
Sets the value of the read_p property.
Definition: BaseType.cc:507
Holds a 64-bit unsigned integer.
Definition: UInt64.h:49
void AddData(const uint8_t *pData, const uint32_t length)
Definition: crc.h:98
Evaluate a constraint expression.
virtual BaseType * ptr_duplicate()
Definition: Float32.cc:103
virtual unsigned int buf2val(void **val)
Reads the class data.
Definition: Float32.cc:201
The basic data type for the DODS DAP types.
Definition: BaseType.h:117
abstract base class used to marshal/serialize dap data objects
Definition: Marshaller.h:50
virtual string type_name() const
Returns the type of the class instance as a string.
Definition: BaseType.cc:370
Holds a single byte.
Definition: Byte.h:60
virtual dods_float32 value() const
Definition: Float32.cc:231
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 ...
A class for error processing.
Definition: Error.h:90
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:155
Holds a 32-bit unsigned integer.
Definition: UInt32.h:59
virtual bool ops(BaseType *b, int op)
Evaluate relational operators.
Definition: Float32.cc:259
Holds a 32-bit signed integer.
Definition: Int32.h:65
virtual string dataset() const
Returns the name of the dataset used to create this instance.
Definition: BaseType.cc:349