Subversion Repositories Projects

Rev

Rev 406 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
406 joko 1
/*#######################################################################################*/
2
/* !!! THIS IS NOT FREE SOFTWARE !!!                                                     */
3
/*#######################################################################################*/
4
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
5
// + Copyright (c) 2008 Ingo Busker, Holger Buss
6
// + Nur für den privaten Gebrauch
7
// + FOR NON COMMERCIAL USE ONLY
8
// + www.MikroKopter.com
9
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
10
// + Es gilt für das gesamte Projekt (Hardware, Software, Binärfiles, Sourcecode und Dokumentation),
11
// + dass eine Nutzung (auch auszugsweise) nur für den privaten (nicht-kommerziellen) Gebrauch zulässig ist.
12
// + Sollten direkte oder indirekte kommerzielle Absichten verfolgt werden, ist mit uns (info@mikrokopter.de) Kontakt
13
// + bzgl. der Nutzungsbedingungen aufzunehmen.
14
// + Eine kommerzielle Nutzung ist z.B.Verkauf von MikroKoptern, Bestückung und Verkauf von Platinen oder Bausätzen,
15
// + Verkauf von Luftbildaufnahmen, usw.
16
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
17
// + Werden Teile des Quellcodes (mit oder ohne Modifikation) weiterverwendet oder veröffentlicht,
18
// + unterliegen sie auch diesen Nutzungsbedingungen und diese Nutzungsbedingungen incl. Copyright müssen dann beiliegen
19
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
20
// + Sollte die Software (auch auszugesweise) oder sonstige Informationen des MikroKopter-Projekts
21
// + auf anderen Webseiten oder sonstigen Medien veröffentlicht werden, muss unsere Webseite "http://www.mikrokopter.de"
22
// + eindeutig als Ursprung verlinkt werden
23
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
24
// + Keine Gewähr auf Fehlerfreiheit, Vollständigkeit oder Funktion
25
// + Benutzung auf eigene Gefahr
26
// + Wir übernehmen keinerlei Haftung für direkte oder indirekte Personen- oder Sachschäden
27
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
28
// + Die PORTIERUNG der Software (oder Teile davon) auf andere Systeme (ausser der Hardware von www.mikrokopter.de) ist nur
29
// + mit unserer Zustimmung zulässig
30
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
31
// + Die Funktion printf_P() unterliegt ihrer eigenen Lizenz und ist hiervon nicht betroffen
32
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
33
// + Redistributions of source code (with or without modifications) must retain the above copyright notice,
34
// + this list of conditions and the following disclaimer.
35
// +   * Neither the name of the copyright holders nor the names of contributors may be used to endorse or promote products derived
36
// +     from this software without specific prior written permission.
37
// +   * The use of this project (hardware, software, binary files, sources and documentation) is only permitted
38
// +     for non-commercial use (directly or indirectly)
39
// +     Commercial use (for excample: selling of MikroKopters, selling of PCBs, assembly, ...) is only permitted
40
// +     with our written permission
41
// +   * If sources or documentations are redistributet on other webpages, out webpage (http://www.MikroKopter.de) must be
42
// +     clearly linked as origin
43
// +   * PORTING this software (or part of it) to systems (other than hardware from www.mikrokopter.de) is NOT allowed
44
//
45
// +  THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
46
// +  AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
47
// +  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
48
// +  ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
49
// +  LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
50
// +  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
51
// +  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
52
// +  INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
53
// +  CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
54
// +  ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
55
// +  POSSIBILITY OF SUCH DAMAGE.
56
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
57
#include <stdlib.h>
58
#include <stdio.h>
59
#include "main.h"
60
#include "kml.h"
61
#include "kml_header.h"
62
 
63
 
64
//________________________________________________________________________________________________________________________________________
65
// Module name:                 kml.c
66
// Compiler used:               avr-gcc 3.4.5
67
// Last Modifikation:   22.03.2009
68
// Version:                             1.03
69
// Authors:                             Stephan Busker, Gregor Stobrawa
70
// Description:                 Source files to write gps-coordinates to a file in the kml (keyhole markup language) fileformat
71
//                                              Copyright (C) 2007 Stephan Busker
72
//........................................................................................................................................
73
// Functions:                   extern u8       KML_LoggGPSCoordinates(struct str_gps_nav_data , KML_Document_t *);     // intializes the kml-document with standard filename and adds points to the file
74
//                                              extern u8       KML_DocumentInit(KML_Document_t *doc)                                                           // initializes the kml-document to resetvalues.
75
//                                              extern u8       KML_DocumentOpen(s8 *, KML_Document_t *);                                                       // opens a new kml document. A filename can be specified.
76
//                                              extern u8       KML_DocumentClose(KML_Document_t *doc);                                                         // closes an open document
77
//                                              extern u8   KML_PlaceMarkOpen(KML_Document_t *);                                                                // opens a new placemark within the specified document
78
//                                              extern u8       KML_PlaceMarkClose(KML_Document_t *);                                                           // Closes the placemark
79
//                                              extern u8       KML_LineStringBegin(KML_Document_t *);                                                          // begins a new line within the actual placemark
80
//                                              extern u8       KML_LineStringEnd(KML_Document_t *doc);                                                         // ends the actual linestring
81
//                                              extern u8       KML_LineStringAddPoint(struct str_gps_nav_data, KML_Document_t *);      // adds a new point (gps-coordinates) to the actual linestring
82
//........................................................................................................................................
83
// ext. functions:
84
//
85
//........................................................................................................................................
86
//
87
// URL:                                 www.Mikro-Control.de
88
// mailto:                              stephan.busker@mikro-control.de
89
//________________________________________________________________________________________________________________________________________
90
 
91
 
92
 
93
//________________________________________________________________________________________________________________________________________
94
// Function:    KML_DocumentInit(KML_Document_t *)
95
//
96
// Description: This function initializes the kml-document for further use.
97
//
98
//
99
// Returnvalue: '1' if document was initialized
100
//________________________________________________________________________________________________________________________________________
101
 
102
uint8_t KML_DocumentInit(KML_Document_t *doc)
103
{                                                                                                              
104
        doc->state       = KML_DOC_CLOSED;                                                                                                      // state of the kml-document
105
        doc->file        = NULL;
106
        return(1);
107
}
108
 
109
//________________________________________________________________________________________________________________________________________
110
// Function:    KML_Document_Open(void);
111
//
112
// Description: This function opens a new KML- document with the specified name and creates the document header within the file.
113
//
114
//
115
// Returnvalue: '1' if the KML- file could be created.
116
//________________________________________________________________________________________________________________________________________
117
 
118
uint8_t KML_DocumentOpen(int8_t *name, KML_Document_t *doc)
119
{
120
 
121
        uint8_t retvalue = 0;
122
 
123
        if(doc == NULL) return(0);
124
 
125
        KML_DocumentInit(doc);                                                                                                          // intialize the document with resetvalues
126
        doc->file = fopen_(name,'a');                                                                                           // open a new file with the specified filename on the memorycard.
127
 
128
        if(doc->file != NULL)                                                                                                           // could the file be opened?
129
        {
130
                retvalue = 1;                                                                                                                   // the document could be created on the drive.
131
                doc->state = KML_DOC_OPENED;                                                                                            // change document state to opened. At next a placemark has to be opened.
132
                fwrite_((void*)KML_DOCUMENT_HEADER, sizeof(KML_DOCUMENT_HEADER)-1,1,doc->file);// write the KML-header to the document.
133
        }
134
 
135
        return(retvalue);
136
}
137
 
138
//________________________________________________________________________________________________________________________________________
139
// Function:    DocumentClose(KML_Document_t *doc);
140
//
141
// Description: This function closes the document specified by doc.
142
//
143
//
144
// Returnvalue: '1' if the KML- file could be closed.
145
//________________________________________________________________________________________________________________________________________
146
 
147
uint8_t KML_DocumentClose(KML_Document_t *doc)
148
{
149
 
150
        uint8_t retvalue = 1;
151
 
152
        if(doc == NULL) return(0);
153
 
154
        while(doc->state != KML_DOC_CLOSED)                                                             // close linestring, placemark and document before closing the file on the memorycard
155
        {
156
                switch(doc->state)
157
                {
158
                        case KML_DOC_LINESTRING_OPENED:
159
                                KML_LineStringEnd(doc);                                                 // write terminating tag to end linestring.
160
                                break;
161
 
162
                        case KML_DOC_PLACEMARK_OPENED:                                                  // write terminating tag to close placemark.
163
                                KML_PlaceMarkClose(doc);
164
                                break;
165
 
166
                        case KML_DOC_OPENED:                                                                    // close the file on the memorycard
167
                                if(doc->file != NULL)
168
                                {
169
                                        fwrite_((void*)KML_DOCUMENT_FOOTER, sizeof(KML_DOCUMENT_FOOTER)-1,1,doc->file); // write the KML- footer to the document.
170
                                        fclose_(doc->file);
171
                                        retvalue = 1;
172
                                }
173
                                doc->state = KML_DOC_CLOSED;
174
                                break;
175
 
176
                        default:
177
                                doc->state = KML_DOC_CLOSED;
178
                                break;
179
 
180
                }
181
        }
182
        return(retvalue);
183
}
184
 
185
//________________________________________________________________________________________________________________________________________
186
// Function:    u8 KML_PlaceMarkOpen(KML_Document_t *doc);
187
//
188
// Description: This function adds a placemark to the document.
189
//
190
//
191
// Returnvalue: '1' if the PlaceMark could be opened
192
//________________________________________________________________________________________________________________________________________
193
 
194
uint8_t KML_PlaceMarkOpen(KML_Document_t *doc)
195
{
196
        uint8_t retvalue = 0;
197
        if(doc->state == KML_DOC_OPENED)
198
        {
199
                if(doc->file != NULL)
200
                {
201
                        doc->state = KML_DOC_PLACEMARK_OPENED;
202
                        retvalue = 1;
203
                        fwrite_((void*)KML_PLACEMARK_HEADER, sizeof(KML_PLACEMARK_HEADER)-1,1,doc->file);
204
                }
205
        }
206
        return(retvalue);
207
}
208
 
209
//________________________________________________________________________________________________________________________________________
210
// Function:    u8 PlaceMarkClose(KML_PlaceMark_t *place, File *file);
211
//
212
// Description: This function ends the placemark opened before.
213
//
214
//
215
// Returnvalue: 1' if the PlaceMark could be closed
216
//________________________________________________________________________________________________________________________________________
217
 
218
uint8_t KML_PlaceMarkClose(KML_Document_t *doc)
219
{
220
 
221
        uint8_t retvalue = 0;                                                                                                                   // close the Placemark-tag of the corosponding document.
222
 
223
        if(doc->state == KML_DOC_PLACEMARK_OPENED)
224
        {
225
                if(doc->file != NULL)
226
                {
227
                        doc->state = KML_DOC_OPENED;
228
                        fwrite_((void*)KML_PLACEMARK_FOOTER, sizeof(KML_PLACEMARK_FOOTER)-1,1,doc->file);
229
                        retvalue = 1;
230
                }
231
        }
232
 
233
        return(retvalue);
234
}
235
 
236
//________________________________________________________________________________________________________________________________________
237
// Function:    u8 LineStringBegin(KML_Document_t *doc);
238
//
239
// Description: This function ends the placemark opened before.
240
//
241
//
242
// Returnvalue: '1' if the LineString could be started
243
//________________________________________________________________________________________________________________________________________
244
 
245
uint8_t KML_LineStringBegin(KML_Document_t *doc)
246
{
247
 
248
        uint8_t retvalue = 0;
249
 
250
        if(doc->state == KML_DOC_PLACEMARK_OPENED)
251
        {
252
                if(doc->file != NULL)
253
                {
254
                        doc->state = KML_DOC_LINESTRING_OPENED;
255
                        fwrite_((void*)KML_LINESTRING_HEADER, sizeof(KML_LINESTRING_HEADER)-1,1,doc->file);
256
                        retvalue = 1;
257
                }
258
        }
259
        return(retvalue);
260
}
261
 
262
//________________________________________________________________________________________________________________________________________
263
// Function:    u8 KML_LineStringEnd(KML_Document_t *doc)
264
//
265
// Description: This function ends the placemark opened before.
266
//
267
//
268
// Returnvalue: '1' if the LineString could be terminated
269
//________________________________________________________________________________________________________________________________________
270
 
271
uint8_t KML_LineStringEnd(KML_Document_t *doc)
272
{
273
 
274
        uint8_t retvalue = 0;
275
 
276
        if(doc->state == KML_DOC_LINESTRING_OPENED)
277
        {
278
                if(doc->file != NULL)
279
                {
280
                        doc->state = KML_DOC_PLACEMARK_OPENED;
281
                        fwrite_((void*)KML_LINESTRING_FOOTER, sizeof(KML_LINESTRING_FOOTER)-1,1,doc->file);
282
                        retvalue = 1;
283
                }
284
        }
285
        return(retvalue);
286
}
287
 
288
//________________________________________________________________________________________________________________________________________
289
// Function:    u8 LineStringAddPoint(gps_data_t, KML_Document_t *doc)
290
//
291
// Description: This function adds a point to the specified document.
292
//
293
//
294
// Returnvalue: '1' if a ppoint was added could be started
295
//________________________________________________________________________________________________________________________________________
296
 
297
uint8_t KML_LineStringAddPoint(KML_Document_t *doc)
298
{
299
 
300
        uint8_t retvalue = 0;
301
        int8_t string[50];
414 joko 302
//      int32_t rel_altitude = 0;
406 joko 303
 
304
        if(doc == NULL) return(0);
305
 
306
        //if((GPSData.Position.Status != INVALID) && (GPS_HomePosition.Status != INVALID))
307
        {
308
                if(doc->state == KML_DOC_LINESTRING_OPENED)
309
                {
310
                        if(doc->file != NULL)
311
                        {
414 joko 312
                                int16_t i1, i2, i3;
406 joko 313
                                uint8_t sign;
314
                                if(GPSData.Position.Longitude < 0) sign = '-';
315
                                else sign = '+';
414 joko 316
                                i1 = (int16_t)(GPSData.Position.Longitude/10000000L);
317
                                i2 = abs((int16_t)((GPSData.Position.Longitude%10000000L)/10000L));
318
                                i3 = abs((int16_t)(((GPSData.Position.Longitude%10000000L)%10000L)/10L));
319
                                sprintf(string,"\r\n%c%d.%.3d%",sign, i1, i2, i3);
406 joko 320
                                fputs_(string, doc->file);
321
                                if(GPSData.Position.Latitude < 0) sign = '-';
322
                                else sign = '+';
414 joko 323
                                i1 = (int16_t)(GPSData.Position.Latitude/10000000L);
324
                                i2 = abs((int16_t)((GPSData.Position.Latitude%10000000L)/10000L));
325
                                i3 = abs((int16_t)(((GPSData.Position.Latitude%10000000L)%10000L)/10L));
326
                                sprintf(string,"\r\n%c%d.%.3d%",sign, i1, i2, i3);
406 joko 327
                                fputs_(string, doc->file);
414 joko 328
                                sprintf(string,"\r\n%c%d.%.3d%",0.0 );
329
                                fputs_(string, doc->file);
406 joko 330
                                retvalue = 1;
331
                        }
332
                }
333
        }
334
 
335
        return(retvalue);
336
}
337
 
338
//________________________________________________________________________________________________________________________________________
339
// Function:    u8 KML_LoggGPSCoordinates(gps_data_t *, KML_Document_t *)
340
//
341
// Description: This function opens adds gpscoordinates to an KML-Document. The document will be opened, if not already done
342
//
343
//
344
// Returnvalue: '1' if an gps coordinate was logged
345
//________________________________________________________________________________________________________________________________________
346
 
347
uint8_t KML_LoggGPSCoordinates(KML_Document_t *doc)
348
{
349
        uint8_t retval = 0;
350
        while(doc->state != KML_DOC_LINESTRING_OPENED)                                  // automatic create document with default filename on the card.
351
        {
352
                switch(doc->state)
353
                {
354
                        case KML_DOC_CLOSED:                                                                    // document hasn't been opened yet therefore it will be initialized automatically
355
                                retval = KML_DocumentOpen("default.kml",doc);   // open the kml-document with a standardname.
356
                        break;
357
 
358
                        case KML_DOC_OPENED:                                                                    // if a document has been opened before but no placemark exists:
359
                                retval = KML_PlaceMarkOpen(doc);
360
                        break;
361
 
362
                        case KML_DOC_PLACEMARK_OPENED:                                                  // add linestring to the placemark
363
                                retval = KML_LineStringBegin(doc);
364
                        break;
365
 
366
                        default:
367
                                retval = 0;
368
                        break;
369
 
370
                }
371
                if(retval != 1) return(retval); // stop on error
372
        }
373
 
374
        if(doc->state == KML_DOC_LINESTRING_OPENED)                                             // if the document was opened add coordinates to the document.
375
        {
376
                retval = KML_LineStringAddPoint(doc);
377
        }
378
        return(retval);
379
}
380