NetBSD/lib/libc/net/htonl.c

/*	$NetBSD: htonl.c,v 1.6 1996/05/29 23:23:27 cgd Exp $	*/

/*
 * Written by J.T. Conklin <jtc@netbsd.org>.
 * Public domain.
 */

#if defined(LIBC_SCCS) && !defined(lint)
static char *rcsid = "$NetBSD: htonl.c,v 1.6 1996/05/29 23:23:27 cgd Exp $";
#endif

#include <sys/types.h>
#include <machine/endian.h>

#undef htonl

unsigned long
htonl(x)
	unsigned long x;
{
	u_int32_t y = x;

#if BYTE_ORDER == LITTLE_ENDIAN
	u_char *s = (u_char *)&y;
	return (u_int32_t)(s[0] << 24 | s[1] << 16 | s[2] << 8 | s[3]);
#else
	return y;
#endif
}