gentoo-x86/eclass/portability.eclass

# Copyright 1999-2005 Gentoo Foundation
# Distributed under the terms of the GNU General Public License v2
# $Header: /var/cvsroot/gentoo-x86/eclass/portability.eclass,v 1.18 2011/10/27 07:16:08 vapier Exp $
#
# Author: Diego Pettenò <flameeyes@gentoo.org>
#
# This eclass is created to avoid using non-portable GNUisms inside ebuilds
#
# NB:  If you add anything, please comment it!

# treecopy orig1 orig2 orig3 .... dest
#
# mimic cp --parents copy, but working on BSD userland as well
treecopy() {
        dest=${!#}
        files_count=$#

        while(( $# > 1 )); do
                dirstruct=$(dirname "$1")
                mkdir -p "${dest}/${dirstruct}"
                cp -pPR "$1" "${dest}/${dirstruct}"

                shift
        done
}

# seq min max
#
# compatibility function that mimes seq command if not available
seq() {
        # First try `seq`
        local p=$(type -P seq)
        if [[ -n ${p} ]] ; then
                "${p}" "$@"
                return $?
        fi

        case $# in
                1) min=1  max=$1 step=1  ;;
                2) min=$1 max=$2 step=1  ;;
                3) min=$1 max=$3 step=$2 ;;
                *) die "seq called with wrong number of arguments" ;;
        esac

        # Then try `jot`
        p=$(type -P jot)
        if [[ -n ${p} ]] ; then
                local reps
                # BSD userland
                if [[ ${step} != 0 ]] ; then
                        reps=$(( (max - min) / step + 1 ))
                else
                        reps=0
                fi

                jot $reps $min $max $step
                return $?
        fi

        # Screw it, do the output ourselves
        while :; do
                [[ $max < $min && $step > 0 ]] && break
                [[ $min < $max && $step < 0 ]] && break
                echo $min
                : $(( min += step ))
        done
        return 0
}

# Gets the linker flag to link to dlopen() function
dlopen_lib() {
        # - Solaris needs nothing
        # - Darwin needs nothing
        # - *BSD needs nothing
        # - Linux needs -ldl (glibc and uclibc)
        # - Interix needs -ldl
        case "${CHOST}" in
                *-linux-gnu*|*-linux-uclibc|*-interix*)
                        echo "-ldl"
                ;;
        esac
}

# Gets the name of the BSD-ish make command (pmake from NetBSD)
#
# This will return make (provided by system packages) for BSD userlands,
# or bsdmake for Darwin userlands and pmake for the rest of userlands,
# both of which are provided by sys-devel/pmake package.
#
# Note: the bsdmake for Darwin userland is with compatibility with MacOSX
# default name.
get_bmake() {
        if [[ ${USERLAND} == *BSD ]]; then
                echo make
        elif [[ ${USERLAND} == "Darwin" ]]; then
                echo bsdmake
        else
                echo pmake
        fi
}

# Portable method of getting mount names and points.
# Returns as "point node fs options"
# Remember to convert 040 back to a space.
get_mounts() {
        local point= node= fs= opts= foo=

        # Linux has /proc/mounts which should always exist
        if [[ $(uname -s) == "Linux" ]] ; then
                while read node point fs opts foo ; do
                        echo "${point} ${node} ${fs} ${opts}"
                done < /proc/mounts
                return
        fi

        # OK, pray we have a -p option that outputs mounts in fstab format
        # using tabs as the seperator.
        # Then pray that there are no tabs in the either.
        # Currently only FreeBSD supports this and the other BSDs will
        # have to be patched.
        # Athough the BSD's may support /proc, they do NOT put \040 in place
        # of the spaces and we should not force a /proc either.
        local IFS=$'\t'
        LC_ALL=C mount -p | while read node point fs foo ; do
                opts=${fs#* }
                fs=${fs%% *}
                echo "${point// /\040} ${node// /\040} ${fs%% *} ${opts// /\040}"
        done
}

_dead_portability_user_funcs() { die "if you really need this, please file a bug for base-system@gentoo.org"; }
egethome() { _dead_portability_user_funcs; }
egetshell() { _dead_portability_user_funcs; }
is-login-disabled() { _dead_portability_user_funcs; }
1	# Copyright 1999-2005 Gentoo Foundation
2	# Distributed under the terms of the GNU General Public License v2
3	# $Header: /var/cvsroot/gentoo-x86/eclass/portability.eclass,v 1.18 2011/10/27 07:16:08 vapier Exp $
4	#
5	# Author: Diego Pettenò <flameeyes@gentoo.org>
6	#
7	# This eclass is created to avoid using non-portable GNUisms inside ebuilds
8	#
9	# NB: If you add anything, please comment it!
10
11	# treecopy orig1 orig2 orig3 .... dest
12	#
13	# mimic cp --parents copy, but working on BSD userland as well
14	treecopy() {
15	dest=${!#}
16	files_count=$#
17
18	while(( $# > 1 )); do
19	dirstruct=$(dirname "$1")
20	mkdir -p "${dest}/${dirstruct}"
21	cp -pPR "$1" "${dest}/${dirstruct}"
22
23	shift
24	done
25	}
26
27	# seq min max
28	#
29	# compatibility function that mimes seq command if not available
30	seq() {
31	# First try `seq`
32	local p=$(type -P seq)
33	if [[ -n ${p} ]] ; then
34	"${p}" "$@"
35	return $?
36	fi
37
38	case $# in
39	1) min=1 max=$1 step=1 ;;
40	2) min=$1 max=$2 step=1 ;;
41	3) min=$1 max=$3 step=$2 ;;
42	*) die "seq called with wrong number of arguments" ;;
43	esac
44
45	# Then try `jot`
46	p=$(type -P jot)
47	if [[ -n ${p} ]] ; then
48	local reps
49	# BSD userland
50	if [[ ${step} != 0 ]] ; then
51	reps=$(( (max - min) / step + 1 ))
52	else
53	reps=0
54	fi
55
56	jot $reps $min $max $step
57	return $?
58	fi
59
60	# Screw it, do the output ourselves
61	while :; do
62	[[ $max < $min && $step > 0 ]] && break
63	[[ $min < $max && $step < 0 ]] && break
64	echo $min
65	: $(( min += step ))
66	done
67	return 0
68	}
69
70	# Gets the linker flag to link to dlopen() function
71	dlopen_lib() {
72	# - Solaris needs nothing
73	# - Darwin needs nothing
74	# - *BSD needs nothing
75	# - Linux needs -ldl (glibc and uclibc)
76	# - Interix needs -ldl
77	case "${CHOST}" in
78	-linux-gnu\|-linux-uclibc\|-interix*)
79	echo "-ldl"
80	;;
81	esac
82	}
83
84	# Gets the name of the BSD-ish make command (pmake from NetBSD)
85	#
86	# This will return make (provided by system packages) for BSD userlands,
87	# or bsdmake for Darwin userlands and pmake for the rest of userlands,
88	# both of which are provided by sys-devel/pmake package.
89	#
90	# Note: the bsdmake for Darwin userland is with compatibility with MacOSX
91	# default name.
92	get_bmake() {
93	if [[ ${USERLAND} == *BSD ]]; then
94	echo make
95	elif [[ ${USERLAND} == "Darwin" ]]; then
96	echo bsdmake
97	else
98	echo pmake
99	fi
100	}
101
102	# Portable method of getting mount names and points.
103	# Returns as "point node fs options"
104	# Remember to convert 040 back to a space.
105	get_mounts() {
106	local point= node= fs= opts= foo=
107
108	# Linux has /proc/mounts which should always exist
109	if [[ $(uname -s) == "Linux" ]] ; then
110	while read node point fs opts foo ; do
111	echo "${point} ${node} ${fs} ${opts}"
112	done < /proc/mounts
113	return
114	fi
115
116	# OK, pray we have a -p option that outputs mounts in fstab format
117	# using tabs as the seperator.
118	# Then pray that there are no tabs in the either.
119	# Currently only FreeBSD supports this and the other BSDs will
120	# have to be patched.
121	# Athough the BSD's may support /proc, they do NOT put \040 in place
122	# of the spaces and we should not force a /proc either.
123	local IFS=$'\t'
124	LC_ALL=C mount -p \| while read node point fs foo ; do
125	opts=${fs#* }
126	fs=${fs%% *}
127	echo "${point// /\040} ${node// /\040} ${fs%% *} ${opts// /\040}"
128	done
129	}
130
131	_dead_portability_user_funcs() { die "if you really need this, please file a bug for base-system@gentoo.org"; }
132	egethome() { _dead_portability_user_funcs; }
133	egetshell() { _dead_portability_user_funcs; }
134	is-login-disabled() { _dead_portability_user_funcs; }