Filters/FilterMatlab.cs

   1 //
   2 // FilterMatlab.cs
   3 //
   4 //
   5
   6 //
   7 // Permission is hereby granted, free of charge, to any person obtaining a
   8 // copy of this software and associated documentation files (the "Software"),
   9 // to deal in the Software without restriction, including without limitation
  10 // the rights to use, copy, modify, merge, publish, distribute, sublicense,
  11 // and/or sell copies of the Software, and to permit persons to whom the
  12 // Software is furnished to do so, subject to the following conditions:
  13 //
  14 // The above copyright notice and this permission notice shall be included in
  15 // all copies or substantial portions of the Software.
  16 //
  17 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  18 // IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  19 // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  20 // AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  21 // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
  22 // FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
  23 // DEALINGS IN THE SOFTWARE.
  24 //
  25
  26 using System;
  27 using System.Collections;
  28 using System.IO;
  29 using System.Text;
  30
  31 using Beagle.Daemon;
  32
  33 namespace Beagle.Filters {
  34
  35         public class FilterMatlab : FilterSource {
  36
  37                 static string  [] strKeyWords  = {"break", "case", "catch", "continue", "else",
  38                                                   "elsif", "end", "for", "function", "global", "if",
  39                                                   "otherwise", "persistent", "return", "switch",
  40                                                   "try", "while"};
  41
  42                 public FilterMatlab ()
  43                 {
  44                         AddSupportedFlavor (FilterFlavor.NewFromExtension (".m"));
  45                 }
  46
  47                 override protected void DoOpen (FileInfo info)
  48                 {
  49                         foreach (string keyword in strKeyWords)
  50                                 KeyWordsHash [keyword] = true;
  51                         SrcLangType = LangType.Matlab_Style;
  52                 }
  53
  54                 override protected void DoPull ()
  55                 {
  56                         string str = TextReader.ReadLine ();
  57                         if (str == null)
  58                                 Finished ();
  59                         else
  60                                 ExtractTokens (str);
  61                 }
  62         }
  63 }