Redesign component interfaces

[khatus.git] / bin / khatus_parse_fan_file

diff --git a/bin/khatus_parse_fan_file b/bin/khatus_parse_fan_file
new file mode 100755 (executable)
index 0000000..120e150
--- /dev/null
+++ b/bin/khatus_parse_fan_file
@@ -0,0 +1,13 @@
+#! /usr/bin/awk -f
+
+BEGIN {
+    OFS = msg_fs ? msg_fs : "|"
+    Kfs = key_fs ? key_fs : ":"
+}
+
+{
+    key = $1
+    sub(":$", "", key)
+    val = $2
+    print(key, val)
+}