aboutsummaryrefslogtreecommitdiffstats
path: root/awklib/eg/lib/shellquote.awk
diff options
context:
space:
mode:
authorArnold D. Robbins <arnold@skeeve.com>2014-10-01 21:44:09 +0300
committerArnold D. Robbins <arnold@skeeve.com>2014-10-01 21:44:09 +0300
commit7773dc0b5d21792fb55bc52f992c7a5b7239140f (patch)
treeb9cd9a4d260ac1d019b792eef21dc0eb3b012ee9 /awklib/eg/lib/shellquote.awk
parent6bdad20131c002ae3d293dcfc98792a197a782dd (diff)
parent63cf4c66e97a92f3e553707ecd0bc278a7cc4563 (diff)
downloadegawk-7773dc0b5d21792fb55bc52f992c7a5b7239140f.tar.gz
egawk-7773dc0b5d21792fb55bc52f992c7a5b7239140f.tar.bz2
egawk-7773dc0b5d21792fb55bc52f992c7a5b7239140f.zip
Merge branch 'gawk-4.1-stable'
Diffstat (limited to 'awklib/eg/lib/shellquote.awk')
-rw-r--r--awklib/eg/lib/shellquote.awk22
1 files changed, 22 insertions, 0 deletions
diff --git a/awklib/eg/lib/shellquote.awk b/awklib/eg/lib/shellquote.awk
new file mode 100644
index 00000000..cd943dc7
--- /dev/null
+++ b/awklib/eg/lib/shellquote.awk
@@ -0,0 +1,22 @@
+# shell_quote --- quote an argument for passing to the shell
+#
+# Michael Brennan
+# brennan@madronabluff.com
+# September 2014
+
+function shell_quote(s, # parameter
+ SINGLE, QSINGLE, i, X, n, ret) # locals
+{
+ if (s == "")
+ return "\"\""
+
+ SINGLE = "\x27" # single quote
+ QSINGLE = "\"\x27\""
+ n = split(s, X, SINGLE)
+
+ ret = SINGLE X[1] SINGLE
+ for (i = 2; i <= n; i++)
+ ret = ret QSINGLE SINGLE X[i] SINGLE
+
+ return ret
+}