Subversion Repositories NaviCtrl

Rev

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

Rev Author Line No. Line
349 ingob 1
/*#######################################################################################*/
2
/* !!! THIS IS NOT FREE SOFTWARE !!!                                                     */
3
/*#######################################################################################*/
4
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
396 ingob 5
// + Copyright (c) 2008 Ingo Busker, Holger Buss
6
// + Nur für den privaten Gebrauch / NON-COMMERCIAL USE ONLY
7
// + FOR NON COMMERCIAL USE ONLY
349 ingob 8
// + www.MikroKopter.com
9
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
396 ingob 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.
349 ingob 16
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
396 ingob 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
349 ingob 19
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
396 ingob 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
349 ingob 23
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
396 ingob 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
349 ingob 27
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
396 ingob 28
// + Die Portierung oder Nutzung 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 the sources to other systems or using the software on other systems (except 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
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
349 ingob 57
 
58
#include <stdio.h>
59
#include <stdarg.h>
60
#include <string.h>
61
#include "91x_lib.h"
62
#include "config.h"
63
#include "main.h"
64
#include "fat16.h"
65
#include "ftphelper.h"
66
#include "mkprotocol.h"
67
#include "debug.h"
68
#include "uart1.h"
69
 
70
 
71
typedef struct
72
{
73
  u8            Name[13];
74
  u8            Attribute;
75
  u32           Size;
76
} __attribute__((packed)) FTP_direntry_t;
77
 
78
FTP_direntry_t FTP_direntry;
79
 
396 ingob 80
char FTP_data[DATA_TRANSFER_SIZE+10];                             //  rx & tx buffer to avoid 2 buffers
349 ingob 81
 
880 holgerb 82
  #define KEYWORD_COUNT 56
427 killagreg 83
  // most used gpx tags can be compressed 
349 ingob 84
  const char keyword[KEYWORD_COUNT][16]=
85
                                        {"Altimeter>\0    \0",
435 ingob 86
                                         "MotorCurrent>\0 \0",
349 ingob 87
                                         "Current>\0      \0",
88
                                         "Variometer>\0   \0",
89
                                         "GroundSpeed>\0  \0",
90
                                         "VerticalSpeed>\0\0",
91
                                         "FlightTime>\0   \0",
92
                                         "Voltage>\0      \0",
93
                                         "Capacity>\0     \0",
94
                                         "RCQuality>\0    \0",
95
                                         "RCRSSI>\0       \0",
96
                                         "Compass>\0      \0",
97
                                         "NickAngle>\0    \0",
98
                                         "RollAngle>\0    \0",
99
                                         "NCFlag>\0       \0",
100
                                         "ErrorCode>\0    \0",
101
                                         "TargetBearing>\0\0",
102
                                         "RCSticks>\0     \0",
103
                                         "GPSSticks>\0    \0",
104
                                         "extensions>\0   \0",
105
                                         "Course>\0       \0",
106
                                         "trkpt\0         \0",
107
                                         "time>\0         \0",
108
                                         "sat>\0          \0",
109
                                         "ele>\0          \0",
110
                                         " lat=\0         \0",
111
                                         " lon=\0         \0",
435 ingob 112
                                         "0,0,0,0\0       \0",
434 holgerb 113
                                         "name>\0         \0",
114
                                         "FCFlags2>\0     \0",
115
                                         "MagnetField>\0  \0",
116
                                         "trkseg>\0       \0",
117
                                         "AnalogInputs>\0 \0",
118
                                         "Servo>\0        \0",
119
                                         "BL_State>\0     \0",
120
                                         "BL_MaxPWM>\0    \0",
121
                                         "MikroKopter\0   \0",
435 ingob 122
                                         "nter>000</\0    \0",
434 holgerb 123
                                         "metadata>\0     \0",
436 holgerb 124
                                         "Speak>\0        \0",
671 holgerb 125
                                         "MotorNOK>\0     \0",
126
                                         "Gas>\0          \0",
127
                                         "ShutterCnt>\0   \0",
128
                                         "ele_raw>\0      \0",
129
                                         "GPSInfo>\0      \0",
864 holgerb 130
                                         "Gimbal>\0       \0",
131
                                         "Laser>\0        \0",
865 holgerb 132
                                         "ExCtl>\0        \0",
434 holgerb 133
                                         "<WP>----,0,0,0<\0",
134
                                         "MagnetInclinati\0",
435 ingob 135
                                         "BL_Temperature>\0",
434 holgerb 136
                                         "AvaiableMotorPo\0",
435 ingob 137
                                         "FC_I2C_ErrorCou\0",    
138
                                         "FC_SPI_ErrorCou\0",
880 holgerb 139
                                         "TargetDistance>\0",
140
                                         "_ErrorCounter>\0 "
671 holgerb 141
                                         };
142
//ACHTUNG: ggf. DATA_TRANSFER_SIZE vergrössern
434 holgerb 143
 
435 ingob 144
u16 CompressBuffer(char *buf, u16 size, u16 offset)
145
{
146
 
349 ingob 147
  u16 i, count = size;
148
  char *s = NULL, *start = buf+offset;
149
 
150
   for ( i = 0; i < KEYWORD_COUNT; i++)
151
   {
152
                s = strstr(start, keyword[i]);
153
                if (s != NULL)
154
                {       u8 keylen = strlen(keyword[i]);
155
                        *s= 27;  
156
                        *(s+1) = i+1;
157
                        count-= (keylen-2);
158
                        memcpy(s+2, s+keylen, count - (s-buf));
159
                        i--;
160
                }
161
        }
162
 
163
   return (count);
164
}
165
// --------------------------------------------------------------------
166
void CheckFTPCommand(u8 FTP_command)
167
{
427 killagreg 168
        static Find_t fe;
169
        static File_t *fp = NULL;
170
        static u8 blockindex, compressLevel = 0;
349 ingob 171
 
427 killagreg 172
        u32 filesize;
173
 
174
        switch (FTP_command)
175
        {
176
                case FTP_CMD_FINDFIRST:
177
                        FTP_direntry.Name[0] = 0;
178
                        // any file or directory except volume labels and hidden files 
179
                        if(findfirst_("*.*", (ATTR_ARCHIVE|ATTR_SUBDIRECTORY|ATTR_SYSTEM|ATTR_READONLY), &fe))
180
                        {
181
                                memcpy(&FTP_direntry.Name, &fe.name, 13);      
182
                                FTP_direntry.Attribute = fe.fp.Attribute;
183
                                FTP_direntry.Size = fe.fp.Size;
184
                        }
185
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &FTP_direntry, sizeof(FTP_direntry));
186
                        break;
349 ingob 187
 
427 killagreg 188
                case FTP_CMD_FINDNEXT:
189
                        FTP_direntry.Name[0] = 0;
190
                        if (findnext_(&fe))
191
                        {
192
                                memcpy(&FTP_direntry.Name, &fe.name, 13);      
193
                                FTP_direntry.Attribute = fe.fp.Attribute;
194
                                FTP_direntry.Size = fe.fp.Size;
195
                        }
196
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &FTP_direntry, sizeof(FTP_direntry));
197
                        break;
349 ingob 198
 
427 killagreg 199
                case FTP_CMD_GET_CWD: // get current working directory
200
                        {
201
                        char data_null = 0;
202
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 3, &FTP_command, 1, getcwd_(), strlen(getcwd_()), &data_null, 1 );
203
                        }
204
                        break;
349 ingob 205
 
427 killagreg 206
                case FTP_CMD_SET_CWD: // set current working directory
207
                        {
396 ingob 208
                        u8 cmd_successful;
209
                        cmd_successful = chdir_(FTP_data);
210
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
427 killagreg 211
                        }
212
                        break;
396 ingob 213
 
427 killagreg 214
                case FTP_CMD_CDUP: // change dir up
215
                        {
216
                        u8 cmd_successful;
217
                        cmd_successful = chdir_("..");
218
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
219
                        }
220
                        break;
396 ingob 221
 
427 killagreg 222
                case FTP_CMD_MKDIR:     // create directory 
223
                        {
224
                        u8 cmd_successful;
225
                    cmd_successful = mkdir_(&FTP_data[0]);
226
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
227
                        }
228
                        break;
772 ingob 229
 
230
                case FTP_CMD_CHANGE_BAUDATE:    // change baudrate 
231
                        {
232
                         u8 cmd_successful;
233
                         u32 baudrate;
234
 
235
                        baudrate = FTP_data[0];
236
                        baudrate |= ((u32)FTP_data[1] * 0x100);
237
            baudrate *= 100;
238
 
239
                        UART1_Configure(baudrate);
240
 
775 holgerb 241
                        UART1_BaudrateFallbackTimeout = 700;    // set global var to check UART communication in polling
772 ingob 242
 
243
                        cmd_successful = 1;
244
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
245
                        }
246
                        break;
247
 
427 killagreg 248
 
772 ingob 249
                case FTP_CMD_PING:      // ping
250
                        {
251
                        u8 cmd_successful = 1;
252
                    MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
775 holgerb 253
                        UART1_BaudrateFallbackTimeout = 0;
772 ingob 254
                        }
255
                        break;
256
 
427 killagreg 257
                case FTP_CMD_RMDIR:     // delete directory 
258
                        {
259
                        u8 cmd_successful;
260
                    cmd_successful = rmdir_(&FTP_data[0]);
261
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
262
                        }
263
                        break;
396 ingob 264
 
427 killagreg 265
                case FTP_CMD_DELETE_FILE:       // delete file 
266
                        {
267
                        u8 cmd_successful;
268
                cmd_successful = fdelete_(&FTP_data[0]);
269
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
270
                        }
271
                        break;
396 ingob 272
 
427 killagreg 273
                case FTP_CMD_OPEN_FILE: // open the file for reading
274
                        {
275
                        u8 filefound;  
276
                        compressLevel = FTP_data[0];
277
                        fp = fopen_(&FTP_data[1], 'r');
278
                        if (fp != NULL)
279
                        {
280
                                filefound = 1;
281
                                filesize = fp->Size;
282
                                blockindex = 0;                         // reset index counter
283
                        }
284
                        else filefound = 0;                             // this means, no valid file found for transfer
285
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 3, &FTP_command, 1, &filefound, 1, &filesize, sizeof(filesize));
286
                        }
287
                        break;
349 ingob 288
 
427 killagreg 289
                case FTP_CMD_GET_FILE_DATA:
290
                        {
291
                        u16 size = DATA_TRANSFER_SIZE;
292
                        if (FTP_data[0] == blockindex + 1)                                      // next block is requested
293
                        {
294
                        blockindex++;                                  
295
                        }
296
                        else
297
                        {
298
                                u32 filepos;
299
                                blockindex = FTP_data[0];
300
                                filepos = FTP_data[1];
301
                                filepos |= ((u32)FTP_data[2] * 0x100);
302
                                filepos |= ((u32) FTP_data[3] * 0x10000L);
303
                                filepos |= ((u32) FTP_data[4] * 0x1000000L);
304
                        fseek_(fp, filepos, SEEK_SET);  // set filepointer to beginning of requested block
305
                        }
306
 
307
                        fread_(FTP_data, DATA_TRANSFER_SIZE, 1, fp);                            // read data block to buffer);
308
                        FTP_data[DATA_TRANSFER_SIZE] = 0;              
349 ingob 309
 
427 killagreg 310
                if (compressLevel)
311
                        {
312
                                size = CompressBuffer(FTP_data, DATA_TRANSFER_SIZE, 0);
349 ingob 313
 
427 killagreg 314
                                if (compressLevel > 1)
315
                                {
316
                                        if (size < DATA_TRANSFER_SIZE - 50)
317
                                        {              
435 ingob 318
                                                fread_(&FTP_data[size], DATA_TRANSFER_SIZE - size, 1, fp);                              // read data block to buffer);  
427 killagreg 319
                                                FTP_data[DATA_TRANSFER_SIZE] = 0;              
320
                                                size = CompressBuffer(FTP_data, DATA_TRANSFER_SIZE, size);
321
                                        }
322
                                }
323
                        }  
324
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 4, &FTP_command, 1, &blockindex, 1, &size, 2, &FTP_data, size);
325
                        }
326
                        break;
349 ingob 327
 
427 killagreg 328
                case FTP_CMD_CLOSE_FILE:
329
                        fclose_(fp);
330
                        Debug("ftp: CloseFile");               
331
                        break;
349 ingob 332
 
427 killagreg 333
                case FTP_CMD_CREATE_FILE:       // open the file for writing
334
                        {
335
                        u16 size = DATA_TRANSFER_SIZE;
336
                        //compressLevel = FTP_data[0];
337
                        // FTP_data[1..4] contains filesize in bytes
338
                        compressLevel = 0;                      // no compression for writing
339
                        fp = fopen_(&FTP_data[5], 'w');
340
                        if (fp != NULL)
341
                        {
342
                                blockindex = 0;                                                                 // reset index counter
343
                        }
344
                        else size = 0;                                                                          // this means, no valid file for transfer (maybe readonly)
345
                        //if (size == 0) Debug("ftp: create ERR ");
346
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &size, 2);
347
                        }
348
                        break;
349 ingob 349
 
427 killagreg 350
                case FTP_CMD_SEND_FILE_DATA:
351
                        {
352
                        u16 size = (u8)FTP_data[2];
353
                        size *= 0x100;
354
                        size += (u8) FTP_data[1];
355
                        //      if (FTP_data[0] == blockindex)                                          // next block is requested
356
                        {
357
                                blockindex++;                                  
358
                        fwrite_(&FTP_data[3], size, 1, fp);                             // write data block to buffer);
359
                        }      
360
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &blockindex, 1 );
361
                        }
362
                        break;
396 ingob 363
 
427 killagreg 364
                case FTP_CMD_NONE:
365
                default:
366
                        FTP_command = FTP_CMD_NONE;
367
                        Debug("ftp: CMD None");
368
                        break;
435 ingob 369
 
370
                case FTP_CMD_GET_KEYWORDS:
371
                        {
372
                        u8 count = KEYWORD_COUNT;
373
 
374
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 3, &FTP_command, 1, &count, 1, keyword, sizeof(keyword) );
375
                        }
376
                        break;
377
 
378
 
427 killagreg 379
        }
349 ingob 380
}
381
 
382