libdap++  Updated for version 3.12.0
Int32.cc
Go to the documentation of this file.
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 1994-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 Int32.
33 //
34 // jhrg 9/7/94
35 
36 
37 #include "config.h"
38 
39 #include <sstream>
40 
41 #include "Byte.h" // synonymous with UInt8 and Char
42 #include "Int8.h"
43 #include "Int16.h"
44 #include "UInt16.h"
45 #include "Int32.h"
46 #include "UInt32.h"
47 #include "Int64.h"
48 #include "UInt64.h"
49 #include "Float32.h"
50 #include "Float64.h"
51 #include "Str.h"
52 #include "Url.h"
53 
54 
55 #include "DDS.h"
56 #include "Marshaller.h"
57 #include "UnMarshaller.h"
58 
59 #include "util.h"
60 #include "parser.h"
61 #include "Operators.h"
62 #include "dods-limits.h"
63 #include "debug.h"
64 #include "InternalErr.h"
65 
66 
67 using std::cerr;
68 using std::endl;
69 
70 namespace libdap {
71 
79 Int32::Int32(const string &n)
81 {}
82 
90 Int32::Int32(const string &n, const string &d)
91  : BaseType(n, d, dods_int32_c)
92 {}
93 
94 Int32::Int32(const Int32 &copy_from) : BaseType(copy_from)
95 {
96  d_buf = copy_from.d_buf;
97 }
98 
99 BaseType *
101 {
102  return new Int32(*this);
103 }
104 
106 {
107  DBG(cerr << "~Int32" << endl);
108 }
109 
110 Int32 &
112 {
113  if (this == &rhs)
114  return *this;
115 
116  dynamic_cast<BaseType &>(*this) = rhs;
117 
118  d_buf = rhs.d_buf;
119 
120  return *this;
121 }
122 
123 unsigned int
125 {
126  return sizeof(dods_int32);
127 }
128 
129 bool
131  Marshaller &m, bool ce_eval)
132 {
133  dds.timeout_on();
134 
135  if (!read_p())
136  read(); // read() throws Error and InternalErr
137 
138 #if EVAL
139  if (ce_eval && !eval.eval_selection(dds, dataset()))
140  return true;
141 #endif
142 
143  dds.timeout_off();
144 
145  m.put_int32( d_buf ) ;
146 
147  return true;
148 }
149 
150 bool
152 {
153  um.get_int32( d_buf ) ;
154 
155  return false;
156 }
157 
158 unsigned int
159 Int32::val2buf(void *val, bool)
160 {
161  // Jose Garcia
162  // This method is public therefore and I believe it has being designed
163  // to be use by read which must be implemented on the surrogated library,
164  // thus if the pointer val is NULL, is an Internal Error.
165  if (!val)
166  throw InternalErr(__FILE__, __LINE__,
167  "The incoming pointer does not contain any data.");
168 
169  d_buf = *(dods_int32 *)val;
170 
171  return width();
172 }
173 
174 unsigned int
175 Int32::buf2val(void **val)
176 {
177  // Jose Garcia
178  // The same comment justifying throwing an Error in val2buf applies here.
179  if (!val)
180  throw InternalErr(__FILE__, __LINE__, "NULL pointer.");
181 
182  if (!*val)
183  *val = new dods_int32;
184 
185  *(dods_int32 *)*val = d_buf;
186 
187  return width();
188 }
189 
192 {
193  return d_buf;
194 }
195 
196 bool
198 {
199  d_buf = i;
200  set_read_p(true);
201 
202  return true;
203 }
204 
205 void
206 Int32::print_val(FILE *out, string space, bool print_decl_p)
207 {
208  ostringstream oss;
209  print_val(oss, space, print_decl_p);
210  fwrite(oss.str().data(), sizeof(char), oss.str().length(), out);
211 }
212 
213 void
214 Int32::print_val(ostream &out, string space, bool print_decl_p)
215 {
216  if (print_decl_p) {
217  print_decl(out, space, false);
218  out << " = " << (int)d_buf << ";\n" ;
219  }
220  else
221  out << (int)d_buf ;
222 }
223 
224 bool
225 Int32::ops(BaseType *b, int op)
226 {
227 
228  // Extract the Byte arg's value.
229  if (!read_p() && !read()) {
230  // Jose Garcia
231  // Since the read method is virtual and implemented outside
232  // libdap++ if we cannot read the data that is the problem
233  // of the user or of whoever wrote the surrogate library
234  // implemeting read therefore it is an internal error.
235  throw InternalErr(__FILE__, __LINE__, "This value not read!");
236  }
237 
238  // Extract the second arg's value.
239  if (!b->read_p() && !b->read()) {
240  // Jose Garcia
241  // Since the read method is virtual and implemented outside
242  // libdap++ if we cannot read the data that is the problem
243  // of the user or of whoever wrote the surrogate library
244  // implemeting read therefore it is an internal error.
245  throw InternalErr(__FILE__, __LINE__, "This value not read!");
246  }
247 
248  switch (b->type()) {
249  case dods_int8_c:
250  return Cmp<dods_int32, dods_int8>(op, d_buf, static_cast<Int8*>(b)->value());
251  case dods_byte_c:
252  return SUCmp<dods_int32, dods_byte>(op, d_buf, static_cast<Byte*>(b)->value());
253  case dods_int16_c:
254  return Cmp<dods_int32, dods_int16>(op, d_buf, static_cast<Int16*>(b)->value());
255  case dods_uint16_c:
256  return SUCmp<dods_int32, dods_uint16>(op, d_buf, static_cast<UInt16*>(b)->value());
257  case dods_int32_c:
258  return Cmp<dods_int32, dods_int32>(op, d_buf, static_cast<Int32*>(b)->value());
259  case dods_uint32_c:
260  return SUCmp<dods_int32, dods_uint32>(op, d_buf, static_cast<UInt32*>(b)->value());
261  case dods_int64_c:
262  return Cmp<dods_int32, dods_int64>(op, d_buf, static_cast<Int64*>(b)->value());
263  case dods_uint64_c:
264  return SUCmp<dods_int32, dods_uint64>(op, d_buf, static_cast<UInt64*>(b)->value());
265  case dods_float32_c:
266  return Cmp<dods_int32, dods_float32>(op, d_buf, static_cast<Float32*>(b)->value());
267  case dods_float64_c:
268  return Cmp<dods_int32, dods_float64>(op, d_buf, static_cast<Float64*>(b)->value());
269  default:
270  return false;
271  }
272 }
273 
282 void
283 Int32::dump(ostream &strm) const
284 {
285  strm << DapIndent::LMarg << "Int32::dump - ("
286  << (void *)this << ")" << endl ;
288  BaseType::dump(strm) ;
289  strm << DapIndent::LMarg << "value: " << d_buf << endl ;
291 }
292 
293 } // namespace libdap
294