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