diff options
| author | Greg Noel <GregNoel@tigris.org> | 2010-05-26 18:32:47 (GMT) | 
|---|---|---|
| committer | Greg Noel <GregNoel@tigris.org> | 2010-05-26 18:32:47 (GMT) | 
| commit | 2ad61d7685b57789e46e2a8636d518f2ccbf3229 (patch) | |
| tree | 539f25825d511f8fbab390d379eb765aca827326 /test/CVS.py | |
| parent | 545d2a0a389e9eacdb1d92fbf5f26f2d981029ad (diff) | |
| download | SCons-2ad61d7685b57789e46e2a8636d518f2ccbf3229.zip SCons-2ad61d7685b57789e46e2a8636d518f2ccbf3229.tar.gz SCons-2ad61d7685b57789e46e2a8636d518f2ccbf3229.tar.bz2  | |
Move tests for SourceCode() into test/Deprecated as a preliminary to beginning
the deprecation cycle.
Diffstat (limited to 'test/CVS.py')
| -rw-r--r-- | test/CVS.py | 303 | 
1 files changed, 0 insertions, 303 deletions
diff --git a/test/CVS.py b/test/CVS.py deleted file mode 100644 index eb2553d..0000000 --- a/test/CVS.py +++ /dev/null @@ -1,303 +0,0 @@ -#!/usr/bin/env python -# -# __COPYRIGHT__ -# -# Permission is hereby granted, free of charge, to any person obtaining -# a copy of this software and associated documentation files (the -# "Software"), to deal in the Software without restriction, including -# without limitation the rights to use, copy, modify, merge, publish, -# distribute, sublicense, and/or sell copies of the Software, and to -# permit persons to whom the Software is furnished to do so, subject to -# the following conditions: -# -# The above copyright notice and this permission notice shall be included -# in all copies or substantial portions of the Software. -# -# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY -# KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE -# WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND -# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE -# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION -# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION -# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. -# - -__revision__ = "__FILE__ __REVISION__ __DATE__ __DEVELOPER__" - -""" -Test fetching source files from CVS. -""" - -import os - -import TestSCons - -test = TestSCons.TestSCons() - -cvs = test.where_is('cvs') -if not cvs: -    test.skip_test("Could not find 'cvs'; skipping test(s).\n") - -test.subdir('CVS', 'import', ['import', 'sub'], 'work1', 'work2') - -foo_aaa_in = os.path.join('foo', 'aaa.in') -foo_bbb_in = os.path.join('foo', 'bbb.in') -foo_ccc_in = os.path.join('foo', 'ccc.in') -foo_sub_ddd_in = os.path.join('foo', 'sub', 'ddd.in') -foo_sub_ddd_out = os.path.join('foo', 'sub', 'ddd.out') -foo_sub_eee_in = os.path.join('foo', 'sub', 'eee.in') -foo_sub_eee_out = os.path.join('foo', 'sub', 'eee.out') -foo_sub_fff_in = os.path.join('foo', 'sub', 'fff.in') -foo_sub_fff_out = os.path.join('foo', 'sub', 'fff.out') -foo_sub_all = os.path.join('foo', 'sub', 'all') - -sub_SConscript = os.path.join('sub', 'SConscript') -sub_ddd_in = os.path.join('sub', 'ddd.in') -sub_ddd_out = os.path.join('sub', 'ddd.out') -sub_eee_in = os.path.join('sub', 'eee.in') -sub_eee_out = os.path.join('sub', 'eee.out') -sub_fff_in = os.path.join('sub', 'fff.in') -sub_fff_out = os.path.join('sub', 'fff.out') -sub_all = os.path.join('sub', 'all') - -# Set up the CVS repository. -cvsroot = test.workpath('CVS') - -os.environ['CVSROOT'] = cvsroot -test.run(program = cvs, arguments = 'init') - -test.write(['import', 'aaa.in'], "import/aaa.in\n") -test.write(['import', 'bbb.in'], "import/bbb.in\n") -test.write(['import', 'ccc.in'], "import/ccc.in\n") - -test.write(['import', 'sub', 'SConscript'], """\ -Import("env") -env.Cat('ddd.out', 'ddd.in') -env.Cat('eee.out', 'eee.in') -env.Cat('fff.out', 'fff.in') -env.Cat('all', ['ddd.out', 'eee.out', 'fff.out']) -""") - -test.write(['import', 'sub', 'ddd.in'], "import/sub/ddd.in\n") -test.write(['import', 'sub', 'eee.in'], "import/sub/eee.in\n") -test.write(['import', 'sub', 'fff.in'], "import/sub/fff.in\n") - -test.run(chdir = 'import', -         program = cvs, -         arguments = '-q import -m import foo v v-r') - -# Test the most straightforward CVS checkouts, using the module name. -test.write(['work1', 'SConstruct'], """ -import os -def cat(env, source, target): -    target = str(target[0]) -    f = open(target, "wb") -    for src in source: -        f.write(open(str(src), "rb").read()) -    f.close() -env = Environment(ENV = { 'PATH' : os.environ['PATH'], -                          'EDITOR' : os.environ.get('EDITOR', 'ed') }, -                  BUILDERS={'Cat':Builder(action=cat)}) -env.Prepend(CVSFLAGS='-Q') -env.Cat('aaa.out', 'foo/aaa.in') -env.Cat('bbb.out', 'foo/bbb.in') -env.Cat('ccc.out', 'foo/ccc.in') -env.Cat('all', ['aaa.out', 'bbb.out', 'ccc.out']) -env.SourceCode('.', env.CVS(r'%(cvsroot)s')) -SConscript('foo/sub/SConscript', "env") -""" % locals()) - -test.subdir(['work1', 'foo']) -test.write(['work1', 'foo', 'bbb.in'], "work1/foo/bbb.in\n") - -test.subdir(['work1', 'foo', 'sub',]) -test.write(['work1', 'foo', 'sub', 'eee.in'], "work1/foo/sub/eee.in\n") - -test.run(chdir = 'work1', -         arguments = '.', -         stdout = test.wrap_stdout(read_str = """\ -cvs -Q -d %(cvsroot)s co foo/sub/SConscript -""" % locals(), -                                   build_str = """\ -cvs -Q -d %(cvsroot)s co foo/aaa.in -cat(["aaa.out"], ["%(foo_aaa_in)s"]) -cat(["bbb.out"], ["%(foo_bbb_in)s"]) -cvs -Q -d %(cvsroot)s co foo/ccc.in -cat(["ccc.out"], ["%(foo_ccc_in)s"]) -cat(["all"], ["aaa.out", "bbb.out", "ccc.out"]) -cvs -Q -d %(cvsroot)s co foo/sub/ddd.in -cat(["%(foo_sub_ddd_out)s"], ["%(foo_sub_ddd_in)s"]) -cat(["%(foo_sub_eee_out)s"], ["%(foo_sub_eee_in)s"]) -cvs -Q -d %(cvsroot)s co foo/sub/fff.in -cat(["%(foo_sub_fff_out)s"], ["%(foo_sub_fff_in)s"]) -cat(["%(foo_sub_all)s"], ["%(foo_sub_ddd_out)s", "%(foo_sub_eee_out)s", "%(foo_sub_fff_out)s"]) -""" % locals())) - -# Checking things back out of CVS apparently messes with the line -# endings, so read the result files in non-binary mode. - -test.must_match(['work1', 'all'], -                "import/aaa.in\nwork1/foo/bbb.in\nimport/ccc.in\n", -                mode='r') - -test.must_match(['work1', 'foo', 'sub', 'all'], -                "import/sub/ddd.in\nwork1/foo/sub/eee.in\nimport/sub/fff.in\n", -                mode='r') - -test.must_be_writable(test.workpath('work1', 'foo', 'sub', 'SConscript')) -test.must_be_writable(test.workpath('work1', 'foo', 'aaa.in')) -test.must_be_writable(test.workpath('work1', 'foo', 'ccc.in')) -test.must_be_writable(test.workpath('work1', 'foo', 'sub', 'ddd.in')) -test.must_be_writable(test.workpath('work1', 'foo', 'sub', 'fff.in')) - -# Test CVS checkouts when the module name is specified. -test.write(['work2', 'SConstruct'], """ -import os -def cat(env, source, target): -    target = str(target[0]) -    f = open(target, "wb") -    for src in source: -        f.write(open(str(src), "rb").read()) -    f.close() -env = Environment(ENV = { 'PATH' : os.environ['PATH'], -                          'EDITOR' : os.environ.get('EDITOR', 'ed') }, -                  BUILDERS={'Cat':Builder(action=cat)}) -env.Prepend(CVSFLAGS='-q') -env.Cat('aaa.out', 'aaa.in') -env.Cat('bbb.out', 'bbb.in') -env.Cat('ccc.out', 'ccc.in') -env.Cat('all', ['aaa.out', 'bbb.out', 'ccc.out']) -env.SourceCode('.', env.CVS(r'%(cvsroot)s', 'foo')) -SConscript('sub/SConscript', "env") -""" % locals()) - -test.write(['work2', 'bbb.in'], "work2/bbb.in\n") - -test.subdir(['work2', 'sub']) -test.write(['work2', 'sub', 'eee.in'], "work2/sub/eee.in\n") - -test.run(chdir = 'work2', -         arguments = '.', -         stdout = test.wrap_stdout(read_str = """\ -cvs -q -d %(cvsroot)s co -d sub foo/sub/SConscript -U sub/SConscript -""" % locals(), -                                   build_str = """\ -cvs -q -d %(cvsroot)s co -d . foo/aaa.in -U ./aaa.in -cat(["aaa.out"], ["aaa.in"]) -cat(["bbb.out"], ["bbb.in"]) -cvs -q -d %(cvsroot)s co -d . foo/ccc.in -U ./ccc.in -cat(["ccc.out"], ["ccc.in"]) -cat(["all"], ["aaa.out", "bbb.out", "ccc.out"]) -cvs -q -d %(cvsroot)s co -d sub foo/sub/ddd.in -U sub/ddd.in -cat(["%(sub_ddd_out)s"], ["%(sub_ddd_in)s"]) -cat(["%(sub_eee_out)s"], ["%(sub_eee_in)s"]) -cvs -q -d %(cvsroot)s co -d sub foo/sub/fff.in -U sub/fff.in -cat(["%(sub_fff_out)s"], ["%(sub_fff_in)s"]) -cat(["%(sub_all)s"], ["%(sub_ddd_out)s", "%(sub_eee_out)s", "%(sub_fff_out)s"]) -""" % locals())) - -# Checking things back out of CVS apparently messes with the line -# endings, so read the result files in non-binary mode. - -test.must_match(['work2', 'all'], -                "import/aaa.in\nwork2/bbb.in\nimport/ccc.in\n", -                mode='r') - -test.must_match(['work2', 'sub', 'all'], -                "import/sub/ddd.in\nwork2/sub/eee.in\nimport/sub/fff.in\n", -                mode='r') - -test.must_be_writable(test.workpath('work2', 'sub', 'SConscript')) -test.must_be_writable(test.workpath('work2', 'aaa.in')) -test.must_be_writable(test.workpath('work2', 'ccc.in')) -test.must_be_writable(test.workpath('work2', 'sub', 'ddd.in')) -test.must_be_writable(test.workpath('work2', 'sub', 'fff.in')) - -# Test checking out specific file name(s), and expanding -# the repository name with a variable. -test.subdir(['work3']) - -test.write(['work3', 'SConstruct'], """\ -import os -def cat(env, source, target): -    target = str(target[0]) -    f = open(target, "wb") -    for src in source: -        f.write(open(str(src), "rb").read()) -    f.close() -env = Environment(ENV = { 'PATH' : os.environ['PATH'], -                          'EDITOR' : os.environ.get('EDITOR', 'ed') }, -                  BUILDERS={'Cat':Builder(action=cat)}, -                  CVSROOT=r'%s') -env.Prepend(CVSFLAGS='-q') -env.Cat('aaa.out', 'aaa.in') -env.Cat('bbb.out', 'bbb.in') -env.Cat('ccc.out', 'ccc.in') -env.Cat('all', ['aaa.out', 'bbb.out', 'ccc.out']) -cvs = env.CVS('$CVSROOT', 'foo') -#env.SourceCode('.', cvs) -env.SourceCode('aaa.in', cvs) -env.SourceCode('bbb.in', cvs) -env.SourceCode('ccc.in', cvs) -""" % cvsroot) - -test.run(chdir = 'work3', -         arguments = '.', -         stdout = test.wrap_stdout(build_str = """\ -cvs -q -d %(cvsroot)s co -d . foo/aaa.in -U ./aaa.in -cat(["aaa.out"], ["aaa.in"]) -cvs -q -d %(cvsroot)s co -d . foo/bbb.in -U ./bbb.in -cat(["bbb.out"], ["bbb.in"]) -cvs -q -d %(cvsroot)s co -d . foo/ccc.in -U ./ccc.in -cat(["ccc.out"], ["ccc.in"]) -cat(["all"], ["aaa.out", "bbb.out", "ccc.out"]) -""" % locals())) - -test.must_match(['work3', 'aaa.out'], -                "import/aaa.in\n", -                mode='r') -test.must_match(['work3', 'bbb.out'], -                "import/bbb.in\n", -                mode='r') -test.must_match(['work3', 'ccc.out'], -                "import/ccc.in\n", -                mode='r') -test.must_match(['work3', 'all'], -                "import/aaa.in\nimport/bbb.in\nimport/ccc.in\n", -                mode='r') - -# Test CVS checkouts from a remote server (Tigris.org). -#test.subdir(['work4']) -# -#test.write(['work4', 'SConstruct'], """\ -#import os -#env = Environment(ENV = { 'PATH' : os.environ['PATH'] }) -## We used to use the SourceForge server, but SourceForge has restrictions -## that make them deny access on occasion.  Leave the incantation here -## in case we need to use it again some day. -##cvs = env.CVS(':pserver:anonymous@cvs.sourceforge.net:/cvsroot/scons') -#cvs = env.CVS(':pserver:anoncvs@cvs.tigris.org:/cvs') -#env.SourceCode('.', cvs) -#env.Install('install', 'scons/SConstruct') -#""") -# -#test.run(chdir = 'work4', arguments = '.') -# -#test.must_exist(test.workpath('work4', 'install', 'SConstruct')) - - -test.pass_test() - -# Local Variables: -# tab-width:4 -# indent-tabs-mode:nil -# End: -# vim: set expandtab tabstop=4 shiftwidth=4:  | 
