97 lines
2.6 KiB
C
Executable file
97 lines
2.6 KiB
C
Executable file
#include "PowerPC_EABI_Support/Msl/MSL_C/MSL_Common/ansi_files.h"
|
|
#include "PowerPC_EABI_Support/Msl/MSL_C/MSL_Common/errno.h"
|
|
|
|
inline fpos_t _ftell(FILE* file) {
|
|
int charsInUndoBuffer = 0;
|
|
fpos_t position;
|
|
unsigned char tmp_kind = file->file_mode.file_kind;
|
|
|
|
if (!(tmp_kind == __disk_file || tmp_kind == __console_file) || file->file_state.error) {
|
|
errno = EFPOS;
|
|
return -1;
|
|
}
|
|
|
|
if (file->file_state.io_state == __neutral)
|
|
return (file->position);
|
|
|
|
position = file->buffer_position + (file->buffer_ptr - file->buffer);
|
|
|
|
if (file->file_state.io_state >= __rereading) {
|
|
charsInUndoBuffer = file->file_state.io_state - __rereading + 1;
|
|
position -= charsInUndoBuffer;
|
|
}
|
|
|
|
return (position);
|
|
}
|
|
|
|
long ftell(FILE* file) {
|
|
long retval;
|
|
|
|
retval = (long)_ftell(file);
|
|
|
|
return retval;
|
|
}
|
|
|
|
int _fseek(FILE* file, fpos_t offset, int file_mode) {
|
|
fpos_t position;
|
|
__pos_proc pos_proc;
|
|
unsigned char tmp_kind = file->file_mode.file_kind;
|
|
|
|
if (!(tmp_kind == __disk_file) || file->file_state.error) {
|
|
errno = EFPOS;
|
|
return (-1);
|
|
}
|
|
|
|
if (file->file_state.io_state == __writing) {
|
|
if (__flush_buffer(file, NULL) != __no_io_error) {
|
|
set_error(file);
|
|
errno = EFPOS;
|
|
return (-1);
|
|
}
|
|
}
|
|
|
|
if (file_mode == SEEK_CUR) {
|
|
file_mode = SEEK_SET;
|
|
if ((position = _ftell(file)) < 0)
|
|
position = 0;
|
|
offset += position;
|
|
}
|
|
|
|
if ((file_mode != SEEK_END) && (file->file_mode.io_mode != __read_write) &&
|
|
((file->file_state.io_state == __reading) || (file->file_state.io_state == __rereading)))
|
|
{
|
|
if (offset >= file->position || offset < file->buffer_position) {
|
|
file->file_state.io_state = __neutral;
|
|
} else {
|
|
file->buffer_ptr = file->buffer + (offset - file->buffer_position);
|
|
file->buffer_length = file->position - offset;
|
|
file->file_state.io_state = __reading;
|
|
}
|
|
} else {
|
|
file->file_state.io_state = __neutral;
|
|
}
|
|
|
|
if (file->file_state.io_state == __neutral) {
|
|
if ((pos_proc = file->position_fn) != NULL && pos_proc(file->handle, &offset, file_mode, file->idle_fn)) {
|
|
set_error(file);
|
|
errno = EFPOS;
|
|
return -1;
|
|
}
|
|
|
|
file->file_state.eof = 0;
|
|
file->position = offset;
|
|
file->buffer_length = 0;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
int fseek(FILE * file, long offset, int file_mode)
|
|
{
|
|
fpos_t real_offset = (fpos_t)offset;
|
|
int retval;
|
|
|
|
retval = _fseek(file, real_offset, file_mode);
|
|
|
|
return(retval);
|
|
}
|