--- /dev/null
+/*!\file sys/swap.h
+ * Swapping of short/long values.
+ */
+
+#ifndef __SYS_SWAP_BYTES_H
+#define __SYS_SWAP_BYTES_H
+
+#ifndef __SYS_W32API_H
+#include <sys/w32api.h>
+#endif
+
+#ifndef __SYS_CDEFS_H
+#include <sys/cdefs.h>
+#endif
+
+#ifndef __NETINET_IN_H
+#include <netinet/in.h>
+#endif
+
+#if defined(__dj_include_netinet_in_h_)
+#error "You are using the wrong version of <netinet/in.h>. Ref. point 10 of the INSTALL file"
+#endif
+
+
+__BEGIN_DECLS
+
+#if defined(WIN32) || defined(_WIN32) /* provide some real versions too */
+ W32_FUNC unsigned short W32_CALL ntohs (unsigned short);
+ W32_FUNC unsigned short W32_CALL htons (unsigned short);
+ W32_FUNC unsigned long W32_CALL ntohl (unsigned long);
+ W32_FUNC unsigned long W32_CALL htonl (unsigned long);
+ W32_FUNC unsigned long cdecl _w32_intel (unsigned long x);
+ W32_FUNC unsigned short cdecl _w32_intel16 (unsigned short x);
+#endif
+
+#undef ntohs
+#undef htons
+#undef ntohl
+#undef htonl
+#define ntohs(x) intel16(x)
+#define htons(x) intel16(x)
+#define ntohl(x) intel(x)
+#define htonl(x) intel(x)
+
+
+/*
+ * Hard to believe, but someone uses Watt-32 on a
+ * Motorola/PowerPC embedded target.
+ */
+#if defined(BIG_ENDIAN_MACHINE) || defined(USE_BIGENDIAN)
+ #define intel(x) x
+ #define intel16(x) x
+
+#elif defined(__GNUC__) && !defined(__NO_INLINE__) /* -O0 */
+ #define intel(x) __ntohl(x)
+ #define intel16(x) __ntohs(x)
+
+ /*
+ * Ripped (and adapted) from <linux/include/asm-386/byteorder.h>
+ */
+ /*@unused@*/ extern __inline__ unsigned long __ntohl (unsigned long x)
+ {
+ __asm__ __volatile (
+ "xchgb %b0, %h0\n\t" /* swap lower bytes */
+ "rorl $16, %0\n\t" /* swap words */
+ "xchgb %b0, %h0" /* swap higher bytes */
+ : "=q" (x) : "0" (x));
+ return (x);
+ }
+
+ /*@unused@*/ extern __inline__ unsigned short __ntohs (unsigned short x)
+ {
+ __asm__ __volatile__ (
+ "xchgb %b0, %h0" /* swap bytes */
+ : "=q" (x) : "0" (x));
+ return (x);
+ }
+
+#elif defined(__POCC__) /* PellesC */
+ #define intel(x) __ntohl(x)
+ #define intel16(x) __ntohs(x)
+
+ __declspec(naked) inline unsigned long __fastcall __ntohl (unsigned long x)
+ {
+ __asm xchg cl, ch /* 'x' is in ecx */
+ __asm ror ecx, 16
+ __asm xchg cl, ch
+ __asm mov eax, ecx
+ __asm ret
+ }
+
+ __declspec(naked) inline unsigned short __fastcall __ntohs (unsigned short x)
+ {
+ __asm xchg cl, ch /* 'x' is in ecx */
+ __asm movzx eax, cx
+ __asm ret
+ }
+
+#elif (defined(_MSC_VER) && (_MSC_VER >= 1200)) && /* MSVC 6+ */ \
+ !defined(__POCC__) /* "pocc -Ze" sets _MSC_VER */
+ #define intel(x) __ntohl(x)
+ #define intel16(x) __ntohs(x)
+
+ __declspec(naked) static unsigned long __ntohl (unsigned long x)
+ {
+ __asm mov eax, [esp+4]
+ __asm xchg al, ah
+ __asm ror eax, 16
+ __asm xchg al, ah
+ __asm ret
+ }
+
+ __declspec(naked) static unsigned short __ntohs (unsigned short x)
+ {
+ __asm mov ax, [esp+4]
+ __asm xchg al, ah
+ __asm ret
+ }
+
+#elif defined(__WATCOMC__) && defined(__FLAT__) /* Watcom 32-bit */
+ #define intel(x) __ntohl(x)
+ #define intel16(x) __ntohs(x)
+
+ extern unsigned long __ntohl (unsigned long x);
+ #pragma aux __ntohl = \
+ "xchg al, ah" \
+ "ror eax, 16" \
+ "xchg al, ah" \
+ parm [eax] \
+ modify [eax];
+
+ extern unsigned short __ntohs (unsigned short x);
+ #pragma aux __ntohs = \
+ "xchg al, ah" \
+ parm [ax] \
+ modify [ax];
+
+#elif defined(__WATCOMC__) && !defined(__FLAT__) /* Watcom 16-bit */
+ #define intel(x) __ntohl(x)
+ #define intel16(x) __ntohs(x)
+
+ extern unsigned long __ntohl (unsigned long x);
+ #pragma aux __ntohl = \
+ "xchg al, dh" \
+ "xchg ah, dl" \
+ parm [dx ax] \
+ modify [dx ax];
+
+ extern unsigned short __ntohs (unsigned short x);
+ #pragma aux __ntohs = \
+ "xchg al, ah" \
+ parm [ax] \
+ modify [ax];
+
+#elif (defined(__BORLANDC__) && defined(__FLAT__)) || /* bcc32 */ \
+ (defined(__DMC__) && (__INTSIZE==4)) /* dmc -mx */
+ #include <dos.h>
+
+ #define intel(x) __ntohl(x)
+ #define intel16(x) __ntohs(x)
+
+ #define __ntohs(x) (_AX = x, \
+ __emit__(0x86,0xC4), /* xchg al, ah */ \
+ _AX)
+
+ #define __ntohl(x) (_EAX = x, \
+ __emit__(0x86,0xC4), /* xchg al, ah */ \
+ __emit__(0xC1,0xC8,0x10), /* ror eax, 16 */ \
+ __emit__(0x86,0xC4), /* xchg al, ah */ \
+ _EAX)
+
+#elif defined(__CCDL__) && defined(__386__) /* LadSoft 386 */
+ #define intel(x) __ntohl(x)
+ #define intel16(x) __ntohs(x)
+
+ static unsigned long __ntohl (unsigned long x)
+ {
+ asm { mov eax, [x]
+ xchg al, ah
+ ror eax, 16
+ xchg al, ah
+ }
+ return (_EAX);
+ }
+ static unsigned short __ntohs (unsigned short x)
+ {
+ asm { mov ax, [x]
+ xchg al, ah
+ }
+ return (unsigned short)_EAX; /* doesn't have _AX */
+ }
+
+ /* This crashes mysteriously if we use _bswap()
+ */
+#elif defined(__LCC__) && 0 /* LCC-Win32 */
+ #define intel(x) __ntohl(x)
+ #define intel16(x) __ntohs(x)
+ #if 0
+ #include <intrinsics.h>
+ #define W32_LCC_INTRINSICS_INCLUDED /* header guard is missing */
+ #define __ntohl(x) (unsigned long) _bswap(x)
+ #define __ntohs(x) ((unsigned short) (_bswap(x) >> 16))
+ #else
+ unsigned long inline __declspec(naked) __ntohl (unsigned long x)
+ {
+ _asm ("movl (%esp), %eax");
+ _asm ("xchg %ah, %al");
+ _asm ("rorl $16, %eax");
+ _asm ("xchg %ah, %al");
+ }
+ unsigned short inline __declspec(naked) __ntohs (unsigned short x)
+ {
+ _asm ("movs (%esp), %ax");
+ _asm ("xchg %ah, %al");
+ }
+ #endif
+
+#else /* no inlining possible (or worth the effort) */
+ #define intel W32_NAMESPACE (intel)
+ #define intel16 W32_NAMESPACE (intel16)
+ #define WATT_NO_INLINE_INTEL
+
+ W32_FUNC unsigned long cdecl intel (unsigned long x);
+ W32_FUNC unsigned short cdecl intel16 (unsigned short x);
+#endif
+
+__END_DECLS
+
+#endif /* __SYS_SWAP_BYTES_H */
projects / oftp / blobdiff