blob: 800a114046316355efbbf753accf57f638e7ba46 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
|
# Copyright 1999-2011 Gentoo Foundation
# Distributed under the terms of the GNU General Public License v2
# $Header: /var/cvsroot/gentoo-x86/eclass/portability.eclass,v 1.24 2012/01/04 05:57:19 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!
if [[ ${___ECLASS_ONCE_PORTABILITY} != "recur -_+^+_- spank" ]] ; then
___ECLASS_ONCE_PORTABILITY="recur -_+^+_- spank"
# treecopy orig1 orig2 orig3 .... dest
#
# mimic cp --parents copy, but working on BSD userland as well
treecopy() {
local dest=${!#}
local files_count=$#
while (( $# > 1 )); do
local 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
local min max step
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"; }
is-login-disabled() { _dead_portability_user_funcs; }
fi
|
GitWeb