* Makefile ($(build_lib)): Make CYCLIC_DEP_FILES depend on this.
[mono.git] / mcs / class / Microsoft.Build.Engine / Microsoft.Build.BuildEngine / ExpressionCollection.cs
1 //
2 // ExpressionCollection.cs
3 //
4 // Author:
5 //   Marek Sieradzki (marek.sieradzki@gmail.com)
6 //   Ankit Jain (jankit@novell.com)
7 // 
8 // (C) 2006 Marek Sieradzki
9 // Copyright 2009 Novell, Inc (http://www.novell.com)
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 #if NET_2_0
31
32 using System;
33 using System.Collections;
34 using System.Collections.Generic;
35 using System.Text;
36 using Microsoft.Build.Framework;
37 using Microsoft.Build.Utilities;
38
39 namespace Microsoft.Build.BuildEngine {
40
41         internal class ExpressionCollection {
42         
43                 IList objects;
44                 static Dictionary<string, bool> boolValues;
45
46                 static ExpressionCollection ()
47                 {
48                         string[] trueValuesArray = new string[] {"true", "on", "yes"};
49                         string[] falseValuesArray = new string[] {"false", "off", "no"};
50
51                         boolValues = new Dictionary<string, bool> (StringComparer.InvariantCultureIgnoreCase);
52                         foreach (string s in trueValuesArray)
53                                 boolValues.Add (s, true);
54                         foreach (string s in falseValuesArray)
55                                 boolValues.Add (s, false);
56                 }
57         
58                 public ExpressionCollection ()
59                 {
60                         objects = new ArrayList ();
61                 }
62
63                 public int Count {
64                         get { return objects.Count; }
65                 }
66                 
67                 public void Add (IReference reference)
68                 {
69                         objects.Add (reference);
70                 }
71                 
72                 public void Add (string s)
73                 {
74                         objects.Add (s);
75                 }
76                 
77                 public object ConvertTo (Project project, Type type)
78                 {
79                         if (type.IsArray) {
80                                 if (type == typeof (ITaskItem[]))
81                                         return ConvertToITaskItemArray (project);
82                                 else
83                                         return ConvertToArray (project, type);
84                         } else {
85                                 if (type == typeof (ITaskItem))
86                                         return ConvertToITaskItem (project);
87                                 else
88                                         return ConvertToNonArray (project, type);
89                         }
90                 }
91                 
92                 public IEnumerator GetEnumerator ()
93                 {
94                         foreach (object o in objects)
95                                 yield return o;
96                 }
97                 
98                 object ConvertToNonArray (Project project, Type type)
99                 {
100                         return ConvertToObject (ConvertToString (project), type);
101                 }
102
103                 object ConvertToArray (Project project, Type type)
104                 {
105                         ITaskItem[] items = ConvertToITaskItemArray (project);
106
107                         Type element_type = type.GetElementType ();
108                         Array arr = Array.CreateInstance (element_type, items.Length);
109                         for (int i = 0; i < arr.Length; i ++)
110                                 arr.SetValue (ConvertToObject (items [i].ItemSpec, element_type), i);
111                         return arr;
112                 }
113
114                 object ConvertToObject (string raw, Type type)
115                 {
116                         if (type == typeof (bool)) {
117                                 bool value;
118                                 if (boolValues.TryGetValue (raw, out value))
119                                         return value;
120                                 else
121                                         return false;
122                         }
123
124                         if (type == typeof (string))
125                                 return raw;
126                         else if (type == typeof (int))
127                                 return Int32.Parse (raw);
128                         else if (type == typeof (uint))
129                                 return UInt32.Parse (raw);
130                         else if (type == typeof (DateTime))
131                                 return DateTime.Parse (raw);
132                         else
133                                 throw new Exception (String.Format ("Unknown type: {0}", type.ToString ()));
134                 }
135
136                 string ConvertToString (Project project)
137                 {
138                         StringBuilder sb = new StringBuilder ();
139                         
140                         foreach (object o in objects) {
141                                 string s = o as string;
142                                 if (s != null) {
143                                         sb.Append (s);
144                                         continue;
145                                 }
146
147                                 IReference br = o as IReference;
148                                 if (br != null)
149                                         sb.Append (br.ConvertToString (project));
150                                 else
151                                         throw new Exception ("BUG: Invalid type in objects collection.");
152                         }
153                         return sb.ToString ();
154                 }
155
156                 ITaskItem ConvertToITaskItem (Project project)
157                 {
158                         ITaskItem item;
159                         
160                         if (objects == null)
161                                 throw new Exception ("Cannot cast empty expression to ITaskItem.");
162
163                         ITaskItem[] items = ConvertToITaskItemArray (project);
164                         if (items.Length != 1)
165                                 //FIXME: msbuild gives better errors
166                                 throw new Exception (String.Format ("Too many items: {0}", items.Length));
167
168                         return items [0];
169                 }
170                 
171                 // Concat rules (deduced)
172                 // - ItemRef can concat only with a string ';' or PropertyRef ending in ';'
173                 // - MetadataRef can concat with anything other than ItemRef
174                 // - PropertyRef cannot be right after a ItemRef
175                 //   PropertyRef concats if it doesn't end in ';'
176                 // - string cannot concat with ItemRef unless it is ';'.
177                 //   string concats if it ends in ';'
178                 ITaskItem[] ConvertToITaskItemArray (Project project)
179                 {
180                         List <ITaskItem> finalItems = new List <ITaskItem> ();
181                         
182                         object prev = null;
183                         bool prev_can_concat = false;
184
185                         foreach (object o in objects) {
186                                 bool can_concat = prev_can_concat;
187
188                                 string str = o as string;
189                                 if (str != null) {
190                                         string trimmed_str = str.Trim ();
191                                         if (!IsSemicolon (str) && trimmed_str.Length > 0 && prev != null && prev is ItemReference)
192                                                 // non-empty, non-semicolon string after item ref
193                                                 ThrowCantConcatError (prev, str);
194
195                                         if (trimmed_str.Length == 0 && prev is string && IsSemicolon ((string) prev)) {
196                                                 // empty string after a ';', ignore it
197                                                 continue;
198                                         }
199
200                                         // empty string _after_ a itemref, not an error
201                                         prev_can_concat = !(str.Length > 0 && str [str.Length - 1] == ';') && trimmed_str.Length > 0;
202                                         AddItemsToArray (finalItems,
203                                                         ConvertToITaskItemArrayFromString (str),
204                                                         can_concat);
205                                         prev = o;
206                                         continue;
207                                 }
208
209                                 IReference br = o as IReference;
210                                 if (br == null)
211                                         throw new Exception ("BUG: Invalid type in objects collection.");
212
213                                 if (o is ItemReference) {
214                                         if (prev != null && !(prev is string && (string)prev == ";"))
215                                                 ThrowCantConcatError (prev, br);
216
217                                         prev_can_concat = true;
218                                 } else if (o is MetadataReference) {
219                                         if (prev != null && prev is ItemReference)
220                                                 ThrowCantConcatError (prev, br);
221
222                                         prev_can_concat = true;
223                                 } else if (o is PropertyReference) {
224                                         if (prev != null && prev is ItemReference)
225                                                 ThrowCantConcatError (prev, br);
226
227                                         string value = ((PropertyReference) o).GetValue (project);
228                                         prev_can_concat = !(value.Length > 0 && value [value.Length - 1] == ';');
229                                 }
230
231                                 AddItemsToArray (finalItems, br.ConvertToITaskItemArray (project), can_concat);
232
233                                 prev = o;
234                         }
235
236                         // Trim and Remove empty items
237                         List<ITaskItem> toRemove = new List<ITaskItem> ();
238                         for (int i = 0; i < finalItems.Count; i ++) {
239                                 string s = finalItems [i].ItemSpec.Trim ();
240                                 if (s.Length == 0)
241                                         toRemove.Add (finalItems [i]);
242                                 else
243                                         finalItems [i].ItemSpec = s;
244                         }
245                         foreach (ITaskItem ti in toRemove)
246                                 finalItems.Remove (ti);
247                         
248                         return finalItems.ToArray ();
249                 }
250
251                 // concat's first item in @items to last item in @list if @concat is true
252                 // else just adds all @items to @list
253                 void AddItemsToArray (List<ITaskItem> list, ITaskItem[] items, bool concat)
254                 {
255                         if (items == null || items.Length == 0)
256                                 return;
257
258                         int start_index = 1;
259                         if (concat && list.Count > 0)
260                                 list [list.Count - 1].ItemSpec += items [0].ItemSpec;
261                         else
262                                 start_index = 0;
263
264                         for (int i = start_index; i < items.Length; i ++)
265                                 list.Add (items [i]);
266                 }
267                 
268                 ITaskItem [] ConvertToITaskItemArrayFromString (string source)
269                 {
270                         List <ITaskItem> items = new List <ITaskItem> ();
271                         string [] splitSource = source.Split (new char [] {';'},
272                                         StringSplitOptions.RemoveEmptyEntries);
273
274                         foreach (string s in splitSource)
275                                 items.Add (new TaskItem (s));
276
277                         return items.ToArray ();
278                 }
279
280                 bool IsSemicolon (string str)
281                 {
282                         return str != null && str.Length == 1 && str [0] == ';';
283                 }
284
285                 void ThrowCantConcatError (object first, object second)
286                 {
287                         throw new Exception (String.Format (
288                                         "Can't concatenate Item list with other strings where an item list is " +
289                                         "expected ('{0}', '{1}'). Use semi colon to separate items.",
290                                         first.ToString (), second.ToString ()));
291                 }
292
293         }
294 }
295
296 #endif