// token-list-select um FILE Option erweitert

Author: notesjor

Action/CorpusExplorer.Sdk.Action/Properties/Resources.Designer.cs

@@ -376,7 +376,7 @@
     <value>token-list [LAYER] - list of all tokens in [LAYER]</value>
   </data>
   <data name="DescTokeListSelect" xml:space="preserve">
-    <value>token-list-select [LAYER] [REGEX] - list of all tokens in [LAYER] who are matching the [REGEX]-expression</value>
+    <value>token-list-select [LAYER] [REGEX/FILE] - list of all tokens in [LAYER] who are matching the [REGEX]-expression or [FILE]</value>
   </data>
   <data name="DescKwitSelect" xml:space="preserve">
     <value>kwit-n [LAYER1] [LAYER2] [minFREQ] [PRE] [POST] [WORDS] - Like kwit (but you can specificate the range [PRE] and [POST] the match - e.g. [PRE] = 3)</value>

Action/CorpusExplorer.Sdk.Action/Properties/Resources.resx

@@ -1,8 +1,12 @@
+using System.Collections.Generic;
 using System.Data;
+using System.IO;
 using System.Linq;
+using System.Text;
 using System.Text.RegularExpressions;
 using CorpusExplorer.Sdk.Action.Properties;
 using CorpusExplorer.Sdk.Addon;
+using CorpusExplorer.Sdk.Ecosystem.Model;
 using CorpusExplorer.Sdk.Model;
 using CorpusExplorer.Sdk.Utils.DataTableWriter.Abstract;
 
@@ -18,15 +22,43 @@ public void Execute(Selection selection, string[] args, AbstractTableWriter writ
       var dt = new DataTable();
       dt.Columns.Add(Resources.Tokens, typeof(string));
 
+      if (args[1].StartsWith("FILE:"))
+        dt = ExecuteFile(selection, args, dt);
+      else
+        dt = ExecuteRegex(selection, args, dt);
+      writer.WriteTable(selection.Displayname, dt);
+    }
+
+    private DataTable ExecuteFile(Selection selection, string[] args, DataTable dt)
+    {
+      var lines = File.ReadAllLines(args[1].Substring(5), Configuration.Encoding);
+      var values = new HashSet<string>(selection.GetLayers(args[0]).FirstOrDefault().Values);
+
+      foreach (var q in lines)
+        if (q.StartsWith("*"))
+          foreach (var c in values.Where(v => v.EndsWith(q.Substring(1))))
+            dt.Rows.Add(c);
+        else if (q.EndsWith("*"))
+          foreach (var c in values.Where(v => v.StartsWith(q.Substring(0, q.Length - 1))))
+            dt.Rows.Add(c);
+        else
+          if (values.Contains(q))
+          dt.Rows.Add(q);
+      
+      return dt;
+    }
+
+    private static DataTable ExecuteRegex(Selection selection, string[] args, DataTable dt)
+    {
       var regex = new Regex(args[1], RegexOptions.Compiled);
 
       dt.BeginLoadData();
       foreach (var v in selection.GetLayers(args[0]).FirstOrDefault().Values)
-        if(regex.IsMatch(v))
+        if (regex.IsMatch(v))
           dt.Rows.Add(v);
       dt.EndLoadData();
 
-      writer.WriteTable(selection.Displayname, dt);
+      return dt;
     }
   }
 }