2008-12-08 Marek Habersack <mhabersack@novell.com>
[mono.git] / mcs / class / System.Web / System.Web.Compilation / TemplateControlCompiler.cs
1 //
2 // System.Web.Compilation.TemplateControlCompiler
3 //
4 // Authors:
5 //      Gonzalo Paniagua Javier (gonzalo@ximian.com)
6 //      Marek Habersack (mhabersack@novell.com)
7 //
8 // (C) 2003 Ximian, Inc (http://www.ximian.com)
9 // (C) 2004-2008 Novell, Inc (http://novell.com)
10
11 //
12 // Permission is hereby granted, free of charge, to any person obtaining
13 // a copy of this software and associated documentation files (the
14 // "Software"), to deal in the Software without restriction, including
15 // without limitation the rights to use, copy, modify, merge, publish,
16 // distribute, sublicense, and/or sell copies of the Software, and to
17 // permit persons to whom the Software is furnished to do so, subject to
18 // the following conditions:
19 // 
20 // The above copyright notice and this permission notice shall be
21 // included in all copies or substantial portions of the Software.
22 // 
23 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
24 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
25 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
26 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
27 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
28 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
29 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
30 //
31 using System;
32 using System.CodeDom;
33 using System.Collections;
34 using System.ComponentModel;
35 using System.Drawing;
36 using System.Globalization;
37 using System.Reflection;
38 using System.Text;
39 using System.Web;
40 using System.Web.UI;
41 using System.Web.UI.WebControls;
42 using System.Web.Util;
43 using System.ComponentModel.Design.Serialization;
44 using System.Text.RegularExpressions;
45 #if NET_2_0
46 using System.Configuration;
47 using System.Collections.Specialized;
48 using System.Collections.Generic;
49 using System.Web.Configuration;
50 #endif
51
52 namespace System.Web.Compilation
53 {
54         class TemplateControlCompiler : BaseCompiler
55         {
56                 static BindingFlags noCaseFlags = BindingFlags.Public | BindingFlags.NonPublic |
57                                                   BindingFlags.Instance | BindingFlags.IgnoreCase;
58                 static Type monoTypeType = Type.GetType ("System.MonoType");
59                 
60                 TemplateControlParser parser;
61                 int dataBoundAtts;
62                 internal ILocation currentLocation;
63
64                 static TypeConverter colorConverter;
65
66                 internal static CodeVariableReferenceExpression ctrlVar = new CodeVariableReferenceExpression ("__ctrl");
67                 
68 #if NET_2_0
69                 List <string> masterPageContentPlaceHolders;
70                 // When modifying those, make sure to look at the SanitizeBindCall to make sure it
71                 // picks up correct groups.
72                 static Regex bindRegex = new Regex (@"Bind\s*\(\s*[""']+(.*?)[""']+((\s*,\s*[""']+(.*?)[""']+)?)\s*\)\s*%>", RegexOptions.Compiled | RegexOptions.IgnoreCase);
73                 static Regex bindRegexInValue = new Regex (@"Bind\s*\(\s*[""']+(.*?)[""']+((\s*,\s*[""']+(.*?)[""']+)?)\s*\)\s*$", RegexOptions.Compiled | RegexOptions.IgnoreCase);
74 #endif
75                 static Regex evalRegexInValue = new Regex (@"(.*)Eval\s*\(\s*[""']+(.*?)[""']+((\s*,\s*[""']+(.*?)[""']+)?)\s*\)(.*)", RegexOptions.Compiled | RegexOptions.IgnoreCase);
76
77 #if NET_2_0
78                 List <string> MasterPageContentPlaceHolders {
79                         get {
80                                 if (masterPageContentPlaceHolders == null)
81                                         masterPageContentPlaceHolders = new List <string> ();
82                                 return masterPageContentPlaceHolders;
83                         }
84                 }
85 #endif
86                 public TemplateControlCompiler (TemplateControlParser parser)
87                         : base (parser)
88                 {
89                         this.parser = parser;
90                 }
91
92                 protected void EnsureID (ControlBuilder builder)
93                 {
94                         if (builder.ID == null || builder.ID.Trim () == "")
95                                 builder.ID = builder.GetNextID (null);
96                 }
97
98                 void CreateField (ControlBuilder builder, bool check)
99                 {
100                         if (builder == null || builder.ID == null || builder.ControlType == null)
101                                 return;
102 #if NET_2_0
103                         if (partialNameOverride [builder.ID] != null)
104                                 return;
105 #endif
106
107                         MemberAttributes ma = MemberAttributes.Family;
108                         currentLocation = builder.location;
109                         if (check && CheckBaseFieldOrProperty (builder.ID, builder.ControlType, ref ma))
110                                 return; // The field or property already exists in a base class and is accesible.
111
112                         CodeMemberField field;
113                         field = new CodeMemberField (builder.ControlType.FullName, builder.ID);
114                         field.Attributes = ma;
115 #if NET_2_0
116                         field.Type.Options |= CodeTypeReferenceOptions.GlobalReference;
117
118                         if (partialClass != null)
119                                 partialClass.Members.Add (AddLinePragma (field, builder));
120                         else
121 #endif
122                                 mainClass.Members.Add (AddLinePragma (field, builder));
123                 }
124
125                 bool CheckBaseFieldOrProperty (string id, Type type, ref MemberAttributes ma)
126                 {
127                         FieldInfo fld = parser.BaseType.GetField (id, noCaseFlags);
128
129                         Type other = null;
130                         if (fld == null || fld.IsPrivate) {
131                                 PropertyInfo prop = parser.BaseType.GetProperty (id, noCaseFlags);
132                                 if (prop != null) {
133                                         MethodInfo setm = prop.GetSetMethod (true);
134                                         if (setm != null)
135                                                 other = prop.PropertyType;
136                                 }
137                         } else {
138                                 other = fld.FieldType;
139                         }
140                         
141                         if (other == null)
142                                 return false;
143
144                         if (!other.IsAssignableFrom (type)) {
145 #if NET_2_0
146                                 ma |= MemberAttributes.New;
147                                 return false;
148 #else
149                                 string msg = String.Format ("The base class includes the field '{0}', but its " +
150                                                             "type '{1}' is not compatible with {2}",
151                                                             id, other, type);
152                                 throw new ParseException (currentLocation, msg);
153 #endif
154                         }
155
156                         return true;
157                 }
158                 
159                 void AddParsedSubObjectStmt (ControlBuilder builder, CodeExpression expr) 
160                 {
161                         if (!builder.haveParserVariable) {
162                                 CodeVariableDeclarationStatement p = new CodeVariableDeclarationStatement();
163                                 p.Name = "__parser";
164                                 p.Type = new CodeTypeReference (typeof (IParserAccessor));
165                                 p.InitExpression = new CodeCastExpression (typeof (IParserAccessor), ctrlVar);
166                                 builder.methodStatements.Add (p);
167                                 builder.haveParserVariable = true;
168                         }
169
170                         CodeVariableReferenceExpression var = new CodeVariableReferenceExpression ("__parser");
171                         CodeMethodInvokeExpression invoke = new CodeMethodInvokeExpression (var, "AddParsedSubObject");
172                         invoke.Parameters.Add (expr);
173                         builder.methodStatements.Add (AddLinePragma (invoke, builder));
174                 }
175                 
176                 void InitMethod (ControlBuilder builder, bool isTemplate, bool childrenAsProperties)
177                 {
178                         currentLocation = builder.location;
179                         
180                         string tailname = ((builder is RootBuilder) ? "Tree" : ("_" + builder.ID));
181                         CodeMemberMethod method = new CodeMemberMethod ();
182                         builder.method = method;
183                         builder.methodStatements = method.Statements;
184
185                         method.Name = "__BuildControl" + tailname;
186                         method.Attributes = MemberAttributes.Private | MemberAttributes.Final;
187                         Type type = builder.ControlType;
188
189                         /* in the case this is the __BuildControlTree
190                          * method, allow subclasses to insert control
191                          * specific code. */
192                         if (builder is RootBuilder) {
193 #if NET_2_0
194                                 SetCustomAttributes (method);
195 #endif
196                                 AddStatementsToInitMethod (method);
197                         }
198                         
199                         if (builder.HasAspCode) {
200                                 CodeMemberMethod renderMethod = new CodeMemberMethod ();
201                                 builder.renderMethod = renderMethod;
202                                 renderMethod.Name = "__Render" + tailname;
203                                 renderMethod.Attributes = MemberAttributes.Private | MemberAttributes.Final;
204                                 CodeParameterDeclarationExpression arg1 = new CodeParameterDeclarationExpression ();
205                                 arg1.Type = new CodeTypeReference (typeof (HtmlTextWriter));
206                                 arg1.Name = "__output";
207                                 CodeParameterDeclarationExpression arg2 = new CodeParameterDeclarationExpression ();
208                                 arg2.Type = new CodeTypeReference (typeof (Control));
209                                 arg2.Name = "parameterContainer";
210                                 renderMethod.Parameters.Add (arg1);
211                                 renderMethod.Parameters.Add (arg2);
212                                 mainClass.Members.Add (renderMethod);
213                         }
214                         
215                         if (childrenAsProperties || builder.ControlType == null) {
216                                 string typeString;
217                                 if (builder is RootBuilder)
218                                         typeString = parser.ClassName;
219                                 else {
220                                         if (builder.ControlType != null && builder.isProperty &&
221                                             !typeof (ITemplate).IsAssignableFrom (builder.ControlType))
222                                                 typeString = builder.ControlType.FullName;
223                                         else 
224                                                 typeString = "System.Web.UI.Control";
225                                         ProcessTemplateChildren (builder);
226                                 }
227
228                                 method.Parameters.Add (new CodeParameterDeclarationExpression (typeString, "__ctrl"));
229                         } else {
230                                 
231                                 if (typeof (Control).IsAssignableFrom (type))
232                                         method.ReturnType = new CodeTypeReference (typeof (Control));
233
234                                 // _ctrl = new $controlType ($parameters);
235                                 //
236                                 CodeObjectCreateExpression newExpr = new CodeObjectCreateExpression (type);
237
238                                 object [] atts = type.GetCustomAttributes (typeof (ConstructorNeedsTagAttribute), true);
239                                 if (atts != null && atts.Length > 0) {
240                                         ConstructorNeedsTagAttribute att = (ConstructorNeedsTagAttribute) atts [0];
241                                         if (att.NeedsTag)
242                                                 newExpr.Parameters.Add (new CodePrimitiveExpression (builder.TagName));
243                                 } else if (builder is DataBindingBuilder) {
244                                         newExpr.Parameters.Add (new CodePrimitiveExpression (0));
245                                         newExpr.Parameters.Add (new CodePrimitiveExpression (1));
246                                 }
247
248                                 method.Statements.Add (new CodeVariableDeclarationStatement (builder.ControlType, "__ctrl"));
249                                 CodeAssignStatement assign = new CodeAssignStatement ();
250                                 assign.Left = ctrlVar;
251                                 assign.Right = newExpr;
252                                 method.Statements.Add (AddLinePragma (assign, builder));
253                                                                 
254                                 // this.$builderID = _ctrl;
255                                 //
256                                 CodeFieldReferenceExpression builderID = new CodeFieldReferenceExpression ();
257                                 builderID.TargetObject = thisRef;
258                                 builderID.FieldName = builder.ID;
259                                 assign = new CodeAssignStatement ();
260                                 assign.Left = builderID;
261                                 assign.Right = ctrlVar;
262                                 method.Statements.Add (AddLinePragma (assign, builder));
263
264                                 if (typeof (UserControl).IsAssignableFrom (type)) {
265                                         CodeMethodReferenceExpression mref = new CodeMethodReferenceExpression ();
266                                         mref.TargetObject = builderID;
267                                         mref.MethodName = "InitializeAsUserControl";
268                                         CodeMethodInvokeExpression initAsControl = new CodeMethodInvokeExpression (mref);
269                                         initAsControl.Parameters.Add (new CodePropertyReferenceExpression (thisRef, "Page"));
270                                         method.Statements.Add (initAsControl);
271                                 }
272
273 #if NET_2_0
274                                 if (builder.ParentTemplateBuilder is System.Web.UI.WebControls.ContentBuilderInternal) {
275                                         PropertyInfo pi;
276
277                                         try {
278                                                 pi = type.GetProperty ("TemplateControl");
279                                         } catch (Exception) {
280                                                 pi = null;
281                                         }
282
283                                         if (pi != null && pi.CanWrite) {
284                                                 // __ctrl.TemplateControl = this;
285                                                 assign = new CodeAssignStatement ();
286                                                 assign.Left = new CodePropertyReferenceExpression (ctrlVar, "TemplateControl");;
287                                                 assign.Right = thisRef;
288                                                 method.Statements.Add (assign);
289                                         }
290                                 }
291                                 
292                                 // _ctrl.SkinID = $value
293                                 // _ctrl.ApplyStyleSheetSkin (this);
294                                 //
295                                 // the SkinID assignment needs to come
296                                 // before the call to
297                                 // ApplyStyleSheetSkin, for obvious
298                                 // reasons.  We skip SkinID in
299                                 // CreateAssignStatementsFromAttributes
300                                 // below.
301                                 // 
302                                 if (builder.attribs != null) {
303                                         string skinid = builder.attribs ["skinid"] as string;
304                                         if (skinid != null)
305                                                 CreateAssignStatementFromAttribute (builder, "skinid");
306                                 }
307                                 if (typeof (WebControl).IsAssignableFrom (type)) {
308                                         CodeMethodInvokeExpression applyStyleSheetSkin = new CodeMethodInvokeExpression (ctrlVar, "ApplyStyleSheetSkin");
309                                         if (typeof (Page).IsAssignableFrom (parser.BaseType))
310                                                 applyStyleSheetSkin.Parameters.Add (thisRef);
311                                         else
312                                                 applyStyleSheetSkin.Parameters.Add (new CodePropertyReferenceExpression (thisRef, "Page"));
313                                         method.Statements.Add (applyStyleSheetSkin);
314                                 }
315 #endif
316
317                                 // Process template children before anything else
318                                 ProcessTemplateChildren (builder);
319
320                                 // process ID here. It should be set before any other attributes are
321                                 // assigned, since the control code may rely on ID being set. We
322                                 // skip ID in CreateAssignStatementsFromAttributes
323                                 if (builder.attribs != null) {
324                                         string ctl_id = builder.attribs ["id"] as string;
325                                         if (ctl_id != null && ctl_id != String.Empty)
326                                                 CreateAssignStatementFromAttribute (builder, "id");
327                                 }
328                                 
329 #if NET_2_0
330                                 if (typeof (ContentPlaceHolder).IsAssignableFrom (type)) {
331                                         List <string> placeHolderIds = MasterPageContentPlaceHolders;
332                                         string cphID = builder.ID;
333                                         
334                                         if (!placeHolderIds.Contains (cphID))
335                                                 placeHolderIds.Add (cphID);
336
337                                         CodeConditionStatement condStatement;
338
339                                         // Add the __Template_* field
340                                         string templateField = "__Template_" + cphID;
341                                         CodeMemberField fld = new CodeMemberField (typeof (ITemplate), templateField);
342                                         fld.Attributes = MemberAttributes.Private;
343                                         mainClass.Members.Add (fld);
344
345                                         CodeFieldReferenceExpression templateID = new CodeFieldReferenceExpression ();
346                                         templateID.TargetObject = thisRef;
347                                         templateID.FieldName = templateField;
348
349                                         CreateContentPlaceHolderTemplateProperty (templateField, "Template_" + cphID);
350                                         
351                                         // if ((this.ContentTemplates != null)) {
352                                         //      this.__Template_$builder.ID = ((System.Web.UI.ITemplate)(this.ContentTemplates["$builder.ID"]));
353                                         // }
354                                         //
355                                         CodeFieldReferenceExpression contentTemplates = new CodeFieldReferenceExpression ();
356                                         contentTemplates.TargetObject = thisRef;
357                                         contentTemplates.FieldName = "ContentTemplates";
358
359                                         CodeIndexerExpression indexer = new CodeIndexerExpression ();
360                                         indexer.TargetObject = new CodePropertyReferenceExpression (thisRef, "ContentTemplates");
361                                         indexer.Indices.Add (new CodePrimitiveExpression (cphID));
362
363                                         assign = new CodeAssignStatement ();
364                                         assign.Left = templateID;
365                                         assign.Right = new CodeCastExpression (new CodeTypeReference (typeof (ITemplate)), indexer);
366
367                                         condStatement = new CodeConditionStatement (new CodeBinaryOperatorExpression (contentTemplates,
368                                                                                                                       CodeBinaryOperatorType.IdentityInequality,
369                                                                                                                       new CodePrimitiveExpression (null)),
370                                                                                     assign);
371
372                                         method.Statements.Add (condStatement);
373
374                                         // if ((this.__Template_mainContent != null)) {
375                                         //      this.__Template_mainContent.InstantiateIn(__ctrl);
376                                         // }
377                                         // and also set things up such that any additional code ends up in:
378                                         // else {
379                                         //      ...
380                                         // }
381                                         //
382                                         CodeMethodReferenceExpression methodRef = new CodeMethodReferenceExpression ();
383                                         methodRef.TargetObject = templateID;
384                                         methodRef.MethodName = "InstantiateIn";
385
386                                         CodeMethodInvokeExpression instantiateInInvoke;
387                                         instantiateInInvoke = new CodeMethodInvokeExpression (methodRef, ctrlVar);
388
389                                         condStatement = new CodeConditionStatement (new CodeBinaryOperatorExpression (templateID,
390                                                                                                                       CodeBinaryOperatorType.IdentityInequality,
391                                                                                                                       new CodePrimitiveExpression (null)),
392                                                                                     new CodeExpressionStatement (instantiateInInvoke));
393                                         method.Statements.Add (condStatement);
394
395                                         // this is the bit that causes the following stuff to end up in the else { }
396                                         builder.methodStatements = condStatement.FalseStatements;
397                                 }
398 #endif
399                         }
400                         
401                         mainClass.Members.Add (method);
402                 }
403
404                 void ProcessTemplateChildren (ControlBuilder builder)
405                 {
406                         ArrayList templates = builder.TemplateChildren;
407                         if (templates != null && templates.Count > 0) {
408                                 foreach (TemplateBuilder tb in templates) {
409                                         CreateControlTree (tb, true, false);
410 #if NET_2_0
411                                         if (tb.BindingDirection == BindingDirection.TwoWay) {
412                                                 string extractMethod = CreateExtractValuesMethod (tb);
413                                                 AddBindableTemplateInvocation (builder, tb.TagName, tb.method.Name, extractMethod);
414                                         } else
415 #endif
416                                                 AddTemplateInvocation (builder, tb.TagName, tb.method.Name);
417                                 }
418                         }
419                 }
420                 
421 #if NET_2_0
422                 void SetCustomAttribute (CodeMemberMethod method, UnknownAttributeDescriptor uad)
423                 {
424                         CodeAssignStatement assign = new CodeAssignStatement ();
425                         assign.Left = new CodePropertyReferenceExpression (
426                                 new CodeArgumentReferenceExpression("__ctrl"),
427                                 uad.Info.Name);
428                         assign.Right = GetExpressionFromString (uad.Value.GetType (), uad.Value.ToString (), uad.Info);
429                         
430                         method.Statements.Add (assign);
431                 }
432                 
433                 void SetCustomAttributes (CodeMemberMethod method)
434                 {
435                         Type baseType = parser.BaseType;
436                         if (baseType == null)
437                                 return;
438                         
439                         List <UnknownAttributeDescriptor> attrs = parser.UnknownMainAttributes;
440                         if (attrs == null || attrs.Count == 0)
441                                 return;
442
443                         foreach (UnknownAttributeDescriptor uad in attrs)
444                                 SetCustomAttribute (method, uad);
445                 }
446 #endif
447                 
448                 protected virtual void AddStatementsToInitMethod (CodeMemberMethod method)
449                 {
450                 }
451
452                 void AddLiteralSubObject (ControlBuilder builder, string str)
453                 {
454                         if (!builder.HasAspCode) {
455                                 CodeObjectCreateExpression expr;
456                                 expr = new CodeObjectCreateExpression (typeof (LiteralControl), new CodePrimitiveExpression (str));
457                                 AddParsedSubObjectStmt (builder, expr);
458                         } else {
459                                 CodeMethodReferenceExpression methodRef = new CodeMethodReferenceExpression ();
460                                 methodRef.TargetObject = new CodeArgumentReferenceExpression ("__output");
461                                 methodRef.MethodName = "Write";
462
463                                 CodeMethodInvokeExpression expr;
464                                 expr = new CodeMethodInvokeExpression (methodRef, new CodePrimitiveExpression (str));
465                                 builder.renderMethod.Statements.Add (AddLinePragma (expr, builder));
466                         }
467                 }
468
469                 string TrimDB (string value, bool trimTail)
470                 {
471                         string str = value.Trim ();
472                         int len = str.Length;
473                         int idx = str.IndexOf ('#', 2) + 1;
474                         if (idx >= len)
475                                 return String.Empty;
476                         if (trimTail)
477                                 len -= 2;
478                         
479                         return str.Substring (idx, len - idx).Trim ();
480                 }
481
482                 CodeExpression CreateEvalInvokeExpression (Regex regex, string value, bool isBind)
483                 {
484                         Match match = regex.Match (value);
485                         if (!match.Success) {
486 #if NET_2_0
487                                 if (isBind)
488                                         throw new HttpParseException ("Bind invocation wasn't formatted properly.");
489 #endif
490                                 return null;
491                         }
492                         
493                         string sanitizedSnippet;
494                         if (isBind)
495                                 sanitizedSnippet = SanitizeBindCall (match);
496                         else
497                                 sanitizedSnippet = value;
498                         
499                         return new CodeSnippetExpression (sanitizedSnippet);
500                 }
501
502                 string SanitizeBindCall (Match match)
503                 {
504                         GroupCollection groups = match.Groups;
505                         StringBuilder sb = new StringBuilder ("Eval(\"" + groups [1] + "\"");
506                         Group second = groups [4];
507                         if (second != null) {
508                                 string v = second.Value;
509                                 if (v != null && v.Length > 0)
510                                         sb.Append (",\"" + second + "\"");
511                         }
512                         
513                         sb.Append (")");
514                         return sb.ToString ();
515                 }
516                 
517                 string DataBoundProperty (ControlBuilder builder, Type type, string varName, string value)
518                 {
519                         value = TrimDB (value, true);
520                         CodeMemberMethod method;
521                         string dbMethodName = builder.method.Name + "_DB_" + dataBoundAtts++;
522                         CodeExpression valueExpression = null;
523                         value = value.Trim ();
524                         
525 #if NET_2_0
526                         bool need_if = false;
527                         if (StrUtils.StartsWith (value, "Bind", true)) {
528                                 valueExpression = CreateEvalInvokeExpression (bindRegexInValue, value, true);
529                                 if (valueExpression != null)
530                                         need_if = true;
531                         } else
532 #endif
533                                 if (StrUtils.StartsWith (value, "Eval", true))
534                                         valueExpression = CreateEvalInvokeExpression (evalRegexInValue, value, false);
535                         
536                         if (valueExpression == null)
537                                 valueExpression = new CodeSnippetExpression (value);
538                         
539                         method = CreateDBMethod (builder, dbMethodName, GetContainerType (builder), builder.ControlType);
540                         
541                         CodeVariableReferenceExpression targetExpr = new CodeVariableReferenceExpression ("target");
542
543                         // This should be a CodePropertyReferenceExpression for properties... but it works anyway
544                         CodeFieldReferenceExpression field = new CodeFieldReferenceExpression (targetExpr, varName);
545
546                         CodeExpression expr;
547                         if (type == typeof (string)) {
548                                 CodeMethodInvokeExpression tostring = new CodeMethodInvokeExpression ();
549                                 CodeTypeReferenceExpression conv = new CodeTypeReferenceExpression (typeof (Convert));
550                                 tostring.Method = new CodeMethodReferenceExpression (conv, "ToString");
551                                 tostring.Parameters.Add (valueExpression);
552                                 expr = tostring;
553                         } else
554                                 expr = new CodeCastExpression (type, valueExpression);
555
556                         CodeAssignStatement assign = new CodeAssignStatement (field, expr);
557 #if NET_2_0
558                         if (need_if) {
559                                 CodeExpression page = new CodePropertyReferenceExpression (thisRef, "Page");
560                                 CodeExpression left = new CodeMethodInvokeExpression (page, "GetDataItem");
561                                 CodeBinaryOperatorExpression ce = new CodeBinaryOperatorExpression (left, CodeBinaryOperatorType.IdentityInequality, new CodePrimitiveExpression (null));
562                                 CodeConditionStatement ccs = new CodeConditionStatement (ce, assign);
563                                 method.Statements.Add (ccs);
564                         }
565                         else
566 #endif
567                                 method.Statements.Add (assign);
568
569                         mainClass.Members.Add (method);
570                         return method.Name;
571                 }
572
573                 void AddCodeForPropertyOrField (ControlBuilder builder, Type type, string var_name, string att, MemberInfo member, bool isDataBound, bool isExpression)
574                 {
575                         CodeMemberMethod method = builder.method;
576                         bool isWritable = IsWritablePropertyOrField (member);
577                         
578                         if (isDataBound && isWritable) {
579                                 string dbMethodName = DataBoundProperty (builder, type, var_name, att);
580                                 AddEventAssign (method, builder, "DataBinding", typeof (EventHandler), dbMethodName);
581                                 return;
582                         }
583 #if NET_2_0
584                         else if (isExpression && isWritable) {
585                                 AddExpressionAssign (method, builder, member, type, var_name, att);
586                                 return;
587                         }
588 #endif
589
590                         CodeAssignStatement assign = new CodeAssignStatement ();
591                         assign.Left = new CodePropertyReferenceExpression (ctrlVar, var_name);
592                         currentLocation = builder.location;
593                         assign.Right = GetExpressionFromString (type, att, member);
594
595                         method.Statements.Add (AddLinePragma (assign, builder));
596                 }
597
598                 bool IsDirective (string value, char directiveChar)
599                 {
600                         if (value == null || value == String.Empty)
601                                 return false;
602                         
603                         value = value.Trim ();
604                         if (!StrUtils.StartsWith (value, "<%") || !StrUtils.EndsWith (value, "%>"))
605                                 return false;
606
607                         int dcIndex = value.IndexOf (directiveChar, 2);
608                         if (dcIndex == -1)
609                                 return false;
610
611                         if (dcIndex == 2)
612                                 return true;
613                         dcIndex--;
614                         
615                         while (dcIndex >= 2) {
616                                 if (!Char.IsWhiteSpace (value [dcIndex]))
617                                         return false;
618                                 dcIndex--;
619                         }
620
621                         return true;
622                 }
623                 
624                 bool IsDataBound (string value)
625                 {
626                         return IsDirective (value, '#');
627                 }
628
629 #if NET_2_0
630                 bool IsExpression (string value)
631                 {
632                         return IsDirective (value, '$');
633                 }               
634
635                 void RegisterBindingInfo (ControlBuilder builder, string propName, ref string value)
636                 {
637                         string str = TrimDB (value, false);
638                         if (StrUtils.StartsWith (str, "Bind", true)) {
639                                 Match match = bindRegex.Match (str);
640                                 if (match.Success) {
641                                         string bindingName = match.Groups [1].Value;
642                                         TemplateBuilder templateBuilder = builder.ParentTemplateBuilder;
643                                         
644                                         if (templateBuilder == null)
645                                                 throw new HttpException ("Bind expression not allowed in this context.");
646
647                                         if (templateBuilder.BindingDirection == BindingDirection.OneWay)
648                                                 return;
649                                         
650                                         string id = builder.attribs ["ID"] as string;
651                                         if (id == null)
652                                                 throw new HttpException ("Control of type '" + builder.ControlType + "' using two-way binding on property '" + propName + "' must have an ID.");
653                                         
654                                         templateBuilder.RegisterBoundProperty (builder.ControlType, propName, id, bindingName);
655                                 }
656                         }
657                 }
658 #endif
659
660                 /*
661                 static bool InvariantCompare (string a, string b)
662                 {
663                         return (0 == String.Compare (a, b, false, CultureInfo.InvariantCulture));
664                 }
665                 */
666
667                 static bool InvariantCompareNoCase (string a, string b)
668                 {
669                         return (0 == String.Compare (a, b, true, CultureInfo.InvariantCulture));
670                 }
671
672                 static MemberInfo GetFieldOrProperty (Type type, string name)
673                 {
674                         MemberInfo member = null;
675                         try {
676                                 member = type.GetProperty (name, noCaseFlags & ~BindingFlags.NonPublic);
677                         } catch {}
678                         
679                         if (member != null)
680                                 return member;
681
682                         try {
683                                 member = type.GetField (name, noCaseFlags & ~BindingFlags.NonPublic);
684                         } catch {}
685
686                         return member;
687                 }
688
689                 static bool IsWritablePropertyOrField (MemberInfo member)
690                 {
691                         PropertyInfo pi = member as PropertyInfo;
692                         if (pi != null)
693                                 return pi.GetSetMethod (false) != null;
694                         FieldInfo fi = member as FieldInfo;
695                         if (fi != null)
696                                 return !fi.IsInitOnly;
697                         throw new ArgumentException ("Argument must be of PropertyInfo or FieldInfo type", "member");
698                 }
699
700                 bool ProcessPropertiesAndFields (ControlBuilder builder, MemberInfo member, string id,
701                                                  string attValue, string prefix)
702                 {
703                         int hyphen = id.IndexOf ('-');
704                         bool isPropertyInfo = (member is PropertyInfo);
705                         bool isDataBound = IsDataBound (attValue);
706 #if NET_2_0
707                         bool isExpression = !isDataBound && IsExpression (attValue);
708 #else
709                         bool isExpression = false;
710 #endif
711                         Type type;
712                         if (isPropertyInfo) {
713                                 type = ((PropertyInfo) member).PropertyType;
714                         } else {
715                                 type = ((FieldInfo) member).FieldType;
716                         }
717
718                         if (InvariantCompareNoCase (member.Name, id)) {
719 #if NET_2_0
720                                 if (isDataBound)
721                                         RegisterBindingInfo (builder, member.Name, ref attValue);
722                                 
723 #endif
724                                 if (!IsWritablePropertyOrField (member))
725                                         return false;
726                                 
727                                 AddCodeForPropertyOrField (builder, type, member.Name, attValue, member, isDataBound, isExpression);
728                                 return true;
729                         }
730                         
731                         if (hyphen == -1)
732                                 return false;
733
734                         string prop_field = id.Replace ("-", ".");
735                         string [] parts = prop_field.Split (new char [] {'.'});
736                         int length = parts.Length;
737                         
738                         if (length < 2 || !InvariantCompareNoCase (member.Name, parts [0]))
739                                 return false;
740
741                         if (length > 2) {
742                                 MemberInfo sub_member = GetFieldOrProperty (type, parts [1]);
743                                 if (sub_member == null)
744                                         return false;
745
746                                 string new_prefix = prefix + member.Name + ".";
747                                 string new_id = id.Substring (hyphen + 1);
748                                 return ProcessPropertiesAndFields (builder, sub_member, new_id, attValue, new_prefix);
749                         }
750
751                         MemberInfo subpf = GetFieldOrProperty (type, parts [1]);
752                         if (!(subpf is PropertyInfo))
753                                 return false;
754
755                         PropertyInfo subprop = (PropertyInfo) subpf;
756                         if (subprop.CanWrite == false)
757                                 return false;
758
759                         bool is_bool = (subprop.PropertyType == typeof (bool));
760                         if (!is_bool && attValue == null)
761                                 return false; // Font-Size -> Font-Size="" as html
762
763                         string val = attValue;
764                         if (attValue == null && is_bool)
765                                 val = "true"; // Font-Bold <=> Font-Bold="true"
766 #if NET_2_0
767                         if (isDataBound)
768                                 RegisterBindingInfo (builder, prefix + member.Name + "." + subprop.Name, ref attValue);
769 #endif
770                         AddCodeForPropertyOrField (builder, subprop.PropertyType,
771                                                    prefix + member.Name + "." + subprop.Name,
772                                                    val, subprop, isDataBound, isExpression);
773
774                         return true;
775                 }
776
777 #if NET_2_0
778                 CodeExpression CompileExpression (MemberInfo member, Type type, string value, bool useSetAttribute)
779                 {
780                         // First let's find the correct expression builder
781                         value = value.Substring (3, value.Length - 5).Trim ();
782                         int colon = value.IndexOf (':');
783                         if (colon == -1)
784                                 return null;
785                         string prefix = value.Substring (0, colon).Trim ();
786                         string expr = value.Substring (colon + 1).Trim ();
787                         
788                         System.Configuration.Configuration config = WebConfigurationManager.OpenWebConfiguration ("");
789                         if (config == null)
790                                 return null;
791                         
792                         CompilationSection cs = (CompilationSection)config.GetSection ("system.web/compilation");
793                         if (cs == null)
794                                 return null;
795                         
796                         if (cs.ExpressionBuilders == null || cs.ExpressionBuilders.Count == 0)
797                                 return null;
798
799                         System.Web.Configuration.ExpressionBuilder ceb = cs.ExpressionBuilders[prefix];
800                         if (ceb == null)
801                                 return null;
802                         
803                         string builderType = ceb.Type;
804                         Type t;
805                         
806                         try {
807                                 t = HttpApplication.LoadType (builderType, true);
808                         } catch (Exception e) {
809                                 throw new HttpException (String.Format ("Failed to load expression builder type `{0}'", builderType), e);
810                         }
811
812                         if (!typeof (System.Web.Compilation.ExpressionBuilder).IsAssignableFrom (t))
813                                 throw new HttpException (String.Format ("Type {0} is not descendant from System.Web.Compilation.ExpressionBuilder", builderType));
814
815                         System.Web.Compilation.ExpressionBuilder eb = null;
816                         object parsedData;
817                         ExpressionBuilderContext ctx;
818                         
819                         try {
820                                 eb = Activator.CreateInstance (t) as System.Web.Compilation.ExpressionBuilder;
821                                 ctx = new ExpressionBuilderContext (HttpContext.Current.Request.FilePath);
822                                 parsedData = eb.ParseExpression (expr, type, ctx);
823                         } catch (Exception e) {
824                                 throw new HttpException (String.Format ("Failed to create an instance of type `{0}'", builderType), e);
825                         }
826                         
827                         BoundPropertyEntry bpe = CreateBoundPropertyEntry (member as PropertyInfo, prefix, expr, useSetAttribute);
828                         return eb.GetCodeExpression (bpe, parsedData, ctx);
829                 }
830                 
831                 void AddExpressionAssign (CodeMemberMethod method, ControlBuilder builder, MemberInfo member, Type type, string name, string value)
832                 {
833                         CodeExpression expr = CompileExpression (member, type, value, false);
834
835                         if (expr == null)
836                                 return;
837                         
838                         CodeAssignStatement assign = new CodeAssignStatement ();
839                         assign.Left = new CodePropertyReferenceExpression (ctrlVar, name);
840                         assign.Right = expr;
841                         
842                         builder.method.Statements.Add (AddLinePragma (assign, builder));
843                 }
844
845                 BoundPropertyEntry CreateBoundPropertyEntry (PropertyInfo pi, string prefix, string expr, bool useSetAttribute)
846                 {
847                         BoundPropertyEntry ret = new BoundPropertyEntry ();
848                         ret.Expression = expr;
849                         ret.ExpressionPrefix = prefix;
850                         ret.Generated = false;
851                         if (pi != null) {
852                                 ret.Name = pi.Name;
853                                 ret.PropertyInfo = pi;
854                                 ret.Type = pi.PropertyType;
855                         }
856                         ret.UseSetAttribute = useSetAttribute;
857                         
858                         return ret;
859                 }
860                 
861                 void AssignPropertyFromResources (ControlBuilder builder, MemberInfo mi, string attvalue)
862                 {
863                         bool isProperty = mi.MemberType == MemberTypes.Property;
864                         bool isField = !isProperty && (mi.MemberType == MemberTypes.Field);
865
866                         if (!isProperty && !isField || !IsWritablePropertyOrField (mi))
867                                 return;                 
868
869                         string memberName = mi.Name;
870                         string resname = String.Concat (attvalue, ".", memberName);
871
872                         // __ctrl.Text = System.Convert.ToString(HttpContext.GetLocalResourceObject("ButtonResource1.Text"));
873                         string inputFile = parser.InputFile;
874                         string physPath = HttpContext.Current.Request.PhysicalApplicationPath;
875         
876                         if (StrUtils.StartsWith (inputFile, physPath))
877                                 inputFile = parser.InputFile.Substring (physPath.Length - 1);
878                         else
879                                 return;
880
881                         char dsc = System.IO.Path.DirectorySeparatorChar;
882                         if (dsc != '/')
883                                 inputFile = inputFile.Replace (dsc, '/');
884
885                         object obj = HttpContext.GetLocalResourceObject (inputFile, resname);
886                         if (obj == null)
887                                 return;
888
889                         if (!isProperty && !isField)
890                                 return; // an "impossible" case
891                         
892                         CodeAssignStatement assign = new CodeAssignStatement ();
893                         
894                         assign.Left = new CodePropertyReferenceExpression (ctrlVar, memberName);
895                         assign.Right = ResourceExpressionBuilder.CreateGetLocalResourceObject (mi, resname);
896                         
897                         builder.method.Statements.Add (AddLinePragma (assign, builder));
898                 }
899
900                 void AssignPropertiesFromResources (ControlBuilder builder, Type controlType, string attvalue)
901                 {
902                         // Process all public fields and properties of the control. We don't use GetMembers to make the code
903                         // faster
904                         FieldInfo [] fields = controlType.GetFields (
905                                 BindingFlags.Instance | BindingFlags.Static |
906                                 BindingFlags.Public | BindingFlags.FlattenHierarchy);
907                         PropertyInfo [] properties = controlType.GetProperties (
908                                 BindingFlags.Instance | BindingFlags.Static |
909                                 BindingFlags.Public | BindingFlags.FlattenHierarchy);
910
911                         foreach (FieldInfo fi in fields)
912                                 AssignPropertyFromResources (builder, fi, attvalue);
913                         foreach (PropertyInfo pi in properties)
914                                 AssignPropertyFromResources (builder, pi, attvalue);
915                 }
916                 
917                 void AssignPropertiesFromResources (ControlBuilder builder, string attvalue)
918                 {
919                         if (attvalue == null || attvalue.Length == 0)
920                                 return;
921                         
922                         Type controlType = builder.ControlType;
923                         if (controlType == null)
924                                 return;
925
926                         AssignPropertiesFromResources (builder, controlType, attvalue);
927                 }
928 #endif
929                 
930                 void AddEventAssign (CodeMemberMethod method, ControlBuilder builder, string name, Type type, string value)
931                 {
932                         //"__ctrl.{0} += new {1} (this.{2});"
933                         CodeEventReferenceExpression evtID = new CodeEventReferenceExpression (ctrlVar, name);
934
935                         CodeDelegateCreateExpression create;
936                         create = new CodeDelegateCreateExpression (new CodeTypeReference (type), thisRef, value);
937
938                         CodeAttachEventStatement attach = new CodeAttachEventStatement (evtID, create);
939                         method.Statements.Add (attach);
940                 }
941                 
942                 void CreateAssignStatementFromAttribute (ControlBuilder builder, string id)
943                 {
944                         EventInfo [] ev_info = null;
945                         Type type = builder.ControlType;
946                         
947                         string attvalue = builder.attribs [id] as string;
948                         if (id.Length > 2 && id.Substring (0, 2).ToUpper () == "ON"){
949                                 if (ev_info == null)
950                                         ev_info = type.GetEvents ();
951
952                                 string id_as_event = id.Substring (2);
953                                 foreach (EventInfo ev in ev_info){
954                                         if (InvariantCompareNoCase (ev.Name, id_as_event)){
955                                                 AddEventAssign (builder.method,
956                                                                 builder,
957                                                                 ev.Name,
958                                                                 ev.EventHandlerType,
959                                                                 attvalue);
960                                                 
961                                                 return;
962                                         }
963                                 }
964
965                         }
966
967 #if NET_2_0
968                         if (id.ToLower () == "meta:resourcekey") {
969                                 AssignPropertiesFromResources (builder, attvalue);
970                                 return;
971                         }
972 #endif
973                         
974                         int hyphen = id.IndexOf ('-');
975                         string alt_id = id;
976                         if (hyphen != -1)
977                                 alt_id = id.Substring (0, hyphen);
978
979                         MemberInfo fop = GetFieldOrProperty (type, alt_id);
980                         if (fop != null) {
981                                 if (ProcessPropertiesAndFields (builder, fop, id, attvalue, null))
982                                         return;
983                         }
984
985                         if (!typeof (IAttributeAccessor).IsAssignableFrom (type))
986                                 throw new ParseException (builder.location, "Unrecognized attribute: " + id);
987
988                         CodeMemberMethod method = builder.method;
989                         bool isDatabound = IsDataBound (attvalue);
990 #if NET_2_0
991                         bool isExpression = !isDatabound && IsExpression (attvalue);
992 #endif
993
994                         if (isDatabound) {
995                                 string value = attvalue.Substring (3, attvalue.Length - 5).Trim ();
996                                 CodeExpression valueExpression = null;
997 #if NET_2_0
998                                 if (StrUtils.StartsWith (value, "Bind", true))
999                                         valueExpression = CreateEvalInvokeExpression (bindRegexInValue, value, true);
1000                                 else
1001 #endif
1002                                 if (StrUtils.StartsWith (value, "Eval", true))
1003                                         valueExpression = CreateEvalInvokeExpression (evalRegexInValue, value, false);
1004                                 
1005                                 if (valueExpression == null && value != null && value.Trim () != String.Empty)
1006                                         valueExpression = new CodeSnippetExpression (value);
1007                                 
1008                                 CreateDBAttributeMethod (builder, id, valueExpression);
1009                         } else {
1010                                 CodeCastExpression cast;
1011                                 CodeMethodReferenceExpression methodExpr;
1012                                 CodeMethodInvokeExpression expr;
1013
1014                                 cast = new CodeCastExpression (typeof (IAttributeAccessor), ctrlVar);
1015                                 methodExpr = new CodeMethodReferenceExpression (cast, "SetAttribute");
1016                                 expr = new CodeMethodInvokeExpression (methodExpr);
1017                                 expr.Parameters.Add (new CodePrimitiveExpression (id));
1018
1019                                 CodeExpression valueExpr = null;
1020 #if NET_2_0
1021                                 if (isExpression)
1022                                         valueExpr = CompileExpression (null, typeof (string), attvalue, true);
1023
1024                                 if (valueExpr == null)
1025 #endif
1026                                         valueExpr = new CodePrimitiveExpression (attvalue);
1027                                 
1028                                 expr.Parameters.Add (valueExpr);
1029                                 method.Statements.Add (AddLinePragma (expr, builder));
1030                         }
1031                 }
1032
1033                 protected void CreateAssignStatementsFromAttributes (ControlBuilder builder)
1034                 {
1035                         this.dataBoundAtts = 0;
1036                         IDictionary atts = builder.attribs;
1037                         if (atts == null || atts.Count == 0)
1038                                 return;
1039                         
1040                         foreach (string id in atts.Keys) {
1041                                 if (InvariantCompareNoCase (id, "runat"))
1042                                         continue;
1043                                 // ID is assigned in BuildControltree
1044                                 if (InvariantCompareNoCase (id, "id"))
1045                                         continue;
1046                                 
1047 #if NET_2_0
1048                                 /* we skip SkinID here as it's assigned in BuildControlTree */
1049                                 if (InvariantCompareNoCase (id, "skinid"))
1050                                         continue;
1051                                 if (InvariantCompareNoCase (id, "meta:resourcekey"))
1052                                         continue; // ignore, this one's processed at the very end of
1053                                                   // the method
1054 #endif
1055                                 CreateAssignStatementFromAttribute (builder, id);
1056                         }
1057                 }
1058
1059                 void CreateDBAttributeMethod (ControlBuilder builder, string attr, CodeExpression code)
1060                 {
1061                         if (code == null)
1062                                 return;
1063
1064                         string id = builder.GetNextID (null);
1065                         string dbMethodName = "__DataBind_" + id;
1066                         CodeMemberMethod method = builder.method;
1067                         AddEventAssign (method, builder, "DataBinding", typeof (EventHandler), dbMethodName);
1068
1069                         method = CreateDBMethod (builder, dbMethodName, GetContainerType (builder), builder.ControlType);
1070                         CodeCastExpression cast;
1071                         CodeMethodReferenceExpression methodExpr;
1072                         CodeMethodInvokeExpression expr;
1073
1074                         CodeVariableReferenceExpression targetExpr = new CodeVariableReferenceExpression ("target");
1075                         cast = new CodeCastExpression (typeof (IAttributeAccessor), targetExpr);
1076                         methodExpr = new CodeMethodReferenceExpression (cast, "SetAttribute");
1077                         expr = new CodeMethodInvokeExpression (methodExpr);
1078                         expr.Parameters.Add (new CodePrimitiveExpression (attr));
1079                         CodeMethodInvokeExpression tostring = new CodeMethodInvokeExpression ();
1080                         tostring.Method = new CodeMethodReferenceExpression (
1081                                                         new CodeTypeReferenceExpression (typeof (Convert)),
1082                                                         "ToString");
1083                         tostring.Parameters.Add (code);
1084                         expr.Parameters.Add (tostring);
1085                         method.Statements.Add (expr);
1086                         mainClass.Members.Add (method);
1087                 }
1088
1089                 void AddRenderControl (ControlBuilder builder)
1090                 {
1091                         CodeIndexerExpression indexer = new CodeIndexerExpression ();
1092                         indexer.TargetObject = new CodePropertyReferenceExpression (
1093                                                         new CodeArgumentReferenceExpression ("parameterContainer"),
1094                                                         "Controls");
1095                                                         
1096                         indexer.Indices.Add (new CodePrimitiveExpression (builder.renderIndex));
1097                         
1098                         CodeMethodInvokeExpression invoke = new CodeMethodInvokeExpression (indexer, "RenderControl");
1099                         invoke.Parameters.Add (new CodeArgumentReferenceExpression ("__output"));
1100                         builder.renderMethod.Statements.Add (invoke);
1101                         builder.renderIndex++;
1102                 }
1103
1104                 protected void AddChildCall (ControlBuilder parent, ControlBuilder child)
1105                 {
1106                         if (parent == null || child == null)
1107                                 return;
1108                         
1109                         CodeMethodReferenceExpression m = new CodeMethodReferenceExpression (thisRef, child.method.Name);
1110                         CodeMethodInvokeExpression expr = new CodeMethodInvokeExpression (m);
1111
1112                         object [] atts = null;
1113
1114                         if (child.ControlType != null)
1115                                 atts = child.ControlType.GetCustomAttributes (typeof (PartialCachingAttribute), true);
1116                         
1117                         if (atts != null && atts.Length > 0) {
1118                                 PartialCachingAttribute pca = (PartialCachingAttribute) atts [0];
1119                                 CodeTypeReferenceExpression cc = new CodeTypeReferenceExpression("System.Web.UI.StaticPartialCachingControl");
1120                                 CodeMethodInvokeExpression build = new CodeMethodInvokeExpression (cc, "BuildCachedControl");
1121                                 build.Parameters.Add (new CodeArgumentReferenceExpression("__ctrl"));
1122                                 build.Parameters.Add (new CodePrimitiveExpression (child.ID));
1123 #if NET_1_1
1124                                 if (pca.Shared)
1125                                         build.Parameters.Add (new CodePrimitiveExpression (child.ControlType.GetHashCode ().ToString ()));
1126                                 else
1127 #endif
1128                                         build.Parameters.Add (new CodePrimitiveExpression (Guid.NewGuid ().ToString ()));
1129                                         
1130                                 build.Parameters.Add (new CodePrimitiveExpression (pca.Duration));
1131                                 build.Parameters.Add (new CodePrimitiveExpression (pca.VaryByParams));
1132                                 build.Parameters.Add (new CodePrimitiveExpression (pca.VaryByControls));
1133                                 build.Parameters.Add (new CodePrimitiveExpression (pca.VaryByCustom));
1134                                 build.Parameters.Add (new CodeDelegateCreateExpression (
1135                                                               new CodeTypeReference (typeof (System.Web.UI.BuildMethod)),
1136                                                               thisRef, child.method.Name));
1137
1138                                 parent.methodStatements.Add (AddLinePragma (build, parent));
1139                                 if (parent.HasAspCode)
1140                                         AddRenderControl (parent);
1141                                 return;
1142                         }
1143                                 
1144                         if (child.isProperty || parent.ChildrenAsProperties) {
1145                                 expr.Parameters.Add (new CodeFieldReferenceExpression (ctrlVar, child.TagName));
1146                                 parent.methodStatements.Add (AddLinePragma (expr, parent));
1147                                 return;
1148                         }
1149
1150                         parent.methodStatements.Add (AddLinePragma (expr, parent));
1151                         CodeFieldReferenceExpression field = new CodeFieldReferenceExpression (thisRef, child.ID);
1152                         if (parent.ControlType == null || typeof (IParserAccessor).IsAssignableFrom (parent.ControlType))
1153                                 AddParsedSubObjectStmt (parent, field);
1154                         else {
1155                                 CodeMethodInvokeExpression invoke = new CodeMethodInvokeExpression (ctrlVar, "Add");
1156                                 invoke.Parameters.Add (field);
1157                                 parent.methodStatements.Add (AddLinePragma (invoke, parent));
1158                         }
1159                                 
1160                         if (parent.HasAspCode)
1161                                 AddRenderControl (parent);
1162                 }
1163
1164                 void AddTemplateInvocation (ControlBuilder builder, string name, string methodName)
1165                 {
1166                         CodePropertyReferenceExpression prop = new CodePropertyReferenceExpression (ctrlVar, name);
1167
1168                         CodeDelegateCreateExpression newBuild = new CodeDelegateCreateExpression (
1169                                 new CodeTypeReference (typeof (BuildTemplateMethod)), thisRef, methodName);
1170
1171                         CodeObjectCreateExpression newCompiled = new CodeObjectCreateExpression (typeof (CompiledTemplateBuilder));
1172                         newCompiled.Parameters.Add (newBuild);
1173
1174                         CodeAssignStatement assign = new CodeAssignStatement (prop, newCompiled);
1175                         builder.method.Statements.Add (AddLinePragma (assign, builder));
1176                 }
1177
1178 #if NET_2_0
1179                 void AddBindableTemplateInvocation (ControlBuilder builder, string name, string methodName, string extractMethodName)
1180                 {
1181                         CodePropertyReferenceExpression prop = new CodePropertyReferenceExpression (ctrlVar, name);
1182
1183                         CodeDelegateCreateExpression newBuild = new CodeDelegateCreateExpression (
1184                                 new CodeTypeReference (typeof (BuildTemplateMethod)), thisRef, methodName);
1185
1186                         CodeDelegateCreateExpression newExtract = new CodeDelegateCreateExpression (
1187                                 new CodeTypeReference (typeof (ExtractTemplateValuesMethod)), thisRef, extractMethodName);
1188
1189                         CodeObjectCreateExpression newCompiled = new CodeObjectCreateExpression (typeof (CompiledBindableTemplateBuilder));
1190                         newCompiled.Parameters.Add (newBuild);
1191                         newCompiled.Parameters.Add (newExtract);
1192                         
1193                         CodeAssignStatement assign = new CodeAssignStatement (prop, newCompiled);
1194                         builder.method.Statements.Add (AddLinePragma (assign, builder));
1195                 }
1196                 
1197                 string CreateExtractValuesMethod (TemplateBuilder builder)
1198                 {
1199                         CodeMemberMethod method = new CodeMemberMethod ();
1200                         method.Name = "__ExtractValues_" + builder.ID;
1201                         method.Attributes = MemberAttributes.Private | MemberAttributes.Final;
1202                         method.ReturnType = new CodeTypeReference (typeof(IOrderedDictionary));
1203                         
1204                         CodeParameterDeclarationExpression arg = new CodeParameterDeclarationExpression ();
1205                         arg.Type = new CodeTypeReference (typeof (Control));
1206                         arg.Name = "__container";
1207                         method.Parameters.Add (arg);
1208                         mainClass.Members.Add (method);
1209                         
1210                         CodeObjectCreateExpression newTable = new CodeObjectCreateExpression ();
1211                         newTable.CreateType = new CodeTypeReference (typeof(OrderedDictionary));
1212                         method.Statements.Add (new CodeVariableDeclarationStatement (typeof(OrderedDictionary), "__table", newTable));
1213                         CodeVariableReferenceExpression tableExp = new CodeVariableReferenceExpression ("__table");
1214                         
1215                         if (builder.Bindings != null) {
1216                                 Hashtable hash = new Hashtable ();
1217                                 foreach (TemplateBinding binding in builder.Bindings) {
1218                                         CodeConditionStatement sif;
1219                                         CodeVariableReferenceExpression control;
1220                                         CodeAssignStatement assign;
1221
1222                                         if (hash [binding.ControlId] == null) {
1223
1224                                                 CodeVariableDeclarationStatement dec = new CodeVariableDeclarationStatement (binding.ControlType, binding.ControlId);
1225                                                 method.Statements.Add (dec);
1226                                                 CodeVariableReferenceExpression cter = new CodeVariableReferenceExpression ("__container");
1227                                                 CodeMethodInvokeExpression invoke = new CodeMethodInvokeExpression (cter, "FindControl");
1228                                                 invoke.Parameters.Add (new CodePrimitiveExpression (binding.ControlId));
1229
1230                                                 assign = new CodeAssignStatement ();
1231                                                 control = new CodeVariableReferenceExpression (binding.ControlId);
1232                                                 assign.Left = control;
1233                                                 assign.Right = new CodeCastExpression (binding.ControlType, invoke);
1234                                                 method.Statements.Add (assign);
1235
1236                                                 sif = new CodeConditionStatement ();
1237                                                 sif.Condition = new CodeBinaryOperatorExpression (control, CodeBinaryOperatorType.IdentityInequality, new CodePrimitiveExpression (null));
1238
1239                                                 method.Statements.Add (sif);
1240
1241                                                 hash [binding.ControlId] = sif;
1242                                         }
1243
1244                                         sif = (CodeConditionStatement) hash [binding.ControlId];
1245                                         control = new CodeVariableReferenceExpression (binding.ControlId);
1246                                         assign = new CodeAssignStatement ();
1247                                         assign.Left = new CodeIndexerExpression (tableExp, new CodePrimitiveExpression (binding.FieldName));
1248                                         assign.Right = new CodePropertyReferenceExpression (control, binding.ControlProperty);
1249                                         sif.TrueStatements.Add (assign);
1250                                 }
1251                         }
1252
1253                         method.Statements.Add (new CodeMethodReturnStatement (tableExp));
1254                         return method.Name;
1255                 }
1256
1257                 void AddContentTemplateInvocation (ContentBuilderInternal cbuilder, CodeMemberMethod method, string methodName)
1258                 {
1259                         CodeDelegateCreateExpression newBuild = new CodeDelegateCreateExpression (
1260                                 new CodeTypeReference (typeof (BuildTemplateMethod)), thisRef, methodName);
1261
1262                         CodeObjectCreateExpression newCompiled = new CodeObjectCreateExpression (typeof (CompiledTemplateBuilder));
1263                         newCompiled.Parameters.Add (newBuild);
1264                         
1265                         CodeMethodInvokeExpression invoke = new CodeMethodInvokeExpression (thisRef, "AddContentTemplate");
1266                         invoke.Parameters.Add (new CodePrimitiveExpression (cbuilder.ContentPlaceHolderID));
1267                         invoke.Parameters.Add (newCompiled);
1268
1269                         method.Statements.Add (AddLinePragma (invoke, cbuilder));
1270                 }
1271 #endif
1272
1273                 void AddCodeRender (ControlBuilder parent, CodeRenderBuilder cr)
1274                 {
1275                         if (cr.Code == null || cr.Code.Trim () == "")
1276                                 return;
1277
1278                         if (!cr.IsAssign) {
1279                                 CodeSnippetStatement code = new CodeSnippetStatement (cr.Code);
1280                                 parent.renderMethod.Statements.Add (AddLinePragma (code, cr));
1281                                 return;
1282                         }
1283
1284                         CodeMethodInvokeExpression expr = new CodeMethodInvokeExpression ();
1285                         expr.Method = new CodeMethodReferenceExpression (
1286                                                         new CodeArgumentReferenceExpression ("__output"),
1287                                                         "Write");
1288
1289                         expr.Parameters.Add (new CodeSnippetExpression (cr.Code));
1290                         parent.renderMethod.Statements.Add (AddLinePragma (expr, cr));
1291                 }
1292
1293                 static PropertyInfo GetContainerProperty (Type type, string[] propNames)
1294                 {
1295                         PropertyInfo prop;
1296                         
1297                         foreach (string name in propNames) {
1298                                 prop = type.GetProperty (name, noCaseFlags & ~BindingFlags.NonPublic);
1299                                 if (prop != null)
1300                                         return prop;
1301                         }
1302
1303                         return null;
1304                 }
1305
1306 #if !NET_2_0
1307                 static string[] containerPropNames = {"Items", "Rows"};
1308 #endif
1309                 
1310                 static Type GetContainerType (ControlBuilder builder)
1311                 {
1312                         Type type = builder.BindingContainerType;
1313                         
1314 #if NET_2_0
1315                         return type;
1316 #else
1317                         
1318                         PropertyInfo prop = GetContainerProperty (type, containerPropNames);
1319                         if (prop == null)
1320                                 return type;
1321
1322                         Type ptype = prop.PropertyType;
1323                         if (!typeof (ICollection).IsAssignableFrom (ptype))
1324                                 return type;
1325
1326                         prop = ptype.GetProperty ("Item", noCaseFlags & ~BindingFlags.NonPublic);
1327                         if (prop == null)
1328                                 return type;
1329
1330                         return prop.PropertyType;
1331 #endif
1332                 }
1333                 
1334                 CodeMemberMethod CreateDBMethod (ControlBuilder builder, string name, Type container, Type target)
1335                 {
1336                         CodeMemberMethod method = new CodeMemberMethod ();
1337                         method.Attributes = MemberAttributes.Public | MemberAttributes.Final;
1338                         method.Name = name;
1339                         method.Parameters.Add (new CodeParameterDeclarationExpression (typeof (object), "sender"));
1340                         method.Parameters.Add (new CodeParameterDeclarationExpression (typeof (EventArgs), "e"));
1341
1342                         CodeTypeReference containerRef = new CodeTypeReference (container);
1343                         CodeTypeReference targetRef = new CodeTypeReference (target);
1344
1345                         CodeVariableDeclarationStatement decl = new CodeVariableDeclarationStatement();
1346                         decl.Name = "Container";
1347                         decl.Type = containerRef;
1348                         method.Statements.Add (decl);
1349                         
1350                         decl = new CodeVariableDeclarationStatement();
1351                         decl.Name = "target";
1352                         decl.Type = targetRef;
1353                         method.Statements.Add (decl);
1354
1355                         CodeVariableReferenceExpression targetExpr = new CodeVariableReferenceExpression ("target");
1356                         CodeAssignStatement assign = new CodeAssignStatement ();
1357                         assign.Left = targetExpr;
1358                         assign.Right = new CodeCastExpression (targetRef, new CodeArgumentReferenceExpression ("sender"));
1359                         method.Statements.Add (AddLinePragma (assign, builder));
1360
1361                         assign = new CodeAssignStatement ();
1362                         assign.Left = new CodeVariableReferenceExpression ("Container");
1363                         assign.Right = new CodeCastExpression (containerRef,
1364                                                 new CodePropertyReferenceExpression (targetExpr, "BindingContainer"));
1365                         method.Statements.Add (AddLinePragma (assign, builder));
1366
1367                         return method;
1368                 }
1369
1370                 void AddDataBindingLiteral (ControlBuilder builder, DataBindingBuilder db)
1371                 {
1372                         if (db.Code == null || db.Code.Trim () == "")
1373                                 return;
1374
1375                         EnsureID (db);
1376                         CreateField (db, false);
1377
1378                         string dbMethodName = "__DataBind_" + db.ID;
1379                         // Add the method that builds the DataBoundLiteralControl
1380                         InitMethod (db, false, false);
1381                         CodeMemberMethod method = db.method;
1382                         AddEventAssign (method, builder, "DataBinding", typeof (EventHandler), dbMethodName);
1383                         method.Statements.Add (new CodeMethodReturnStatement (ctrlVar));
1384
1385                         // Add the DataBind handler
1386                         method = CreateDBMethod (builder, dbMethodName, GetContainerType (builder), typeof (DataBoundLiteralControl));
1387
1388                         CodeVariableReferenceExpression targetExpr = new CodeVariableReferenceExpression ("target");
1389                         CodeMethodInvokeExpression invoke = new CodeMethodInvokeExpression ();
1390                         invoke.Method = new CodeMethodReferenceExpression (targetExpr, "SetDataBoundString");
1391                         invoke.Parameters.Add (new CodePrimitiveExpression (0));
1392
1393                         CodeMethodInvokeExpression tostring = new CodeMethodInvokeExpression ();
1394                         tostring.Method = new CodeMethodReferenceExpression (
1395                                                         new CodeTypeReferenceExpression (typeof (Convert)),
1396                                                         "ToString");
1397                         tostring.Parameters.Add (new CodeSnippetExpression (db.Code));
1398                         invoke.Parameters.Add (tostring);
1399                         method.Statements.Add (AddLinePragma (invoke, builder));
1400                         
1401                         mainClass.Members.Add (method);
1402
1403                         AddChildCall (builder, db);
1404                 }
1405
1406                 void FlushText (ControlBuilder builder, StringBuilder sb)
1407                 {
1408                         if (sb.Length > 0) {
1409                                 AddLiteralSubObject (builder, sb.ToString ());
1410                                 sb.Length = 0;
1411                         }
1412                 }
1413
1414                 protected void CreateControlTree (ControlBuilder builder, bool inTemplate, bool childrenAsProperties)
1415                 {
1416                         EnsureID (builder);
1417                         bool isTemplate = (typeof (TemplateBuilder).IsAssignableFrom (builder.GetType ()));
1418                         
1419                         if (!isTemplate && !inTemplate) {
1420                                 CreateField (builder, true);
1421                         } else if (!isTemplate) {
1422                                 bool doCheck = false;
1423                                 
1424 #if NET_2_0
1425                                 bool singleInstance = false;
1426                                 ControlBuilder pb = builder.parentBuilder;
1427                                 TemplateBuilder tpb;
1428                                 while (pb != null) {
1429                                         tpb = pb as TemplateBuilder;
1430                                         if (tpb == null) {
1431                                                 pb = pb.parentBuilder;
1432                                                 continue;
1433                                         }
1434                                         
1435                                         if (tpb.TemplateInstance == TemplateInstance.Single)
1436                                                 singleInstance = true;
1437                                         break;
1438                                 }
1439                                 
1440                                 if (!singleInstance)
1441 #endif
1442                                         builder.ID = builder.GetNextID (null);
1443 #if NET_2_0
1444                                 else
1445                                         doCheck = true;
1446 #endif
1447                                 CreateField (builder, doCheck);
1448                         }
1449
1450                         InitMethod (builder, isTemplate, childrenAsProperties);
1451                         if (!isTemplate || builder.GetType () == typeof (RootBuilder))
1452                                 CreateAssignStatementsFromAttributes (builder);
1453
1454                         if (builder.Children != null && builder.Children.Count > 0) {
1455                                 StringBuilder sb = new StringBuilder ();
1456                                 foreach (object b in builder.Children) {
1457                                         if (b is string) {
1458                                                 sb.Append ((string) b);
1459                                                 continue;
1460                                         }
1461
1462                                         FlushText (builder, sb);
1463                                         if (b is ObjectTagBuilder) {
1464                                                 ProcessObjectTag ((ObjectTagBuilder) b);
1465                                                 continue;
1466                                         }
1467
1468                                         StringPropertyBuilder pb = b as StringPropertyBuilder;
1469                                         if (pb != null){
1470                                                 if (pb.Children != null && pb.Children.Count > 0) {
1471                                                         StringBuilder asb = new StringBuilder ();
1472                                                         foreach (string s in pb.Children)
1473                                                                 asb.Append (s);
1474                                                         CodeMemberMethod method = builder.method;
1475                                                         CodeAssignStatement assign = new CodeAssignStatement ();
1476                                                         assign.Left = new CodePropertyReferenceExpression (ctrlVar, pb.PropertyName);
1477                                                         assign.Right = new CodePrimitiveExpression (asb.ToString ());
1478                                                         method.Statements.Add (AddLinePragma (assign, builder));
1479                                                 }
1480                                                 continue;
1481                                         }
1482
1483 #if NET_2_0
1484                                         if (b is ContentBuilderInternal) {
1485                                                 ContentBuilderInternal cb = (ContentBuilderInternal) b;
1486                                                 CreateControlTree (cb, false, true);
1487                                                 AddContentTemplateInvocation (cb, builder.method, cb.method.Name);
1488                                                 continue;
1489                                         }
1490 #endif
1491                                         // Ignore TemplateBuilders - they are processed in InitMethod
1492                                         if (b is TemplateBuilder)
1493                                                 continue;
1494
1495                                         if (b is CodeRenderBuilder) {
1496                                                 AddCodeRender (builder, (CodeRenderBuilder) b);
1497                                                 continue;
1498                                         }
1499
1500                                         if (b is DataBindingBuilder) {
1501                                                 AddDataBindingLiteral (builder, (DataBindingBuilder) b);
1502                                                 continue;
1503                                         }
1504                                         
1505                                         if (b is ControlBuilder) {
1506                                                 ControlBuilder child = (ControlBuilder) b;
1507                                                 CreateControlTree (child, inTemplate, builder.ChildrenAsProperties);
1508                                                 AddChildCall (builder, child);
1509                                                 continue;
1510                                         }
1511
1512                                         throw new Exception ("???");
1513                                 }
1514
1515                                 FlushText (builder, sb);
1516                         }
1517
1518                         if (builder.defaultPropertyBuilder != null) {
1519                                 ControlBuilder b = builder.defaultPropertyBuilder;
1520                                 CreateControlTree (b, false, true);
1521                                 AddChildCall (builder, b);
1522                         }
1523
1524                         if (builder.HasAspCode) {
1525                                 CodeMethodReferenceExpression m = new CodeMethodReferenceExpression ();
1526                                 m.TargetObject = thisRef;
1527                                 m.MethodName = builder.renderMethod.Name;
1528
1529                                 CodeDelegateCreateExpression create = new CodeDelegateCreateExpression ();
1530                                 create.DelegateType = new CodeTypeReference (typeof (RenderMethod));
1531                                 create.TargetObject = thisRef;
1532                                 create.MethodName = builder.renderMethod.Name;
1533
1534                                 CodeMethodInvokeExpression invoke = new CodeMethodInvokeExpression ();
1535                                 invoke.Method = new CodeMethodReferenceExpression (ctrlVar, "SetRenderMethodDelegate");
1536                                 invoke.Parameters.Add (create);
1537
1538                                 builder.methodStatements.Add (invoke);
1539                         }
1540
1541 #if NET_2_0
1542                         if (builder is RootBuilder)
1543                                 if (!String.IsNullOrEmpty (parser.MetaResourceKey))
1544                                         AssignPropertiesFromResources (builder, parser.BaseType, parser.MetaResourceKey);
1545                         
1546                         if ((!isTemplate || builder is RootBuilder) && builder.attribs != null && builder.attribs ["meta:resourcekey"] != null)
1547                                 CreateAssignStatementFromAttribute (builder, "meta:resourcekey");
1548 #endif
1549
1550                         if (!childrenAsProperties && typeof (Control).IsAssignableFrom (builder.ControlType))
1551                                 builder.method.Statements.Add (new CodeMethodReturnStatement (ctrlVar));
1552                 }
1553
1554 #if NET_2_0
1555                 protected override void AddStatementsToConstructor (CodeConstructor ctor)
1556                 {
1557                         if (masterPageContentPlaceHolders == null || masterPageContentPlaceHolders.Count == 0)
1558                                 return;
1559                         
1560                         var ilist = new CodeVariableDeclarationStatement ();
1561                         ilist.Name = "__contentPlaceHolders";
1562                         ilist.Type = new CodeTypeReference (typeof (IList));
1563                         ilist.InitExpression = new CodePropertyReferenceExpression (thisRef, "ContentPlaceHolders");
1564                         
1565                         var ilistRef = new CodeVariableReferenceExpression ("__contentPlaceHolders");
1566                         CodeStatementCollection statements = ctor.Statements;
1567                         statements.Add (ilist);
1568
1569                         CodeMethodInvokeExpression mcall;
1570                         foreach (string id in masterPageContentPlaceHolders) {
1571                                 mcall = new CodeMethodInvokeExpression (ilistRef, "Add");
1572                                 mcall.Parameters.Add (new CodePrimitiveExpression (id));
1573                                 statements.Add (mcall);
1574                         }
1575                 }
1576 #endif
1577                 
1578                 protected internal override void CreateMethods ()
1579                 {
1580                         base.CreateMethods ();
1581
1582                         CreateProperties ();
1583                         CreateControlTree (parser.RootBuilder, false, false);
1584                         CreateFrameworkInitializeMethod ();
1585                 }
1586
1587 #if NET_2_0
1588                 void CallBaseFrameworkInitialize (CodeMemberMethod method)
1589                 {
1590                         CodeBaseReferenceExpression baseRef = new CodeBaseReferenceExpression ();
1591                         CodeMethodInvokeExpression invoke = new CodeMethodInvokeExpression (baseRef, "FrameworkInitialize");
1592                         method.Statements.Add (invoke);
1593                 }
1594 #endif
1595                 
1596                 void CallSetStringResourcePointer (CodeMemberMethod method)
1597                 {
1598                         CodeFieldReferenceExpression stringResource = GetMainClassFieldReferenceExpression ("__stringResource");
1599                         method.Statements.Add (
1600                                 new CodeMethodInvokeExpression (
1601                                         thisRef,
1602                                         "SetStringResourcePointer",
1603                                         new CodeExpression[] {stringResource, new CodePrimitiveExpression (0)})
1604                         );
1605                 }
1606                 
1607                 void CreateFrameworkInitializeMethod ()
1608                 {
1609                         CodeMemberMethod method = new CodeMemberMethod ();
1610                         method.Name = "FrameworkInitialize";
1611                         method.Attributes = MemberAttributes.Family | MemberAttributes.Override;
1612                         PrependStatementsToFrameworkInitialize (method);
1613 #if NET_2_0
1614                         CallBaseFrameworkInitialize (method);
1615 #endif
1616                         CallSetStringResourcePointer (method);
1617                         AppendStatementsToFrameworkInitialize (method);
1618                         mainClass.Members.Add (method);
1619                 }
1620
1621                 protected virtual void PrependStatementsToFrameworkInitialize (CodeMemberMethod method)
1622                 {
1623                 }
1624
1625                 protected virtual void AppendStatementsToFrameworkInitialize (CodeMemberMethod method)
1626                 {
1627                         if (!parser.EnableViewState) {
1628                                 CodeAssignStatement stmt = new CodeAssignStatement ();
1629                                 stmt.Left = new CodePropertyReferenceExpression (thisRef, "EnableViewState");
1630                                 stmt.Right = new CodePrimitiveExpression (false);
1631                                 method.Statements.Add (stmt);
1632                         }
1633
1634                         CodeMethodReferenceExpression methodExpr;
1635                         methodExpr = new CodeMethodReferenceExpression (thisRef, "__BuildControlTree");
1636                         CodeMethodInvokeExpression expr = new CodeMethodInvokeExpression (methodExpr, thisRef);
1637                         method.Statements.Add (new CodeExpressionStatement (expr));
1638                 }
1639
1640                 protected override void AddApplicationAndSessionObjects ()
1641                 {
1642                         foreach (ObjectTagBuilder tag in GlobalAsaxCompiler.ApplicationObjects) {
1643                                 CreateFieldForObject (tag.Type, tag.ObjectID);
1644                                 CreateApplicationOrSessionPropertyForObject (tag.Type, tag.ObjectID, true, false);
1645                         }
1646
1647                         foreach (ObjectTagBuilder tag in GlobalAsaxCompiler.SessionObjects) {
1648                                 CreateApplicationOrSessionPropertyForObject (tag.Type, tag.ObjectID, false, false);
1649                         }
1650                 }
1651
1652                 protected override void CreateStaticFields ()
1653                 {
1654                         base.CreateStaticFields ();
1655
1656                         CodeMemberField fld = new CodeMemberField (typeof (object), "__stringResource");
1657                         fld.Attributes = MemberAttributes.Private | MemberAttributes.Static;
1658                         fld.InitExpression = new CodePrimitiveExpression (null);
1659                         mainClass.Members.Add (fld);
1660                 }
1661                 
1662                 protected void ProcessObjectTag (ObjectTagBuilder tag)
1663                 {
1664                         string fieldName = CreateFieldForObject (tag.Type, tag.ObjectID);
1665                         CreatePropertyForObject (tag.Type, tag.ObjectID, fieldName, false);
1666                 }
1667
1668                 void CreateProperties ()
1669                 {
1670                         if (!parser.AutoEventWireup) {
1671                                 CreateAutoEventWireup ();
1672                         } else {
1673                                 CreateAutoHandlers ();
1674                         }
1675
1676                         CreateApplicationInstance ();
1677                 }
1678                 
1679                 void CreateApplicationInstance ()
1680                 {
1681                         CodeMemberProperty prop = new CodeMemberProperty ();
1682                         Type appType = typeof (HttpApplication);
1683                         prop.Type = new CodeTypeReference (appType);
1684                         prop.Name = "ApplicationInstance";
1685                         prop.Attributes = MemberAttributes.Family | MemberAttributes.Final;
1686
1687                         CodePropertyReferenceExpression propRef = new CodePropertyReferenceExpression (thisRef, "Context");
1688
1689                         propRef = new CodePropertyReferenceExpression (propRef, "ApplicationInstance");
1690
1691                         CodeCastExpression cast = new CodeCastExpression (appType.FullName, propRef);
1692                         prop.GetStatements.Add (new CodeMethodReturnStatement (cast));
1693 #if NET_2_0
1694                         if (partialClass != null)
1695                                 partialClass.Members.Add (prop);
1696                         else
1697 #endif
1698                         mainClass.Members.Add (prop);
1699                 }
1700
1701 #if NET_2_0
1702                 void CreateContentPlaceHolderTemplateProperty (string backingField, string name)
1703                 {
1704                         CodeMemberProperty prop = new CodeMemberProperty ();
1705                         prop.Type = new CodeTypeReference (typeof (ITemplate));
1706                         prop.Name = name;
1707                         prop.Attributes = MemberAttributes.Public;
1708
1709                         var ret = new CodeMethodReturnStatement ();
1710                         var fldRef = new CodeFieldReferenceExpression (thisRef, backingField);
1711                         ret.Expression = fldRef;
1712                         prop.GetStatements.Add (ret);
1713                         prop.SetStatements.Add (new CodeAssignStatement (fldRef, new CodePropertySetValueReferenceExpression ()));
1714
1715                         prop.CustomAttributes.Add (new CodeAttributeDeclaration ("TemplateContainer", new CodeAttributeArgument [] {
1716                                                 new CodeAttributeArgument (new CodeTypeOfExpression (new CodeTypeReference (typeof (MasterPage))))
1717                                         }
1718                                 )
1719                         );
1720
1721                         var enumValueRef = new CodeFieldReferenceExpression (new CodeTypeReferenceExpression (typeof (TemplateInstance)), "Single");
1722                         prop.CustomAttributes.Add (new CodeAttributeDeclaration ("TemplateInstanceAttribute", new CodeAttributeArgument [] {
1723                                                 new CodeAttributeArgument (enumValueRef)
1724                                         }
1725                                 )
1726                         );
1727
1728                         mainClass.Members.Add (prop);
1729                 }
1730 #endif
1731                 
1732                 void CreateAutoHandlers ()
1733                 {
1734                         // Create AutoHandlers property
1735                         CodeMemberProperty prop = new CodeMemberProperty ();
1736                         prop.Type = new CodeTypeReference (typeof (int));
1737                         prop.Name = "AutoHandlers";
1738                         prop.Attributes = MemberAttributes.Family | MemberAttributes.Override;
1739                         
1740                         CodeMethodReturnStatement ret = new CodeMethodReturnStatement ();
1741                         CodeFieldReferenceExpression fldRef ;
1742                         fldRef = new CodeFieldReferenceExpression (mainClassExpr, "__autoHandlers");
1743                         ret.Expression = fldRef;
1744                         prop.GetStatements.Add (ret);
1745                         prop.SetStatements.Add (new CodeAssignStatement (fldRef, new CodePropertySetValueReferenceExpression ()));
1746
1747 #if NET_2_0
1748                         CodeAttributeDeclaration attr = new CodeAttributeDeclaration ("System.Obsolete");
1749                         prop.CustomAttributes.Add (attr);
1750 #endif
1751                         
1752                         mainClass.Members.Add (prop);
1753
1754                         // Add the __autoHandlers field
1755                         CodeMemberField fld = new CodeMemberField (typeof (int), "__autoHandlers");
1756                         fld.Attributes = MemberAttributes.Private | MemberAttributes.Static;
1757                         mainClass.Members.Add (fld);
1758                 }
1759
1760                 void CreateAutoEventWireup ()
1761                 {
1762                         // The getter returns false
1763                         CodeMemberProperty prop = new CodeMemberProperty ();
1764                         prop.Type = new CodeTypeReference (typeof (bool));
1765                         prop.Name = "SupportAutoEvents";
1766                         prop.Attributes = MemberAttributes.Family | MemberAttributes.Override;
1767                         prop.GetStatements.Add (new CodeMethodReturnStatement (new CodePrimitiveExpression (false)));
1768                         mainClass.Members.Add (prop);
1769                 }
1770
1771 #if NET_2_0
1772                 protected virtual string HandleUrlProperty (string str, MemberInfo member)
1773                 {
1774                         return str;
1775                 }
1776 #endif
1777
1778                 TypeConverter GetConverterForMember (MemberInfo member)
1779                 {
1780                         TypeConverterAttribute tca = null;
1781                         object[] attrs;
1782                         
1783 #if NET_2_0
1784                         attrs = member.GetCustomAttributes (typeof (TypeConverterAttribute), true);
1785                         if (attrs.Length > 0)
1786                                 tca = attrs [0] as TypeConverterAttribute;
1787 #else
1788                         attrs = member.GetCustomAttributes (true);
1789                         
1790                         foreach (object attr in attrs) {
1791                                 tca = attr as TypeConverterAttribute;
1792                                 
1793                                 if (tca != null)
1794                                         break;
1795                         }
1796 #endif
1797
1798                         if (tca == null)
1799                                 return null;
1800
1801                         string typeName = tca.ConverterTypeName;
1802                         if (typeName == null || typeName.Length == 0)
1803                                 return null;
1804
1805                         Type t = null;
1806                         try {
1807                                 t = HttpApplication.LoadType (typeName);
1808                         } catch (Exception) {
1809                                 // ignore
1810                         }
1811
1812                         if (t == null)
1813                                 return null;
1814
1815                         return (TypeConverter) Activator.CreateInstance (t);
1816                 }
1817                 
1818                 CodeExpression CreateNullableExpression (Type type, CodeExpression inst, bool nullable)
1819                 {
1820 #if NET_2_0
1821                         if (!nullable)
1822                                 return inst;
1823                         
1824                         return new CodeObjectCreateExpression (
1825                                 type,
1826                                 new CodeExpression[] {inst}
1827                         );
1828 #else
1829                         return inst;
1830 #endif
1831                 }
1832
1833                 bool SafeCanConvertFrom (Type type, TypeConverter cvt)
1834                 {
1835                         try {
1836                                 return cvt.CanConvertFrom (type);
1837                         } catch (NotImplementedException) {
1838                                 return false;
1839                         }
1840                 }
1841
1842                 bool SafeCanConvertTo (Type type, TypeConverter cvt)
1843                 {
1844                         try {
1845                                 return cvt.CanConvertTo (type);
1846                         } catch (NotImplementedException) {
1847                                 return false;
1848                         }
1849                 }
1850                 
1851                 CodeExpression GetExpressionFromString (Type type, string str, MemberInfo member)
1852                 {
1853                         TypeConverter cvt = GetConverterForMember (member);
1854                         if (cvt != null && !SafeCanConvertFrom (typeof (string), cvt))
1855                                 cvt = null;
1856                         
1857                         object convertedFromAttr = null;
1858                         bool preConverted = false;
1859                         if (cvt != null && str != null) {
1860                                 convertedFromAttr = cvt.ConvertFromInvariantString (str);
1861                                 if (convertedFromAttr != null) {
1862                                         type = convertedFromAttr.GetType ();
1863                                         preConverted = true;
1864                                 }
1865                         }
1866
1867                         bool wasNullable = false;
1868                         Type originalType = type;
1869 #if NET_2_0
1870                         if (type.IsGenericType && type.GetGenericTypeDefinition() == typeof(Nullable<>)) {
1871                                 Type[] types = type.GetGenericArguments();
1872                                 originalType = type;
1873                                 type = types[0]; // we're interested only in the first type here
1874                                 wasNullable = true;
1875                         }
1876 #endif
1877                         if (type == typeof (string)) {
1878                                 if (preConverted)
1879                                         return CreateNullableExpression (originalType,
1880                                                                          new CodePrimitiveExpression ((string) convertedFromAttr),
1881                                                                          wasNullable);
1882                                 
1883 #if NET_2_0
1884                                 object[] urlAttr = member.GetCustomAttributes (typeof (UrlPropertyAttribute), true);
1885                                 if (urlAttr.Length != 0)
1886                                         str = HandleUrlProperty (str, member);
1887 #endif
1888                                 return CreateNullableExpression (originalType, new CodePrimitiveExpression (str), wasNullable);
1889                         } else if (type == typeof (bool)) {
1890                                 if (preConverted)
1891                                         return CreateNullableExpression (originalType,
1892                                                                          new CodePrimitiveExpression ((bool) convertedFromAttr),
1893                                                                          wasNullable);
1894                                 
1895                                 if (str == null || str == "" || InvariantCompareNoCase (str, "true"))
1896                                         return CreateNullableExpression (originalType, new CodePrimitiveExpression (true), wasNullable);
1897                                 else if (InvariantCompareNoCase (str, "false"))
1898                                         return CreateNullableExpression (originalType, new CodePrimitiveExpression (false), wasNullable);
1899 #if NET_2_0
1900                                 else if (wasNullable && InvariantCompareNoCase(str, "null"))
1901                                         return new CodePrimitiveExpression (null);
1902 #endif
1903                                 else
1904                                         throw new ParseException (currentLocation,
1905                                                         "Value '" + str  + "' is not a valid boolean.");
1906                         } else if (type == monoTypeType)
1907                                 type = typeof (System.Type);
1908                         
1909                         if (str == null)
1910                                 return new CodePrimitiveExpression (null);
1911
1912                         if (type.IsPrimitive)
1913                                 return CreateNullableExpression (originalType,
1914                                                                  new CodePrimitiveExpression (
1915                                                                          Convert.ChangeType (preConverted ? convertedFromAttr : str,
1916                                                                                              type, CultureInfo.InvariantCulture)),
1917                                                                  wasNullable);
1918
1919                         if (type == typeof (string [])) {
1920                                 string [] subs;
1921
1922                                 if (preConverted)
1923                                         subs = (string[])convertedFromAttr;
1924                                 else
1925                                         subs = str.Split (',');
1926                                 CodeArrayCreateExpression expr = new CodeArrayCreateExpression ();
1927                                 expr.CreateType = new CodeTypeReference (typeof (string));
1928                                 foreach (string v in subs)
1929                                         expr.Initializers.Add (new CodePrimitiveExpression (v.Trim ()));
1930
1931                                 return CreateNullableExpression (originalType, expr, wasNullable);
1932                         }
1933                         
1934                         if (type == typeof (Color)) {
1935                                 Color c;
1936                                 
1937                                 if (!preConverted) {
1938                                         if (colorConverter == null)
1939                                                 colorConverter = TypeDescriptor.GetConverter (typeof (Color));
1940                                 
1941                                         if (str.Trim().Length == 0) {
1942                                                 CodeTypeReferenceExpression ft = new CodeTypeReferenceExpression (typeof (Color));
1943                                                 return CreateNullableExpression (originalType,
1944                                                                                  new CodeFieldReferenceExpression (ft, "Empty"),
1945                                                                                  wasNullable);
1946                                         }
1947
1948                                         try {
1949                                                 if (str.IndexOf (',') == -1) {
1950                                                         c = (Color) colorConverter.ConvertFromString (str);
1951                                                 } else {
1952                                                         int [] argb = new int [4];
1953                                                         argb [0] = 255;
1954
1955                                                         string [] parts = str.Split (',');
1956                                                         int length = parts.Length;
1957                                                         if (length < 3)
1958                                                                 throw new Exception ();
1959
1960                                                         int basei = (length == 4) ? 0 : 1;
1961                                                         for (int i = length - 1; i >= 0; i--) {
1962                                                                 argb [basei + i] = (int) Byte.Parse (parts [i]);
1963                                                         }
1964                                                         c = Color.FromArgb (argb [0], argb [1], argb [2], argb [3]);
1965                                                 }
1966                                         } catch (Exception e) {
1967                                                 // Hack: "LightGrey" is accepted, but only for ASP.NET, as the
1968                                                 // TypeConverter for Color fails to ConvertFromString.
1969                                                 // Hence this hack...
1970                                                 if (InvariantCompareNoCase ("LightGrey", str)) {
1971                                                         c = Color.LightGray;
1972                                                 } else {
1973                                                         throw new ParseException (currentLocation,
1974                                                                                   "Color " + str + " is not a valid color.", e);
1975                                                 }
1976                                         }
1977                                 } else
1978                                         c = (Color)convertedFromAttr;
1979                                 
1980                                 if (c.IsKnownColor) {
1981                                         CodeFieldReferenceExpression expr = new CodeFieldReferenceExpression ();
1982                                         if (c.IsSystemColor)
1983                                                 type = typeof (SystemColors);
1984
1985                                         expr.TargetObject = new CodeTypeReferenceExpression (type);
1986                                         expr.FieldName = c.Name;
1987                                         return CreateNullableExpression (originalType, expr, wasNullable);
1988                                 } else {
1989                                         CodeMethodReferenceExpression m = new CodeMethodReferenceExpression ();
1990                                         m.TargetObject = new CodeTypeReferenceExpression (type);
1991                                         m.MethodName = "FromArgb";
1992                                         CodeMethodInvokeExpression invoke = new CodeMethodInvokeExpression (m);
1993                                         invoke.Parameters.Add (new CodePrimitiveExpression (c.A));
1994                                         invoke.Parameters.Add (new CodePrimitiveExpression (c.R));
1995                                         invoke.Parameters.Add (new CodePrimitiveExpression (c.G));
1996                                         invoke.Parameters.Add (new CodePrimitiveExpression (c.B));
1997                                         return CreateNullableExpression (originalType, invoke, wasNullable);
1998                                 }
1999                         }
2000
2001                         TypeConverter converter = preConverted ? cvt :
2002                                 wasNullable ? TypeDescriptor.GetConverter (type) :
2003                                 TypeDescriptor.GetProperties (member.DeclaringType) [member.Name].Converter;
2004
2005                         if (preConverted || (converter != null && SafeCanConvertFrom (typeof (string), converter))) {
2006                                 object value = preConverted ? convertedFromAttr : converter.ConvertFromInvariantString (str);
2007
2008                                 if (SafeCanConvertTo (typeof (InstanceDescriptor), converter)) {
2009                                         InstanceDescriptor idesc = (InstanceDescriptor) converter.ConvertTo (value, typeof(InstanceDescriptor));
2010                                         if (wasNullable)
2011                                                 return CreateNullableExpression (originalType, GenerateInstance (idesc, true),
2012                                                                                  wasNullable);
2013
2014                                         return new CodeCastExpression (type, GenerateInstance (idesc, true));
2015                                 }
2016
2017                                 CodeExpression exp = GenerateObjectInstance (value, false);
2018                                 if (exp != null)
2019                                         return CreateNullableExpression (originalType, exp, wasNullable);
2020                                 
2021                                 CodeMethodReferenceExpression m = new CodeMethodReferenceExpression ();
2022                                 m.TargetObject = new CodeTypeReferenceExpression (typeof (TypeDescriptor));
2023                                 m.MethodName = "GetConverter";
2024                                 CodeMethodInvokeExpression invoke = new CodeMethodInvokeExpression (m);
2025                                 CodeTypeReference tref = new CodeTypeReference (type);
2026                                 invoke.Parameters.Add (new CodeTypeOfExpression (tref));
2027                                 
2028                                 invoke = new CodeMethodInvokeExpression (invoke, "ConvertFrom");
2029                                 invoke.Parameters.Add (new CodePrimitiveExpression (str));
2030
2031                                 if (wasNullable)
2032                                         return CreateNullableExpression (originalType, invoke, wasNullable);
2033
2034                                 return new CodeCastExpression (type, invoke);
2035                         }
2036
2037                         Console.WriteLine ("Unknown type: " + type + " value: " + str);
2038                         
2039                         return CreateNullableExpression (originalType, new CodePrimitiveExpression (str), wasNullable);
2040                 }
2041                 
2042                 CodeExpression GenerateInstance (InstanceDescriptor idesc, bool throwOnError)
2043                 {
2044                         CodeExpression[] parameters = new CodeExpression [idesc.Arguments.Count];
2045                         int n = 0;
2046                         foreach (object ob in idesc.Arguments) {
2047                                 CodeExpression exp = GenerateObjectInstance (ob, throwOnError);
2048                                 if (exp == null) return null;
2049                                 parameters [n++] = exp;
2050                         }
2051                         
2052                         switch (idesc.MemberInfo.MemberType) {
2053                         case MemberTypes.Constructor:
2054                                 CodeTypeReference tob = new CodeTypeReference (idesc.MemberInfo.DeclaringType);
2055                                 return new CodeObjectCreateExpression (tob, parameters);
2056
2057                         case MemberTypes.Method:
2058                                 CodeTypeReferenceExpression mt = new CodeTypeReferenceExpression (idesc.MemberInfo.DeclaringType);
2059                                 return new CodeMethodInvokeExpression (mt, idesc.MemberInfo.Name, parameters);
2060
2061                         case MemberTypes.Field:
2062                                 CodeTypeReferenceExpression ft = new CodeTypeReferenceExpression (idesc.MemberInfo.DeclaringType);
2063                                 return new CodeFieldReferenceExpression (ft, idesc.MemberInfo.Name);
2064
2065                         case MemberTypes.Property:
2066                                 CodeTypeReferenceExpression pt = new CodeTypeReferenceExpression (idesc.MemberInfo.DeclaringType);
2067                                 return new CodePropertyReferenceExpression (pt, idesc.MemberInfo.Name);
2068                         }
2069                         throw new ParseException (currentLocation, "Invalid instance type.");
2070                 }
2071                 
2072                 CodeExpression GenerateObjectInstance (object value, bool throwOnError)
2073                 {
2074                         if (value == null)
2075                                 return new CodePrimitiveExpression (null);
2076
2077                         if (value is System.Type) {
2078                                 CodeTypeReference tref = new CodeTypeReference (value.ToString ());
2079                                 return new CodeTypeOfExpression (tref);
2080                         }
2081                         
2082                         Type t = value.GetType ();
2083
2084                         if (t.IsPrimitive || value is string)
2085                                 return new CodePrimitiveExpression (value);
2086                         
2087                         if (t.IsArray) {
2088                                 Array ar = (Array) value;
2089                                 CodeExpression[] items = new CodeExpression [ar.Length];
2090                                 for (int n=0; n<ar.Length; n++) {
2091                                         CodeExpression exp = GenerateObjectInstance (ar.GetValue (n), throwOnError);
2092                                         if (exp == null) return null; 
2093                                         items [n] = exp;
2094                                 }
2095                                 return new CodeArrayCreateExpression (new CodeTypeReference (t), items);
2096                         }
2097                         
2098                         TypeConverter converter = TypeDescriptor.GetConverter (t);
2099                         if (converter != null && converter.CanConvertTo (typeof (InstanceDescriptor))) {
2100                                 InstanceDescriptor idesc = (InstanceDescriptor) converter.ConvertTo (value, typeof(InstanceDescriptor));
2101                                 return GenerateInstance (idesc, throwOnError);
2102                         }
2103                         
2104                         InstanceDescriptor desc = GetDefaultInstanceDescriptor (value);
2105                         if (desc != null) return GenerateInstance (desc, throwOnError);
2106                         
2107                         if (throwOnError)
2108                                 throw new ParseException (currentLocation, "Cannot generate an instance for the type: " + t);
2109                         else
2110                                 return null;
2111                 }
2112                 
2113                 InstanceDescriptor GetDefaultInstanceDescriptor (object value)
2114                 {
2115                         if (value is System.Web.UI.WebControls.Unit) {
2116                                 System.Web.UI.WebControls.Unit s = (System.Web.UI.WebControls.Unit) value;
2117                                 ConstructorInfo c = typeof(System.Web.UI.WebControls.Unit).GetConstructor (
2118                                         BindingFlags.Instance | BindingFlags.Public,
2119                                         null,
2120                                         new Type[] {typeof(double), typeof(System.Web.UI.WebControls.UnitType)},
2121                                         null);
2122                                 
2123                                 return new InstanceDescriptor (c, new object[] {s.Value, s.Type});
2124                         }
2125                         
2126                         if (value is System.Web.UI.WebControls.FontUnit) {
2127                                 System.Web.UI.WebControls.FontUnit s = (System.Web.UI.WebControls.FontUnit) value;
2128
2129                                 Type cParamType = null;
2130                                 object cParam = null;
2131
2132                                 switch (s.Type) {
2133                                         case FontSize.AsUnit:
2134                                         case FontSize.NotSet:
2135                                                 cParamType = typeof (System.Web.UI.WebControls.Unit);
2136                                                 cParam = s.Unit;
2137                                                 break;
2138
2139                                         default:
2140                                                 cParamType = typeof (string);
2141                                                 cParam = s.Type.ToString ();
2142                                                 break;
2143                                 }
2144                                 
2145                                 ConstructorInfo c = typeof(System.Web.UI.WebControls.FontUnit).GetConstructor (
2146                                         BindingFlags.Instance | BindingFlags.Public,
2147                                         null,
2148                                         new Type[] {cParamType},
2149                                         null);
2150                                 if (c != null)
2151                                         return new InstanceDescriptor (c, new object[] {cParam});
2152                         }
2153                         return null;
2154                 }
2155
2156 #if DEBUG
2157                 CodeMethodInvokeExpression CreateConsoleWriteLineCall (string format, params CodeExpression[] parms)
2158                 {
2159                         CodeMethodReferenceExpression cwl = new CodeMethodReferenceExpression (new CodeTypeReferenceExpression (typeof (System.Console)), "WriteLine");
2160                         CodeMethodInvokeExpression cwlCall = new CodeMethodInvokeExpression (cwl);
2161
2162                         cwlCall.Parameters.Add (new CodePrimitiveExpression (format));
2163                         if (parms != null && parms.Length > 0)
2164                                 foreach (CodeExpression expr in parms)
2165                                         cwlCall.Parameters.Add (expr);
2166
2167                         return cwlCall;
2168                 }
2169 #endif
2170         }
2171 }
2172
2173
2174