1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21
22 /*
23 * Copyright 2008 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 #pragma ident "%Z%%M% %I% %E% SMI"
28
29 #include "lint.h"
30 #include "file64.h"
31 #include <mtlib.h>
32 #include <stdio.h>
33 #include <stdarg.h>
34 #include <errno.h>
35 #include <thread.h>
36 #include <synch.h>
37 #include <values.h>
38 #include <wchar.h>
39 #include "print.h"
40 #include "stdiom.h"
41 #include <sys/types.h>
42 #include "libc.h"
43 #include "mse.h"
44
45 /*
46 * 32-bit shadow functions _vwprintf_c89(), _vfwprintf_c89(),
47 * _vswprintf_c89() are included here.
48 * When using the c89 compiler to build 32-bit applications, the size
49 * of intmax_t is 32-bits, otherwise the size of intmax_t is 64-bits.
50 * The shadow function uses 32-bit size of intmax_t for j conversion.
51 * The #pragma redefine_extname in <wchar.h> selects the proper routine
52 * at compile time for the user application.
53 * NOTE: shadow functions only exist in the 32-bit library.
54 */
55
56 int
57 #ifdef _C89_INTMAX32 /* _C89_INTMAX32 version in 32-bit libc only */
_vwprintf_c89(const wchar_t * format,va_list ap)58 _vwprintf_c89(const wchar_t *format, va_list ap)
59 #else
60 vwprintf(const wchar_t *format, va_list ap)
61 #endif
62 {
63 ssize_t count;
64 rmutex_t *lk;
65
66 FLOCKFILE(lk, stdout);
67
68 if (_set_orientation_wide(stdout, NULL, NULL, 0) == -1) {
69 errno = EBADF;
70 FUNLOCKFILE(lk);
71 return (EOF);
72 }
73 if (!(stdout->_flag & _IOWRT)) {
74 /* if no write flag */
75 if (stdout->_flag & _IORW) {
76 /* if ok, cause read-write */
77 stdout->_flag |= _IOWRT;
78 } else {
79 /* else error */
80 errno = EBADF;
81 FUNLOCKFILE(lk);
82 return (EOF);
83 }
84 }
85 #ifdef _C89_INTMAX32
86 count = _wndoprnt(format, ap, stdout, _F_INTMAX32);
87 #else
88 count = _wndoprnt(format, ap, stdout, 0);
89 #endif /* _C89_INTMAX32 */
90
91 if (FERROR(stdout) || count == EOF) {
92 FUNLOCKFILE(lk);
93 return (EOF);
94 }
95 FUNLOCKFILE(lk);
96 /* check for overflow */
97 if ((size_t)count > MAXINT) {
98 errno = EOVERFLOW;
99 return (EOF);
100 } else {
101 return ((int)count);
102 }
103 }
104
105 int
106 #ifdef _C89_INTMAX32 /* _C89_INTMAX32 version in 32-bit libc only */
_vfwprintf_c89(FILE * iop,const wchar_t * format,va_list ap)107 _vfwprintf_c89(FILE *iop, const wchar_t *format, va_list ap)
108 #else
109 vfwprintf(FILE *iop, const wchar_t *format, va_list ap)
110 #endif
111 {
112 ssize_t count;
113 rmutex_t *lk;
114
115 FLOCKFILE(lk, iop);
116
117 if (_set_orientation_wide(iop, NULL, NULL, 0) == -1) {
118 errno = EBADF;
119 FUNLOCKFILE(lk);
120 return (EOF);
121 }
122
123 if (!(iop->_flag & _IOWRT)) {
124 /* if no write flag */
125 if (iop->_flag & _IORW) {
126 /* if ok, cause read-write */
127 iop->_flag |= _IOWRT;
128 } else {
129 /* else error */
130 errno = EBADF;
131 FUNLOCKFILE(lk);
132 return (EOF);
133 }
134 }
135 #ifdef _C89_INTMAX32
136 count = _wndoprnt(format, ap, iop, _F_INTMAX32);
137 #else
138 count = _wndoprnt(format, ap, iop, 0);
139 #endif
140 if (FERROR(iop) || count == EOF) {
141 FUNLOCKFILE(lk);
142 return (EOF);
143 }
144 FUNLOCKFILE(lk);
145 /* check for overflow */
146 if ((size_t)count > MAXINT) {
147 errno = EOVERFLOW;
148 return (EOF);
149 } else {
150 return ((int)count);
151 }
152 }
153
154 int
155 #ifdef _C89_INTMAX32 /* _C89_INTMAX32 version in 32-bit libc only */
_vswprintf_c89(wchar_t * string,size_t n,const wchar_t * format,va_list ap)156 _vswprintf_c89(wchar_t *string, size_t n, const wchar_t *format, va_list ap)
157 #else
158 vswprintf(wchar_t *string, size_t n, const wchar_t *format, va_list ap)
159 #endif
160 {
161 ssize_t count;
162 FILE siop;
163 wchar_t *wp;
164
165 if (n == 0)
166 return (EOF);
167
168 siop._cnt = (ssize_t)n - 1;
169 siop._base = siop._ptr = (unsigned char *)string;
170 siop._flag = _IOREAD;
171
172 #ifdef _C89_INTMAX32
173 count = _wndoprnt(format, ap, &siop, _F_INTMAX32);
174 #else
175 count = _wndoprnt(format, ap, &siop, 0);
176 #endif
177 wp = (wchar_t *)(uintptr_t)siop._ptr;
178 *wp = L'\0';
179 if (count == EOF) {
180 return (EOF);
181 }
182 /* check for overflow */
183 if ((size_t)count > MAXINT) {
184 errno = EOVERFLOW;
185 return (EOF);
186 } else {
187 return ((int)count);
188 }
189 }
190