Ermanno Brusadin / mbed

mbed library sources

Dependents:   FRDM-KL46Z_LCD_Test FRDM-KL46Z_LCD_Test FRDM-KL46Z_Plantilla FRDM-KL46Z_Plantilla ... more

common/LocalFileSystem.cpp@0:6bc4ac881c8e, 2016-07-28 (annotated)

Committer:
ebrus
Date:
Thu Jul 28 15:56:34 2016 +0000
Revision:
0:6bc4ac881c8e
1;

Who changed what in which revision?

UserRevisionLine numberNew contents of line
ebrus 0:6bc4ac881c8e 1 /* mbed Microcontroller Library
ebrus 0:6bc4ac881c8e 2 * Copyright (c) 2006-2013 ARM Limited
ebrus 0:6bc4ac881c8e 3 *
ebrus 0:6bc4ac881c8e 4 * Licensed under the Apache License, Version 2.0 (the "License");
ebrus 0:6bc4ac881c8e 5 * you may not use this file except in compliance with the License.
ebrus 0:6bc4ac881c8e 6 * You may obtain a copy of the License at
ebrus 0:6bc4ac881c8e 7 *
ebrus 0:6bc4ac881c8e 8 * http://www.apache.org/licenses/LICENSE-2.0
ebrus 0:6bc4ac881c8e 9 *
ebrus 0:6bc4ac881c8e 10 * Unless required by applicable law or agreed to in writing, software
ebrus 0:6bc4ac881c8e 11 * distributed under the License is distributed on an "AS IS" BASIS,
ebrus 0:6bc4ac881c8e 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
ebrus 0:6bc4ac881c8e 13 * See the License for the specific language governing permissions and
ebrus 0:6bc4ac881c8e 14 * limitations under the License.
ebrus 0:6bc4ac881c8e 15 */
ebrus 0:6bc4ac881c8e 16 #include "LocalFileSystem.h"
ebrus 0:6bc4ac881c8e 17
ebrus 0:6bc4ac881c8e 18 #if DEVICE_LOCALFILESYSTEM
ebrus 0:6bc4ac881c8e 19
ebrus 0:6bc4ac881c8e 20 #include "semihost_api.h"
ebrus 0:6bc4ac881c8e 21 #include <string.h>
ebrus 0:6bc4ac881c8e 22 #include <stdio.h>
ebrus 0:6bc4ac881c8e 23
ebrus 0:6bc4ac881c8e 24 namespace mbed {
ebrus 0:6bc4ac881c8e 25
ebrus 0:6bc4ac881c8e 26 /* Extension to FINFO type defined in RTL.h (in Keil RL) - adds 'create time'. */
ebrus 0:6bc4ac881c8e 27 typedef struct {
ebrus 0:6bc4ac881c8e 28 unsigned char hr; /* Hours [0..23] */
ebrus 0:6bc4ac881c8e 29 unsigned char min; /* Minutes [0..59] */
ebrus 0:6bc4ac881c8e 30 unsigned char sec; /* Seconds [0..59] */
ebrus 0:6bc4ac881c8e 31 unsigned char day; /* Day [1..31] */
ebrus 0:6bc4ac881c8e 32 unsigned char mon; /* Month [1..12] */
ebrus 0:6bc4ac881c8e 33 unsigned short year; /* Year [1980..2107] */
ebrus 0:6bc4ac881c8e 34 } FTIME;
ebrus 0:6bc4ac881c8e 35
ebrus 0:6bc4ac881c8e 36 typedef struct { /* File Search info record */
ebrus 0:6bc4ac881c8e 37 char name[32]; /* File name */
ebrus 0:6bc4ac881c8e 38 long size; /* File size in bytes */
ebrus 0:6bc4ac881c8e 39 int fileID; /* System File Identification */
ebrus 0:6bc4ac881c8e 40 FTIME create_time; /* Date & time file was created */
ebrus 0:6bc4ac881c8e 41 FTIME write_time; /* Date & time of last write */
ebrus 0:6bc4ac881c8e 42 } XFINFO;
ebrus 0:6bc4ac881c8e 43
ebrus 0:6bc4ac881c8e 44 #define RESERVED_FOR_USER_APPLICATIONS (0x100) /* 0x100 - 0x1ff */
ebrus 0:6bc4ac881c8e 45 #define USR_XFFIND (RESERVED_FOR_USER_APPLICATIONS + 0)
ebrus 0:6bc4ac881c8e 46
ebrus 0:6bc4ac881c8e 47 static int xffind (const char *pattern, XFINFO *info) {
ebrus 0:6bc4ac881c8e 48 unsigned param[4];
ebrus 0:6bc4ac881c8e 49
ebrus 0:6bc4ac881c8e 50 param[0] = (unsigned long)pattern;
ebrus 0:6bc4ac881c8e 51 param[1] = (unsigned long)strlen(pattern);
ebrus 0:6bc4ac881c8e 52 param[2] = (unsigned long)info;
ebrus 0:6bc4ac881c8e 53 param[3] = (unsigned long)sizeof(XFINFO);
ebrus 0:6bc4ac881c8e 54
ebrus 0:6bc4ac881c8e 55 return __semihost(USR_XFFIND, param);
ebrus 0:6bc4ac881c8e 56 }
ebrus 0:6bc4ac881c8e 57
ebrus 0:6bc4ac881c8e 58 #define OPEN_R 0
ebrus 0:6bc4ac881c8e 59 #define OPEN_B 1
ebrus 0:6bc4ac881c8e 60 #define OPEN_PLUS 2
ebrus 0:6bc4ac881c8e 61 #define OPEN_W 4
ebrus 0:6bc4ac881c8e 62 #define OPEN_A 8
ebrus 0:6bc4ac881c8e 63 #define OPEN_INVALID -1
ebrus 0:6bc4ac881c8e 64
ebrus 0:6bc4ac881c8e 65 int posix_to_semihost_open_flags(int flags) {
ebrus 0:6bc4ac881c8e 66 /* POSIX flags -> semihosting open mode */
ebrus 0:6bc4ac881c8e 67 int openmode;
ebrus 0:6bc4ac881c8e 68 if (flags & O_RDWR) {
ebrus 0:6bc4ac881c8e 69 /* a plus mode */
ebrus 0:6bc4ac881c8e 70 openmode = OPEN_PLUS;
ebrus 0:6bc4ac881c8e 71 if (flags & O_APPEND) {
ebrus 0:6bc4ac881c8e 72 openmode |= OPEN_A;
ebrus 0:6bc4ac881c8e 73 } else if (flags & O_TRUNC) {
ebrus 0:6bc4ac881c8e 74 openmode |= OPEN_W;
ebrus 0:6bc4ac881c8e 75 } else {
ebrus 0:6bc4ac881c8e 76 openmode |= OPEN_R;
ebrus 0:6bc4ac881c8e 77 }
ebrus 0:6bc4ac881c8e 78 } else if (flags & O_WRONLY) {
ebrus 0:6bc4ac881c8e 79 /* write or append */
ebrus 0:6bc4ac881c8e 80 if (flags & O_APPEND) {
ebrus 0:6bc4ac881c8e 81 openmode = OPEN_A;
ebrus 0:6bc4ac881c8e 82 } else {
ebrus 0:6bc4ac881c8e 83 openmode = OPEN_W;
ebrus 0:6bc4ac881c8e 84 }
ebrus 0:6bc4ac881c8e 85 } else if (flags == O_RDONLY) {
ebrus 0:6bc4ac881c8e 86 /* read mode */
ebrus 0:6bc4ac881c8e 87 openmode = OPEN_R;
ebrus 0:6bc4ac881c8e 88 } else {
ebrus 0:6bc4ac881c8e 89 /* invalid flags */
ebrus 0:6bc4ac881c8e 90 openmode = OPEN_INVALID;
ebrus 0:6bc4ac881c8e 91 }
ebrus 0:6bc4ac881c8e 92
ebrus 0:6bc4ac881c8e 93 return openmode;
ebrus 0:6bc4ac881c8e 94 }
ebrus 0:6bc4ac881c8e 95
ebrus 0:6bc4ac881c8e 96 FILEHANDLE local_file_open(const char* name, int flags) {
ebrus 0:6bc4ac881c8e 97 int openmode = posix_to_semihost_open_flags(flags);
ebrus 0:6bc4ac881c8e 98 if (openmode == OPEN_INVALID) {
ebrus 0:6bc4ac881c8e 99 return (FILEHANDLE)NULL;
ebrus 0:6bc4ac881c8e 100 }
ebrus 0:6bc4ac881c8e 101
ebrus 0:6bc4ac881c8e 102 FILEHANDLE fh = semihost_open(name, openmode);
ebrus 0:6bc4ac881c8e 103 if (fh == -1) {
ebrus 0:6bc4ac881c8e 104 return (FILEHANDLE)NULL;
ebrus 0:6bc4ac881c8e 105 }
ebrus 0:6bc4ac881c8e 106
ebrus 0:6bc4ac881c8e 107 return fh;
ebrus 0:6bc4ac881c8e 108 }
ebrus 0:6bc4ac881c8e 109
ebrus 0:6bc4ac881c8e 110 LocalFileHandle::LocalFileHandle(FILEHANDLE fh) : _fh(fh), pos(0) {
ebrus 0:6bc4ac881c8e 111 }
ebrus 0:6bc4ac881c8e 112
ebrus 0:6bc4ac881c8e 113 int LocalFileHandle::close() {
ebrus 0:6bc4ac881c8e 114 int retval = semihost_close(_fh);
ebrus 0:6bc4ac881c8e 115 delete this;
ebrus 0:6bc4ac881c8e 116 return retval;
ebrus 0:6bc4ac881c8e 117 }
ebrus 0:6bc4ac881c8e 118
ebrus 0:6bc4ac881c8e 119 ssize_t LocalFileHandle::write(const void *buffer, size_t length) {
ebrus 0:6bc4ac881c8e 120 ssize_t n = semihost_write(_fh, (const unsigned char*)buffer, length, 0); // number of characters not written
ebrus 0:6bc4ac881c8e 121 n = length - n; // number of characters written
ebrus 0:6bc4ac881c8e 122 pos += n;
ebrus 0:6bc4ac881c8e 123 return n;
ebrus 0:6bc4ac881c8e 124 }
ebrus 0:6bc4ac881c8e 125
ebrus 0:6bc4ac881c8e 126 ssize_t LocalFileHandle::read(void *buffer, size_t length) {
ebrus 0:6bc4ac881c8e 127 ssize_t n = semihost_read(_fh, (unsigned char*)buffer, length, 0); // number of characters not read
ebrus 0:6bc4ac881c8e 128 n = length - n; // number of characters read
ebrus 0:6bc4ac881c8e 129 pos += n;
ebrus 0:6bc4ac881c8e 130 return n;
ebrus 0:6bc4ac881c8e 131 }
ebrus 0:6bc4ac881c8e 132
ebrus 0:6bc4ac881c8e 133 int LocalFileHandle::isatty() {
ebrus 0:6bc4ac881c8e 134 return semihost_istty(_fh);
ebrus 0:6bc4ac881c8e 135 }
ebrus 0:6bc4ac881c8e 136
ebrus 0:6bc4ac881c8e 137 off_t LocalFileHandle::lseek(off_t position, int whence) {
ebrus 0:6bc4ac881c8e 138 if (whence == SEEK_CUR) {
ebrus 0:6bc4ac881c8e 139 position += pos;
ebrus 0:6bc4ac881c8e 140 } else if (whence == SEEK_END) {
ebrus 0:6bc4ac881c8e 141 position += semihost_flen(_fh);
ebrus 0:6bc4ac881c8e 142 } /* otherwise SEEK_SET, so position is fine */
ebrus 0:6bc4ac881c8e 143
ebrus 0:6bc4ac881c8e 144 /* Always seems to return -1, so just ignore for now. */
ebrus 0:6bc4ac881c8e 145 semihost_seek(_fh, position);
ebrus 0:6bc4ac881c8e 146 pos = position;
ebrus 0:6bc4ac881c8e 147 return position;
ebrus 0:6bc4ac881c8e 148 }
ebrus 0:6bc4ac881c8e 149
ebrus 0:6bc4ac881c8e 150 int LocalFileHandle::fsync() {
ebrus 0:6bc4ac881c8e 151 return semihost_ensure(_fh);
ebrus 0:6bc4ac881c8e 152 }
ebrus 0:6bc4ac881c8e 153
ebrus 0:6bc4ac881c8e 154 off_t LocalFileHandle::flen() {
ebrus 0:6bc4ac881c8e 155 return semihost_flen(_fh);
ebrus 0:6bc4ac881c8e 156 }
ebrus 0:6bc4ac881c8e 157
ebrus 0:6bc4ac881c8e 158 class LocalDirHandle : public DirHandle {
ebrus 0:6bc4ac881c8e 159
ebrus 0:6bc4ac881c8e 160 public:
ebrus 0:6bc4ac881c8e 161 struct dirent cur_entry;
ebrus 0:6bc4ac881c8e 162 XFINFO info;
ebrus 0:6bc4ac881c8e 163
ebrus 0:6bc4ac881c8e 164 LocalDirHandle() : cur_entry(), info() {
ebrus 0:6bc4ac881c8e 165 }
ebrus 0:6bc4ac881c8e 166
ebrus 0:6bc4ac881c8e 167 virtual int closedir() {
ebrus 0:6bc4ac881c8e 168 delete this;
ebrus 0:6bc4ac881c8e 169 return 0;
ebrus 0:6bc4ac881c8e 170 }
ebrus 0:6bc4ac881c8e 171
ebrus 0:6bc4ac881c8e 172 virtual struct dirent *readdir() {
ebrus 0:6bc4ac881c8e 173 if (xffind("*", &info)!=0) {
ebrus 0:6bc4ac881c8e 174 return NULL;
ebrus 0:6bc4ac881c8e 175 }
ebrus 0:6bc4ac881c8e 176 memcpy(cur_entry.d_name, info.name, sizeof(info.name));
ebrus 0:6bc4ac881c8e 177 return &cur_entry;
ebrus 0:6bc4ac881c8e 178 }
ebrus 0:6bc4ac881c8e 179
ebrus 0:6bc4ac881c8e 180 virtual void rewinddir() {
ebrus 0:6bc4ac881c8e 181 info.fileID = 0;
ebrus 0:6bc4ac881c8e 182 }
ebrus 0:6bc4ac881c8e 183
ebrus 0:6bc4ac881c8e 184 virtual off_t telldir() {
ebrus 0:6bc4ac881c8e 185 return info.fileID;
ebrus 0:6bc4ac881c8e 186 }
ebrus 0:6bc4ac881c8e 187
ebrus 0:6bc4ac881c8e 188 virtual void seekdir(off_t offset) {
ebrus 0:6bc4ac881c8e 189 info.fileID = offset;
ebrus 0:6bc4ac881c8e 190 }
ebrus 0:6bc4ac881c8e 191 };
ebrus 0:6bc4ac881c8e 192
ebrus 0:6bc4ac881c8e 193 FileHandle *LocalFileSystem::open(const char* name, int flags) {
ebrus 0:6bc4ac881c8e 194 /* reject filenames with / in them */
ebrus 0:6bc4ac881c8e 195 for (const char *tmp = name; *tmp; tmp++) {
ebrus 0:6bc4ac881c8e 196 if (*tmp == '/') {
ebrus 0:6bc4ac881c8e 197 return NULL;
ebrus 0:6bc4ac881c8e 198 }
ebrus 0:6bc4ac881c8e 199 }
ebrus 0:6bc4ac881c8e 200
ebrus 0:6bc4ac881c8e 201 int openmode = posix_to_semihost_open_flags(flags);
ebrus 0:6bc4ac881c8e 202 if (openmode == OPEN_INVALID) {
ebrus 0:6bc4ac881c8e 203 return NULL;
ebrus 0:6bc4ac881c8e 204 }
ebrus 0:6bc4ac881c8e 205
ebrus 0:6bc4ac881c8e 206 FILEHANDLE fh = semihost_open(name, openmode);
ebrus 0:6bc4ac881c8e 207 if (fh == -1) {
ebrus 0:6bc4ac881c8e 208 return NULL;
ebrus 0:6bc4ac881c8e 209 }
ebrus 0:6bc4ac881c8e 210 return new LocalFileHandle(fh);
ebrus 0:6bc4ac881c8e 211 }
ebrus 0:6bc4ac881c8e 212
ebrus 0:6bc4ac881c8e 213 int LocalFileSystem::remove(const char *filename) {
ebrus 0:6bc4ac881c8e 214 return semihost_remove(filename);
ebrus 0:6bc4ac881c8e 215 }
ebrus 0:6bc4ac881c8e 216
ebrus 0:6bc4ac881c8e 217 DirHandle *LocalFileSystem::opendir(const char *name) {
ebrus 0:6bc4ac881c8e 218 return new LocalDirHandle();
ebrus 0:6bc4ac881c8e 219 }
ebrus 0:6bc4ac881c8e 220
ebrus 0:6bc4ac881c8e 221 } // namespace mbed
ebrus 0:6bc4ac881c8e 222
ebrus 0:6bc4ac881c8e 223 #endif