# You should have received a copy of the GNU Affero General Public License
# along with shcgi. If not, see <http://www.gnu.org/licenses/>.
+BR='
+'
+
data_dirs(){
# set up directories for object storage
validate(){
# print value if value matches regex; otherwise print default
value="$1"
- regex="$(printf %s\\n "$2" \
- | sed -r 's;(^|[^\\]+)((\\\\)+)/;\1\2\\/;g; s;(^|[^\\])/;\1\\/;g; s;(^|[^\\]+)((\\\\)+)/;\1\2\\/;g; s;(^|[^\\])/;\1\\/;g;'
- )" # ^^ escape only unescaped slash characters for later insertion
+ regex="$(printf %s\\n "$2" | sed -r ':X;s;(^|[^\\])((\\\\)*)/;\1\2\\/;g;tX')"
+ # ^^ escape only unescaped slash characters for later insertion
default="$3"
printf %s\\n "${value}" \
- | sed -rn "2q; /^(${regex})\$/{p;q}; a${default}"
+ | sed -rn "2q; /^(${regex})\$/{p;q}; a${default}
+ "
}
invalidate(){
# print default if value matches regex; otherwise print value
value="$1"
- regex="$(printf %s\\n "$2" \
- | sed -r 's;(^|[^\\]+)((\\\\)+)/;\1\2\\/;g; s;(^|[^\\])/;\1\\/;g; s;(^|[^\\]+)((\\\\)+)/;\1\2\\/;g; s;(^|[^\\])/;\1\\/;g;'
- )" # ^^ escape only unescaped slash characters for later insertion
+ regex="$(printf %s\\n "$2" | sed -r ':X;s;(^|[^\\])((\\\\)*)/;\1\2\\/;g;tX')"
+ # ^^ escape only unescaped slash characters for later insertion
default="$3"
printf %s\\n "${value}" \
- | sed -rn "2q; /^(${regex})\$/{bd}; p;q; :d;a${default}"
+ | sed -rn "2q; /^(${regex})\$/{bX}; p;q; :X;a${default}
+ "
}
declare -A item_name