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