1 /****************************************************************************
2 * Copyright (c) 1998-2012,2013 Free Software Foundation, Inc. *
4 * Permission is hereby granted, free of charge, to any person obtaining a *
5 * copy of this software and associated documentation files (the *
6 * "Software"), to deal in the Software without restriction, including *
7 * without limitation the rights to use, copy, modify, merge, publish, *
8 * distribute, distribute with modifications, sublicense, and/or sell *
9 * copies of the Software, and to permit persons to whom the Software is *
10 * furnished to do so, subject to the following conditions: *
12 * The above copyright notice and this permission notice shall be included *
13 * in all copies or substantial portions of the Software. *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
16 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
17 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
18 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
19 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
20 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
21 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
23 * Except as contained in this notice, the name(s) of the above copyright *
24 * holders shall not be used in advertising or otherwise to promote the *
25 * sale, use or other dealings in this Software without prior written *
27 ****************************************************************************/
29 /****************************************************************************
30 * Author: Thomas E. Dickey 1997-on *
31 ****************************************************************************/
33 #include <curses.priv.h>
36 MODULE_ID("$Id: safe_sprintf.c,v 1.27 2013/01/20 01:04:32 tom Exp $")
41 Flags, Width, Prec, Type, Format
44 #define VA_INTGR(type) ival = va_arg(ap, type)
45 #define VA_FLOAT(type) fval = va_arg(ap, type)
46 #define VA_POINT(type) pval = (void *)va_arg(ap, type)
49 * Scan a variable-argument list for printf to determine the number of
50 * characters that would be emitted.
53 _nc_printf_length(const char *fmt, va_list ap)
55 size_t length = BUFSIZ;
62 if (fmt == 0 || *fmt == '\0')
64 fmt_len = strlen(fmt) + 1;
65 if ((format = typeMalloc(char, fmt_len)) == 0)
67 if ((buffer = typeMalloc(char, length)) == 0) {
72 while (*fmt != '\0') {
74 static char dummy[] = "";
76 char *pval = dummy; /* avoid const-cast */
87 while (*++fmt != '\0' && len >= 0 && !done) {
90 if (isdigit(UChar(*fmt))) {
92 if (state == Flags && num != 0)
97 width = (width * 10) + num;
98 } else if (state == Prec) {
101 prec = (prec * 10) + num;
103 } else if (*fmt == '*') {
107 if (state == Width) {
109 } else if (state == Prec) {
113 _nc_SLIMIT(sizeof(fmt_arg))
115 fmt_len += strlen(fmt_arg);
116 if ((format = _nc_doalloc(format, fmt_len)) == 0) {
121 _nc_STRCPY(&format[f], fmt_arg, fmt_len - f);
123 } else if (isalpha(UChar(*fmt))) {
126 case 'Z': /* FALLTHRU */
127 case 'h': /* FALLTHRU */
128 case 'l': /* FALLTHRU */
132 case 'i': /* FALLTHRU */
133 case 'd': /* FALLTHRU */
134 case 'u': /* FALLTHRU */
135 case 'x': /* FALLTHRU */
136 case 'X': /* FALLTHRU */
139 else if (type == 'Z')
145 case 'f': /* FALLTHRU */
146 case 'e': /* FALLTHRU */
147 case 'E': /* FALLTHRU */
148 case 'g': /* FALLTHRU */
149 case 'G': /* FALLTHRU */
161 if (prec > (int) length) {
162 length = length + prec;
163 buffer = typeRealloc(char, length, buffer);
182 } else if (*fmt == '.') {
184 } else if (*fmt == '%') {
192 _nc_SPRINTF(buffer, _nc_SLIMIT(length) format, ival);
195 _nc_SPRINTF(buffer, _nc_SLIMIT(length) format, fval);
198 _nc_SPRINTF(buffer, _nc_SLIMIT(length) format, pval);
201 len += (int) strlen(buffer);
214 #define my_buffer _nc_globals.safeprint_buf
215 #define my_length _nc_globals.safeprint_used
218 * Wrapper for vsprintf that allocates a buffer big enough to hold the result.
220 NCURSES_EXPORT(char *)
221 NCURSES_SP_NAME(_nc_printf_string) (NCURSES_SP_DCLx
232 begin_va_copy(ap2, ap);
233 len = _nc_printf_length(fmt, ap2);
236 if ((int) my_length < len + 1) {
237 my_length = 2 * (len + 1);
238 my_buffer = typeRealloc(char, my_length, my_buffer);
240 if (my_buffer != 0) {
243 vsprintf(my_buffer, fmt, ap);
248 #define MyCols _nc_globals.safeprint_cols
249 #define MyRows _nc_globals.safeprint_rows
251 if (screen_lines(SP_PARM) > MyRows || screen_columns(SP_PARM) > MyCols) {
252 if (screen_lines(SP_PARM) > MyRows)
253 MyRows = screen_lines(SP_PARM);
254 if (screen_columns(SP_PARM) > MyCols)
255 MyCols = screen_columns(SP_PARM);
256 my_length = (size_t) (MyRows * (MyCols + 1)) + 1;
257 my_buffer = typeRealloc(char, my_length, my_buffer);
260 if (my_buffer != 0) {
262 vsnprintf(my_buffer, my_length, fmt, ap); /* GNU extension */
264 vsprintf(my_buffer, fmt, ap); /* ANSI */
269 } else if (my_buffer != 0) { /* see _nc_freeall() */
278 NCURSES_EXPORT(char *)
279 _nc_printf_string(const char *fmt, va_list ap)
281 return NCURSES_SP_NAME(_nc_printf_string) (CURRENT_SCREEN, fmt, ap);