2 // Microsoft.VisualBasic.* Test Cases
5 // Gert Driesen (drieseng@users.sourceforge.net)
13 using System.CodeDom.Compiler;
15 using Microsoft.VisualBasic;
17 using NUnit.Framework;
19 namespace MonoTests.Microsoft.VisualBasic
22 public class CodeGeneratorFromExpressionTest
24 VBCodeProvider provider;
25 ICodeGenerator generator;
26 CodeGeneratorOptions options;
31 provider = new VBCodeProvider ();
32 generator = provider.CreateGenerator ();
33 options = new CodeGeneratorOptions ();
37 [ExpectedException (typeof (ArgumentException))]
38 public void DefaultExpressionTest ()
40 using (StringWriter sw = new StringWriter ()) {
41 Generate(new CodeExpression (), sw);
47 [ExpectedException (typeof (ArgumentNullException))]
48 public void NullExpressionTest ()
50 using (StringWriter sw = new StringWriter ()) {
56 public void TypeReferenceExpressionTest ()
58 StringBuilder sb = new StringBuilder();
60 using (StringWriter sw = new StringWriter (sb)) {
61 Assert.AreEqual ("Boolean", Generate (new CodeTypeReferenceExpression (typeof (bool)), sw), "#1");
63 Assert.AreEqual ("Byte", Generate (new CodeTypeReferenceExpression (typeof (byte)), sw), "#2");
65 Assert.AreEqual ("Char", Generate (new CodeTypeReferenceExpression (typeof (char)), sw), "#3");
67 Assert.AreEqual ("Date", Generate (new CodeTypeReferenceExpression (typeof (DateTime)), sw), "#4");
69 Assert.AreEqual ("Decimal", Generate (new CodeTypeReferenceExpression (typeof (decimal)), sw), "#5");
71 Assert.AreEqual ("Double", Generate (new CodeTypeReferenceExpression (typeof (double)), sw), "#6");
73 Assert.AreEqual ("Short", Generate (new CodeTypeReferenceExpression (typeof (short)), sw), "#7");
75 Assert.AreEqual ("Integer", Generate (new CodeTypeReferenceExpression (typeof (int)), sw), "#8");
77 Assert.AreEqual ("Long", Generate (new CodeTypeReferenceExpression (typeof (long)), sw), "#9");
79 Assert.AreEqual ("Single", Generate (new CodeTypeReferenceExpression (typeof (float)), sw), "#10");
81 Assert.AreEqual ("Object", Generate (new CodeTypeReferenceExpression (typeof (object)), sw), "#11");
83 Assert.AreEqual (typeof (void).FullName, Generate (new CodeTypeReferenceExpression (typeof (void)), sw), "#12");
85 Assert.AreEqual (typeof (void).FullName, Generate (new CodeTypeReferenceExpression ((string) null), sw), "#13");
87 Assert.AreEqual (typeof (void).FullName, Generate (new CodeTypeReferenceExpression (""), sw), "#14");
90 Assert.AreEqual ("SByte", Generate (new CodeTypeReferenceExpression (typeof (sbyte)), sw), "#15");
92 Assert.AreEqual ("UShort", Generate (new CodeTypeReferenceExpression (typeof (ushort)), sw), "#16");
94 Assert.AreEqual ("UInteger", Generate (new CodeTypeReferenceExpression (typeof (uint)), sw), "#17");
96 Assert.AreEqual ("ULong", Generate (new CodeTypeReferenceExpression (typeof (ulong)), sw), "#18");
99 Assert.AreEqual (typeof (sbyte).FullName, Generate (new CodeTypeReferenceExpression (typeof (sbyte)), sw), "#19");
101 Assert.AreEqual (typeof(ushort).FullName, Generate (new CodeTypeReferenceExpression (typeof (ushort)), sw), "#20");
103 Assert.AreEqual (typeof(uint).FullName, Generate (new CodeTypeReferenceExpression (typeof (uint)), sw), "#21");
105 Assert.AreEqual (typeof(ulong).FullName, Generate (new CodeTypeReferenceExpression (typeof (ulong)), sw), "#22");
113 public void PrimitiveExpressionTest ()
115 StringBuilder sb = new StringBuilder ();
117 using (StringWriter sw = new StringWriter (sb)) {
118 Assert.AreEqual ("Nothing", Generate (new CodePrimitiveExpression (null), sw), "#1");
120 Assert.AreEqual ("\"AB\"\"C\"", Generate (new CodePrimitiveExpression ("AB\"C"), sw), "#2");
122 Assert.AreEqual ("5", Generate (new CodePrimitiveExpression ((byte) 5), sw), "#4");
124 Assert.AreEqual ("20", Generate (new CodePrimitiveExpression ((short) 20), sw), "#5");
126 Assert.AreEqual ("243", Generate (new CodePrimitiveExpression (243), sw), "#6");
128 Assert.AreEqual ("434343", Generate (new CodePrimitiveExpression ((long) 434343), sw), "#7");
130 Assert.AreEqual ("6.445!", Generate (new CodePrimitiveExpression ((float) 6.445), sw), "#8");
132 Assert.AreEqual ("5.76", Generate (new CodePrimitiveExpression ((double) 5.76), sw), "#9");
134 Assert.AreEqual ("7.667", Generate (new CodePrimitiveExpression ((decimal) 7.667), sw), "#10");
136 Assert.AreEqual ("true", Generate (new CodePrimitiveExpression (true), sw), "#11");
138 Assert.AreEqual ("false", Generate (new CodePrimitiveExpression (false), sw), "#12");
144 public void PrimitiveExpressionTest_Char ()
147 string vbNs = "Global.Microsoft.VisualBasic";
149 string vbNs = "Microsoft.VisualBasic";
151 StringBuilder sb = new StringBuilder ();
153 using (StringWriter sw = new StringWriter (sb)) {
154 Assert.AreEqual (vbNs + ".ChrW(0)", Generate (new CodePrimitiveExpression ('\0'), sw), "#0");
156 Assert.AreEqual (vbNs + ".ChrW(1)", Generate (new CodePrimitiveExpression ('\x01'), sw), "#1");
158 Assert.AreEqual (vbNs + ".ChrW(2)", Generate (new CodePrimitiveExpression ('\x02'), sw), "#2");
160 Assert.AreEqual (vbNs + ".ChrW(3)", Generate (new CodePrimitiveExpression ('\x03'), sw), "#3");
162 Assert.AreEqual (vbNs + ".ChrW(4)", Generate (new CodePrimitiveExpression ('\x04'), sw), "#4");
164 Assert.AreEqual (vbNs + ".ChrW(5)", Generate (new CodePrimitiveExpression ('\x05'), sw), "#5");
166 Assert.AreEqual (vbNs + ".ChrW(6)", Generate (new CodePrimitiveExpression ('\x06'), sw), "#6");
168 Assert.AreEqual (vbNs + ".ChrW(7)", Generate (new CodePrimitiveExpression ('\a'), sw), "#7");
170 Assert.AreEqual (vbNs + ".ChrW(8)", Generate (new CodePrimitiveExpression ('\b'), sw), "#8");
172 Assert.AreEqual (vbNs + ".ChrW(9)", Generate (new CodePrimitiveExpression ('\t'), sw), "#9");
174 Assert.AreEqual (vbNs + ".ChrW(10)", Generate (new CodePrimitiveExpression ('\n'), sw), "#10");
176 Assert.AreEqual (vbNs + ".ChrW(11)", Generate (new CodePrimitiveExpression ('\v'), sw), "#11");
178 Assert.AreEqual (vbNs + ".ChrW(12)", Generate (new CodePrimitiveExpression ('\f'), sw), "#12");
180 Assert.AreEqual (vbNs + ".ChrW(13)", Generate (new CodePrimitiveExpression ('\r'), sw), "#13");
182 Assert.AreEqual (vbNs + ".ChrW(14)", Generate (new CodePrimitiveExpression ('\x0E'), sw), "#14");
184 Assert.AreEqual (vbNs + ".ChrW(15)", Generate (new CodePrimitiveExpression ('\x0F'), sw), "#15");
186 Assert.AreEqual (vbNs + ".ChrW(16)", Generate (new CodePrimitiveExpression ('\x10'), sw), "#16");
188 Assert.AreEqual (vbNs + ".ChrW(17)", Generate (new CodePrimitiveExpression ('\x11'), sw), "#17");
190 Assert.AreEqual (vbNs + ".ChrW(18)", Generate (new CodePrimitiveExpression ('\x12'), sw), "#18");
192 Assert.AreEqual (vbNs + ".ChrW(19)", Generate (new CodePrimitiveExpression ('\x13'), sw), "#19");
194 Assert.AreEqual (vbNs + ".ChrW(20)", Generate (new CodePrimitiveExpression ('\x14'), sw), "#20");
196 Assert.AreEqual (vbNs + ".ChrW(21)", Generate (new CodePrimitiveExpression ('\x15'), sw), "#21");
198 Assert.AreEqual (vbNs + ".ChrW(22)", Generate (new CodePrimitiveExpression ('\x16'), sw), "#22");
200 Assert.AreEqual (vbNs + ".ChrW(23)", Generate (new CodePrimitiveExpression ('\x17'), sw), "#23");
202 Assert.AreEqual (vbNs + ".ChrW(24)", Generate (new CodePrimitiveExpression ('\x18'), sw), "#24");
204 Assert.AreEqual (vbNs + ".ChrW(25)", Generate (new CodePrimitiveExpression ('\x19'), sw), "#25");
206 Assert.AreEqual (vbNs + ".ChrW(26)", Generate (new CodePrimitiveExpression ('\x1A'), sw), "#26");
208 Assert.AreEqual (vbNs + ".ChrW(27)", Generate (new CodePrimitiveExpression ('\x1B'), sw), "#27");
210 Assert.AreEqual (vbNs + ".ChrW(28)", Generate (new CodePrimitiveExpression ('\x1C'), sw), "#28");
212 Assert.AreEqual (vbNs + ".ChrW(29)", Generate (new CodePrimitiveExpression ('\x1D'), sw), "#29");
214 Assert.AreEqual (vbNs + ".ChrW(30)", Generate (new CodePrimitiveExpression ('\x1E'), sw), "#30");
216 Assert.AreEqual (vbNs + ".ChrW(31)", Generate (new CodePrimitiveExpression ('\x1F'), sw), "#31");
218 Assert.AreEqual (vbNs + ".ChrW(32)", Generate (new CodePrimitiveExpression ('\x20'), sw), "#32");
220 Assert.AreEqual (vbNs + ".ChrW(33)", Generate (new CodePrimitiveExpression ('\x21'), sw), "#33");
222 Assert.AreEqual (vbNs + ".ChrW(34)", Generate (new CodePrimitiveExpression ('"'), sw), "#34");
224 Assert.AreEqual (vbNs + ".ChrW(35)", Generate (new CodePrimitiveExpression ('\x23'), sw), "#35");
226 Assert.AreEqual (vbNs + ".ChrW(36)", Generate (new CodePrimitiveExpression ('\x24'), sw), "#36");
228 Assert.AreEqual (vbNs + ".ChrW(37)", Generate (new CodePrimitiveExpression ('\x25'), sw), "#37");
230 Assert.AreEqual (vbNs + ".ChrW(38)", Generate (new CodePrimitiveExpression ('\x26'), sw), "#38");
232 Assert.AreEqual (vbNs + ".ChrW(39)", Generate (new CodePrimitiveExpression ('\''), sw), "#39");
234 Assert.AreEqual (vbNs + ".ChrW(8232)", Generate (new CodePrimitiveExpression ('\u2028'), sw), "#40");
236 Assert.AreEqual (vbNs + ".ChrW(8233)", Generate (new CodePrimitiveExpression ('\u2029'), sw), "#41");
238 Assert.AreEqual (vbNs + ".ChrW(8240)", Generate (new CodePrimitiveExpression ('\u2030'), sw), "#42");
245 [ExpectedException (typeof (ArgumentException))]
247 public void PrimitiveExpressionTest_SByte ()
249 StringBuilder sb = new StringBuilder ();
251 using (StringWriter sw = new StringWriter (sb)) {
252 Assert.AreEqual ("CSByte(5)", Generate (new CodePrimitiveExpression ((sbyte) 5), sw));
259 [ExpectedException (typeof (ArgumentException))]
261 public void PrimitiveExpressionTest_UInt16 ()
263 StringBuilder sb = new StringBuilder ();
265 using (StringWriter sw = new StringWriter (sb)) {
266 Assert.AreEqual ("5US", Generate (new CodePrimitiveExpression ((ushort) 5), sw));
273 [ExpectedException (typeof (ArgumentException))]
275 public void PrimitiveExpressionTest_UInt32 ()
277 StringBuilder sb = new StringBuilder ();
279 using (StringWriter sw = new StringWriter (sb)) {
280 Assert.AreEqual ("5UI", Generate (new CodePrimitiveExpression ((uint) 5), sw));
287 [ExpectedException (typeof (ArgumentException))]
289 public void PrimitiveExpressionTest_UInt64 ()
291 StringBuilder sb = new StringBuilder ();
293 using (StringWriter sw = new StringWriter (sb)) {
294 Assert.AreEqual ("5UL", Generate (new CodePrimitiveExpression ((ulong) 5), sw));
300 public void ParameterDeclarationExpressionTest ()
302 CodeParameterDeclarationExpression cpde = null;
304 StringBuilder sb = new StringBuilder();
306 using (StringWriter sw = new StringWriter (sb)) {
307 cpde = new CodeParameterDeclarationExpression ();
309 Assert.AreEqual ("ByVal __exception As System.Void", Generate (cpde, sw), "#1");
311 Assert.AreEqual ("ByVal As System.Void", Generate (cpde, sw), "#1");
315 cpde = new CodeParameterDeclarationExpression ((string) null,
318 Assert.AreEqual ("ByVal __exception As System.Void", Generate (cpde, sw), "#2");
320 Assert.AreEqual ("ByVal As System.Void", Generate (cpde, sw), "#2");
324 cpde = new CodeParameterDeclarationExpression ("A", (string) null);
326 Assert.AreEqual ("ByVal __exception As A", Generate (cpde, sw), "#3");
328 Assert.AreEqual ("ByVal As A", Generate (cpde, sw), "#3");
332 cpde = new CodeParameterDeclarationExpression ((string) null, "B");
333 Assert.AreEqual ("ByVal B As System.Void", Generate (cpde, sw), "#4");
336 cpde = new CodeParameterDeclarationExpression ("A", "B");
337 Assert.AreEqual ("ByVal B As A", Generate (cpde, sw), "#5");
340 cpde.Direction = FieldDirection.Out;
341 Assert.AreEqual ("ByRef B As A", Generate (cpde, sw), "#6");
344 cpde.Direction = FieldDirection.Ref;
345 Assert.AreEqual ("ByRef B As A", Generate (cpde, sw), "#7");
350 private string Generate (CodeExpression expression, StringWriter sw)
352 generator.GenerateCodeFromExpression (expression, sw, options);
353 return sw.ToString ();