home *** CD-ROM | disk | FTP | other *** search
- /*
- *******************************************************************************
- * *
- * COPYRIGHT: *
- * (C) Copyright Taligent, Inc., 1997 *
- * (C) Copyright International Business Machines Corporation, 1997-1998 *
- * Licensed Material - Program-Property of IBM - All Rights Reserved. *
- * US Government Users Restricted Rights - Use, duplication, or disclosure *
- * restricted by GSA ADP Schedule Contract with IBM Corp. *
- * *
- *******************************************************************************
- *
- * File FILESTRM.C
- *
- * @author Glenn Marcy
- *
- * Modification History:
- *
- * Date Name Description
- * 5/8/98 gm Created
- * 03/02/99 stephen Reordered params in ungetc to match stdio
- * Added wopen
- * 3/29/99 helena Merged Stephen and Bertrand's changes.
- *
- *******************************************************************************
- */
-
- #include "filestrm.h"
- #include "cmemory.h"
-
- #include <stdio.h>
-
- U_CAPI FileStream*
- T_FileStream_open(const char* filename, const char* mode)
- {
- FILE *file = fopen(filename, mode);
- return (FileStream*)file;
- }
-
-
- U_CAPI FileStream*
- T_FileStream_wopen(const wchar_t* filename, const wchar_t* mode)
- {
- /* TBD: is _wfopen MS-specific? If so, change _WIN32 to WIN32 */
- /*#ifdef _WIN32*/
- #if defined(_WIN32) && !defined(__WINDOWS__)
- FILE* result = _wfopen(filename, mode);
- return (FileStream*)result;
- #else
- size_t fnMbsSize, mdMbsSize;
- char *fn, *md;
- FILE *result;
-
- /* convert from wchar_t to char */
- fnMbsSize = wcstombs(NULL, filename, ((size_t)-1) >> 1);
- fn = (char*)icu_malloc(fnMbsSize+2);
- wcstombs(fn, filename, fnMbsSize);
- fn[fnMbsSize] = 0;
-
- mdMbsSize = wcstombs(NULL, mode, ((size_t)-1) >> 1);
- md = (char*)icu_malloc(mdMbsSize+2);
- wcstombs(md, mode, mdMbsSize);
- md[mdMbsSize] = 0;
-
- result = fopen(fn, md);
- icu_free(fn);
- icu_free(md);
- return (FileStream*)result;
- #endif
- }
-
- U_CAPI void
- T_FileStream_close(FileStream* fileStream)
- {
- if (fileStream != 0) fclose((FILE*)fileStream);
- }
-
- U_CAPI bool_t
- T_FileStream_file_exists(const char* filename)
- {
- FILE* temp = fopen(filename, "r");
- if (temp) {
- fclose(temp);
- return TRUE;
- } else
- return FALSE;
- }
-
- /*static const int32_t kEOF;
- const int32_t FileStream::kEOF = EOF;*/
-
- U_CAPI FileStream*
- T_FileStream_tmpfile()
- {
- FILE* file = tmpfile();
- return (FileStream*)file;
- }
-
- U_CAPI int32_t
- T_FileStream_read(FileStream* fileStream, void* addr, int32_t len)
- {
- return fread(addr, 1, len, (FILE*)fileStream);
- }
-
- U_CAPI int32_t
- T_FileStream_write(FileStream* fileStream, const void* addr, int32_t len)
- {
-
- return fwrite(addr, 1, len, (FILE*)fileStream);
- }
-
- U_CAPI void
- T_FileStream_rewind(FileStream* fileStream)
- {
- rewind((FILE*)fileStream);
- }
-
- U_CAPI int32_t
- T_FileStream_putc(FileStream* fileStream, int32_t ch)
- {
- int32_t c = fputc(ch, (FILE*)fileStream);
- return c;
- }
-
- U_CAPI int
- T_FileStream_getc(FileStream* fileStream)
- {
- int c = fgetc((FILE*)fileStream);
- return c;
- }
-
- U_CAPI int32_t
- T_FileStream_ungetc(int32_t ch, FileStream* fileStream)
- {
-
- int32_t c = ungetc(ch, (FILE*)fileStream);
- return c;
- }
-
- U_CAPI int32_t
- T_FileStream_peek(FileStream* fileStream)
- {
- int32_t c = fgetc((FILE*)fileStream);
- return ungetc(c, (FILE*)fileStream);
- }
-
- /*Added by Bertrand A. D. */
- U_CAPI char *
- T_FileStream_readLine(FileStream* fileStream, char* buffer, int32_t length)
- {
- return fgets(buffer, length, (FILE*)fileStream);
- }
-
- U_CAPI int32_t
- T_FileStream_writeLine(FileStream* fileStream, const char* buffer)
- {
- return fputs(buffer, (FILE*)fileStream);
- }
-
- U_CAPI int32_t
- T_FileStream_size(FileStream* fileStream)
- {
- int32_t savedPos = ftell((FILE*)fileStream);
- int32_t size = 0;
-
- /*Changes by Bertrand A. D. doesn't affect the current position
- goes to the end of the file before ftell*/
- fseek((FILE*)fileStream, 0, SEEK_END);
- size = ftell((FILE*)fileStream);
- fseek((FILE*)fileStream, savedPos, SEEK_SET);
- return size;
- }
-
- U_CAPI int
- T_FileStream_eof(FileStream* fileStream)
- {
- return feof((FILE*)fileStream);
- }
-
- U_CAPI int
- T_FileStream_error(FileStream* fileStream)
- {
- return (fileStream == 0 || ferror((FILE*)fileStream));
- }
-
- U_CAPI void
- T_FileStream_setError(FileStream* fileStream)
- {
- /* force the stream to set its error flag*/
- fseek((FILE*)fileStream, 99999, SEEK_SET);
- }
-
-
- U_CAPI FileStream*
- T_FileStream_stdin(void)
- {
- return (FileStream*)stdin;
- }
-
- U_CAPI FileStream*
- T_FileStream_stdout(void)
- {
- return (FileStream*)stdout;
- }
-
-
- U_CAPI FileStream*
- T_FileStream_stderr(void)
- {
- return (FileStream*)stderr;
- }
-
-
-
-