diff options
Diffstat (limited to 'src/lib/libc')
-rw-r--r-- | src/lib/libc/stdio.c | 106 |
1 files changed, 81 insertions, 25 deletions
diff --git a/src/lib/libc/stdio.c b/src/lib/libc/stdio.c index 2872f62..fe3bd2c 100644 --- a/src/lib/libc/stdio.c +++ b/src/lib/libc/stdio.c @@ -15,13 +15,13 @@ FILE libc_tty_stdio, libc_stdin, libc_stdout, libc_stderr; void initialize_out_buffer(FILE* f, int buf_mode) { f->buf_mode = 0; - f->out_buf = 0; + f->out_buf = NULL; f->out_buf_size = f->out_buf_used = 0; f->out_buf_owned = false; if (buf_mode != 0) { f->out_buf = malloc(BUFSIZ); - if (f->out_buf == 0) { + if (f->out_buf == NULL) { f->file_mode &= ~FM_WRITE; return; } @@ -33,13 +33,13 @@ void initialize_out_buffer(FILE* f, int buf_mode) { } void initialize_in_buffer(FILE* f) { - f->in_buf = 0; + f->in_buf = NULL; f->in_buf_size = 0; f->in_buf_begin = f->in_buf_end = 0; if (f->file_mode & FM_READ) { f->in_buf = malloc(BUFSIZ); - if (f->in_buf == 0) { + if (f->in_buf == NULL) { f->file_mode &= ~FM_READ; return; } @@ -52,6 +52,7 @@ void setup_libc_stdio() { libc_tty_stdio.fd = STD_FD_TTY_STDIO; libc_tty_stdio.file_mode = (libc_tty_stdio.st.access & (FM_READ | FM_WRITE)); libc_tty_stdio.pos = 0; + libc_tty_stdio.flags = 0; initialize_out_buffer(&libc_tty_stdio, _IOLBF); initialize_in_buffer(&libc_tty_stdio); @@ -69,6 +70,7 @@ void setup_libc_stdio() { ASSERT(libc_stdin.st.access & FM_READ); libc_stdin.file_mode = FM_READ; libc_stdin.pos = 0; + libc_stdin.flags = 0; initialize_out_buffer(&libc_stdin, 0); initialize_in_buffer(&libc_stdin); @@ -83,6 +85,7 @@ void setup_libc_stdio() { ASSERT(libc_stdout.st.access & FM_WRITE); libc_stdout.file_mode = FM_WRITE; libc_stdout.pos = 0; + libc_stdout.flags = 0; initialize_out_buffer(&libc_stdout, _IOLBF); initialize_in_buffer(&libc_stdout); @@ -94,6 +97,7 @@ void setup_libc_stdio() { ASSERT(libc_stderr.st.access & FM_WRITE); libc_stderr.file_mode = FM_WRITE; libc_stderr.pos = 0; + libc_stderr.flags = 0; initialize_out_buffer(&libc_stderr, _IONBF); initialize_in_buffer(&libc_stderr); @@ -131,12 +135,49 @@ int printf(const char* fmt, ...) { FILE *fopen(const char *path, const char *mode) { - // TODO - return 0; + if (path == NULL) return NULL; + if (mode == NULL || strlen(mode) == 0) { + mode = "r"; + } + + int flags = 0; + if (mode[0] == 'r') flags |= FM_READ; + if (mode[0] == 'w') flags |= FM_WRITE | FM_CREATE | FM_TRUNC; + if (mode[0] == 'a') flags |= FM_WRITE | FM_CREATE | FM_APPEND; + if (mode[1] == '+' || (mode[1] == 'b' && mode[2] == '+')) + flags |= FM_READ | FM_WRITE; + + FILE* f = (FILE*)malloc(sizeof(FILE)); + if (f == NULL) return NULL; + + f->fd = sc_open(path, flags); + dbg_printf("FOPEN %s %s: fd=%d\n", path, mode, f->fd); + if (f->fd == 0) goto error; + + if (!sc_stat_open(f->fd, &f->st)) goto error; + dbg_printf("FOPEN %s %s: stat ok\n"); + f->file_mode = flags; + + f->flags = 0; + if ((flags & FM_APPEND) && f->st.type == FT_REGULAR) { + f->pos = f->st.size; + } else { + f->pos = 0; + } + + initialize_out_buffer(f, (flags & FM_WRITE ? _IOLBF : 0)); + initialize_in_buffer(f); + + return f; + +error: + if (f->fd != 0) sc_close(f->fd); + free(f); + return NULL; } FILE *freopen(const char *path, const char *mode, FILE *stream) { // TODO - return 0; + return NULL; } int fclose(FILE* f) { if (fflush(f) != 0) return EOF; @@ -159,6 +200,8 @@ int fclose(FILE* f) { size_t fread(void *ptr, size_t size, size_t nmemb, FILE *stream) { ASSERT(size == 1); //TODO all cases + if (fflush(stream) == EOF) return 0; + if (stream == NULL || stream->fd == 0) return 0; // TODO buffering @@ -203,8 +246,7 @@ char *fgets(char *s, int size, FILE *stream) { return s; } int getc(FILE *stream) { - // TODO - return 0; + return fgetc(stream); } int ungetc(int c, FILE *stream) { // TODO @@ -362,20 +404,18 @@ int vfprintf(FILE *stream, const char *format, va_list ap) { } -// --------------------- -// COMPLICATED FUNCTIONS -// --------------------- +// ---------------------- +// FLAG-RELATED FUNCTIONS +// ---------------------- void clearerr(FILE *stream) { - // TODO + stream->flags = 0; } int feof(FILE *stream) { - // TODO - return 0; + return (stream->flags & STDIO_FL_EOF); } int ferror(FILE *stream) { - // TODO - return 0; + return (stream->flags & STDIO_FL_ERR); } int fileno(FILE *stream) { return stream->fd; @@ -388,23 +428,39 @@ int fileno(FILE *stream) { int fseek(FILE *stream, long offset, int whence) { - // TODO - return 0; + fpos_t pos; + if (whence == SEEK_SET) { + pos = offset; + } else if (whence == SEEK_CUR) { + pos = stream->pos + offset; + } else if (whence == SEEK_END) { + pos = stream->st.size + offset; + } else { + stream->flags |= STDIO_FL_ERR; + return -1; + } + return fsetpos(stream, &pos); } long ftell(FILE *stream) { - // TODO - return 0; + return stream->pos; } void rewind(FILE *stream) { - // TODO + fflush(stream); + stream->pos = 0; } int fgetpos(FILE *stream, fpos_t *pos) { - // TODO + *pos = ftell(stream); return 0; } int fsetpos(FILE *stream, const fpos_t *pos) { - // TODO - return 0; + fflush(stream); + if (*pos <= stream->st.size) { + stream->pos = *pos; + return 0; + } else { + stream->flags |= STDIO_FL_EOF; + return -1; + } } // --------------------- |