1 | /* Copyright (C) 1993-2024 Free Software Foundation, Inc. |
2 | This file is part of the GNU C Library. |
3 | |
4 | The GNU C Library is free software; you can redistribute it and/or |
5 | modify it under the terms of the GNU Lesser General Public |
6 | License as published by the Free Software Foundation; either |
7 | version 2.1 of the License, or (at your option) any later version. |
8 | |
9 | The GNU C Library is distributed in the hope that it will be useful, |
10 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
11 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
12 | Lesser General Public License for more details. |
13 | |
14 | You should have received a copy of the GNU Lesser General Public |
15 | License along with the GNU C Library; if not, see |
16 | <https://www.gnu.org/licenses/>. |
17 | |
18 | As a special exception, if you link the code in this file with |
19 | files compiled with a GNU compiler to produce an executable, |
20 | that does not cause the resulting executable to be covered by |
21 | the GNU Lesser General Public License. This exception does not |
22 | however invalidate any other reasons why the executable file |
23 | might be covered by the GNU Lesser General Public License. |
24 | This exception applies to code released by its copyright holders |
25 | in files containing the exception. */ |
26 | |
27 | #include "libioP.h" |
28 | |
29 | #define PADSIZE 16 |
30 | static wchar_t const blanks[PADSIZE] = |
31 | { |
32 | L' ', L' ', L' ', L' ', L' ', L' ', L' ', L' ', |
33 | L' ', L' ', L' ', L' ', L' ', L' ', L' ', L' ' |
34 | }; |
35 | static wchar_t const zeroes[PADSIZE] = |
36 | { |
37 | L'0', L'0', L'0', L'0', L'0', L'0', L'0', L'0', |
38 | L'0', L'0', L'0', L'0', L'0', L'0', L'0', L'0' |
39 | }; |
40 | |
41 | ssize_t |
42 | _IO_wpadn (FILE *fp, wint_t pad, ssize_t count) |
43 | { |
44 | wchar_t padbuf[PADSIZE]; |
45 | const wchar_t *padptr; |
46 | int i; |
47 | size_t written = 0; |
48 | size_t w; |
49 | |
50 | if (pad == L' ') |
51 | padptr = blanks; |
52 | else if (pad == L'0') |
53 | padptr = zeroes; |
54 | else |
55 | { |
56 | for (i = PADSIZE; --i >= 0; ) |
57 | padbuf[i] = pad; |
58 | padptr = padbuf; |
59 | } |
60 | for (i = count; i >= PADSIZE; i -= PADSIZE) |
61 | { |
62 | w = _IO_sputn (fp, (char *) padptr, PADSIZE); |
63 | written += w; |
64 | if (w != PADSIZE) |
65 | return written; |
66 | } |
67 | |
68 | if (i > 0) |
69 | { |
70 | w = _IO_sputn (fp, (char *) padptr, i); |
71 | written += w; |
72 | } |
73 | return written; |
74 | } |
75 | |