49 #include "XMLWriter.h"
50 #include "D4BaseTypeFactory.h"
51 #include "D4Attributes.h"
56 #include "DapIndent.h"
63 const string c_xml_xsi =
"http://www.w3.org/2001/XMLSchema-instance";
64 const string c_xml_namespace =
"http://www.w3.org/XML/1998/namespace";
66 const string c_default_dap40_schema_location =
"http://xml.opendap.org/dap/dap4.0.xsd";
68 const string c_dap40_namespace =
"http://xml.opendap.org/ns/DAP/4.0#";
70 const string c_dap_40_n_sl = c_dap40_namespace +
" " + c_default_dap40_schema_location;
77 DMR::m_duplicate(
const DMR &dmr)
82 d_factory = dmr.d_factory;
85 d_filename = dmr.d_filename;
87 d_dap_major = dmr.d_dap_major;
88 d_dap_minor = dmr.d_dap_minor;
89 d_dap_version = dmr.d_dap_version;
91 d_dmr_version = dmr.d_dmr_version;
93 d_request_xml_base = dmr.d_request_xml_base;
95 d_namespace = dmr.d_namespace;
97 d_max_response_size = dmr.d_max_response_size;
101 d_root =
static_cast<D4Group*
>(dmr.d_root->ptr_duplicate());
102 DBG(cerr <<
"dmr.d_root: " << dmr.d_root << endl);
103 DBG(cerr <<
"d_root (from ptr_dup(): " << d_root << endl);
121 : d_factory(factory), d_name(name), d_filename(
""),
122 d_dap_major(4), d_dap_minor(0),
123 d_dmr_version(
"1.0"), d_request_xml_base(
""),
124 d_namespace(c_dap40_namespace), d_max_response_size(0), d_root(0)
151 : d_factory(factory), d_name(dds.get_dataset_name()),
152 d_filename(dds.filename()), d_dap_major(4), d_dap_minor(0),
153 d_dmr_version(
"1.0"), d_request_xml_base(
""),
154 d_namespace(c_dap40_namespace), d_max_response_size(0), d_root(0)
183 : d_factory(0), d_name(
""), d_filename(
""), d_dap_major(4), d_dap_minor(0),
184 d_dap_version(
"4.0"), d_dmr_version(
"1.0"), d_request_xml_base(
""),
185 d_namespace(c_dap40_namespace), d_max_response_size(0), d_root(0)
208 DMR::operator=(
const DMR &rhs)
240 DBG(cerr << __func__ <<
"() - Transforming top level variable: " <<
241 " (" << (*i)->type_name() <<
":'" << (*i)->name() <<
"':"<<(
void *)(*i) <<
242 ") (root:"<< root_grp <<
")"<< endl; );
243 (*i)->transform_to_dap4(root_grp, root_grp);
244 DBG(cerr << __func__ <<
"() - top level variable: '" <<
245 (*i)->name() <<
"' (type:" << (*i)->type_name() <<
") Transformed"<< endl; );
248 DBG(cerr << __func__ <<
"() - Skipping variable: " <<
249 d4_var->
type_name() <<
" " << d4_var->
name() <<
" because a variable with" <<
250 " this name already exists in the root group." << endl; );
272 DBG( cerr << __func__ <<
"() - BEGIN" << endl;);
285 vector<BaseType *>::iterator vIter = top_vars->begin();
286 vector<BaseType *>::iterator vEnd = top_vars->end();
287 for (; vIter != vEnd; vIter++) {
292 set<string> shared_dim_candidates;
294 vector<BaseType *> dropped_vars;
297 DBG( cerr << __func__ <<
"() - Processing top level variable '"<< (*i)->type_name() <<
" " << (*i)->name() <<
"' to DDS." << endl; );
298 vector<BaseType *> *new_vars = (*i)->transform_to_dap2(&(dds->
get_attr_table()));
300 vector<BaseType*>::iterator vIter = new_vars->begin();
301 vector<BaseType*>::iterator end = new_vars->end();
302 for(; vIter!=end; vIter++ ) {
304 DBG( cerr << __func__ <<
"() - Adding variable name: '"<< new_var->
name() <<
"' " <<
305 "type: " << new_var->
type() <<
" " <<
306 "type_name: " << new_var->
type_name() <<
" to DDS." << endl; );
308 Grid *grid =
dynamic_cast <Grid *
>(new_var);
311 for(; m != grid->
map_end(); m++) {
312 shared_dim_candidates.insert((*m)->name());
320 DBG( cerr << __func__ <<
"Adding variable '"<< (*i)->type_name() <<
" " << (*i)->name() <<
"' to drop list." << endl; );
321 dropped_vars.push_back((*i));
324 AttrTable *dv_table = Constructor::make_dropped_vars_attr_table(&dropped_vars);
326 DBG( cerr << __func__ <<
"() - Adding dropped variable AttrTable." << endl;);
333 for(; gIter!=gEnd; gIter++) {
335 DBG( cerr << __func__ <<
"() - Processing D4Group " << grp->
name() << endl;);
338 DBG( cerr << __func__ <<
"() - Processing " << grp->
name() <<
" Member Variables." << endl;);
339 vector<BaseType *>::iterator vIter = d2_vars->begin();
340 vector<BaseType *>::iterator vEnd = d2_vars->end();
341 for(; vIter!=vEnd; vIter++) {
342 DBG( cerr << __func__ <<
"() - Processing " << grp->
name() <<
" Member Variable: " << (*vIter)->name() << endl;);
349 DBG( cerr << __func__ <<
"() - END" << endl;);
355 return DMR::getDDS(*
this);
368 if (!d_root) d_root =
static_cast<D4Group*
>(d_factory->
NewVariable(dods_group_c,
"/"));
380 istringstream iss(v);
382 int major = -1, minor = -1;
384 if (!iss.eof() && !iss.fail())
386 if (!iss.eof() && !iss.fail())
388 if (!iss.eof() && !iss.fail())
391 if (major == -1 || minor == -1 or dot !=
'.')
392 throw InternalErr(__FILE__, __LINE__,
"Could not parse dap version. Value given: " + v);
403 switch (d_dap_major) {
405 d_namespace = c_dap40_namespace;
439 if (xmlTextWriterStartElement(xml.get_writer(), (
const xmlChar*)
"Dataset") < 0)
440 throw InternalErr(__FILE__, __LINE__,
"Could not write Dataset element");
444 if (xmlTextWriterWriteAttribute(xml.get_writer(), (
const xmlChar*)
"xmlns:xml",
445 (
const xmlChar*) c_xml_namespace.c_str()) < 0)
446 throw InternalErr(__FILE__, __LINE__,
"Could not write attribute for xmlns:xml");
448 if (xmlTextWriterWriteAttribute(xml.get_writer(), (
const xmlChar*)
"xmlns:xsi", (
const xmlChar*) c_xml_xsi.c_str())
450 throw InternalErr(__FILE__, __LINE__,
"Could not write attribute for xmlns:xsi");
452 if (xmlTextWriterWriteAttribute(xml.get_writer(), (
const xmlChar*)
"xsi:schemaLocation",
453 (
const xmlChar*) c_dap_40_n_sl.c_str()) < 0)
454 throw InternalErr(__FILE__, __LINE__,
"Could not write attribute for xmlns:schemaLocation");
457 if (xmlTextWriterWriteAttribute(xml.get_writer(), (
const xmlChar*)
"xmlns", (
const xmlChar*)
get_namespace().c_str()) < 0)
458 throw InternalErr(__FILE__, __LINE__,
"Could not write attribute for xmlns");
461 if (xmlTextWriterWriteAttribute(xml.get_writer(), (
const xmlChar*)
"xml:base",
463 throw InternalErr(__FILE__, __LINE__,
"Could not write attribute for xml:base");
466 if (xmlTextWriterWriteAttribute(xml.get_writer(), (
const xmlChar*)
"dapVersion", (
const xmlChar*)dap_version().c_str()) < 0)
467 throw InternalErr(__FILE__, __LINE__,
"Could not write attribute for dapVersion");
469 if (xmlTextWriterWriteAttribute(xml.get_writer(), (
const xmlChar*)
"dmrVersion", (
const xmlChar*)dmr_version().c_str()) < 0)
470 throw InternalErr(__FILE__, __LINE__,
"Could not write attribute for dapVersion");
472 if (xmlTextWriterWriteAttribute(xml.get_writer(), (
const xmlChar*)
"name", (
const xmlChar*)
name().c_str()) < 0)
473 throw InternalErr(__FILE__, __LINE__,
"Could not write attribute for name");
477 if (xmlTextWriterEndElement(xml.get_writer()) < 0)
478 throw InternalErr(__FILE__, __LINE__,
"Could not end the top-level Group element");
492 strm << DapIndent::LMarg <<
"DMR::dump - ("
493 << (
void *)
this <<
")" << endl ;
494 DapIndent::Indent() ;
495 strm << DapIndent::LMarg <<
"factory: " << (
void *)d_factory << endl ;
496 strm << DapIndent::LMarg <<
"name: " << d_name << endl ;
497 strm << DapIndent::LMarg <<
"filename: " << d_filename << endl ;
498 strm << DapIndent::LMarg <<
"protocol major: " << d_dap_major << endl;
499 strm << DapIndent::LMarg <<
"protocol minor: " << d_dap_minor << endl;
501 DapIndent::UnIndent() ;