1 /* 2 ****************************************************************************** 3 * 4 * Copyright (C) 1997-2011, International Business Machines 5 * Corporation and others. All Rights Reserved. 6 * 7 ****************************************************************************** 8 * 9 * File FILESTRM.C 10 * 11 * @author Glenn Marcy 12 * 13 * Modification History: 14 * 15 * Date Name Description 16 * 5/8/98 gm Created 17 * 03/02/99 stephen Reordered params in ungetc to match stdio 18 * Added wopen 19 * 3/29/99 helena Merged Stephen and Bertrand's changes. 20 * 21 ****************************************************************************** 22 */ 23 24 #include "filestrm.h" 25 26 #include "cmemory.h" 27 28 #include <stdio.h> 29 30 U_CAPI FileStream* U_EXPORT2 31 T_FileStream_open(const char* filename, const char* mode) 32 { 33 if(filename != NULL && *filename != 0 && mode != NULL && *mode != 0) { 34 FILE *file = fopen(filename, mode); 35 return (FileStream*)file; 36 } else { 37 return NULL; 38 } 39 } 40 41 /* 42 U_CAPI FileStream* U_EXPORT2 43 T_FileStream_wopen(const wchar_t* filename, const wchar_t* mode) 44 { 45 // TBD: _wfopen is believed to be MS-specific? 46 #if U_PLATFORM_USES_ONLY_WIN32_API 47 FILE* result = _wfopen(filename, mode); 48 return (FileStream*)result; 49 #else 50 size_t fnMbsSize, mdMbsSize; 51 char *fn, *md; 52 FILE *result; 53 54 // convert from wchar_t to char 55 fnMbsSize = wcstombs(NULL, filename, ((size_t)-1) >> 1); 56 fn = (char*)uprv_malloc(fnMbsSize+2); 57 wcstombs(fn, filename, fnMbsSize); 58 fn[fnMbsSize] = 0; 59 60 mdMbsSize = wcstombs(NULL, mode, ((size_t)-1) >> 1); 61 md = (char*)uprv_malloc(mdMbsSize+2); 62 wcstombs(md, mode, mdMbsSize); 63 md[mdMbsSize] = 0; 64 65 result = fopen(fn, md); 66 uprv_free(fn); 67 uprv_free(md); 68 return (FileStream*)result; 69 #endif 70 } 71 */ 72 U_CAPI void U_EXPORT2 73 T_FileStream_close(FileStream* fileStream) 74 { 75 if (fileStream != 0) 76 fclose((FILE*)fileStream); 77 } 78 79 U_CAPI UBool U_EXPORT2 80 T_FileStream_file_exists(const char* filename) 81 { 82 FILE* temp = fopen(filename, "r"); 83 if (temp) { 84 fclose(temp); 85 return TRUE; 86 } else 87 return FALSE; 88 } 89 90 /*static const int32_t kEOF; 91 const int32_t FileStream::kEOF = EOF;*/ 92 93 /* 94 U_CAPI FileStream* 95 T_FileStream_tmpfile() 96 { 97 FILE* file = tmpfile(); 98 return (FileStream*)file; 99 } 100 */ 101 102 U_CAPI int32_t U_EXPORT2 103 T_FileStream_read(FileStream* fileStream, void* addr, int32_t len) 104 { 105 return fread(addr, 1, len, (FILE*)fileStream); 106 } 107 108 U_CAPI int32_t U_EXPORT2 109 T_FileStream_write(FileStream* fileStream, const void* addr, int32_t len) 110 { 111 112 return fwrite(addr, 1, len, (FILE*)fileStream); 113 } 114 115 U_CAPI void U_EXPORT2 116 T_FileStream_rewind(FileStream* fileStream) 117 { 118 rewind((FILE*)fileStream); 119 } 120 121 U_CAPI int32_t U_EXPORT2 122 T_FileStream_putc(FileStream* fileStream, int32_t ch) 123 { 124 int32_t c = fputc(ch, (FILE*)fileStream); 125 return c; 126 } 127 128 U_CAPI int U_EXPORT2 129 T_FileStream_getc(FileStream* fileStream) 130 { 131 int c = fgetc((FILE*)fileStream); 132 return c; 133 } 134 135 U_CAPI int32_t U_EXPORT2 136 T_FileStream_ungetc(int32_t ch, FileStream* fileStream) 137 { 138 139 int32_t c = ungetc(ch, (FILE*)fileStream); 140 return c; 141 } 142 143 U_CAPI int32_t U_EXPORT2 144 T_FileStream_peek(FileStream* fileStream) 145 { 146 int32_t c = fgetc((FILE*)fileStream); 147 return ungetc(c, (FILE*)fileStream); 148 } 149 150 U_CAPI char* U_EXPORT2 151 T_FileStream_readLine(FileStream* fileStream, char* buffer, int32_t length) 152 { 153 return fgets(buffer, length, (FILE*)fileStream); 154 } 155 156 U_CAPI int32_t U_EXPORT2 157 T_FileStream_writeLine(FileStream* fileStream, const char* buffer) 158 { 159 return fputs(buffer, (FILE*)fileStream); 160 } 161 162 U_CAPI int32_t U_EXPORT2 163 T_FileStream_size(FileStream* fileStream) 164 { 165 int32_t savedPos = ftell((FILE*)fileStream); 166 int32_t size = 0; 167 168 /*Changes by Bertrand A. D. doesn't affect the current position 169 goes to the end of the file before ftell*/ 170 fseek((FILE*)fileStream, 0, SEEK_END); 171 size = (int32_t)ftell((FILE*)fileStream); 172 fseek((FILE*)fileStream, savedPos, SEEK_SET); 173 return size; 174 } 175 176 U_CAPI int U_EXPORT2 177 T_FileStream_eof(FileStream* fileStream) 178 { 179 return feof((FILE*)fileStream); 180 } 181 182 /* 183 Warning 184 This function may not work consistently on all platforms 185 (e.g. HP-UX, FreeBSD and MacOSX don't return an error when 186 putc is used on a file opened as readonly) 187 */ 188 U_CAPI int U_EXPORT2 189 T_FileStream_error(FileStream* fileStream) 190 { 191 return (fileStream == 0 || ferror((FILE*)fileStream)); 192 } 193 194 /* This function doesn't work. */ 195 /* force the stream to set its error flag*/ 196 /*U_CAPI void U_EXPORT2 197 T_FileStream_setError(FileStream* fileStream) 198 { 199 fseek((FILE*)fileStream, 99999, SEEK_SET); 200 } 201 */ 202 203 U_CAPI FileStream* U_EXPORT2 204 T_FileStream_stdin(void) 205 { 206 return (FileStream*)stdin; 207 } 208 209 U_CAPI FileStream* U_EXPORT2 210 T_FileStream_stdout(void) 211 { 212 return (FileStream*)stdout; 213 } 214 215 216 U_CAPI FileStream* U_EXPORT2 217 T_FileStream_stderr(void) 218 { 219 return (FileStream*)stderr; 220 } 221 222 U_CAPI UBool U_EXPORT2 223 T_FileStream_remove(const char* fileName){ 224 return (remove(fileName) == 0); 225 } 226
