mcs/class/System.Web/System.Web.Compilation/TemplateControlCompiler.cs

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