/*	$OpenBSD: unalign.c,v 1.2 2008/07/26 10:25:04 miod Exp $	*/
/* Written by Miod Vallat, 2004 AD -- this file is in the public domain */

/*
 * This test checks for the ability, for 32 bit systems, to correctly
 * access a long long (64 bit) value aligned on a 32 bit boundary, but not
 * on a 64 bit boundary.
 *
 * All architectures should pass this test; on m88k this requires assistance
 * from the kernel to recover from the misaligned operand exception: see
 * double_reg_fixup() in arch/m88k/m88k/trap.c for details.
 */

#include <stdio.h>
#include <sys/types.h>

uint32_t array[5];

int
unalign_read(uint64_t *addr)
{
	uint64_t t;

	t = *addr;
#if BYTE_ORDER == BIG_ENDIAN
	if (t != 0x13579aceffffabcdULL)
#else
	if (t != 0xffffabcd13579aceULL)
#endif
		return (1);

	return (0);
}

void
unalign_write(uint64_t *addr)
{
	uint64_t t;

	t = 0xdeadbeaffadebabeULL;
	*addr = t;
}

int
main(int argc, char *argv[])
{
#if !defined(__LP64__)
	uint32_t *addr = array;

	/* align on a 64 bit boundary */
	if (((uint32_t)addr & 7) != 0)
		addr++;

	addr[0] = 0x12345678;
	addr[1] = 0x13579ace;
	addr[2] = 0xffffabcd;
	addr[3] = 0x2468fedc;

	if (unalign_read((uint64_t *)(addr + 1)))
		return (1);

	unalign_write((uint64_t *)(addr + 1));

#if BYTE_ORDER == BIG_ENDIAN
	if (addr[1] != 0xdeadbeaf || addr[2] != 0xfadebabe)
#else
	if (addr[1] != 0xfadebabe || addr[2] != 0xdeadbeaf)
#endif
		return (1);
#endif	/* __LP64__ */

	return (0);
}