From 8d4fd1a7aa47a39375b2b6bcdab810b51b75ca01 Mon Sep 17 00:00:00 2001
From: Michael Boelen <michael.boelen@cisofy.com>
Date: Fri, 5 Jul 2019 18:35:45 +0200
Subject: [PATCH] Add Readonly() function

---
 include/functions | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

diff --git a/include/functions b/include/functions
index a0246d68..66b6abb4 100644
--- a/include/functions
+++ b/include/functions
@@ -74,6 +74,7 @@
 #    ParseTestValues            Parse a set of values
 #    PortIsListening            Check if machine is listening on specified protocol and port
 #    Progress                   Show progress on screen
+#    Readonly                   Mark a variable as read-only data
 #    Register                   Register a test (for logging and execution)
 #    RandomString               Show a random string
 #    RemoveColors               Reset all colors
@@ -2116,6 +2117,24 @@
     }
 
 
+    ################################################################################
+    # Name        : Readonly()
+    # Description : Mark a variable as read-only data
+    # Returns     : nothing
+    ################################################################################
+
+    Readonly() {
+        if [ $# -eq 1 ]; then
+            if type -t typeset; then
+                typeset -r $1
+            else
+                Debug "No typeset available to mark variable '$1' as read-only variable"
+            fi
+        else
+            ExitFatal "Expected 1 parameter, received none or multiple"
+        fi
+    }
+
 
     ################################################################################
     # Name        : Register()