You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

127 lines
4.5 KiB

8 years ago
  1. // Copyright (c) AlphaSierraPapa for the SharpDevelop Team
  2. //
  3. // Permission is hereby granted, free of charge, to any person obtaining a copy of this
  4. // software and associated documentation files (the "Software"), to deal in the Software
  5. // without restriction, including without limitation the rights to use, copy, modify, merge,
  6. // publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons
  7. // to whom the Software is furnished to do so, subject to the following conditions:
  8. //
  9. // The above copyright notice and this permission notice shall be included in all copies or
  10. // substantial portions of the Software.
  11. //
  12. // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED,
  13. // INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
  14. // PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE
  15. // FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
  16. // OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
  17. // DEALINGS IN THE SOFTWARE.
  18. using System;
  19. using System.IO;
  20. using System.Linq;
  21. using System.Runtime.CompilerServices;
  22. using ICSharpCode.Decompiler.Tests.Helpers;
  23. using NUnit.Framework;
  24. namespace ICSharpCode.Decompiler.Tests
  25. {
  26. [TestFixture, Parallelizable(ParallelScope.All)]
  27. public class VBPrettyTestRunner
  28. {
  29. static readonly string TestCasePath = Tester.TestCasePath + "/VBPretty";
  30. [Test]
  31. public void AllFilesHaveTests()
  32. {
  33. var testNames = typeof(VBPrettyTestRunner).GetMethods()
  34. .Where(m => m.GetCustomAttributes(typeof(TestAttribute), false).Any())
  35. .Select(m => m.Name)
  36. .ToArray();
  37. foreach (var file in new DirectoryInfo(TestCasePath).EnumerateFiles())
  38. {
  39. if (file.Extension.Equals(".vb", StringComparison.OrdinalIgnoreCase))
  40. {
  41. var testName = file.Name.Split('.')[0];
  42. Assert.Contains(testName, testNames);
  43. Assert.IsTrue(File.Exists(Path.Combine(TestCasePath, testName + ".cs")));
  44. }
  45. }
  46. }
  47. static readonly CompilerOptions[] defaultOptions =
  48. {
  49. CompilerOptions.None,
  50. CompilerOptions.Optimize,
  51. CompilerOptions.UseRoslyn1_3_2,
  52. CompilerOptions.Optimize | CompilerOptions.UseRoslyn1_3_2,
  53. CompilerOptions.UseRoslyn2_10_0,
  54. CompilerOptions.Optimize | CompilerOptions.UseRoslyn2_10_0,
  55. CompilerOptions.UseRoslynLatest,
  56. CompilerOptions.Optimize | CompilerOptions.UseRoslynLatest,
  57. };
  58. static readonly CompilerOptions[] roslynOnlyOptions =
  59. {
  60. CompilerOptions.UseRoslyn1_3_2,
  61. CompilerOptions.Optimize | CompilerOptions.UseRoslyn1_3_2,
  62. CompilerOptions.UseRoslyn2_10_0,
  63. CompilerOptions.Optimize | CompilerOptions.UseRoslyn2_10_0,
  64. CompilerOptions.UseRoslynLatest,
  65. CompilerOptions.Optimize | CompilerOptions.UseRoslynLatest,
  66. };
  67. [Test, Ignore("Implement VB async/await")]
  68. public void Async([ValueSource(nameof(defaultOptions))] CompilerOptions options)
  69. {
  70. Run(options: options);
  71. }
  72. [Test] // TODO: legacy VB compound assign
  73. public void VBCompoundAssign([ValueSource(nameof(roslynOnlyOptions))] CompilerOptions options)
  74. {
  75. Run(options: options | CompilerOptions.Library);
  76. }
  77. [Test]
  78. public void Select([ValueSource(nameof(defaultOptions))] CompilerOptions options)
  79. {
  80. Run(options: options | CompilerOptions.Library);
  81. }
  82. [Test]
  83. public void Issue1906([ValueSource(nameof(defaultOptions))] CompilerOptions options)
  84. {
  85. Run(options: options | CompilerOptions.Library);
  86. }
  87. [Test]
  88. public void Issue2192([ValueSource(nameof(defaultOptions))] CompilerOptions options)
  89. {
  90. Run(options: options | CompilerOptions.Library);
  91. }
  92. [Test]
  93. public void VBPropertiesTest([ValueSource(nameof(defaultOptions))] CompilerOptions options)
  94. {
  95. Run(options: options | CompilerOptions.Library);
  96. }
  97. void Run([CallerMemberName] string testName = null, CompilerOptions options = CompilerOptions.UseDebug, DecompilerSettings settings = null)
  98. {
  99. var vbFile = Path.Combine(TestCasePath, testName + ".vb");
  100. var csFile = Path.Combine(TestCasePath, testName + ".cs");
  101. var exeFile = Path.Combine(TestCasePath, testName) + Tester.GetSuffix(options) + ".exe";
  102. if (options.HasFlag(CompilerOptions.Library))
  103. {
  104. exeFile = Path.ChangeExtension(exeFile, ".dll");
  105. }
  106. var executable = Tester.CompileVB(vbFile, options | CompilerOptions.ReferenceVisualBasic, exeFile);
  107. var decompiled = Tester.DecompileCSharp(executable.PathToAssembly, settings);
  108. CodeAssert.FilesAreEqual(csFile, decompiled, Tester.GetPreprocessorSymbols(options).ToArray());
  109. }
  110. }
  111. }