2 // CreateVisualBasicManifestResourceName.cs
5 // Marek Sieradzki (marek.sieradzki@gmail.com)
7 // (C) 2005 Marek Sieradzki
9 // Permission is hereby granted, free of charge, to any person obtaining
10 // a copy of this software and associated documentation files (the
11 // "Software"), to deal in the Software without restriction, including
12 // without limitation the rights to use, copy, modify, merge, publish,
13 // distribute, sublicense, and/or sell copies of the Software, and to
14 // permit persons to whom the Software is furnished to do so, subject to
15 // the following conditions:
17 // The above copyright notice and this permission notice shall be
18 // included in all copies or substantial portions of the Software.
20 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
21 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
22 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
23 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
24 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
25 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
26 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
33 using Microsoft.Build.Framework;
35 namespace Microsoft.Build.Tasks {
36 public class CreateVisualBasicManifestResourceName : CreateManifestResourceName {
38 public CreateVisualBasicManifestResourceName ()
42 protected override string CreateManifestName (string fileName,
45 string dependentUponFileName,
48 string filename_to_use = String.IsNullOrEmpty (linkFileName) ? fileName : linkFileName;
49 if (String.IsNullOrEmpty (dependentUponFileName) || binaryStream == null)
50 return GetResourceIdFromFileName
51 (Path.GetFileName (filename_to_use), rootNamespace);
54 string classname = null;
56 using (StreamReader rdr = new StreamReader (binaryStream)) {
58 string tok = GetNextToken (rdr);
62 if (String.Compare (tok, "namespace", true) == 0) {
63 string t = GetNextToken (rdr);
64 /* 'namespace' can be a attribute param also, */
65 if (t == ":" && GetNextToken (rdr) == "=")
70 if (String.Compare (tok, "class", true) == 0) {
71 string t = GetNextToken (rdr);
72 /* 'class' can be a attribute param also, */
73 if (t == ":" && GetNextToken (rdr) == "=")
80 if (classname == null)
81 return GetResourceIdFromFileName (filename_to_use, rootNamespace);
83 string culture, extn, only_filename;
84 if (AssignCulture.TrySplitResourceName (filename_to_use, out only_filename, out culture, out extn))
91 rname = classname + extn;
93 rname = ns + '.' + classname + extn;
95 if (String.IsNullOrEmpty (rootNamespace))
98 return rootNamespace + "." + rname;
102 protected override bool IsSourceFile (string fileName)
104 return Path.GetExtension (fileName).ToLower () == ".vb";
107 /* Special parser for VB.NET files
108 * Assumes that the file is compilable
110 * skips strings "foo"
112 string GetNextToken (StreamReader sr)
114 StringBuilder sb = new StringBuilder ();
121 if (c == '\r' || c == '\n') {
133 return sb.ToString ();
143 if (n == '\r' || n == '\n' || n == -1)
144 throw new Exception ("String literal not closed");
149 return sb.ToString ();
157 if (Char.IsLetterOrDigit ((char) c) || c == '_' || c == '.') {
158 sb.Append ((char) c);
163 if (c != ' ' && c != '\t') {
165 return ((char) c).ToString ();
173 return sb.ToString ();