1 /*
2 ******************************************************************************
3 *
4 * Copyright (C) 1998-2004, 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 "locbund.h"
34
35 #include "cmemory.h"
36
37 static int32_t U_EXPORT2
u_printf_write(void * context,const UChar * str,int32_t count)38 u_printf_write(void *context,
39 const UChar *str,
40 int32_t count)
41 {
42 return u_file_write(str, count, (UFILE *)context);
43 }
44
45 static int32_t
u_printf_pad_and_justify(void * context,const u_printf_spec_info * info,const UChar * result,int32_t resultLen)46 u_printf_pad_and_justify(void *context,
47 const u_printf_spec_info *info,
48 const UChar *result,
49 int32_t resultLen)
50 {
51 UFILE *output = (UFILE *)context;
52 int32_t written, i;
53
54 /* pad and justify, if needed */
55 if(info->fWidth != -1 && resultLen < info->fWidth) {
56 /* left justify */
57 if(info->fLeft) {
58 written = u_file_write(result, resultLen, output);
59 for(i = 0; i < info->fWidth - resultLen; ++i) {
60 written += u_file_write(&info->fPadChar, 1, output);
61 }
62 }
63 /* right justify */
64 else {
65 written = 0;
66 for(i = 0; i < info->fWidth - resultLen; ++i) {
67 written += u_file_write(&info->fPadChar, 1, output);
68 }
69 written += u_file_write(result, resultLen, output);
70 }
71 }
72 /* just write the formatted output */
73 else {
74 written = u_file_write(result, resultLen, output);
75 }
76
77 return written;
78 }
79
80 U_CAPI int32_t U_EXPORT2
u_fprintf(UFILE * f,const char * patternSpecification,...)81 u_fprintf( UFILE *f,
82 const char *patternSpecification,
83 ... )
84 {
85 va_list ap;
86 int32_t count;
87
88 va_start(ap, patternSpecification);
89 count = u_vfprintf(f, patternSpecification, ap);
90 va_end(ap);
91
92 return count;
93 }
94
95 U_CAPI int32_t U_EXPORT2
u_fprintf_u(UFILE * f,const UChar * patternSpecification,...)96 u_fprintf_u( UFILE *f,
97 const UChar *patternSpecification,
98 ... )
99 {
100 va_list ap;
101 int32_t count;
102
103 va_start(ap, patternSpecification);
104 count = u_vfprintf_u(f, patternSpecification, ap);
105 va_end(ap);
106
107 return count;
108 }
109
110 U_CAPI int32_t U_EXPORT2 /* U_CAPI ... U_EXPORT2 added by Peter Kirk 17 Nov 2001 */
u_vfprintf(UFILE * f,const char * patternSpecification,va_list ap)111 u_vfprintf( UFILE *f,
112 const char *patternSpecification,
113 va_list ap)
114 {
115 int32_t count;
116 UChar *pattern;
117 UChar buffer[UFMT_DEFAULT_BUFFER_SIZE];
118 int32_t size = (int32_t)strlen(patternSpecification) + 1;
119
120 /* convert from the default codepage to Unicode */
121 if (size >= MAX_UCHAR_BUFFER_SIZE(buffer)) {
122 pattern = (UChar *)uprv_malloc(size * sizeof(UChar));
123 if(pattern == 0) {
124 return 0;
125 }
126 }
127 else {
128 pattern = buffer;
129 }
130 u_charsToUChars(patternSpecification, pattern, size);
131
132 /* do the work */
133 count = u_vfprintf_u(f, pattern, ap);
134
135 /* clean up */
136 if (pattern != buffer) {
137 uprv_free(pattern);
138 }
139
140 return count;
141 }
142
143 static const u_printf_stream_handler g_stream_handler = {
144 u_printf_write,
145 u_printf_pad_and_justify
146 };
147
148 U_CAPI int32_t U_EXPORT2 /* U_CAPI ... U_EXPORT2 added by Peter Kirk 17 Nov 2001 */
u_vfprintf_u(UFILE * f,const UChar * patternSpecification,va_list ap)149 u_vfprintf_u( UFILE *f,
150 const UChar *patternSpecification,
151 va_list ap)
152 {
153 int32_t written = 0; /* haven't written anything yet */
154
155 /* parse and print the whole format string */
156 u_printf_parse(&g_stream_handler, patternSpecification, f, NULL, &f->str.fBundle, &written, ap);
157
158 /* return # of UChars written */
159 return written;
160 }
161
162 #endif /* #if !UCONFIG_NO_FORMATTING */
163
164