/[gentoo-x86]/eclass/portability.eclass
Gentoo

Contents of /eclass/portability.eclass

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.16 - (hide annotations) (download)
Fri Sep 24 02:22:08 2010 UTC (3 years, 11 months ago) by vapier
Branch: MAIN
Changes since 1.15: +22 -7 lines
seq: dont parse args if `seq` is available, and add a shell fall back if `jot` is not available either

1 flameeyes 1.1 # Copyright 1999-2005 Gentoo Foundation
2     # Distributed under the terms of the GNU General Public License v2
3 vapier 1.16 # $Header: /var/cvsroot/gentoo-x86/eclass/portability.eclass,v 1.15 2010/02/26 18:09:43 grobian Exp $
4 flameeyes 1.1 #
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 vapier 1.16 # First try `seq`
32     local p=$(type -P seqf)
33     if [[ -n ${p} ]] ; then
34     "${p}" "$@"
35     return $?
36     fi
37 flameeyes 1.1
38     case $# in
39 vapier 1.3 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 flameeyes 1.1 esac
44    
45 vapier 1.16 # Then try `jot`
46     p=$(type -P jot)
47     if [[ -n ${p} ]] ; then
48 flameeyes 1.1 local reps
49     # BSD userland
50 vapier 1.16 if [[ ${step} != 0 ]] ; then
51     reps=$(( (max - min) / step + 1 ))
52 flameeyes 1.1 else
53     reps=0
54     fi
55    
56     jot $reps $min $max $step
57 vapier 1.16 return $?
58 flameeyes 1.1 fi
59 vapier 1.16
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 flameeyes 1.1 }
69    
70     # Gets the linker flag to link to dlopen() function
71     dlopen_lib() {
72 grobian 1.12 # - Solaris needs nothing
73     # - Darwin needs nothing
74     # - *BSD needs nothing
75 drizzt 1.13 # - Linux needs -ldl (glibc and uclibc)
76 grobian 1.15 # - Interix needs -ldl
77     case "${CHOST}" in
78     *-linux-gnu*|*-linux-uclibc|*-interix*)
79     echo "-ldl"
80     ;;
81     esac
82 flameeyes 1.1 }
83    
84 flameeyes 1.2 # Gets the home directory for the specified user
85     # it's a wrap around egetent as the position of the home directory in the line
86     # varies depending on the os used.
87     #
88     # To use that, inherit eutils, not portability!
89     egethome() {
90     ent=$(egetent passwd $1)
91    
92 flameeyes 1.5 case ${CHOST} in
93     *-darwin*|*-freebsd*|*-dragonfly*)
94     # Darwin, OSX, FreeBSD and DragonFly use position 9 to store homedir
95 flameeyes 1.8 echo ${ent} | cut -d: -f9
96 flameeyes 1.6 ;;
97 flameeyes 1.5 *)
98     # Linux, NetBSD and OpenBSD use position 6 instead
99 flameeyes 1.8 echo ${ent} | cut -d: -f6
100 flameeyes 1.6 ;;
101 flameeyes 1.5 esac
102 flameeyes 1.2 }
103 flameeyes 1.4
104 flameeyes 1.7 # Gets the shell for the specified user
105     # it's a wrap around egetent as the position of the home directory in the line
106     # varies depending on the os used.
107     #
108     # To use that, inherit eutils, not portability!
109     egetshell() {
110     ent=$(egetent passwd "$1")
111    
112     case ${CHOST} in
113     *-darwin*|*-freebsd*|*-dragonfly*)
114     # Darwin, OSX, FreeBSD and DragonFly use position 9 to store homedir
115 flameeyes 1.8 echo ${ent} | cut -d: -f10
116 flameeyes 1.7 ;;
117     *)
118     # Linux, NetBSD and OpenBSD use position 6 instead
119 flameeyes 1.8 echo ${ent} cut -d: -f7
120 flameeyes 1.7 ;;
121     esac
122     }
123    
124     # Returns true if specified user has a shell that precludes logins
125     # on whichever operating system.
126     is-login-disabled() {
127     shell=$(egetshell "$1")
128    
129     case ${shell} in
130     /bin/false|/usr/bin/false|/sbin/nologin|/usr/sbin/nologin)
131     return 0 ;;
132     *)
133     return 1 ;;
134     esac
135     }
136    
137 flameeyes 1.4 # Gets the name of the BSD-ish make command (pmake from NetBSD)
138     #
139     # This will return make (provided by system packages) for BSD userlands,
140     # or bsdmake for Darwin userlands and pmake for the rest of userlands,
141     # both of which are provided by sys-devel/pmake package.
142     #
143     # Note: the bsdmake for Darwin userland is with compatibility with MacOSX
144     # default name.
145     get_bmake() {
146     if [[ ${USERLAND} == *BSD ]]; then
147     echo make
148     elif [[ ${USERLAND} == "Darwin" ]]; then
149     echo bsdmake
150     else
151     echo pmake
152     fi
153     }
154 uberlord 1.9
155     # Portable method of getting mount names and points.
156 uberlord 1.10 # Returns as "point node fs options"
157 uberlord 1.9 # Remember to convert 040 back to a space.
158     get_mounts() {
159 uberlord 1.10 local point= node= fs= opts= foo=
160 uberlord 1.9
161     # Linux has /proc/mounts which should always exist
162     if [[ $(uname -s) == "Linux" ]] ; then
163 uberlord 1.10 while read node point fs opts foo ; do
164 swegener 1.11 echo "${point} ${node} ${fs} ${opts}"
165 uberlord 1.9 done < /proc/mounts
166 swegener 1.11 return
167 uberlord 1.9 fi
168    
169     # OK, pray we have a -p option that outputs mounts in fstab format
170     # using tabs as the seperator.
171     # Then pray that there are no tabs in the either.
172     # Currently only FreeBSD supports this and the other BSDs will
173     # have to be patched.
174     # Athough the BSD's may support /proc, they do NOT put \040 in place
175     # of the spaces and we should not force a /proc either.
176     local IFS=$'\t'
177     LC_ALL=C mount -p | while read node point fs foo ; do
178 uberlord 1.10 opts=${fs#* }
179     fs=${fs%% *}
180     echo "${point// /\040} ${node// /\040} ${fs%% *} ${opts// /\040}"
181 uberlord 1.9 done
182     }

  ViewVC Help
Powered by ViewVC 1.1.20