source: mainline/uspace/lib/c/test/stdio/scanf.c@ ed18e14

/*
 * Copyright (c) 2018 Jiri Svoboda
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

/** @addtogroup libc
 * @{
 */
/**
 * @file
 * @brief Test formatted input (scanf family)
 */

#include <mem.h>
#include <pcut/pcut.h>
#include <stddef.h>
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>

PCUT_INIT;

PCUT_TEST_SUITE(scanf);

enum {
        chars_size = 10
};

PCUT_TEST(empty_fmt)
{
        int rc;

        /* Empty format string */
        rc = xxsscanf("42", "");
        PCUT_ASSERT_INT_EQUALS(0, rc);
}

PCUT_TEST(dec_int)
{
        int rc;
        int i;

        /* Decimal integer */
        rc = xxsscanf("42", "%d", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 42);
}

PCUT_TEST(int_int)
{
        int rc;
        int i, j;

        /* Two integers */
        rc = xxsscanf("42 43", "%d%d", &i, &j);
        PCUT_ASSERT_INT_EQUALS(2, rc);
        PCUT_ASSERT_TRUE(i == 42);
        PCUT_ASSERT_TRUE(j == 43);
}

PCUT_TEST(dec_sign_char)
{
        int rc;
        signed char sc;

        /* Decimal signed char */
        rc = xxsscanf("42", "%hhd", &sc);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(sc == 42);
}

PCUT_TEST(dec_short)
{
        int rc;
        short si;

        /* Decimal short */
        rc = xxsscanf("42", "%hd", &si);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(si == 42);
}

PCUT_TEST(dec_long)
{
        int rc;
        long li;

        /* Decimal long */
        rc = xxsscanf("42", "%ld", &li);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(li == 42);
}

PCUT_TEST(dec_long_long)
{
        int rc;
        long long lli;

        /* Decimal long long */
        rc = xxsscanf("42", "%lld", &lli);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(lli == 42);
}

PCUT_TEST(dec_intmax)
{
        int rc;
        intmax_t imax;

        /* Decimal intmax_t */
        rc = xxsscanf("42", "%jd", &imax);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(imax == 42);
}

PCUT_TEST(dec_size_t_size)
{
        int rc;
        size_t szi;

        /* Decimal size_t-sized */
        rc = xxsscanf("42", "%zd", &szi);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(szi == 42);
}

PCUT_TEST(dec_ptrdiff_t_size)
{
        int rc;
        ptrdiff_t pdi;

        /* Decimal ptrdiff_t-sized */
        rc = xxsscanf("42", "%td", &pdi);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(pdi == 42);
}

PCUT_TEST(dec_int_hexdigit)
{
        int rc;
        int i;

        /* Decimal integer followed by hexadecimal digit */
        rc = xxsscanf("42a", "%d", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 42);
}

PCUT_TEST(int_noprefix)
{
        int rc;
        int i;

        /* Decimal integer - detect no prefix */
        rc = xxsscanf("42", "%i", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 42);
}

PCUT_TEST(octal_decimal_digit)
{
        int rc;
        int i;

        /* Prefixed octal integer followed by decimal digit */
        rc = xxsscanf("019", "%i", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 1);
}

PCUT_TEST(hex_other_char)
{
        int rc;
        int i;

        /* Prefixed hexadecimal integer followed by other character */
        rc = xxsscanf("0xag", "%i", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 10);
}

PCUT_TEST(positive_dec)
{
        int rc;
        int i;

        /* Decimal integer with '+' sign */
        rc = xxsscanf("+42", "%d", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 42);
}

PCUT_TEST(negative_dec)
{
        int rc;
        int i;

        /* Decimal integer with '-' sign */
        rc = xxsscanf("-42", "%d", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == -42);
}

PCUT_TEST(negative_hex)
{
        int rc;
        int i;

        /* Hexadecimal integer with prefix and '-' sign */
        rc = xxsscanf("-0xa", "%i", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == -10);
}

PCUT_TEST(dec_unsigned)
{
        int rc;
        unsigned u;

        /* Decimal unsigned integer */
        rc = xxsscanf("42", "%u", &u);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(u == 42);
}

PCUT_TEST(dec_unsigned_char)
{
        int rc;
        unsigned char uc;

        /* Decimal unsigned char */
        rc = xxsscanf("42", "%hhu", &uc);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(uc == 42);
}

PCUT_TEST(dec_unsigned_short)
{
        int rc;
        unsigned short su;

        /* Decimal unsigned short */
        rc = xxsscanf("42", "%hu", &su);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(su == 42);
}

PCUT_TEST(dec_unsigned_long)
{
        int rc;
        unsigned long lu;

        /* Decimal unsigned long */
        rc = xxsscanf("42", "%lu", &lu);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(lu == 42);
}

PCUT_TEST(dec_unsigned_long_long)
{
        int rc;
        unsigned long long llu;

        /* Decimal unsigned long long */
        rc = xxsscanf("42", "%llu", &llu);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(llu == 42);
}

PCUT_TEST(dec_unitmax)
{
        int rc;
        uintmax_t umax;

        /* Decimal uintmax_t */
        rc = xxsscanf("42", "%ju", &umax);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(umax == 42);
}

PCUT_TEST(dec_unsigned_size)
{
        int rc;
        size_t szu;

        /* Decimal size_t */
        rc = xxsscanf("42", "%zu", &szu);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(szu == 42);
}

PCUT_TEST(dec_unsigned_ptrdiff)
{
        int rc;
        ptrdiff_t pdu;

        /* Decimal ptrdiff_t-sized unsigned int*/
        rc = xxsscanf("42", "%tu", &pdu);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(pdu == 42);
}

PCUT_TEST(octal_unsigned)
{
        int rc;
        unsigned u;

        /* Octal unsigned integer */
        rc = xxsscanf("52", "%o", &u);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(u == 052);
}

PCUT_TEST(hex_unsigned)
{
        int rc;
        unsigned u;

        /* Hexadecimal unsigned integer */
        rc = xxsscanf("2a", "%x", &u);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(u == 0x2a);
}

PCUT_TEST(hex_unsigned_cap_x)
{
        int rc;
        unsigned u;

        /* Hexadecimal unsigned integer unsing alternate specifier */
        rc = xxsscanf("2a", "%X", &u);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(u == 0x2a);
}

PCUT_TEST(uppercase_hex_unsigned)
{
        int rc;
        unsigned u;

        /* Uppercase hexadecimal unsigned integer */
        rc = xxsscanf("2A", "%x", &u);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(u == 0x2a);
}

PCUT_TEST(skipws)
{
        int rc;
        int i;

        /* Skipping whitespace */
        rc = xxsscanf(" \t\n42", "%d", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 42);
}

PCUT_TEST(percentile)
{
        int rc;
        int i;

        /* Percentile conversion */
        rc = xxsscanf(" \t\n%42", "%%%d", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 42);
}

PCUT_TEST(match_spec_char)
{
        int rc;
        int i;

        /* Matching specific character */
        rc = xxsscanf("x42", "x%d", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 42);
}

PCUT_TEST(match_char_noskipws)
{
        int rc;
        int i;

        /* Matching specific character should not skip whitespace */
        rc = xxsscanf(" x42", "x%d", &i);
        PCUT_ASSERT_INT_EQUALS(0, rc);
}

PCUT_TEST(skipws_match_char)
{
        int rc;
        int i;

        /* Skipping whitespace + match specific character */
        rc = xxsscanf(" x42", "\t\nx%d", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 42);
}

PCUT_TEST(dec_sufficient_lim_width)
{
        int rc;
        int i;

        /* Decimal with limited, but sufficient width */
        rc = xxsscanf("42", "%2d", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 42);
}

PCUT_TEST(dec_smaller_width)
{
        int rc;
        int i;

        /* Decimal with limited, smaller width */
        rc = xxsscanf("42", "%1d", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 4);
}

PCUT_TEST(int_hex_limited_width)
{
        int rc;
        int i;

        /* Integer with hex prefix, format with limited, sufficient width */
        rc = xxsscanf("0x1", "%3i", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 1);
}

PCUT_TEST(int_hex_small_width)
{
        int rc;
        int i;

        /* Integer with hex prefix, format with limited, smaller width */
        rc = xxsscanf("0x1", "%2i", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 0);
}

PCUT_TEST(int_oct_limited_width)
{
        int rc;
        int i;

        /* Integer with octal prefix, format with limited, sufficient width */
        rc = xxsscanf("012", "%3i", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 012);
}

PCUT_TEST(int_oct_smaller_width)
{
        int rc;
        int i;

        /* Integer with octal prefix, format with limited, smaller width */
        rc = xxsscanf("012", "%2i", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 01);
}

PCUT_TEST(int_oct_tiny_width)
{
        int rc;
        int i;

        /* Integer with octal prefix, format with width allowing just for 0 */
        rc = xxsscanf("012", "%1i", &i);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(i == 0);
}

PCUT_TEST(pointer)
{
        int rc;
        void *ptr;

        /* Pointer */
        rc = xxsscanf("0x12341234", "%p", &ptr);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(ptr == (void *)0x12341234);
}

PCUT_TEST(single_char)
{
        int rc;
        char c;

        /* Single character */
        rc = xxsscanf("x", "%c", &c);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(c == 'x');
}

PCUT_TEST(single_ws_char)
{
        int rc;
        char c;

        /* Single whitespace character */
        rc = xxsscanf("\t", "%c", &c);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(c == '\t');
}

PCUT_TEST(chars)
{
        int rc;
        char chars[chars_size];

        /* Multiple characters */
        memset(chars, 'X', chars_size);
        rc = xxsscanf("abc", "%3c", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == 'X');
}

PCUT_TEST(fewer_chars)
{
        int rc;
        char chars[chars_size];

        /* Fewer characters than requested */
        memset(chars, 'X', chars_size);
        rc = xxsscanf("abc", "%5c", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == 'X');
}

PCUT_TEST(chars_not_found)
{
        int rc;
        char chars[chars_size];

        /* Reading characters but no found */
        memset(chars, 'X', chars_size);
        rc = xxsscanf("", "%5c", chars);
        PCUT_ASSERT_INT_EQUALS(EOF, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'X');
}

PCUT_TEST(chars_noassign)
{
        int rc;
        int n;

        /* Multiple characters with suppressed assignment */
        rc = xxsscanf("abc", "%*3c%n", &n);
        PCUT_ASSERT_INT_EQUALS(0, rc);
        PCUT_ASSERT_INT_EQUALS(3, n);
}

PCUT_TEST(chars_malloc)
{
        int rc;
        char *cp;

        /* Multiple characters with memory allocation */
        cp = NULL;
        rc = xxsscanf("abc", "%m3c", &cp);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_NOT_NULL(cp);
        PCUT_ASSERT_TRUE(cp[0] == 'a');
        PCUT_ASSERT_TRUE(cp[1] == 'b');
        PCUT_ASSERT_TRUE(cp[2] == 'c');
        free(cp);
}

PCUT_TEST(str)
{
        int rc;
        char chars[chars_size];

        /* String of non-whitespace characters, unlimited width */
        memset(chars, 'X', chars_size);
        rc = xxsscanf(" abc d", "%s", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == '\0');
        PCUT_ASSERT_TRUE(chars[4] == 'X');
}

PCUT_TEST(str_till_end)
{
        int rc;
        char chars[chars_size];

        /* String of non-whitespace characters, until the end */
        memset(chars, 'X', chars_size);
        rc = xxsscanf(" abc", "%s", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == '\0');
        PCUT_ASSERT_TRUE(chars[4] == 'X');
}

PCUT_TEST(str_large_width)
{
        int rc;
        char chars[chars_size];

        /* String of non-whitespace characters, large enough width */
        memset(chars, 'X', chars_size);
        rc = xxsscanf(" abc d", "%5s", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == '\0');
        PCUT_ASSERT_TRUE(chars[4] == 'X');
}

PCUT_TEST(str_not_found)
{
        int rc;
        char chars[chars_size];

        /* Want string of non-whitespace, but got only whitespace */
        memset(chars, 'X', chars_size);
        rc = xxsscanf(" ", "%s", chars);
        PCUT_ASSERT_INT_EQUALS(EOF, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'X');
}

PCUT_TEST(str_small_width)
{
        int rc;
        char chars[chars_size];

        /* String of non-whitespace characters, small width */
        memset(chars, 'X', chars_size);
        rc = xxsscanf(" abc", "%2s", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == '\0');
        PCUT_ASSERT_TRUE(chars[3] == 'X');
}

PCUT_TEST(str_noassign)
{
        int rc;
        int n;

        /* String of non-whitespace characters, assignment suppression */
        rc = xxsscanf(" abc d", "%*s%n", &n);
        PCUT_ASSERT_INT_EQUALS(0, rc);
        PCUT_ASSERT_INT_EQUALS(4, n);
}

PCUT_TEST(str_malloc)
{
        int rc;
        char *cp;

        /* String of non-whitespace characters, memory allocation */
        rc = xxsscanf(" abc d", "%ms", &cp);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_NOT_NULL(cp);
        PCUT_ASSERT_TRUE(cp[0] == 'a');
        PCUT_ASSERT_TRUE(cp[1] == 'b');
        PCUT_ASSERT_TRUE(cp[2] == 'c');
        PCUT_ASSERT_TRUE(cp[3] == '\0');
        free(cp);
}

PCUT_TEST(set_convert)
{
        int rc;
        char chars[chars_size];
        int i;

        /* Set conversion without width specified terminating before the end  */
        memset(chars, 'X', chars_size);
        rc = xxsscanf("abcd42", "%[abc]d%d", chars, &i);
        PCUT_ASSERT_INT_EQUALS(2, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == '\0');
        PCUT_ASSERT_TRUE(chars[4] == 'X');
        PCUT_ASSERT_TRUE(i == 42);
}

PCUT_TEST(set_till_end)
{
        int rc;
        char chars[chars_size];

        /* Set conversion without width specified, until the end */
        memset(chars, 'X', chars_size);
        rc = xxsscanf("abc", "%[abc]", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == '\0');
        PCUT_ASSERT_TRUE(chars[4] == 'X');
}

PCUT_TEST(set_large_width)
{
        int rc;
        char chars[chars_size];

        /* Set conversion with larger width */
        memset(chars, 'X', chars_size);
        rc = xxsscanf("abcd", "%5[abc]", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == '\0');
        PCUT_ASSERT_TRUE(chars[4] == 'X');
}

PCUT_TEST(set_small_width)
{
        int rc;
        char chars[chars_size];

        /* Set conversion with smaller width */
        memset(chars, 'X', chars_size);
        rc = xxsscanf("abcd", "%3[abcd]", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == '\0');
        PCUT_ASSERT_TRUE(chars[4] == 'X');
}

PCUT_TEST(set_negated)
{
        int rc;
        char chars[chars_size];

        /* Set conversion with negated scanset */
        memset(chars, 'X', chars_size);
        rc = xxsscanf("abcd", "%[^d]", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == '\0');
        PCUT_ASSERT_TRUE(chars[4] == 'X');
}

PCUT_TEST(set_with_rbr)
{
        int rc;
        char chars[chars_size];

        /* Set conversion with ']' in scanset */
        memset(chars, 'X', chars_size);
        rc = xxsscanf("]bcd", "%[]bc]", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == ']');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == '\0');
        PCUT_ASSERT_TRUE(chars[4] == 'X');
}

PCUT_TEST(set_inverted_with_rbr)
{
        int rc;
        char chars[chars_size];

        /* Set conversion with ']' in inverted scanset */
        memset(chars, 'X', chars_size);
        rc = xxsscanf("abc]", "%[^]def]", chars);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == '\0');
        PCUT_ASSERT_TRUE(chars[4] == 'X');
}

PCUT_TEST(set_noassign)
{
        int rc;
        int n;

        /* Set conversion with assignment suppression */
        rc = xxsscanf("abcd42", "%*[abc]%n", &n);
        PCUT_ASSERT_INT_EQUALS(0, rc);
        PCUT_ASSERT_INT_EQUALS(3, n);
}

PCUT_TEST(set_malloc)
{
        int rc;
        char *cp;

        /* Set conversion with memory allocation */
        cp = NULL;
        rc = xxsscanf("abcd42", "%m[abcd]", &cp);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_NOT_NULL(cp);
        PCUT_ASSERT_TRUE(cp[0] == 'a');
        PCUT_ASSERT_TRUE(cp[1] == 'b');
        PCUT_ASSERT_TRUE(cp[2] == 'c');
        PCUT_ASSERT_TRUE(cp[3] == 'd');
        PCUT_ASSERT_TRUE(cp[4] == '\0');
        free(cp);
}

PCUT_TEST(dec_int_noassign)
{
        int rc;
        int n;

        /* Decimal integer with suppressed assignment */
        rc = xxsscanf("42", "%*d%n", &n);
        PCUT_ASSERT_INT_EQUALS(0, rc);
        PCUT_ASSERT_INT_EQUALS(2, n);
}

PCUT_TEST(count_chars)
{
        int rc;
        char chars[chars_size];
        int n;

        /* Count of characters read */
        memset(chars, 'X', chars_size);
        rc = xxsscanf("abcd", "%3c%n", chars, &n);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(chars[0] == 'a');
        PCUT_ASSERT_TRUE(chars[1] == 'b');
        PCUT_ASSERT_TRUE(chars[2] == 'c');
        PCUT_ASSERT_TRUE(chars[3] == 'X');
        PCUT_ASSERT_INT_EQUALS(3, n);
}

PCUT_TEST(float_intpart_only)
{
        int rc;
        float f;

        /* Float with just integer part */
        rc = xxsscanf("42", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 42.0);
}

PCUT_TEST(double_intpart_only)
{
        int rc;
        double d;

        /* Double with just integer part */
        rc = xxsscanf("42", "%lf", &d);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(d == 42.0);
}

PCUT_TEST(ldouble_intpart_only)
{
        int rc;
        long double ld;

        /* Long double with just integer part */
        rc = xxsscanf("42", "%Lf", &ld);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(ld == 42.0);
}

PCUT_TEST(float_hex_intpart_only)
{
        int rc;
        float f;

        /* Float with just hexadecimal integer part */
        rc = xxsscanf("0x2a", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 0x2a.0p0);
}

PCUT_TEST(float_sign_intpart)
{
        int rc;
        float f;

        /* Float with sign and integer part */
        rc = xxsscanf("-42", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == -42.0);
}

PCUT_TEST(float_intpart_fract)
{
        int rc;
        float f;

        /* Float with integer and fractional part */
        rc = xxsscanf("4.2", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        /* 1/10 is not exactly representable in binary floating point */
        PCUT_ASSERT_TRUE(f > 4.199);
        PCUT_ASSERT_TRUE(f < 4.201);
}

PCUT_TEST(float_intpart_exp)
{
        int rc;
        float f;

        /* Float with integer part and unsigned exponent */
        rc = xxsscanf("42e1", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 420.0);
}

PCUT_TEST(float_intpart_posexp)
{
        int rc;
        float f;

        /* Float with integer part and positive exponent */
        rc = xxsscanf("42e+1", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 420.0);
}

PCUT_TEST(float_intpart_negexp)
{
        int rc;
        float f;

        /* Float with integer part and negative exponent */
        rc = xxsscanf("42e-1", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        /* 1/10 is not exactly representable in binary floating point */
        PCUT_ASSERT_TRUE(f > 4.199);
        PCUT_ASSERT_TRUE(f < 4.201);
}

PCUT_TEST(float_intpart_fract_exp)
{
        int rc;
        float f;

        /* Float with integer, fractional parts and unsigned exponent */
        rc = xxsscanf("4.2e1", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 42.0);
}

PCUT_TEST(hexfloat_intpart_fract)
{
        int rc;
        float f;

        /* Hexadecimal float with integer and fractional part */
        rc = xxsscanf("0x2.a", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 0x2.ap0);
}

PCUT_TEST(hexfloat_intpart_exp)
{
        int rc;
        float f;

        /*
         * Hexadecimal float with integer part and unsigned exponent
         */
        rc = xxsscanf("0x2ap1", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 0x2ap1);
}

PCUT_TEST(hexfloat_intpart_negexp)
{
        int rc;
        float f;

        /*
         * Hexadecimal float with integer part and negative exponent
         */
        rc = xxsscanf("0x2ap-1", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 0x2ap-1);
}

PCUT_TEST(hexfloat_intpart_fract_exp)
{
        int rc;
        float f;

        /*
         * Hexadecimal float with integer, fractional parts and unsigned
         * exponent
         */
        rc = xxsscanf("0x2.ap4", "%f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 0x2.ap4);
}

PCUT_TEST(float_intpart_limwidth)
{
        int rc;
        float f;

        /* Float with just integer part and limited width */
        rc = xxsscanf("1234", "%3f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 123.0);
}

PCUT_TEST(float_intpart_fract_limwidth)
{
        int rc;
        float f;

        /* Float with integer, fractional part and limited width */
        rc = xxsscanf("12.34", "%4f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        /* 1/10 is not exactly representable in binary floating point */
        PCUT_ASSERT_TRUE(f > 12.29);
        PCUT_ASSERT_TRUE(f < 12.31);
}

PCUT_TEST(float_width_for_only_intpart)
{
        int rc;
        float f;

        /* Float with width only enough to cover an integral part */
        rc = xxsscanf("12.34", "%3f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 12.0);
}

PCUT_TEST(float_width_small_for_expnum)
{
        int rc;
        float f;

        /* Float with width too small to cover the exponent number */
        rc = xxsscanf("12.34e+2", "%7f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        /* 1/10 is not exactly representable in binary floating point */
        PCUT_ASSERT_TRUE(f > 12.339);
        PCUT_ASSERT_TRUE(f < 12.341);
}

PCUT_TEST(float_width_small_for_expsignum)
{
        int rc;
        float f;

        /* Float with width too small to cover the exponent sign and number */
        rc = xxsscanf("12.34e+2", "%6f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        /* 1/10 is not exactly representable in binary floating point */
        PCUT_ASSERT_TRUE(f > 12.339);
        PCUT_ASSERT_TRUE(f < 12.341);
}

PCUT_TEST(float_width_small_for_exp)
{
        int rc;
        float f;

        /* Float with width too small to cover the exponent part */
        rc = xxsscanf("12.34e+2", "%5f", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        /* 1/10 is not exactly representable in binary floating point */
        PCUT_ASSERT_TRUE(f > 12.339);
        PCUT_ASSERT_TRUE(f < 12.341);
}

PCUT_TEST(float_cap_f)
{
        int rc;
        float f;

        /* Float using alternate form 'F' */
        rc = xxsscanf("42e1", "%F", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 420.0);
}

PCUT_TEST(float_a)
{
        int rc;
        float f;

        /* Float using alternate form 'a' */
        rc = xxsscanf("42e1", "%a", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 420.0);
}

PCUT_TEST(float_e)
{
        int rc;
        float f;

        /* Float using alternate form 'e' */
        rc = xxsscanf("42e1", "%e", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 420.0);
}

PCUT_TEST(float_g)
{
        int rc;
        float f;

        /* Float using alternate form 'g' */
        rc = xxsscanf("42e1", "%g", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 420.0);
}

PCUT_TEST(float_cap_a)
{
        int rc;
        float f;

        /* Float using alternate form 'A' */
        rc = xxsscanf("42e1", "%A", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 420.0);
}

PCUT_TEST(float_cap_e)
{
        int rc;
        float f;

        /* Float using alternate form 'E' */
        rc = xxsscanf("42e1", "%E", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 420.0);
}

PCUT_TEST(float_cap_g)
{
        int rc;
        float f;

        /* Float using alternate form 'G' */
        rc = xxsscanf("42e1", "%G", &f);
        PCUT_ASSERT_INT_EQUALS(1, rc);
        PCUT_ASSERT_TRUE(f == 420.0);
}

PCUT_EXPORT(scanf);