#ifndef _S390_SWAB_H
#define _S390_SWAB_H

/*
 *  S390 version
 *    Copyright IBM Corp. 1999
 *    Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com)
 */

#include <linux/types.h>

#ifndef __s390x__
# define __SWAB_64_THRU_32__
#endif

#ifdef __s390x__
static __inline__ __u64 __arch_swab64p(const __u64 *x)
{
	__u64 result;

	__asm__ volatile("lrvg %0,%1" : "=d" (result) : "m" (*x));
	return result;
}
#define __arch_swab64p __arch_swab64p

static __inline__ __u64 __arch_swab64(__u64 x)
{
	__u64 result;

	__asm__ volatile("lrvgr %0,%1" : "=d" (result) : "d" (x));
	return result;
}
#define __arch_swab64 __arch_swab64

static __inline__ void __arch_swab64s(__u64 *x)
{
	*x = __arch_swab64p(x);
}
#define __arch_swab64s __arch_swab64s
#endif /* __s390x__ */

static __inline__ __u32 __arch_swab32p(const __u32 *x)
{
	__u32 result;
	
	__asm__ volatile(
#ifndef __s390x__
		"	icm	%0,8,%O1+3(%R1)\n"
		"	icm	%0,4,%O1+2(%R1)\n"
		"	icm	%0,2,%O1+1(%R1)\n"
		"	ic	%0,%1"
		: "=&d" (result) : "Q" (*x) : "cc");
#else /* __s390x__ */
		"	lrv	%0,%1"
		: "=d" (result) : "m" (*x));
#endif /* __s390x__ */
	return result;
}
#define __arch_swab32p __arch_swab32p

#ifdef __s390x__
static __inline__ __u32 __arch_swab32(__u32 x)
{
	__u32 result;
	
	__asm__ volatile("lrvr  %0,%1" : "=d" (result) : "d" (x));
	return result;
}
#define __arch_swab32 __arch_swab32
#endif /* __s390x__ */

static __inline__ __u16 __arch_swab16p(const __u16 *x)
{
	__u16 result;
	
	__asm__ volatile(
#ifndef __s390x__
		"	icm	%0,2,%O1+1(%R1)\n"
		"	ic	%0,%1\n"
		: "=&d" (result) : "Q" (*x) : "cc");
#else /* __s390x__ */
		"	lrvh	%0,%1"
		: "=d" (result) : "m" (*x));
#endif /* __s390x__ */
	return result;
}
#define __arch_swab16p __arch_swab16p

#endif /* _S390_SWAB_H */
