41#include <wx/datetime.h>
42#include <wx/clipbrd.h>
44#include "model/ocpn_types.h"
48#include "model/track.h"
49#include "model/route.h"
50#include "ocpn_frame.h"
51#include "model/own_ship.h"
53int Kml::seqCounter = 0;
54bool Kml::insertQtVlmExtendedData =
false;
56int Kml::ParseCoordinates(TiXmlNode* node, dPointList& points) {
57 TiXmlElement* e = node->FirstChildElement(
"coordinates");
59 wxString msg(
"KML Parser found no <coordinates> for the element: ");
60 msg << wxString(node->ToElement()->Value(), wxConvUTF8);
69 std::stringstream ss(e->GetText());
73 if (!std::getline(ss, txtCoord,
','))
break;
75 if (txtCoord.length() == 0)
break;
77 point.x = atof(txtCoord.c_str());
78 std::getline(ss, txtCoord,
',');
79 point.y = atof(txtCoord.c_str());
80 std::getline(ss, txtCoord,
' ');
81 point.z = atof(txtCoord.c_str());
83 points.push_back(point);
88KmlPastebufferType Kml::ParseTrack(TiXmlNode* node, wxString& name) {
89 parsedTrack =
new Track();
90 parsedTrack->SetName(name);
92 if (0 == strncmp(node->ToElement()->Value(),
"LineString", 10)) {
93 dPointList coordinates;
94 if (ParseCoordinates(node, coordinates) > 2) {
97 for (
unsigned int i = 0; i < coordinates.size(); i++) {
98 trackpoint =
new TrackPoint(coordinates[i].y, coordinates[i].x);
99 parsedTrack->AddPoint(trackpoint);
102 return KML_PASTE_TRACK;
105 if (0 == strncmp(node->ToElement()->Value(),
"gx:Track", 8)) {
107 TiXmlElement* point = node->FirstChildElement(
"gx:coord");
108 int pointCounter = 0;
110 for (; point; point = point->NextSiblingElement(
"gx:coord")) {
112 std::stringstream ss(point->GetText());
113 std::string txtCoord;
114 std::getline(ss, txtCoord,
' ');
115 lon = atof(txtCoord.c_str());
116 std::getline(ss, txtCoord,
' ');
117 lat = atof(txtCoord.c_str());
119 parsedTrack->AddPoint(
new TrackPoint(lat, lon));
123 TiXmlElement* when = node->FirstChildElement(
"when");
128 for (; when; when = when->NextSiblingElement(
"when")) {
129 trackpoint = parsedTrack->GetPoint(i);
130 if (!trackpoint)
continue;
131 whenTime.ParseFormat(wxString(when->GetText(), wxConvUTF8),
132 "%Y-%m-%dT%H:%M:%SZ");
137 return KML_PASTE_TRACK;
139 return KML_PASTE_INVALID;
142KmlPastebufferType Kml::ParseOnePlacemarkPoint(TiXmlNode* node,
144 double newLat = 0., newLon = 0.;
145 dPointList coordinates;
147 if (ParseCoordinates(node->ToElement(), coordinates)) {
148 newLat = coordinates[0].y;
149 newLon = coordinates[0].x;
152 if (newLat == 0.0 && newLon == 0.0) {
153 wxString msg(
"KML Parser failed to convert <Point> coordinates.");
155 return KML_PASTE_INVALID;
157 wxString pointName = wxEmptyString;
158 TiXmlElement* e = node->Parent()->FirstChild(
"name")->ToElement();
159 if (e) pointName = wxString(e->GetText(), wxConvUTF8);
161 wxString pointDescr = wxEmptyString;
162 e = node->Parent()->FirstChildElement(
"description");
167 TiXmlNode* n = e->FirstChild();
168 if (n)
switch (n->Type()) {
169 case TiXmlNode::TINYXML_TEXT:
170 pointDescr = wxString(e->GetText(), wxConvUTF8);
172 case TiXmlNode::TINYXML_ELEMENT:
173 TiXmlPrinter printer;
174 printer.SetIndent(
"\t");
176 pointDescr = wxString(printer.CStr(), wxConvUTF8);
182 TiXmlNode* n = node->Parent()->FirstChild(
"ExtendedData");
184 TiXmlPrinter printer;
185 printer.SetIndent(
"\t");
187 pointDescr = wxString(printer.CStr(), wxConvUTF8);
192 parsedRoutePoint->m_lat = newLat;
193 parsedRoutePoint->m_lon = newLon;
197 parsedRoutePoint->SetName(pointName);
199 return KML_PASTE_WAYPOINT;
202KmlPastebufferType Kml::ParsePasteBuffer() {
203 if (!wxTheClipboard->IsOpened())
204 if (!wxTheClipboard->Open())
return KML_PASTE_INVALID;
206 wxTextDataObject data;
207 wxTheClipboard->GetData(data);
208 kmlText = data.GetText();
209 wxTheClipboard->Close();
211 if (kmlText.Find(
"<kml") == wxNOT_FOUND)
return KML_PASTE_INVALID;
214 if (!doc.Parse(kmlText.mb_str(wxConvUTF8), 0, TIXML_ENCODING_UTF8)) {
215 wxLogError(wxString(doc.ErrorDesc(), wxConvUTF8));
216 return KML_PASTE_INVALID;
218 if (0 != strncmp(doc.RootElement()->Value(),
"kml", 3))
219 return KML_PASTE_INVALID;
221 TiXmlHandle docHandle(doc.RootElement());
224 TiXmlElement* placemark =
225 docHandle.FirstChild(
"Document").FirstChild(
"Placemark").ToElement();
227 placemark = docHandle.FirstChild(
"Placemark").ToElement();
230 wxString msg(
"KML Parser found no <Placemark> tag in the KML.");
232 return KML_PASTE_INVALID;
235 int pointCounter = 0;
237 for (; placemark; placemark = placemark->NextSiblingElement()) {
238 TiXmlElement* e = placemark->FirstChildElement(
"name");
239 if (e) name = wxString(e->GetText(), wxConvUTF8);
243 if (pointCounter == 1) {
245 TiXmlNode* element = docHandle.FirstChild(
"Document")
246 .FirstChild(
"Placemark")
250 element = docHandle.FirstChild(
"Placemark").FirstChild(
"Point").ToNode();
251 if (element)
return ParseOnePlacemarkPoint(element, name);
254 element = docHandle.FirstChild(
"Document")
255 .FirstChild(
"Placemark")
256 .FirstChild(
"LineString")
260 docHandle.FirstChild(
"Placemark").FirstChild(
"LineString").ToNode();
261 if (element)
return ParseTrack(element, name);
264 element = docHandle.FirstChild(
"Document")
265 .FirstChild(
"Placemark")
266 .FirstChild(
"gx:Track")
270 docHandle.FirstChild(
"Placemark").FirstChild(
"gx:Track").ToNode();
271 if (element)
return ParseTrack(element, name);
274 "KML Parser found a single <Placemark> in the KML, but no useable "
277 return KML_PASTE_INVALID;
282 parsedRoute =
new Route();
283 bool foundPoints =
false;
284 bool foundTrack =
false;
285 TiXmlElement* element =
286 docHandle.FirstChild(
"Document").FirstChild(
"name").ToElement();
291 docHandle.FirstChild(
"Document").FirstChild(
"Placemark").ToElement();
292 for (; placemark; placemark = placemark->NextSiblingElement()) {
293 TiXmlNode* n = placemark->FirstChild(
"Point");
295 if (ParseOnePlacemarkPoint(n->ToElement(), name) == KML_PASTE_WAYPOINT) {
296 parsedRoute->AddPoint(
new RoutePoint(parsedRoutePoint));
297 delete parsedRoutePoint;
298 parsedRoutePoint = 0;
303 n = placemark->FirstChild(
"LineString");
305 ParseTrack(n->ToElement(), name);
308 n = placemark->FirstChild(
"gx:Track");
310 ParseTrack(n->ToElement(), name);
315 if (foundPoints && parsedRoute->GetnPoints() < 2) {
316 wxString msg(
"KML Parser did not find enough <Point>s to make a route.");
321 if (foundPoints && !foundTrack)
return KML_PASTE_ROUTE;
322 if (foundPoints && foundTrack)
return KML_PASTE_ROUTE_TRACK;
323 if (!foundPoints && foundTrack)
return KML_PASTE_TRACK;
324 return KML_PASTE_INVALID;
327TiXmlElement* Kml::StandardHead(TiXmlDocument& xmlDoc, wxString name) {
328 TiXmlDeclaration* decl =
new TiXmlDeclaration(
"1.0",
"UTF-8",
"");
329 xmlDoc.LinkEndChild(decl);
331 TiXmlElement* kml =
new TiXmlElement(
"kml");
332 kml->SetAttribute(
"xmlns:atom",
"http://www.w3.org/2005/Atom");
333 kml->SetAttribute(
"xmlns",
"http://www.opengis.net/kml/2.2");
334 kml->SetAttribute(
"xmlns:gx",
"http://www.google.com/kml/ext/2.2");
335 kml->SetAttribute(
"xmlns:kml",
"http://www.opengis.net/kml/2.2");
337 if (insertQtVlmExtendedData)
338 kml->SetAttribute(
"xmlns:vlm",
"http://virtual-loup-de-mer.org");
340 xmlDoc.LinkEndChild(kml);
342 TiXmlElement* document =
new TiXmlElement(
"Document");
343 kml->LinkEndChild(document);
344 TiXmlElement* docName =
new TiXmlElement(
"name");
345 document->LinkEndChild(docName);
346 TiXmlText* docNameVal =
new TiXmlText(name.mb_str(wxConvUTF8));
347 docName->LinkEndChild(docNameVal);
351std::string Kml::PointPlacemark(TiXmlElement* document,
353 TiXmlElement* pmPoint =
new TiXmlElement(
"Placemark");
354 document->LinkEndChild(pmPoint);
355 TiXmlElement* pmPointName =
new TiXmlElement(
"name");
356 pmPoint->LinkEndChild(pmPointName);
357 TiXmlText* pmPointNameVal =
358 new TiXmlText(routepoint->GetName().mb_str(wxConvUTF8));
359 pmPointName->LinkEndChild(pmPointNameVal);
361 TiXmlElement* pointDescr =
new TiXmlElement(
"description");
362 pmPoint->LinkEndChild(pointDescr);
364 bool descrIsPlainText =
true;
367 if (insertQtVlmExtendedData) {
370 TiXmlDocument descrDoc;
371 TiXmlElement* extendedData;
372 if (descrDoc.Parse(descrString, 0, TIXML_ENCODING_UTF8)) {
373 if (0 == strncmp(descrDoc.RootElement()->Value(),
"ExtendedData", 12)) {
374 descrIsPlainText =
false;
375 extendedData = descrDoc.RootElement();
376 TiXmlHandle docHandle(&descrDoc);
377 TiXmlElement* seq = docHandle.FirstChild(
"ExtendedData")
378 .FirstChild(
"vlm:sequence")
381 seq =
new TiXmlElement(
"vlm:sequence");
382 TiXmlText* snVal =
new TiXmlText(
383 wxString::Format(
"%04d", seqCounter).mb_str(wxConvUTF8));
384 seq->LinkEndChild(snVal);
385 descrDoc.RootElement()->LinkEndChild(seq);
387 pmPoint->LinkEndChild(descrDoc.RootElement()->Clone());
390 if (descrIsPlainText) {
393 extendedData =
new TiXmlElement(
"ExtendedData");
394 pmPoint->LinkEndChild(extendedData);
395 TiXmlElement* seq =
new TiXmlElement(
"vlm:sequence");
396 extendedData->LinkEndChild(seq);
397 TiXmlText* snVal =
new TiXmlText(
398 wxString::Format(
"%04d", seqCounter).mb_str(wxConvUTF8));
399 seq->LinkEndChild(snVal);
402 TiXmlElement* data =
new TiXmlElement(
"Data");
403 data->SetAttribute(
"name",
"Description");
404 extendedData->LinkEndChild(data);
406 TiXmlElement* value =
new TiXmlElement(
"value");
407 data->LinkEndChild(value);
408 TiXmlText* txtVal =
new TiXmlText(descrString);
409 value->LinkEndChild(txtVal);
412 if (extendedData && seqCounter == 0) {
413 const wxCharBuffer ownshipPos =
414 wxString::Format(
"%f %f", gLon, gLat).mb_str(wxConvUTF8);
415 TiXmlHandle h(extendedData);
416 TiXmlElement* route = h.FirstChild(
"vlm:route").ToElement();
417 TiXmlElement* ownship =
418 h.FirstChild(
"vlm:route").FirstChild(
"ownship").ToElement();
421 TiXmlText* owns = ownship->FirstChild()->ToText();
423 owns->SetValue(ownshipPos);
425 owns =
new TiXmlText(ownshipPos);
426 ownship->LinkEndChild(owns);
429 ownship =
new TiXmlElement(
"ownship");
430 route->LinkEndChild(ownship);
431 TiXmlText* owns =
new TiXmlText(ownshipPos);
432 ownship->LinkEndChild(owns);
435 route =
new TiXmlElement(
"vlm:route");
436 extendedData->LinkEndChild(route);
437 ownship =
new TiXmlElement(
"ownship");
438 route->LinkEndChild(ownship);
439 TiXmlText* owns =
new TiXmlText(ownshipPos);
440 ownship->LinkEndChild(owns);
447 TiXmlText* pointDescrVal =
new TiXmlText(descrString);
448 pointDescr->LinkEndChild(pointDescrVal);
451 TiXmlElement* point =
new TiXmlElement(
"Point");
452 pmPoint->LinkEndChild(point);
454 TiXmlElement* pointCoord =
new TiXmlElement(
"coordinates");
455 point->LinkEndChild(pointCoord);
457 std::stringstream pointCoordStr;
458 pointCoordStr << routepoint->m_lon <<
"," << routepoint->m_lat <<
",0. ";
460 TiXmlText* pointText =
new TiXmlText(pointCoordStr.str());
461 pointCoord->LinkEndChild(pointText);
463 return pointCoordStr.str();
466wxString Kml::MakeKmlFromRoute(
Route* route,
bool insertSeq) {
467 insertQtVlmExtendedData = insertSeq;
469 TiXmlDocument xmlDoc;
470 wxString name = _(
"OpenCPN Route");
472 TiXmlElement* document = StandardHead(xmlDoc, name);
474 std::stringstream lineStringCoords;
477 wxRoutePointListNode* pointnode = pointList->GetFirst();
481 routepoint = pointnode->GetData();
483 lineStringCoords << PointPlacemark(document, routepoint);
485 pointnode = pointnode->GetNext();
488 TiXmlElement* pmPath =
new TiXmlElement(
"Placemark");
489 document->LinkEndChild(pmPath);
491 TiXmlElement* pmName =
new TiXmlElement(
"name");
492 pmPath->LinkEndChild(pmName);
493 TiXmlText* pmNameVal =
new TiXmlText(
"Path");
494 pmName->LinkEndChild(pmNameVal);
496 TiXmlElement* linestring =
new TiXmlElement(
"LineString");
497 pmPath->LinkEndChild(linestring);
499 TiXmlElement* coordinates =
new TiXmlElement(
"coordinates");
500 linestring->LinkEndChild(coordinates);
502 TiXmlText* text =
new TiXmlText(lineStringCoords.str());
503 coordinates->LinkEndChild(text);
505 TiXmlPrinter printer;
506 printer.SetIndent(
" ");
507 xmlDoc.Accept(&printer);
509 return wxString(printer.CStr(), wxConvUTF8);
512wxString Kml::MakeKmlFromTrack(
Track* track) {
513 TiXmlDocument xmlDoc;
514 wxString name = _(
"OpenCPN Track");
515 if (track->GetName().Length()) name = track->GetName();
516 TiXmlElement* document = StandardHead(xmlDoc, name);
518 TiXmlElement* pmTrack =
new TiXmlElement(
"Placemark");
519 document->LinkEndChild(pmTrack);
521 TiXmlElement* pmName =
new TiXmlElement(
"name");
522 pmTrack->LinkEndChild(pmName);
523 TiXmlText* pmNameVal =
new TiXmlText(track->GetName().mb_str(wxConvUTF8));
524 pmName->LinkEndChild(pmNameVal);
526 TiXmlElement* gxTrack =
new TiXmlElement(
"gx:Track");
527 pmTrack->LinkEndChild(gxTrack);
529 std::stringstream lineStringCoords;
531 for (
int i = 0; i < track->GetnPoints(); i++) {
534 TiXmlElement* when =
new TiXmlElement(
"when");
535 gxTrack->LinkEndChild(when);
539 new TiXmlText(whenTime.Format(
"%Y-%m-%dT%H:%M:%SZ").mb_str(wxConvUTF8));
540 when->LinkEndChild(whenVal);
543 for (
int i = 0; i < track->GetnPoints(); i++) {
546 TiXmlElement* coord =
new TiXmlElement(
"gx:coord");
547 gxTrack->LinkEndChild(coord);
549 wxString::Format(
"%f %f 0.0", trackpoint->m_lon, trackpoint->m_lat);
550 TiXmlText* coordVal =
new TiXmlText(coordStr.mb_str(wxConvUTF8));
551 coord->LinkEndChild(coordVal);
554 TiXmlPrinter printer;
555 printer.SetIndent(
" ");
556 xmlDoc.Accept(&printer);
558 return wxString(printer.CStr(), wxConvUTF8);
561wxString Kml::MakeKmlFromWaypoint(
RoutePoint* routepoint) {
562 TiXmlDocument xmlDoc;
563 wxString name = _(
"OpenCPN Waypoint");
564 if (routepoint->GetName().Length()) name = routepoint->GetName();
565 TiXmlElement* document = StandardHead(xmlDoc, name);
567 insertQtVlmExtendedData =
false;
568 PointPlacemark(document, routepoint);
570 TiXmlPrinter printer;
571 printer.SetIndent(
" ");
572 xmlDoc.Accept(&printer);
574 return wxString(printer.CStr(), wxConvUTF8);
577void Kml::CopyRouteToClipboard(
Route* route) {
579 int format = formatDlg->ShowModal();
581 if (format != wxID_CANCEL) {
582 format = formatDlg->GetSelectedFormat();
583 bool extradata = (format == KML_COPY_EXTRADATA);
585 ::wxBeginBusyCursor();
586 if (wxTheClipboard->Open()) {
587 wxTextDataObject* data =
new wxTextDataObject;
588 data->SetText(MakeKmlFromRoute(route, extradata));
589 wxTheClipboard->SetData(data);
596void Kml::CopyTrackToClipboard(
Track* track) {
597 ::wxBeginBusyCursor();
598 if (wxTheClipboard->Open()) {
599 wxTextDataObject* data =
new wxTextDataObject;
600 data->SetText(MakeKmlFromTrack(track));
601 wxTheClipboard->SetData(data);
606void Kml::CopyWaypointToClipboard(
RoutePoint* rp) {
607 if (wxTheClipboard->Open()) {
608 wxTextDataObject* data =
new wxTextDataObject;
609 data->SetText(MakeKmlFromWaypoint(rp));
610 wxTheClipboard->SetData(data);
617 parsedRoutePoint = NULL;
623 for (
int i = 1; i <= parsedRoute->GetnPoints(); i++) {
624 if (parsedRoute->GetPoint(i))
delete parsedRoute->GetPoint(i);
628 delete parsedRoutePoint;
633KmlFormatDialog::KmlFormatDialog(wxWindow* parent)
634 : wxDialog(parent, wxID_ANY, _(
"Choose Format for Copy"), wxDefaultPosition,
636 wxBoxSizer* topSizer =
new wxBoxSizer(wxVERTICAL);
638 wxBoxSizer* sizer =
new wxBoxSizer(wxVERTICAL);
639 topSizer->Add(sizer, 0, wxALIGN_CENTER_HORIZONTAL | wxALL, 5);
641 choices.push_back(
new wxRadioButton(
642 this, KML_COPY_STANDARD, _(
"KML Standard (Google Earth and others)"),
643 wxDefaultPosition, wxDefaultSize, wxRB_GROUP));
645 choices.push_back(
new wxRadioButton(
646 this, KML_COPY_EXTRADATA, _(
"KML with extended waypoint data (QtVlm)"),
649 wxStdDialogButtonSizer* buttonSizer =
650 CreateStdDialogButtonSizer(wxOK | wxCANCEL);
652 sizer->Add(choices[0], 0, wxEXPAND | wxALL, 5);
653 sizer->Add(choices[1], 0, wxEXPAND | wxALL, 5);
654 sizer->Add(buttonSizer, 0, wxEXPAND | wxTOP, 5);
656 topSizer->SetSizeHints(
this);
660int KmlFormatDialog::GetSelectedFormat() {
661 for (
unsigned int i = 0; i < choices.size(); i++) {
662 if (choices[i]->GetValue())
return choices[i]->GetId();
Represents a waypoint or mark within the navigation system.
wxString m_MarkDescription
Description text for the waypoint.
bool m_bIsolatedMark
Flag indicating if the waypoint is a standalone mark.
bool m_bPtIsSelected
Flag indicating if this waypoint is currently selected.
Represents a navigational route in the navigation system.
RoutePointList * pRoutePointList
Ordered list of waypoints (RoutePoints) that make up this route.
wxString m_RouteNameString
User-assigned name for the route.
Represents a single point in a track.
wxDateTime GetCreateTime(void)
Retrieves the creation timestamp of a track point as a wxDateTime object.
void SetCreateTime(wxDateTime dt)
Sets the creation timestamp for a track point.
Represents a track, which is a series of connected track points.