X-Git-Url: https://git.xandkar.net/?a=blobdiff_plain;f=x2%2Fsrc%2Fawk%2Flib%2Fstr.awk;fp=x2%2Fsrc%2Fawk%2Flib%2Fstr.awk;h=422ff66af32fd02392f7b315b05ddfdcc79a39c3;hb=499c58a269a00e031302938b5a8f006f23aae451;hp=0000000000000000000000000000000000000000;hpb=4c703fadbdc17d1753d16841582636598f862416;p=khatus.git

diff --git a/x2/src/awk/lib/str.awk b/x2/src/awk/lib/str.awk
new file mode 100644
index 0000000..422ff66
--- /dev/null
+++ b/x2/src/awk/lib/str.awk
@@ -0,0 +1,23 @@
+function str_join(array, from, to, sep_given,    str, sep, i) {
+    str = ""
+    sep = ""
+    for (i=from; i<=to; i++) {
+        str = str sep array[i]
+        sep = sep_given
+    }
+    return str
+}
+
+function str_tail(head, full,    tail, len_tail, len_head, len_full) {
+    len_full = length(full)
+    len_head = length(head)
+    len_tail = len_full - len_head
+    tail = substr(full, len_head + 1, len_tail)
+    return tail
+}
+
+function str_strip(s) {
+    sub("^ *", "", s)
+    sub(" *$", "", s)
+    return s
+}