diff options
Diffstat (limited to 'test/SCCS')
-rw-r--r-- | test/SCCS/SCCSCOM.py | 126 | ||||
-rw-r--r-- | test/SCCS/SCCSCOMSTR.py | 127 | ||||
-rw-r--r-- | test/SCCS/diskcheck.py | 146 | ||||
-rw-r--r-- | test/SCCS/explicit.py | 131 | ||||
-rw-r--r-- | test/SCCS/implicit.py | 86 | ||||
-rw-r--r-- | test/SCCS/transparent.py | 131 |
6 files changed, 0 insertions, 747 deletions
diff --git a/test/SCCS/SCCSCOM.py b/test/SCCS/SCCSCOM.py deleted file mode 100644 index 9d1b649..0000000 --- a/test/SCCS/SCCSCOM.py +++ /dev/null @@ -1,126 +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 setting the $SCCSCOM variable. -""" - -import os.path - -import TestSCons - -_python_ = TestSCons._python_ - -test = TestSCons.TestSCons() - -test.subdir('SCCS', ['SCCS', 'sub'], 'sub') - -sub_SCCS = os.path.join('sub', 'SCCS') -sub_SConscript = os.path.join('sub', 'SConscript') -sub_all = os.path.join('sub', 'all') -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') - -test.write('my-sccs-get.py', """ -import shutil -import sys -for f in sys.argv[1:]: - shutil.copy('SCCS/'+f, f) -""") - -test.write('SConstruct', """ -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(TOOLS = ['default', 'SCCS'], - BUILDERS={'Cat':Builder(action=cat)}, - SCCSCOM='%(_python_)s my-sccs-get.py $TARGET') -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.SCCS()) -SConscript('sub/SConscript', "env") -""" % locals()) - -test.write(['SCCS', '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(['SCCS', 'aaa.in'], "SCCS/aaa.in\n") -test.write('bbb.in', "checked-out bbb.in\n") -test.write(['SCCS', 'ccc.in'], "SCCS/ccc.in\n") - -test.write(['SCCS', 'sub', 'ddd.in'], "SCCS/sub/ddd.in\n") -test.write(['sub', 'eee.in'], "checked-out sub/eee.in\n") -test.write(['SCCS', 'sub', 'fff.in'], "SCCS/sub/fff.in\n") - -test.run(arguments = '.', - stdout = test.wrap_stdout(read_str = """\ -%(_python_)s my-sccs-get.py %(sub_SConscript)s -""" % locals(), - build_str = """\ -%(_python_)s my-sccs-get.py aaa.in -cat(["aaa.out"], ["aaa.in"]) -cat(["bbb.out"], ["bbb.in"]) -%(_python_)s my-sccs-get.py ccc.in -cat(["ccc.out"], ["ccc.in"]) -cat(["all"], ["aaa.out", "bbb.out", "ccc.out"]) -%(_python_)s my-sccs-get.py %(sub_ddd_in)s -cat(["%(sub_ddd_out)s"], ["%(sub_ddd_in)s"]) -cat(["%(sub_eee_out)s"], ["%(sub_eee_in)s"]) -%(_python_)s my-sccs-get.py %(sub_fff_in)s -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())) - -test.must_match('all', - "SCCS/aaa.in\nchecked-out bbb.in\nSCCS/ccc.in\n") - -test.must_match(['sub', 'all'], - "SCCS/sub/ddd.in\nchecked-out sub/eee.in\nSCCS/sub/fff.in\n") - - - -# -test.pass_test() - -# Local Variables: -# tab-width:4 -# indent-tabs-mode:nil -# End: -# vim: set expandtab tabstop=4 shiftwidth=4: diff --git a/test/SCCS/SCCSCOMSTR.py b/test/SCCS/SCCSCOMSTR.py deleted file mode 100644 index d0da2e4..0000000 --- a/test/SCCS/SCCSCOMSTR.py +++ /dev/null @@ -1,127 +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 customizing the output with the the $SCCSCOMSTR variable. -""" - -import os.path - -import TestSCons - -_python_ = TestSCons._python_ - -test = TestSCons.TestSCons() - -test.subdir('SCCS', ['SCCS', 'sub'], 'sub') - -sub_SCCS = os.path.join('sub', 'SCCS') -sub_SConscript = os.path.join('sub', 'SConscript') -sub_all = os.path.join('sub', 'all') -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') - -test.write('my-sccs-get.py', """ -import shutil -import sys -for f in sys.argv[1:]: - shutil.copy('SCCS/'+f, f) -""") - -test.write('SConstruct', """ -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(TOOLS = ['default', 'SCCS'], - BUILDERS={'Cat':Builder(action=cat)}, - SCCSCOM='%(_python_)s my-sccs-get.py $TARGET', - SCCSCOMSTR='Checking out $TARGET from our fake SCCS') -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.SCCS()) -SConscript('sub/SConscript', "env") -""" % locals()) - -test.write(['SCCS', '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(['SCCS', 'aaa.in'], "SCCS/aaa.in\n") -test.write('bbb.in', "checked-out bbb.in\n") -test.write(['SCCS', 'ccc.in'], "SCCS/ccc.in\n") - -test.write(['SCCS', 'sub', 'ddd.in'], "SCCS/sub/ddd.in\n") -test.write(['sub', 'eee.in'], "checked-out sub/eee.in\n") -test.write(['SCCS', 'sub', 'fff.in'], "SCCS/sub/fff.in\n") - -test.run(arguments = '.', - stdout = test.wrap_stdout(read_str = """\ -Checking out %(sub_SConscript)s from our fake SCCS -""" % locals(), - build_str = """\ -Checking out aaa.in from our fake SCCS -cat(["aaa.out"], ["aaa.in"]) -cat(["bbb.out"], ["bbb.in"]) -Checking out ccc.in from our fake SCCS -cat(["ccc.out"], ["ccc.in"]) -cat(["all"], ["aaa.out", "bbb.out", "ccc.out"]) -Checking out %(sub_ddd_in)s from our fake SCCS -cat(["%(sub_ddd_out)s"], ["%(sub_ddd_in)s"]) -cat(["%(sub_eee_out)s"], ["%(sub_eee_in)s"]) -Checking out %(sub_fff_in)s from our fake SCCS -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())) - -test.must_match('all', - "SCCS/aaa.in\nchecked-out bbb.in\nSCCS/ccc.in\n") - -test.must_match(['sub', 'all'], - "SCCS/sub/ddd.in\nchecked-out sub/eee.in\nSCCS/sub/fff.in\n") - - - -# -test.pass_test() - -# Local Variables: -# tab-width:4 -# indent-tabs-mode:nil -# End: -# vim: set expandtab tabstop=4 shiftwidth=4: diff --git a/test/SCCS/diskcheck.py b/test/SCCS/diskcheck.py deleted file mode 100644 index a8660bc..0000000 --- a/test/SCCS/diskcheck.py +++ /dev/null @@ -1,146 +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 transparent checkouts from SCCS files in an SCCS subdirectory. -""" - -import os.path - -import TestSCons - -test = TestSCons.TestSCons() - -sccs = test.where_is('sccs') -if not sccs: - test.skip_test("Could not find 'sccs'; skipping test(s).\n") - - - -test.subdir('SCCS', 'sub', ['sub', 'SCCS']) - -for f in ['aaa.in', 'bbb.in', 'ccc.in']: - test.write(f, "%%F%% %s\n" % f) - args = "create %s" % f - test.run(program = sccs, arguments = args, stderr = None) - test.unlink(f) - test.unlink(','+f) - -test.write(['sub', 'SConscript'], """\ -# %%F%% -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']) -""") -args = "create SConscript" -test.run(chdir = 'sub', program = sccs, arguments = args, stderr = None) -test.unlink(['sub', 'SConscript']) -test.unlink(['sub', ',SConscript']) - -for f in ['ddd.in', 'eee.in', 'fff.in']: - test.write(['sub', f], "%%F%% sub/%s\n" % f) - args = "create %s" % f - test.run(chdir = 'sub', program = sccs, arguments = args, stderr = None) - test.unlink(['sub', f]) - test.unlink(['sub', ','+f]) - -test.write(['SConstruct'], """ -DefaultEnvironment()['SCCSCOM'] = 'cd ${TARGET.dir} && $SCCS get ${TARGET.file}' -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() -SetOption('diskcheck', ['match', 'rcs']) -env = Environment(BUILDERS={'Cat':Builder(action=cat)}, - SCCSFLAGS='-k') -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']) -SConscript('sub/SConscript', "env") -""") - -test.write(['bbb.in'], "checked-out bbb.in\n") - -test.write(['sub', 'eee.in'], "checked-out sub/eee.in\n") - -sub_SConscript = os.path.join('sub', 'SConscript') -SConstruct_file_line = test.python_file_line(test.workpath('SConstruct'), 16)[:-1] - -expect = """\ - -scons: warning: Ignoring missing SConscript '%(sub_SConscript)s' -%(SConstruct_file_line)s -scons: *** [aaa.out] Source `aaa.in' not found, needed by target `aaa.out'. -""" % locals() - -test.run(status=2, stderr=expect) - -test.run(arguments = '--diskcheck=sccs', stderr = None) - -lines = """ -sccs get SConscript -sccs get aaa.in -cat(["aaa.out"], ["aaa.in"]) -cat(["bbb.out"], ["bbb.in"]) -sccs get ccc.in -cat(["ccc.out"], ["ccc.in"]) -cat(["all"], ["aaa.out", "bbb.out", "ccc.out"]) -sccs get ddd.in -cat(["sub/ddd.out"], ["sub/ddd.in"]) -cat(["sub/eee.out"], ["sub/eee.in"]) -sccs get fff.in -cat(["sub/fff.out"], ["sub/fff.in"]) -cat(["sub/all"], ["sub/ddd.out", "sub/eee.out", "sub/fff.out"]) -""".split('\n') - -test.must_contain_all_lines(test.stdout(), lines) - -test.must_match('all', """\ -s.aaa.in aaa.in -checked-out bbb.in -s.ccc.in ccc.in -""") - -test.must_not_be_writable(test.workpath('sub', 'SConscript')) -test.must_not_be_writable(test.workpath('aaa.in')) -test.must_not_be_writable(test.workpath('ccc.in')) -test.must_not_be_writable(test.workpath('sub', 'ddd.in')) -test.must_not_be_writable(test.workpath('sub', 'fff.in')) - - - -test.pass_test() - -# Local Variables: -# tab-width:4 -# indent-tabs-mode:nil -# End: -# vim: set expandtab tabstop=4 shiftwidth=4: diff --git a/test/SCCS/explicit.py b/test/SCCS/explicit.py deleted file mode 100644 index 252e901..0000000 --- a/test/SCCS/explicit.py +++ /dev/null @@ -1,131 +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 explicit checkouts from local SCCS files. -""" - -import TestSCons - -test = TestSCons.TestSCons() - -sccs = test.where_is('sccs') -if not sccs: - test.skip_test("Could not find 'sccs'; skipping test(s).\n") - - - -test.subdir('SCCS', 'sub', ['sub', 'SCCS']) - -for f in ['aaa.in', 'bbb.in', 'ccc.in']: - test.write(f, "%%F%% %s\n" % f) - args = "create %s" % f - test.run(program = sccs, arguments = args, stderr = None) - test.unlink(f) - test.unlink(','+f) - -test.write(['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']) -""") -args = "create SConscript" -test.run(chdir = 'sub', program = sccs, arguments = args, stderr = None) -test.unlink(['sub', 'SConscript']) -test.unlink(['sub', ',SConscript']) - -for f in ['ddd.in', 'eee.in', 'fff.in']: - test.write(['sub', f], "%%F%% sub/%s\n" % f) - args = "create %s" % f - test.run(chdir = 'sub', program = sccs, arguments = args, stderr = None) - test.unlink(['sub', f]) - test.unlink(['sub', ','+f]) - -test.write('SConstruct', """ -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(BUILDERS={'Cat':Builder(action=cat)}, - SCCSCOM = 'cd ${TARGET.dir} && $SCCS get $SCCSGETFLAGS ${TARGET.file}', - SCCSGETFLAGS='-e') -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.SCCS()) -SConscript('sub/SConscript', "env") -""") - -test.write('bbb.in', "checked-out bbb.in\n") - -test.write(['sub', 'eee.in'], "checked-out sub/eee.in\n") - -test.run(arguments = '.', stderr = None) - -lines = """ -sccs get -e SConscript -sccs get -e aaa.in -cat(["aaa.out"], ["aaa.in"]) -cat(["bbb.out"], ["bbb.in"]) -sccs get -e ccc.in -cat(["ccc.out"], ["ccc.in"]) -cat(["all"], ["aaa.out", "bbb.out", "ccc.out"]) -sccs get -e ddd.in -cat(["sub/ddd.out"], ["sub/ddd.in"]) -cat(["sub/eee.out"], ["sub/eee.in"]) -sccs get -e fff.in -cat(["sub/fff.out"], ["sub/fff.in"]) -cat(["sub/all"], ["sub/ddd.out", "sub/eee.out", "sub/fff.out"]) -""".split('\n') - -test.must_contain_all_lines(test.stdout(), lines) - -test.must_match('all', """\ -%F% aaa.in -checked-out bbb.in -%F% ccc.in -""") - -test.must_be_writable(test.workpath('sub', 'SConscript')) -test.must_be_writable(test.workpath('aaa.in')) -test.must_be_writable(test.workpath('ccc.in')) -test.must_be_writable(test.workpath('sub', 'ddd.in')) -test.must_be_writable(test.workpath('sub', 'fff.in')) - - - -test.pass_test() - -# Local Variables: -# tab-width:4 -# indent-tabs-mode:nil -# End: -# vim: set expandtab tabstop=4 shiftwidth=4: diff --git a/test/SCCS/implicit.py b/test/SCCS/implicit.py deleted file mode 100644 index 3f86841..0000000 --- a/test/SCCS/implicit.py +++ /dev/null @@ -1,86 +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 transparent SCCS checkouts of implicit dependencies. -""" - -import TestSCons - -test = TestSCons.TestSCons() - -sccs = test.where_is('sccs') -if not sccs: - test.skip_test("Could not find 'sccs'; skipping test(s).\n") - - - -test.subdir('SCCS') - -test.write('foo.c', """\ -/* %%F%% */ -#include "foo.h" -int -main(int argc, char *argv[]) { - printf(STR); - printf("foo.c\\n"); -} -""") -test.run(program = sccs, arguments = "create foo.c", stderr = None) -test.unlink('foo.c') -test.unlink(',foo.c') - -test.write('foo.h', """\ -#define STR "foo.h\\n" -""") -test.run(program = sccs, arguments = "create foo.h", stderr = None) -test.unlink('foo.h') -test.unlink(',foo.h') - -test.write('SConstruct', """ -DefaultEnvironment()['SCCSCOM'] = 'cd ${TARGET.dir} && $SCCS get ${TARGET.file}' -env = Environment() -env.Program('foo.c') -""") - -test.run(stderr = None) - -lines = """ -sccs get foo.c -sccs get foo.h -""".split('\n') - -test.must_contain_all_lines(test.stdout(), lines) - - - -test.pass_test() - -# Local Variables: -# tab-width:4 -# indent-tabs-mode:nil -# End: -# vim: set expandtab tabstop=4 shiftwidth=4: diff --git a/test/SCCS/transparent.py b/test/SCCS/transparent.py deleted file mode 100644 index a8105a2..0000000 --- a/test/SCCS/transparent.py +++ /dev/null @@ -1,131 +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 transparent checkouts from SCCS files in an SCCS subdirectory. -""" - -import TestSCons - -test = TestSCons.TestSCons() - -sccs = test.where_is('sccs') -if not sccs: - test.skip_test("Could not find 'sccs'; skipping test(s).\n") - - - -test.subdir('SCCS', 'sub', ['sub', 'SCCS']) - -for f in ['aaa.in', 'bbb.in', 'ccc.in']: - test.write(f, "%%F%% %s\n" % f) - args = "create %s" % f - test.run(program = sccs, arguments = args, stderr = None) - test.unlink(f) - test.unlink(','+f) - -test.write(['sub', 'SConscript'], """\ -# %%F%% -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']) -""") -args = "create SConscript" -test.run(chdir = 'sub', program = sccs, arguments = args, stderr = None) -test.unlink(['sub', 'SConscript']) -test.unlink(['sub', ',SConscript']) - -for f in ['ddd.in', 'eee.in', 'fff.in']: - test.write(['sub', f], "%%F%% sub/%s\n" % f) - args = "create %s" % f - test.run(chdir = 'sub', program = sccs, arguments = args, stderr = None) - test.unlink(['sub', f]) - test.unlink(['sub', ','+f]) - -test.write(['SConstruct'], """ -DefaultEnvironment()['SCCSCOM'] = 'cd ${TARGET.dir} && $SCCS get ${TARGET.file}' -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(BUILDERS={'Cat':Builder(action=cat)}, - SCCSFLAGS='-k') -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']) -SConscript('sub/SConscript', "env") -""") - -test.write(['bbb.in'], "checked-out bbb.in\n") - -test.write(['sub', 'eee.in'], "checked-out sub/eee.in\n") - -test.run(arguments = '.', stderr = None) - -lines = """ -sccs get SConscript -sccs get aaa.in -cat(["aaa.out"], ["aaa.in"]) -cat(["bbb.out"], ["bbb.in"]) -sccs get ccc.in -cat(["ccc.out"], ["ccc.in"]) -cat(["all"], ["aaa.out", "bbb.out", "ccc.out"]) -sccs get ddd.in -cat(["sub/ddd.out"], ["sub/ddd.in"]) -cat(["sub/eee.out"], ["sub/eee.in"]) -sccs get fff.in -cat(["sub/fff.out"], ["sub/fff.in"]) -cat(["sub/all"], ["sub/ddd.out", "sub/eee.out", "sub/fff.out"]) -""".split('\n') - -test.must_contain_all_lines(test.stdout(), lines) - -test.must_match('all', """\ -s.aaa.in aaa.in -checked-out bbb.in -s.ccc.in ccc.in -""") - -test.must_not_be_writable(test.workpath('sub', 'SConscript')) -test.must_not_be_writable(test.workpath('aaa.in')) -test.must_not_be_writable(test.workpath('ccc.in')) -test.must_not_be_writable(test.workpath('sub', 'ddd.in')) -test.must_not_be_writable(test.workpath('sub', 'fff.in')) - - - -test.pass_test() - -# Local Variables: -# tab-width:4 -# indent-tabs-mode:nil -# End: -# vim: set expandtab tabstop=4 shiftwidth=4: |