Contents of /multiarch-utils/trunk/multiarch-platform

#!/bin/sh
arch=`uname -m`
`perl -e '$le   = unpack("h*", pack("s", 1)) =~ /^1/; exit $le;'`
le=$?
case $arch in
i?86) arch=i386;;
mips*) [ $le -eq 1 ] && arch="$arch"el ;;
arm*) [ $le -eq 0 ] && arch="armeb" || arch="arm" ;;
esac
os=`uname -s`
case $os in
Linux*) os=linux;;
esac
echo multiarch-$arch-$os
1	#!/bin/sh
2	arch=`uname -m`
3	`perl -e '$le = unpack("h*", pack("s", 1)) =~ /^1/; exit $le;'`
4	le=$?
5	case $arch in
6	i?86) arch=i386;;
7	mips*) [ $le -eq 1 ] && arch="$arch"el ;;
8	arm*) [ $le -eq 0 ] && arch="armeb" \|\| arch="arm" ;;
9	esac
10	os=`uname -s`
11	case $os in
12	Linux*) os=linux;;
13	esac
14	echo multiarch-$arch-$os