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 * Copyright 2010 Nexenta Systems, Inc. All rights reserved.
28 * Use is subject to license terms.
29 */
30
31 #include "lint.h"
32 #include "file64.h"
33 #include <mtlib.h>
34 #include <stdio.h>
35 #include <stdarg.h>
36 #include <errno.h>
37 #include <thread.h>
38 #include <synch.h>
39 #include <values.h>
40 #include <wchar.h>
41 #include "print.h"
42 #include "stdiom.h"
43 #include <sys/types.h>
44 #include "libc.h"
45 #include "mse.h"
46
47 /*
48 * 32-bit shadow functions _vwprintf_c89(), _vfwprintf_c89(),
49 * _vswprintf_c89() are included here.
50 * When using the c89 compiler to build 32-bit applications, the size
51 * of intmax_t is 32-bits, otherwise the size of intmax_t is 64-bits.
52 * The shadow function uses 32-bit size of intmax_t for j conversion.
53 * The #pragma redefine_extname in <wchar.h> selects the proper routine
54 * at compile time for the user application.
55 * NOTE: shadow functions only exist in the 32-bit library.
56 */
57
58 int
59 #ifdef _C89_INTMAX32 /* _C89_INTMAX32 version in 32-bit libc only */
_vwprintf_c89(const wchar_t * format,va_list ap)60 _vwprintf_c89(const wchar_t *format, va_list ap)
61 #else
62 vwprintf(const wchar_t *format, va_list ap)
63 #endif
64 {
65 ssize_t count;
66 rmutex_t *lk;
67
68 FLOCKFILE(lk, stdout);
69
70 if (GET_NO_MODE(stdout))
71 _setorientation(stdout, _WC_MODE);
72 if (!(stdout->_flag & _IOWRT)) {
73 /* if no write flag */
74 if (stdout->_flag & _IORW) {
75 /* if ok, cause read-write */
76 stdout->_flag |= _IOWRT;
77 } else {
78 /* else error */
79 errno = EBADF;
80 FUNLOCKFILE(lk);
81 return (EOF);
82 }
83 }
84 #ifdef _C89_INTMAX32
85 count = _wndoprnt(format, ap, stdout, _F_INTMAX32);
86 #else
87 count = _wndoprnt(format, ap, stdout, 0);
88 #endif /* _C89_INTMAX32 */
89
90 if (FERROR(stdout) || count == EOF) {
91 FUNLOCKFILE(lk);
92 return (EOF);
93 }
94 FUNLOCKFILE(lk);
95 /* check for overflow */
96 if ((size_t)count > MAXINT) {
97 errno = EOVERFLOW;
98 return (EOF);
99 } else {
100 return ((int)count);
101 }
102 }
103
104 int
105 #ifdef _C89_INTMAX32 /* _C89_INTMAX32 version in 32-bit libc only */
_vfwprintf_c89(FILE * iop,const wchar_t * format,va_list ap)106 _vfwprintf_c89(FILE *iop, const wchar_t *format, va_list ap)
107 #else
108 vfwprintf(FILE *iop, const wchar_t *format, va_list ap)
109 #endif
110 {
111 ssize_t count;
112 rmutex_t *lk;
113
114 FLOCKFILE(lk, iop);
115
116 if (GET_NO_MODE(iop))
117 _setorientation(iop, _WC_MODE);
118
119 if (!(iop->_flag & _IOWRT)) {
120 /* if no write flag */
121 if (iop->_flag & _IORW) {
122 /* if ok, cause read-write */
123 iop->_flag |= _IOWRT;
124 } else {
125 /* else error */
126 errno = EBADF;
127 FUNLOCKFILE(lk);
128 return (EOF);
129 }
130 }
131 #ifdef _C89_INTMAX32
132 count = _wndoprnt(format, ap, iop, _F_INTMAX32);
133 #else
134 count = _wndoprnt(format, ap, iop, 0);
135 #endif
136 if (FERROR(iop) || count == EOF) {
137 FUNLOCKFILE(lk);
138 return (EOF);
139 }
140 FUNLOCKFILE(lk);
141 /* check for overflow */
142 if ((size_t)count > MAXINT) {
143 errno = EOVERFLOW;
144 return (EOF);
145 } else {
146 return ((int)count);
147 }
148 }
149
150 int
151 #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)152 _vswprintf_c89(wchar_t *string, size_t n, const wchar_t *format, va_list ap)
153 #else
154 vswprintf(wchar_t *string, size_t n, const wchar_t *format, va_list ap)
155 #endif
156 {
157 ssize_t count;
158 FILE siop;
159 wchar_t *wp;
160
161 if (n == 0)
162 return (EOF);
163
164 siop._cnt = (ssize_t)n - 1;
165 siop._base = siop._ptr = (unsigned char *)string;
166 siop._flag = _IOREAD;
167
168 #ifdef _C89_INTMAX32
169 count = _wndoprnt(format, ap, &siop, _F_INTMAX32);
170 #else
171 count = _wndoprnt(format, ap, &siop, 0);
172 #endif
173 wp = (wchar_t *)(uintptr_t)siop._ptr;
174 *wp = L'\0';
175 if (count == EOF) {
176 return (EOF);
177 }
178 /* check for overflow */
179 if ((size_t)count > MAXINT) {
180 errno = EOVERFLOW;
181 return (EOF);
182 } else {
183 return ((int)count);
184 }
185 }
186