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

Contents of /eclass/cvs.eclass

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.32 - (hide annotations) (download)
Fri Feb 21 14:07:46 2003 UTC (11 years, 6 months ago) by phoenix
Branch: MAIN
Changes since 1.31: +29 -2 lines
modified cvs.eclass to use 'anonymous' pservers with password - see bug #11497 for details

1 vapier 1.31 # Copyright 1999-2003 Gentoo Technologies, Inc.
2 vapier 1.22 # Distributed under the terms of the GNU General Public License v2
3 phoenix 1.32 # $Header: /home/cvsroot/gentoo-x86/eclass/cvs.eclass,v 1.31 2003/02/16 04:26:21 vapier Exp $
4 vapier 1.31 #
5 danarmak 1.1 # Author Dan Armak <danarmak@gentoo.org>
6 vapier 1.31 #
7 danarmak 1.1 # This eclass provides the generic cvs fetching functions.
8    
9     ECLASS=cvs
10     INHERITED="$INHERITED $ECLASS"
11    
12     # You shouldn't change these settings yourself! The ebuild/eclass inheriting this eclass
13     # will take care of that. If you want to set the global KDE cvs ebuilds' settings,
14     # see the comments in kde-source.eclass.
15    
16     # --- begin ebuild-configurable settings
17    
18     # cvs command to run. you can set fex. "cvs -t" for extensive debug information
19     # on the cvs onnection. the default of "cvs -q -f -z4" means to be quiet, to disregard
20     # the ~/.cvsrc config file and to use maximum compression.
21 danarmak 1.8 [ -z "$ECVS_CVS_COMMAND" ] && ECVS_CVS_COMMAND="cvs -q -f -z4"
22 danarmak 1.1
23 danarmak 1.7 # cvs options given after the command (i.e. cvs update foo)
24     # don't remove -dP or things won't work
25     [ -z "$ECVS_CVS_OPTIONS" ] && ECVS_CVS_OPTIONS="-dP"
26    
27     # set this for the module/subdir to be fetched non-recursively
28     #[ -n "$ECVS_LOCAL" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -l"
29    
30 danarmak 1.1 # Where the cvs modules are stored/accessed
31 danarmak 1.14 [ -z "$ECVS_TOP_DIR" ] && ECVS_TOP_DIR="${DISTDIR}/cvs-src"
32 danarmak 1.1
33 danarmak 1.9 # Name of cvs server, set to "offline" to disable fetching
34 danarmak 1.1 # (i.e. to assume module is checked out already and don't update it).
35     # Format is server:/dir e.g. "anoncvs.kde.org:/home/kde". remove the other
36     # parts of the full CVSROOT (which looks like
37     # ":pserver:anonymous@anoncvs.kde.org:/home/kde"); these are added from
38     # other settings
39 danarmak 1.9 [ -z "$ECVS_SERVER" ] && ECVS_SERVER="offline"
40 danarmak 1.1
41 danarmak 1.23 # Anonymous cvs login?
42     # if 'yes' uses :pserver: with empty password, if 'no' uses :ext: with $ECVS_PASS, other values not allowed
43     [ -z "$ECVS_ANON" ] && ECVS_ANON="yes"
44    
45 phoenix 1.24 # Authentication method to use on ECVS_ANON="no" - possible values are "pserver" and "ext"
46     [ -z "$ECVS_AUTH" ] && ECVS_AUTH="ext"
47    
48     # Use su to run cvs as user
49     [ -z "$ECVS_RUNAS" ] && ECVS_RUNAS="`whoami`"
50    
51 danarmak 1.1 # Username to use
52     [ -z "$ECVS_USER" ] && ECVS_USER="anonymous"
53    
54 phoenix 1.32 # Password to use if anonymous login is off, or if 'anonymous' pserver access
55     # uses a password and ECVS_ANON = yes
56 danarmak 1.1 [ -z "$ECVS_PASS" ] && ECVS_PASS=""
57    
58     # Module to be fetched, must be set explicitly -
59 danarmak 1.12 # I don't like the former ="$PN" default setting
60     [ -z "$ECVS_MODULE" ] && debug-print "$ECLASS: error: ECVS_MODULE not set, cannot continue"
61 danarmak 1.1
62 danarmak 1.14 # Branch/tag to use, default is HEAD
63     # uncomment the following line to enable the reset-branch-to-HEAD behaviour
64     [ -z "$ECVS_BRANCH" ] && ECVS_BRANCH="HEAD"
65    
66 danarmak 1.6 # Subdirectory in module to be fetched, default is not defined = whole module
67     # DO NOT set default to "", if it's defined at all code will break!
68     # don't uncomment following line!
69 danarmak 1.18 #[ -z "$ECVS_SUBDIR" ] && ECVS_SUBDIR=""
70 danarmak 1.1
71     # --- end ebuild-configurable settings ---
72    
73 danarmak 1.6 # add cvs to deps
74 danarmak 1.23 DEPEND="$DEPEND dev-util/cvs dev-python/pexpect"
75 danarmak 1.1
76     # since we now longer have src_fetch as a redefinable ebuild function,
77     # we are forced to call this function from cvs_src_unpack
78     cvs_fetch() {
79    
80     debug-print-function $FUNCNAME $*
81    
82 danarmak 1.6 debug-print "$FUNCNAME: init:
83     ECVS_CVS_COMMAND=$ECVS_CVS_COMMAND
84 danarmak 1.7 ECVS_CVS_OPTIONS=$ECVS_CVS_OPTIONS
85 danarmak 1.6 ECVS_TOP_DIR=$ECVS_TOP_DIR
86     ECVS_SERVER=$ECVS_SERVER
87 danarmak 1.23 ECVS_ANON=$ECVS_ANON
88 danarmak 1.6 ECVS_USER=$ECVS_USER
89     ECVS_PASS=$ECVS_PASS
90     ECS_MODULE=$ECVS_MODULE
91 danarmak 1.18 ECVS_SUBDIR=$ECVS_SUBDIR
92 danarmak 1.7 ECVS_LOCAL=$ECVS_LOCAL
93 danarmak 1.6 DIR=$DIR"
94 danarmak 1.14
95 danarmak 1.6 # a shorthand
96 danarmak 1.17 DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}/${ECVS_SUBDIR}"
97 danarmak 1.18 debug-print "$FUNCNAME: now DIR=$DIR"
98 danarmak 1.7
99 danarmak 1.9 if [ "$ECVS_SERVER" == "offline" ]; then
100 danarmak 1.1 # we're not required to fetch anything, the module already exists and shouldn't be updated
101 danarmak 1.21 if [ -d "$DIR" ]; then
102 danarmak 1.1 debug-print "$FUNCNAME: offline mode, exiting"
103     return 0
104 danarmak 1.21 else
105 danarmak 1.6 einfo "ERROR: Offline mode specified, but module/subdir not found. Aborting."
106     debug-print "$FUNCNAME: offline mode specified but module/subdir not found, exiting with error"
107 danarmak 1.1 return 1
108 danarmak 1.21 fi
109 danarmak 1.1 fi
110 danarmak 1.18
111 danarmak 1.17 # create target directory as needed
112     if [ ! -d "$DIR" ]; then
113     debug-print "$FUNCNAME: creating cvs directory $DIR"
114     #export SANDBOX_WRITE="$SANDBOX_WRITE:/foobar:/"
115     addwrite /foobar
116     addwrite /
117 danarmak 1.26 mkdir -p "/$DIR"
118     export SANDBOX_WRITE="${SANDBOX_WRITE//:\/foobar:\/}"
119 danarmak 1.17 fi
120 danarmak 1.1
121 danarmak 1.17 # in case ECVS_TOP_DIR is a symlink to a dir, get the real dir's path,
122     # otherwise addwrite() doesn't work.
123 danarmak 1.26 cd -P "$ECVS_TOP_DIR" > /dev/null
124 danarmak 1.17 ECVS_TOP_DIR="`/bin/pwd`"
125 danarmak 1.18 DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}/${ECVS_SUBDIR}"
126 danarmak 1.26 cd "$OLDPWD"
127 danarmak 1.17
128 danarmak 1.18 debug-print "$FUNCNAME: now DIR=$DIR"
129    
130 danarmak 1.6 # disable the sandbox for this dir
131     # not just $DIR because we want to create moduletopdir/CVS too
132 danarmak 1.26 addwrite "$ECVS_TOP_DIR/$ECVS_MODULE"
133 danarmak 1.17
134     # add option for local (non-recursive) fetching
135     [ -n "$ECVS_LOCAL" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -l"
136 danarmak 1.6
137     # prepare a cvspass file just for this session so that cvs thinks we're logged
138     # in at the cvs server. we don't want to mess with ~/.cvspass.
139 danarmak 1.26 echo ":pserver:${ECVS_SERVER} A" > "${T}/cvspass"
140 danarmak 1.6 export CVS_PASSFILE="${T}/cvspass"
141 phoenix 1.24 chown $ECVS_RUNAS "${T}/cvspass"
142 danarmak 1.6 #export CVSROOT=:pserver:${ECVS_USER}@${ECVS_SERVER}
143 danarmak 1.21
144 danarmak 1.6 # Note: cvs update and checkout commands are unified.
145     # we make sure a CVS/ dir exists in our module subdir with the right
146     # Root and Repository entries in it and cvs update.
147    
148 danarmak 1.23 [ "${ECVS_ANON}" == "yes" ] && \
149     newserver=":pserver:${ECVS_USER}@${ECVS_SERVER}" || \
150 phoenix 1.24 newserver=":${ECVS_AUTH}:${ECVS_USER}@${ECVS_SERVER}"
151 danarmak 1.23
152 danarmak 1.6
153     # CVS/Repository files can't (I think) contain two concatenated slashes
154     if [ -n "$ECVS_SUBDIR" ]; then
155     repository="${ECVS_MODULE}/${ECVS_SUBDIR}"
156     else
157     repository="${ECVS_MODULE}"
158     fi
159    
160     debug-print "$FUNCNAME: Root<-$newserver, Repository<-$repository"
161 danarmak 1.18 debug-print "$FUNCNAME: entering directory $DIR"
162 danarmak 1.26 cd "/$DIR"
163 danarmak 1.17
164 danarmak 1.18 if [ ! -d "CVS" ]; then
165 danarmak 1.6 # create a new CVS/ directory (checkout)
166     debug-print "$FUNCNAME: creating new cvs directory"
167    
168     mkdir CVS
169     echo $newserver > CVS/Root
170     echo $repository > CVS/Repository
171     touch CVS/Entries
172    
173     # if we're checking out a subdirectory only, create a CVS/ dir
174     # in the module's top dir so that the user (and we) can cvs update
175     # from there to get the full module.
176     if [ ! -d "$ECVS_TOP_DIR/$ECVS_MODULE/CVS" ]; then
177     debug-print "$FUNCNAME: Copying CVS/ directory to module top-level dir"
178 danarmak 1.26 cp -r CVS "$ECVS_TOP_DIR/$ECVS_MODULE/"
179     echo $ECVS_MODULE > "$ECVS_TOP_DIR/$ECVS_MODULE/CVS/Repository"
180 danarmak 1.6 fi
181    
182     else
183     #update existing module
184     debug-print "$FUNCNAME: updating existing module/subdir"
185    
186 danarmak 1.1 # Switch servers if needed
187 danarmak 1.6 # cvs keeps the server info in the CVS/Root file in every checked-out dir;
188 danarmak 1.1 # we can fix those files to point to the new server
189     oldserver="`cat CVS/Root`"
190     if [ "$newserver" != "$oldserver" ]; then
191    
192     einfo "Changing CVS server from $oldserver to $newserver:"
193     debug-print "$FUNCNAME: Changing CVS server from $oldserver to $newserver:"
194    
195     einfo "Searching for CVS dirs..."
196     cvsdirs="`find . -iname CVS -print`"
197     debug-print "$FUNCNAME: CVS dirs found:"
198     debug-print "$cvsdirs"
199    
200     einfo "Modifying CVS dirs..."
201     for x in $cvsdirs; do
202     debug-print "In $x"
203 danarmak 1.26 echo $newserver > "$x/Root"
204 danarmak 1.1 done
205    
206     fi
207    
208 danarmak 1.6 fi
209 danarmak 1.14
210     # cvs auto-switches branches, how nice
211     # warning: if we do it this way we get multiple -rX options - harmless i think
212     [ -n "$ECVS_BRANCH" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -r$ECVS_BRANCH"
213 danarmak 1.1
214 phoenix 1.24 # Chowning the directory
215 danarmak 1.29 if [ "${ECVS_RUNAS}" != "`whoami`" ]; then
216 danarmak 1.26 chown -R "$ECVS_RUNAS" "/$DIR"
217 phoenix 1.24 fi
218    
219 danarmak 1.6 # finally run the cvs update command
220 danarmak 1.18 debug-print "$FUNCNAME: is in dir `/bin/pwd`"
221 danarmak 1.7 debug-print "$FUNCNAME: running $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS with $ECVS_SERVER for module $ECVS_MODULE subdir $ECVS_SUBDIR"
222     einfo "Running $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS with $ECVS_SERVER for $ECVS_MODULE/$ECVS_SUBDIR..."
223 danarmak 1.23
224     if [ "${ECVS_ANON}" == "no" ]; then
225    
226     debug-print "$FUNCNAME: starting non-anonymous cvs login..."
227     # CVS Login - written in python :: the right way ;)
228     # Tilman Klar, <phoenix@gentoo.org>
229    
230     export CVS_RSH="/usr/bin/ssh"
231    
232     ############################## inline-python #####################################
233     /usr/bin/env python << EndOfFile
234    
235     import pexpect,os
236    
237     mypasswd = "${ECVS_PASS}"
238 phoenix 1.24 myauth = "${ECVS_AUTH}"
239 danarmak 1.23 mytimeout = 10
240    
241 danarmak 1.29 if "${ECVS_RUNAS}" == "`whoami`":
242     mycommand = "${ECVS_CVS_COMMAND} update ${ECVS_CVS_OPTIONS}"
243     else:
244     mycommand = "su ${ECVS_RUNAS} -c \"${ECVS_CVS_COMMAND} update ${ECVS_CVS_OPTIONS}\""
245    
246 phoenix 1.24 if myauth == "ext":
247     child = pexpect.spawn(mycommand)
248    
249     index = child.expect(['continue connecting','word:'], mytimeout)
250     if index == 0:
251     child.sendline('yes')
252     ## Added server to ~/.ssh/known_hosts
253     child.expect('word:', mytimeout)
254     else:
255     ## Server already is in ~/.ssh/known_hosts
256     pass
257    
258     child.sendline(mypasswd)
259     child.expect(pexpect.EOF)
260    
261     elif myauth == "pserver":
262 cretin 1.30 if "${ECVS_RUNAS}" == "`whoami`":
263     mycommand2 = "cvs login"
264     else:
265     mycommand2 = "su ${ECVS_RUNAS} -c \"cvs login\""
266     child = pexpect.spawn(mycommand2)
267 phoenix 1.24 child.expect("CVS password:",mytimeout)
268     child.sendline(mypasswd)
269     child.expect(pexpect.EOF)
270 danarmak 1.23
271 phoenix 1.24 # Logged in - checking out
272 danarmak 1.29 os.system(mycommand)
273    
274 danarmak 1.23 EndOfFile
275     ########################### End of inline-python ##################################
276     else
277 phoenix 1.32 # is anonymous cvs.
278 danarmak 1.23 debug-print "$FUNCNAME: using anonymous cvs login"
279 phoenix 1.32 # is there a password to use for login with this "anonymous" login
280     if [ -n $ECVS_PASS ]; then
281     debug-print "$FUNCNAME: using anonymous cvs login with password"
282    
283     # inline-python #
284     /usr/bin/env python << EndOfFile
285    
286     import pexpect,os
287    
288     myuser = "${ECVS_USER}"
289     mypasswd = "${ECVS_PASS}"
290    
291     mytimeout = 10
292    
293     # implicitly myauth == "pserver" here.
294     mycommand = "cvs login"
295     child = pexpect.spawn(mycommand)
296     child.expect("CVS password:",mytimeout)
297     child.sendline(mypasswd)
298     child.expect(pexpect.EOF)
299     EndOfFile
300     # End of inline-python #
301    
302     fi
303 danarmak 1.23 $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS || die "died running cvs update"
304 phoenix 1.32
305 danarmak 1.23 fi
306    
307 phoenix 1.24 # log out and restore ownership
308 danarmak 1.29 if [ "$ECVS_RUNAS" == "`whoami`" ]; then
309     cvs logout &> /dev/null
310     else
311     su $ECVS_RUNAS -c "cvs logout" &> /dev/null
312     fi
313 danarmak 1.26 chown `whoami` "${T}/cvspass"
314 danarmak 1.1 }
315    
316     cvs_src_unpack() {
317    
318 danarmak 1.21 debug-print-function $FUNCNAME $*
319 danarmak 1.1 cvs_fetch || die "died running cvs_fetch"
320    
321 danarmak 1.21 einfo "Copying $ECVS_MODULE/$ECVS_SUBDIR from $ECVS_TOP_DIR..."
322 danarmak 1.19 debug-print "Copying module $ECVS_MODULE subdir $ECVS_SUBDIR local_mode=$ECVS_LOCAL from $ECVS_TOP_DIR..."
323    
324     # probably redundant, but best to make sure
325 danarmak 1.26 mkdir -p "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR"
326 danarmak 1.7
327     if [ -n "$ECVS_SUBDIR" ]; then
328 danarmak 1.21 if [ -n "$ECVS_LOCAL" ]; then
329 danarmak 1.27 cp -f "$ECVS_TOP_DIR/$ECVS_MODULE/$ECVS_SUBDIR"/* "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR"
330 danarmak 1.21 else
331 danarmak 1.26 cp -Rf "$ECVS_TOP_DIR/$ECVS_MODULE/$ECVS_SUBDIR" "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR/.."
332 danarmak 1.21 fi
333 danarmak 1.7 else
334 danarmak 1.21 if [ -n "$ECVS_LOCAL" ]; then
335 danarmak 1.27 cp -f "$ECVS_TOP_DIR/$ECVS_MODULE"/* $WORKDIR/$ECVS_MODULE
336 danarmak 1.21 else
337 danarmak 1.26 cp -Rf "$ECVS_TOP_DIR/$ECVS_MODULE" "$WORKDIR"
338 danarmak 1.21 fi
339 danarmak 1.7 fi
340 danarmak 1.10
341     # if the directory is empty, remove it; empty directories cannot exist in cvs.
342     # this happens when fex. kde-source requests module/doc/subdir which doesn't exist.
343     # still create the empty directory in workdir though.
344 danarmak 1.28 if [ "`ls -A \"$DIR\"`" == "CVS" ]; then
345 danarmak 1.10 debug-print "$FUNCNAME: removing cvs-empty directory $ECVS_MODULE/$ECVS_SUBDIR"
346 danarmak 1.26 rm -rf "$DIR"
347 danarmak 1.10 fi
348    
349 danarmak 1.21 # implement some of base_src_unpack's functionality;
350     # note however that base.eclass may not have been inherited!
351     if [ -n "$PATCHES" ]; then
352     debug-print "$FUNCNAME: PATCHES=$PATCHES, S=$S, autopatching"
353 danarmak 1.26 cd "$S"
354 danarmak 1.21 for x in $PATCHES; do
355     debug-print "patching from $x"
356 danarmak 1.26 patch -p0 < "$x"
357 danarmak 1.21 done
358     # make sure we don't try to apply patches more than once, since
359     # cvs_src_unpack is usually called several times from e.g. kde-source_src_unpack
360     export PATCHES=""
361     fi
362 danarmak 1.1
363     }
364    
365     EXPORT_FUNCTIONS src_unpack

  ViewVC Help
Powered by ViewVC 1.1.20