Improve overview and experiment naming

[khatus.git] / x2 / src / awk / exe / actuate_device_add_to_automount.awk

diff --git a/x2/src/awk/exe/actuate_device_add_to_automount.awk b/x2/src/awk/exe/actuate_device_add_to_automount.awk
new file mode 100644 (file)
index 0000000..3683370
--- /dev/null
+++ b/x2/src/awk/exe/actuate_device_add_to_automount.awk
@@ -0,0 +1,48 @@
+BEGIN {
+    # Typically some file manager (thunar, pcmanfm, etc.), but can be whatever.
+    Execute_On_Mount = Execute_On_Mount ? Execute_On_Mount : ""
+}
+
+{
+  delete msg
+  msg_parse(msg, $0)
+}
+
+msg["node"]   == Node && \
+msg["module"] == "khatus_sensor_devices" && \
+msg["type"]   == "data" && \
+msg["key"]    == "add" && \
+msg["val"]    ~  /[0-9]$/ {
+    mount_device(msg["val"])
+}
+
+function mount_device(path,    cmd, line, lines, line_count, status, i,
+                               path_dev, path_mnt) {
+    cmd="udisksctl mount --block-device " path " --no-user-interaction; echo $?"
+    while(cmd | getline line) {
+        lines[++line_count] = line
+    }
+    close(cmd)
+    status = lines[line_count]
+    line_count--
+    if (status == 0) {
+        for (i=1; i<=line_count; i++) {
+            line = lines[i]
+            if (line ~ /^Mounted /) {
+                split(line, parts, " +")
+                path_dev=parts[2]
+                path_mnt=line
+                sub("^Mounted " path_dev " at ", "", path_mnt)
+                sub("\.$", "", path_mnt)
+                msg_out_alert_low("successfully-mounted", path_dev " to " path_mnt)
+                if (Execute_On_Mount) {
+                    system(Execute_On_Mount " '" path_mnt "'")
+                }
+            } else {
+                msg_out_alert_hi("unexpected-success-line", line)
+            }
+        }
+    } else {
+        msg_out_alert_hi("failed-to-mount-device", path)
+    }
+}