1 | # Copyright 1999-2000 Gentoo Technologies, Inc. |
1 | # Copyright 1999-2004 Gentoo Foundation |
2 | # Distributed under the terms of the GNU General Public License v2 |
2 | # Distributed under the terms of the GNU General Public License v2 |
|
|
3 | # $Header: /var/cvsroot/gentoo-x86/eclass/cvs.eclass,v 1.58 2005/07/11 15:08:06 swegener Exp $ |
|
|
4 | |
|
|
5 | # Current Maintainer: Tal Peer <coredumb@gentoo.org> |
3 | # Author Dan Armak <danarmak@gentoo.org> |
6 | # Original Author: Dan Armak <danarmak@gentoo.org> |
4 | # $Header: /var/cvsroot/gentoo-x86/eclass/cvs.eclass,v 1.27 2002/11/29 13:13:00 danarmak Exp $ |
7 | |
|
|
8 | # SSH auth code by Danny <danny.milo@gmx.net> |
|
|
9 | |
|
|
10 | # SSH password authentication support and host key verification |
|
|
11 | # support by Jeremy Maitin-Shepard <jbms@gentoo.org> |
|
|
12 | |
|
|
13 | |
5 | # This eclass provides the generic cvs fetching functions. |
14 | # This eclass provides the generic cvs fetching functions. To use |
|
|
15 | # this from an ebuild, set the `ebuild-configurable settings' as |
|
|
16 | # specified below in your ebuild before inheriting. Then either leave |
|
|
17 | # the default src_unpack or extend over cvs_src_unpack. If you find |
|
|
18 | # that you need to call the cvs_* functions directly, I'd be |
|
|
19 | # interested to hear about it. |
6 | |
20 | |
7 | ECLASS=cvs |
21 | # TODO: |
8 | INHERITED="$INHERITED $ECLASS" |
|
|
9 | |
22 | |
|
|
23 | # Implement more auth types (gserver?, kserver?) |
|
|
24 | |
|
|
25 | # Support additional remote shells with `ext' authentication (does |
|
|
26 | # anyone actually need to use it with anything other than SSH?) |
|
|
27 | |
|
|
28 | |
|
|
29 | |
10 | # You shouldn't change these settings yourself! The ebuild/eclass inheriting this eclass |
30 | # Users shouldn't change these settings! The ebuild/eclass inheriting |
11 | # will take care of that. If you want to set the global KDE cvs ebuilds' settings, |
31 | # this eclass will take care of that. If you want to set the global |
12 | # see the comments in kde-source.eclass. |
32 | # KDE cvs ebuilds' settings, see the comments in kde-source.eclass. |
13 | |
33 | |
14 | # --- begin ebuild-configurable settings |
34 | # --- begin ebuild-configurable settings |
15 | |
35 | |
|
|
36 | # ECVS_CVS_COMMAND -- CVS command to run |
|
|
37 | # |
16 | # cvs command to run. you can set fex. "cvs -t" for extensive debug information |
38 | # You can set, for example, "cvs -t" for extensive debug information |
17 | # on the cvs onnection. the default of "cvs -q -f -z4" means to be quiet, to disregard |
39 | # on the cvs connection. The default of "cvs -q -f -z4" means to be |
18 | # the ~/.cvsrc config file and to use maximum compression. |
40 | # quiet, to disregard the ~/.cvsrc config file and to use maximum |
|
|
41 | # compression. |
|
|
42 | |
19 | [ -z "$ECVS_CVS_COMMAND" ] && ECVS_CVS_COMMAND="cvs -q -f -z4" |
43 | [ -z "$ECVS_CVS_COMMAND" ] && ECVS_CVS_COMMAND="cvs -q -f -z4" |
20 | |
44 | |
21 | # cvs options given after the command (i.e. cvs update foo) |
45 | |
|
|
46 | # ECVS_UP_OPTS, ECVS_CO_OPTS -- CVS options given after the cvs |
|
|
47 | # command (update or checkout). |
|
|
48 | # |
22 | # don't remove -dP or things won't work |
49 | # Don't remove -dP from update or things won't work. |
|
|
50 | |
|
|
51 | [ -z "$ECVS_UP_OPTS" ] && ECVS_UP_OPTS="-dP" |
23 | [ -z "$ECVS_CVS_OPTIONS" ] && ECVS_CVS_OPTIONS="-dP" |
52 | [ -z "$ECVS_CO_OPTS" ] && ECVS_CO_OPTS="" |
24 | |
53 | |
25 | # set this for the module/subdir to be fetched non-recursively |
|
|
26 | #[ -n "$ECVS_LOCAL" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -l" |
|
|
27 | |
54 | |
28 | # Where the cvs modules are stored/accessed |
55 | # ECVS_LOCAL -- If this is set, the CVS module will be fetched |
|
|
56 | # non-recursively. Refer to the information in the CVS man page |
|
|
57 | # regarding the -l command option (not the -l global option). |
|
|
58 | |
|
|
59 | |
|
|
60 | # ECVS_LOCALNAME -- local name of checkout directory |
|
|
61 | # |
|
|
62 | # This is useful if the module on the server is called something |
|
|
63 | # common like 'driver' or is nested deep in a tree, and you don't like |
|
|
64 | # useless empty directories. |
|
|
65 | # |
|
|
66 | # WARNING: Set this only from within ebuilds! If set in your shell or |
|
|
67 | # some such, things will break because the ebuild won't expect it and |
|
|
68 | # have e.g. a wrong $S setting. |
|
|
69 | |
|
|
70 | |
|
|
71 | # ECVS_TOP_DIR -- The directory under which CVS modules are checked |
|
|
72 | # out. |
|
|
73 | |
29 | [ -z "$ECVS_TOP_DIR" ] && ECVS_TOP_DIR="${DISTDIR}/cvs-src" |
74 | [ -z "$ECVS_TOP_DIR" ] && ECVS_TOP_DIR="${DISTDIR}/cvs-src" |
30 | |
75 | |
31 | # Name of cvs server, set to "offline" to disable fetching |
76 | # ECVS_SERVER -- CVS path |
32 | # (i.e. to assume module is checked out already and don't update it). |
77 | # |
33 | # Format is server:/dir e.g. "anoncvs.kde.org:/home/kde". remove the other |
78 | # The format is "server:/dir", e.g. "anoncvs.kde.org:/home/kde". |
34 | # parts of the full CVSROOT (which looks like |
79 | # Remove the other parts of the full CVSROOT, which might look like |
35 | # ":pserver:anonymous@anoncvs.kde.org:/home/kde"); these are added from |
80 | # ":pserver:anonymous@anoncvs.kde.org:/home/kde"; this is generated |
36 | # other settings |
81 | # using other settings also. |
|
|
82 | # |
|
|
83 | # Set this to "offline" to disable fetching (i.e. to assume the module |
|
|
84 | # is already checked out in ECVS_TOP_DIR). |
|
|
85 | |
37 | [ -z "$ECVS_SERVER" ] && ECVS_SERVER="offline" |
86 | [ -z "$ECVS_SERVER" ] && ECVS_SERVER="offline" |
38 | |
87 | |
39 | # Anonymous cvs login? |
88 | |
40 | # if 'yes' uses :pserver: with empty password, if 'no' uses :ext: with $ECVS_PASS, other values not allowed |
89 | # ECVS_MODULE -- the name of the CVS module to be fetched |
|
|
90 | # |
|
|
91 | # This must be set when cvs_src_unpack is called. This can include |
|
|
92 | # several directory levels, i.e. "foo/bar/baz" |
|
|
93 | |
|
|
94 | #[ -z "$ECVS_MODULE" ] && die "$ECLASS: error: ECVS_MODULE not set, cannot continue" |
|
|
95 | |
|
|
96 | |
|
|
97 | # ECVS_BRANCH -- the name of the branch/tag to use |
|
|
98 | |
|
|
99 | # The default is "HEAD". The following default _will_ reset your |
|
|
100 | # branch checkout to head if used. |
|
|
101 | |
41 | [ -z "$ECVS_ANON" ] && ECVS_ANON="yes" |
102 | #[ -z "$ECVS_BRANCH" ] && ECVS_BRANCH="HEAD" |
42 | |
103 | |
43 | # Authentication method to use on ECVS_ANON="no" - possible values are "pserver" and "ext" |
104 | |
|
|
105 | # ECVS_AUTH -- authentication method to use |
|
|
106 | # |
|
|
107 | # Possible values are "pserver" and "ext". If `ext' authentication is |
|
|
108 | # used, the remote shell to use can be specified in CVS_RSH (SSH is |
|
|
109 | # used by default). Currently, the only supported remote shell for |
|
|
110 | # `ext' authentication is SSH. |
|
|
111 | # |
|
|
112 | # Armando Di Cianno <fafhrd@gentoo.org> 2004/09/27 |
|
|
113 | # - Added "no" as a server type, which uses no AUTH method, nor |
|
|
114 | # does it login |
|
|
115 | # e.g. |
|
|
116 | # "cvs -danoncvs@savannah.gnu.org:/cvsroot/backbone co System" |
|
|
117 | # ( from gnustep-apps/textedit ) |
44 | [ -z "$ECVS_AUTH" ] && ECVS_AUTH="ext" |
118 | [ -z "$ECVS_AUTH" ] && ECVS_AUTH="pserver" |
45 | |
119 | |
46 | # Use su to run cvs as user |
120 | # ECVS_USER -- Username to use for authentication on the remote server |
47 | [ -z "$ECVS_RUNAS" ] && ECVS_RUNAS="`whoami`" |
|
|
48 | |
|
|
49 | # Username to use |
|
|
50 | [ -z "$ECVS_USER" ] && ECVS_USER="anonymous" |
121 | [ -z "$ECVS_USER" ] && ECVS_USER="anonymous" |
51 | |
122 | |
52 | # Password to use if anonymous login is off |
123 | |
|
|
124 | # ECVS_PASS -- Password to use for authentication on the remote server |
53 | [ -z "$ECVS_PASS" ] && ECVS_PASS="" |
125 | [ -z "$ECVS_PASS" ] && ECVS_PASS="" |
54 | |
126 | |
55 | # Module to be fetched, must be set explicitly - |
|
|
56 | # I don't like the former ="$PN" default setting |
|
|
57 | [ -z "$ECVS_MODULE" ] && debug-print "$ECLASS: error: ECVS_MODULE not set, cannot continue" |
|
|
58 | |
127 | |
59 | # Branch/tag to use, default is HEAD |
128 | # ECVS_SSH_HOST_KEY |
60 | # uncomment the following line to enable the reset-branch-to-HEAD behaviour |
129 | # |
61 | [ -z "$ECVS_BRANCH" ] && ECVS_BRANCH="HEAD" |
130 | # If SSH is used for `ext' authentication, use this variable to |
|
|
131 | # specify the host key of the remote server. The format of the value |
|
|
132 | # should be the same format that is used for the SSH known hosts file. |
|
|
133 | # |
|
|
134 | # WARNING: If a SSH host key is not specified using this variable, the |
|
|
135 | # remote host key will not be verified. |
62 | |
136 | |
63 | # Subdirectory in module to be fetched, default is not defined = whole module |
137 | |
64 | # DO NOT set default to "", if it's defined at all code will break! |
138 | # ECVS_CLEAN -- Set this to get a clean copy when updating (passes the |
65 | # don't uncomment following line! |
139 | # -C option to cvs update) |
66 | #[ -z "$ECVS_SUBDIR" ] && ECVS_SUBDIR="" |
140 | |
|
|
141 | |
|
|
142 | # ECVS_RUNAS |
|
|
143 | # |
|
|
144 | # Specifies an alternate (non-root) user to use to run cvs. Currently |
|
|
145 | # b0rked and wouldn't work with portage userpriv anyway without |
|
|
146 | # special magic. |
|
|
147 | |
|
|
148 | # [ -z "$ECVS_RUNAS" ] && ECVS_RUNAS="`whoami`" |
|
|
149 | |
|
|
150 | |
|
|
151 | # ECVS_SUBDIR -- deprecated, do not use |
|
|
152 | [ -n "$ECVS_SUBDIR" ] && die "ERROR: deprecated ECVS_SUBDIR defined. Please fix this ebuild." |
|
|
153 | |
67 | |
154 | |
68 | # --- end ebuild-configurable settings --- |
155 | # --- end ebuild-configurable settings --- |
69 | |
156 | |
70 | # add cvs to deps |
157 | # add cvs to deps |
71 | DEPEND="$DEPEND dev-util/cvs dev-python/pexpect" |
158 | # ssh is used for ext auth |
|
|
159 | # sudo is used to run as a specified user |
|
|
160 | DEPEND="dev-util/cvs app-admin/sudo" |
72 | |
161 | |
73 | # since we now longer have src_fetch as a redefinable ebuild function, |
162 | if [ "$ECVS_AUTH" == "ext" ]; then |
74 | # we are forced to call this function from cvs_src_unpack |
163 | #default to ssh |
|
|
164 | [ -z "$CVS_RSH" ] && export SSH_RSH="ssh" |
|
|
165 | if [ "$CVS_RSH" != "ssh" ]; then |
|
|
166 | die "Support for ext auth with clients other than ssh has not been implemented yet" |
|
|
167 | fi |
|
|
168 | DEPEND="${DEPEND} net-misc/openssh" |
|
|
169 | fi |
|
|
170 | |
|
|
171 | # called from cvs_src_unpack |
75 | cvs_fetch() { |
172 | cvs_fetch() { |
76 | |
173 | |
|
|
174 | # Make these options local variables so that the global values are |
|
|
175 | # not affected by modifications in this function. |
|
|
176 | |
|
|
177 | local ECVS_COMMAND="${ECVS_COMMAND}" |
|
|
178 | local ECVS_UP_OPTS="${ECVS_UP_OPTS}" |
|
|
179 | local ECVS_CO_OPTS="${ECVS_CO_OPTS}" |
|
|
180 | |
|
|
181 | # Fix for sourceforge which doesnt want -z>3 anymore. |
|
|
182 | |
|
|
183 | (echo $ECVS_SERVER | grep -q sourceforge) \ |
|
|
184 | && [ "$ECVS_CVS_COMMAND" == "cvs -q -f -z4" ] \ |
|
|
185 | && ECVS_CVS_COMMAND="cvs -q -f -z3" |
|
|
186 | |
77 | debug-print-function $FUNCNAME $* |
187 | debug-print-function $FUNCNAME $* |
78 | |
188 | |
79 | debug-print "$FUNCNAME: init: |
189 | # Update variables that are modified by ebuild parameters, which |
80 | ECVS_CVS_COMMAND=$ECVS_CVS_COMMAND |
190 | # should be effective every time cvs_fetch is called, and not just |
81 | ECVS_CVS_OPTIONS=$ECVS_CVS_OPTIONS |
191 | # every time cvs.eclass is inherited |
82 | ECVS_TOP_DIR=$ECVS_TOP_DIR |
|
|
83 | ECVS_SERVER=$ECVS_SERVER |
|
|
84 | ECVS_ANON=$ECVS_ANON |
|
|
85 | ECVS_USER=$ECVS_USER |
|
|
86 | ECVS_PASS=$ECVS_PASS |
|
|
87 | ECS_MODULE=$ECVS_MODULE |
|
|
88 | ECVS_SUBDIR=$ECVS_SUBDIR |
|
|
89 | ECVS_LOCAL=$ECVS_LOCAL |
|
|
90 | DIR=$DIR" |
|
|
91 | |
192 | |
92 | # a shorthand |
193 | # Handle parameter for local (non-recursive) fetching |
93 | DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}/${ECVS_SUBDIR}" |
|
|
94 | debug-print "$FUNCNAME: now DIR=$DIR" |
|
|
95 | |
194 | |
96 | if [ "$ECVS_SERVER" == "offline" ]; then |
195 | if [ -n "$ECVS_LOCAL" ]; then |
97 | # we're not required to fetch anything, the module already exists and shouldn't be updated |
196 | ECVS_UP_OPTS="$ECVS_UP_OPTS -l" |
98 | if [ -d "$DIR" ]; then |
197 | ECVS_CO_OPTS="$ECVS_CO_OPTS -l" |
99 | debug-print "$FUNCNAME: offline mode, exiting" |
198 | fi |
100 | return 0 |
199 | |
|
|
200 | # Handle ECVS_BRANCH option |
|
|
201 | # |
|
|
202 | # Because CVS auto-switches branches, we just have to pass the |
|
|
203 | # correct -rBRANCH option when updating. |
|
|
204 | |
|
|
205 | if [ -n "$ECVS_BRANCH" ]; then |
|
|
206 | ECVS_UP_OPTS="$ECVS_UP_OPTS -r$ECVS_BRANCH" |
|
|
207 | ECVS_CO_OPTS="$ECVS_CO_OPTS -r$ECVS_BRANCH" |
|
|
208 | fi |
|
|
209 | |
|
|
210 | # Handle ECVS_LOCALNAME, which specifies the local directory name |
|
|
211 | # to use. Note that the -d command option is not equivalent to |
|
|
212 | # the global -d option. |
|
|
213 | |
|
|
214 | if [ "$ECVS_LOCALNAME" != "$ECVS_MODULE" ]; then |
|
|
215 | ECVS_CO_OPTS="$ECVS_CO_OPTS -d $ECVS_LOCALNAME" |
|
|
216 | fi |
|
|
217 | |
|
|
218 | |
|
|
219 | if [ -n "$ECVS_CLEAN" ]; then |
|
|
220 | ECVS_UP_OPTS="$ECVS_UP_OPTS -C" |
|
|
221 | fi |
|
|
222 | |
|
|
223 | |
|
|
224 | # It would be easiest to always be in "run-as mode", logic-wise, |
|
|
225 | # if sudo didn't ask for a password even when sudo'ing to `whoami`. |
|
|
226 | |
|
|
227 | if [ -z "$ECVS_RUNAS" ]; then |
|
|
228 | run="" |
101 | else |
229 | else |
102 | einfo "ERROR: Offline mode specified, but module/subdir not found. Aborting." |
230 | run="sudo -u $ECVS_RUNAS" |
103 | debug-print "$FUNCNAME: offline mode specified but module/subdir not found, exiting with error" |
|
|
104 | return 1 |
|
|
105 | fi |
231 | fi |
106 | fi |
|
|
107 | |
232 | |
108 | # create target directory as needed |
233 | # Create the top dir if needed |
|
|
234 | |
109 | if [ ! -d "$DIR" ]; then |
235 | if [ ! -d "$ECVS_TOP_DIR" ]; then |
|
|
236 | |
|
|
237 | # Note that the addwrite statements in this block are only |
|
|
238 | # there to allow creating ECVS_TOP_DIR; we allow writing |
|
|
239 | # inside it separately. |
|
|
240 | |
|
|
241 | # This is because it's simpler than trying to find out the |
|
|
242 | # parent path of the directory, which would need to be the |
|
|
243 | # real path and not a symlink for things to work (so we can't |
|
|
244 | # just remove the last path element in the string) |
|
|
245 | |
110 | debug-print "$FUNCNAME: creating cvs directory $DIR" |
246 | debug-print "$FUNCNAME: checkout mode. creating cvs directory" |
111 | #export SANDBOX_WRITE="$SANDBOX_WRITE:/foobar:/" |
|
|
112 | addwrite /foobar |
247 | addwrite /foobar |
113 | addwrite / |
248 | addwrite / |
114 | mkdir -p "/$DIR" |
249 | $run mkdir -p "/$ECVS_TOP_DIR" |
115 | export SANDBOX_WRITE="${SANDBOX_WRITE//:\/foobar:\/}" |
250 | export SANDBOX_WRITE="${SANDBOX_WRITE//:\/foobar:\/}" |
116 | fi |
251 | fi |
117 | |
252 | |
118 | # in case ECVS_TOP_DIR is a symlink to a dir, get the real dir's path, |
253 | # In case ECVS_TOP_DIR is a symlink to a dir, get the real path, |
119 | # otherwise addwrite() doesn't work. |
254 | # otherwise addwrite() doesn't work. |
|
|
255 | |
120 | cd -P "$ECVS_TOP_DIR" > /dev/null |
256 | cd -P "$ECVS_TOP_DIR" > /dev/null |
121 | ECVS_TOP_DIR="`/bin/pwd`" |
257 | ECVS_TOP_DIR="`/bin/pwd`" |
122 | DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}/${ECVS_SUBDIR}" |
258 | |
123 | cd "$OLDPWD" |
|
|
124 | |
|
|
125 | debug-print "$FUNCNAME: now DIR=$DIR" |
|
|
126 | |
|
|
127 | # disable the sandbox for this dir |
259 | # Disable the sandbox for this dir |
128 | # not just $DIR because we want to create moduletopdir/CVS too |
|
|
129 | addwrite "$ECVS_TOP_DIR/$ECVS_MODULE" |
260 | addwrite "$ECVS_TOP_DIR" |
130 | |
261 | |
131 | # add option for local (non-recursive) fetching |
262 | # Chown the directory and all of its contents |
132 | [ -n "$ECVS_LOCAL" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -l" |
|
|
133 | |
|
|
134 | # prepare a cvspass file just for this session so that cvs thinks we're logged |
|
|
135 | # in at the cvs server. we don't want to mess with ~/.cvspass. |
|
|
136 | echo ":pserver:${ECVS_SERVER} A" > "${T}/cvspass" |
|
|
137 | export CVS_PASSFILE="${T}/cvspass" |
|
|
138 | chown $ECVS_RUNAS "${T}/cvspass" |
|
|
139 | #export CVSROOT=:pserver:${ECVS_USER}@${ECVS_SERVER} |
|
|
140 | |
|
|
141 | # Note: cvs update and checkout commands are unified. |
|
|
142 | # we make sure a CVS/ dir exists in our module subdir with the right |
|
|
143 | # Root and Repository entries in it and cvs update. |
|
|
144 | |
|
|
145 | [ "${ECVS_ANON}" == "yes" ] && \ |
|
|
146 | newserver=":pserver:${ECVS_USER}@${ECVS_SERVER}" || \ |
|
|
147 | newserver=":${ECVS_AUTH}:${ECVS_USER}@${ECVS_SERVER}" |
|
|
148 | |
|
|
149 | |
|
|
150 | # CVS/Repository files can't (I think) contain two concatenated slashes |
|
|
151 | if [ -n "$ECVS_SUBDIR" ]; then |
263 | if [ -n "$ECVS_RUNAS" ]; then |
152 | repository="${ECVS_MODULE}/${ECVS_SUBDIR}" |
264 | $run chown -R "$ECVS_RUNAS" "/$ECVS_TOP_DIR" |
|
|
265 | fi |
|
|
266 | |
|
|
267 | # Determine the CVS command mode (checkout or update) |
|
|
268 | if [ ! -d "$ECVS_TOP_DIR/$ECVS_LOCALNAME/CVS" ]; then |
|
|
269 | mode=checkout |
153 | else |
270 | else |
154 | repository="${ECVS_MODULE}" |
271 | mode=update |
155 | fi |
|
|
156 | |
|
|
157 | debug-print "$FUNCNAME: Root<-$newserver, Repository<-$repository" |
|
|
158 | debug-print "$FUNCNAME: entering directory $DIR" |
|
|
159 | cd "/$DIR" |
|
|
160 | |
|
|
161 | if [ ! -d "CVS" ]; then |
|
|
162 | # create a new CVS/ directory (checkout) |
|
|
163 | debug-print "$FUNCNAME: creating new cvs directory" |
|
|
164 | |
|
|
165 | mkdir CVS |
|
|
166 | echo $newserver > CVS/Root |
|
|
167 | echo $repository > CVS/Repository |
|
|
168 | touch CVS/Entries |
|
|
169 | |
|
|
170 | # if we're checking out a subdirectory only, create a CVS/ dir |
|
|
171 | # in the module's top dir so that the user (and we) can cvs update |
|
|
172 | # from there to get the full module. |
|
|
173 | if [ ! -d "$ECVS_TOP_DIR/$ECVS_MODULE/CVS" ]; then |
|
|
174 | debug-print "$FUNCNAME: Copying CVS/ directory to module top-level dir" |
|
|
175 | cp -r CVS "$ECVS_TOP_DIR/$ECVS_MODULE/" |
|
|
176 | echo $ECVS_MODULE > "$ECVS_TOP_DIR/$ECVS_MODULE/CVS/Repository" |
|
|
177 | fi |
272 | fi |
178 | |
273 | |
|
|
274 | |
|
|
275 | # Our server string (i.e. CVSROOT) without the password so it can |
|
|
276 | # be put in Root |
|
|
277 | if [ "$ECVS_AUTH" == "no" ] |
|
|
278 | then |
|
|
279 | local server="${ECVS_USER}@${ECVS_SERVER}" |
179 | else |
280 | else |
180 | #update existing module |
281 | local server=":${ECVS_AUTH}:${ECVS_USER}@${ECVS_SERVER}" |
181 | debug-print "$FUNCNAME: updating existing module/subdir" |
282 | fi |
182 | |
283 | |
183 | # Switch servers if needed |
284 | # Switch servers automagically if needed |
184 | # cvs keeps the server info in the CVS/Root file in every checked-out dir; |
285 | if [ "$mode" == "update" ]; then |
185 | # we can fix those files to point to the new server |
286 | cd /$ECVS_TOP_DIR/$ECVS_LOCALNAME |
186 | oldserver="`cat CVS/Root`" |
287 | local oldserver="`$run cat CVS/Root`" |
187 | if [ "$newserver" != "$oldserver" ]; then |
288 | if [ "$server" != "$oldserver" ]; then |
188 | |
289 | |
189 | einfo "Changing CVS server from $oldserver to $newserver:" |
290 | einfo "Changing the CVS server from $oldserver to $server:" |
190 | debug-print "$FUNCNAME: Changing CVS server from $oldserver to $newserver:" |
291 | debug-print "$FUNCNAME: Changing the CVS server from $oldserver to $server:" |
191 | |
292 | |
192 | einfo "Searching for CVS dirs..." |
293 | einfo "Searching for CVS directories ..." |
193 | cvsdirs="`find . -iname CVS -print`" |
294 | local cvsdirs="`$run find . -iname CVS -print`" |
194 | debug-print "$FUNCNAME: CVS dirs found:" |
295 | debug-print "$FUNCNAME: CVS directories found:" |
195 | debug-print "$cvsdirs" |
296 | debug-print "$cvsdirs" |
196 | |
297 | |
197 | einfo "Modifying CVS dirs..." |
298 | einfo "Modifying CVS directories ..." |
198 | for x in $cvsdirs; do |
299 | for x in $cvsdirs; do |
199 | debug-print "In $x" |
300 | debug-print "In $x" |
200 | echo $newserver > "$x/Root" |
301 | $run echo "$server" > "$x/Root" |
201 | done |
302 | done |
202 | |
303 | |
203 | fi |
304 | fi |
204 | |
|
|
205 | fi |
305 | fi |
206 | |
306 | |
207 | # cvs auto-switches branches, how nice |
307 | # Prepare a cvspass file just for this session, we don't want to |
208 | # warning: if we do it this way we get multiple -rX options - harmless i think |
308 | # mess with ~/.cvspass |
209 | [ -n "$ECVS_BRANCH" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -r$ECVS_BRANCH" |
309 | touch "${T}/cvspass" |
210 | |
310 | export CVS_PASSFILE="${T}/cvspass" |
211 | # Chowning the directory |
|
|
212 | if [ "${ECVS_RUNAS}" != "root" ]; then |
311 | if [ -n "$ECVS_RUNAS" ]; then |
213 | chown -R "$ECVS_RUNAS" "/$DIR" |
312 | chown "$ECVS_RUNAS" "${T}/cvspass" |
214 | fi |
313 | fi |
215 | |
314 | |
216 | # finally run the cvs update command |
315 | # The server string with the password in it, for login |
217 | debug-print "$FUNCNAME: is in dir `/bin/pwd`" |
316 | cvsroot_pass=":${ECVS_AUTH}:${ECVS_USER}:${ECVS_PASS}@${ECVS_SERVER}" |
218 | debug-print "$FUNCNAME: running $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS with $ECVS_SERVER for module $ECVS_MODULE subdir $ECVS_SUBDIR" |
|
|
219 | einfo "Running $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS with $ECVS_SERVER for $ECVS_MODULE/$ECVS_SUBDIR..." |
|
|
220 | |
317 | |
|
|
318 | # Ditto without the password, for checkout/update after login, so |
|
|
319 | # that the CVS/Root files don't contain the password in plaintext |
221 | if [ "${ECVS_ANON}" == "no" ]; then |
320 | if [ "$ECVS_AUTH" == "no" ] |
222 | |
321 | then |
223 | debug-print "$FUNCNAME: starting non-anonymous cvs login..." |
322 | cvsroot_nopass="${ECVS_USER}@${ECVS_SERVER}" |
224 | # CVS Login - written in python :: the right way ;) |
|
|
225 | # Tilman Klar, <phoenix@gentoo.org> |
|
|
226 | |
|
|
227 | export CVS_RSH="/usr/bin/ssh" |
|
|
228 | |
|
|
229 | ############################## inline-python ##################################### |
|
|
230 | /usr/bin/env python << EndOfFile |
|
|
231 | |
|
|
232 | import pexpect,os |
|
|
233 | |
|
|
234 | mypasswd = "${ECVS_PASS}" |
|
|
235 | myauth = "${ECVS_AUTH}" |
|
|
236 | mytimeout = 10 |
|
|
237 | |
|
|
238 | if myauth == "ext": |
|
|
239 | mycommand = "su ${ECVS_RUNAS} -c \"${ECVS_CVS_COMMAND} update ${ECVS_CVS_OPTIONS}\"" |
|
|
240 | child = pexpect.spawn(mycommand) |
|
|
241 | |
|
|
242 | index = child.expect(['continue connecting','word:'], mytimeout) |
|
|
243 | if index == 0: |
|
|
244 | child.sendline('yes') |
|
|
245 | ## Added server to ~/.ssh/known_hosts |
|
|
246 | child.expect('word:', mytimeout) |
|
|
247 | else: |
323 | else |
248 | ## Server already is in ~/.ssh/known_hosts |
324 | cvsroot_nopass=":${ECVS_AUTH}:${ECVS_USER}@${ECVS_SERVER}" |
|
|
325 | fi |
|
|
326 | |
|
|
327 | # Commands to run |
|
|
328 | cmdlogin="${run} ${ECVS_CVS_COMMAND} -d \"${cvsroot_pass}\" login" |
|
|
329 | cmdupdate="${run} ${ECVS_CVS_COMMAND} -d \"${cvsroot_nopass}\" update ${ECVS_UP_OPTS} ${ECVS_LOCALNAME}" |
|
|
330 | cmdcheckout="${run} ${ECVS_CVS_COMMAND} -d \"${cvsroot_nopass}\" checkout ${ECVS_CO_OPTS} ${ECVS_MODULE}" |
|
|
331 | |
|
|
332 | # Execute commands |
|
|
333 | |
|
|
334 | cd "${ECVS_TOP_DIR}" |
|
|
335 | if [ "${ECVS_AUTH}" == "pserver" ]; then |
|
|
336 | einfo "Running $cmdlogin" |
|
|
337 | eval $cmdlogin || die "cvs login command failed" |
|
|
338 | if [ "${mode}" == "update" ]; then |
|
|
339 | einfo "Running $cmdupdate" |
|
|
340 | eval $cmdupdate || die "cvs update command failed" |
|
|
341 | elif [ "${mode}" == "checkout" ]; then |
|
|
342 | einfo "Running $cmdcheckout" |
|
|
343 | eval $cmdcheckout|| die "cvs checkout command failed" |
|
|
344 | fi |
|
|
345 | elif [ "${ECVS_AUTH}" == "ext" ] || [ "${ECVS_AUTH}" == "no" ]; then |
|
|
346 | |
|
|
347 | # Hack to support SSH password authentication |
|
|
348 | |
|
|
349 | # Backup environment variable values |
|
|
350 | local CVS_ECLASS_ORIG_CVS_RSH="${CVS_RSH}" |
|
|
351 | |
|
|
352 | if [ "${SSH_ASKPASS+set}" == "set" ]; then |
|
|
353 | local CVS_ECLASS_ORIG_SSH_ASKPASS="${SSH_ASKPASS}" |
|
|
354 | else |
|
|
355 | unset CVS_ECLASS_ORIG_SSH_ASKPASS |
|
|
356 | fi |
|
|
357 | |
|
|
358 | if [ "${DISPLAY+set}" == "set" ]; then |
|
|
359 | local CVS_ECLASS_ORIG_DISPLAY="${DISPLAY}" |
|
|
360 | else |
|
|
361 | unset CVS_ECLASS_ORIG_DISPLAY |
|
|
362 | fi |
|
|
363 | |
|
|
364 | if [ "${CVS_RSH}" == "ssh" ]; then |
|
|
365 | |
|
|
366 | # Force SSH to use SSH_ASKPASS by creating python wrapper |
|
|
367 | |
|
|
368 | export CVS_RSH="${T}/cvs_sshwrapper" |
|
|
369 | cat > "${CVS_RSH}"<<EOF |
|
|
370 | #!/usr/bin/python |
|
|
371 | import fcntl |
|
|
372 | import os |
|
|
373 | import sys |
|
|
374 | try: |
|
|
375 | fd = os.open('/dev/tty', 2) |
|
|
376 | TIOCNOTTY=0x5422 |
|
|
377 | try: |
|
|
378 | fcntl.ioctl(fd, TIOCNOTTY) |
|
|
379 | except: |
249 | pass |
380 | pass |
|
|
381 | os.close(fd) |
|
|
382 | except: |
|
|
383 | pass |
|
|
384 | newarglist = sys.argv[:] |
|
|
385 | EOF |
250 | |
386 | |
251 | child.sendline(mypasswd) |
387 | # disable X11 forwarding which causes .xauth access violations |
252 | child.expect(pexpect.EOF) |
388 | # - 20041205 Armando Di Cianno <fafhrd@gentoo.org> |
|
|
389 | echo "newarglist.insert(1, '-oClearAllForwardings=yes')" \ |
|
|
390 | >> "${CVS_RSH}" |
|
|
391 | echo "newarglist.insert(1, '-oForwardX11=no')" \ |
|
|
392 | >> "${CVS_RSH}" |
253 | |
393 | |
254 | elif myauth == "pserver": |
394 | # Handle SSH host key checking |
255 | mycommand = "su ${ECVS_RUNAS} -c \"cvs login\"" |
|
|
256 | child = pexpect.spawn(mycommand) |
|
|
257 | child.expect("CVS password:",mytimeout) |
|
|
258 | child.sendline(mypasswd) |
|
|
259 | child.expect(pexpect.EOF) |
|
|
260 | |
395 | |
261 | # Logged in - checking out |
396 | local CVS_ECLASS_KNOWN_HOSTS="${T}/cvs_ssh_known_hosts" |
262 | os.system("su ${ECVS_RUNAS} -c \"${ECVS_CVS_COMMAND} update ${ECVS_CVS_OPTIONS}\" &> /dev/null") |
397 | echo "newarglist.insert(1, '-oUserKnownHostsFile=${CVS_ECLASS_KNOWN_HOSTS}')" \ |
263 | EndOfFile |
398 | >> "${CVS_RSH}" |
264 | ########################### End of inline-python ################################## |
399 | |
|
|
400 | if [ -z "${ECVS_SSH_HOST_KEY}" ]; then |
|
|
401 | ewarn "Warning: The SSH host key of the remote server will not be verified." |
|
|
402 | einfo "A temporary known hosts list will be used." |
|
|
403 | local CVS_ECLASS_STRICT_HOST_CHECKING="no" |
|
|
404 | touch "${CVS_ECLASS_KNOWN_HOSTS}" |
|
|
405 | else |
|
|
406 | local CVS_ECLASS_STRICT_HOST_CHECKING="yes" |
|
|
407 | echo "${ECVS_SSH_HOST_KEY}" > "${CVS_ECLASS_KNOWN_HOSTS}" |
|
|
408 | fi |
|
|
409 | |
|
|
410 | echo -n "newarglist.insert(1, '-oStrictHostKeyChecking=" \ |
|
|
411 | >> "${CVS_RSH}" |
|
|
412 | echo "${CVS_ECLASS_STRICT_HOST_CHECKING}')" \ |
|
|
413 | >> "${CVS_RSH}" |
|
|
414 | echo "os.execv('/usr/bin/ssh', newarglist)" \ |
|
|
415 | >> "${CVS_RSH}" |
|
|
416 | |
|
|
417 | chmod a+x "${CVS_RSH}" |
|
|
418 | |
|
|
419 | # Make sure DISPLAY is set (SSH will not use SSH_ASKPASS |
|
|
420 | # if DISPLAY is not set) |
|
|
421 | |
|
|
422 | [ -z "${DISPLAY}" ] && DISPLAY="DISPLAY" |
|
|
423 | export DISPLAY |
|
|
424 | |
|
|
425 | # Create a dummy executable to echo $ECVS_PASS |
|
|
426 | |
|
|
427 | export SSH_ASKPASS="${T}/cvs_sshechopass" |
|
|
428 | if [ "${ECVS_AUTH}" != "no" ]; then |
|
|
429 | echo -en "#!/bin/bash\necho \"$ECVS_PASS\"\n" \ |
|
|
430 | > "${SSH_ASKPASS}" |
|
|
431 | else |
|
|
432 | echo -en "#!/bin/bash\nreturn\n" \ |
|
|
433 | > "${SSH_ASKPASS}" |
|
|
434 | |
|
|
435 | fi |
|
|
436 | chmod a+x "${SSH_ASKPASS}" |
|
|
437 | fi |
|
|
438 | |
|
|
439 | if [ "${mode}" == "update" ]; then |
|
|
440 | einfo "Running $cmdupdate" |
|
|
441 | eval $cmdupdate || die "cvs update command failed" |
|
|
442 | elif [ "${mode}" == "checkout" ]; then |
|
|
443 | einfo "Running $cmdcheckout" |
|
|
444 | eval $cmdcheckout|| die "cvs checkout command failed" |
|
|
445 | fi |
|
|
446 | |
|
|
447 | # Restore environment variable values |
|
|
448 | export CVS_RSH="${CVS_ECLASS_ORIG_CVS_RSH}" |
|
|
449 | if [ "${CVS_ECLASS_ORIG_SSH_ASKPASS+set}" == "set" ]; then |
|
|
450 | export SSH_ASKPASS="${CVS_ECLASS_ORIG_SSH_ASKPASS}" |
|
|
451 | else |
|
|
452 | unset SSH_ASKPASS |
|
|
453 | fi |
|
|
454 | |
|
|
455 | if [ "${CVS_ECLASS_ORIG_DISPLAY+set}" == "set" ]; then |
|
|
456 | export DISPLAY="${CVS_ECLASS_ORIG_DISPLAY}" |
|
|
457 | else |
|
|
458 | unset DISPLAY |
|
|
459 | fi |
|
|
460 | fi |
|
|
461 | |
|
|
462 | # Restore ownership. Not sure why this is needed, but someone |
|
|
463 | # added it in the orig ECVS_RUNAS stuff. |
|
|
464 | if [ -n "$ECVS_RUNAS" ]; then |
|
|
465 | chown `whoami` "${T}/cvspass" |
|
|
466 | fi |
|
|
467 | |
|
|
468 | } |
|
|
469 | |
|
|
470 | |
|
|
471 | cvs_src_unpack() { |
|
|
472 | |
|
|
473 | debug-print-function $FUNCNAME $* |
|
|
474 | |
|
|
475 | debug-print "$FUNCNAME: init: |
|
|
476 | ECVS_CVS_COMMAND=$ECVS_CVS_COMMAND |
|
|
477 | ECVS_UP_OPTS=$ECVS_UP_OPTS |
|
|
478 | ECVS_CO_OPTS=$ECVS_CO_OPTS |
|
|
479 | ECVS_TOP_DIR=$ECVS_TOP_DIR |
|
|
480 | ECVS_SERVER=$ECVS_SERVER |
|
|
481 | ECVS_USER=$ECVS_USER |
|
|
482 | ECVS_PASS=$ECVS_PASS |
|
|
483 | ECVS_MODULE=$ECVS_MODULE |
|
|
484 | ECVS_LOCAL=$ECVS_LOCAL |
|
|
485 | ECVS_RUNAS=$ECVS_RUNAS |
|
|
486 | ECVS_LOCALNAME=$ECVS_LOCALNAME" |
|
|
487 | |
|
|
488 | [ -z "$ECVS_MODULE" ] && die "ERROR: CVS module not set, cannot continue." |
|
|
489 | |
|
|
490 | local ECVS_LOCALNAME="${ECVS_LOCALNAME}" |
|
|
491 | |
|
|
492 | if [ -z "$ECVS_LOCALNAME" ]; then |
|
|
493 | ECVS_LOCALNAME="$ECVS_MODULE" |
|
|
494 | fi |
|
|
495 | |
|
|
496 | if [ "$ECVS_SERVER" == "offline" ]; then |
|
|
497 | # We're not required to fetch anything; the module already |
|
|
498 | # exists and shouldn't be updated. |
|
|
499 | if [ -d "${ECVS_TOP_DIR}/${ECVS_LOCALNAME}" ]; then |
|
|
500 | debug-print "$FUNCNAME: offline mode" |
|
|
501 | else |
|
|
502 | debug-print "$FUNCNAME: Offline mode specified but directory ${ECVS_TOP_DIR}/${ECVS_LOCALNAME} not found, exiting with error" |
|
|
503 | die "ERROR: Offline mode specified, but directory ${ECVS_TOP_DIR}/${ECVS_LOCALNAME} not found. Aborting." |
|
|
504 | fi |
|
|
505 | elif [ -n "$ECVS_SERVER" ]; then # ECVS_SERVER!=offline --> real fetching mode |
|
|
506 | einfo "Fetching CVS module $ECVS_MODULE into $ECVS_TOP_DIR ..." |
|
|
507 | cvs_fetch |
|
|
508 | else # ECVS_SERVER not set |
|
|
509 | die "ERROR: CVS server not specified, cannot continue." |
|
|
510 | fi |
|
|
511 | |
|
|
512 | einfo "Copying $ECVS_MODULE from $ECVS_TOP_DIR ..." |
|
|
513 | debug-print "Copying module $ECVS_MODULE local_mode=$ECVS_LOCAL from $ECVS_TOP_DIR ..." |
|
|
514 | |
|
|
515 | # This is probably redundant, but best to make sure. |
|
|
516 | mkdir -p "$WORKDIR/$ECVS_LOCALNAME" |
|
|
517 | |
|
|
518 | if [ -n "$ECVS_LOCAL" ]; then |
|
|
519 | cp -f "$ECVS_TOP_DIR/$ECVS_LOCALNAME"/* "$WORKDIR/$ECVS_LOCALNAME" |
265 | else |
520 | else |
266 | debug-print "$FUNCNAME: using anonymous cvs login" |
521 | cp -Rf "$ECVS_TOP_DIR/$ECVS_LOCALNAME" "$WORKDIR/$ECVS_LOCALNAME/.." |
267 | $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS || die "died running cvs update" |
|
|
268 | fi |
|
|
269 | |
|
|
270 | # log out and restore ownership |
|
|
271 | su $ECVS_RUNAS -c "cvs logout" &> /dev/null |
|
|
272 | chown `whoami` "${T}/cvspass" |
|
|
273 | } |
|
|
274 | |
|
|
275 | cvs_src_unpack() { |
|
|
276 | |
|
|
277 | debug-print-function $FUNCNAME $* |
|
|
278 | cvs_fetch || die "died running cvs_fetch" |
|
|
279 | |
|
|
280 | einfo "Copying $ECVS_MODULE/$ECVS_SUBDIR from $ECVS_TOP_DIR..." |
|
|
281 | debug-print "Copying module $ECVS_MODULE subdir $ECVS_SUBDIR local_mode=$ECVS_LOCAL from $ECVS_TOP_DIR..." |
|
|
282 | |
|
|
283 | # probably redundant, but best to make sure |
|
|
284 | mkdir -p "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR" |
|
|
285 | |
|
|
286 | if [ -n "$ECVS_SUBDIR" ]; then |
|
|
287 | if [ -n "$ECVS_LOCAL" ]; then |
|
|
288 | cp -f "$ECVS_TOP_DIR/$ECVS_MODULE/$ECVS_SUBDIR"/* "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR" |
|
|
289 | else |
|
|
290 | cp -Rf "$ECVS_TOP_DIR/$ECVS_MODULE/$ECVS_SUBDIR" "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR/.." |
|
|
291 | fi |
|
|
292 | else |
|
|
293 | if [ -n "$ECVS_LOCAL" ]; then |
|
|
294 | cp -f "$ECVS_TOP_DIR/$ECVS_MODULE"/* $WORKDIR/$ECVS_MODULE |
|
|
295 | else |
|
|
296 | cp -Rf "$ECVS_TOP_DIR/$ECVS_MODULE" "$WORKDIR" |
|
|
297 | fi |
522 | fi |
298 | fi |
523 | |
299 | |
|
|
300 | # if the directory is empty, remove it; empty directories cannot exist in cvs. |
524 | # If the directory is empty, remove it; empty directories cannot |
301 | # this happens when fex. kde-source requests module/doc/subdir which doesn't exist. |
525 | # exist in cvs. This happens when, for example, kde-source |
|
|
526 | # requests module/doc/subdir which doesn't exist. Still create |
302 | # still create the empty directory in workdir though. |
527 | # the empty directory in workdir though. |
303 | if [ "`ls -A $DIR`" == "CVS" ]; then |
528 | if [ "`ls -A \"${ECVS_TOP_DIR}/${ECVS_LOCALNAME}\"`" == "CVS" ]; then |
304 | debug-print "$FUNCNAME: removing cvs-empty directory $ECVS_MODULE/$ECVS_SUBDIR" |
529 | debug-print "$FUNCNAME: removing empty CVS directory $ECVS_LOCALNAME" |
305 | rm -rf "$DIR" |
530 | rm -rf "${ECVS_TOP_DIR}/${ECVS_LOCALNAME}" |
306 | fi |
531 | fi |
307 | |
532 | |
308 | # implement some of base_src_unpack's functionality; |
533 | # Implement some of base_src_unpack's functionality; note however |
309 | # note however that base.eclass may not have been inherited! |
534 | # that base.eclass may not have been inherited! |
310 | if [ -n "$PATCHES" ]; then |
535 | if [ -n "$PATCHES" ]; then |
311 | debug-print "$FUNCNAME: PATCHES=$PATCHES, S=$S, autopatching" |
536 | debug-print "$FUNCNAME: PATCHES=$PATCHES, S=$S, autopatching" |
312 | cd "$S" |
537 | cd "$S" |
313 | for x in $PATCHES; do |
538 | for x in $PATCHES; do |
314 | debug-print "patching from $x" |
539 | debug-print "patching from $x" |
315 | patch -p0 < "$x" |
540 | patch -p0 < "$x" |
316 | done |
541 | done |
317 | # make sure we don't try to apply patches more than once, since |
542 | # Make sure we don't try to apply patches more than once, |
318 | # cvs_src_unpack is usually called several times from e.g. kde-source_src_unpack |
543 | # since cvs_src_unpack is usually called several times from |
|
|
544 | # e.g. kde-source_src_unpack |
319 | export PATCHES="" |
545 | export PATCHES="" |
320 | fi |
546 | fi |
321 | |
547 | |
|
|
548 | einfo "CVS module ${ECVS_MODULE} is now in ${WORKDIR}" |
322 | } |
549 | } |
323 | |
550 | |
324 | EXPORT_FUNCTIONS src_unpack |
551 | EXPORT_FUNCTIONS src_unpack |