Subversion Repositories NaviCtrl

Rev

Rev 775 | 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
 
864 holgerb 82
  #define KEYWORD_COUNT 54
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",
434 holgerb 132
                                         "<WP>----,0,0,0<\0",
133
                                         "MagnetInclinati\0",
435 ingob 134
                                         "BL_Temperature>\0",
434 holgerb 135
                                         "AvaiableMotorPo\0",
435 ingob 136
                                         "FC_I2C_ErrorCou\0",    
137
                                         "FC_SPI_ErrorCou\0",
864 holgerb 138
                                         "TargetDistance>\0",
671 holgerb 139
                                         };
140
//ACHTUNG: ggf. DATA_TRANSFER_SIZE vergrössern
434 holgerb 141
 
435 ingob 142
u16 CompressBuffer(char *buf, u16 size, u16 offset)
143
{
144
 
349 ingob 145
  u16 i, count = size;
146
  char *s = NULL, *start = buf+offset;
147
 
148
   for ( i = 0; i < KEYWORD_COUNT; i++)
149
   {
150
                s = strstr(start, keyword[i]);
151
                if (s != NULL)
152
                {       u8 keylen = strlen(keyword[i]);
153
                        *s= 27;  
154
                        *(s+1) = i+1;
155
                        count-= (keylen-2);
156
                        memcpy(s+2, s+keylen, count - (s-buf));
157
                        i--;
158
                }
159
        }
160
 
161
   return (count);
162
}
163
// --------------------------------------------------------------------
164
void CheckFTPCommand(u8 FTP_command)
165
{
427 killagreg 166
        static Find_t fe;
167
        static File_t *fp = NULL;
168
        static u8 blockindex, compressLevel = 0;
349 ingob 169
 
427 killagreg 170
        u32 filesize;
171
 
172
        switch (FTP_command)
173
        {
174
                case FTP_CMD_FINDFIRST:
175
                        FTP_direntry.Name[0] = 0;
176
                        // any file or directory except volume labels and hidden files 
177
                        if(findfirst_("*.*", (ATTR_ARCHIVE|ATTR_SUBDIRECTORY|ATTR_SYSTEM|ATTR_READONLY), &fe))
178
                        {
179
                                memcpy(&FTP_direntry.Name, &fe.name, 13);      
180
                                FTP_direntry.Attribute = fe.fp.Attribute;
181
                                FTP_direntry.Size = fe.fp.Size;
182
                        }
183
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &FTP_direntry, sizeof(FTP_direntry));
184
                        break;
349 ingob 185
 
427 killagreg 186
                case FTP_CMD_FINDNEXT:
187
                        FTP_direntry.Name[0] = 0;
188
                        if (findnext_(&fe))
189
                        {
190
                                memcpy(&FTP_direntry.Name, &fe.name, 13);      
191
                                FTP_direntry.Attribute = fe.fp.Attribute;
192
                                FTP_direntry.Size = fe.fp.Size;
193
                        }
194
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &FTP_direntry, sizeof(FTP_direntry));
195
                        break;
349 ingob 196
 
427 killagreg 197
                case FTP_CMD_GET_CWD: // get current working directory
198
                        {
199
                        char data_null = 0;
200
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 3, &FTP_command, 1, getcwd_(), strlen(getcwd_()), &data_null, 1 );
201
                        }
202
                        break;
349 ingob 203
 
427 killagreg 204
                case FTP_CMD_SET_CWD: // set current working directory
205
                        {
396 ingob 206
                        u8 cmd_successful;
207
                        cmd_successful = chdir_(FTP_data);
208
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
427 killagreg 209
                        }
210
                        break;
396 ingob 211
 
427 killagreg 212
                case FTP_CMD_CDUP: // change dir up
213
                        {
214
                        u8 cmd_successful;
215
                        cmd_successful = chdir_("..");
216
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
217
                        }
218
                        break;
396 ingob 219
 
427 killagreg 220
                case FTP_CMD_MKDIR:     // create directory 
221
                        {
222
                        u8 cmd_successful;
223
                    cmd_successful = mkdir_(&FTP_data[0]);
224
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
225
                        }
226
                        break;
772 ingob 227
 
228
                case FTP_CMD_CHANGE_BAUDATE:    // change baudrate 
229
                        {
230
                         u8 cmd_successful;
231
                         u32 baudrate;
232
 
233
                        baudrate = FTP_data[0];
234
                        baudrate |= ((u32)FTP_data[1] * 0x100);
235
            baudrate *= 100;
236
 
237
                        UART1_Configure(baudrate);
238
 
775 holgerb 239
                        UART1_BaudrateFallbackTimeout = 700;    // set global var to check UART communication in polling
772 ingob 240
 
241
                        cmd_successful = 1;
242
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
243
                        }
244
                        break;
245
 
427 killagreg 246
 
772 ingob 247
                case FTP_CMD_PING:      // ping
248
                        {
249
                        u8 cmd_successful = 1;
250
                    MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
775 holgerb 251
                        UART1_BaudrateFallbackTimeout = 0;
772 ingob 252
                        }
253
                        break;
254
 
427 killagreg 255
                case FTP_CMD_RMDIR:     // delete directory 
256
                        {
257
                        u8 cmd_successful;
258
                    cmd_successful = rmdir_(&FTP_data[0]);
259
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
260
                        }
261
                        break;
396 ingob 262
 
427 killagreg 263
                case FTP_CMD_DELETE_FILE:       // delete file 
264
                        {
265
                        u8 cmd_successful;
266
                cmd_successful = fdelete_(&FTP_data[0]);
267
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &cmd_successful, 1);
268
                        }
269
                        break;
396 ingob 270
 
427 killagreg 271
                case FTP_CMD_OPEN_FILE: // open the file for reading
272
                        {
273
                        u8 filefound;  
274
                        compressLevel = FTP_data[0];
275
                        fp = fopen_(&FTP_data[1], 'r');
276
                        if (fp != NULL)
277
                        {
278
                                filefound = 1;
279
                                filesize = fp->Size;
280
                                blockindex = 0;                         // reset index counter
281
                        }
282
                        else filefound = 0;                             // this means, no valid file found for transfer
283
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 3, &FTP_command, 1, &filefound, 1, &filesize, sizeof(filesize));
284
                        }
285
                        break;
349 ingob 286
 
427 killagreg 287
                case FTP_CMD_GET_FILE_DATA:
288
                        {
289
                        u16 size = DATA_TRANSFER_SIZE;
290
                        if (FTP_data[0] == blockindex + 1)                                      // next block is requested
291
                        {
292
                        blockindex++;                                  
293
                        }
294
                        else
295
                        {
296
                                u32 filepos;
297
                                blockindex = FTP_data[0];
298
                                filepos = FTP_data[1];
299
                                filepos |= ((u32)FTP_data[2] * 0x100);
300
                                filepos |= ((u32) FTP_data[3] * 0x10000L);
301
                                filepos |= ((u32) FTP_data[4] * 0x1000000L);
302
                        fseek_(fp, filepos, SEEK_SET);  // set filepointer to beginning of requested block
303
                        }
304
 
305
                        fread_(FTP_data, DATA_TRANSFER_SIZE, 1, fp);                            // read data block to buffer);
306
                        FTP_data[DATA_TRANSFER_SIZE] = 0;              
349 ingob 307
 
427 killagreg 308
                if (compressLevel)
309
                        {
310
                                size = CompressBuffer(FTP_data, DATA_TRANSFER_SIZE, 0);
349 ingob 311
 
427 killagreg 312
                                if (compressLevel > 1)
313
                                {
314
                                        if (size < DATA_TRANSFER_SIZE - 50)
315
                                        {              
435 ingob 316
                                                fread_(&FTP_data[size], DATA_TRANSFER_SIZE - size, 1, fp);                              // read data block to buffer);  
427 killagreg 317
                                                FTP_data[DATA_TRANSFER_SIZE] = 0;              
318
                                                size = CompressBuffer(FTP_data, DATA_TRANSFER_SIZE, size);
319
                                        }
320
                                }
321
                        }  
322
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 4, &FTP_command, 1, &blockindex, 1, &size, 2, &FTP_data, size);
323
                        }
324
                        break;
349 ingob 325
 
427 killagreg 326
                case FTP_CMD_CLOSE_FILE:
327
                        fclose_(fp);
328
                        Debug("ftp: CloseFile");               
329
                        break;
349 ingob 330
 
427 killagreg 331
                case FTP_CMD_CREATE_FILE:       // open the file for writing
332
                        {
333
                        u16 size = DATA_TRANSFER_SIZE;
334
                        //compressLevel = FTP_data[0];
335
                        // FTP_data[1..4] contains filesize in bytes
336
                        compressLevel = 0;                      // no compression for writing
337
                        fp = fopen_(&FTP_data[5], 'w');
338
                        if (fp != NULL)
339
                        {
340
                                blockindex = 0;                                                                 // reset index counter
341
                        }
342
                        else size = 0;                                                                          // this means, no valid file for transfer (maybe readonly)
343
                        //if (size == 0) Debug("ftp: create ERR ");
344
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &size, 2);
345
                        }
346
                        break;
349 ingob 347
 
427 killagreg 348
                case FTP_CMD_SEND_FILE_DATA:
349
                        {
350
                        u16 size = (u8)FTP_data[2];
351
                        size *= 0x100;
352
                        size += (u8) FTP_data[1];
353
                        //      if (FTP_data[0] == blockindex)                                          // next block is requested
354
                        {
355
                                blockindex++;                                  
356
                        fwrite_(&FTP_data[3], size, 1, fp);                             // write data block to buffer);
357
                        }      
358
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 2, &FTP_command, 1, &blockindex, 1 );
359
                        }
360
                        break;
396 ingob 361
 
427 killagreg 362
                case FTP_CMD_NONE:
363
                default:
364
                        FTP_command = FTP_CMD_NONE;
365
                        Debug("ftp: CMD None");
366
                        break;
435 ingob 367
 
368
                case FTP_CMD_GET_KEYWORDS:
369
                        {
370
                        u8 count = KEYWORD_COUNT;
371
 
372
                        MKProtocol_CreateSerialFrame(&UART1_tx_buffer, 'F', NC_ADDRESS, 3, &FTP_command, 1, &count, 1, keyword, sizeof(keyword) );
373
                        }
374
                        break;
375
 
376
 
427 killagreg 377
        }
349 ingob 378
}
379
 
380