initial

Dependencies:   mbed

Committer:
yihui
Date:
Mon Jan 11 02:32:24 2016 +0000
Revision:
0:638edba3adf6
initial

Who changed what in which revision?

UserRevisionLine numberNew contents of line
yihui 0:638edba3adf6 1 /* mbed Microcontroller Library
yihui 0:638edba3adf6 2 * Copyright (c) 2006-2015 ARM Limited
yihui 0:638edba3adf6 3 *
yihui 0:638edba3adf6 4 * Licensed under the Apache License, Version 2.0 (the "License");
yihui 0:638edba3adf6 5 * you may not use this file except in compliance with the License.
yihui 0:638edba3adf6 6 * You may obtain a copy of the License at
yihui 0:638edba3adf6 7 *
yihui 0:638edba3adf6 8 * http://www.apache.org/licenses/LICENSE-2.0
yihui 0:638edba3adf6 9 *
yihui 0:638edba3adf6 10 * Unless required by applicable law or agreed to in writing, software
yihui 0:638edba3adf6 11 * distributed under the License is distributed on an "AS IS" BASIS,
yihui 0:638edba3adf6 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
yihui 0:638edba3adf6 13 * See the License for the specific language governing permissions and
yihui 0:638edba3adf6 14 * limitations under the License.
yihui 0:638edba3adf6 15 */
yihui 0:638edba3adf6 16 #include "platform.h"
yihui 0:638edba3adf6 17 #include "FileHandle.h"
yihui 0:638edba3adf6 18 #include "FileSystemLike.h"
yihui 0:638edba3adf6 19 #include "FilePath.h"
yihui 0:638edba3adf6 20 #include "serial_api.h"
yihui 0:638edba3adf6 21 #include "toolchain.h"
yihui 0:638edba3adf6 22 #include "semihost_api.h"
yihui 0:638edba3adf6 23 #include "mbed_interface.h"
yihui 0:638edba3adf6 24 #if DEVICE_STDIO_MESSAGES
yihui 0:638edba3adf6 25 #include <stdio.h>
yihui 0:638edba3adf6 26 #endif
yihui 0:638edba3adf6 27 #include <errno.h>
yihui 0:638edba3adf6 28
yihui 0:638edba3adf6 29 #if defined(__ARMCC_VERSION)
yihui 0:638edba3adf6 30 # include <rt_sys.h>
yihui 0:638edba3adf6 31 # define PREFIX(x) _sys##x
yihui 0:638edba3adf6 32 # define OPEN_MAX _SYS_OPEN
yihui 0:638edba3adf6 33 # ifdef __MICROLIB
yihui 0:638edba3adf6 34 # pragma import(__use_full_stdio)
yihui 0:638edba3adf6 35 # endif
yihui 0:638edba3adf6 36
yihui 0:638edba3adf6 37 #elif defined(__ICCARM__)
yihui 0:638edba3adf6 38 # include <yfuns.h>
yihui 0:638edba3adf6 39 # define PREFIX(x) _##x
yihui 0:638edba3adf6 40 # define OPEN_MAX 16
yihui 0:638edba3adf6 41
yihui 0:638edba3adf6 42 # define STDIN_FILENO 0
yihui 0:638edba3adf6 43 # define STDOUT_FILENO 1
yihui 0:638edba3adf6 44 # define STDERR_FILENO 2
yihui 0:638edba3adf6 45
yihui 0:638edba3adf6 46 #else
yihui 0:638edba3adf6 47 # include <sys/stat.h>
yihui 0:638edba3adf6 48 # include <sys/unistd.h>
yihui 0:638edba3adf6 49 # include <sys/syslimits.h>
yihui 0:638edba3adf6 50 # define PREFIX(x) x
yihui 0:638edba3adf6 51 #endif
yihui 0:638edba3adf6 52
yihui 0:638edba3adf6 53 using namespace mbed;
yihui 0:638edba3adf6 54
yihui 0:638edba3adf6 55 #if defined(__MICROLIB) && (__ARMCC_VERSION>5030000)
yihui 0:638edba3adf6 56 // Before version 5.03, we were using a patched version of microlib with proper names
yihui 0:638edba3adf6 57 extern const char __stdin_name[] = ":tt";
yihui 0:638edba3adf6 58 extern const char __stdout_name[] = ":tt";
yihui 0:638edba3adf6 59 extern const char __stderr_name[] = ":tt";
yihui 0:638edba3adf6 60
yihui 0:638edba3adf6 61 #else
yihui 0:638edba3adf6 62 extern const char __stdin_name[] = "/stdin";
yihui 0:638edba3adf6 63 extern const char __stdout_name[] = "/stdout";
yihui 0:638edba3adf6 64 extern const char __stderr_name[] = "/stderr";
yihui 0:638edba3adf6 65 #endif
yihui 0:638edba3adf6 66
yihui 0:638edba3adf6 67 /* newlib has the filehandle field in the FILE struct as a short, so
yihui 0:638edba3adf6 68 * we can't just return a Filehandle* from _open and instead have to
yihui 0:638edba3adf6 69 * put it in a filehandles array and return the index into that array
yihui 0:638edba3adf6 70 * (or rather index+3, as filehandles 0-2 are stdin/out/err).
yihui 0:638edba3adf6 71 */
yihui 0:638edba3adf6 72 static FileHandle *filehandles[OPEN_MAX];
yihui 0:638edba3adf6 73
yihui 0:638edba3adf6 74 FileHandle::~FileHandle() {
yihui 0:638edba3adf6 75 /* Remove all open filehandles for this */
yihui 0:638edba3adf6 76 for (unsigned int fh_i = 0; fh_i < sizeof(filehandles)/sizeof(*filehandles); fh_i++) {
yihui 0:638edba3adf6 77 if (filehandles[fh_i] == this) {
yihui 0:638edba3adf6 78 filehandles[fh_i] = NULL;
yihui 0:638edba3adf6 79 }
yihui 0:638edba3adf6 80 }
yihui 0:638edba3adf6 81 }
yihui 0:638edba3adf6 82
yihui 0:638edba3adf6 83 #if DEVICE_SERIAL
yihui 0:638edba3adf6 84 extern int stdio_uart_inited;
yihui 0:638edba3adf6 85 extern serial_t stdio_uart;
yihui 0:638edba3adf6 86 #endif
yihui 0:638edba3adf6 87
yihui 0:638edba3adf6 88 static void init_serial() {
yihui 0:638edba3adf6 89 #if DEVICE_SERIAL
yihui 0:638edba3adf6 90 if (stdio_uart_inited) return;
yihui 0:638edba3adf6 91 serial_init(&stdio_uart, STDIO_UART_TX, STDIO_UART_RX);
yihui 0:638edba3adf6 92 #endif
yihui 0:638edba3adf6 93 }
yihui 0:638edba3adf6 94
yihui 0:638edba3adf6 95 static inline int openmode_to_posix(int openmode) {
yihui 0:638edba3adf6 96 int posix = openmode;
yihui 0:638edba3adf6 97 #ifdef __ARMCC_VERSION
yihui 0:638edba3adf6 98 if (openmode & OPEN_PLUS) {
yihui 0:638edba3adf6 99 posix = O_RDWR;
yihui 0:638edba3adf6 100 } else if(openmode & OPEN_W) {
yihui 0:638edba3adf6 101 posix = O_WRONLY;
yihui 0:638edba3adf6 102 } else if(openmode & OPEN_A) {
yihui 0:638edba3adf6 103 posix = O_WRONLY|O_APPEND;
yihui 0:638edba3adf6 104 } else {
yihui 0:638edba3adf6 105 posix = O_RDONLY;
yihui 0:638edba3adf6 106 }
yihui 0:638edba3adf6 107 /* a, w, a+, w+ all create if file does not already exist */
yihui 0:638edba3adf6 108 if (openmode & (OPEN_A|OPEN_W)) {
yihui 0:638edba3adf6 109 posix |= O_CREAT;
yihui 0:638edba3adf6 110 }
yihui 0:638edba3adf6 111 /* w and w+ truncate */
yihui 0:638edba3adf6 112 if (openmode & OPEN_W) {
yihui 0:638edba3adf6 113 posix |= O_TRUNC;
yihui 0:638edba3adf6 114 }
yihui 0:638edba3adf6 115 #elif defined(__ICCARM__)
yihui 0:638edba3adf6 116 switch (openmode & _LLIO_RDWRMASK) {
yihui 0:638edba3adf6 117 case _LLIO_RDONLY: posix = O_RDONLY; break;
yihui 0:638edba3adf6 118 case _LLIO_WRONLY: posix = O_WRONLY; break;
yihui 0:638edba3adf6 119 case _LLIO_RDWR : posix = O_RDWR ; break;
yihui 0:638edba3adf6 120 }
yihui 0:638edba3adf6 121 if (openmode & _LLIO_CREAT ) posix |= O_CREAT;
yihui 0:638edba3adf6 122 if (openmode & _LLIO_APPEND) posix |= O_APPEND;
yihui 0:638edba3adf6 123 if (openmode & _LLIO_TRUNC ) posix |= O_TRUNC;
yihui 0:638edba3adf6 124 #endif
yihui 0:638edba3adf6 125 return posix;
yihui 0:638edba3adf6 126 }
yihui 0:638edba3adf6 127
yihui 0:638edba3adf6 128 extern "C" FILEHANDLE PREFIX(_open)(const char* name, int openmode) {
yihui 0:638edba3adf6 129 #if defined(__MICROLIB) && (__ARMCC_VERSION>5030000)
yihui 0:638edba3adf6 130 // Before version 5.03, we were using a patched version of microlib with proper names
yihui 0:638edba3adf6 131 // This is the workaround that the microlib author suggested us
yihui 0:638edba3adf6 132 static int n = 0;
yihui 0:638edba3adf6 133 if (!std::strcmp(name, ":tt")) return n++;
yihui 0:638edba3adf6 134
yihui 0:638edba3adf6 135 #else
yihui 0:638edba3adf6 136 /* Use the posix convention that stdin,out,err are filehandles 0,1,2.
yihui 0:638edba3adf6 137 */
yihui 0:638edba3adf6 138 if (std::strcmp(name, __stdin_name) == 0) {
yihui 0:638edba3adf6 139 init_serial();
yihui 0:638edba3adf6 140 return 0;
yihui 0:638edba3adf6 141 } else if (std::strcmp(name, __stdout_name) == 0) {
yihui 0:638edba3adf6 142 init_serial();
yihui 0:638edba3adf6 143 return 1;
yihui 0:638edba3adf6 144 } else if (std::strcmp(name, __stderr_name) == 0) {
yihui 0:638edba3adf6 145 init_serial();
yihui 0:638edba3adf6 146 return 2;
yihui 0:638edba3adf6 147 }
yihui 0:638edba3adf6 148 #endif
yihui 0:638edba3adf6 149
yihui 0:638edba3adf6 150 // find the first empty slot in filehandles
yihui 0:638edba3adf6 151 unsigned int fh_i;
yihui 0:638edba3adf6 152 for (fh_i = 0; fh_i < sizeof(filehandles)/sizeof(*filehandles); fh_i++) {
yihui 0:638edba3adf6 153 if (filehandles[fh_i] == NULL) break;
yihui 0:638edba3adf6 154 }
yihui 0:638edba3adf6 155 if (fh_i >= sizeof(filehandles)/sizeof(*filehandles)) {
yihui 0:638edba3adf6 156 return -1;
yihui 0:638edba3adf6 157 }
yihui 0:638edba3adf6 158
yihui 0:638edba3adf6 159 FileHandle *res;
yihui 0:638edba3adf6 160
yihui 0:638edba3adf6 161 /* FILENAME: ":0x12345678" describes a FileLike* */
yihui 0:638edba3adf6 162 if (name[0] == ':') {
yihui 0:638edba3adf6 163 void *p;
yihui 0:638edba3adf6 164 sscanf(name, ":%p", &p);
yihui 0:638edba3adf6 165 res = (FileHandle*)p;
yihui 0:638edba3adf6 166
yihui 0:638edba3adf6 167 /* FILENAME: "/file_system/file_name" */
yihui 0:638edba3adf6 168 } else {
yihui 0:638edba3adf6 169 FilePath path(name);
yihui 0:638edba3adf6 170
yihui 0:638edba3adf6 171 if (!path.exists())
yihui 0:638edba3adf6 172 return -1;
yihui 0:638edba3adf6 173 else if (path.isFile()) {
yihui 0:638edba3adf6 174 res = path.file();
yihui 0:638edba3adf6 175 } else {
yihui 0:638edba3adf6 176 FileSystemLike *fs = path.fileSystem();
yihui 0:638edba3adf6 177 if (fs == NULL) return -1;
yihui 0:638edba3adf6 178 int posix_mode = openmode_to_posix(openmode);
yihui 0:638edba3adf6 179 res = fs->open(path.fileName(), posix_mode); /* NULL if fails */
yihui 0:638edba3adf6 180 }
yihui 0:638edba3adf6 181 }
yihui 0:638edba3adf6 182
yihui 0:638edba3adf6 183 if (res == NULL) return -1;
yihui 0:638edba3adf6 184 filehandles[fh_i] = res;
yihui 0:638edba3adf6 185
yihui 0:638edba3adf6 186 return fh_i + 3; // +3 as filehandles 0-2 are stdin/out/err
yihui 0:638edba3adf6 187 }
yihui 0:638edba3adf6 188
yihui 0:638edba3adf6 189 extern "C" int PREFIX(_close)(FILEHANDLE fh) {
yihui 0:638edba3adf6 190 if (fh < 3) return 0;
yihui 0:638edba3adf6 191
yihui 0:638edba3adf6 192 FileHandle* fhc = filehandles[fh-3];
yihui 0:638edba3adf6 193 filehandles[fh-3] = NULL;
yihui 0:638edba3adf6 194 if (fhc == NULL) return -1;
yihui 0:638edba3adf6 195
yihui 0:638edba3adf6 196 return fhc->close();
yihui 0:638edba3adf6 197 }
yihui 0:638edba3adf6 198
yihui 0:638edba3adf6 199 #if defined(__ICCARM__)
yihui 0:638edba3adf6 200 extern "C" size_t __write (int fh, const unsigned char *buffer, size_t length) {
yihui 0:638edba3adf6 201 #else
yihui 0:638edba3adf6 202 extern "C" int PREFIX(_write)(FILEHANDLE fh, const unsigned char *buffer, unsigned int length, int mode) {
yihui 0:638edba3adf6 203 #endif
yihui 0:638edba3adf6 204 int n; // n is the number of bytes written
yihui 0:638edba3adf6 205 if (fh < 3) {
yihui 0:638edba3adf6 206 #if DEVICE_SERIAL
yihui 0:638edba3adf6 207 if (!stdio_uart_inited) init_serial();
yihui 0:638edba3adf6 208 for (unsigned int i = 0; i < length; i++) {
yihui 0:638edba3adf6 209 serial_putc(&stdio_uart, buffer[i]);
yihui 0:638edba3adf6 210 }
yihui 0:638edba3adf6 211 #endif
yihui 0:638edba3adf6 212 n = length;
yihui 0:638edba3adf6 213 } else {
yihui 0:638edba3adf6 214 FileHandle* fhc = filehandles[fh-3];
yihui 0:638edba3adf6 215 if (fhc == NULL) return -1;
yihui 0:638edba3adf6 216
yihui 0:638edba3adf6 217 n = fhc->write(buffer, length);
yihui 0:638edba3adf6 218 }
yihui 0:638edba3adf6 219 #ifdef __ARMCC_VERSION
yihui 0:638edba3adf6 220 return length-n;
yihui 0:638edba3adf6 221 #else
yihui 0:638edba3adf6 222 return n;
yihui 0:638edba3adf6 223 #endif
yihui 0:638edba3adf6 224 }
yihui 0:638edba3adf6 225
yihui 0:638edba3adf6 226 #if defined(__ICCARM__)
yihui 0:638edba3adf6 227 extern "C" size_t __read (int fh, unsigned char *buffer, size_t length) {
yihui 0:638edba3adf6 228 #else
yihui 0:638edba3adf6 229 extern "C" int PREFIX(_read)(FILEHANDLE fh, unsigned char *buffer, unsigned int length, int mode) {
yihui 0:638edba3adf6 230 #endif
yihui 0:638edba3adf6 231 int n; // n is the number of bytes read
yihui 0:638edba3adf6 232 if (fh < 3) {
yihui 0:638edba3adf6 233 // only read a character at a time from stdin
yihui 0:638edba3adf6 234 #if DEVICE_SERIAL
yihui 0:638edba3adf6 235 if (!stdio_uart_inited) init_serial();
yihui 0:638edba3adf6 236 *buffer = serial_getc(&stdio_uart);
yihui 0:638edba3adf6 237 #endif
yihui 0:638edba3adf6 238 n = 1;
yihui 0:638edba3adf6 239 } else {
yihui 0:638edba3adf6 240 FileHandle* fhc = filehandles[fh-3];
yihui 0:638edba3adf6 241 if (fhc == NULL) return -1;
yihui 0:638edba3adf6 242
yihui 0:638edba3adf6 243 n = fhc->read(buffer, length);
yihui 0:638edba3adf6 244 }
yihui 0:638edba3adf6 245 #ifdef __ARMCC_VERSION
yihui 0:638edba3adf6 246 return length-n;
yihui 0:638edba3adf6 247 #else
yihui 0:638edba3adf6 248 return n;
yihui 0:638edba3adf6 249 #endif
yihui 0:638edba3adf6 250 }
yihui 0:638edba3adf6 251
yihui 0:638edba3adf6 252 #ifdef __ARMCC_VERSION
yihui 0:638edba3adf6 253 extern "C" int PREFIX(_istty)(FILEHANDLE fh)
yihui 0:638edba3adf6 254 #else
yihui 0:638edba3adf6 255 extern "C" int _isatty(FILEHANDLE fh)
yihui 0:638edba3adf6 256 #endif
yihui 0:638edba3adf6 257 {
yihui 0:638edba3adf6 258 /* stdin, stdout and stderr should be tty */
yihui 0:638edba3adf6 259 if (fh < 3) return 1;
yihui 0:638edba3adf6 260
yihui 0:638edba3adf6 261 FileHandle* fhc = filehandles[fh-3];
yihui 0:638edba3adf6 262 if (fhc == NULL) return -1;
yihui 0:638edba3adf6 263
yihui 0:638edba3adf6 264 return fhc->isatty();
yihui 0:638edba3adf6 265 }
yihui 0:638edba3adf6 266
yihui 0:638edba3adf6 267 extern "C"
yihui 0:638edba3adf6 268 #if defined(__ARMCC_VERSION)
yihui 0:638edba3adf6 269 int _sys_seek(FILEHANDLE fh, long position)
yihui 0:638edba3adf6 270 #elif defined(__ICCARM__)
yihui 0:638edba3adf6 271 long __lseek(int fh, long offset, int whence)
yihui 0:638edba3adf6 272 #else
yihui 0:638edba3adf6 273 int _lseek(FILEHANDLE fh, int offset, int whence)
yihui 0:638edba3adf6 274 #endif
yihui 0:638edba3adf6 275 {
yihui 0:638edba3adf6 276 if (fh < 3) return 0;
yihui 0:638edba3adf6 277
yihui 0:638edba3adf6 278 FileHandle* fhc = filehandles[fh-3];
yihui 0:638edba3adf6 279 if (fhc == NULL) return -1;
yihui 0:638edba3adf6 280
yihui 0:638edba3adf6 281 #if defined(__ARMCC_VERSION)
yihui 0:638edba3adf6 282 return fhc->lseek(position, SEEK_SET);
yihui 0:638edba3adf6 283 #else
yihui 0:638edba3adf6 284 return fhc->lseek(offset, whence);
yihui 0:638edba3adf6 285 #endif
yihui 0:638edba3adf6 286 }
yihui 0:638edba3adf6 287
yihui 0:638edba3adf6 288 #ifdef __ARMCC_VERSION
yihui 0:638edba3adf6 289 extern "C" int PREFIX(_ensure)(FILEHANDLE fh) {
yihui 0:638edba3adf6 290 if (fh < 3) return 0;
yihui 0:638edba3adf6 291
yihui 0:638edba3adf6 292 FileHandle* fhc = filehandles[fh-3];
yihui 0:638edba3adf6 293 if (fhc == NULL) return -1;
yihui 0:638edba3adf6 294
yihui 0:638edba3adf6 295 return fhc->fsync();
yihui 0:638edba3adf6 296 }
yihui 0:638edba3adf6 297
yihui 0:638edba3adf6 298 extern "C" long PREFIX(_flen)(FILEHANDLE fh) {
yihui 0:638edba3adf6 299 if (fh < 3) return 0;
yihui 0:638edba3adf6 300
yihui 0:638edba3adf6 301 FileHandle* fhc = filehandles[fh-3];
yihui 0:638edba3adf6 302 if (fhc == NULL) return -1;
yihui 0:638edba3adf6 303
yihui 0:638edba3adf6 304 return fhc->flen();
yihui 0:638edba3adf6 305 }
yihui 0:638edba3adf6 306 #endif
yihui 0:638edba3adf6 307
yihui 0:638edba3adf6 308
yihui 0:638edba3adf6 309 #if !defined(__ARMCC_VERSION) && !defined(__ICCARM__)
yihui 0:638edba3adf6 310 extern "C" int _fstat(int fd, struct stat *st) {
yihui 0:638edba3adf6 311 if ((STDOUT_FILENO == fd) || (STDERR_FILENO == fd) || (STDIN_FILENO == fd)) {
yihui 0:638edba3adf6 312 st->st_mode = S_IFCHR;
yihui 0:638edba3adf6 313 return 0;
yihui 0:638edba3adf6 314 }
yihui 0:638edba3adf6 315
yihui 0:638edba3adf6 316 errno = EBADF;
yihui 0:638edba3adf6 317 return -1;
yihui 0:638edba3adf6 318 }
yihui 0:638edba3adf6 319 #endif
yihui 0:638edba3adf6 320
yihui 0:638edba3adf6 321 namespace std {
yihui 0:638edba3adf6 322 extern "C" int remove(const char *path) {
yihui 0:638edba3adf6 323 FilePath fp(path);
yihui 0:638edba3adf6 324 FileSystemLike *fs = fp.fileSystem();
yihui 0:638edba3adf6 325 if (fs == NULL) return -1;
yihui 0:638edba3adf6 326
yihui 0:638edba3adf6 327 return fs->remove(fp.fileName());
yihui 0:638edba3adf6 328 }
yihui 0:638edba3adf6 329
yihui 0:638edba3adf6 330 extern "C" int rename(const char *oldname, const char *newname) {
yihui 0:638edba3adf6 331 FilePath fpOld(oldname);
yihui 0:638edba3adf6 332 FilePath fpNew(newname);
yihui 0:638edba3adf6 333 FileSystemLike *fsOld = fpOld.fileSystem();
yihui 0:638edba3adf6 334 FileSystemLike *fsNew = fpNew.fileSystem();
yihui 0:638edba3adf6 335
yihui 0:638edba3adf6 336 /* rename only if both files are on the same FS */
yihui 0:638edba3adf6 337 if (fsOld != fsNew || fsOld == NULL) return -1;
yihui 0:638edba3adf6 338
yihui 0:638edba3adf6 339 return fsOld->rename(fpOld.fileName(), fpNew.fileName());
yihui 0:638edba3adf6 340 }
yihui 0:638edba3adf6 341
yihui 0:638edba3adf6 342 extern "C" char *tmpnam(char *s) {
yihui 0:638edba3adf6 343 return NULL;
yihui 0:638edba3adf6 344 }
yihui 0:638edba3adf6 345
yihui 0:638edba3adf6 346 extern "C" FILE *tmpfile() {
yihui 0:638edba3adf6 347 return NULL;
yihui 0:638edba3adf6 348 }
yihui 0:638edba3adf6 349 } // namespace std
yihui 0:638edba3adf6 350
yihui 0:638edba3adf6 351 #ifdef __ARMCC_VERSION
yihui 0:638edba3adf6 352 extern "C" char *_sys_command_string(char *cmd, int len) {
yihui 0:638edba3adf6 353 return NULL;
yihui 0:638edba3adf6 354 }
yihui 0:638edba3adf6 355 #endif
yihui 0:638edba3adf6 356
yihui 0:638edba3adf6 357 extern "C" DIR *opendir(const char *path) {
yihui 0:638edba3adf6 358 /* root dir is FileSystemLike */
yihui 0:638edba3adf6 359 if (path[0] == '/' && path[1] == 0) {
yihui 0:638edba3adf6 360 return FileSystemLike::opendir();
yihui 0:638edba3adf6 361 }
yihui 0:638edba3adf6 362
yihui 0:638edba3adf6 363 FilePath fp(path);
yihui 0:638edba3adf6 364 FileSystemLike* fs = fp.fileSystem();
yihui 0:638edba3adf6 365 if (fs == NULL) return NULL;
yihui 0:638edba3adf6 366
yihui 0:638edba3adf6 367 return fs->opendir(fp.fileName());
yihui 0:638edba3adf6 368 }
yihui 0:638edba3adf6 369
yihui 0:638edba3adf6 370 extern "C" struct dirent *readdir(DIR *dir) {
yihui 0:638edba3adf6 371 return dir->readdir();
yihui 0:638edba3adf6 372 }
yihui 0:638edba3adf6 373
yihui 0:638edba3adf6 374 extern "C" int closedir(DIR *dir) {
yihui 0:638edba3adf6 375 return dir->closedir();
yihui 0:638edba3adf6 376 }
yihui 0:638edba3adf6 377
yihui 0:638edba3adf6 378 extern "C" void rewinddir(DIR *dir) {
yihui 0:638edba3adf6 379 dir->rewinddir();
yihui 0:638edba3adf6 380 }
yihui 0:638edba3adf6 381
yihui 0:638edba3adf6 382 extern "C" off_t telldir(DIR *dir) {
yihui 0:638edba3adf6 383 return dir->telldir();
yihui 0:638edba3adf6 384 }
yihui 0:638edba3adf6 385
yihui 0:638edba3adf6 386 extern "C" void seekdir(DIR *dir, off_t off) {
yihui 0:638edba3adf6 387 dir->seekdir(off);
yihui 0:638edba3adf6 388 }
yihui 0:638edba3adf6 389
yihui 0:638edba3adf6 390 extern "C" int mkdir(const char *path, mode_t mode) {
yihui 0:638edba3adf6 391 FilePath fp(path);
yihui 0:638edba3adf6 392 FileSystemLike *fs = fp.fileSystem();
yihui 0:638edba3adf6 393 if (fs == NULL) return -1;
yihui 0:638edba3adf6 394
yihui 0:638edba3adf6 395 return fs->mkdir(fp.fileName(), mode);
yihui 0:638edba3adf6 396 }
yihui 0:638edba3adf6 397
yihui 0:638edba3adf6 398 #if defined(TOOLCHAIN_GCC)
yihui 0:638edba3adf6 399 /* prevents the exception handling name demangling code getting pulled in */
yihui 0:638edba3adf6 400 #include "mbed_error.h"
yihui 0:638edba3adf6 401 namespace __gnu_cxx {
yihui 0:638edba3adf6 402 void __verbose_terminate_handler() {
yihui 0:638edba3adf6 403 error("Exception");
yihui 0:638edba3adf6 404 }
yihui 0:638edba3adf6 405 }
yihui 0:638edba3adf6 406 extern "C" WEAK void __cxa_pure_virtual(void);
yihui 0:638edba3adf6 407 extern "C" WEAK void __cxa_pure_virtual(void) {
yihui 0:638edba3adf6 408 exit(1);
yihui 0:638edba3adf6 409 }
yihui 0:638edba3adf6 410
yihui 0:638edba3adf6 411 #endif
yihui 0:638edba3adf6 412
yihui 0:638edba3adf6 413 // ****************************************************************************
yihui 0:638edba3adf6 414 // mbed_main is a function that is called before main()
yihui 0:638edba3adf6 415 // mbed_sdk_init() is also a function that is called before main(), but unlike
yihui 0:638edba3adf6 416 // mbed_main(), it is not meant for user code, but for the SDK itself to perform
yihui 0:638edba3adf6 417 // initializations before main() is called.
yihui 0:638edba3adf6 418
yihui 0:638edba3adf6 419 extern "C" WEAK void mbed_main(void);
yihui 0:638edba3adf6 420 extern "C" WEAK void mbed_main(void) {
yihui 0:638edba3adf6 421 }
yihui 0:638edba3adf6 422
yihui 0:638edba3adf6 423 extern "C" WEAK void mbed_sdk_init(void);
yihui 0:638edba3adf6 424 extern "C" WEAK void mbed_sdk_init(void) {
yihui 0:638edba3adf6 425 }
yihui 0:638edba3adf6 426
yihui 0:638edba3adf6 427 #if defined(TOOLCHAIN_ARM)
yihui 0:638edba3adf6 428 extern "C" int $Super$$main(void);
yihui 0:638edba3adf6 429
yihui 0:638edba3adf6 430 extern "C" int $Sub$$main(void) {
yihui 0:638edba3adf6 431 mbed_sdk_init();
yihui 0:638edba3adf6 432 mbed_main();
yihui 0:638edba3adf6 433 return $Super$$main();
yihui 0:638edba3adf6 434 }
yihui 0:638edba3adf6 435 #elif defined(TOOLCHAIN_GCC)
yihui 0:638edba3adf6 436 extern "C" int __real_main(void);
yihui 0:638edba3adf6 437
yihui 0:638edba3adf6 438 extern "C" int __wrap_main(void) {
yihui 0:638edba3adf6 439 mbed_sdk_init();
yihui 0:638edba3adf6 440 mbed_main();
yihui 0:638edba3adf6 441 return __real_main();
yihui 0:638edba3adf6 442 }
yihui 0:638edba3adf6 443 #elif defined(TOOLCHAIN_IAR)
yihui 0:638edba3adf6 444 // IAR doesn't have the $Super/$Sub mechanism of armcc, nor something equivalent
yihui 0:638edba3adf6 445 // to ld's --wrap. It does have a --redirect, but that doesn't help, since redirecting
yihui 0:638edba3adf6 446 // 'main' to another symbol looses the original 'main' symbol. However, its startup
yihui 0:638edba3adf6 447 // code will call a function to setup argc and argv (__iar_argc_argv) if it is defined.
yihui 0:638edba3adf6 448 // Since mbed doesn't use argc/argv, we use this function to call our mbed_main.
yihui 0:638edba3adf6 449 extern "C" void __iar_argc_argv() {
yihui 0:638edba3adf6 450 mbed_sdk_init();
yihui 0:638edba3adf6 451 mbed_main();
yihui 0:638edba3adf6 452 }
yihui 0:638edba3adf6 453 #endif
yihui 0:638edba3adf6 454
yihui 0:638edba3adf6 455 // Provide implementation of _sbrk (low-level dynamic memory allocation
yihui 0:638edba3adf6 456 // routine) for GCC_ARM which compares new heap pointer with MSP instead of
yihui 0:638edba3adf6 457 // SP. This make it compatible with RTX RTOS thread stacks.
yihui 0:638edba3adf6 458 #if defined(TOOLCHAIN_GCC_ARM)
yihui 0:638edba3adf6 459 // Linker defined symbol used by _sbrk to indicate where heap should start.
yihui 0:638edba3adf6 460 extern "C" int __end__;
yihui 0:638edba3adf6 461
yihui 0:638edba3adf6 462 #if defined(TARGET_CORTEX_A)
yihui 0:638edba3adf6 463 extern "C" uint32_t __HeapLimit;
yihui 0:638edba3adf6 464 #endif
yihui 0:638edba3adf6 465
yihui 0:638edba3adf6 466 // Turn off the errno macro and use actual global variable instead.
yihui 0:638edba3adf6 467 #undef errno
yihui 0:638edba3adf6 468 extern "C" int errno;
yihui 0:638edba3adf6 469
yihui 0:638edba3adf6 470 // For ARM7 only
yihui 0:638edba3adf6 471 register unsigned char * stack_ptr __asm ("sp");
yihui 0:638edba3adf6 472
yihui 0:638edba3adf6 473 // Dynamic memory allocation related syscall.
yihui 0:638edba3adf6 474 extern "C" caddr_t _sbrk(int incr) {
yihui 0:638edba3adf6 475 static unsigned char* heap = (unsigned char*)&__end__;
yihui 0:638edba3adf6 476 unsigned char* prev_heap = heap;
yihui 0:638edba3adf6 477 unsigned char* new_heap = heap + incr;
yihui 0:638edba3adf6 478
yihui 0:638edba3adf6 479 #if defined(TARGET_ARM7)
yihui 0:638edba3adf6 480 if (new_heap >= stack_ptr) {
yihui 0:638edba3adf6 481 #elif defined(TARGET_CORTEX_A)
yihui 0:638edba3adf6 482 if (new_heap >= (unsigned char*)&__HeapLimit) { /* __HeapLimit is end of heap section */
yihui 0:638edba3adf6 483 #else
yihui 0:638edba3adf6 484 if (new_heap >= (unsigned char*)__get_MSP()) {
yihui 0:638edba3adf6 485 #endif
yihui 0:638edba3adf6 486 errno = ENOMEM;
yihui 0:638edba3adf6 487 return (caddr_t)-1;
yihui 0:638edba3adf6 488 }
yihui 0:638edba3adf6 489
yihui 0:638edba3adf6 490 heap = new_heap;
yihui 0:638edba3adf6 491 return (caddr_t) prev_heap;
yihui 0:638edba3adf6 492 }
yihui 0:638edba3adf6 493 #endif
yihui 0:638edba3adf6 494
yihui 0:638edba3adf6 495
yihui 0:638edba3adf6 496 #ifdef TOOLCHAIN_GCC_CW
yihui 0:638edba3adf6 497 // TODO: Ideally, we would like to define directly "_ExitProcess"
yihui 0:638edba3adf6 498 extern "C" void mbed_exit(int return_code) {
yihui 0:638edba3adf6 499 #elif defined TOOLCHAIN_GCC_ARM
yihui 0:638edba3adf6 500 extern "C" void _exit(int return_code) {
yihui 0:638edba3adf6 501 #else
yihui 0:638edba3adf6 502 namespace std {
yihui 0:638edba3adf6 503 extern "C" void exit(int return_code) {
yihui 0:638edba3adf6 504 #endif
yihui 0:638edba3adf6 505
yihui 0:638edba3adf6 506 #if DEVICE_STDIO_MESSAGES
yihui 0:638edba3adf6 507 fflush(stdout);
yihui 0:638edba3adf6 508 fflush(stderr);
yihui 0:638edba3adf6 509 #endif
yihui 0:638edba3adf6 510
yihui 0:638edba3adf6 511 #if DEVICE_SEMIHOST
yihui 0:638edba3adf6 512 if (mbed_interface_connected()) {
yihui 0:638edba3adf6 513 semihost_exit();
yihui 0:638edba3adf6 514 }
yihui 0:638edba3adf6 515 #endif
yihui 0:638edba3adf6 516 if (return_code) {
yihui 0:638edba3adf6 517 mbed_die();
yihui 0:638edba3adf6 518 }
yihui 0:638edba3adf6 519
yihui 0:638edba3adf6 520 while (1);
yihui 0:638edba3adf6 521 }
yihui 0:638edba3adf6 522
yihui 0:638edba3adf6 523 #if !defined(TOOLCHAIN_GCC_ARM) && !defined(TOOLCHAIN_GCC_CW)
yihui 0:638edba3adf6 524 } //namespace std
yihui 0:638edba3adf6 525 #endif
yihui 0:638edba3adf6 526
yihui 0:638edba3adf6 527
yihui 0:638edba3adf6 528 namespace mbed {
yihui 0:638edba3adf6 529
yihui 0:638edba3adf6 530 void mbed_set_unbuffered_stream(FILE *_file) {
yihui 0:638edba3adf6 531 #if defined (__ICCARM__)
yihui 0:638edba3adf6 532 char buf[2];
yihui 0:638edba3adf6 533 std::setvbuf(_file,buf,_IONBF,NULL);
yihui 0:638edba3adf6 534 #else
yihui 0:638edba3adf6 535 setbuf(_file, NULL);
yihui 0:638edba3adf6 536 #endif
yihui 0:638edba3adf6 537 }
yihui 0:638edba3adf6 538
yihui 0:638edba3adf6 539 int mbed_getc(FILE *_file){
yihui 0:638edba3adf6 540 #if defined (__ICCARM__)
yihui 0:638edba3adf6 541 /*This is only valid for unbuffered streams*/
yihui 0:638edba3adf6 542 int res = std::fgetc(_file);
yihui 0:638edba3adf6 543 if (res>=0){
yihui 0:638edba3adf6 544 _file->_Mode = (unsigned short)(_file->_Mode & ~ 0x1000);/* Unset read mode */
yihui 0:638edba3adf6 545 _file->_Rend = _file->_Wend;
yihui 0:638edba3adf6 546 _file->_Next = _file->_Wend;
yihui 0:638edba3adf6 547 }
yihui 0:638edba3adf6 548 return res;
yihui 0:638edba3adf6 549 #else
yihui 0:638edba3adf6 550 return std::fgetc(_file);
yihui 0:638edba3adf6 551 #endif
yihui 0:638edba3adf6 552 }
yihui 0:638edba3adf6 553
yihui 0:638edba3adf6 554 char* mbed_gets(char*s, int size, FILE *_file){
yihui 0:638edba3adf6 555 #if defined (__ICCARM__)
yihui 0:638edba3adf6 556 /*This is only valid for unbuffered streams*/
yihui 0:638edba3adf6 557 char *str = fgets(s,size,_file);
yihui 0:638edba3adf6 558 if (str!=NULL){
yihui 0:638edba3adf6 559 _file->_Mode = (unsigned short)(_file->_Mode & ~ 0x1000);/* Unset read mode */
yihui 0:638edba3adf6 560 _file->_Rend = _file->_Wend;
yihui 0:638edba3adf6 561 _file->_Next = _file->_Wend;
yihui 0:638edba3adf6 562 }
yihui 0:638edba3adf6 563 return str;
yihui 0:638edba3adf6 564 #else
yihui 0:638edba3adf6 565 return std::fgets(s,size,_file);
yihui 0:638edba3adf6 566 #endif
yihui 0:638edba3adf6 567 }
yihui 0:638edba3adf6 568
yihui 0:638edba3adf6 569 } // namespace mbed