2005-01-31 Zoltan Varga <vargaz@freemail.hu>

[mono.git] / mcs / class / corlib / System.Runtime.Remoting.Metadata / SoapTypeAttribute.cs

diff --git a/mcs/class/corlib/System.Runtime.Remoting.Metadata/SoapTypeAttribute.cs b/mcs/class/corlib/System.Runtime.Remoting.Metadata/SoapTypeAttribute.cs
index 25502e4553461e0a6ee2e2a2d7e8584d2c560ab6..e154cffbee4084f28064a3c7b9a09959c5911045 100644 (file)
--- a/mcs/class/corlib/System.Runtime.Remoting.Metadata/SoapTypeAttribute.cs
+++ b/mcs/class/corlib/System.Runtime.Remoting.Metadata/SoapTypeAttribute.cs
@@ -7,7 +7,31 @@
 // 2002 (C) Copyright, Ximian, Inc.
 //
 
+//
+// Copyright (C) 2004 Novell, Inc (http://www.novell.com)
+//
+// Permission is hereby granted, free of charge, to any person obtaining
+// a copy of this software and associated documentation files (the
+// "Software"), to deal in the Software without restriction, including
+// without limitation the rights to use, copy, modify, merge, publish,
+// distribute, sublicense, and/or sell copies of the Software, and to
+// permit persons to whom the Software is furnished to do so, subject to
+// the following conditions:
+// 
+// The above copyright notice and this permission notice shall be
+// included in all copies or substantial portions of the Software.
+// 
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+//
+
 using System;
+using System.Runtime.Remoting;
 using System.Runtime.Remoting.Metadata;
 
 namespace System.Runtime.Remoting.Metadata {
@@ -23,6 +47,8 @@ namespace System.Runtime.Remoting.Metadata {
                string _xmlNamespace;
                string _xmlTypeName;
                string _xmlTypeNamespace;
+               bool _isType;
+               bool _isElement;
                
                public SoapTypeAttribute ()
                {
@@ -54,6 +80,7 @@ namespace System.Runtime.Remoting.Metadata {
                        }
 
                        set {
+                               _isElement = value != null;
                                _xmlElementName = value;
                        }
                }
@@ -74,6 +101,7 @@ namespace System.Runtime.Remoting.Metadata {
                        }
 
                        set {
+                               _isElement = value != null;
                                _xmlNamespace = value;
                        }
                }
@@ -84,6 +112,7 @@ namespace System.Runtime.Remoting.Metadata {
                        }
 
                        set {
+                               _isType = value != null;
                                _xmlTypeName = value;
                        }
                }
@@ -94,8 +123,41 @@ namespace System.Runtime.Remoting.Metadata {
                        }
 
                        set {
+                               _isType = value != null;
                                _xmlTypeNamespace = value;
                        }
                }
+               
+               internal bool IsInteropXmlElement
+               {
+                       get { return _isElement; }
+               }
+               
+               internal bool IsInteropXmlType
+               {
+                       get { return _isType; }
+               }
+               
+               internal override void SetReflectionObject (object reflectionObject)
+               {
+                       Type type = (Type) reflectionObject;
+                       
+                       if (_xmlElementName == null)
+                               _xmlElementName = type.Name;
+                               
+                       if (_xmlTypeName == null)
+                               _xmlTypeName = type.Name;
+                       
+                       if (_xmlTypeNamespace == null)
+                       {
+                               string na;
+                               if (type.Assembly == typeof (object).Assembly) na = string.Empty;
+                               else na = type.Assembly.GetName().Name;
+                               _xmlTypeNamespace = SoapServices.CodeXmlNamespaceForClrTypeNamespace (type.Namespace, na);
+                       }
+                       
+                       if (_xmlNamespace == null)
+                               _xmlNamespace = _xmlTypeNamespace;
+               }
        }
 }