Moved chain building and validation from Mono.Security to System
[mono.git] / mcs / class / System.XML / System.Xml.Serialization / TypeData.cs
index de50e43ff3c1772cae42fc58c06d0fc0bd3c8810..00e9beb396e173de4f1360d3494bfc24d24d6189 100644 (file)
@@ -4,6 +4,7 @@
 // Authors:
 //     Gonzalo Paniagua Javier (gonzalo@ximian.com)
 //  Lluis Sanchez Gual (lluis@ximian.com)
+//  Atsushi Enomoto (atsushi@ximian.com)
 //
 // (C) 2002 Ximian, Inc (http://www.ximian.com)
 //
 
 using System;
 using System.Collections;
+#if NET_2_0
+using System.Collections.Generic;
+#endif
+using System.Globalization;
 using System.Reflection;
+using System.Text;
+using System.Xml.Schema;
 
 namespace System.Xml.Serialization
 {
@@ -43,13 +50,27 @@ namespace System.Xml.Serialization
                Type listItemType;
                string typeName;
                string fullTypeName;
+               string csharpName;
+               string csharpFullName;
                TypeData listItemTypeData;
                TypeData listTypeData;
+               TypeData mappedType;
+               XmlSchemaPatternFacet facet;
+               bool hasPublicConstructor = true;
+               bool nullableOverride;
 
-               public TypeData (Type type, string elementName, bool isPrimitive)
+               public TypeData (Type type, string elementName, bool isPrimitive) :
+                       this(type, elementName, isPrimitive, null, null) {}
+
+               public TypeData (Type type, string elementName, bool isPrimitive, TypeData mappedType, XmlSchemaPatternFacet facet)
                {
+#if NET_2_0
+                       if (type.IsGenericTypeDefinition)
+                               throw new InvalidOperationException ("Generic type definition cannot be used in serialization. Only specific generic types can be used.");
+#endif
+                       this.mappedType = mappedType;
+                       this.facet = facet;
                        this.type = type;
-                       this.elementName = elementName;
                        this.typeName = type.Name;
                        this.fullTypeName = type.FullName.Replace ('+', '.');
 
@@ -68,6 +89,15 @@ namespace System.Xml.Serialization
                                else
                                        sType = SchemaTypes.Class;
                        }
+                       
+                       if (IsListType)
+                               this.elementName = TypeTranslator.GetArrayName (ListItemTypeData.XmlType);
+                       else
+                               this.elementName = elementName;
+
+                       if (sType == SchemaTypes.Array || sType == SchemaTypes.Class) {
+                               hasPublicConstructor = !type.IsInterface && (type.IsArray || type.GetConstructor (Type.EmptyTypes) != null || type.IsAbstract || type.IsValueType);
+                       }
                }
 
                internal TypeData (string typeName, string fullTypeName, string xmlType, SchemaTypes schemaType, TypeData listItemTypeData)
@@ -77,6 +107,7 @@ namespace System.Xml.Serialization
                        this.fullTypeName = fullTypeName.Replace ('+', '.');
                        this.listItemTypeData = listItemTypeData;
                        this.sType = schemaType;
+                       this.hasPublicConstructor = true;
                }
 
                public string TypeName
@@ -107,6 +138,73 @@ namespace System.Xml.Serialization
                        }
                }
 
+               public string CSharpName
+               {
+                       get {
+                               if (csharpName == null)
+                                       csharpName = (Type == null) ? TypeName : ToCSharpName (Type, false);
+                               return csharpName;
+                       }
+               }
+
+               public string CSharpFullName
+               {
+                       get {
+                               if (csharpFullName == null)
+                                       csharpFullName = (Type == null) ? TypeName : ToCSharpName (Type, true);
+                               return csharpFullName;
+                       }
+               }
+
+               // static Microsoft.CSharp.CSharpCodeProvider csprovider =
+               //      new Microsoft.CSharp.CSharpCodeProvider ();
+
+               public static string ToCSharpName (Type type, bool full)
+               {
+                       // return csprovider.GetTypeOutput (new System.CodeDom.CodeTypeReference (type));
+                       if (type.IsArray) {
+                               StringBuilder sb = new StringBuilder ();
+                               sb.Append (ToCSharpName (type.GetElementType (), full));
+                               sb.Append ('[');
+                               int rank = type.GetArrayRank ();
+                               for (int i = 1; i < rank; i++)
+                                       sb.Append (',');
+                               sb.Append (']');
+                               return sb.ToString ();
+                       }
+#if NET_2_0
+                       if (type.IsGenericType && !type.IsGenericTypeDefinition) {
+                               StringBuilder sb = new StringBuilder ();
+                               sb.Append (ToCSharpName (type.GetGenericTypeDefinition (), full));
+                               sb.Append ('<');
+                               foreach (Type arg in type.GetGenericArguments ())
+                                       sb.Append (ToCSharpName (arg, full)).Append (',');
+                               sb.Length--;
+                               sb.Append ('>');
+                               return sb.ToString ();
+                       }
+#endif
+                       string name = full ? type.FullName : type.Name;
+                       name = name.Replace ('+', '.');
+                       int idx = name.IndexOf ('`'); // generic definition has extra `n.
+                       name = idx > 0 ? name.Substring (0, idx) : name;
+                       if (IsKeyword (name))
+                               return "@" + name;
+                       else
+                               return name;
+               }
+               
+               static bool IsKeyword (string name)
+               {
+                       if (keywordsTable == null) {
+                               Hashtable t = new Hashtable ();
+                               foreach (string s in keywords)
+                                       t [s] = s;
+                               keywordsTable = t;
+                       }
+                       return keywordsTable.Contains (name);
+               }
+
                public SchemaTypes SchemaType
                {
                        get {
@@ -127,7 +225,8 @@ namespace System.Xml.Serialization
                                              SchemaType == SchemaTypes.Array ||
                                              SchemaType == SchemaTypes.Enum ||
                                              SchemaType == SchemaTypes.XmlNode ||
-                                                 SchemaType == SchemaTypes.XmlSerializable ); 
+                                                 SchemaType == SchemaTypes.XmlSerializable ||
+                                                 !IsXsdType); 
                        }
                }
 
@@ -140,6 +239,33 @@ namespace System.Xml.Serialization
                        }
                }
 
+               public bool NullableOverride
+               {
+                       get { return nullableOverride; }
+               }
+
+               public bool IsNullable
+               {
+                       get
+                       {
+                               if (nullableOverride)
+                                       return true;
+#if NET_2_0
+                               return !IsValueType ||
+                                       (type != null &&
+                                        type.IsGenericType &&
+                                        type.GetGenericTypeDefinition () == typeof (Nullable<>));
+#else
+                               return !IsValueType;
+#endif
+                       }
+
+                       set
+                       {
+                               nullableOverride = value;
+                       }
+               }
+
                public TypeData ListItemTypeData
                {
                        get
@@ -159,29 +285,57 @@ namespace System.Xml.Serialization
 
                                if (listItemType != null) return listItemType;
 
+                               Type genericArgument = null;
+
                                if (SchemaType != SchemaTypes.Array)
                                        throw new InvalidOperationException (Type.FullName + " is not a collection");
                                else if (type.IsArray) 
                                        listItemType = type.GetElementType ();
-                               else if (typeof(ICollection).IsAssignableFrom (type))
+#if NET_2_0
+                               else if (typeof (ICollection).IsAssignableFrom (type) || (genericArgument = GetGenericListItemType (type)) != null)
+#else
+                               else if (typeof (ICollection).IsAssignableFrom (type))
+#endif
                                {
-                                       PropertyInfo prop = GetIndexerProperty (type);
-                                       if (prop == null) 
-                                               throw new InvalidOperationException ("You must implement a default accessor on " + type.FullName + " because it inherits from ICollection");
-                                               
-                                       return prop.PropertyType;
+                                       if (typeof (IDictionary).IsAssignableFrom (type))
+                                               throw new NotSupportedException (string.Format (CultureInfo.InvariantCulture,
+                                                       "The type {0} is not supported because it implements" +
+                                                       " IDictionary.", type.FullName));
+
+                                       if (genericArgument != null)
+                                               listItemType = genericArgument;
+                                       else {
+                                               PropertyInfo prop = GetIndexerProperty (type);
+                                               if (prop == null) 
+                                                       throw new InvalidOperationException ("You must implement a default accessor on " + type.FullName + " because it inherits from ICollection");
+                                               listItemType = prop.PropertyType;
+                                       }
+
+                                       MethodInfo addMethod = type.GetMethod ("Add", new Type[] { listItemType });
+                                       if (addMethod == null)
+                                               throw CreateMissingAddMethodException (type, "ICollection",
+                                                       listItemType);
                                }
-                               else
+                               else // at this point, we must be dealing with IEnumerable implementation
                                {
-                                       MethodInfo met = type.GetMethod ("Add");
-                                       if (met == null)
-                                               throw new InvalidOperationException ("The collection " + type.FullName + " must implement an Add method");
-
-                                       ParameterInfo[] pars = met.GetParameters();
-                                       if (pars.Length != 1)
-                                               throw new InvalidOperationException ("The Add method of the collection " + type.FullName + " must have only one parameter");
-                                       
-                                       return pars[0].ParameterType;
+                                       MethodInfo met = type.GetMethod ("GetEnumerator", Type.EmptyTypes);
+                                       if (met == null) { 
+                                               // get private implemenation
+                                               met = type.GetMethod ("System.Collections.IEnumerable.GetEnumerator",
+                                                       BindingFlags.NonPublic | BindingFlags.Public | BindingFlags.Instance,
+                                                       null, Type.EmptyTypes, null);
+                                       }
+                                       // determine ListItemType using IEnumerator.Current property
+                                       PropertyInfo prop = met.ReturnType.GetProperty ("Current");
+                                       if (prop == null)
+                                               listItemType = typeof (object);
+                                       else
+                                               listItemType = prop.PropertyType;
+
+                                       MethodInfo addMethod = type.GetMethod ("Add", new Type[] { listItemType });
+                                       if (addMethod == null)
+                                               throw CreateMissingAddMethodException (type, "IEnumerable",
+                                                       listItemType);
                                }
 
                                return listItemType;
@@ -203,6 +357,27 @@ namespace System.Xml.Serialization
                        }
                }
 
+               public bool IsXsdType {
+                       get { return mappedType == null; }
+               }
+
+               public TypeData MappedType {
+                       get {
+                               return mappedType != null ? mappedType : this;
+                       }
+               }
+
+               public XmlSchemaPatternFacet XmlSchemaPatternFacet {
+                       get {
+                               return facet;
+                       }
+               }
+               
+               public bool HasPublicConstructor
+               {
+                       get { return hasPublicConstructor; }
+               }
+
 
                public static PropertyInfo GetIndexerProperty (Type collectionType)
                {
@@ -215,5 +390,44 @@ namespace System.Xml.Serialization
                        }
                        return null;
                }
+
+               private static InvalidOperationException CreateMissingAddMethodException (Type type, string inheritFrom, Type argumentType) {
+                       return new InvalidOperationException (string.Format(CultureInfo.InvariantCulture,
+                               "To be XML serializable, types which inherit from {0} must have " +
+                               "an implementation of Add({1}) at all levels of their inheritance " +
+                               "hierarchy. {2} does not implement Add({1}).", inheritFrom, 
+                               argumentType.FullName, type.FullName));
+               }
+
+               private static Hashtable keywordsTable;
+               private static string[] keywords = new string[] {
+                       "abstract","event","new","struct","as","explicit","null","switch","base","extern",
+                       "this","false","operator","throw","break","finally","out","true",
+                       "fixed","override","try","case","params","typeof","catch","for",
+                       "private","foreach","protected","checked","goto","public",
+                       "unchecked","class","if","readonly","unsafe","const","implicit","ref",
+                       "continue","in","return","using","virtual","default",
+                       "interface","sealed","volatile","delegate","internal","do","is",
+                       "sizeof","while","lock","stackalloc","else","static","enum",
+                       "namespace",
+                       "object","bool","byte","float","uint","char","ulong","ushort",
+                       "decimal","int","sbyte","short","double","long","string","void",
+#if NET_2_0
+                       "partial", "yield", "where"
+#endif
+               };
+
+#if NET_2_0
+               private Type GetGenericListItemType (Type type)
+               {
+                       if (type.IsGenericType && type.GetGenericTypeDefinition () == typeof (ICollection<>))
+                               return type.GetGenericArguments () [0];
+                       Type t = null;
+                       foreach (Type i in type.GetInterfaces ())
+                               if ((t = GetGenericListItemType (i)) != null)
+                                       return t;
+                       return null;
+               }
+#endif
        }
 }