NetBSD/sys/lib/libkern/htonl.c
1995-10-07 09:26:14 +00:00

30 lines
530 B
C

/* $NetBSD: htonl.c,v 1.6 1995/10/07 09:26:26 mycroft 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 1995/10/07 09:26:26 mycroft 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 s[0] << 24 | s[1] << 16 | s[2] << 8 | s[3];
#else
return y;
#endif
}