mcs/class/Microsoft.Build.Tasks/Microsoft.Build.Tasks/CreateVisualBasicManifestResourceName.cs

   1 //
   2 // CreateVisualBasicManifestResourceName.cs
   3 //
   4 // Author:
   5 //   Marek Sieradzki (marek.sieradzki@gmail.com)
   6 //
   7 // (C) 2005 Marek Sieradzki
   8 //
   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:
  16 //
  17 // The above copyright notice and this permission notice shall be
  18 // included in all copies or substantial portions of the Software.
  19 //
  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.
  27
  28
  29 using System;
  30 using System.IO;
  31 using System.Text;
  32 using Microsoft.Build.Framework;
  33
  34 namespace Microsoft.Build.Tasks {
  35         public class CreateVisualBasicManifestResourceName : CreateManifestResourceName {
  36
  37                 public CreateVisualBasicManifestResourceName ()
  38                 {
  39                 }
  40
  41                 protected override string CreateManifestName (string fileName,
  42                                                               string linkFileName,
  43                                                               string rootNamespace,
  44                                                               string dependentUponFileName,
  45                                                               Stream binaryStream)
  46                 {
  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);
  51
  52                         string ns = null;
  53                         string classname = null;
  54
  55                         using (StreamReader rdr = new StreamReader (binaryStream)) {
  56                                 while (true) {
  57                                         string tok = GetNextToken (rdr);
  58                                         if (tok == null)
  59                                                 break;
  60
  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) == "=")
  65                                                         continue;
  66                                                 ns = t;
  67                                         }
  68
  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) == "=")
  73                                                         continue;
  74                                                 classname = t;
  75                                                 break;
  76                                         }
  77                                 }
  78
  79                                 if (classname == null)
  80                                         return GetResourceIdFromFileName (filename_to_use, rootNamespace);
  81
  82                                 string culture, extn, only_filename;
  83                                 if (AssignCulture.TrySplitResourceName (filename_to_use, out only_filename, out culture, out extn))
  84                                         extn = "." + culture;
  85                                 else
  86                                         extn = String.Empty;
  87
  88                                 string rname;
  89                                 if (ns == null)
  90                                         rname = classname + extn;
  91                                 else
  92                                         rname = ns + '.' + classname + extn;
  93
  94                                 if (String.IsNullOrEmpty (rootNamespace))
  95                                         return rname;
  96                                 else
  97                                         return rootNamespace + "." + rname;
  98                         }
  99                 }
 100
 101                 protected override bool IsSourceFile (string fileName)
 102                 {
 103                         return string.Equals (Path.GetExtension (fileName), ".vb", StringComparison.OrdinalIgnoreCase);
 104                 }
 105
 106                 /* Special parser for VB.NET files
 107                  * Assumes that the file is compilable
 108                  * skips comments,
 109                  * skips strings "foo"
 110                  */
 111                 string GetNextToken (StreamReader sr)
 112                 {
 113                         StringBuilder sb = new StringBuilder ();
 114
 115                         while (true) {
 116                                 int c = sr.Peek ();
 117                                 if (c == -1)
 118                                         return null;
 119
 120                                 if (c == '\r' || c == '\n') {
 121                                         sr.ReadLine ();
 122                                         if (sb.Length > 0)
 123                                                 break;
 124
 125                                         continue;
 126                                 }
 127
 128                                 if (c == '\'') {
 129                                         /* comment */
 130                                         sr.ReadLine ();
 131                                         if (sb.Length > 0)
 132                                                 return sb.ToString ();
 133
 134                                         continue;
 135                                 }
 136
 137                                 if (c == '"') {
 138                                         /* String */
 139                                         sr.Read ();
 140                                         while (true) {
 141                                                 int n = sr.Peek ();
 142                                                 if (n == '\r' || n == '\n' || n == -1)
 143                                                         throw new Exception ("String literal not closed");
 144
 145                                                 if (n == '"') {
 146                                                         if (sb.Length > 0) {
 147                                                                 sr.Read ();
 148                                                                 return sb.ToString ();
 149                                                         }
 150
 151                                                         break;
 152                                                 }
 153                                                 sr.Read ();
 154                                         }
 155                                 } else {
 156                                         if (Char.IsLetterOrDigit ((char) c) || c == '_' || c == '.') {
 157                                                 sb.Append ((char) c);
 158                                         } else {
 159                                                 if (sb.Length > 0)
 160                                                         break;
 161
 162                                                 if (c != ' ' && c != '\t') {
 163                                                         sr.Read ();
 164                                                         return ((char) c).ToString ();
 165                                                 }
 166                                         }
 167                                 }
 168
 169                                 sr.Read ();
 170                         }
 171
 172                         return sb.ToString ();
 173                 }
 174
 175         }
 176 }
 177