1 /* 2 ****************************************************************************** 3 * 4 * Copyright (C) 1998-2012, International Business Machines 5 * Corporation and others. All Rights Reserved. 6 * 7 ****************************************************************************** 8 * 9 * File uprintf.c 10 * 11 * Modification History: 12 * 13 * Date Name Description 14 * 11/19/98 stephen Creation. 15 * 03/12/99 stephen Modified for new C API. 16 * Added conversion from default codepage. 17 * 08/07/2003 george Reunify printf implementations 18 ****************************************************************************** 19 */ 20 21 #include "unicode/utypes.h" 22 23 #if !UCONFIG_NO_FORMATTING 24 25 #include "unicode/ustdio.h" 26 #include "unicode/ustring.h" 27 #include "unicode/unum.h" 28 #include "unicode/udat.h" 29 #include "unicode/putil.h" 30 31 #include "uprintf.h" 32 #include "ufile.h" 33 #include "ucln_io.h" 34 #include "locbund.h" 35 36 #include "cmemory.h" 37 38 static UFILE *gStdOut = NULL; 39 40 static UBool U_CALLCONV uprintf_cleanup(void) 41 { 42 if (gStdOut != NULL) { 43 u_fclose(gStdOut); 44 gStdOut = NULL; 45 } 46 return TRUE; 47 } 48 49 U_CAPI UFILE * U_EXPORT2 50 u_get_stdout() 51 { 52 if (gStdOut == NULL) { 53 gStdOut = u_finit(stdout, NULL, NULL); 54 ucln_io_registerCleanup(UCLN_IO_PRINTF, &uprintf_cleanup); 55 } 56 return gStdOut; 57 } 58 59 static int32_t U_EXPORT2 60 u_printf_write(void *context, 61 const UChar *str, 62 int32_t count) 63 { 64 return u_file_write(str, count, (UFILE *)context); 65 } 66 67 static int32_t 68 u_printf_pad_and_justify(void *context, 69 const u_printf_spec_info *info, 70 const UChar *result, 71 int32_t resultLen) 72 { 73 UFILE *output = (UFILE *)context; 74 int32_t written, i; 75 76 /* pad and justify, if needed */ 77 if(info->fWidth != -1 && resultLen < info->fWidth) { 78 /* left justify */ 79 if(info->fLeft) { 80 written = u_file_write(result, resultLen, output); 81 for(i = 0; i < info->fWidth - resultLen; ++i) { 82 written += u_file_write(&info->fPadChar, 1, output); 83 } 84 } 85 /* right justify */ 86 else { 87 written = 0; 88 for(i = 0; i < info->fWidth - resultLen; ++i) { 89 written += u_file_write(&info->fPadChar, 1, output); 90 } 91 written += u_file_write(result, resultLen, output); 92 } 93 } 94 /* just write the formatted output */ 95 else { 96 written = u_file_write(result, resultLen, output); 97 } 98 99 return written; 100 } 101 102 U_CAPI int32_t U_EXPORT2 103 u_fprintf( UFILE *f, 104 const char *patternSpecification, 105 ... ) 106 { 107 va_list ap; 108 int32_t count; 109 110 va_start(ap, patternSpecification); 111 count = u_vfprintf(f, patternSpecification, ap); 112 va_end(ap); 113 114 return count; 115 } 116 117 U_CAPI int32_t U_EXPORT2 118 u_printf(const char *patternSpecification, 119 ...) 120 { 121 va_list ap; 122 int32_t count; 123 va_start(ap, patternSpecification); 124 count = u_vfprintf(u_get_stdout(), patternSpecification, ap); 125 va_end(ap); 126 return count; 127 } 128 129 U_CAPI int32_t U_EXPORT2 130 u_fprintf_u( UFILE *f, 131 const UChar *patternSpecification, 132 ... ) 133 { 134 va_list ap; 135 int32_t count; 136 137 va_start(ap, patternSpecification); 138 count = u_vfprintf_u(f, patternSpecification, ap); 139 va_end(ap); 140 141 return count; 142 } 143 144 U_CAPI int32_t U_EXPORT2 145 u_printf_u(const UChar *patternSpecification, 146 ...) 147 { 148 va_list ap; 149 int32_t count; 150 va_start(ap, patternSpecification); 151 count = u_vfprintf_u(u_get_stdout(), patternSpecification, ap); 152 va_end(ap); 153 return count; 154 } 155 156 U_CAPI int32_t U_EXPORT2 /* U_CAPI ... U_EXPORT2 added by Peter Kirk 17 Nov 2001 */ 157 u_vfprintf( UFILE *f, 158 const char *patternSpecification, 159 va_list ap) 160 { 161 int32_t count; 162 UChar *pattern; 163 UChar buffer[UFMT_DEFAULT_BUFFER_SIZE]; 164 int32_t size = (int32_t)strlen(patternSpecification) + 1; 165 166 /* convert from the default codepage to Unicode */ 167 if (size >= MAX_UCHAR_BUFFER_SIZE(buffer)) { 168 pattern = (UChar *)uprv_malloc(size * sizeof(UChar)); 169 if(pattern == 0) { 170 return 0; 171 } 172 } 173 else { 174 pattern = buffer; 175 } 176 u_charsToUChars(patternSpecification, pattern, size); 177 178 /* do the work */ 179 count = u_vfprintf_u(f, pattern, ap); 180 181 /* clean up */ 182 if (pattern != buffer) { 183 uprv_free(pattern); 184 } 185 186 return count; 187 } 188 189 static const u_printf_stream_handler g_stream_handler = { 190 u_printf_write, 191 u_printf_pad_and_justify 192 }; 193 194 U_CAPI int32_t U_EXPORT2 /* U_CAPI ... U_EXPORT2 added by Peter Kirk 17 Nov 2001 */ 195 u_vfprintf_u( UFILE *f, 196 const UChar *patternSpecification, 197 va_list ap) 198 { 199 int32_t written = 0; /* haven't written anything yet */ 200 201 /* parse and print the whole format string */ 202 u_printf_parse(&g_stream_handler, patternSpecification, f, NULL, &f->str.fBundle, &written, ap); 203 204 /* return # of UChars written */ 205 return written; 206 } 207 208 #endif /* #if !UCONFIG_NO_FORMATTING */ 209 210
