Subversion Repositories Projects

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
297 killagreg 1
#include <string.h>
2
#include "printf_P.h"
3
#include "timer0.h"
231 killagreg 4
#include "fat16.h"
5
#include "sdc.h"
297 killagreg 6
#include "uart1.h"
231 killagreg 7
 
8
 
297 killagreg 9
/*
10
FAT16 Drive Layout:
11
Description                                             Offset
12
Volume Boot Sector                                      Start of Partition
13
Fat Tables                                                      Start + # of Reserved Sectors
14
Root Directory Entry                            Start + # of Reserved + (# of Sectors Per FAT * 2)
15
Data Area (Starts with Cluster #2)      Start + # of Reserved + (# of Sectors Per FAT * 2) + ((Maximum Root Directory Entries * 32) / Bytes per Sector)
16
*/
231 killagreg 17
 
18
 
297 killagreg 19
/*
20
________________________________________________________________________________________________________________________________________
231 killagreg 21
 
297 killagreg 22
        Structure of an partition entry
23
________________________________________________________________________________________________________________________________________
231 killagreg 24
 
297 killagreg 25
        Partition Entry is 16 bytes long
26
*/
27
typedef struct
28
{
29
        uint8_t         PartitionState;                         // Current State of Partition (00h=Inactive, 80h=Active)
30
        uint8_t         BeginningHead;                          // Beginning of Partition - Head
31
        uint16_t        BeginningCylSec;                        // Beginning of Partition - Cylinder/Sector (See Below)
32
        uint8_t         Type;                                           // Type of Partition (See List Below)
33
        uint8_t         EndHead;                                        // End of Partition - Head
34
        uint16_t        EndCylSec;                                      // End of Partition - Cylinder/Sector
35
        uint32_t        NoSectorsBeforePartition;       // Number of Sectors between the MBR and the First Sector in the Partition
36
        uint32_t        NoSectorsPartition      ;               // Number of Sectors in the Partition
37
} __attribute__((packed)) PartitionEntry_t;
231 killagreg 38
 
297 killagreg 39
/*
40
Coding of Cylinder/Sector words
231 killagreg 41
 
297 killagreg 42
Cylinder is 10 bits:  [7:0] at [15:8] and [9:8] at [7:6]
43
Sector is 5 bits:  [5:0] at [5:0]
44
*/
231 killagreg 45
 
297 killagreg 46
// Partition Types:
47
#define PART_TYPE_UNKNOWN                       0x00
48
#define PART_TYPE_FAT12                         0x01
49
#define PART_TYPE_XENIX                         0x02
50
#define PART_TYPE_FAT16_ST_32_MB        0x04
51
#define PART_TYPE_EXTDOS                        0x05
52
#define PART_TYPE_FAT16_LT_32_MB        0x06
53
#define PART_TYPE_NTFS                          0x07
54
#define PART_TYPE_FAT32                         0x0B
55
#define PART_TYPE_FAT32LBA                      0x0C
56
#define PART_TYPE_FAT16LBA                      0x0E
57
#define PART_TYPE_EXTDOSLBA                     0x0F
58
#define PART_TYPE_EISA                          0x12
59
#define PART_TYPE_ONTRACK                       0x33
60
#define PART_TYPE_NOVELL                        0x40
61
#define PART_TYPE_DYNAMIC                       0x42
62
#define PART_TYPE_PCIX                          0x4B
63
#define PART_TYPE_LINUX_SWAP            0x82
64
#define PART_TYPE_LINUX_NATIVE          0x83
65
#define PART_TYPE_LINUX_LVM                     0x8E
66
#define PART_TYPE_PHOENIXSAVE           0xA0
67
#define PART_TYPE_FREEBSD                       0xA5
68
#define PART_TYPE_OPENBSD                       0xA6
69
#define PART_TYPE_NETNBSD                       0xA9
70
#define PART_TYPE_CPM                           0xDB
71
#define PART_TYPE_DBFS                          0xE0
72
#define PART_TYPE_BBT                           0xFF
231 killagreg 73
 
74
 
297 killagreg 75
/*
76
________________________________________________________________________________________________________________________________________
231 killagreg 77
 
297 killagreg 78
        Structure of the MasterBootRecord
79
________________________________________________________________________________________________________________________________________
80
 
81
        Master Boot Record is 512 bytes long
82
        The Master Boot Record is the same for pretty much all Operating Systems.
83
        It is located on the first Sector of the Hard Drive, at Cylinder 0, Head 0, Sector 1
84
*/
85
typedef struct
231 killagreg 86
{
297 killagreg 87
        uint8_t                         ExecutableCode[446];    // 446 bytes for machine start code
88
        PartitionEntry_t        PartitionEntry1;                // 16 bytes for partition entry 1
89
        PartitionEntry_t        PartitionEntry2;                // 16 bytes for partition entry 2
90
        PartitionEntry_t        PartitionEntry3;                // 16 bytes for partition entry 3
91
        PartitionEntry_t        PartitionEntry4;                // 16 bytes for partition entry 4
92
        uint16_t                        ExecutableMarker;               // BIOS-Signature (0x55 0xAA)
93
} __attribute__((packed)) MBR_Entry_t;
231 killagreg 94
 
95
 
297 killagreg 96
/*
97
________________________________________________________________________________________________________________________________________
231 killagreg 98
 
297 killagreg 99
        Structure of the VolumeBootRecord
100
________________________________________________________________________________________________________________________________________
231 killagreg 101
 
297 killagreg 102
        The Volume Boot Record is 512 bytes long
103
        This information is located in the first sector of every partition.
104
*/
105
typedef struct
106
{
107
        uint8_t         JumpCode[3];                    // Jump Code + NOP
108
        int8_t          OEMName[8];                             // OEM Name
109
        uint16_t        BytesPerSector;                 // Bytes Per Sector
110
        uint8_t         SectorsPerCluster;              // Sectors Per Cluster
111
        uint16_t        ReservedSectors;                // Reserved Sectors
112
        uint8_t         NoFATCopies;                    // Number of Copies of FAT
113
        uint16_t        MaxRootEntries;                 // Maximum Root Directory Entries
114
        uint16_t        NoSectorsInPartSml32MB; // Number of Sectors in Partition Smaller than 32 MB
115
        uint8_t         MediaDescriptor;                // Media Descriptor (0xF8 for Hard Disks)
116
        uint16_t        SectorsPerFAT;                  // Sectors Per FAT
117
        uint16_t        SectorsPerTrack;                // Sectors Per Track
118
        uint16_t        NoHeads;                                // Number of Heads
119
        uint32_t        NoHiddenSectors;                // Number of Hidden Sectors     in Partition
120
        uint32_t        NoSectors;                              // Number of Sectors in Partition
121
        uint16_t        DriveNo;                                // Logical Drive Number of Partition
122
        uint8_t         ExtendedSig;                    // Extended Signature (0x29)
123
        uint32_t        SerialNo;                               // Serial Number of the Partition
124
        int8_t          VolumeName[11];                 // Volume Name of the Partititon
125
        int8_t          FATName[8];                             // FAT Name (FAT16)
126
        uint8_t         ExecutableCode[446];    // 446 bytes for machine start code
127
        uint16_t        ExecutableMarker;               // Executable Marker (0x55 0xAA)
128
} __attribute__((packed)) VBR_Entry_t;
231 killagreg 129
 
130
 
131
 
297 killagreg 132
/*
133
________________________________________________________________________________________________________________________________________
134
 
135
        Structure of an directory entry
136
________________________________________________________________________________________________________________________________________
137
 
138
        Directory entry is 32 bytes.
139
*/
140
typedef struct
231 killagreg 141
{
297 killagreg 142
        int8_t          Name[8];                                        // 8 bytes name, padded with spaces.
143
        uint8_t         Extension[3];                           // 3 bytes extension, padded with spaces.
144
        uint8_t         Attribute;                                      // attribute of the directory entry (unused,archive,read-only,system,directory,volume)
145
        uint8_t         Reserved[10];                           // reserved bytes within the directory entry.
146
        uint32_t        DateTime;                                       // date and time of last write access to the file or directory.
147
        uint16_t        StartCluster;                           // first cluster of the file or directory.
148
        uint32_t        Size;                                           // size of the file or directory in bytes.
149
}  __attribute__((packed)) DirEntry_t;
231 killagreg 150
 
297 killagreg 151
#define SLOT_EMPTY              0x00    // slot has never been used
152
#define SLOT_E5                 0x05    // the real value is 0xe5
153
#define SLOT_DELETED            0xE5    // file in this slot deleted
231 killagreg 154
 
297 killagreg 155
#define ATTR_NONE               0x00    // normal file
156
#define ATTR_READONLY           0x01    // file is readonly
157
#define ATTR_HIDDEN                     0x02    // file is hidden
158
#define ATTR_SYSTEM                     0x04    // file is a system file
159
#define ATTR_VOLUMELABEL        0x08    // entry is a volume label
160
#define ATTR_LONG_FILENAME      0x0F    // this is a long filename entry
161
#define ATTR_SUBDIRECTORY       0x10    // entry is a directory name
162
#define ATTR_ARCHIVE            0x20    // file is new or modified
231 killagreg 163
 
164
 
297 killagreg 165
/*
166
________________________________________________________________________________________________________________________________________
231 killagreg 167
 
297 killagreg 168
        Structure of an entry within the fileallocationtable.
169
________________________________________________________________________________________________________________________________________
170
*/
171
typedef struct
172
{
173
        uint16_t  NextCluster;                          // the next cluster of the file.
174
} __attribute__((packed)) Fat16Entry_t;
231 killagreg 175
 
297 killagreg 176
// secial fat entries
177
#define FAT16_CLUSTER_FREE                      0x0000
178
#define FAT16_CLUSTER_RESERVED          0x0001
179
#define FAT16_CLUSTER_USED_MIN          0x0002
180
#define FAT16_CLUSTER_USED_MAX          0xFFEF
181
#define FAT16_CLUSTER_ROOTDIR_MIN       0xFFF0
182
#define FAT16_CLUSTER_ROOTDIR_MAX       0xFFF6
183
#define FAT16_CLUSTER_BAD                       0xFFF7
184
#define FAT16_CLUSTER_LAST_MIN          0xFFF8
185
#define FAT16_CLUSTER_LAST_MAX          0xFFFF
231 killagreg 186
 
297 killagreg 187
/*****************************************************************************************************************************************/
188
/*                                                                                                                                                                                                                                                                               */
189
/*      Global variables needed for read- or write-acces to the FAT16- filesystem.                                                                                                                       */
190
/*                                                                                                                                                                                                                                                                               */
191
/*****************************************************************************************************************************************/
231 killagreg 192
 
297 killagreg 193
#define MBR_SECTOR                                      0x00    // the masterboot record is located in sector 0.
194
#define DIRENTRY_SIZE                           32              //bytes
195
#define DIRENTRIES_PER_SECTOR           BYTES_PER_SECTOR/DIRENTRY_SIZE
196
#define FAT16_BYTES                                     2
197
#define FAT16_ENTRIES_PER_SECTOR        BYTES_PER_SECTOR/FAT16_BYTES
198
 
199
#define FSTATE_UNUSED   0
200
#define FSTATE_USED             1
201
 
202
typedef struct
231 killagreg 203
{
297 killagreg 204
        uint8_t         IsValid;                                // 0 means invalid, else valid
205
        uint8_t         SectorsPerCluster;              // how many sectors does a cluster contain?
206
        uint8_t         FatCopies;                              // Numbers of copies of the FAT
207
        uint16_t        MaxRootEntries;                 // Possible number of entries in the root directory.
208
        uint16_t        SectorsPerFat;                  // how many sectors does a fat16 contain?
209
        uint32_t        FirstFatSector;                 // sector of the start of the fat
210
        uint32_t        FirstRootDirSector;             // sector of the rootdirectory
211
        uint32_t        FirstDataSector;                // sector of the first cluster containing data (cluster2).
212
        uint32_t        LastDataSector;                 // the last data sector of the partition
213
} Partition_t;
231 killagreg 214
 
297 killagreg 215
Partition_t     Partition;                                      // Structure holds partition information
231 killagreg 216
 
297 killagreg 217
File_t FilePointer[FILE_MAX_OPEN];      // Allocate Memmoryspace for each filepointer used.
231 killagreg 218
 
219
 
297 killagreg 220
/****************************************************************************************************************************************/
221
/*      Function:               FileDateTime(DateTime_t *);                                                                                                                                                                                     */
222
/*                                                                                                                                                                                                                                                                              */
223
/*      Description:    This function calculates the DOS date time from a pointer to a time structure.                                                                          */
224
/*                                                                                                                                                                                                                                                                              */
225
/*      Returnvalue:    Returns the DOS date time.                                                                                                                                                                                      */
226
/****************************************************************************************************************************************/
227
 
228
uint32_t FileDateTime(DateTime_t * pTimeStruct)
231 killagreg 229
{
297 killagreg 230
        uint32_t datetime = 0;
231
        if((pTimeStruct == 0) || !(pTimeStruct->Valid)) return datetime;
232
 
233
        datetime |= (0x0000007FL & (uint32_t)(pTimeStruct->Year - 1980))<<25; // set year
234
        datetime |= (0x0000000FL & (uint32_t)(pTimeStruct->Month))<<21; // set month
235
        datetime |= (0x0000001FL & (uint32_t)(pTimeStruct->Day))<<16;
236
        datetime |= (0x0000001FL & (uint32_t)(pTimeStruct->Hour))<<11;
237
        datetime |= (0x0000003FL & (uint32_t)(pTimeStruct->Min))<<5;
238
        datetime |= (0x0000001FL & (uint32_t)(pTimeStruct->Sec/2));
239
        return datetime;
231 killagreg 240
}
241
 
242
 
297 killagreg 243
/****************************************************************************************************************************************/
244
/*      Function:               LockFilePointer();                                                                                                                                                                                                      */
245
/*                                                                                                                                                                                                                                                                              */
246
/*      Description:    This function trys to lock a free file pointer.                                                                                                                                         */
247
/*                                                                                                                                                                                                                                                                              */
248
/*      Returnvalue:    Returns the Filepointer on success or 0.                                                                                                                                                        */
249
/****************************************************************************************************************************************/
250
File_t * LockFilePointer(void)
231 killagreg 251
{
297 killagreg 252
        uint8_t i;
253
        File_t * File = 0;
254
        for(i = 0; i < FILE_MAX_OPEN; i++)
231 killagreg 255
        {
297 killagreg 256
                if(FilePointer[i].State == FSTATE_UNUSED)               // found an unused one
231 killagreg 257
                {
297 killagreg 258
                        File = &FilePointer[i];                                         // set pointer to that entry
259
                        FilePointer[i].State = FSTATE_USED;                     // mark it as used
260
                        break;
231 killagreg 261
                }
262
        }
297 killagreg 263
        return(File);
231 killagreg 264
}
265
 
297 killagreg 266
/****************************************************************************************************************************************/
267
/*      Function:               UnlockFilePointer(file_t *);                                                                                                                                                                            */
268
/*                                                                                                                                                                                                                                                                              */
269
/*      Description:    This function trys to unlock a file pointer.                                                                                                                                            */
270
/*                                                                                                                                                                                                                                                                              */
271
/*      Returnvalue:    Returns 1 if file pointer was freed else 0.                                                                                                                                                     */
272
/****************************************************************************************************************************************/
273
uint8_t UnlockFilePointer(File_t * file)
231 killagreg 274
{
297 killagreg 275
        uint8_t cnt;
276
        if(file == NULL) return(0);
277
        for(cnt = 0; cnt < FILE_MAX_OPEN; cnt++)
231 killagreg 278
        {
297 killagreg 279
                if(&FilePointer[cnt] == file)                                           // filepointer to be freed found?
231 killagreg 280
                {
297 killagreg 281
                        file->State = FSTATE_UNUSED;
282
                        file->FirstSectorOfFirstCluster = 0;                    // Sectorpointer to the first sector of the first datacluster of the file.
283
                        file->FirstSectorOfCurrCluster  = 0;
284
                        file->SectorOfCurrCluster               = 0;                    // Pointer to the cluster which is edited at the moment.
285
                        file->SectorOfCurrCluster               = 0;                    // The sector which is edited at the moment (cluster_pointer + sector_index).
286
                        file->ByteOfCurrSector                  = 0;                    // The bytelocation within the current sector (cluster_pointer + sector_index + byte_index).
287
                        file->Mode                                              = 0;                    // mode of fileoperation (read,write)
288
                        file->Size                                              = 0;                    // the size of the opend file in bytes.
289
                        file->Position                                  = 0;                    // pointer to a character within the file 0 < fileposition < filesize
290
                        file->SectorInCache                     = 0;                    // the last sector read, wich is still in the sectorbuffer.
291
                        file->DirectorySector                   = 0;                    // the sectorposition where the directoryentry has been made.
292
                        file->DirectoryIndex                    = 0;                    // the index to the directoryentry within the specified sector.
293
                        file->Attribute                                 = 0;                    // the attribute of the file opened.
294
                        file = NULL;
295
                        return(1);
231 killagreg 296
                }
297
        }
297 killagreg 298
        return(0);
299
}
231 killagreg 300
 
297 killagreg 301
/****************************************************************************************************************************************/
302
/*      Function:               SeperateDirName(int8_t*, int8_t*);                                                                                                                                                                              */
303
/*                                                                                                                                                                                                                                                                              */
304
/*      Description:    This function seperates the first dirname from filepath and brings them                                                                                         */
305
/*                                      into the needed format ('test.txt' -> 'TEST    TXT')                                                                                                                            */
306
/*                                      The subpath is the pointer to the remaining substring if the filepath                                                                                           */
307
/*                                                                                                                                                                                                                                                                              */
308
/*      Returnvalue:    Return NULL on error or pointer to subpath                                                                                                                                                                                                      */
309
/****************************************************************************************************************************************/
310
int8_t* SeperateDirName(const int8_t *filepath, int8_t *dirname)
231 killagreg 311
{
297 killagreg 312
        int8_t* subpath = NULL;
313
        uint8_t readpointer     = 0;
314
        uint8_t writepointer = 0;
231 killagreg 315
 
297 killagreg 316
        // search subpath from beginning of filepath
317
        subpath = NULL;
318
        readpointer     = 0;
319
        if(filepath[0] == '/') readpointer = 1; // ignore first '/'
320
        while(subpath == NULL)  // search the filepath until a subpath was found.
231 killagreg 321
        {
297 killagreg 322
                if(((filepath[readpointer] == 0) || (filepath[readpointer] == '/')))    // if '/' found or end of filepath reached
323
                {
324
                        subpath = (int8_t*)&filepath[readpointer];                              // store the position of the first "/" found after the beginning of the filenpath
325
                }
326
                readpointer++;
231 killagreg 327
        }
328
 
297 killagreg 329
        // clear dirname with spaces
330
        dirname[11] = 0; // terminate dirname
331
        for(writepointer = 0; writepointer < 11; writepointer++) dirname[writepointer] = ' ';
332
        writepointer = 0;
333
        // start seperating the dirname from the filepath.
334
        readpointer = 0;
335
        if(filepath[0] == '/') readpointer = 1; // ignore first '/'
336
        while( &filepath[readpointer] < subpath)
231 killagreg 337
        {
297 killagreg 338
                if(writepointer >= 11) return(NULL);            // dirname to long
339
                if(filepath[readpointer] == '.')                        // seperating dirname and extension.
231 killagreg 340
                {
297 killagreg 341
                        if(writepointer <= 8)
231 killagreg 342
                        {
297 killagreg 343
                                readpointer++;                                          // next character in filename
344
                                writepointer = 8;                                       // jump to start of extension
231 killagreg 345
                        }
297 killagreg 346
                        else return(NULL);                                              // dirbasename to long
347
                }
348
                else
349
                {
350
                        if((0x60 < filepath[readpointer]) && (filepath[readpointer] < 0x7B))
351
                        {
352
                                dirname[writepointer] = (filepath[readpointer] - 0x20);                                 // all characters must be upper case.
353
                        }
231 killagreg 354
                        else
355
                        {
297 killagreg 356
                                dirname[writepointer] = filepath[readpointer];
231 killagreg 357
                        }
297 killagreg 358
                        readpointer++;
359
                        writepointer++;
231 killagreg 360
                }
361
        }
297 killagreg 362
        return(subpath);
231 killagreg 363
}
364
 
365
 
297 killagreg 366
/**************************************************************************************************************************************+*/
367
/*      Function:       Fat16ClusterToSector( uint16_t cluster);                                                                                                                                                                                */
368
/*                                                                                                                                                                                                                                                                              */
369
/*      Description:    This function converts a cluster number given by the fat to the corresponding                                                                           */
370
/*                                      sector that points to the start of the data area that is represented by the cluster number.                                                     */
371
/*                                                                                                                                                                                                                                                                              */
372
/*      Returnvalue: The sector number with the data area of the given cluster                                                                                                                          */
373
/****************************************************************************************************************************************/
374
uint32_t        Fat16ClusterToSector(uint16_t cluster)
231 killagreg 375
{
297 killagreg 376
        if(!Partition.IsValid) return 0;
377
        if (cluster < 2) cluster = 2; // the 0. and 1. cluster in the fat are used for the media descriptor
378
        return ( (cluster - 2) * Partition.SectorsPerCluster) + Partition.FirstDataSector; // the first data sector     is represented by the 2nd cluster
379
}
231 killagreg 380
 
297 killagreg 381
/****************************************************************************************************************************************/
382
/*      Function:       SectorToFat16Cluster( uint32_t sector);                                                                                                                                                                         */
383
/*                                                                                                                                                                                                                                                                              */
384
/*      Description:    This function converts a given sector number given to the corresponding                                                                                         */
385
/*                                      cluster number in the fat that represents this data area.                                                                                                                       */
386
/*                                                                                                                                                                                                                                                                              */
387
/*      Returnvalue: The cluster number representing the data area of the sector.                                                                                                                       */
388
/****************************************************************************************************************************************/
389
uint16_t        SectorToFat16Cluster(uint32_t sector)
390
{
391
        if(!Partition.IsValid) return 0;
392
        return ((uint16_t)((sector - Partition.FirstDataSector) / Partition.SectorsPerCluster) + 2);
393
}
394
 
395
 
396
/****************************************************************************************************************************************/
397
/*      Function:       Fat16_Deinit(void);                                                                                                                                                                                                             */
398
/*                                                                                                                                                                                                                                                                              */
399
/*      Description:    This function uninitializes the fat 16 api                                                                                                                                                      */
400
/*                                                                                                                                                                                                                                                                              */
401
/*      Returnvalue: The function returns "0" on success                                                                                                                                                                        */
402
/****************************************************************************************************************************************/
403
uint8_t Fat16_Deinit(void)
404
{
405
        int16_t returnvalue = 0;
406
        uint8_t cnt;
407
        // declare the filepointers as unused.
408
        for(cnt = 0; cnt < FILE_MAX_OPEN; cnt++)
231 killagreg 409
        {
297 killagreg 410
                if(FilePointer[cnt].State == FSTATE_USED)
231 killagreg 411
                {
297 killagreg 412
                        returnvalue += fclose_(&FilePointer[cnt]); // try to close open file pointers
231 killagreg 413
                }
414
 
415
        }
297 killagreg 416
        SDC_Deinit();                   // uninitialize interface to sd-card
417
        Partition.IsValid = 0;  // mark data in partition structure as invalid
418
        return(returnvalue);
231 killagreg 419
}
420
 
297 killagreg 421
/****************************************************************************************************************************************/
422
/*      Function:               Fat16_Init(void);                                                                                                                                                                                                       */
423
/*                                                                                                                                                                                                                                                                          */
424
/*      Description:    This function reads the Masterbootrecord and finds the position of the Volumebootrecord, the FAT and the Rootdir    */
425
/*                                      and stores the information in global variables.                                                                                                                                     */
426
/*                                                                                                                                                                                                                                                                          */
427
/*      Returnvalue:    The function returns "0" if the filesystem is initialized.                                                                                                                      */
428
/****************************************************************************************************************************************/
429
uint8_t Fat16_Init(void)
231 killagreg 430
{
297 killagreg 431
    uint8_t     cnt     = 0;
432
        uint32_t        partitionfirstsector;
433
        VBR_Entry_t *VBR;
434
        MBR_Entry_t *MBR;
435
        File_t *file;
436
        uint8_t result = 0;
231 killagreg 437
 
297 killagreg 438
        printf("\r\n FAT16 init...");
439
        Partition.IsValid = 0;
440
 
441
        // declare the filepointers as unused.
442
        for(cnt = 0; cnt < FILE_MAX_OPEN; cnt++)
231 killagreg 443
        {
297 killagreg 444
                FilePointer[cnt].State = FSTATE_UNUSED;
231 killagreg 445
        }
297 killagreg 446
        // set current file pinter to first position in list
447
        file = &FilePointer[0];
231 killagreg 448
 
297 killagreg 449
        // try to initialise the sd-card.
450
        if(SD_SUCCESS != SDC_Init())
231 killagreg 451
        {
297 killagreg 452
                printf("SD-Card could not be initialized.");
453
                result = 1;
454
                goto end;
231 killagreg 455
        }
297 killagreg 456
 
457
        // SD-Card is initialized successfully
458
        if(SD_SUCCESS != SDC_GetSector((uint32_t)MBR_SECTOR,file->Cache))       // Read the MasterBootRecord
231 killagreg 459
        {
297 killagreg 460
                printf("Error reading the MBR.");
461
                result = 2;
462
                goto end;
463
        }
464
        MBR = (MBR_Entry_t *)file->Cache;                                               // Enter the MBR using the structure MBR_Entry_t.
465
        if((MBR->PartitionEntry1.Type == PART_TYPE_FAT16_ST_32_MB) ||
466
           (MBR->PartitionEntry1.Type == PART_TYPE_FAT16_LT_32_MB) ||
467
           (MBR->PartitionEntry1.Type == PART_TYPE_FAT16LBA))
468
        {
469
                // get sector offset 1st partition
470
                partitionfirstsector = MBR->PartitionEntry1.NoSectorsBeforePartition;
471
                // Start of Partition is the Volume Boot Sector
472
                if(SD_SUCCESS != SDC_GetSector(partitionfirstsector,file->Cache)) // Read the volume boot record
231 killagreg 473
                {
297 killagreg 474
                        printf("Error reading the VBR.");
475
                        result = 3;
476
                        goto end;
231 killagreg 477
                }
478
        }
297 killagreg 479
        else  // maybe the medium has no partition assuming sector 0 is the vbr
480
        {
481
                partitionfirstsector = 0;
482
        }
231 killagreg 483
 
297 killagreg 484
        VBR = (VBR_Entry_t *) file->Cache;                                              // Enter the VBR using the structure VBR_Entry_t.
485
        if(VBR->BytesPerSector != BYTES_PER_SECTOR)
486
        {
487
                printf("VBR: Sector size not supported.");
488
                result = 4;
489
                goto end;
490
        }
491
        Partition.SectorsPerCluster             = VBR->SectorsPerCluster;                       // Number of sectors per cluster. Depends on the memorysize of the sd-card.
492
        Partition.FatCopies                     = VBR->NoFATCopies;                                     // Number of fatcopies.
493
        Partition.MaxRootEntries                = VBR->MaxRootEntries;                          // How many Entries are possible in the rootdirectory (FAT16 allows max. 512 entries).
494
        Partition.SectorsPerFat                 = VBR->SectorsPerFAT;                           // The number of sectors per FAT.
231 killagreg 495
 
297 killagreg 496
        /* Calculate the sectorpositon of the FAT, the Rootdirectory and the first Datacluster. */
497
        // Calculate the position of the FileAllocationTable:
498
        // Start + # of Reserved Sectors
499
        Partition.FirstFatSector        =   (uint32_t)(partitionfirstsector + (uint32_t)(VBR->ReservedSectors));
500
        // Calculate the position of the Rootdirectory:
501
        // Start + # of Reserved Sectors + (# of Sectors Per FAT * # of FAT Copies)
502
        Partition.FirstRootDirSector    =   Partition.FirstFatSector + (uint32_t)((uint32_t)Partition.SectorsPerFat*(uint32_t)Partition.FatCopies);
503
        // Calculate the position of the first datacluster:
504
        // Start + # of Reserved + (# of Sectors Per FAT * # of FAT Copies) + ((Maximum Root Directory Entries * 32) / Bytes per Sector)
505
        Partition.FirstDataSector       =   Partition.FirstRootDirSector + (uint32_t)(Partition.MaxRootEntries>>4);  // assuming 512 Byte Per Sector
506
        // Calculate the last data sector
507
        if(VBR->NoSectors == 0)
231 killagreg 508
        {
297 killagreg 509
                printf("VBR: Bad number of sectors.");
510
                result = 5;
511
                goto end;
231 killagreg 512
        }
297 killagreg 513
        Partition.LastDataSector = Partition.FirstDataSector + VBR->NoSectors - 1;
514
        // check for FAT16 in VBR of first partition
515
        if(!((VBR->FATName[0]=='F') && (VBR->FATName[1]=='A') && (VBR->FATName[2]=='T') && (VBR->FATName[3]=='1')&&(VBR->FATName[4]=='6')))
516
        {
517
                printf("VBR: Partition ist not FAT16 type.");
518
                result = 6;
519
                goto end;
520
        }
521
        Partition.IsValid = 1; // mark data in partition structure as valid
522
        result = 0;
523
        end:
524
        if(result != 0) Fat16_Deinit();
525
        else printf(" ...ok");
526
        return(result);
231 killagreg 527
}
528
 
529
 
297 killagreg 530
 
531
/****************************************************************************************************************************************/
532
/* Function:    ClearCurrCluster(File_t*);                                                                                                                                                                                      */
533
/*                                                                                                                                                                                                                                                                              */
534
/* Description: This function fills the current cluster with 0.                                                                                                                                                 */
535
/*                                                                                                                                                                                                                                                                              */
536
/* Returnvalue: The function returns 1 on success else 0.                                                                                                                                                               */
537
/****************************************************************************************************************************************/
538
uint8_t ClearCurrCluster(File_t * file)
231 killagreg 539
{
297 killagreg 540
        uint8_t retvalue = 1;
541
        uint32_t i;
231 killagreg 542
 
297 killagreg 543
        if((!Partition.IsValid) || (file == NULL)) return(0);
544
 
545
        for(i = 0; i < BYTES_PER_SECTOR; i++) file->Cache[i] = 0; // clear file cache
546
        for(i = 0; i < Partition.SectorsPerCluster; i++)
231 killagreg 547
        {
297 killagreg 548
                file->SectorInCache = file->FirstSectorOfCurrCluster + i;
549
                if(SD_SUCCESS != SDC_PutSector(file->SectorInCache, file->Cache))
231 killagreg 550
                {
297 killagreg 551
                        Fat16_Deinit();
552
                        retvalue = 0;
231 killagreg 553
                }
554
        }
297 killagreg 555
        return(retvalue);
231 killagreg 556
}
557
 
297 killagreg 558
/*****************************************************************************************************************************************/
559
/* Function:    GetNextCluster(File_t* );                                                                                                                                                                                        */
560
/*                                                                                                                                                                                                                                                                               */
561
/* Description: This function finds the next datacluster of the file specified with File *File.                                                                                  */
562
/*                                                                                                                                                                                                                                                                               */
563
/* Returnvalue: The function returns the next cluster or 0 if the last cluster has already reached.                                                                                                      */
564
/*****************************************************************************************************************************************/
565
uint16_t GetNextCluster(File_t * file)
231 killagreg 566
{
297 killagreg 567
        uint16_t cluster = 0;
568
        uint32_t fat_byte_offset, sector, byte;
569
        Fat16Entry_t * fat;
231 killagreg 570
 
297 killagreg 571
        if((!Partition.IsValid) || (file == NULL)) return(cluster);
572
        // if sector is within the data area
573
        if((Partition.FirstDataSector <= file->FirstSectorOfCurrCluster)&& (file->FirstSectorOfCurrCluster <= Partition.LastDataSector))
231 killagreg 574
        {
297 killagreg 575
                // determine current file cluster
576
                cluster = SectorToFat16Cluster(file->FirstSectorOfCurrCluster);
577
                // calculate byte offset in the fat for corresponding entry
578
                fat_byte_offset = ((uint32_t)cluster)<<1; // two FAT bytes (16 bits) for every cluster
579
                // calculate the sector that contains the current cluster within the fat
580
                sector = Partition.FirstFatSector + ( fat_byte_offset / BYTES_PER_SECTOR);
581
                // calculate byte offset of the current cluster within that fat sector
582
                byte = fat_byte_offset % BYTES_PER_SECTOR;
583
                // read this sector to the file cache
584
                if(file->SectorInCache != sector)
231 killagreg 585
                {
297 killagreg 586
                        file->SectorInCache = sector;                                           // update sector stored in buffer
587
                        if(SD_SUCCESS != SDC_GetSector(file->SectorInCache, file->Cache))       // read sector from sd-card
588
                        {
589
                                Fat16_Deinit();
590
                                return (cluster);
591
                        }
231 killagreg 592
                }
297 killagreg 593
                // read the next cluster from cache
594
                fat = (Fat16Entry_t *)(&(file->Cache[byte]));
595
                cluster = fat->NextCluster;
596
                // if last cluster fat entry
597
                if(FAT16_CLUSTER_LAST_MIN <= cluster)
598
                {
599
                         cluster = 0;
600
                }
231 killagreg 601
                else
602
                {
297 killagreg 603
                        file->FirstSectorOfCurrCluster = Fat16ClusterToSector(cluster);
604
                        file->SectorOfCurrCluster = 0;
605
                        file->ByteOfCurrSector = 0;
231 killagreg 606
                }
607
        }
297 killagreg 608
        return(cluster);
231 killagreg 609
}
610
 
611
 
297 killagreg 612
/****************************************************************************************************************************************/
613
/* Function:    FindNextFreeCluster(File_t *);                                                                                                                                                                          */
614
/*                                                                                                                                                                                                                                                                              */
615
/* Description: This function looks in the fat to find the next free cluster                                                                                                                    */
616
/*                                                                                                                                                                                                                                                                              */
617
/* Returnvalue: The function returns the cluster number of the next free cluster found within the fat.                                                                  */
618
/****************************************************************************************************************************************/
619
uint16_t FindNextFreeCluster(File_t *file)
231 killagreg 620
{
297 killagreg 621
        uint32_t fat_sector;                            // current sector within the fat relative to the first sector of the fat.
622
        uint32_t curr_sector;                           // current sector
623
        uint16_t fat_entry;                                     // index to an fatentry within the actual sector (256 fatentries are possible within one sector).
624
        uint16_t free_cluster = 0;                      // next free cluster number.
625
        Fat16Entry_t * fat;
231 killagreg 626
 
297 killagreg 627
        if((!Partition.IsValid) || (file == NULL)) return(0);
231 killagreg 628
 
297 killagreg 629
        // start searching for an empty cluster at the beginning of the fat.
630
        fat_sector = 0;
631
        do
231 killagreg 632
        {
297 killagreg 633
                curr_sector = Partition.FirstFatSector + fat_sector;    // calculate sector to read
634
                file->SectorInCache = curr_sector;                                              // upate the sector number of file cache.
635
                if( SD_SUCCESS != SDC_GetSector(file->SectorInCache, file->Cache))              // read sector of fat from sd-card.
636
                {
637
                        Fat16_Deinit();
638
                        return(free_cluster);
639
                }
231 killagreg 640
 
297 killagreg 641
                fat = (Fat16Entry_t *)file->Cache;                                              // set fat pointer to file cache
231 killagreg 642
 
297 killagreg 643
                for(fat_entry = 0; fat_entry < FAT16_ENTRIES_PER_SECTOR; fat_entry++)                                           // look for an free cluster at all entries in this sector of the fat.
231 killagreg 644
                {
297 killagreg 645
                        if(fat[fat_entry].NextCluster == FAT16_CLUSTER_FREE)            // empty cluster found!!
646
                        {
647
                                fat[fat_entry].NextCluster = FAT16_CLUSTER_LAST_MAX;    // mark this fat-entry as used
648
                                if(SD_SUCCESS != SDC_PutSector(file->SectorInCache, file->Cache))               // and save the sector at the sd-card.
649
                                {
650
                                        Fat16_Deinit();
651
                                        return(free_cluster);
652
                                }
653
                                free_cluster = (uint16_t)(fat_sector * FAT16_ENTRIES_PER_SECTOR + (uint32_t)fat_entry);
654
                                fat_entry = FAT16_ENTRIES_PER_SECTOR;                                   // terminate the search for a free cluster in this sector.
655
                        }
231 killagreg 656
                }
297 killagreg 657
                fat_sector++;                                                                                                   // continue the search in next fat sector
658
        // repeat until the end of the fat is  reached and no free cluster has been found so far
659
        }while((fat_sector < Partition.SectorsPerFat) && (!free_cluster));
660
        return(free_cluster);
231 killagreg 661
}
662
 
663
 
297 killagreg 664
/****************************************************************************************************************************************************/
665
/* Function:    int16_t fseek_(File_t *, int32_t *, uint8_t)                                                                                                                                                                                                            */
666
/*                                                                                                                                                                                                                                                                                                      */
667
/* Description: This function sets the pointer of the stream relative to the position                                                                                                                           */
668
/*                              specified by origin (SEEK_SET, SEEK_CUR, SEEK_END)                                                                                                                                                                      */
669
/* Returnvalue: Is 1 if seek was successful                                                                                                                                                                                                                                                                     */
670
/****************************************************************************************************************************************************/
317 killagreg 671
int16_t fseek_(File_t * const file, int32_t offset, int16_t origin)
231 killagreg 672
{
297 killagreg 673
        int32_t         fposition       = 0;
674
        int16_t         retvalue        = 1;
231 killagreg 675
 
297 killagreg 676
        if((!Partition.IsValid) || (file == NULL)) return(0);
677
        switch(origin)
231 killagreg 678
        {
297 killagreg 679
                case SEEK_SET:                          // Fileposition relative to the beginning of the file.
680
                        fposition = 0;
681
                        break;
682
                case SEEK_END:                          // Fileposition relative to the end of the file.
683
                        fposition = (int32_t)file->Size;
684
                        break;
685
                case SEEK_CUR:                          // Fileposition relative to the current position of the file.
686
                default:
687
                        fposition = file->Position;
688
                        break;
689
        }
690
 
691
        fposition += offset;
692
 
693
        if((fposition >= 0) && (fposition <= (int32_t)file->Size))              // is the pointer still within the file?
694
        {
695
                // reset file position to start of the file
696
                file->FirstSectorOfCurrCluster = file->FirstSectorOfFirstCluster;
697
                file->SectorOfCurrCluster       = 0;
698
                file->ByteOfCurrSector          = 0;
699
                file->Position                          = 0;
700
 
701
                while(file->Position < fposition)       // repeat until the current position is less than target
231 killagreg 702
                {
297 killagreg 703
                        file->Position++;                               // increment file position
704
                        file->ByteOfCurrSector++;               // next byte in current sector
705
                        if(file->ByteOfCurrSector >= BYTES_PER_SECTOR)
231 killagreg 706
                        {
297 killagreg 707
                                file->ByteOfCurrSector = 0;                                                                             // reading at the beginning of new sector.
708
                                file->SectorOfCurrCluster++;                                                                    // continue reading in next sector
709
                                if(file->SectorOfCurrCluster >= Partition.SectorsPerCluster)    // if end of cluster is reached, the next datacluster has to be searched in the FAT.
710
                                {
711
                                        if(GetNextCluster(file))                                                                        // Sets the clusterpointer of the file to the next datacluster.
712
                                        {
713
                                                file->SectorOfCurrCluster = 0;
714
                                        }
715
                                        else // the last cluster was allready reached
716
                                        {
717
                                                file->SectorOfCurrCluster--;                                                    // jump back to the ast sector in the last cluster
718
                                                file->ByteOfCurrSector = BYTES_PER_SECTOR;                              // set ByteOfCurrSector one byte over sector end
719
                                        }
720
                                }
231 killagreg 721
                        }
722
                }
723
        }
297 killagreg 724
        if(file->Position == fposition) retvalue = 0;
725
        return(retvalue);
231 killagreg 726
}
727
 
728
 
297 killagreg 729
/****************************************************************************************************************************************/
730
/* Function:    uint16_t DeleteClusterChain(File *file);                                                                                                                                                                                */
731
/*                                                                                                                                                                                                                                                                              */
732
/* Description: This function trances along a cluster chain in the fat and frees all clusters visited.                                                                  */
733
/*                                                                                                                                                                                                                                                                              */
734
/****************************************************************************************************************************************/
735
uint8_t DeleteClusterChain(uint16_t StartCluster)
231 killagreg 736
{
297 killagreg 737
        uint16_t cluster;
738
        uint32_t fat_byte_offset, sector, byte;
739
        Fat16Entry_t * fat;
740
        uint8_t buffer[BYTES_PER_SECTOR];
741
        uint32_t sector_in_buffer = 0;
742
        uint8_t repeat = 0;
231 killagreg 743
 
297 killagreg 744
        if(!Partition.IsValid) return 0;
231 killagreg 745
 
297 killagreg 746
        cluster = StartCluster; // init chain trace
747
        // calculate byte offset in the fat for corresponding entry
748
        fat_byte_offset = ((uint32_t)cluster)<<1; // two FAT bytes (16 bits) for every cluster
749
        // calculate the sector that contains the current cluster within the fat
750
        sector = Partition.FirstFatSector + ( fat_byte_offset / BYTES_PER_SECTOR);
751
        // calculate byte offset of the current cluster within that fat sector
752
        byte = fat_byte_offset % BYTES_PER_SECTOR;
753
        do
754
        {
755
                if(sector != sector_in_buffer)
756
                {
757
                        // read this sector to buffer
758
                        sector_in_buffer = sector;
759
                        if(SD_SUCCESS != SDC_GetSector(sector_in_buffer, buffer)) return 0;     // read sector from sd-card
760
                }
761
                // read the next cluster from cache
762
                fat = (Fat16Entry_t *)(&(buffer[byte]));
763
                cluster = fat->NextCluster;
764
                if((FAT16_CLUSTER_USED_MIN <= cluster) && (cluster <= FAT16_CLUSTER_USED_MAX) ) repeat = 1;
765
                else repeat = 0;
231 killagreg 766
 
297 killagreg 767
                fat->NextCluster =      FAT16_CLUSTER_FREE; // mark current cluster as free
768
                // calculate byte offset in the fat for corresponding entry
769
                fat_byte_offset = ((uint32_t)cluster)<<1; // two FAT bytes (16 bits) for every cluster
770
                // calculate the sector that contains the current cluster within the fat
771
                sector = Partition.FirstFatSector + ( fat_byte_offset / BYTES_PER_SECTOR);
772
                // calculate byte offset of the current cluster within that fat sector
773
                byte = fat_byte_offset % BYTES_PER_SECTOR;
774
                // if new sector is not the sector in buffer or the last cluster in the chain was traced
775
                if((sector != sector_in_buffer) || !repeat)
776
                {       // write sector in buffer
777
                        if(SD_SUCCESS != SDC_PutSector(sector_in_buffer,buffer)) return 0;
778
                }
779
        }
780
        while(repeat);
231 killagreg 781
 
297 killagreg 782
        return 1;
231 killagreg 783
}
784
 
785
 
297 killagreg 786
/****************************************************************************************************************************************/
787
/* Function:    uint16_t AppendCluster(File *file);                                                                                                                                                                                     */
788
/*                                                                                                                                                                                                                                                                              */
789
/* Description: This function looks in the fat to find the next free cluster and appends it to the file.                                                                */
790
/*                                                                                                                                                                                                                                                                              */
791
/* Returnvalue: The function returns the appened cluster number or 0 of no cluster was appended.                                                                                                                                                */
792
/****************************************************************************************************************************************/
793
uint16_t AppendCluster(File_t *file)
231 killagreg 794
{
297 killagreg 795
        uint16_t last_cluster, new_cluster = 0;
796
        uint32_t fat_byte_offset, sector, byte;
797
        Fat16Entry_t * fat;
231 killagreg 798
 
297 killagreg 799
        if((!Partition.IsValid) || (file == NULL)) return(new_cluster);
231 killagreg 800
 
297 killagreg 801
        new_cluster = FindNextFreeCluster(file);        // the next free cluster found on the disk.
802
        if(new_cluster)
803
        {       // A free cluster was found and can be added to the end of the file.
804
                fseek_(file, 0, SEEK_END);                                                                                                      // jump to the end of the file
805
                last_cluster = SectorToFat16Cluster(file->FirstSectorOfCurrCluster);            // determine current file cluster
806
                fat_byte_offset = ((uint32_t)last_cluster)<<1;
807
                sector = Partition.FirstFatSector + ( fat_byte_offset / BYTES_PER_SECTOR);
808
                byte = fat_byte_offset % BYTES_PER_SECTOR;
231 killagreg 809
 
297 killagreg 810
                if(file->SectorInCache != sector)
231 killagreg 811
                {
297 killagreg 812
                        file->SectorInCache = sector;                                           // update sector stored in buffer
813
                        if(SD_SUCCESS != SDC_GetSector(file->SectorInCache, file->Cache))       // read sector from sd-card
814
                        {
815
                                Fat16_Deinit();
816
                                return(0);
817
                        }
231 killagreg 818
                }
297 killagreg 819
                fat = (Fat16Entry_t *)(&(file->Cache[byte]));
820
                fat->NextCluster = new_cluster;                                                 // append the free cluster to the end of the file in the FAT.
821
                if(SD_SUCCESS != SDC_PutSector(file->SectorInCache, file->Cache))               // save the modified sector to the FAT.
231 killagreg 822
                {
297 killagreg 823
                        Fat16_Deinit();
824
                        return(0);
231 killagreg 825
                }
297 killagreg 826
                file->FirstSectorOfCurrCluster = Fat16ClusterToSector(new_cluster);
827
                file->SectorOfCurrCluster = 0;
828
                file->ByteOfCurrSector = 0;
231 killagreg 829
        }
297 killagreg 830
        return(new_cluster);
231 killagreg 831
}
832
 
297 killagreg 833
/****************************************************************************************************************************************************/
834
/* Function:    DirectoryEntryExist(int8_t *, uint8_t, uint8_t, File_t *)                                                                                                                                                                                       */
835
/*                                                                                                                                                                                                                                                                                                      */
836
/* Description: This function searches all possible dir entries until the file or directory is found or the end of the directory is reached                     */
837
/*                                                                                                                                                                                                                                                                                                      */
838
/* Returnvalue: This function returns 1 if the directory entry specified was found.                                                                                                                                     */
839
/****************************************************************************************************************************************************/
840
uint8_t DirectoryEntryExist(int8_t *dirname, uint8_t attribfilter, uint8_t attribmask, File_t *file)
841
{
842
        uint32_t        dir_sector, max_dir_sector, curr_sector;
843
        uint16_t        dir_entry = 0;
231 killagreg 844
 
297 killagreg 845
        uint16_t        end_of_directory_not_reached = 0;
846
        uint8_t         i = 0;
847
        uint8_t         direntry_exist = 0;
848
        DirEntry_t * dir;
231 killagreg 849
 
297 killagreg 850
        // if incomming pointers are useless return immediatly
851
        if((!Partition.IsValid) || (file == NULL) || (dirname == NULL)) return(direntry_exist);
231 killagreg 852
 
297 killagreg 853
        // dir entries can be searched only in filesclusters that have
854
        // a corresponding dir entry with adir-flag set in its attribute
855
        // or direct within the root directory area
231 killagreg 856
 
297 killagreg 857
        file->FirstSectorOfFirstCluster = 0;
858
        // no current directory exist therefore assume searching in the root
859
        if(file->DirectorySector == 0)
860
        {
861
                max_dir_sector = (Partition.MaxRootEntries * DIRENTRY_SIZE)/BYTES_PER_SECTOR;
862
                file->FirstSectorOfFirstCluster = Partition.FirstRootDirSector;
863
        }
864
        // within the root directory area we can read sectors sequentially until the end of this area
865
        else if((Partition.FirstRootDirSector <= file->DirectorySector) && (file->DirectorySector < Partition.FirstDataSector))
866
        {
867
                max_dir_sector = (Partition.MaxRootEntries * DIRENTRY_SIZE)/BYTES_PER_SECTOR;
868
        }
869
        // within the data clusters we can read sectors sequentially only within the cluster
870
        else if((Partition.FirstDataSector <= file->DirectorySector) && (file->DirectorySector <= Partition.LastDataSector))
871
        {
872
                max_dir_sector = Partition.SectorsPerCluster;                           // limit max secters before next cluster
873
        }
874
        else return (direntry_exist); // bad sector range for directory sector of the file
875
        // if search area is not defined yet
876
        if(file->FirstSectorOfFirstCluster == 0)
877
        {
878
                // check if the directory entry of current file is existent and has the dir-flag set
879
                file->SectorInCache = file->DirectorySector;                            // update the sector number of file cache.
880
                if(SD_SUCCESS != SDC_GetSector(file->SectorInCache, file->Cache))// read in the sector.
881
                {
882
                        Fat16_Deinit();
883
                        return(direntry_exist);
884
                }
885
                dir = (DirEntry_t *)file->Cache;                                                        // set pointer to directory
886
                switch((uint8_t)dir[file->DirectoryIndex].Name[0])                                      // check if current directory exist
887
                {
888
                        case SLOT_EMPTY:
889
                        case SLOT_DELETED:
890
                                // the directrory pointer of this file points to a deleted or not existen directory
891
                                // therefore no file or subdirectory can be created
892
                                return (direntry_exist);
893
                                break;
894
                        default:        // and is a real directory
895
                                if((dir[file->DirectoryIndex].Attribute & ATTR_SUBDIRECTORY) != ATTR_SUBDIRECTORY)
896
                                {       // current file is not a directory therefore no file or subdirectory can be created here
897
                                        return (direntry_exist);
898
                                }
899
                                break;
900
                }
901
                file->FirstSectorOfFirstCluster = Fat16ClusterToSector(dir[file->DirectoryIndex].StartCluster);
902
        }
231 killagreg 903
 
297 killagreg 904
        // update current file data area position to start of first cluster
905
        file->FirstSectorOfCurrCluster  = file->FirstSectorOfFirstCluster;
906
        file->SectorOfCurrCluster               = 0;
907
        file->ByteOfCurrSector                  = 0;
231 killagreg 908
 
297 killagreg 909
        do // loop over all data clusters of the current directory entry
910
        {
911
                dir_sector = 0; // reset sector counter within a new cluster
912
                do // loop over all sectors of a cluster or all sectors of the root directory
913
                {
914
                        curr_sector = file->FirstSectorOfCurrCluster + dir_sector;      // calculate sector number
915
                        file->SectorInCache = curr_sector;                                                      // upate the sector number of file cache.
916
                        if(SD_SUCCESS != SDC_GetSector(file->SectorInCache, file->Cache))// read the sector
917
                        {
918
                                Fat16_Deinit();
919
                                return(direntry_exist);
920
                        }
921
                        dir = (DirEntry_t *)file->Cache;                                                        // set pointer to directory
922
                        // search all directory entries within that sector
923
                        for(dir_entry = 0; dir_entry < DIRENTRIES_PER_SECTOR; dir_entry++)
924
                        {   // check for existing dir entry
925
                                switch((uint8_t)dir[dir_entry].Name[0])
926
                                {
927
                                        case SLOT_EMPTY:
928
                                        case SLOT_DELETED:
929
                                                // ignore empty or deleted dir entries
930
                                                break;
931
                                        default:
932
                                                // if existing check attributes before names are compared will safe performance
933
                                                if ((dir[dir_entry].Attribute & attribmask) != attribfilter) break; // attribute must match
934
                                                // then compare the name to the giveb dirname (first 11 characters include 8 chars of basename and 3 chars extension.)
935
                                                i = 0;
936
                                                while((i < 11) && (dir[dir_entry].Name[i] == dirname[i])) i++;
937
                                                if (i < 10) break; // names does not match
938
                                                // if dirname and attribute have matched
939
                                                file->Attribute = dir[dir_entry].Attribute; // store attribute of found dir entry
940
                                                file->FirstSectorOfFirstCluster = Fat16ClusterToSector(dir[dir_entry].StartCluster); // set sector of first data cluster
941
                                                file->FirstSectorOfCurrCluster = file->FirstSectorOfFirstCluster;
942
                                                file->SectorOfCurrCluster = 0;
943
                                                file->ByteOfCurrSector = 0;
944
                                                file->DirectorySector = curr_sector; // current sector
945
                                                file->DirectoryIndex  = dir_entry; // current direntry in current sector
946
                                                file->Size = dir[dir_entry].Size;
947
                                                direntry_exist = 1; // mark as found
948
                                                dir_entry = DIRENTRIES_PER_SECTOR;      // stop for-loop
949
                                } // end of first byte of name check
950
                        }
951
                        dir_sector++; // search next sector
952
                // stop if we reached the end of the cluster or the end of the root dir
953
                }while((dir_sector < max_dir_sector) && (!direntry_exist));
231 killagreg 954
 
297 killagreg 955
                // if we are seaching in the data area and the file not found in this cluster so take next cluster.
956
                if(!direntry_exist && ( Partition.FirstDataSector <= file->FirstSectorOfCurrCluster))
957
                {
958
                        end_of_directory_not_reached = GetNextCluster(file);  // updates File->FirstSectorOfCurrCluster
959
                }
960
        }while((end_of_directory_not_reached) && (!direntry_exist)); // repeat until a next cluster exist an no
961
        return(direntry_exist);
231 killagreg 962
}
963
 
964
 
297 killagreg 965
/****************************************************************************************************************************************/
966
/*      Function:               CreateDirectoryEntry(int8_t *, uint16_t, File_t *)                                                                                                                                                      */
967
/*                                                                                                                                                                                                                                                                              */
968
/*      Description:    This function looks for the next free position in the directory and creates an entry.                                                           */
969
/*                                      The type of an directory entry is specified by the file attribute.                                                                                                      */
970
/*                                                                                                                                                                                                                                                                              */
971
/*      Returnvalue:    Return 0 on error                                                                                                                                                                                                       */
972
/****************************************************************************************************************************************/
973
uint8_t CreateDirectoryEntry(int8_t *dirname, uint8_t attrib, File_t *file)
231 killagreg 974
{
297 killagreg 975
        uint32_t        dir_sector, max_dir_sector, curr_sector;
976
        uint16_t        dir_entry       = 0;
977
        uint16_t        subdircluster, dircluster = 0;
978
        uint16_t        end_of_directory_not_reached = 0;
979
        uint8_t         i                       = 0;
980
        uint8_t         retvalue        = 0;
981
        DirEntry_t*     dir;
231 killagreg 982
 
297 killagreg 983
        if((!Partition.IsValid) || (file == NULL) || (dirname == NULL)) return (retvalue);
984
        // It is not checked here that the dir entry that should be created is already existent!
231 killagreg 985
 
297 killagreg 986
        // Dir entries can be created only in file-clusters that have
987
        // the dir-flag set in its attribute or within the root directory
231 killagreg 988
 
297 killagreg 989
        file->FirstSectorOfFirstCluster = 0;
990
        // no current directory exist therefore assume creating in the root
991
        if(file->DirectorySector == 0)
231 killagreg 992
        {
297 killagreg 993
                max_dir_sector = (Partition.MaxRootEntries * DIRENTRY_SIZE)/BYTES_PER_SECTOR;
994
                dircluster = 0;
995
                file->FirstSectorOfFirstCluster = Partition.FirstRootDirSector;
996
        }
997
        // within the root directory area we can read sectors sequentially until the end of this area
998
        else if((Partition.FirstRootDirSector <= file->DirectorySector) && (file->DirectorySector < Partition.FirstDataSector))
999
        {
1000
                max_dir_sector = (Partition.MaxRootEntries * DIRENTRY_SIZE)/BYTES_PER_SECTOR;
1001
        }
1002
        // within the data clusters we can read sectors sequentially only within the cluster
1003
        else if((Partition.FirstDataSector <= file->DirectorySector) && (file->DirectorySector <= Partition.LastDataSector))
1004
        {
1005
                max_dir_sector = Partition.SectorsPerCluster;
1006
        }
1007
        else return (retvalue); // bad sector range for directory sector of the file
1008
        // if search area is not defined yet
1009
        if(file->FirstSectorOfFirstCluster == 0)
1010
        {
1011
            // check if the directory entry of current file is existent and has the dir-flag set
1012
                file->SectorInCache = file->DirectorySector;                            // update the sector number of file cache.
1013
                if(SD_SUCCESS != SDC_GetSector(file->SectorInCache, file->Cache))// read in the sector.
1014
                {
1015
                        Fat16_Deinit();
1016
                        return(retvalue);
1017
                }
1018
                dir = (DirEntry_t *)file->Cache;                                                        // set pointer to directory
1019
                switch((uint8_t)dir[file->DirectoryIndex].Name[0])                                      // check if current directory exist
1020
                {
1021
                        case SLOT_EMPTY:
1022
                        case SLOT_DELETED:
1023
                                return (retvalue);
1024
                                break;
1025
                        default:        // and is a real directory
1026
                                if((dir[file->DirectoryIndex].Attribute & ATTR_SUBDIRECTORY) != ATTR_SUBDIRECTORY)
1027
                                {       // current file is not a directory therefore no file or subdirectory can be created here
1028
                                        return (retvalue);
1029
                                }
1030
                                break;
1031
                }
1032
                dircluster = dir[file->DirectoryIndex].StartCluster;
1033
                file->FirstSectorOfFirstCluster = Fat16ClusterToSector(dircluster);
1034
        }
231 killagreg 1035
 
297 killagreg 1036
        subdircluster = FindNextFreeCluster(file);      // get the next free cluster on the disk and mark it as used.
1037
        if(subdircluster)
1038
        {
1039
                file->FirstSectorOfCurrCluster  = file->FirstSectorOfFirstCluster;
1040
                file->SectorOfCurrCluster               = 0;
1041
                do // loop over all clusters of current directory
1042
                {
1043
                        dir_sector = 0; // reset sector counter within a new cluster
1044
                        do // loop over all sectors of a cluster or all sectors of the root directory
231 killagreg 1045
                        {
297 killagreg 1046
                                curr_sector = file->FirstSectorOfCurrCluster + dir_sector;      // calculate sector number
1047
                                file->SectorInCache = curr_sector;                                                      // upate the sector number of file cache.
1048
                                if(SD_SUCCESS != SDC_GetSector(file->SectorInCache, file->Cache))// read in the sector.
231 killagreg 1049
                                {
297 killagreg 1050
                                        Fat16_Deinit();
1051
                                        return(retvalue);
231 killagreg 1052
                                }
297 killagreg 1053
                                dir = (DirEntry_t *)file->Cache;                                                        // set pointer to directory
1054
                                // search all directory entries of a sector
1055
                                for(dir_entry = 0; dir_entry < DIRENTRIES_PER_SECTOR; dir_entry++)
1056
                                {       // check if current direntry is available
1057
                                        if(((uint8_t)dir[dir_entry].Name[0] == SLOT_EMPTY) || ((uint8_t)dir[dir_entry].Name[0] == SLOT_DELETED))
1058
                                        {       // a free direntry was found
1059
                                                for(i = 0; i < 11; i++) dir[dir_entry].Name[i] = dirname[i];            // Set dir name
1060
                                                dir[dir_entry].Attribute    = attrib;                                                           // Set the attribute of the new directoryentry.
1061
                                                dir[dir_entry].StartCluster = subdircluster;                                            // copy the location of the first datacluster to the directoryentry.
1062
                                                dir[dir_entry].DateTime         = FileDateTime(&SystemTime);                    // set date/time
1063
                                                dir[dir_entry].Size             = 0;                                                                    // the new createted file has no content yet.
1064
                                                if(SD_SUCCESS != SDC_PutSector(file->SectorInCache, file->Cache))       // write back to card
1065
                                                {
1066
                                                        Fat16_Deinit();
1067
                                                        return(retvalue);
1068
                                                }
1069
                                                file->FirstSectorOfFirstCluster = Fat16ClusterToSector(subdircluster);  // Calculate absolute sectorposition of first datacluster.
1070
                                                file->FirstSectorOfCurrCluster  = file->FirstSectorOfFirstCluster;      // Start reading the file with the first sector of the first datacluster.
1071
                                                file->SectorOfCurrCluster               = 0;                                                            // reset sector of cureen cluster
1072
                                                file->ByteOfCurrSector                  = 0;                                                            // reset the byte location within the current sector
1073
                                                file->Attribute                                 = attrib;                                               // set file attribute to dir attribute
1074
                                                file->Size                                              = 0;                                                        // new file has no size
1075
                                                file->DirectorySector                   = curr_sector;
1076
                                                file->DirectoryIndex                    = dir_entry;
1077
                                                if((attrib & ATTR_SUBDIRECTORY) == ATTR_SUBDIRECTORY)                           // if a new directory was created then initilize the data area
1078
                                                {
1079
                                                        ClearCurrCluster(file); // fill cluster with zeros
1080
                                                        file->SectorInCache = file->FirstSectorOfFirstCluster;
1081
                                                        if(SD_SUCCESS != SDC_GetSector(file->SectorInCache, file->Cache))// read in the sector.
1082
                                                        {
1083
                                                                Fat16_Deinit();
1084
                                                                return(retvalue);
1085
                                                        }
1086
                                                        dir = (DirEntry_t *)file->Cache;
1087
                                                        // create direntry "." to current dir
1088
                                                        dir[0].Name[0] = 0x2E;
1089
                                                        for(i = 1; i < 11; i++) dir[0].Name[i] = ' ';
1090
                                                        dir[0].Attribute = ATTR_SUBDIRECTORY;
1091
                                                        dir[0].StartCluster = subdircluster;
1092
                                                        dir[0].DateTime = 0;
1093
                                                        dir[0].Size = 0;
1094
                                                        // create direntry ".." to the upper dir
1095
                                                        dir[1].Name[0] = 0x2E;
1096
                                                        dir[1].Name[1] = 0x2E;
1097
                                                        for(i = 2; i < 11; i++) dir[1].Name[i] = ' ';
1098
                                                        dir[1].Attribute = ATTR_SUBDIRECTORY;
1099
                                                        dir[1].StartCluster = dircluster;
1100
                                                        dir[1].DateTime = 0;
1101
                                                        dir[1].Size = 0;
1102
                                                        if(SD_SUCCESS != SDC_PutSector(file->SectorInCache, file->Cache))// read in the sector.
1103
                                                        {
1104
                                                                Fat16_Deinit();
1105
                                                                return(retvalue);
1106
                                                        }
1107
                                                }
1108
                                                retvalue = 1;
1109
                                                dir_entry = DIRENTRIES_PER_SECTOR;      // stop for-loop
1110
                                        }
1111
                                }
1112
                                dir_sector++; // search next sector
1113
                        // stop if we reached the end of the cluster or the end of the root dir
1114
                        }while((dir_sector < max_dir_sector) && (!retvalue));
1115
 
1116
                        // if we are seaching in the data area and the file not found in this cluster so take next cluster.
1117
                        if(!retvalue && ( Partition.FirstDataSector <= file->FirstSectorOfCurrCluster))
231 killagreg 1118
                        {
297 killagreg 1119
                                end_of_directory_not_reached = GetNextCluster(file);  // updates File->FirstSectorOfCurrCluster
231 killagreg 1120
                        }
297 killagreg 1121
                }while((end_of_directory_not_reached) && (!retvalue));
1122
                // Perhaps we are at the end of the last cluster of a directory file an have no free direntry found.
1123
                // Then we would need to add a cluster to that file and create the new direntry there.
1124
                // This code is not implemented yet, because its occurs only if more that 32*32=1024 direntries are
1125
                // within a subdirectory of root.
231 killagreg 1126
        }
297 killagreg 1127
        return(retvalue);       // return 1 if file has been created otherwise return 0.
231 killagreg 1128
}
1129
 
297 killagreg 1130
/********************************************************************************************************************************************/
1131
/*      Function:               FileExist(const int8_t* filename, uint8_t attribfilter, uint8_t attribmask, File_t *file);                                                                                      */
1132
/*                                                                                                                                                                                                                                                                                      */
1133
/*      Description:    This function looks for the specified file including its subdirectories beginning                                                                               */
1134
/*                                      in the rootdirectory of the drive. If the file is found the Filepointer properties are                                                                  */
1135
/*                                      updated.                                                                                                                                                                                                                                */
1136
/*                                                                                                                                                                                                                                                                                      */
1137
/*      Returnvalue:    1 if file is found else 0.                                                                                                                                                                                              */
1138
/********************************************************************************************************************************************/
1139
uint8_t FileExist(const int8_t* filename, const uint8_t attribfilter, const uint8_t attribmask, File_t *file)
231 killagreg 1140
{
297 killagreg 1141
        int8_t* path = 0;
1142
        int8_t* subpath = 0;
1143
        uint8_t af, am, file_exist = 0;
1144
        int8_t  dirname[12]; // 8+3 + temination character
231 killagreg 1145
 
297 killagreg 1146
        // if incomming pointers are useless return immediatly
1147
        if ((filename == NULL) || (file == NULL) || (!Partition.IsValid)) return 0;
231 killagreg 1148
 
297 killagreg 1149
        // trace along the filepath
1150
        path = (int8_t*)filename;                                                               // start a the beginning of the filename string
1151
        file->DirectorySector = 0;                                                              // start at RootDirectory with file search
1152
        file->DirectoryIndex = 0;
1153
        // as long as the file was not found and the remaining path is not empty
1154
        while((*path != 0) && !file_exist)
1155
        {       // separate dirname and subpath from filepath string
1156
                subpath = SeperateDirName(path, dirname);
1157
                if(subpath != NULL)
231 killagreg 1158
                {
297 killagreg 1159
                        if(*subpath == 0)
1160
                        {       // empty subpath indicates last element of dir chain
1161
                                af = attribfilter;
1162
                                am = attribmask;
1163
                        }
1164
                        else  // it must be a subdirectory and no volume label
231 killagreg 1165
                        {
297 killagreg 1166
                                af = ATTR_SUBDIRECTORY;
1167
                                am = ATTR_SUBDIRECTORY|ATTR_VOLUMELABEL;
1168
                        }
1169
                        if(!DirectoryEntryExist(dirname, af, am, file))
1170
                        {
1171
                                return (file_exist); // subdirectory does not exist
1172
                        }
1173
                        else
1174
                        {
1175
                                if (*subpath == 0)
231 killagreg 1176
                                {
297 killagreg 1177
                                        file_exist = 1; // last element of path chain was found with the given attribute filter
231 killagreg 1178
                                }
1179
                        }
1180
                }
297 killagreg 1181
                else // error seperating the subpath
231 killagreg 1182
                {
297 killagreg 1183
                        return file_exist; // bad subdir format
231 killagreg 1184
                }
297 killagreg 1185
                path = subpath;
1186
                subpath = 0;
231 killagreg 1187
        }
297 killagreg 1188
        return (file_exist);
231 killagreg 1189
}
1190
 
1191
 
297 killagreg 1192
/********************************************************************************************************************************************/
1193
/*      Function:               FileCreate(const s8* filename, u8 attrib, File_t *file);                                                                                                                                */
1194
/*                                                                                                                                                                                                                                                                                      */
1195
/*      Description:    This function looks for the specified file including its subdirectories beginning                                                                               */
1196
/*                                      in the rootdirectory of the partition. If the file is found the Filepointer properties are                                                              */
1197
/*                                      updated. If file or its subdirectories are not found they will be created                                                                                               */
1198
/*                                                                                                                                                                                                                                                                                      */
1199
/*      Returnvalue:    1 if file was created else 0.                                                                                                                                                                                   */
1200
/********************************************************************************************************************************************/
1201
uint8_t FileCreate(const int8_t* filename, const uint8_t attrib, File_t *file)
231 killagreg 1202
{
297 killagreg 1203
        int8_t *path = 0;
1204
        int8_t *subpath = 0;
1205
        uint8_t af, am, file_created = 0;
1206
        int8_t dirname[12];
231 killagreg 1207
 
297 killagreg 1208
        // if incomming pointers are useless return immediatly
1209
        if ((filename == NULL) || (file == NULL) || (!Partition.IsValid)) return 0;
231 killagreg 1210
 
297 killagreg 1211
        // trace along the filepath
1212
        path = (int8_t*)filename;                                                                       // start a the beginning of the filename string
1213
        file->DirectorySector = 0;                                                              // start at RootDirectory with file search
1214
        file->DirectoryIndex = 0;
1215
        // as long as the file was not created and the remaining file path is not empty
1216
        while((*path != 0) && !file_created)
1217
        {   // separate dirname and subpath from filepath string
1218
                subpath = SeperateDirName(path, dirname);
1219
                if(subpath != NULL)
231 killagreg 1220
                {
297 killagreg 1221
                        if(*subpath == 0)
1222
                        {       // empty subpath indicates last element of dir chain
1223
                                af = ATTR_NONE;
1224
                                am = ATTR_SUBDIRECTORY|ATTR_VOLUMELABEL;  // any file that is no subdir or volume label
1225
                        }
1226
                        else  // it must be a subdirectory and no volume label
231 killagreg 1227
                        {
297 killagreg 1228
                                af = ATTR_SUBDIRECTORY;
1229
                                am = ATTR_SUBDIRECTORY|ATTR_VOLUMELABEL;
231 killagreg 1230
                        }
297 killagreg 1231
                        if(!DirectoryEntryExist(dirname, af, am, file)) // if subdir or file is not existent
1232
                        {  // try to create subdir or file
1233
                                if(*subpath == 0) af = attrib; // if last element in dir chain take the given attribute
1234
                                if(!CreateDirectoryEntry(dirname, af, file))
1235
                                {       // could not be created
1236
                                        return(file_created);
231 killagreg 1237
                                }
297 killagreg 1238
                                else if (*subpath == 0) file_created = 1; // last element of path chain was created
231 killagreg 1239
                        }
1240
                }
297 killagreg 1241
                else // error seperating the subpath
231 killagreg 1242
                {
297 killagreg 1243
                        return file_created; // bad subdir format
231 killagreg 1244
                }
297 killagreg 1245
                path = subpath;
1246
                subpath = 0;
231 killagreg 1247
        }
297 killagreg 1248
        return (file_created);
231 killagreg 1249
}
1250
 
1251
 
297 killagreg 1252
/********************************************************************************************************************************************/
1253
/*      Function:               File_t * fopen_(int8_t* filename, int8_t mode);                                                                                                                                                                 */
1254
/*                                                                                                                                                                                                                                                                                      */
1255
/*      Description:    This function looks for the specified file in the rootdirectory of the drive. If the file is found the number of the    */
1256
/*                                      corrosponding filepointer is returned. Only modes 'r' (reading) and 'a' append are implemented yet.                                             */
1257
/*                                                                                                                                                                                                                                                                                      */
1258
/*      Returnvalue:    The filepointer to the file or 0 if faild.                                                                                                                                                              */
1259
/********************************************************************************************************************************************/
317 killagreg 1260
File_t * fopen_(int8_t * const filename, const int8_t mode)
231 killagreg 1261
{
297 killagreg 1262
        File_t *file    = 0;
231 killagreg 1263
 
297 killagreg 1264
        if((!Partition.IsValid) || (filename == 0)) return(file);
1265
 
1266
        // Look for an unused filepointer in the file pointer list?
1267
        file = LockFilePointer();
1268
        // if no unused file pointer was found return 0
1269
        if(file == NULL) return(file);
1270
 
1271
        // now we have found a free filepointer and claimed it
1272
        // so let initiate its property values
1273
        file->FirstSectorOfFirstCluster = 0;            // Sectorpointer to the first sector of the first datacluster of the file.
1274
        file->FirstSectorOfCurrCluster  = 0;            // Pointer to the cluster which is edited at the moment.
1275
        file->SectorOfCurrCluster               = 0;            // The sector which is edited at the moment (cluster_pointer + sector_index).
1276
        file->ByteOfCurrSector                  = 0;            // The bytelocation within the current sector (cluster_pointer + sector_index + byte_index).
1277
        file->Mode                                              = mode;         // mode of fileoperation (read,write)
1278
        file->Size                                              = 0;            // the size of the opened file in bytes.
1279
        file->Position                                  = 0;            // pointer to a byte within the file 0 < fileposition < filesize
1280
        file->SectorInCache                             = 0;            // the last sector read, wich is still in the sectorbuffer.
1281
        file->DirectorySector                   = 0;            // the sectorposition where the directoryentry has been made.
1282
        file->DirectoryIndex                    = 0;            // the index to the directoryentry within the specified sector.
1283
        file->Attribute                                 = 0;            // the attribute of the file opened.
1284
 
1285
        // check if a real file (no directory) to the given filename exist
1286
        if(FileExist(filename, ATTR_NONE, ATTR_SUBDIRECTORY|ATTR_VOLUMELABEL, file))
1287
        {  // file exist
1288
                switch(mode)  // check mode
231 killagreg 1289
                {
297 killagreg 1290
                        case 'a':       // if mode is: append to file
1291
                                if((file->Attribute & ATTR_READONLY) == ATTR_READONLY)
1292
                                {       // file is marked as readonly --> do not open this file
1293
                                        fclose_(file);
1294
                                        file = NULL;
1295
                                }
1296
                                else
1297
                                {       // file is not marked as read only --> goto end of file
1298
                                        fseek_(file, 0, SEEK_END);              // point to the end of the file
1299
                                }
1300
                                break;
1301
                        case 'w':       // if mode is: write to file
1302
                                if((file->Attribute & ATTR_READONLY) == ATTR_READONLY)
1303
                                {       // file is marked as readonly --> do not open this file
1304
                                        fclose_(file);
1305
                                        file = NULL;
1306
                                }
1307
                                else
1308
                                {       // file is not marked as read only --> goto start of file
1309
                                        // free all clusters of that file
1310
                                        DeleteClusterChain(SectorToFat16Cluster(file->FirstSectorOfFirstCluster));
1311
                                        // mar an empy cluster as the last one and store the corresponding sector
1312
                                        file->FirstSectorOfFirstCluster = Fat16ClusterToSector(FindNextFreeCluster(file));
1313
                                        file->FirstSectorOfCurrCluster = file->FirstSectorOfFirstCluster;
1314
                                        file->SectorOfCurrCluster = 0;
1315
                                        file->ByteOfCurrSector = 0;
1316
                                        file->Size = 0;
1317
                                        file->Position = 0;
1318
                                        fseek_(file, 0, SEEK_SET);
1319
                                }
1320
                                break;
1321
                        case 'r':       // if mode is: read from file
1322
                                // goto end of file
1323
                                fseek_(file, 0, SEEK_SET);
1324
                                break;
1325
                        default: // other modes are not supported
1326
                                fclose_(file);
1327
                                file = NULL;
231 killagreg 1328
                        break;
1329
                }
297 killagreg 1330
                return(file);
231 killagreg 1331
        }
297 killagreg 1332
        else // file does not exist
231 killagreg 1333
        {
297 killagreg 1334
                switch(mode)  // check mode
231 killagreg 1335
                {
297 killagreg 1336
                        case 'a':
1337
                        case 'w': // if mode is write or append
1338
                                // try to create the file
1339
                                if(!FileCreate(filename, ATTR_ARCHIVE, file))
1340
                                { // if it could not be created
1341
                                        fclose_(file);
1342
                                        file = NULL;
1343
                                }
1344
                                break;
1345
                        case 'r': // else opened for 'r'
1346
                        default:  // of unsupported mode
1347
                                fclose_(file);
1348
                                file = NULL;
1349
                                break;
231 killagreg 1350
                }
297 killagreg 1351
                return(file);
231 killagreg 1352
        }
297 killagreg 1353
        // we should never come to this point
1354
        fclose_(file);
1355
        file = NULL;
1356
        return(file);
231 killagreg 1357
}
1358
 
297 killagreg 1359
/****************************************************************************************************************************************************/
1360
/* Function:    fflush_(File *);                                                                                                                                                                                                                                        */
1361
/*                                                                                                                                                                                                                                                                                                      */
1362
/* Description: This function writes the data already in the buffer but not yet written to the file.                                                                                            */
1363
/*                                                                                                                                                                                                                                                                                                      */
1364
/* Returnvalue: 0 on success EOF on error                                                                                                                                                                                                                       */
1365
/****************************************************************************************************************************************************/
317 killagreg 1366
int16_t fflush_(File_t * const file)
297 killagreg 1367
{
1368
        DirEntry_t *dir;
231 killagreg 1369
 
297 killagreg 1370
        if((file == NULL) || (!Partition.IsValid)) return (EOF);
231 killagreg 1371
 
297 killagreg 1372
        switch(file->Mode)
1373
        {
1374
                case 'a':
1375
                case 'w':
1376
                        if(file->ByteOfCurrSector > 0)                                                                          // has data been added to the file?
1377
                        {
1378
                                if(SD_SUCCESS != SDC_PutSector(file->SectorInCache, file->Cache))// save the data still in the buffer
1379
                                {
1380
                                        Fat16_Deinit();
1381
                                        return(EOF);
1382
                                }
1383
                        }
1384
                        file->SectorInCache     = file->DirectorySector;
1385
                        if(SD_SUCCESS != SDC_GetSector(file->SectorInCache, file->Cache))                                       // read the directory entry for this file.
1386
                        {
1387
                                Fat16_Deinit();
1388
                                return(EOF);
1389
                        }
231 killagreg 1390
 
297 killagreg 1391
                        dir = (DirEntry_t *)file->Cache;
1392
                        dir[file->DirectoryIndex].Size = file->Size;                                            // update file size
1393
                        dir[file->DirectoryIndex].DateTime = FileDateTime(&SystemTime);         // update date time
1394
                        if(SD_SUCCESS != SDC_PutSector(file->SectorInCache, file->Cache))       // write back to sd-card
1395
                        {
1396
                                Fat16_Deinit();
1397
                                return(EOF);
1398
                        }
1399
                        break;
1400
                case 'r':
1401
                default:
1402
                        return(EOF);
1403
                        break;
231 killagreg 1404
 
297 killagreg 1405
        }
1406
        return(0);
231 killagreg 1407
}
1408
 
297 killagreg 1409
/****************************************************************************************************************************************/
1410
/*      Function:               fclose_(File *file);                                                                                                                                                                                            */
1411
/*                                                                                                                                                                                                                                                                              */
1412
/*      Description:    This function closes the open file by writing the remaining data                                                                                                        */
1413
/*                                      from the buffer to the device and entering the filesize in the directory entry.                                                                         */
1414
/*                                                                                                                                                                                                                                                                              */
1415
/*      Returnvalue:    0 on success EOF on error                                                                                                                                                                                       */
1416
/****************************************************************************************************************************************/
1417
int16_t fclose_(File_t *file)
1418
{
1419
        int16_t returnvalue = EOF;
231 killagreg 1420
 
297 killagreg 1421
        if(file == NULL) return(returnvalue);
1422
        returnvalue = fflush_(file);
1423
        UnlockFilePointer(file);
1424
        return(returnvalue);
1425
}
231 killagreg 1426
 
297 killagreg 1427
/********************************************************************************************************************************************/
1428
/*      Function:               fgetc_(File *file);                                                                                                                                                                                                             */
1429
/*                                                                                                                                                                                                                                                                                      */
1430
/*      Description:    This function reads and returns one character from the specified file. Is the end of the actual sector reached the              */
1431
/*                                      next sector of the cluster is read. If the last sector of the cluster read the next cluster will be searched in FAT.    */
1432
/*                                                                                                                                                                                                                                                                                      */
1433
/*      Returnvalue:    The function returns the character read from the specified memorylocation as u8 casted to s16 or EOF.                                   */
1434
/********************************************************************************************************************************************/
317 killagreg 1435
int16_t fgetc_(File_t * const file)
231 killagreg 1436
{
297 killagreg 1437
        int16_t c = EOF;
1438
        uint32_t curr_sector;
231 killagreg 1439
 
297 killagreg 1440
        if( (!Partition.IsValid) || (file == NULL)) return(c);
1441
        // if the end of the file is not reached, get the next character.
1442
        if((0 < file->Size) && ((file->Position+1) < file->Size) )
231 killagreg 1443
        {
297 killagreg 1444
                curr_sector  = file->FirstSectorOfCurrCluster;          // calculate the sector of the next character to be read.
1445
                curr_sector += file->SectorOfCurrCluster;
231 killagreg 1446
 
297 killagreg 1447
                if(file->SectorInCache != curr_sector)
231 killagreg 1448
                {
297 killagreg 1449
                        file->SectorInCache = curr_sector;
1450
                        if(SD_SUCCESS != SDC_GetSector(file->SectorInCache,file->Cache))
1451
                        {
1452
                                Fat16_Deinit();
1453
                                return(c);
1454
                        }
231 killagreg 1455
                }
297 killagreg 1456
                c = (int16_t) file->Cache[file->ByteOfCurrSector];
1457
                file->Position++;                                                                       // increment file position
1458
                file->ByteOfCurrSector++;                                                       // goto next byte in sector
1459
                if(file->ByteOfCurrSector >= BYTES_PER_SECTOR)          // if end of sector
231 killagreg 1460
                {
297 killagreg 1461
                        file->ByteOfCurrSector = 0;                                             //  reset byte location
1462
                        file->SectorOfCurrCluster++;                                    //      next sector
1463
                        if(file->SectorOfCurrCluster >= Partition.SectorsPerCluster)    // if end of cluster is reached, the next datacluster has to be searched in the FAT.
231 killagreg 1464
                        {
297 killagreg 1465
 
1466
                                if(GetNextCluster(file))                                                                                // Sets the clusterpointer of the file to the next datacluster.
231 killagreg 1467
                                {
297 killagreg 1468
                                        file->SectorOfCurrCluster = 0;                                                          // start reading new cluster at first sector of the cluster.
231 killagreg 1469
                                }
297 killagreg 1470
                                else // the last cluster was allready reached
1471
                                {
1472
                                        file->SectorOfCurrCluster--;                                                    // jump back to the last sector in the last cluster
1473
                                        file->ByteOfCurrSector = BYTES_PER_SECTOR;                              // set ByteOfCurrSector one byte over sector end
1474
                                }
231 killagreg 1475
                        }
1476
                }
1477
        }
297 killagreg 1478
        return(c);
231 killagreg 1479
}
1480
 
297 killagreg 1481
/********************************************************************************************************************************************/
1482
/*      Function:               fputc_( const s8 c, File *file);                                                                                                                                                                                */
1483
/*                                                                                                                                                                                                                                                                                      */
1484
/*      Description:    This function writes a byte to the specified file and takes care of writing the necessary FAT- Entries.                                 */
1485
/*                                      next sector of the cluster is read. If the last sector of the cluster read the next cluster will be searched in FAT.    */
1486
/*                                                                                                                                                                                                                                                                                      */
1487
/*      Returnvalue:    The function returns the character written to the stream or EOF on error.                                                                                               */
1488
/********************************************************************************************************************************************/
317 killagreg 1489
int16_t fputc_(const int8_t c, File_t * const file)
231 killagreg 1490
{
297 killagreg 1491
        uint32_t curr_sector  = 0;
231 killagreg 1492
 
297 killagreg 1493
        if((!Partition.IsValid) || (file == NULL)) return(EOF);
231 killagreg 1494
 
297 killagreg 1495
        // If file position equals to file size, then the end of file has reached.
1496
        // In this chase it has to be checked that the ByteOfCurrSector is BYTES_PER_SECTOR
1497
        // and a new cluster should be appended.
1498
        if((file->Position >= file->Size) && (file->ByteOfCurrSector >= BYTES_PER_SECTOR))
1499
        {
1500
                if(!AppendCluster(file)) return(EOF);
1501
        }
231 killagreg 1502
 
297 killagreg 1503
        curr_sector  = file->FirstSectorOfCurrCluster;
1504
        curr_sector += file->SectorOfCurrCluster;
1505
        if(file->SectorInCache != curr_sector)
1506
        {
1507
                file->SectorInCache = curr_sector;
1508
                if(SD_SUCCESS != SDC_GetSector(file->SectorInCache, file->Cache))
1509
                {
1510
                        Fat16_Deinit();
1511
                        return(EOF);
1512
                }
1513
        }
231 killagreg 1514
 
297 killagreg 1515
        file->Cache[file->ByteOfCurrSector] = (uint8_t)c;                       // write databyte into the buffer. The byte will be written to the device at once
1516
        if(file->Size == file->Position) file->Size++;          // a character has been written to the file so the size is incremented only when the character has been added at the end of the file.
1517
        file->Position++;                                                                       // the actual positon within the file.
1518
        file->ByteOfCurrSector++;                                                       // goto next byte in sector
1519
        if(file->ByteOfCurrSector >= BYTES_PER_SECTOR)          // if the end of this sector is reached yet
1520
        {       // save the sector to the sd-card
1521
                if(SD_SUCCESS != SDC_PutSector(file->SectorInCache, file->Cache))
231 killagreg 1522
                {
297 killagreg 1523
                        Fat16_Deinit();
1524
                        return(EOF);
1525
                }
1526
                file->ByteOfCurrSector = 0;                                             //  reset byte location
1527
                file->SectorOfCurrCluster++;                                    //      next sector
1528
                if(file->SectorOfCurrCluster >= Partition.SectorsPerCluster)// if end of cluster is reached, the next datacluster has to be searched in the FAT.
1529
                {
1530
                        if(!GetNextCluster(file))                                                               // Sets the clusterpointer of the file to the next datacluster.
1531
                        { // if current cluster was the last cluster of the file
1532
                                if(!AppendCluster(file))                                                // append a new and free cluster at the end of the file.
231 killagreg 1533
                                {
297 killagreg 1534
                                        file->SectorOfCurrCluster--;                            // jump back to last sector of last cluster
1535
                                        file->ByteOfCurrSector = BYTES_PER_SECTOR;      // set byte location to 1 byte over sector len
1536
                                        return(EOF);
231 killagreg 1537
                                }
1538
                        }
297 killagreg 1539
                        else // next cluster
231 killagreg 1540
                        {
297 killagreg 1541
                                file->SectorOfCurrCluster = 0;                                                  // start reading new cluster at first sector of the cluster.
231 killagreg 1542
                        }
1543
                }
1544
        }
297 killagreg 1545
        return(0);
231 killagreg 1546
}
1547
 
1548
 
297 killagreg 1549
/****************************************************************************************************************************************/
1550
/*      Function:               fread_(void *buffer, uint32_t size, uint32_t count, File *File);                                                                                                                                */
1551
/*                                                                                                                                                                                                                                                                              */
1552
/*      Description:    This function reads count objects of the specified size                                                                                                                         */
1553
/*                                      from the actual position of the file to the specified buffer.                                                                                                           */
1554
/*                                                                                                                                                                                                                                                                              */
1555
/*      Returnvalue:    The function returns the number of objects (not bytes) read from the file.                                                                                      */
1556
/****************************************************************************************************************************************/
317 killagreg 1557
uint32_t fread_(void * const buffer, uint32_t size, uint32_t count, File_t * const file)
297 killagreg 1558
{
1559
        uint32_t object_cnt     = 0;                                                                                    // count the number of objects read from the file.
1560
        uint32_t object_size = 0;                                                                                       // count the number of bytes read from the actual object.
1561
        uint8_t *pbuff          = 0;                                                                                    // a pointer to the actual bufferposition.
1562
        uint8_t success      = 1;                                                                                       // no error occured during read operation to the file.
1563
        int16_t c;
231 killagreg 1564
 
297 killagreg 1565
        if((!Partition.IsValid) || (file == NULL) || (buffer == NULL)) return(0);
231 killagreg 1566
 
297 killagreg 1567
        pbuff = (uint8_t *) buffer;                                                                                     // cast the void pointer to an u8 *
231 killagreg 1568
 
297 killagreg 1569
        while((object_cnt < count) && success)
231 killagreg 1570
        {
297 killagreg 1571
                object_size = size;
1572
                while((size > 0) && success)
1573
                {
1574
                        c = fgetc_(file);
1575
                        if(c != EOF)
1576
                        {
1577
                                *pbuff = (uint8_t)c;                                                                    // read a byte from the buffer to the opened file.
1578
                                pbuff++;
1579
                                size--;
1580
                        }
1581
                        else // error or end of file reached
1582
                        {
1583
                                success = 0;
1584
                        }
1585
                }
1586
                if(success) object_cnt++;
231 killagreg 1587
        }
297 killagreg 1588
        return(object_cnt);                                                                                             // return the number of objects succesfully read from the file
231 killagreg 1589
}
1590
 
1591
 
297 killagreg 1592
/****************************************************************************************************************************************/
1593
/*      Function:               fwrite_(void *buffer, uint32_t size, uint32_t count, File *file);                                                                                                                               */
1594
/*                                                                                                                                                                                                                                                                              */
1595
/*      Description:    This function writes count objects of the specified size                                                                                                                        */
1596
/*                                      from the buffer pointer to the actual position in the file.                                                                                                                     */
1597
/*                                                                                                                                                                                                                                                                              */
1598
/*      Returnvalue:    The function returns the number of objects (not bytes) read from the file.                                                                                      */
1599
/****************************************************************************************************************************************/
317 killagreg 1600
uint32_t fwrite_(void * const buffer, uint32_t size, uint32_t count, File_t * const file)
231 killagreg 1601
{
297 killagreg 1602
        uint32_t object_cnt     = 0;                                                                                                            // count the number of objects written to the file.
1603
        uint32_t object_size = 0;                                                                                                               // count the number of bytes written from the actual object.
1604
        uint8_t *pbuff      = 0;                                                                                                                // a pointer to the actual bufferposition.
1605
        uint8_t success      = 1;                                                                                                               // no error occured during write operation to the file.
1606
        int16_t c;
231 killagreg 1607
 
297 killagreg 1608
        if((!Partition.IsValid) || (file == NULL) || (buffer == NULL)) return(0);
231 killagreg 1609
 
297 killagreg 1610
        pbuff = (uint8_t *) buffer;                                                                                                             // cast the void pointer to an u8 *
231 killagreg 1611
 
297 killagreg 1612
        while((object_cnt < count) && success)
231 killagreg 1613
        {
297 killagreg 1614
                object_size = size;
1615
                while((size > 0) && success)
231 killagreg 1616
                {
297 killagreg 1617
                        c = fputc_(*pbuff, file);                                                                               // write a byte from the buffer to the opened file.
1618
                        if(c != EOF)
231 killagreg 1619
                        {
297 killagreg 1620
                                pbuff++;
1621
                                size--;
231 killagreg 1622
                        }
297 killagreg 1623
                        else
231 killagreg 1624
                        {
297 killagreg 1625
                                success = 0;
231 killagreg 1626
                        }
1627
                }
297 killagreg 1628
                if(success) object_cnt++;
231 killagreg 1629
        }
1630
 
297 killagreg 1631
        return(object_cnt);                                                                                                                             // return the number of objects succesfully written to the file
231 killagreg 1632
}
1633
 
1634
 
297 killagreg 1635
/****************************************************************************************************************************************/
1636
/*      Function:               fputs_(const int8_t *string, File_t *File);                                                                                                                                                             */
1637
/*                                                                                                                                                                                                                                                                              */
1638
/*      Description:    This function writes a string to the specified file.                                                                                                                            */
1639
/*                                                                                                                                                                                                                                                                              */
1640
/*      Returnvalue:    The function returns a no negative value or EOF on error.                                                                                                                       */
1641
/****************************************************************************************************************************************/
317 killagreg 1642
int16_t fputs_(int8_t * const string, File_t * const file)
231 killagreg 1643
{
297 killagreg 1644
        uint8_t i=0;
1645
        int16_t c = 0;
231 killagreg 1646
 
297 killagreg 1647
        if((!Partition.IsValid) || (file == NULL) || (string == NULL)) return(0);
231 killagreg 1648
 
297 killagreg 1649
        while((string[i] != 0)&& (c != EOF))
231 killagreg 1650
        {
297 killagreg 1651
                c = fputc_(string[i], file);
1652
                i++;
231 killagreg 1653
        }
297 killagreg 1654
        return(c);
231 killagreg 1655
}
1656
 
297 killagreg 1657
/****************************************************************************************************************************************/
1658
/*      Function:               fgets_(int8 *, int16_t , File_t *);                                                                                                                                                                             */
1659
/*                                                                                                                                                                                                                                                                              */
1660
/*      Description:    This function reads a string from the file to the specifies string.                                                                                             */
1661
/*                                                                                                                                                                                                                                                                              */
1662
/*      Returnvalue:    A pointer to the string read from the file or 0 on error.                                                                                                                       */
1663
/****************************************************************************************************************************************/
317 killagreg 1664
int8_t * fgets_(int8_t * const string, int16_t length, File_t * const file)
231 killagreg 1665
{
317 killagreg 1666
        int8_t *pbuff;
1667
        int16_t c = 0, bytecount;
231 killagreg 1668
 
317 killagreg 1669
        if((!Partition.IsValid) || (file == NULL) || (string == NULL) || (length > 1)) return (0);
297 killagreg 1670
        pbuff = string;
317 killagreg 1671
        bytecount = length;
1672
        while(bytecount > 1)                                                    // read the count-1 characters from the file to the string.
231 killagreg 1673
        {
317 killagreg 1674
                c = fgetc_(file);                                                       // read a character from the opened file.
297 killagreg 1675
                switch(c)
1676
                {
1677
                        case 0x0A:
317 killagreg 1678
                                *pbuff = 0;                                                     // set string terminator
1679
                                return(string);                                         // stop loop
297 killagreg 1680
                                break;
231 killagreg 1681
 
297 killagreg 1682
                        case EOF:
317 killagreg 1683
                                *pbuff = 0;                                                     // set string terminator
1684
                                return(0);
1685
                        default:
1686
                                *pbuff++ = (int8_t)c;                           // copy byte to string
1687
                                bytecount--;
297 killagreg 1688
                                break;
231 killagreg 1689
                }
1690
        }
317 killagreg 1691
        *pbuff = 0;
297 killagreg 1692
        return(string);
1693
}
231 killagreg 1694
 
297 killagreg 1695
/****************************************************************************************************************************************/
1696
/*      Function:               fexist_(const int8_t*);                                                                                                                                                                                                 */
1697
/*                                                                                                                                                                                                                                                                              */
1698
/*      Description:    This function checks if a file already exist.                                                                                                                                           */
1699
/*                                                                                                                                                                                                                                                                              */
1700
/*      Returnvalue:    1 if the file exist else 0.                                                                                                                                                                                     */
1701
/****************************************************************************************************************************************/
318 killagreg 1702
uint8_t fexist_(int8_t* const filename)
297 killagreg 1703
{
1704
        uint8_t exist = 0;
1705
        File_t *file = 0;
1706
        file = LockFilePointer();
1707
        exist = FileExist(filename, ATTR_NONE, ATTR_SUBDIRECTORY|ATTR_VOLUMELABEL, file);
1708
        UnlockFilePointer(file);
1709
        return(exist);
231 killagreg 1710
}
1711
 
297 killagreg 1712
/****************************************************************************************************************************************/
1713
/*      Function:               feof_(File_t *File);                                                                                                                                                                                            */
1714
/*                                                                                                                                                                                                                                                                              */
1715
/*      Description:    This function checks wether the end of the file has been reached.                                                                                                                                               */
1716
/*                                                                                                                                                                                                                                                                              */
1717
/*      Returnvalue:    0 if the end of the file was not reached otherwise 1.                                                                                                                                                                           */
1718
/****************************************************************************************************************************************/
1719
uint8_t feof_(File_t *file)
231 killagreg 1720
{
297 killagreg 1721
        if(((file->Position)+1) < (file->Size))
231 killagreg 1722
        {
297 killagreg 1723
                return(0);
231 killagreg 1724
        }
297 killagreg 1725
        else
1726
        {
1727
                return(1);
1728
        }
1729
}
231 killagreg 1730
 
1731