Initial commit.

bits/sed-parser/sed-parser-simplified.sh

@@ -0,0 +1,185 @@
+#!/bin/bash
+
+# Notes:
+#  Cannot use any of the deliminators in the key name
+# Todo:
+#  Lines beginning with #; within " .. " blocks on new lines will be stripped.
+#  Allow merging of multiple sections with the same name
+#  Change case of variables:  \L \U \E
+#  export SECLIST="SECTIONS"
+#  Allow delims to be specified in a var - don't assume =:
+
+export VARPREFIX="INI_"
+export SECPREFIX="SECTION_"
+export SECCNAMEKEY="%cannonical name%"
+export TOPSEC="global"
+initest() {
+  echo "declare -A ${VARPREFIX}${SECPREFIX}${TOPSEC}=("
+  echo "[${SECCNAMEKEY}]=\"${TOPSEC}\""
+  cat $1 | sed -r "{
+    # Ignore blank lines and comments
+    /^[[:blank:]]*(#|;|$)/ d
+    # Handle [section] lines
+    /^[[:blank:]]*\[.*\][[:blank:]]*$/ {
+      i )
+      s/(^[[:blank:]]*\[[[:blank:]]*|[[:blank:]]*\][[:blank:]]*$)//g
+      h
+      s/([[:blank:]]+|[^[:alnum:]])/_/g
+      s/(.*)/declare -A ${VARPREFIX}${SECPREFIX}\1=(/p
+      g
+      s/(.*)/  \[${SECCNAMEKEY}\]=\"\1\"/
+      b
+    }
+# FIXME: This needs to pick up escaped =:s
+    /^([[:blank:]]*[^[:blank:]]+[[:blank:]]*)+[=:].*$/ {
+      # Escape any ] characters within key name - bash <4.3 can't handle them
+      s/^(([^\]]*)\[+)*([=:].*)$/\2\\\\\]\3/
+      # Escape any ' characters within the key name
+      s/^[[:blank:]]*/  \[\'/
+      s/[[:blank:]]*[=:][[:blank:]]*(.*)$/\']=\1/
+########s/([\"]+)/\\\\\1/g
+#s/^(\[')([']+)('\].*)/\1X\3/g
+#      s/[[:blank:]]*[=:][[:blank:]]*[\"\'\`]?(.*)$/\]=\'\1/
+#      s/^[[:blank:]]*([[:print:]]+)[[:blank:]]*[=:][[:blank:]]*/\[\1\]=/
+      b
+    }
+    q
+  }"
+  echo ")"
+}
+
+; initest
+
+# Join lines ending in \ :
+sed ':x; /\\$/ { N; s/\\\n//; tx }' textfile
+
+echo 'ao ao ao | ao' | sed 'h; s/.*|/|/; x; s/|.*//; s/o/x/g; G; s/\n//'
+
+
+ # if a line ends with a backslash, append the next line to it
+ sed -e :a -e '/\\$/N; s/\\\n//; ta'
+
+
+# 4.0 needs the backslash escaped AND the ] when referencing the element
+06:09 <Tadgy> 40# declare -A FOOF=( ['test\]test']="test" ) ; declare -p FOOF ; printf "<%s>" "${FOOF['test\]test']}"
+06:09 <shbot> declare -A FOOF='([test\\\]test]="test" )'
+06:09 <shbot> <>
+06:11 <Tadgy> 40# declare -A FOOF=( ['test\]test']="test" ) ; declare -p FOOF ; printf "<%s>" "${FOOF['test\\\]test']}"
+06:11 <shbot> declare -A FOOF='([test\\\]test]="test" )'
+06:11 <shbot> <test>
+
+# 4.1, 4.2, 4.3 are consistent with this syntax
+06:06 <Tadgy> 41# declare -A FOOF=( ['test\]test']="test" ) ; declare -p FOOF ; printf "<%s>" "${FOOF['test\]test']}"
+06:06 <shbot> declare -A FOOF='(["test\\]test"]="test" )'
+06:06 <shbot> <test>
+06:08 <Tadgy> 42# declare -A FOOF=( ['test\]test']="test" ) ; declare -p FOOF ; printf "<%s>" "${FOOF['test\]test']}"
+06:08 <shbot> declare -A FOOF='(["test\\]test"]="test" )'
+06:08 <shbot> <test>
+06:09 <Tadgy> 43# declare -A FOOF=( ['test\]test']="test" ) ; declare -p FOOF ; printf "<%s>" "${FOOF['test\]test']}"
+06:09 <shbot> declare -A FOOF='(["test\\]test"]="test" )'
+06:09 <shbot> <test>
+#Works without escapes in 4.3:
+06:08 <Tadgy> 43# declare -A FOOF=( ['test]test']="test" ) ; declare -p FOOF ; printf "<%s>" "${FOOF['test]test']}"
+06:08 <shbot> declare -A FOOF='(["test]test"]="test" )'
+06:08 <shbot> <test>
+
+
+
+       [       [        invalid-section###3   ] $$    ]                    $
+[        invalid-section###3   ] $$X
+# Squash multiple blanks and invalid chars to single _ --  s/[^[:alnum:]]+/_/g
+_invalid_section_3_
+# Blanks and invalid chars replaced with _ no sqash --  s/[^[:alnum:]]/_/g
+_________invalid_section___3_______
+# Squash multiple blanks to single _ and replace invalid chars with _ --  s/([[:blank:]]+|[^[:alnum:]])/_/g
+__invalid_section___3_____
+
+
+#s/[[:blank:]]*\][[:blank:]]*[^[:alnum:]]+/_/g
+#    s/^[[:blank:]]*\[[[:blank:]]*/declare -A ${VAR}_/
+#    s/[[:blank:]]*\][[:blank:]]*$/=(/
+
+#    s/(^[[:blank:]]*\[[[:blank:]]*)|([[:blank:]]*\][[:blank:]]*$)/X/g
+#    s/[[:blank:]]+/ /g
+#    s/^[[:blank:]]*\[[[:blank:]]*([[:graph:]]*)[[:blank:]]*\][[:blank:]]*$/[\1]/
+l 120
+#    s/^[[:blank:]]*(\[|\]) [[:blank:]]*$/\1/g
+#    s/([^[:alnum:]]|_+)/_/g
+  }
+}"
+
+    s/[[:blank:]]*(\[|\])[[:blank:]]*/\1/g
+    s/([^[:alnum:]]|_+)/_/g
+
+
+label regex jump back if s was done
+
+
+#    s/\[_*([^]]*)/declare -A ${VAR}_\1=(/
+#    s/\[_*(.*)_*\].*/declare -A ${VAR}_\1=(/
+#    s/[[:blank:]]*\[(.*)\].*/declare -A ${VAR}_\1=(/
+  }
+#  /^(\)|declare -A)/ ! {
+#    s/^[[:blank:]]*/\[/
+#    s/[[:blank:]]*=[[:blank:]]*/\]=\"/
+#    s/$/\"/g
+#  }
+}"
+
+
+# Variables:
+#  INI_ENV_PREFIX="INI_"
+#  INI_GLOBAL_??="GLOBAL"
+#  INI_SECTION_??="SECTION"
+# Options:
+#  
+
+exit
+
+  /^[[:blank:]]*\[.*\]/ {
+    s/[[:blank:]]*\[/)\n/g
+    # s/(.*)\]/declare -A ${VAR}_\1=(/g
+  }
+
+
+
+  -e "/^[[:blank:]]*\[.*\]/ s/[[:blank:]]*\[/)\n/g; s/(.*)\]/declare -A ${VAR}_\1=(/g"
+
+  -e 's/^[[:blank:]]*\</[
+
+
+sed -r \
+  -e '/^[[:blank:]]*(#|;|$)/ d' \
+  -e "1 ideclare -A ${VAR}_${TOP}=(" \
+  -e "/^[[:blank:]]*\[.*\]/ s/[[:blank:]]*\[/)\n/g; s/(.*)\]/declare -A ${VAR}_\1=(/g"
+
+  -e 's/^[[:blank:]]*\</[
+
+
+
+  -e "1 s/^/declare -A ${VAR}_${TOP}=(\n/" \
+
+ # if a line ends with a backslash, append the next line to it
+ sed -e :a -e '/\\$/N; s/\\\n//; ta'
+
+ # print the line immediately before a regexp, but not the line
+ # containing the regexp
+ sed -n '/regexp/{g;1!p;};h'
+
+ # print the line immediately after a regexp, but not the line
+ # containing the regexp
+ sed -n '/regexp/{n;p;}'
+
+ # print section of file from regular expression to end of file
+ sed -n '/regexp/,$p'
+
+ # print section of file between two regular expressions (inclusive)
+ sed -n '/Iowa/,/Montana/p'             # case sensitive
+
+
+# Option (-r) to make all variables read only.
+# Option (-x) to export all variables.
+
+# Option parsing.
+# http://mywiki.wooledge.org/BashFAQ/035
+