libdap  Updated for version 3.20.10
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 
73 using std::cerr;
74 using std::endl;
75 
76 namespace libdap {
77 
85 Float32::Float32(const string &n) : BaseType(n, dods_float32_c), d_buf(0)
86 {}
87 
95 Float32::Float32(const string &n, const string &d) : BaseType(n, d, dods_float32_c), d_buf(0)
96 {}
97 
98 Float32::Float32(const Float32 &copy_from) : BaseType(copy_from)
99 {
100  d_buf = copy_from.d_buf;
101 }
102 
103 BaseType *
105 {
106  return new Float32(*this);
107 }
108 
109 Float32 &
110 Float32::operator=(const Float32 &rhs)
111 {
112  if (this == &rhs)
113  return *this;
114  BaseType::operator=(rhs);
115  d_buf = rhs.d_buf;
116  return *this;
117 }
118 
119 unsigned int
120 Float32::width(bool) const
121 {
122  return sizeof(dods_float32);
123 }
124 
125 bool
126 Float32::serialize(ConstraintEvaluator &eval, DDS &dds, Marshaller &m, bool ce_eval)
127 {
128 #if USE_LOCAL_TIMEOUT_SCHEME
129  dds.timeout_on();
130 #endif
131  if (!read_p())
132  read(); // read() throws Error and InternalErr
133 
134  if (ce_eval && !eval.eval_selection(dds, dataset()))
135  return true;
136 #if USE_LOCAL_TIMEOUT_SCHEME
137  dds.timeout_off();
138 #endif
139  m.put_float32( d_buf ) ;
140 
141  return true;
142 }
143 
144 bool
146 {
147  um.get_float32( d_buf ) ;
148 
149  return false;
150 }
151 
152 void
154 {
155  checksum.AddData(reinterpret_cast<uint8_t*>(&d_buf), sizeof(d_buf));
156 }
157 
166 void
167 Float32::serialize(D4StreamMarshaller &m, DMR &, /*ConstraintEvaluator &,*/ bool)
168 {
169  if (!read_p())
170  read(); // read() throws Error
171 
172  m.put_float32( d_buf ) ;
173 }
174 
175 void
177 {
178  um.get_float32( d_buf ) ;
179 }
180 
181 unsigned int
182 Float32::val2buf(void *val, bool)
183 {
184  // Jose Garcia This method is public I believe it has been
185  // designed to be used by read which must be implemented in a
186  // subclass, thus if the pointer val is NULL, is an Internal
187  // Error.
188  // Changed to InternalErr. jhrg
189  if (!val)
190  throw InternalErr(__FILE__, __LINE__,
191  "The incoming pointer does not contain any data.");
192 
193  d_buf = *(dods_float32 *)val;
194 
195  return width();
196 }
197 
198 unsigned int
199 Float32::buf2val(void **val)
200 {
201  // Jose Garcia
202  // The same comment justifying throwing an Error in val2buf applies here.
203  if (!val)
204  throw InternalErr(__FILE__, __LINE__, "NULL pointer.");
205 
206  if (!*val)
207  *val = new dods_float32;
208 
209  *(dods_float32 *)*val = d_buf;
210 
211  return width();
212 }
213 
214 bool
215 Float32::set_value(dods_float32 f)
216 {
217  d_buf = f;
218  set_read_p(true);
219 
220  return true;
221 }
222 
228 dods_float32
230 {
231  return d_buf;
232 }
233 
234 void
235 Float32::print_val(FILE *out, string space, bool print_decl_p)
236 {
237  ostringstream oss;
238  print_val(oss, space, print_decl_p);
239  fwrite(oss.str().data(), sizeof(char), oss.str().length(), out);
240 }
241 
242 void
243 Float32::print_val(ostream &out, string space, bool print_decl_p)
244 {
245  // FIX: need to set precision in the printing somehow.
246  // os.precision(DODS_FLT_DIG);
247 
248  if (print_decl_p) {
249  print_decl(out, space, false);
250  out << " = " << std::setprecision( 6 ) << d_buf << ";\n" ;
251  }
252  else
253  out << std::setprecision( 6 ) << d_buf ;
254 }
255 
256 bool
258 {
259  // Get this instance's value
260  if (!read_p() && !read()) {
261  // Jose Garcia Since the read method is virtual and
262  // implemented outside libdap++ if we cannot read the data
263  // that is the problem of whomever wrote the implementation of
264  // read and therefore it is an internal error.
265  throw InternalErr(__FILE__, __LINE__, "This value not read!");
266  }
267 
268  // Extract the second arg's value.
269  if (!b || !(b->read_p() || b->read())) {
270  throw InternalErr(__FILE__, __LINE__, "This value not read!");
271  }
272 
273  return d4_ops(b, op);
274 }
275 
279 bool Float32::d4_ops(BaseType *b, int op)
280 {
281  DBG(cerr << "b->typename(): " << b->type_name() << endl);
282 
283  switch (b->type()) {
284  case dods_int8_c:
285  return Cmp<dods_float32, dods_int8>(op, d_buf, static_cast<Int8*>(b)->value());
286  case dods_byte_c:
287  return Cmp<dods_float32, dods_byte>(op, d_buf, static_cast<Byte*>(b)->value());
288  case dods_int16_c:
289  return Cmp<dods_float32, dods_int16>(op, d_buf, static_cast<Int16*>(b)->value());
290  case dods_uint16_c:
291  return Cmp<dods_float32, dods_uint16>(op, d_buf, static_cast<UInt16*>(b)->value());
292  case dods_int32_c:
293  return Cmp<dods_float32, dods_int32>(op, d_buf, static_cast<Int32*>(b)->value());
294  case dods_uint32_c:
295  return Cmp<dods_float32, dods_uint32>(op, d_buf, static_cast<UInt32*>(b)->value());
296  case dods_int64_c:
297  return Cmp<dods_float32, dods_int64>(op, d_buf, static_cast<Int64*>(b)->value());
298  case dods_uint64_c:
299  return Cmp<dods_float32, dods_uint64>(op, d_buf, static_cast<UInt64*>(b)->value());
300  case dods_float32_c:
301  return Cmp<dods_float32, dods_float32>(op, d_buf, static_cast<Float32*>(b)->value());
302  case dods_float64_c:
303  DBG(cerr << "arg1: " << d_buf << " " << op << " arg2: " << static_cast<Float64*>(b)->value() << endl);
304  // See the code in Float64::d4_ops() for an explanation of this odd-looking cast.
305  return Cmp<dods_float32, dods_float32>(op, d_buf, (float)static_cast<Float64*>(b)->value());
306  case dods_str_c:
307  case dods_url_c:
308  throw Error(malformed_expr, "Relational operators can only compare compatible types (number, string).");
309  default:
310  throw Error(malformed_expr, "Relational operators only work with scalar types.");
311  }
312 }
313 
322 void
323 Float32::dump(ostream &strm) const
324 {
325  strm << DapIndent::LMarg << "Float32::dump - (" << (void *)this << ")"
326  << endl ;
327  DapIndent::Indent() ;
328  BaseType::dump(strm) ;
329  strm << DapIndent::LMarg << "value: " << d_buf << endl ;
330  DapIndent::UnIndent() ;
331 }
332 
333 } // namespace libdap
334 
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:375
virtual bool read()
Read data into a local buffer.
Definition: BaseType.cc:895
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:999
virtual bool read_p()
Has this variable been read?
Definition: BaseType.cc:476
virtual void set_read_p(bool state)
Sets the value of the read_p property.
Definition: BaseType.cc:512
virtual string dataset() const
Returns the name of the dataset used to create this instance.
Definition: BaseType.cc:354
void dump(ostream &strm) const override
dumps information about this object
Definition: BaseType.cc:287
virtual Type type() const
Returns the type of the class instance.
Definition: BaseType.cc:361
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:153
virtual unsigned int val2buf(void *val, bool reuse=false)
Loads class data.
Definition: Float32.cc:182
virtual bool d4_ops(BaseType *b, int op)
Definition: Float32.cc:279
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:235
virtual dods_float32 value() const
Definition: Float32.cc:229
virtual bool deserialize(UnMarshaller &um, DDS *dds, bool reuse=false)
Receive data from the net.
Definition: Float32.cc:145
virtual void dump(ostream &strm) const
dumps information about this object
Definition: Float32.cc:323
virtual bool ops(BaseType *b, int op)
Evaluate relational operators.
Definition: Float32.cc:257
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:120
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:126
virtual unsigned int buf2val(void **val)
Reads the class data.
Definition: Float32.cc:199
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