Merge pull request #4169 from evincarofautumn/fix-xmm-scanning-mac-x86
[mono.git] / mcs / class / System.Web.Services / System.Web.Services.Protocols / ValueCollectionParameterReader.cs
1 // 
2 // System.Web.Services.Protocols.ValueCollectionParameterReader.cs
3 //
4 // Author:
5 //   Tim Coleman (tim@timcoleman.com)
6 //   Lluis Sanchez Gual (lluis@ximian.com)
7 //
8 // Copyright (C) Tim Coleman, 2002
9 //
10
11 //
12 // Permission is hereby granted, free of charge, to any person obtaining
13 // a copy of this software and associated documentation files (the
14 // "Software"), to deal in the Software without restriction, including
15 // without limitation the rights to use, copy, modify, merge, publish,
16 // distribute, sublicense, and/or sell copies of the Software, and to
17 // permit persons to whom the Software is furnished to do so, subject to
18 // the following conditions:
19 // 
20 // The above copyright notice and this permission notice shall be
21 // included in all copies or substantial portions of the Software.
22 // 
23 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
24 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
25 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
26 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
27 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
28 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
29 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
30 //
31
32 using System.Collections.Specialized;
33 using System.Reflection;
34 using System.Web;
35 using System.Xml;
36
37 namespace System.Web.Services.Protocols {
38         public abstract class ValueCollectionParameterReader : MimeParameterReader {
39
40                 ParameterInfo[] parameters;
41
42                 #region Constructors
43
44                 protected ValueCollectionParameterReader () 
45                 {
46                 }
47                 
48                 #endregion // Constructors
49
50                 #region Methods
51
52                 public override object GetInitializer (LogicalMethodInfo methodInfo)
53                 {
54                         if (IsSupported (methodInfo)) return methodInfo.Parameters;
55                         else return null;
56                 }
57
58                 public override void Initialize (object o)
59                 {
60                         parameters = (ParameterInfo[]) o;
61                 }
62
63                 public static bool IsSupported (LogicalMethodInfo methodInfo)
64                 {
65                         foreach (ParameterInfo param in methodInfo.Parameters)
66                                 if (!IsSupported (param)) return false;
67                         return true;
68                 }
69
70                 public static bool IsSupported (ParameterInfo paramInfo)
71                 {
72                         Type type = paramInfo.ParameterType;
73                         if (type.IsByRef || paramInfo.IsOut) return false;
74                         if (type.IsArray) return IsSupportedPrimitive (type.GetElementType());
75                         else return IsSupportedPrimitive (type);
76                 }
77                 
78                 internal static bool IsSupportedPrimitive (Type type)
79                 {
80                         return ( type.IsPrimitive || 
81                                          type.IsEnum ||
82                                          type == typeof(string) ||
83                                          type == typeof(DateTime) ||
84                                          type == typeof(Decimal)
85                                          );
86                 }
87
88                 protected object[] Read (NameValueCollection collection)
89                 {
90                         object[] res = new object [parameters.Length];
91                         for (int n=0; n<res.Length; n++)
92                         {
93                                 ParameterInfo pi = parameters [n];
94
95                                 if (pi.ParameterType.IsArray) {
96                                         string[] values = collection.GetValues (pi.Name);
97                                         if (values == null)
98                                                 throw new InvalidOperationException ("Missing parameter: " + pi.Name);
99                                         Type elemType = pi.ParameterType.GetElementType ();
100                                         Array a = Array.CreateInstance (elemType, values.Length);
101                                         for (int i = 0; i < values.Length; i++) {
102                                                 try {
103                                                         a.SetValue (StringToObj (elemType, values [i]), i);                                                     
104                                                 } catch (Exception ex) {
105                                                         string error = "Cannot convert '" + values [i] + "' to " + elemType + "\n";
106                                                         error += "Parameter name: " + pi.Name + " --> " + ex.Message;
107                                                         throw new InvalidOperationException (error);
108                                                 }
109                                         }
110                                         res [n] = a;
111                                 } else {
112                                         string val = collection [pi.Name];
113                                         if (val == null)
114                                                 throw new InvalidOperationException ("Missing parameter: " + pi.Name);
115                                         try
116                                         {
117                                                 res [n] = StringToObj (pi.ParameterType, val);
118                                         }
119                                         catch (Exception ex)
120                                         {
121                                                 string error = "Cannot convert '" + val + "' to " + pi.ParameterType + "\n";
122                                                 error += "Parameter name: " + pi.Name + " --> " + ex.Message;
123                                                 throw new InvalidOperationException (error);
124                                         }
125                                 }       
126                         }
127                         return res;
128                 }
129                 #endregion // Methods
130         }
131 }