illumos gate

#include <stdio.h>

#include <rpc/xdr.h>

#include <sys/types.h>

#include <err.h>

#include <string.h>

#include <stdlib.h>

/* XDR stream genereated on Solaris 10 sparc, and validated on Solaris 10 x86 */

static uchar_t test_data[] = {

    0x40, 0xc8, 0x1c, 0xd6, 0xe6, 0x31, 0xf8, 0xa1, 0x49, 0x09, 0xe0, 0x23 

};

static double expected_d = 12345.6789;

static float expected_f = 564738.201928;

void

print_float(float f)

{

	uint32_t *p = (uint32_t *)&f;

	printf("f = %f\n", f);

	printf("    %a\n", f);

	printf("    0x%08x\n", *p);

}

void

print_double(double d)

{

	uint64_t *p = (uint64_t *)&d;

	printf("d = %f\n", d);

	printf("    %a\n", d);

	printf("    0x%016llx\n", *p);

}

int

main(int argc, char **argv)

{

	uchar_t testbuf[sizeof (test_data)];

	XDR xdr;

	double d = 42.42;

	float f = 42.42;

	xdrmem_create(&xdr, (caddr_t)&test_data, sizeof (test_data),

	    XDR_DECODE);

	if (xdr_double(&xdr, &d) == FALSE)

		errx(EXIT_FAILURE, "Unable to convert double value");

	if (xdr_float(&xdr, &f) == FALSE)

		errx(EXIT_FAILURE, "Unable to convert float value");

	(void) printf("Expected value:\n");

	print_double(expected_d);

	(void) printf("Actual value:\n");

	print_double(d);

	(void) printf("%s\n", (d == expected_d) ? "PASS" : "FAIL");

	(void) printf("Expected value:\n");

	print_float(expected_f);

	(void) printf("Actual value:\n");

	print_float(f);

	(void) printf("%s\n", (f == expected_f) ? "PASS" : "FAIL");

	(void) printf("ENCODE TEST\n");

	xdrmem_create(&xdr, (caddr_t)&testbuf, sizeof (testbuf), XDR_ENCODE);

	xdr_double(&xdr, &expected_d);

	xdr_float(&xdr, &expected_f);

	if (memcmp(testbuf, test_data, sizeof (testbuf)) == 0)

		(void) printf("PASS\n");

	else

		(void) printf("FAIL\n");

	return (0);

}