#!/bin/sh

"$TESTDIR/hghave" svn || exit 80

fix_path()

{

    tr '\\' /

}

escapedwd=`pwd | fix_path`

# SVN wants all paths to start with a slash. Unfortunately,

# Windows ones don't. Handle that.

expr "$escapedwd" : "\/" > /dev/null

if [ $? -ne 0 ]; then

    escapedwd="/$escapedwd"

fi

escapedwd=`python -c "import urllib, sys; sys.stdout.write(urllib.quote(sys.argv[1]))" "$escapedwd"`

filterpath="s|$escapedwd|/root|"

filteroutofdate='s/ in transaction.*/ is out of date/;s/Out of date: /File /'

filterexternal="s|Fetching external item into '.*/s/externals'|Fetching external item into 's/externals'|g"

echo % create subversion repo

SVNREPO="file://$escapedwd/svn-repo"

WCROOT="`pwd`/svn-wc"

svnadmin create svn-repo

svn co "$SVNREPO" svn-wc

cd svn-wc

mkdir src

echo alpha > src/alpha

svn add src

mkdir externals

echo other > externals/other

svn add externals

svn ci -m 'Add alpha'

svn up

cat > extdef <<EOF

externals -r1 $SVNREPO/externals

EOF

svn propset -F extdef svn:externals src

svn ci -m 'Setting externals'

cd ..

echo % create hg repo

mkdir sub

cd sub

hg init t

cd t

echo % first revision, no sub

echo a > a

hg ci -Am0

echo % add first svn sub with leading whitespaces

echo "s = [svn]       $SVNREPO/src" >> .hgsub

svn co --quiet "$SVNREPO"/src s

hg add .hgsub

hg ci -m1

echo % debugsub

hg debugsub | sed "$filterpath"

echo

echo % change file in svn and hg, commit

echo a >> a

echo alpha >> s/alpha

hg commit -m 'Message!' | sed "$filterexternal"

hg debugsub | sed "$filterpath"

echo

echo a > s/a

echo % should be empty despite change to s/a

hg st

echo

echo % add a commit from svn

cd "$WCROOT"/src

svn up

echo xyz >> alpha

svn propset svn:mime-type 'text/xml' alpha

svn ci -m 'amend a from svn'

cd ../../sub/t

echo % this commit from hg will fail

echo zzz >> s/alpha

hg ci -m 'amend alpha from hg' 2>&1 | sed "$filteroutofdate"

svn revert -q s/alpha

echo % this commit fails because of meta changes

svn propset svn:mime-type 'text/html' s/alpha

hg ci -m 'amend alpha from hg' 2>&1 | sed "$filteroutofdate"

svn revert -q s/alpha

echo % this commit fails because of externals changes

echo zzz > s/externals/other

hg ci -m 'amend externals from hg'

svn revert -q s/externals/other

echo % this commit fails because of externals meta changes

svn propset svn:mime-type 'text/html' s/externals/other

hg ci -m 'amend externals from hg'

svn revert -q s/externals/other

echo

echo % clone

cd ..

hg clone t tc | fix_path

cd tc

echo % debugsub in clone

hg debugsub | sed "$filterpath"

echo % verify subrepo is contained within the repo directory

python -c "import os.path; print os.path.exists('s')"