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

Contents of /eclass/cvs.eclass

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.31 - (show annotations) (download)
Sun Feb 16 04:26:21 2003 UTC (11 years, 5 months ago) by vapier
Branch: MAIN
Changes since 1.30: +4 -2 lines
header fixes

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

  ViewVC Help
Powered by ViewVC 1.1.20