/*
 * This file and its contents are supplied under the terms of the
 * Common Development and Distribution License ("CDDL"), version 1.0.
 * You may only use this file in accordance with the terms of version
 * 1.0 of the CDDL.
 *
 * A full copy of the text of the CDDL should have accompanied this
 * source.  A copy of the CDDL is also available via the Internet at
 * http://www.illumos.org/license/CDDL.
 */

/*
 * Copyright 2017 Joyent, Inc.
 */

/*
 * Regression test for illumos #6961. We mistakenly zeroed out a character that
 * we shouldn't have when dealing with a 64-bit libc.
 */

#include <stdio.h>
#include <string.h>
#include <strings.h>
#include <stdlib.h>

static void
print_diff(char *test, char *correct, char *wrong)
{
        int i;
        printf("test failed: received incorrect octal for case %s\n", test);
        for (i = 0; i < 32; i++) {
                printf("byte %d: expected 0x%x, found 0x%x\n", i, correct[i],
                    wrong[i]);
        }
}

int
main(void)
{
        int ret = 0;
        char buf[32];

        /* ~0L in octal */
        char octal0[32] = { 'r', 'r', 'r', 'r', '1', '7', '7', '7', '7', '7',
            '7', '7', '7', '7', '7', '7', '7', '7', '7', '7', '7', '7', '7',
            '7', '7', '7', '\0', 'r', 'r', 'r', 'r', 'r' };

        char decimal0[32] = { 'r', 'r', 'r', 'r', '-', '1', '\0', 'r', 'r', 'r',
            'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r',
            'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r' };

        char hex0[32] = { 'r', 'r', 'r', 'r', 'f', 'f', 'f', 'f', 'f', 'f',
            'f', 'f', 'f', 'f', 'f', 'f', 'f', 'f', 'f', 'f', '\0', 'r', 'r',
            'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r' };

        /* 42 in octal */
        char octal1[32] = { 'r', 'r', 'r', 'r', '5', '2', '\0', 'r', 'r', 'r',
            'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r',
            'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r' };

        /* 42 in decimal */
        char decimal1[32] = { 'r', 'r', 'r', 'r', '4', '2', '\0', 'r', 'r', 'r',
            'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r',
            'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r' };

        /* 42 in hex */
        char hex1[32] = { 'r', 'r', 'r', 'r', '2', 'a', '\0', 'r', 'r', 'r',
            'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r',
            'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r', 'r' };


        (void) memset(buf, 'r', sizeof (buf));
        (void) snprintf(buf + 4, sizeof (buf) - 4, "%lo", ~0L);
        if (bcmp(octal0, buf, sizeof (buf)) != 0) {
                print_diff("~0 in Octal", octal0, buf);
                ret++;
        }

        (void) memset(buf, 'r', sizeof (buf));
        (void) snprintf(buf + 4, sizeof (buf) - 4, "%lo", 42L);
        if (bcmp(octal1, buf, sizeof (buf)) != 0) {
                print_diff("42 in Octal", octal1, buf);
                ret++;
        }

        (void) memset(buf, 'r', sizeof (buf));
        (void) snprintf(buf + 4, sizeof (buf) - 4, "%ld", ~0L);
        if (bcmp(decimal0, buf, sizeof (buf)) != 0) {
                print_diff("~0 in Decimal", decimal0, buf);
                ret++;
        }

        (void) memset(buf, 'r', sizeof (buf));
        (void) snprintf(buf + 4, sizeof (buf) - 4, "%ld", 42L);
        if (bcmp(decimal1, buf, sizeof (buf)) != 0) {
                print_diff("42 in Decimal", decimal1, buf);
                ret++;
        }

        (void) memset(buf, 'r', sizeof (buf));
        (void) snprintf(buf + 4, sizeof (buf) - 4, "%lx", ~0L);
        if (bcmp(hex0, buf, sizeof (buf)) != 0) {
                print_diff("~0 in Hex", hex0, buf);
                ret++;
        }

        (void) memset(buf, 'r', sizeof (buf));
        (void) snprintf(buf + 4, sizeof (buf) - 4, "%lx", 42L);
        if (bcmp(hex1, buf, sizeof (buf)) != 0) {
                print_diff("42 in Hex", hex1, buf);
                ret++;
        }

        return (ret);
}