| 1 | # Copyright 1999-2000 Gentoo Technologies, Inc. |
1 | # Copyright 1999-2000 Gentoo Technologies, Inc. |
| 2 | # Distributed under the terms of the GNU General Public License, v2 or later |
2 | # Distributed under the terms of the GNU General Public License v2 |
| 3 | # Author Dan Armak <danarmak@gentoo.org> |
3 | # Author Dan Armak <danarmak@gentoo.org> |
| 4 | # $Header: /var/cvsroot/gentoo-x86/eclass/cvs.eclass,v 1.1 2002/07/17 20:25:16 danarmak Exp $ |
4 | # $Header: /var/cvsroot/gentoo-x86/eclass/cvs.eclass,v 1.22 2002/10/25 19:55:52 vapier Exp $ |
| 5 | # This eclass provides the generic cvs fetching functions. |
5 | # This eclass provides the generic cvs fetching functions. |
| 6 | |
6 | |
| 7 | ECLASS=cvs |
7 | ECLASS=cvs |
| 8 | INHERITED="$INHERITED $ECLASS" |
8 | INHERITED="$INHERITED $ECLASS" |
| 9 | |
9 | |
| … | |
… | |
| 16 | # cvs command to run. you can set fex. "cvs -t" for extensive debug information |
16 | # cvs command to run. you can set fex. "cvs -t" for extensive debug information |
| 17 | # on the cvs onnection. the default of "cvs -q -f -z4" means to be quiet, to disregard |
17 | # on the cvs onnection. the default of "cvs -q -f -z4" means to be quiet, to disregard |
| 18 | # the ~/.cvsrc config file and to use maximum compression. |
18 | # the ~/.cvsrc config file and to use maximum compression. |
| 19 | [ -z "$ECVS_CVS_COMMAND" ] && ECVS_CVS_COMMAND="cvs -q -f -z4" |
19 | [ -z "$ECVS_CVS_COMMAND" ] && ECVS_CVS_COMMAND="cvs -q -f -z4" |
| 20 | |
20 | |
|
|
21 | # cvs options given after the command (i.e. cvs update foo) |
|
|
22 | # don't remove -dP or things won't work |
|
|
23 | [ -z "$ECVS_CVS_OPTIONS" ] && ECVS_CVS_OPTIONS="-dP" |
|
|
24 | |
|
|
25 | # set this for the module/subdir to be fetched non-recursively |
|
|
26 | #[ -n "$ECVS_LOCAL" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -l" |
|
|
27 | |
| 21 | # Where the cvs modules are stored/accessed |
28 | # Where the cvs modules are stored/accessed |
| 22 | [ -z "$ECVS_TOP_DIR" ] && ECVS_TOP_DIR="/usr/src" |
29 | [ -z "$ECVS_TOP_DIR" ] && ECVS_TOP_DIR="${DISTDIR}/cvs-src" |
| 23 | |
30 | |
| 24 | # Name of cvs server, set to "" to disable fetching |
31 | # Name of cvs server, set to "offline" to disable fetching |
| 25 | # (i.e. to assume module is checked out already and don't update it). |
32 | # (i.e. to assume module is checked out already and don't update it). |
| 26 | # Format is server:/dir e.g. "anoncvs.kde.org:/home/kde". remove the other |
33 | # Format is server:/dir e.g. "anoncvs.kde.org:/home/kde". remove the other |
| 27 | # parts of the full CVSROOT (which looks like |
34 | # parts of the full CVSROOT (which looks like |
| 28 | # ":pserver:anonymous@anoncvs.kde.org:/home/kde"); these are added from |
35 | # ":pserver:anonymous@anoncvs.kde.org:/home/kde"); these are added from |
| 29 | # other settings |
36 | # other settings |
| 30 | [ -z "$ECVS_SERVER" ] && ECVS_SERVER="" |
37 | [ -z "$ECVS_SERVER" ] && ECVS_SERVER="offline" |
| 31 | |
38 | |
| 32 | # Username to use |
39 | # Username to use |
| 33 | [ -z "$ECVS_USER" ] && ECVS_USER="anonymous" |
40 | [ -z "$ECVS_USER" ] && ECVS_USER="anonymous" |
| 34 | |
41 | |
| 35 | # Password to use (NOT (YET) SUPPORTED, because cvs doesn't store passwords in plaintext in .cvspass) |
42 | # Password to use (NOT (YET) SUPPORTED, because cvs doesn't store passwords in plaintext in .cvspass) |
| 36 | [ -z "$ECVS_PASS" ] && ECVS_PASS="" |
43 | [ -z "$ECVS_PASS" ] && ECVS_PASS="" |
| 37 | |
44 | |
| 38 | # Module to be fetched, must be set explicitly - |
45 | # Module to be fetched, must be set explicitly - |
| 39 | # I don't like the former ="$NP" default setting |
46 | # I don't like the former ="$PN" default setting |
| 40 | [ -z "$ECVS_MODULE" ] && die "$ECLASS: error: ECVS_MODULE not set, cannot continue" |
47 | [ -z "$ECVS_MODULE" ] && debug-print "$ECLASS: error: ECVS_MODULE not set, cannot continue" |
| 41 | |
48 | |
|
|
49 | # Branch/tag to use, default is HEAD |
|
|
50 | # uncomment the following line to enable the reset-branch-to-HEAD behaviour |
|
|
51 | [ -z "$ECVS_BRANCH" ] && ECVS_BRANCH="HEAD" |
|
|
52 | |
| 42 | # Subdirectory in module to be fetched, default is root "/" = whole module (NOT YET IMPLEMENTED) |
53 | # Subdirectory in module to be fetched, default is not defined = whole module |
|
|
54 | # DO NOT set default to "", if it's defined at all code will break! |
|
|
55 | # don't uncomment following line! |
| 43 | [ -z "$ECVS_MODULE_SUBDIR" ] && ECVS_MODULE_SUBDIR="/" |
56 | #[ -z "$ECVS_SUBDIR" ] && ECVS_SUBDIR="" |
| 44 | |
57 | |
| 45 | # --- end ebuild-configurable settings --- |
58 | # --- end ebuild-configurable settings --- |
| 46 | |
59 | |
| 47 | debug-print "$ECLASS: init: ECVS_CVS_COMMAND=$ECVS_CVS_COMMAND |
60 | # add cvs to deps |
|
|
61 | DEPEND="$DEPEND dev-util/cvs" |
|
|
62 | |
|
|
63 | # since we now longer have src_fetch as a redefinable ebuild function, |
|
|
64 | # we are forced to call this function from cvs_src_unpack |
|
|
65 | cvs_fetch() { |
|
|
66 | |
|
|
67 | debug-print-function $FUNCNAME $* |
|
|
68 | |
|
|
69 | debug-print "$FUNCNAME: init: |
|
|
70 | ECVS_CVS_COMMAND=$ECVS_CVS_COMMAND |
|
|
71 | ECVS_CVS_OPTIONS=$ECVS_CVS_OPTIONS |
| 48 | ECVS_TOP_DIR=$ECVS_TOP_DIR |
72 | ECVS_TOP_DIR=$ECVS_TOP_DIR |
| 49 | ECVS_SERVER=$ECVS_SERVER |
73 | ECVS_SERVER=$ECVS_SERVER |
| 50 | ECVS_USER=$ECVS_USER |
74 | ECVS_USER=$ECVS_USER |
| 51 | ECVS_PASS=$ECVS_PASS |
75 | ECVS_PASS=$ECVS_PASS |
| 52 | ECS_MODULE=$ECVS_MODULE |
76 | ECS_MODULE=$ECVS_MODULE |
| 53 | ECVS_MODULE_SUBDIR=$ECVS_MODULE_SUBDIR" |
77 | ECVS_SUBDIR=$ECVS_SUBDIR |
|
|
78 | ECVS_LOCAL=$ECVS_LOCAL |
|
|
79 | DIR=$DIR" |
| 54 | |
80 | |
| 55 | # since we now longer have src_fetch as a redefinable ebuild function, |
81 | # a shorthand |
| 56 | # we are forced to call this function from cvs_src_unpack |
82 | DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}/${ECVS_SUBDIR}" |
| 57 | cvs_fetch() { |
83 | debug-print "$FUNCNAME: now DIR=$DIR" |
| 58 | |
84 | |
| 59 | debug-print-function $FUNCNAME $* |
85 | if [ "$ECVS_SERVER" == "offline" ]; then |
|
|
86 | # we're not required to fetch anything, the module already exists and shouldn't be updated |
|
|
87 | if [ -d "$DIR" ]; then |
|
|
88 | debug-print "$FUNCNAME: offline mode, exiting" |
|
|
89 | return 0 |
|
|
90 | else |
|
|
91 | einfo "ERROR: Offline mode specified, but module/subdir not found. Aborting." |
|
|
92 | debug-print "$FUNCNAME: offline mode specified but module/subdir not found, exiting with error" |
|
|
93 | return 1 |
|
|
94 | fi |
|
|
95 | fi |
| 60 | |
96 | |
|
|
97 | # create target directory as needed |
|
|
98 | if [ ! -d "$DIR" ]; then |
|
|
99 | debug-print "$FUNCNAME: creating cvs directory $DIR" |
|
|
100 | #export SANDBOX_WRITE="$SANDBOX_WRITE:/foobar:/" |
|
|
101 | addwrite /foobar |
|
|
102 | addwrite / |
|
|
103 | mkdir -p /$DIR |
|
|
104 | export SANDBOX_WRITE=${SANDBOX_WRITE//:\/foobar:\/} |
|
|
105 | fi |
|
|
106 | |
|
|
107 | # in case ECVS_TOP_DIR is a symlink to a dir, get the real dir's path, |
|
|
108 | # otherwise addwrite() doesn't work. |
|
|
109 | cd -P $ECVS_TOP_DIR > /dev/null |
|
|
110 | ECVS_TOP_DIR="`/bin/pwd`" |
|
|
111 | DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}/${ECVS_SUBDIR}" |
|
|
112 | cd $OLDPWD |
|
|
113 | |
|
|
114 | debug-print "$FUNCNAME: now DIR=$DIR" |
|
|
115 | |
| 61 | # disable the sandbox for this dir |
116 | # disable the sandbox for this dir |
| 62 | addread ${ECVS_TOP_DIR} |
117 | # not just $DIR because we want to create moduletopdir/CVS too |
| 63 | addwrite ${ECVS_TOP_DIR} |
118 | addwrite $ECVS_TOP_DIR/$ECVS_MODULE |
| 64 | |
119 | |
|
|
120 | # add option for local (non-recursive) fetching |
|
|
121 | [ -n "$ECVS_LOCAL" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -l" |
|
|
122 | |
| 65 | # prepare a cvspass file just for this session so that cvs thinks we're logged |
123 | # prepare a cvspass file just for this session so that cvs thinks we're logged |
| 66 | # in at the cvs server. we don't want to mess with ~/.cvspass. |
124 | # in at the cvs server. we don't want to mess with ~/.cvspass. |
| 67 | echo ":pserver:${ECVS_SERVER} A" > ${T}/cvspass |
125 | echo ":pserver:${ECVS_SERVER} A" > ${T}/cvspass |
| 68 | export CVS_PASSFILE="${T}/cvspass" |
126 | export CVS_PASSFILE="${T}/cvspass" |
| 69 | |
127 | #export CVSROOT=:pserver:${ECVS_USER}@${ECVS_SERVER} |
| 70 | cd $ECVS_TOP_DIR |
128 | |
| 71 | |
129 | # Note: cvs update and checkout commands are unified. |
|
|
130 | # we make sure a CVS/ dir exists in our module subdir with the right |
|
|
131 | # Root and Repository entries in it and cvs update. |
|
|
132 | |
|
|
133 | newserver=":pserver:${ECVS_USER}@${ECVS_SERVER}" |
|
|
134 | |
|
|
135 | # CVS/Repository files can't (I think) contain two concatenated slashes |
| 72 | if [ -z "$ECVS_SERVER" ]; then |
136 | if [ -n "$ECVS_SUBDIR" ]; then |
| 73 | # we're not required to fetch anything, the module already exists and shouldn't be updated |
137 | repository="${ECVS_MODULE}/${ECVS_SUBDIR}" |
| 74 | if [ -d "$ECVS_MODULE" ]; then |
138 | else |
| 75 | debug-print "$FUNCNAME: offline mode, exiting" |
139 | repository="${ECVS_MODULE}" |
| 76 | return 0 |
140 | fi |
| 77 | else |
141 | |
| 78 | einfo "ERROR: Offline mode specified, but module not found. Aborting." |
142 | debug-print "$FUNCNAME: Root<-$newserver, Repository<-$repository" |
| 79 | debug-print "$FUNCNAME: offline mode specified but module not found, exiting with error" |
143 | debug-print "$FUNCNAME: entering directory $DIR" |
| 80 | return 1 |
144 | cd /$DIR |
| 81 | fi |
145 | |
|
|
146 | if [ ! -d "CVS" ]; then |
|
|
147 | # create a new CVS/ directory (checkout) |
|
|
148 | debug-print "$FUNCNAME: creating new cvs directory" |
|
|
149 | |
|
|
150 | mkdir CVS |
|
|
151 | echo $newserver > CVS/Root |
|
|
152 | echo $repository > CVS/Repository |
|
|
153 | touch CVS/Entries |
|
|
154 | |
|
|
155 | # if we're checking out a subdirectory only, create a CVS/ dir |
|
|
156 | # in the module's top dir so that the user (and we) can cvs update |
|
|
157 | # from there to get the full module. |
|
|
158 | if [ ! -d "$ECVS_TOP_DIR/$ECVS_MODULE/CVS" ]; then |
|
|
159 | debug-print "$FUNCNAME: Copying CVS/ directory to module top-level dir" |
|
|
160 | cp -r CVS $ECVS_TOP_DIR/$ECVS_MODULE/ |
|
|
161 | echo $ECVS_MODULE > $ECVS_TOP_DIR/$ECVS_MODULE/CVS/Repository |
| 82 | fi |
162 | fi |
| 83 | |
163 | |
| 84 | if [ -d "${ECVS_MODULE}" ]; then |
164 | else |
| 85 | #update existing module |
165 | #update existing module |
| 86 | |
166 | debug-print "$FUNCNAME: updating existing module/subdir" |
| 87 | cd ${ECVS_MODULE} |
167 | |
| 88 | |
|
|
| 89 | # Switch servers if needed |
168 | # Switch servers if needed |
| 90 | # cvs keeps the server info in th CVS/Root file in every checked-out dir; |
169 | # cvs keeps the server info in the CVS/Root file in every checked-out dir; |
| 91 | # we can fix those files to point to the new server |
170 | # we can fix those files to point to the new server |
| 92 | newserver=":pserver:anonymous@${ECVS_SERVER}" |
|
|
| 93 | oldserver="`cat CVS/Root`" |
171 | oldserver="`cat CVS/Root`" |
| 94 | if [ "$newserver" != "$oldserver" ]; then |
172 | if [ "$newserver" != "$oldserver" ]; then |
| 95 | |
173 | |
| 96 | einfo "Changing CVS server from $oldserver to $newserver:" |
174 | einfo "Changing CVS server from $oldserver to $newserver:" |
| 97 | debug-print "$FUNCNAME: Changing CVS server from $oldserver to $newserver:" |
175 | debug-print "$FUNCNAME: Changing CVS server from $oldserver to $newserver:" |
| … | |
… | |
| 107 | echo $newserver > $x/Root |
185 | echo $newserver > $x/Root |
| 108 | done |
186 | done |
| 109 | |
187 | |
| 110 | fi |
188 | fi |
| 111 | |
189 | |
|
|
190 | fi |
|
|
191 | |
|
|
192 | # cvs auto-switches branches, how nice |
|
|
193 | # warning: if we do it this way we get multiple -rX options - harmless i think |
|
|
194 | [ -n "$ECVS_BRANCH" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -r$ECVS_BRANCH" |
|
|
195 | |
|
|
196 | # finally run the cvs update command |
|
|
197 | debug-print "$FUNCNAME: is in dir `/bin/pwd`" |
| 112 | debug-print "$FUNCNAME: running $ECVS_CVS_COMMAND update with $ECVS_SERVER for module $ECVS_MODULE" |
198 | debug-print "$FUNCNAME: running $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS with $ECVS_SERVER for module $ECVS_MODULE subdir $ECVS_SUBDIR" |
| 113 | einfo "Running $ECVS_CVS_COMMAND update with $ECVS_SERVER for module $ECVS_MODULE..." |
199 | einfo "Running $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS with $ECVS_SERVER for $ECVS_MODULE/$ECVS_SUBDIR..." |
| 114 | $ECVS_CVS_COMMAND update -dP || die "died running cvs update" |
200 | $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS || die "died running cvs update" |
| 115 | |
|
|
| 116 | else |
|
|
| 117 | # checkout module |
|
|
| 118 | |
|
|
| 119 | export CVSROOT=:pserver:${ECVS_USER}@${ECVS_SERVER} |
|
|
| 120 | debug-print "$FUNCNAME: running $ECVS_CVS_COMMAND checkout -P $ECVS_MODULE with $CVSROOT..." |
|
|
| 121 | einfo "Running $ECVS_CVS_COMMAND checkout -P $ECVS_MODULE with $CVSROOT..." |
|
|
| 122 | $ECVS_CVS_COMMAND checkout -P $ECVS_MODULE || die "died running cvs checkout" |
|
|
| 123 | |
|
|
| 124 | fi |
|
|
| 125 | |
201 | |
| 126 | } |
202 | } |
| 127 | |
203 | |
| 128 | cvs_src_unpack() { |
204 | cvs_src_unpack() { |
| 129 | |
205 | |
| 130 | debug-print-function $FUNCNAME $* |
206 | debug-print-function $FUNCNAME $* |
| 131 | cvs_fetch || die "died running cvs_fetch" |
207 | cvs_fetch || die "died running cvs_fetch" |
| 132 | |
208 | |
| 133 | einfo "Copying module $ECVS_MODULE from $ECVS_TOP_DIR..." |
209 | einfo "Copying $ECVS_MODULE/$ECVS_SUBDIR from $ECVS_TOP_DIR..." |
| 134 | debug-print "Copying module $ECVS_MODULE from $ECVS_TOP_DIR..." |
210 | debug-print "Copying module $ECVS_MODULE subdir $ECVS_SUBDIR local_mode=$ECVS_LOCAL from $ECVS_TOP_DIR..." |
| 135 | # the reason this lives here and not in kde-source_src_unpack |
211 | |
| 136 | # is that in the future after copying the sources we might need to |
212 | # probably redundant, but best to make sure |
| 137 | # delete them, so this has to be self-contained |
213 | mkdir -p $WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR |
|
|
214 | |
|
|
215 | if [ -n "$ECVS_SUBDIR" ]; then |
|
|
216 | if [ -n "$ECVS_LOCAL" ]; then |
|
|
217 | cp -f $ECVS_TOP_DIR/$ECVS_MODULE/$ECVS_SUBDIR/* $WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR |
|
|
218 | else |
|
|
219 | cp -Rf $ECVS_TOP_DIR/$ECVS_MODULE/$ECVS_SUBDIR $WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR/.. |
|
|
220 | fi |
|
|
221 | else |
|
|
222 | if [ -n "$ECVS_LOCAL" ]; then |
| 138 | cp -Rf ${ECVS_TOP_DIR}/${ECVS_MODULE} $WORKDIR |
223 | cp -f $ECVS_TOP_DIR/$ECVS_MODULE/* $WORKDIR/$ECVS_MODULE |
| 139 | |
224 | else |
| 140 | # typically for kde cvs, the admin subdir lives in the kde-common module |
|
|
| 141 | # which is also needed |
|
|
| 142 | if [ ! -d "${WORKDIR}/${ECVS_MODULE}/admin" ]; then |
|
|
| 143 | ECVS_MODULE="kde-common" cvs_fetch |
|
|
| 144 | einfo "Copying admin/ subdir from module kde-common, $ECVS_TOP_DIR..." |
|
|
| 145 | debug-print "Copying admin/ subdir from module kde-common, $ECVS_TOP_DIR..." |
|
|
| 146 | cp -Rf ${ECVS_TOP_DIR}/${ECVS_MODULE} $WORKDIR |
225 | cp -Rf $ECVS_TOP_DIR/$ECVS_MODULE $WORKDIR |
| 147 | fi |
226 | fi |
|
|
227 | fi |
| 148 | |
228 | |
|
|
229 | # if the directory is empty, remove it; empty directories cannot exist in cvs. |
|
|
230 | # this happens when fex. kde-source requests module/doc/subdir which doesn't exist. |
|
|
231 | # still create the empty directory in workdir though. |
|
|
232 | if [ "`ls -A $DIR`" == "CVS" ]; then |
|
|
233 | debug-print "$FUNCNAME: removing cvs-empty directory $ECVS_MODULE/$ECVS_SUBDIR" |
|
|
234 | rm -rf $DIR |
|
|
235 | fi |
|
|
236 | |
|
|
237 | # implement some of base_src_unpack's functionality; |
|
|
238 | # note however that base.eclass may not have been inherited! |
|
|
239 | if [ -n "$PATCHES" ]; then |
|
|
240 | debug-print "$FUNCNAME: PATCHES=$PATCHES, S=$S, autopatching" |
|
|
241 | cd $S |
|
|
242 | for x in $PATCHES; do |
|
|
243 | debug-print "patching from $x" |
|
|
244 | patch -p0 < $x |
|
|
245 | done |
|
|
246 | # make sure we don't try to apply patches more than once, since |
|
|
247 | # cvs_src_unpack is usually called several times from e.g. kde-source_src_unpack |
|
|
248 | export PATCHES="" |
|
|
249 | fi |
|
|
250 | |
| 149 | } |
251 | } |
| 150 | |
252 | |
| 151 | EXPORT_FUNCTIONS src_unpack |
253 | EXPORT_FUNCTIONS src_unpack |
| 152 | |
|
|