Back to index

glibc  2.9
iowpadn.c
Go to the documentation of this file.
00001 /* Copyright (C) 1993, 1997, 1999 Free Software Foundation, Inc.
00002    This file is part of the GNU C Library.
00003 
00004    The GNU C Library is free software; you can redistribute it and/or
00005    modify it under the terms of the GNU Lesser General Public
00006    License as published by the Free Software Foundation; either
00007    version 2.1 of the License, or (at your option) any later version.
00008 
00009    The GNU C Library is distributed in the hope that it will be useful,
00010    but WITHOUT ANY WARRANTY; without even the implied warranty of
00011    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
00012    Lesser General Public License for more details.
00013 
00014    You should have received a copy of the GNU Lesser General Public
00015    License along with the GNU C Library; if not, write to the Free
00016    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
00017    02111-1307 USA.
00018 
00019    As a special exception, if you link the code in this file with
00020    files compiled with a GNU compiler to produce an executable,
00021    that does not cause the resulting executable to be covered by
00022    the GNU Lesser General Public License.  This exception does not
00023    however invalidate any other reasons why the executable file
00024    might be covered by the GNU Lesser General Public License.
00025    This exception applies to code released by its copyright holders
00026    in files containing the exception.  */
00027 
00028 #include "libioP.h"
00029 
00030 #define PADSIZE 16
00031 static wchar_t const blanks[PADSIZE] =
00032 {
00033   L' ', L' ', L' ', L' ', L' ', L' ', L' ', L' ',
00034   L' ', L' ', L' ', L' ', L' ', L' ', L' ', L' '
00035 };
00036 static wchar_t const zeroes[PADSIZE] =
00037 {
00038   L'0', L'0', L'0', L'0', L'0', L'0', L'0', L'0',
00039   L'0', L'0', L'0', L'0', L'0', L'0', L'0', L'0'
00040 };
00041 
00042 _IO_ssize_t
00043 _IO_wpadn (fp, pad, count)
00044       _IO_FILE *fp;
00045       wint_t pad;
00046       _IO_ssize_t count;
00047 {
00048   wchar_t padbuf[PADSIZE];
00049   const wchar_t *padptr;
00050   int i;
00051   _IO_size_t written = 0;
00052   _IO_size_t w;
00053 
00054   if (pad == L' ')
00055     padptr = blanks;
00056   else if (pad == L'0')
00057     padptr = zeroes;
00058   else
00059     {
00060       for (i = PADSIZE; --i >= 0; )
00061        padbuf[i] = pad;
00062       padptr = padbuf;
00063     }
00064   for (i = count; i >= PADSIZE; i -= PADSIZE)
00065     {
00066       w = _IO_sputn (fp, (char *) padptr, PADSIZE);
00067       written += w;
00068       if (w != PADSIZE)
00069        return written;
00070     }
00071 
00072   if (i > 0)
00073     {
00074       w = _IO_sputn (fp, (char *) padptr, i);
00075       written += w;
00076     }
00077   return written;
00078 }