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.
32 using Microsoft.Build.Framework;
34 namespace Microsoft.Build.Tasks {
35 public class CreateVisualBasicManifestResourceName : CreateManifestResourceName {
37 public CreateVisualBasicManifestResourceName ()
41 protected override string CreateManifestName (string fileName,
44 string dependentUponFileName,
47 string filename_to_use = String.IsNullOrEmpty (linkFileName) ? fileName : linkFileName;
48 if (String.IsNullOrEmpty (dependentUponFileName) || binaryStream == null)
49 return GetResourceIdFromFileName
50 (Path.GetFileName (filename_to_use), rootNamespace);
53 string classname = null;
55 using (StreamReader rdr = new StreamReader (binaryStream)) {
57 string tok = GetNextToken (rdr);
61 if (String.Compare (tok, "namespace", true) == 0) {
62 string t = GetNextToken (rdr);
63 /* 'namespace' can be a attribute param also, */
64 if (t == ":" && GetNextToken (rdr) == "=")
69 if (String.Compare (tok, "class", true) == 0) {
70 string t = GetNextToken (rdr);
71 /* 'class' can be a attribute param also, */
72 if (t == ":" && GetNextToken (rdr) == "=")
79 if (classname == null)
80 return GetResourceIdFromFileName (filename_to_use, rootNamespace);
82 string culture, extn, only_filename;
83 if (AssignCulture.TrySplitResourceName (filename_to_use, out only_filename, out culture, out extn))
90 rname = classname + extn;
92 rname = ns + '.' + classname + extn;
94 if (String.IsNullOrEmpty (rootNamespace))
97 return rootNamespace + "." + rname;
101 protected override bool IsSourceFile (string fileName)
103 return string.Equals (Path.GetExtension (fileName), ".vb", StringComparison.OrdinalIgnoreCase);
106 /* Special parser for VB.NET files
107 * Assumes that the file is compilable
109 * skips strings "foo"
111 string GetNextToken (StreamReader sr)
113 StringBuilder sb = new StringBuilder ();
120 if (c == '\r' || c == '\n') {
132 return sb.ToString ();
142 if (n == '\r' || n == '\n' || n == -1)
143 throw new Exception ("String literal not closed");
148 return sb.ToString ();
156 if (Char.IsLetterOrDigit ((char) c) || c == '_' || c == '.') {
157 sb.Append ((char) c);
162 if (c != ' ' && c != '\t') {
164 return ((char) c).ToString ();
172 return sb.ToString ();