Home | History | Annotate | Download | only in io 
      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
     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
     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
     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
     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 */
    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 */
    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