libdap++  Updated for version 3.12.0
Int64.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 Int64.
33 //
34 // jhrg 9/7/94
35 
36 
37 #include "config.h"
38 
39 #include <cassert>
40 #include <sstream>
41 
42 #include "Byte.h" // synonymous with UInt8 and Char
43 #include "Int8.h"
44 #include "Int16.h"
45 #include "UInt16.h"
46 #include "Int32.h"
47 #include "UInt32.h"
48 #include "Int64.h"
49 #include "UInt64.h"
50 #include "Float32.h"
51 #include "Float64.h"
52 #include "Str.h"
53 #include "Url.h"
54 
55 #if 0
56 #include "Array.h"
57 #include "Structure.h"
58 #include "Sequence.h"
59 #include "Grid.h"
60 #endif
61 
62 #include "DAP4StreamMarshaller.h"
63 #include "DAP4StreamUnMarshaller.h"
64 
65 #include "DDS.h"
66 #include "util.h"
67 #include "parser.h"
68 #include "Operators.h"
69 #include "dods-limits.h"
70 #include "debug.h"
71 #include "InternalErr.h"
72 
73 using std::cerr;
74 using std::endl;
75 
76 namespace libdap {
77 
85 Int64::Int64(const string &n) : BaseType(n, dods_int64_c)
86 {}
87 
95 Int64::Int64(const string &n, const string &d) : BaseType(n, d, dods_int64_c)
96 {}
97 
98 Int64::Int64(const Int64 &copy_from) : BaseType(copy_from)
99 {
100  d_buf = copy_from.d_buf;
101 }
102 
103 BaseType *
105 {
106  return new Int64(*this);
107 }
108 
110 {
111  DBG(cerr << "~Int64" << endl);
112 }
113 
114 Int64 &
116 {
117  if (this == &rhs)
118  return *this;
119 
120  dynamic_cast<BaseType &>(*this) = rhs;
121 
122  d_buf = rhs.d_buf;
123 
124  return *this;
125 }
126 
127 unsigned int
129 {
130  return sizeof(dods_int64);
131 }
132 
133 bool
134 Int64::serialize(ConstraintEvaluator &eval, DDS &dds, Marshaller &m, bool ce_eval)
135 {
136  dds.timeout_on();
137 
138  if (!read_p())
139  read(); // read() throws Error and InternalErr
140 
141 #if EVAL
142  if (ce_eval && !eval.eval_selection(dds, dataset()))
143  return true;
144 #endif
145 
146  dds.timeout_off();
147 
148  assert(typeid(m) == typeid(DAP4StreamMarshaller));
149 
150  static_cast<DAP4StreamMarshaller*>(&m)->put_int64( d_buf ) ;
151 
152  return true;
153 }
154 
155 bool
157 {
158  assert(typeid(um) == typeid(DAP4StreamUnMarshaller));
159 
160  static_cast<DAP4StreamUnMarshaller*>(&um)->get_int64( d_buf ) ;
161 
162  return false;
163 }
164 
167 {
168  return d_buf;
169 }
170 
171 bool
173 {
174  d_buf = i;
175  set_read_p(true);
176 
177  return true;
178 }
179 
180 void
181 Int64::print_val(FILE *out, string space, bool print_decl_p)
182 {
183  ostringstream oss;
184  print_val(oss, space, print_decl_p);
185  fwrite(oss.str().data(), sizeof(char), oss.str().length(), out);
186 }
187 
188 void Int64::print_val(ostream &out, string space, bool print_decl_p)
189 {
190  if (print_decl_p) {
191  print_decl(out, space, false);
192  out << " = " << (dods_int64) d_buf << ";\n";
193  }
194  else
195  out << (int) d_buf;
196 }
197 
198 bool
199 Int64::ops(BaseType *b, int op)
200 {
201  // Get the arg's value.
202  if (!read_p() && !read())
203  throw InternalErr(__FILE__, __LINE__, "This value not read!");
204 
205  // Get the second arg's value.
206  if (!b->read_p() && !b->read())
207  throw InternalErr(__FILE__, __LINE__, "This value not read!");
208 
209  switch (b->type()) {
210  case dods_int8_c:
211  return Cmp<dods_int64, dods_int8>(op, d_buf, static_cast<Int8*>(b)->value());
212  case dods_byte_c:
213  return SUCmp<dods_int64, dods_byte>(op, d_buf, static_cast<Byte*>(b)->value());
214  case dods_int16_c:
215  return Cmp<dods_int64, dods_int16>(op, d_buf, static_cast<Int16*>(b)->value());
216  case dods_uint16_c:
217  return SUCmp<dods_int64, dods_uint16>(op, d_buf, static_cast<UInt16*>(b)->value());
218  case dods_int32_c:
219  return Cmp<dods_int64, dods_int32>(op, d_buf, static_cast<Int32*>(b)->value());
220  case dods_uint32_c:
221  return SUCmp<dods_int64, dods_uint32>(op, d_buf, static_cast<UInt32*>(b)->value());
222  case dods_int64_c:
223  return Cmp<dods_int64, dods_int64>(op, d_buf, static_cast<Int64*>(b)->value());
224  case dods_uint64_c:
225  return SUCmp<dods_int64, dods_uint64>(op, d_buf, static_cast<UInt64*>(b)->value());
226  case dods_float32_c:
227  return Cmp<dods_int64, dods_float32>(op, d_buf, static_cast<Float32*>(b)->value());
228  case dods_float64_c:
229  return Cmp<dods_int64, dods_float64>(op, d_buf, static_cast<Float64*>(b)->value());
230  default:
231  return false;
232  }
233 
234  return false;
235 }
236 
245 void
246 Int64::dump(ostream &strm) const
247 {
248  strm << DapIndent::LMarg << "Int64::dump - ("
249  << (void *)this << ")" << endl ;
251  BaseType::dump(strm) ;
252  strm << DapIndent::LMarg << "value: " << d_buf << endl ;
254 }
255 
256 } // namespace libdap
257