]>
git.saurik.com Git - wxWidgets.git/blob - tests/strings/vsnprintf.cpp
1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: tests/strings/vsnprintf.cpp
3 // Purpose: wxVsnprintf unit test
4 // Author: Francesco Montorsi
5 // (part of this file was taken from CMP.c of TRIO package
6 // written by Bjorn Reese and Daniel Stenberg)
9 // Copyright: (c) 2006 Francesco Montorsi, Bjorn Reese and Daniel Stenberg
10 ///////////////////////////////////////////////////////////////////////////////
12 // ----------------------------------------------------------------------------
14 // ----------------------------------------------------------------------------
28 #include "wx/wxchar.h"
32 // NOTE: for more info about the specification of wxVsnprintf() behaviour you can
33 // refer to the following page of the GNU libc manual:
34 // http://www.gnu.org/software/libc/manual/html_node/Formatted-Output.html
38 // ----------------------------------------------------------------------------
39 // global utilities for testing
40 // ----------------------------------------------------------------------------
42 #define MAX_TEST_LEN 1024
45 static wxChar buf
[MAX_TEST_LEN
];
48 // these macros makes it possible to write all tests without repeating a lot
49 // of times the wxT() macro
50 // NOTE: you should use expected strings with these macros which do not exceed
51 // MAX_TEST_LEN as these macro do check if the return value is == (int)wxStrlen(buf)
53 #define ASSERT_STR_EQUAL( a, b ) \
54 CPPUNIT_ASSERT_EQUAL( wxString(a), wxString(b) );
56 #define CMP6(expected, fmt, y, z, w, t) \
57 r=wxSnprintf(buf, MAX_TEST_LEN, wxT(fmt), y, z, w, t); \
58 CPPUNIT_ASSERT_EQUAL( r, wxStrlen(buf) ); \
59 ASSERT_STR_EQUAL( wxT(expected), buf );
61 #define CMP5(expected, fmt, y, z, w) \
62 r=wxSnprintf(buf, MAX_TEST_LEN, wxT(fmt), y, z, w); \
63 CPPUNIT_ASSERT_EQUAL( r, wxStrlen(buf) ); \
64 ASSERT_STR_EQUAL( wxT(expected), buf );
66 #define CMP4(expected, fmt, y, z) \
67 r=wxSnprintf(buf, MAX_TEST_LEN, wxT(fmt), y, z); \
68 CPPUNIT_ASSERT_EQUAL( r, wxStrlen(buf) ); \
69 ASSERT_STR_EQUAL( wxT(expected), buf );
71 #define CMP3(expected, fmt, y) \
72 r=wxSnprintf(buf, MAX_TEST_LEN, wxT(fmt), y); \
73 CPPUNIT_ASSERT_EQUAL( r, wxStrlen(buf) ); \
74 ASSERT_STR_EQUAL( wxT(expected), buf );
76 #define CMP2(expected, fmt) \
77 r=wxSnprintf(buf, MAX_TEST_LEN, wxT(fmt)); \
78 CPPUNIT_ASSERT_EQUAL( r, wxStrlen(buf) ); \
79 ASSERT_STR_EQUAL( wxT(expected), buf );
81 // NOTE: this macro is used also with too-small buffers (see Miscellaneous())
82 // test function, thus the return value can be > size and thus we
83 // cannot check if r == (int)wxStrlen(buf)
84 #define CMPTOSIZE(buffer, size, failuremsg, expected, fmt, x, y, z, w) \
85 r=wxSnprintf(buffer, size, wxT(fmt), x, y, z, w); \
86 CPPUNIT_ASSERT( r > 0 ); \
87 CPPUNIT_ASSERT_EQUAL_MESSAGE( \
89 wxString(wxT(expected)).Left(size - 1), \
92 // this is the same as wxSnprintf() but it passes the format string to
93 // wxVsnprintf() without using WX_ATTRIBUTE_PRINTF and thus suppresses the gcc
94 // checks (and resulting warnings) for the format string
96 // use with extreme care and only when you're really sure the warnings must be
100 wxUnsafeSnprintf(T
*buf
, size_t len
, const wxChar
*fmt
, ...)
105 int rc
= wxVsnprintf(buf
, len
, fmt
, args
);
112 // ----------------------------------------------------------------------------
114 // ----------------------------------------------------------------------------
116 class VsnprintfTestCase
: public CppUnit::TestCase
119 VsnprintfTestCase() {}
121 virtual void setUp();
124 CPPUNIT_TEST_SUITE( VsnprintfTestCase
);
135 CPPUNIT_TEST( Asterisk
);
136 CPPUNIT_TEST( Percent
);
138 CPPUNIT_TEST( LongLong
);
141 CPPUNIT_TEST( BigToSmallBuffer
);
142 #if wxUSE_WXVSNPRINTF
143 CPPUNIT_TEST( WrongFormatStrings
);
144 #endif // wxUSE_WXVSNPRINTF
145 CPPUNIT_TEST( Miscellaneous
);
146 CPPUNIT_TEST( GlibcMisc1
);
147 CPPUNIT_TEST( GlibcMisc2
);
148 CPPUNIT_TEST_SUITE_END();
168 void DoBigToSmallBuffer(T
*buffer
, int size
);
169 void BigToSmallBuffer();
171 #if wxUSE_WXVSNPRINTF
172 void WrongFormatStrings();
173 #endif // wxUSE_WXVSNPRINTF
175 // compares the expectedString and the result of wxVsnprintf() char by char
176 // for all its lenght (not only for first expectedLen chars) and also
177 // checks the return value
178 void DoMisc(int expectedLen
, const wxString
& expectedString
,
179 size_t max
, const wxChar
*format
, ...);
180 void Miscellaneous();
185 DECLARE_NO_COPY_CLASS(VsnprintfTestCase
)
188 // register in the unnamed registry so that these tests are run by default
189 CPPUNIT_TEST_SUITE_REGISTRATION( VsnprintfTestCase
);
191 // also include in it's own registry so that these tests can be run alone
192 CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( VsnprintfTestCase
, "VsnprintfTestCase" );
194 void VsnprintfTestCase::setUp()
196 // this call is required to avoid check failures when running on machines
197 // with a locale where the decimal point is not '.'
198 wxSetlocale(LC_ALL
, "C");
201 void VsnprintfTestCase::C()
203 CMP5("hi!", "%c%c%c", wxT('h'), wxT('i'), wxT('!'));
206 // the NULL characters _can_ be passed to %c to e.g. create strings
207 // with embedded NULs (because strings are not always supposed to be
210 DoMisc(14, wxT("Hello \0 World!"), 16, wxT("Hello %c World!"), wxT('\0'));
213 void VsnprintfTestCase::D()
215 CMP3("+123456", "%+d", 123456);
216 CMP3("-123456", "%d", -123456);
217 CMP3(" 123456", "% d", 123456);
218 CMP3(" 123456", "%10d", 123456);
219 CMP3("0000123456", "%010d", 123456);
220 CMP3("-123456 ", "%-10d", -123456);
223 void VsnprintfTestCase::X()
225 CMP3("ABCD", "%X", 0xABCD);
226 CMP3("0XABCD", "%#X", 0xABCD);
227 CMP3("0xabcd", "%#x", 0xABCD);
230 void VsnprintfTestCase::O()
232 CMP3("1234567", "%o", 01234567);
233 CMP3("01234567", "%#o", 01234567);
236 void VsnprintfTestCase::P()
238 // WARNING: printing of pointers is not fully standard.
239 // GNU prints them as %#x except for NULL pointers which are
240 // printed as '(nil)'.
241 // MSVC always print them as %8X on 32 bit systems and as %16X
243 // mingw32 uses MSVC CRT by default so uses the same rules
244 #if defined(__VISUALC__) || (defined(__MINGW32__) && !__USE_MINGW_ANSI_STDIO)
245 #if SIZEOF_VOID_P == 4
246 CMP3("00ABCDEF", "%p", (void*)0xABCDEF);
247 CMP3("00000000", "%p", (void*)NULL
);
248 #elif SIZEOF_VOID_P == 8
249 CMP3("0000ABCDEFABCDEF", "%p", (void*)0xABCDEFABCDEF);
250 CMP3("0000000000000000", "%p", (void*)NULL
);
252 #elif defined(__MINGW32__)
253 CMP3("0xabcdef", "%p", (void*)0xABCDEF);
254 CMP3("0", "%p", (void*)NULL
);
255 #elif defined(__GNUG__)
256 CMP3("0xabcdef", "%p", (void*)0xABCDEF);
257 CMP3("(nil)", "%p", (void*)NULL
);
261 void VsnprintfTestCase::N()
265 wxSnprintf(buf
, MAX_TEST_LEN
, wxT("%d %s%n\n"), 3, wxT("bears"), &nchar
);
266 CPPUNIT_ASSERT_EQUAL( 7, nchar
);
269 void VsnprintfTestCase::E()
271 // NB: there are no standards about the minimum exponent width
272 // (and the width of the %e conversion specifier refers to the
273 // mantissa, not to the exponent).
274 // Since newer MSVC versions use 3 digits as minimum exponent
275 // width while GNU libc uses 2 digits as minimum width, here we
276 // workaround this problem using for the exponent values with at
277 // least three digits.
279 // printf("%e",2.342E+02);
280 // -> under MSVC7.1 prints: 2.342000e+002
281 // -> under GNU libc 2.4 prints: 2.342000e+02
282 CMP3("2.342000e+112", "%e",2.342E+112);
283 CMP3("-2.3420e-112", "%10.4e",-2.342E-112);
284 CMP3("-2.3420e-112", "%11.4e",-2.342E-112);
285 CMP3(" -2.3420e-112", "%15.4e",-2.342E-112);
287 CMP3("-0.02342", "%G",-2.342E-02);
288 CMP3("3.1415E-116", "%G",3.1415e-116);
289 CMP3("0003.141500e+103", "%016e", 3141.5e100
);
290 CMP3(" 3.141500e+103", "%16e", 3141.5e100
);
291 CMP3("3.141500e+103 ", "%-16e", 3141.5e100
);
292 CMP3("3.142e+103", "%010.3e", 3141.5e100
);
295 void VsnprintfTestCase::F()
297 CMP3("3.300000", "%5f", 3.3);
298 CMP3("3.000000", "%5f", 3.0);
299 CMP3("0.000100", "%5f", .999999E-4);
300 CMP3("0.000990", "%5f", .99E-3);
301 CMP3("3333.000000", "%5f", 3333.0);
304 void VsnprintfTestCase::G()
306 // NOTE: the same about E() testcase applies here...
308 CMP3(" 3.3", "%5g", 3.3);
309 CMP3(" 3", "%5g", 3.0);
310 CMP3("9.99999e-115", "%5g", .999999E-114);
311 CMP3("0.00099", "%5g", .99E-3);
312 CMP3(" 3333", "%5g", 3333.0);
313 CMP3(" 0.01", "%5g", 0.01);
315 CMP3(" 3", "%5.g", 3.3);
316 CMP3(" 3", "%5.g", 3.0);
317 CMP3("1e-114", "%5.g", .999999E-114);
318 CMP3("0.0001", "%5.g", 1.0E-4);
319 CMP3("0.001", "%5.g", .99E-3);
320 CMP3("3e+103", "%5.g", 3333.0E100
);
321 CMP3(" 0.01", "%5.g", 0.01);
323 CMP3(" 3.3", "%5.2g", 3.3);
324 CMP3(" 3", "%5.2g", 3.0);
325 CMP3("1e-114", "%5.2g", .999999E-114);
326 CMP3("0.00099", "%5.2g", .99E-3);
327 CMP3("3.3e+103", "%5.2g", 3333.0E100
);
328 CMP3(" 0.01", "%5.2g", 0.01);
331 void VsnprintfTestCase::S()
333 CMP3(" abc", "%5s", wxT("abc"));
334 CMP3(" a", "%5s", wxT("a"));
335 CMP3("abcdefghi", "%5s", wxT("abcdefghi"));
336 CMP3("abc ", "%-5s", wxT("abc"));
337 CMP3("abcdefghi", "%-5s", wxT("abcdefghi"));
339 CMP3("abcde", "%.5s", wxT("abcdefghi"));
341 // do the same tests but with Unicode characters:
344 // Unicode code points from U+03B1 to U+03B9 are the greek letters alpha-iota;
345 // UTF8 encoding of such code points is 0xCEB1 to 0xCEB9
347 #define ALPHA "\xCE\xB1"
349 #define ABC "\xCE\xB1\xCE\xB2\xCE\xB3"
351 #define ABCDE "\xCE\xB1\xCE\xB2\xCE\xB3\xCE\xB4\xCE\xB5"
352 // alpha+beta+gamma+delta+epsilon
353 #define ABCDEFGHI "\xCE\xB1\xCE\xB2\xCE\xB3\xCE\xB4\xCE\xB5\xCE\xB6\xCE\xB7\xCE\xB8\xCE\xB9"
354 // alpha+beta+gamma+delta+epsilon+zeta+eta+theta+iota
356 // the 'expected' and 'arg' parameters of this macro are supposed to be
358 #define CMP3_UTF8(expected, fmt, arg) \
359 CPPUNIT_ASSERT_EQUAL \
361 wxString::FromUTF8(expected).length(), \
362 wxSnprintf(buf, MAX_TEST_LEN, fmt, wxString::FromUTF8(arg)) \
364 CPPUNIT_ASSERT_EQUAL \
366 wxString::FromUTF8(expected), \
370 CMP3_UTF8(" " ABC
, "%5s", ABC
);
371 CMP3_UTF8(" " ALPHA
, "%5s", ALPHA
);
372 CMP3_UTF8(ABCDEFGHI
, "%5s", ABCDEFGHI
);
373 CMP3_UTF8(ABC
" ", "%-5s", ABC
);
374 CMP3_UTF8(ABCDEFGHI
, "%-5s", ABCDEFGHI
);
375 CMP3_UTF8(ABCDE
, "%.5s", ABCDEFGHI
);
376 #endif // wxUSE_UNICODE
378 // test a string which has a NULL character after "ab";
379 // obviously it should be handled exactly like just as "ab"
380 CMP3(" ab", "%5s", wxT("ab\0cdefghi"));
383 void VsnprintfTestCase::Asterisk()
385 CMP5(" 0.1", "%*.*f", 10, 1, 0.123);
386 CMP5(" 0.1230", "%*.*f", 10, 4, 0.123);
387 CMP5("0.1", "%*.*f", 3, 1, 0.123);
389 CMP4("%0.002", "%%%.*f", 3, 0.0023456789);
391 CMP4(" a", "%*c", 8, 'a');
392 CMP4(" four", "%*s", 8, "four");
393 CMP6(" four four", "%*s %*s", 8, "four", 6, "four");
396 void VsnprintfTestCase::Percent()
398 // some tests without any argument passed through ...
400 CMP2("%%%", "%%%%%%");
402 CMP3("% abc", "%%%5s", wxT("abc"));
403 CMP3("% abc%", "%%%5s%%", wxT("abc"));
405 // do not test odd number of '%' symbols as different implementations
406 // of snprintf() give different outputs as this situation is not considered
407 // by any standard (in fact, GCC will also warn you about a spurious % if
408 // you write %%% as argument of some *printf function !)
409 // Compare(wxT("%"), wxT("%%%"));
413 void VsnprintfTestCase::LongLong()
415 CMP3("123456789", "%lld", (wxLongLong_t
)123456789);
416 CMP3("-123456789", "%lld", (wxLongLong_t
)-123456789);
418 CMP3("123456789", "%llu", (wxULongLong_t
)123456789);
421 CMP3("123456789", "%I64d", (wxLongLong_t
)123456789);
422 CMP3("123456789abcdef", "%I64x", wxLL(0x123456789abcdef));
427 // this test is only for our own implementation, the system implementation
428 // doesn't always give errors for invalid format strings (e.g. glibc doesn't)
429 // and as it's not required too (the behaviour is "undefined" according to the
430 // spec), there is really no sense in testing for it
431 #if wxUSE_WXVSNPRINTF
433 void VsnprintfTestCase::WrongFormatStrings()
435 // test how wxVsnprintf() behaves with wrong format string:
438 // NB: the next 2 tests currently return an error but it would be nice
439 // if they didn't (see ticket #9367)
441 // two positionals with the same index:
442 r
= wxSnprintf(buf
, MAX_TEST_LEN
, wxT("%1$s %1$s"), "hello");
443 CPPUNIT_ASSERT(r
!= -1);
445 // three positionals with the same index mixed with other pos args:
446 r
= wxSnprintf(buf
, MAX_TEST_LEN
, wxT("%4$d %2$f %1$s %2$s %3$d"), "hello", "world", 3, 4);
447 CPPUNIT_ASSERT(r
!= -1);
450 // a missing positional arg: this should result in an error but not all
451 // implementations detect it (e.g. glibc doesn't)
452 r
= wxSnprintf(buf
, MAX_TEST_LEN
, wxT("%1$d %3$d"), 1, 2, 3);
453 CPPUNIT_ASSERT_EQUAL(-1, r
);
455 // positional and non-positionals in the same format string:
456 r
= wxSnprintf(buf
, MAX_TEST_LEN
, wxT("%1$d %d %3$d"), 1, 2, 3);
457 CPPUNIT_ASSERT_EQUAL(-1, r
);
460 #endif // wxUSE_WXVSNPRINTF
462 // BigToSmallBuffer() test case helper:
464 void VsnprintfTestCase::DoBigToSmallBuffer(T
*buffer
, int size
)
466 // Remember that wx*printf could be mapped either to system
467 // implementation or to wx implementation.
468 // In the first case, when the output buffer is too small, the returned
469 // value can be the number of characters required for the output buffer
470 // (conforming to ISO C99; implemented in e.g. GNU libc >= 2.1), or
471 // just a negative number, usually -1; (this is how e.g. MSVC's
472 // *printf() behaves). Luckily, in all implementations, when the
473 // output buffer is too small, it's nonetheless filled up to its max size.
475 // Note that in the second case (i.e. when we're using our own implementation),
476 // wxVsnprintf() will return the number of characters written in the standard
478 // -1 if there was an error in the format string
479 // maxSize+1 if the output buffer is too small
482 errStr
<< "The size of the buffer was " << size
;
483 std::string
errMsg(errStr
.mb_str());
485 // test without positionals
486 CMPTOSIZE(buffer
, size
, errMsg
,
487 "123456789012 - test - 123 -4.567",
488 "%i%li - test - %d %.3f",
489 123, (long int)456789012, 123, -4.567);
491 #if wxUSE_PRINTF_POS_PARAMS
492 // test with positional
493 CMPTOSIZE(buffer
, size
, errMsg
,
494 "-4.567 123 - test - 456789012 123",
495 "%4$.3f %1$i - test - %2$li %3$d",
496 123, (long int)456789012, 123, -4.567);
499 // test unicode/ansi conversion specifiers
501 // NB: we use wxUnsafeSnprintf() as %hs and %hc are invalid in printf
502 // format and gcc would warn about this otherwise
504 r
= wxUnsafeSnprintf(buffer
, size
,
505 wxT("unicode string/char: %ls/%lc -- ansi string/char: %hs/%hc"),
506 L
"unicode", L
'U', "ansi", 'A');
508 wxString(wxT("unicode string/char: unicode/U -- ansi string/char: ansi/A")).Left(size
- 1);
510 CPPUNIT_ASSERT( r
!= -1 );
511 CPPUNIT_ASSERT_EQUAL(
517 void VsnprintfTestCase::BigToSmallBuffer()
519 // VC6 can't compile this code
520 #if !defined(__VISUALC__) || (__VISUALC__ >= 1310)
522 wchar_t bufw
[1024], bufw2
[16], bufw3
[4], bufw4
;
523 DoBigToSmallBuffer(bufw
, 1024);
524 DoBigToSmallBuffer(bufw2
, 16);
525 DoBigToSmallBuffer(bufw3
, 4);
526 DoBigToSmallBuffer(&bufw4
, 1);
527 #endif // wxUSE_UNICODE
529 char bufa
[1024], bufa2
[16], bufa3
[4], bufa4
;
530 DoBigToSmallBuffer(bufa
, 1024);
531 DoBigToSmallBuffer(bufa2
, 16);
532 DoBigToSmallBuffer(bufa3
, 4);
533 DoBigToSmallBuffer(&bufa4
, 1);
537 // Miscellaneous() test case helper:
538 void VsnprintfTestCase::DoMisc(
540 const wxString
& expectedString
,
542 const wxChar
*format
, ...)
544 const size_t BUFSIZE
= MAX_TEST_LEN
- 1;
546 static int count
= 0;
548 wxASSERT(max
<= BUFSIZE
);
550 for (i
= 0; i
< BUFSIZE
; i
++)
555 va_start(ap
, format
);
557 int n
= wxVsnprintf(buf
, max
, format
, ap
);
561 // Prepare messages so that it is possible to see from the error which
563 wxString errStr
, overflowStr
;
564 errStr
<< wxT("No.: ") << ++count
<< wxT(", expected: ") << expectedLen
565 << wxT(" '") << expectedString
<< wxT("', result: ");
566 overflowStr
<< errStr
<< wxT("buffer overflow");
567 errStr
<< n
<< wxT(" '") << buf
<< wxT("'");
569 // turn them into std::strings
570 std::string
errMsg(errStr
.mb_str());
571 std::string
overflowMsg(overflowStr
.mb_str());
573 CPPUNIT_ASSERT_MESSAGE(errMsg
,
574 (expectedLen
== -1 && size_t(n
) >= max
) || expectedLen
== n
);
576 CPPUNIT_ASSERT_MESSAGE(errMsg
, expectedString
== buf
);
578 for (i
= max
; i
< BUFSIZE
; i
++)
579 CPPUNIT_ASSERT_MESSAGE(overflowMsg
, buf
[i
] == '*');
582 void VsnprintfTestCase::Miscellaneous()
584 // expectedLen, expectedString, max, format, ...
585 DoMisc(5, wxT("-1234"), 8, wxT("%d"), -1234);
586 DoMisc(7, wxT("1234567"), 8, wxT("%d"), 1234567);
587 DoMisc(-1, wxT("1234567"), 8, wxT("%d"), 12345678);
588 DoMisc(-1, wxT("-123456"), 8, wxT("%d"), -1234567890);
590 DoMisc(6, wxT("123456"), 8, wxT("123456"));
591 DoMisc(7, wxT("1234567"), 8, wxT("1234567"));
592 DoMisc(-1, wxT("1234567"), 8, wxT("12345678"));
594 DoMisc(6, wxT("123450"), 8, wxT("12345%d"), 0);
595 DoMisc(7, wxT("1234560"), 8, wxT("123456%d"), 0);
596 DoMisc(-1, wxT("1234567"), 8, wxT("1234567%d"), 0);
597 DoMisc(-1, wxT("1234567"), 8, wxT("12345678%d"), 0);
599 DoMisc(6, wxT("12%45%"), 8, wxT("12%%45%%"));
600 DoMisc(7, wxT("12%45%7"), 8, wxT("12%%45%%7"));
601 DoMisc(-1, wxT("12%45%7"), 8, wxT("12%%45%%78"));
603 DoMisc(5, wxT("%%%%%"), 6, wxT("%%%%%%%%%%"));
604 DoMisc(6, wxT("%%%%12"), 7, wxT("%%%%%%%%%d"), 12);
608 /* (C) Copyright C E Chew
610 * Feel free to copy, use and distribute this software provided:
612 * 1. you do not pretend that you wrote it
613 * 2. you leave this copyright notice intact.
616 void VsnprintfTestCase::GlibcMisc1()
618 CMP3(" ", "%5.s", "xyz");
619 CMP3(" 33", "%5.f", 33.3);
620 #if defined(__VISUALC__)
621 // see the previous notes about the minimum width of mantissa:
622 CMP3(" 3e+008", "%8.e", 33.3e7
);
623 CMP3(" 3E+008", "%8.E", 33.3e7
);
624 CMP3("3e+001", "%.g", 33.3);
625 CMP3("3E+001", "%.G", 33.3);
627 CMP3(" 3e+08", "%8.e", 33.3e7
);
628 CMP3(" 3E+08", "%8.E", 33.3e7
);
629 CMP3("3e+01", "%.g", 33.3);
630 CMP3("3E+01", "%.G", 33.3);
634 void VsnprintfTestCase::GlibcMisc2()
637 wxString test_format
;
640 CMP4("3", "%.*g", prec
, 3.3);
643 CMP4("3", "%.*G", prec
, 3.3);
646 CMP4(" 3", "%7.*G", prec
, 3.33);
649 CMP4(" 041", "%04.*o", prec
, 33);
652 CMP4(" 0000033", "%09.*u", prec
, 33);
655 CMP4(" 021", "%04.*x", prec
, 33);
658 CMP4(" 021", "%04.*X", prec
, 33);
661 #endif // wxUSE_WXVSNPRINTF