michael@0: /*
michael@0: ******************************************************************************
michael@0: *
michael@0: *   Copyright (C) 1997-2011, International Business Machines
michael@0: *   Corporation and others.  All Rights Reserved.
michael@0: *
michael@0: ******************************************************************************
michael@0: *
michael@0: * File FILESTRM.C
michael@0: *
michael@0: * @author       Glenn Marcy
michael@0: *
michael@0: * Modification History:
michael@0: *
michael@0: *   Date        Name        Description
michael@0: *   5/8/98      gm          Created
michael@0: *  03/02/99     stephen     Reordered params in ungetc to match stdio
michael@0: *                           Added wopen
michael@0: *   3/29/99     helena      Merged Stephen and Bertrand's changes.
michael@0: *
michael@0: ******************************************************************************
michael@0: */
michael@0: 
michael@0: #include "filestrm.h"
michael@0: 
michael@0: #include "cmemory.h"
michael@0: 
michael@0: #include <stdio.h>
michael@0: 
michael@0: U_CAPI FileStream* U_EXPORT2
michael@0: T_FileStream_open(const char* filename, const char* mode)
michael@0: {
michael@0:     if(filename != NULL && *filename != 0 && mode != NULL && *mode != 0) {
michael@0:         FILE *file = fopen(filename, mode);
michael@0:         return (FileStream*)file;
michael@0:     } else {
michael@0:         return NULL;
michael@0:     }
michael@0: }
michael@0: 
michael@0: /*
michael@0: U_CAPI FileStream* U_EXPORT2
michael@0: T_FileStream_wopen(const wchar_t* filename, const wchar_t* mode)
michael@0: {
michael@0:    // TBD: _wfopen is believed to be MS-specific? 
michael@0: #if U_PLATFORM_USES_ONLY_WIN32_API
michael@0:     FILE* result = _wfopen(filename, mode);
michael@0:     return (FileStream*)result;
michael@0: #else
michael@0:     size_t fnMbsSize, mdMbsSize;
michael@0:     char *fn, *md;
michael@0:     FILE *result;
michael@0: 
michael@0:     // convert from wchar_t to char 
michael@0:     fnMbsSize = wcstombs(NULL, filename, ((size_t)-1) >> 1);
michael@0:     fn = (char*)uprv_malloc(fnMbsSize+2);
michael@0:     wcstombs(fn, filename, fnMbsSize);
michael@0:     fn[fnMbsSize] = 0;
michael@0: 
michael@0:     mdMbsSize = wcstombs(NULL, mode, ((size_t)-1) >> 1);
michael@0:     md = (char*)uprv_malloc(mdMbsSize+2);
michael@0:     wcstombs(md, mode, mdMbsSize);
michael@0:     md[mdMbsSize] = 0;
michael@0: 
michael@0:     result = fopen(fn, md);
michael@0:     uprv_free(fn);
michael@0:     uprv_free(md);
michael@0:     return (FileStream*)result;
michael@0: #endif
michael@0: }
michael@0: */
michael@0: U_CAPI void U_EXPORT2
michael@0: T_FileStream_close(FileStream* fileStream)
michael@0: {
michael@0:     if (fileStream != 0)
michael@0:         fclose((FILE*)fileStream);
michael@0: }
michael@0: 
michael@0: U_CAPI UBool U_EXPORT2
michael@0: T_FileStream_file_exists(const char* filename)
michael@0: {
michael@0:     FILE* temp = fopen(filename, "r");
michael@0:     if (temp) {
michael@0:         fclose(temp);
michael@0:         return TRUE;
michael@0:     } else
michael@0:         return FALSE;
michael@0: }
michael@0: 
michael@0: /*static const int32_t kEOF;
michael@0: const int32_t FileStream::kEOF = EOF;*/
michael@0: 
michael@0: /*
michael@0: U_CAPI FileStream*
michael@0: T_FileStream_tmpfile()
michael@0: {
michael@0:     FILE* file = tmpfile();
michael@0:     return (FileStream*)file;
michael@0: }
michael@0: */
michael@0: 
michael@0: U_CAPI int32_t U_EXPORT2
michael@0: T_FileStream_read(FileStream* fileStream, void* addr, int32_t len)
michael@0: {
michael@0:     return fread(addr, 1, len, (FILE*)fileStream);
michael@0: }
michael@0: 
michael@0: U_CAPI int32_t U_EXPORT2
michael@0: T_FileStream_write(FileStream* fileStream, const void* addr, int32_t len)
michael@0: {
michael@0: 
michael@0:     return fwrite(addr, 1, len, (FILE*)fileStream);
michael@0: }
michael@0: 
michael@0: U_CAPI void U_EXPORT2
michael@0: T_FileStream_rewind(FileStream* fileStream)
michael@0: {
michael@0:     rewind((FILE*)fileStream);
michael@0: }
michael@0: 
michael@0: U_CAPI int32_t U_EXPORT2
michael@0: T_FileStream_putc(FileStream* fileStream, int32_t ch)
michael@0: {
michael@0:     int32_t c = fputc(ch, (FILE*)fileStream);
michael@0:     return c;
michael@0: }
michael@0: 
michael@0: U_CAPI int U_EXPORT2
michael@0: T_FileStream_getc(FileStream* fileStream)
michael@0: {
michael@0:     int c = fgetc((FILE*)fileStream);
michael@0:     return c;
michael@0: }
michael@0: 
michael@0: U_CAPI int32_t U_EXPORT2
michael@0: T_FileStream_ungetc(int32_t ch, FileStream* fileStream)
michael@0: {
michael@0: 
michael@0:     int32_t c = ungetc(ch, (FILE*)fileStream);
michael@0:     return c;
michael@0: }
michael@0: 
michael@0: U_CAPI int32_t U_EXPORT2
michael@0: T_FileStream_peek(FileStream* fileStream)
michael@0: {
michael@0:     int32_t c = fgetc((FILE*)fileStream);
michael@0:     return ungetc(c, (FILE*)fileStream);
michael@0: }
michael@0: 
michael@0: U_CAPI char* U_EXPORT2
michael@0: T_FileStream_readLine(FileStream* fileStream, char* buffer, int32_t length)
michael@0: {
michael@0:     return fgets(buffer, length, (FILE*)fileStream);
michael@0: }
michael@0: 
michael@0: U_CAPI int32_t U_EXPORT2
michael@0: T_FileStream_writeLine(FileStream* fileStream, const char* buffer)
michael@0: {
michael@0:     return fputs(buffer, (FILE*)fileStream);
michael@0: }
michael@0: 
michael@0: U_CAPI int32_t U_EXPORT2
michael@0: T_FileStream_size(FileStream* fileStream)
michael@0: {
michael@0:     int32_t savedPos = ftell((FILE*)fileStream);
michael@0:     int32_t size = 0;
michael@0: 
michael@0:     /*Changes by Bertrand A. D. doesn't affect the current position
michael@0:     goes to the end of the file before ftell*/
michael@0:     fseek((FILE*)fileStream, 0, SEEK_END);
michael@0:     size = (int32_t)ftell((FILE*)fileStream);
michael@0:     fseek((FILE*)fileStream, savedPos, SEEK_SET);
michael@0:     return size;
michael@0: }
michael@0: 
michael@0: U_CAPI int U_EXPORT2
michael@0: T_FileStream_eof(FileStream* fileStream)
michael@0: {
michael@0:     return feof((FILE*)fileStream);
michael@0: }
michael@0: 
michael@0: /*
michael@0:  Warning 
michael@0:  This function may not work consistently on all platforms
michael@0:  (e.g. HP-UX, FreeBSD and MacOSX don't return an error when
michael@0:  putc is used on a file opened as readonly)
michael@0: */
michael@0: U_CAPI int U_EXPORT2
michael@0: T_FileStream_error(FileStream* fileStream)
michael@0: {
michael@0:     return (fileStream == 0 || ferror((FILE*)fileStream));
michael@0: }
michael@0: 
michael@0: /* This function doesn't work. */
michael@0: /* force the stream to set its error flag*/
michael@0: /*U_CAPI void U_EXPORT2
michael@0: T_FileStream_setError(FileStream* fileStream)
michael@0: {
michael@0:     fseek((FILE*)fileStream, 99999, SEEK_SET);
michael@0: }
michael@0: */
michael@0: 
michael@0: U_CAPI FileStream* U_EXPORT2
michael@0: T_FileStream_stdin(void)
michael@0: {
michael@0:     return (FileStream*)stdin;
michael@0: }
michael@0: 
michael@0: U_CAPI FileStream* U_EXPORT2
michael@0: T_FileStream_stdout(void)
michael@0: {
michael@0:     return (FileStream*)stdout;
michael@0: }
michael@0: 
michael@0: 
michael@0: U_CAPI FileStream* U_EXPORT2
michael@0: T_FileStream_stderr(void)
michael@0: {
michael@0:     return (FileStream*)stderr;
michael@0: }
michael@0: 
michael@0: U_CAPI UBool U_EXPORT2
michael@0: T_FileStream_remove(const char* fileName){
michael@0:     return (remove(fileName) == 0);
michael@0: }