| 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 or later |
| 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.12 2002/08/18 23:54:59 danarmak 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="/usr/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 | |
| 42 | # Subdirectory in module to be fetched, default is root "/" = whole module (NOT YET IMPLEMENTED) |
49 | # Subdirectory in module to be fetched, default is not defined = whole module |
|
|
50 | # DO NOT set default to "", if it's defined at all code will break! |
|
|
51 | # don't uncomment following line! |
| 43 | [ -z "$ECVS_MODULE_SUBDIR" ] && ECVS_MODULE_SUBDIR="/" |
52 | #[ -z "$ECVS_MODULE_SUBDIR" ] && ECVS_MODULE_SUBDIR="" |
| 44 | |
53 | |
| 45 | # --- end ebuild-configurable settings --- |
54 | # --- end ebuild-configurable settings --- |
| 46 | |
55 | |
| 47 | debug-print "$ECLASS: init: ECVS_CVS_COMMAND=$ECVS_CVS_COMMAND |
56 | # add cvs to deps |
|
|
57 | DEPEND="$DEPEND dev-util/cvs" |
|
|
58 | |
|
|
59 | # since we now longer have src_fetch as a redefinable ebuild function, |
|
|
60 | # we are forced to call this function from cvs_src_unpack |
|
|
61 | cvs_fetch() { |
|
|
62 | |
|
|
63 | debug-print-function $FUNCNAME $* |
|
|
64 | |
|
|
65 | debug-print "$FUNCNAME: init: |
|
|
66 | ECVS_CVS_COMMAND=$ECVS_CVS_COMMAND |
|
|
67 | ECVS_CVS_OPTIONS=$ECVS_CVS_OPTIONS |
| 48 | ECVS_TOP_DIR=$ECVS_TOP_DIR |
68 | ECVS_TOP_DIR=$ECVS_TOP_DIR |
| 49 | ECVS_SERVER=$ECVS_SERVER |
69 | ECVS_SERVER=$ECVS_SERVER |
| 50 | ECVS_USER=$ECVS_USER |
70 | ECVS_USER=$ECVS_USER |
| 51 | ECVS_PASS=$ECVS_PASS |
71 | ECVS_PASS=$ECVS_PASS |
| 52 | ECS_MODULE=$ECVS_MODULE |
72 | ECS_MODULE=$ECVS_MODULE |
| 53 | ECVS_MODULE_SUBDIR=$ECVS_MODULE_SUBDIR" |
73 | ECVS_MODULE_SUBDIR=$ECVS_SUBDIR |
|
|
74 | ECVS_LOCAL=$ECVS_LOCAL |
|
|
75 | DIR=$DIR" |
|
|
76 | |
|
|
77 | # a shorthand |
|
|
78 | [ -n "$ECVS_SUBDIR" ] && DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}/${ECVS_SUBDIR}" || \ |
|
|
79 | DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}" |
| 54 | |
80 | |
| 55 | # since we now longer have src_fetch as a redefinable ebuild function, |
81 | [ -n "$ECVS_LOCAL" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -l" |
| 56 | # we are forced to call this function from cvs_src_unpack |
82 | |
| 57 | cvs_fetch() { |
83 | addread $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 | |
| 61 | # disable the sandbox for this dir |
97 | # disable the sandbox for this dir |
| 62 | addread ${ECVS_TOP_DIR} |
98 | |
|
|
99 | # not just $DIR because we want to create moduletopdir/CVS too |
| 63 | addwrite ${ECVS_TOP_DIR} |
100 | addwrite $ECVS_TOP_DIR/$ECVS_MODULE |
|
|
101 | |
|
|
102 | if [ ! -d "$DIR" ]; then |
|
|
103 | debug-print "$FUNCNAME: creating cvs directory $DIR" |
|
|
104 | einfo "Creating directory $DIR" |
|
|
105 | export SANDBOX_WRITE="$SANDBOX_WRITE:/foo:/" |
|
|
106 | mkdir -p /$DIR |
|
|
107 | export SANDBOX_WRITE=${SANDBOX_WRITE//:\/foo:\/} |
|
|
108 | fi |
| 64 | |
109 | |
| 65 | # prepare a cvspass file just for this session so that cvs thinks we're logged |
110 | # 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. |
111 | # in at the cvs server. we don't want to mess with ~/.cvspass. |
| 67 | echo ":pserver:${ECVS_SERVER} A" > ${T}/cvspass |
112 | echo ":pserver:${ECVS_SERVER} A" > ${T}/cvspass |
| 68 | export CVS_PASSFILE="${T}/cvspass" |
113 | export CVS_PASSFILE="${T}/cvspass" |
| 69 | |
114 | #export CVSROOT=:pserver:${ECVS_USER}@${ECVS_SERVER} |
| 70 | cd $ECVS_TOP_DIR |
115 | |
| 71 | |
116 | # Note: cvs update and checkout commands are unified. |
|
|
117 | # we make sure a CVS/ dir exists in our module subdir with the right |
|
|
118 | # Root and Repository entries in it and cvs update. |
|
|
119 | |
|
|
120 | newserver=":pserver:anonymous@${ECVS_SERVER}" |
|
|
121 | |
|
|
122 | # CVS/Repository files can't (I think) contain two concatenated slashes |
| 72 | if [ -z "$ECVS_SERVER" ]; then |
123 | if [ -n "$ECVS_SUBDIR" ]; then |
| 73 | # we're not required to fetch anything, the module already exists and shouldn't be updated |
124 | repository="${ECVS_MODULE}/${ECVS_SUBDIR}" |
| 74 | if [ -d "$ECVS_MODULE" ]; then |
125 | else |
| 75 | debug-print "$FUNCNAME: offline mode, exiting" |
126 | repository="${ECVS_MODULE}" |
| 76 | return 0 |
127 | fi |
| 77 | else |
128 | |
| 78 | einfo "ERROR: Offline mode specified, but module not found. Aborting." |
129 | debug-print "$FUNCNAME: Root<-$newserver, Repository<-$repository" |
| 79 | debug-print "$FUNCNAME: offline mode specified but module not found, exiting with error" |
130 | |
| 80 | return 1 |
131 | cd $DIR |
| 81 | fi |
132 | if [ ! -d "$DIR/CVS" ]; then |
|
|
133 | # create a new CVS/ directory (checkout) |
|
|
134 | debug-print "$FUNCNAME: creating new cvs directory" |
|
|
135 | |
|
|
136 | mkdir CVS |
|
|
137 | echo $newserver > CVS/Root |
|
|
138 | echo $repository > CVS/Repository |
|
|
139 | touch CVS/Entries |
|
|
140 | |
|
|
141 | # if we're checking out a subdirectory only, create a CVS/ dir |
|
|
142 | # in the module's top dir so that the user (and we) can cvs update |
|
|
143 | # from there to get the full module. |
|
|
144 | if [ ! -d "$ECVS_TOP_DIR/$ECVS_MODULE/CVS" ]; then |
|
|
145 | debug-print "$FUNCNAME: Copying CVS/ directory to module top-level dir" |
|
|
146 | cp -r CVS $ECVS_TOP_DIR/$ECVS_MODULE/ |
|
|
147 | echo $ECVS_MODULE > $ECVS_TOP_DIR/$ECVS_MODULE/CVS/Repository |
| 82 | fi |
148 | fi |
| 83 | |
149 | |
| 84 | if [ -d "${ECVS_MODULE}" ]; then |
150 | else |
| 85 | #update existing module |
151 | #update existing module |
| 86 | |
152 | debug-print "$FUNCNAME: updating existing module/subdir" |
| 87 | cd ${ECVS_MODULE} |
153 | |
| 88 | |
|
|
| 89 | # Switch servers if needed |
154 | # Switch servers if needed |
| 90 | # cvs keeps the server info in th CVS/Root file in every checked-out dir; |
155 | # 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 |
156 | # we can fix those files to point to the new server |
| 92 | newserver=":pserver:anonymous@${ECVS_SERVER}" |
|
|
| 93 | oldserver="`cat CVS/Root`" |
157 | oldserver="`cat CVS/Root`" |
| 94 | if [ "$newserver" != "$oldserver" ]; then |
158 | if [ "$newserver" != "$oldserver" ]; then |
| 95 | |
159 | |
| 96 | einfo "Changing CVS server from $oldserver to $newserver:" |
160 | einfo "Changing CVS server from $oldserver to $newserver:" |
| 97 | debug-print "$FUNCNAME: Changing CVS server from $oldserver to $newserver:" |
161 | debug-print "$FUNCNAME: Changing CVS server from $oldserver to $newserver:" |
| … | |
… | |
| 107 | echo $newserver > $x/Root |
171 | echo $newserver > $x/Root |
| 108 | done |
172 | done |
| 109 | |
173 | |
| 110 | fi |
174 | fi |
| 111 | |
175 | |
|
|
176 | fi |
|
|
177 | |
|
|
178 | # finally run the cvs update command |
| 112 | debug-print "$FUNCNAME: running $ECVS_CVS_COMMAND update with $ECVS_SERVER for module $ECVS_MODULE" |
179 | 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..." |
180 | 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" |
181 | $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 | |
182 | |
| 126 | } |
183 | } |
| 127 | |
184 | |
| 128 | cvs_src_unpack() { |
185 | cvs_src_unpack() { |
| 129 | |
186 | |
| 130 | debug-print-function $FUNCNAME $* |
187 | debug-print-function $FUNCNAME $* |
| 131 | cvs_fetch || die "died running cvs_fetch" |
188 | cvs_fetch || die "died running cvs_fetch" |
| 132 | |
189 | |
| 133 | einfo "Copying module $ECVS_MODULE from $ECVS_TOP_DIR..." |
190 | einfo "Copying module $ECVS_MODULE from $ECVS_TOP_DIR..." |
| 134 | debug-print "Copying module $ECVS_MODULE from $ECVS_TOP_DIR..." |
191 | debug-print "Copying module $ECVS_MODULE from $ECVS_TOP_DIR..." |
| 135 | # the reason this lives here and not in kde-source_src_unpack |
192 | |
| 136 | # is that in the future after copying the sources we might need to |
193 | if [ -n "$ECVS_SUBDIR" ]; then |
| 137 | # delete them, so this has to be self-contained |
194 | mkdir -p $WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR |
|
|
195 | cp -Rf $ECVS_TOP_DIR/$ECVS_MODULE/$ECVS_SUBDIR/* $WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR/ |
|
|
196 | else |
|
|
197 | if [ -n "$ECVS_LOCAL" ]; then |
| 138 | cp -Rf ${ECVS_TOP_DIR}/${ECVS_MODULE} $WORKDIR |
198 | cp -f $ECVS_TOP_DIR/$ECVS_MODULE/* $WORKDIR/$ECVS_MODULE |
| 139 | |
199 | 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 |
200 | cp -Rf $ECVS_TOP_DIR/$ECVS_MODULE $WORKDIR |
| 147 | fi |
201 | fi |
|
|
202 | fi |
| 148 | |
203 | |
|
|
204 | # if the directory is empty, remove it; empty directories cannot exist in cvs. |
|
|
205 | # this happens when fex. kde-source requests module/doc/subdir which doesn't exist. |
|
|
206 | # still create the empty directory in workdir though. |
|
|
207 | if [ "`ls -A $DIR`" == "CVS" ]; then |
|
|
208 | debug-print "$FUNCNAME: removing cvs-empty directory $ECVS_MODULE/$ECVS_SUBDIR" |
|
|
209 | rm -rf $DIR |
|
|
210 | fi |
|
|
211 | |
|
|
212 | # implement some of base_src_unpack's functionality; |
|
|
213 | # note however that base.eclass may not have been inherited! |
|
|
214 | if [ -n "$PATCHES" ]; then |
|
|
215 | debug-print "$FUNCNAME: PATCHES=$PATCHES, S=$S, autopatching" |
|
|
216 | cd $S |
|
|
217 | for x in $PATCHES; do |
|
|
218 | debug-print "patching from $x" |
|
|
219 | patch -p0 < $x |
|
|
220 | done |
|
|
221 | # make sure we don't try to apply patches more than once, since |
|
|
222 | # cvs_src_unpack is usually called several times from e.g. kde-source_src_unpack |
|
|
223 | export PATCHES="" |
|
|
224 | fi |
|
|
225 | |
| 149 | } |
226 | } |
| 150 | |
227 | |
| 151 | EXPORT_FUNCTIONS src_unpack |
228 | EXPORT_FUNCTIONS src_unpack |
| 152 | |
229 | |
|
|
230 | |