gentoo-x86/eclass/cvs.eclass

# Copyright 1999-2003 Gentoo Technologies, Inc.
# Distributed under the terms of the GNU General Public License v2
# $Header: $
#
# Author Dan Armak <danarmak@gentoo.org>
#
# This eclass provides the generic cvs fetching functions.

ECLASS=cvs
INHERITED="$INHERITED $ECLASS"

# You shouldn't change these settings yourself! The ebuild/eclass inheriting this eclass
# will take care of that. If you want to set the global KDE cvs ebuilds' settings,
# see the comments in kde-source.eclass.

# --- begin ebuild-configurable settings

# cvs command to run. you can set fex. "cvs -t" for extensive debug information
# on the cvs onnection. the default of "cvs -q -f -z4" means to be quiet, to disregard
# the ~/.cvsrc config file and to use maximum compression.
[ -z "$ECVS_CVS_COMMAND" ] && ECVS_CVS_COMMAND="cvs -q -f -z4"

# cvs options given after the command (i.e. cvs update foo)
# don't remove -dP or things won't work
[ -z "$ECVS_CVS_OPTIONS" ] && ECVS_CVS_OPTIONS="-dP"

# set this for the module/subdir to be fetched non-recursively
#[ -n "$ECVS_LOCAL" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -l"

# Where the cvs modules are stored/accessed
[ -z "$ECVS_TOP_DIR" ] && ECVS_TOP_DIR="${DISTDIR}/cvs-src"

# Name of cvs server, set to "offline" to disable fetching
# (i.e. to assume module is checked out already and don't update it).
# Format is server:/dir e.g. "anoncvs.kde.org:/home/kde". remove the other
# parts of the full CVSROOT (which looks like
# ":pserver:anonymous@anoncvs.kde.org:/home/kde"); these are added from
# other settings
[ -z "$ECVS_SERVER" ] && ECVS_SERVER="offline"

# Anonymous cvs login?
# if 'yes' uses :pserver: with empty password, if 'no' uses :ext: with $ECVS_PASS, other values not allowed
[ -z "$ECVS_ANON" ] && ECVS_ANON="yes"

# Authentication method to use on ECVS_ANON="no" - possible values are "pserver" and "ext"
[ -z "$ECVS_AUTH" ] && ECVS_AUTH="ext"

# Use su to run cvs as user
[ -z "$ECVS_RUNAS" ] && ECVS_RUNAS="`whoami`"

# Username to use
[ -z "$ECVS_USER" ] && ECVS_USER="anonymous"

# Password to use if anonymous login is off
[ -z "$ECVS_PASS" ] && ECVS_PASS=""

# Module to be fetched, must be set explicitly -
# I don't like the former ="$PN" default setting
[ -z "$ECVS_MODULE" ] && debug-print "$ECLASS: error: ECVS_MODULE not set, cannot continue"

# Branch/tag to use, default is HEAD
# uncomment the following line to enable the reset-branch-to-HEAD behaviour
[ -z "$ECVS_BRANCH" ] && ECVS_BRANCH="HEAD"

# Subdirectory in module to be fetched, default is not defined = whole module
# DO NOT set default to "", if it's defined at all code will break!
# don't uncomment following line!
#[ -z "$ECVS_SUBDIR" ] && ECVS_SUBDIR=""

# --- end ebuild-configurable settings ---

# add cvs to deps
DEPEND="$DEPEND dev-util/cvs dev-python/pexpect"

# since we now longer have src_fetch as a redefinable ebuild function,
# we are forced to call this function from cvs_src_unpack
cvs_fetch() {

        debug-print-function $FUNCNAME $*

        debug-print "$FUNCNAME: init:
ECVS_CVS_COMMAND=$ECVS_CVS_COMMAND
ECVS_CVS_OPTIONS=$ECVS_CVS_OPTIONS
ECVS_TOP_DIR=$ECVS_TOP_DIR
ECVS_SERVER=$ECVS_SERVER
ECVS_ANON=$ECVS_ANON
ECVS_USER=$ECVS_USER
ECVS_PASS=$ECVS_PASS
ECS_MODULE=$ECVS_MODULE
ECVS_SUBDIR=$ECVS_SUBDIR
ECVS_LOCAL=$ECVS_LOCAL
DIR=$DIR"

        # a shorthand
        DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}/${ECVS_SUBDIR}"
        debug-print "$FUNCNAME: now DIR=$DIR"

        if [ "$ECVS_SERVER" == "offline" ]; then
                # we're not required to fetch anything, the module already exists and shouldn't be updated
                if [ -d "$DIR" ]; then
                        debug-print "$FUNCNAME: offline mode, exiting"
                        return 0
                else
                        einfo "ERROR: Offline mode specified, but module/subdir not found. Aborting."
                        debug-print "$FUNCNAME: offline mode specified but module/subdir not found, exiting with error"
                        return 1
                fi
        fi

        # create target directory as needed
        if [ ! -d "$DIR" ]; then
                debug-print "$FUNCNAME: creating cvs directory $DIR"
                #export SANDBOX_WRITE="$SANDBOX_WRITE:/foobar:/"
                addwrite /foobar
                addwrite /
                mkdir -p "/$DIR"
                export SANDBOX_WRITE="${SANDBOX_WRITE//:\/foobar:\/}"
        fi

        # in case ECVS_TOP_DIR is a symlink to a dir, get the real dir's path,
        # otherwise addwrite() doesn't work.
        cd -P "$ECVS_TOP_DIR" > /dev/null
        ECVS_TOP_DIR="`/bin/pwd`"
        DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}/${ECVS_SUBDIR}"
        cd "$OLDPWD"
        
        debug-print "$FUNCNAME: now DIR=$DIR"
        
        # disable the sandbox for this dir
        # not just $DIR because we want to create moduletopdir/CVS too
        addwrite "$ECVS_TOP_DIR/$ECVS_MODULE"

        # add option for local (non-recursive) fetching
        [ -n "$ECVS_LOCAL" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -l"
        
        # prepare a cvspass file just for this session so that cvs thinks we're logged
        # in at the cvs server. we don't want to mess with ~/.cvspass.
        echo ":pserver:${ECVS_SERVER} A" > "${T}/cvspass"
        export CVS_PASSFILE="${T}/cvspass"
        chown $ECVS_RUNAS "${T}/cvspass"
        #export CVSROOT=:pserver:${ECVS_USER}@${ECVS_SERVER}
        
        # Note: cvs update and checkout commands are unified.
        # we make sure a CVS/ dir exists in our module subdir with the right
        # Root and Repository entries in it and cvs update.
        
        [ "${ECVS_ANON}" == "yes" ] && \
                newserver=":pserver:${ECVS_USER}@${ECVS_SERVER}" || \
                newserver=":${ECVS_AUTH}:${ECVS_USER}@${ECVS_SERVER}" 
                
        
        # CVS/Repository files can't (I think) contain two concatenated slashes
        if [ -n "$ECVS_SUBDIR" ]; then
                repository="${ECVS_MODULE}/${ECVS_SUBDIR}"
        else
                repository="${ECVS_MODULE}"
        fi
        
        debug-print "$FUNCNAME: Root<-$newserver, Repository<-$repository"
        debug-print "$FUNCNAME: entering directory $DIR"
        cd "/$DIR"
        
        if [ ! -d "CVS" ]; then
                # create a new CVS/ directory (checkout)
                debug-print "$FUNCNAME: creating new cvs directory"
                
                mkdir CVS
                echo $newserver > CVS/Root
                echo $repository > CVS/Repository
                touch CVS/Entries
                
                # if we're checking out a subdirectory only, create a CVS/ dir
                # in the module's top dir so that the user (and we) can cvs update
                # from there to get the full module.
                if [ ! -d "$ECVS_TOP_DIR/$ECVS_MODULE/CVS" ]; then
                        debug-print "$FUNCNAME: Copying CVS/ directory to module top-level dir"
                        cp -r CVS "$ECVS_TOP_DIR/$ECVS_MODULE/"
                        echo $ECVS_MODULE > "$ECVS_TOP_DIR/$ECVS_MODULE/CVS/Repository"
                fi
                
        else
                #update existing module
                debug-print "$FUNCNAME: updating existing module/subdir"
                
                # Switch servers if needed
                # cvs keeps the server info in the CVS/Root file in every checked-out dir;
                # we can fix those files to point to the new server
                oldserver="`cat CVS/Root`"
                if [ "$newserver" != "$oldserver" ]; then

                        einfo "Changing CVS server from $oldserver to $newserver:"
                        debug-print "$FUNCNAME: Changing CVS server from $oldserver to $newserver:"

                        einfo "Searching for CVS dirs..."
                        cvsdirs="`find . -iname CVS -print`"
                        debug-print "$FUNCNAME: CVS dirs found:"
                        debug-print "$cvsdirs"

                        einfo "Modifying CVS dirs..."
                        for x in $cvsdirs; do
                                debug-print "In $x"
                                echo $newserver > "$x/Root"
                        done

                fi

        fi

        # cvs auto-switches branches, how nice
        # warning: if we do it this way we get multiple -rX options - harmless i think
        [ -n "$ECVS_BRANCH" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -r$ECVS_BRANCH"

        # Chowning the directory
        if [ "${ECVS_RUNAS}" != "`whoami`" ]; then
                chown -R "$ECVS_RUNAS" "/$DIR"
        fi

        # finally run the cvs update command
        debug-print "$FUNCNAME: is in dir `/bin/pwd`"
        debug-print "$FUNCNAME: running $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS with $ECVS_SERVER for module $ECVS_MODULE subdir $ECVS_SUBDIR"
        einfo "Running $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS with $ECVS_SERVER for $ECVS_MODULE/$ECVS_SUBDIR..."

        if [ "${ECVS_ANON}" == "no" ]; then
        
                debug-print "$FUNCNAME: starting non-anonymous cvs login..."
                # CVS Login - written in python :: the right way ;)
                # Tilman Klar, <phoenix@gentoo.org>

                export CVS_RSH="/usr/bin/ssh"

############################## inline-python #####################################
/usr/bin/env python << EndOfFile

import pexpect,os

mypasswd  = "${ECVS_PASS}"
myauth    = "${ECVS_AUTH}"
mytimeout = 10

if "${ECVS_RUNAS}" == "`whoami`":
    mycommand = "${ECVS_CVS_COMMAND} update ${ECVS_CVS_OPTIONS}"
else:
    mycommand = "su ${ECVS_RUNAS} -c \"${ECVS_CVS_COMMAND} update ${ECVS_CVS_OPTIONS}\""

if myauth == "ext":
        child = pexpect.spawn(mycommand)

        index = child.expect(['continue connecting','word:'], mytimeout)
        if index == 0:
                child.sendline('yes')
                ## Added server to ~/.ssh/known_hosts
                child.expect('word:', mytimeout)
        else:
                ## Server already is in ~/.ssh/known_hosts
                pass

        child.sendline(mypasswd)
        child.expect(pexpect.EOF)       

elif myauth == "pserver":
        if "${ECVS_RUNAS}" == "`whoami`":
                mycommand2 = "cvs login"
        else:
                mycommand2 = "su ${ECVS_RUNAS} -c \"cvs login\""
        child = pexpect.spawn(mycommand2)
        child.expect("CVS password:",mytimeout)
        child.sendline(mypasswd)
        child.expect(pexpect.EOF)

        # Logged in - checking out
        os.system(mycommand)
        
EndOfFile
########################### End of inline-python ##################################
        else
                debug-print "$FUNCNAME: using anonymous cvs login"
                $ECVS_CVS_COMMAND update $ECVS_CVS_OPTIONS || die "died running cvs update"
        fi

        # log out and restore ownership
        if [ "$ECVS_RUNAS" == "`whoami`" ]; then
            cvs logout &> /dev/null
        else
            su $ECVS_RUNAS -c "cvs logout" &> /dev/null
        fi
        chown `whoami` "${T}/cvspass"
}

cvs_src_unpack() {

        debug-print-function $FUNCNAME $*
        cvs_fetch || die "died running cvs_fetch"

        einfo "Copying $ECVS_MODULE/$ECVS_SUBDIR from $ECVS_TOP_DIR..."
        debug-print "Copying module $ECVS_MODULE subdir $ECVS_SUBDIR local_mode=$ECVS_LOCAL from $ECVS_TOP_DIR..."
        
        # probably redundant, but best to make sure
        mkdir -p "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR"
        
        if [ -n "$ECVS_SUBDIR" ]; then
                if [ -n "$ECVS_LOCAL" ]; then
                        cp -f "$ECVS_TOP_DIR/$ECVS_MODULE/$ECVS_SUBDIR"/* "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR"
                else
                        cp -Rf "$ECVS_TOP_DIR/$ECVS_MODULE/$ECVS_SUBDIR" "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR/.."
                fi    
        else
                if [ -n "$ECVS_LOCAL" ]; then
                        cp -f "$ECVS_TOP_DIR/$ECVS_MODULE"/* $WORKDIR/$ECVS_MODULE
                else
                        cp -Rf "$ECVS_TOP_DIR/$ECVS_MODULE" "$WORKDIR"
                fi
        fi
        
        # if the directory is empty, remove it; empty directories cannot exist in cvs.
        # this happens when fex. kde-source requests module/doc/subdir which doesn't exist.
        # still create the empty directory in workdir though.
        if [ "`ls -A \"$DIR\"`" == "CVS" ]; then
                debug-print "$FUNCNAME: removing cvs-empty directory $ECVS_MODULE/$ECVS_SUBDIR"
                rm -rf "$DIR"
        fi
            
        # implement some of base_src_unpack's functionality;
        # note however that base.eclass may not have been inherited!
        if [ -n "$PATCHES" ]; then
                debug-print "$FUNCNAME: PATCHES=$PATCHES, S=$S, autopatching"
                cd "$S"
                for x in $PATCHES; do
                        debug-print "patching from $x"
                        patch -p0 < "$x"
                done
                # make sure we don't try to apply patches more than once, since
                # cvs_src_unpack is usually called several times from e.g. kde-source_src_unpack
                export PATCHES=""
        fi

}

EXPORT_FUNCTIONS src_unpack
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	vapier	1.31	# $Header: $
4			#
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	danarmak	1.23	# Password to use if anonymous login is off
55	danarmak	1.1	[ -z "$ECVS_PASS" ] && ECVS_PASS=""
56
57			# Module to be fetched, must be set explicitly -
58	danarmak	1.12	# I don't like the former ="$PN" default setting
59			[ -z "$ECVS_MODULE" ] && debug-print "$ECLASS: error: ECVS_MODULE not set, cannot continue"
60	danarmak	1.1
61	danarmak	1.14	# 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	danarmak	1.6	# 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	danarmak	1.18	#[ -z "$ECVS_SUBDIR" ] && ECVS_SUBDIR=""
69	danarmak	1.1
70			# --- end ebuild-configurable settings ---
71
72	danarmak	1.6	# add cvs to deps
73	danarmak	1.23	DEPEND="$DEPEND dev-util/cvs dev-python/pexpect"
74	danarmak	1.1
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	danarmak	1.6	debug-print "$FUNCNAME: init:
82			ECVS_CVS_COMMAND=$ECVS_CVS_COMMAND
83	danarmak	1.7	ECVS_CVS_OPTIONS=$ECVS_CVS_OPTIONS
84	danarmak	1.6	ECVS_TOP_DIR=$ECVS_TOP_DIR
85			ECVS_SERVER=$ECVS_SERVER
86	danarmak	1.23	ECVS_ANON=$ECVS_ANON
87	danarmak	1.6	ECVS_USER=$ECVS_USER
88			ECVS_PASS=$ECVS_PASS
89			ECS_MODULE=$ECVS_MODULE
90	danarmak	1.18	ECVS_SUBDIR=$ECVS_SUBDIR
91	danarmak	1.7	ECVS_LOCAL=$ECVS_LOCAL
92	danarmak	1.6	DIR=$DIR"
93	danarmak	1.14
94	danarmak	1.6	# a shorthand
95	danarmak	1.17	DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}/${ECVS_SUBDIR}"
96	danarmak	1.18	debug-print "$FUNCNAME: now DIR=$DIR"
97	danarmak	1.7
98	danarmak	1.9	if [ "$ECVS_SERVER" == "offline" ]; then
99	danarmak	1.1	# we're not required to fetch anything, the module already exists and shouldn't be updated
100	danarmak	1.21	if [ -d "$DIR" ]; then
101	danarmak	1.1	debug-print "$FUNCNAME: offline mode, exiting"
102			return 0
103	danarmak	1.21	else
104	danarmak	1.6	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	danarmak	1.1	return 1
107	danarmak	1.21	fi
108	danarmak	1.1	fi
109	danarmak	1.18
110	danarmak	1.17	# 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	danarmak	1.26	mkdir -p "/$DIR"
117			export SANDBOX_WRITE="${SANDBOX_WRITE//:\/foobar:\/}"
118	danarmak	1.17	fi
119	danarmak	1.1
120	danarmak	1.17	# in case ECVS_TOP_DIR is a symlink to a dir, get the real dir's path,
121			# otherwise addwrite() doesn't work.
122	danarmak	1.26	cd -P "$ECVS_TOP_DIR" > /dev/null
123	danarmak	1.17	ECVS_TOP_DIR="`/bin/pwd`"
124	danarmak	1.18	DIR="${ECVS_TOP_DIR}/${ECVS_MODULE}/${ECVS_SUBDIR}"
125	danarmak	1.26	cd "$OLDPWD"
126	danarmak	1.17
127	danarmak	1.18	debug-print "$FUNCNAME: now DIR=$DIR"
128
129	danarmak	1.6	# disable the sandbox for this dir
130			# not just $DIR because we want to create moduletopdir/CVS too
131	danarmak	1.26	addwrite "$ECVS_TOP_DIR/$ECVS_MODULE"
132	danarmak	1.17
133			# add option for local (non-recursive) fetching
134			[ -n "$ECVS_LOCAL" ] && ECVS_CVS_OPTIONS="$ECVS_CVS_OPTIONS -l"
135	danarmak	1.6
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	danarmak	1.26	echo ":pserver:${ECVS_SERVER} A" > "${T}/cvspass"
139	danarmak	1.6	export CVS_PASSFILE="${T}/cvspass"
140	phoenix	1.24	chown $ECVS_RUNAS "${T}/cvspass"
141	danarmak	1.6	#export CVSROOT=:pserver:${ECVS_USER}@${ECVS_SERVER}
142	danarmak	1.21
143	danarmak	1.6	# 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	danarmak	1.23	[ "${ECVS_ANON}" == "yes" ] && \
148			newserver=":pserver:${ECVS_USER}@${ECVS_SERVER}" \|\| \
149	phoenix	1.24	newserver=":${ECVS_AUTH}:${ECVS_USER}@${ECVS_SERVER}"
150	danarmak	1.23
151	danarmak	1.6
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	danarmak	1.18	debug-print "$FUNCNAME: entering directory $DIR"
161	danarmak	1.26	cd "/$DIR"
162	danarmak	1.17
163	danarmak	1.18	if [ ! -d "CVS" ]; then
164	danarmak	1.6	# 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	danarmak	1.26	cp -r CVS "$ECVS_TOP_DIR/$ECVS_MODULE/"
178			echo $ECVS_MODULE > "$ECVS_TOP_DIR/$ECVS_MODULE/CVS/Repository"
179	danarmak	1.6	fi
180
181			else
182			#update existing module
183			debug-print "$FUNCNAME: updating existing module/subdir"
184
185	danarmak	1.1	# Switch servers if needed
186	danarmak	1.6	# cvs keeps the server info in the CVS/Root file in every checked-out dir;
187	danarmak	1.1	# 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	danarmak	1.26	echo $newserver > "$x/Root"
203	danarmak	1.1	done
204
205			fi
206
207	danarmak	1.6	fi
208	danarmak	1.14
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	danarmak	1.1
213	phoenix	1.24	# Chowning the directory
214	danarmak	1.29	if [ "${ECVS_RUNAS}" != "`whoami`" ]; then
215	danarmak	1.26	chown -R "$ECVS_RUNAS" "/$DIR"
216	phoenix	1.24	fi
217
218	danarmak	1.6	# finally run the cvs update command
219	danarmak	1.18	debug-print "$FUNCNAME: is in dir `/bin/pwd`"
220	danarmak	1.7	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	danarmak	1.23
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	phoenix	1.24	myauth = "${ECVS_AUTH}"
238	danarmak	1.23	mytimeout = 10
239
240	danarmak	1.29	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	phoenix	1.24	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	cretin	1.30	if "${ECVS_RUNAS}" == "`whoami`":
262			mycommand2 = "cvs login"
263			else:
264			mycommand2 = "su ${ECVS_RUNAS} -c \"cvs login\""
265			child = pexpect.spawn(mycommand2)
266	phoenix	1.24	child.expect("CVS password:",mytimeout)
267			child.sendline(mypasswd)
268			child.expect(pexpect.EOF)
269	danarmak	1.23
270	phoenix	1.24	# Logged in - checking out
271	danarmak	1.29	os.system(mycommand)
272
273	danarmak	1.23	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	phoenix	1.24	# log out and restore ownership
281	danarmak	1.29	if [ "$ECVS_RUNAS" == "`whoami`" ]; then
282			cvs logout &> /dev/null
283			else
284			su $ECVS_RUNAS -c "cvs logout" &> /dev/null
285			fi
286	danarmak	1.26	chown `whoami` "${T}/cvspass"
287	danarmak	1.1	}
288
289			cvs_src_unpack() {
290
291	danarmak	1.21	debug-print-function $FUNCNAME $*
292	danarmak	1.1	cvs_fetch \|\| die "died running cvs_fetch"
293
294	danarmak	1.21	einfo "Copying $ECVS_MODULE/$ECVS_SUBDIR from $ECVS_TOP_DIR..."
295	danarmak	1.19	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	danarmak	1.26	mkdir -p "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR"
299	danarmak	1.7
300			if [ -n "$ECVS_SUBDIR" ]; then
301	danarmak	1.21	if [ -n "$ECVS_LOCAL" ]; then
302	danarmak	1.27	cp -f "$ECVS_TOP_DIR/$ECVS_MODULE/$ECVS_SUBDIR"/* "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR"
303	danarmak	1.21	else
304	danarmak	1.26	cp -Rf "$ECVS_TOP_DIR/$ECVS_MODULE/$ECVS_SUBDIR" "$WORKDIR/$ECVS_MODULE/$ECVS_SUBDIR/.."
305	danarmak	1.21	fi
306	danarmak	1.7	else
307	danarmak	1.21	if [ -n "$ECVS_LOCAL" ]; then
308	danarmak	1.27	cp -f "$ECVS_TOP_DIR/$ECVS_MODULE"/* $WORKDIR/$ECVS_MODULE
309	danarmak	1.21	else
310	danarmak	1.26	cp -Rf "$ECVS_TOP_DIR/$ECVS_MODULE" "$WORKDIR"
311	danarmak	1.21	fi
312	danarmak	1.7	fi
313	danarmak	1.10
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	danarmak	1.28	if [ "`ls -A \"$DIR\"`" == "CVS" ]; then
318	danarmak	1.10	debug-print "$FUNCNAME: removing cvs-empty directory $ECVS_MODULE/$ECVS_SUBDIR"
319	danarmak	1.26	rm -rf "$DIR"
320	danarmak	1.10	fi
321
322	danarmak	1.21	# 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	danarmak	1.26	cd "$S"
327	danarmak	1.21	for x in $PATCHES; do
328			debug-print "patching from $x"
329	danarmak	1.26	patch -p0 < "$x"
330	danarmak	1.21	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	danarmak	1.1
336			}
337
338			EXPORT_FUNCTIONS src_unpack