POSIX sh: найти и заменить на функцию - PullRequest
Новая
       24

POSIX sh: найти и заменить на функцию

0 голосов
/ 09 мая 2018

В JavaScript вы можете сделать: 

someComplexProcessing = (wholeMatch, group1, group2, index, mystr)=> replacement...
mystr.replace(/some.* regex(with) multiple (capture groups)/g, someComplexProcessing)

например. 

const renderTemplate = (str, env)=> str.replace(/{{(.*?)}}/g, (_, name)=> env[name])
renderTemplate('{{salut}} {{name}}!', {salut: 'Hi', name: 'Leo'}) // "Hi Leo!"

Какой наилучший, совместимый с POSIX, универсальный вариант? 

- reusability # eg. a function taking regex, processingFunction, and input, etc - that I could but in my .shellrc/source lib.sh or similar and reuse
- multiline # eg. if "uppercase everything between {{ and }}", `a {{b\nc}}` -> `a B\nC`
- no escape gotchas # eg. it shouldn't break if input, replacement, or regex contains special characters
- POSIX compatible # eg. running it under `docker run --rm -it alpine sh`, etc
- using regex # eg. perl regex seems like the most prominent one, please note differences from it if other is used

meriting:
- no/less dependencies # eg. as portable as possible
- multiple capture groups
- performance
- security # related to no escape gotchas, eg. ok with untrusted input

Я нашел пару решений для bash и несколько совместимых решений для краевого случая, хотя ни одно из них не делает все это настолько близким к простоте, которую обеспечивает js '.replace. В конечном счете, я хочу программировать, не слишком задумываясь о деталях реализации / проблемах, и не вводя сотни МБ (в основном в альпийский контейнер, но также используя ubuntu / OSX), тем самым пытаясь создать библиотеку переносимых, совместимых с posix фрагменты, функции и шаблоны.

1 Ответ

0 голосов
/ 09 мая 2018

Неэффективное, несколько сбежавшее входное (предполагается, что нет \r) (но не экранированное входное выражение) решение, только с одной группой захвата (в середине). Хотя и переносимый (используется только tr и sed (и printf, -z проверка пустой строки). (Возможно, можно заменить части sed на что-то, обычно совместимое с регулярным выражением perl)

lib.sh: 

#!/usr/bin/env sh
multiline_substitute_with_fn () {
  sub_start="$1"; shift; fn_name="$1"; shift; sub_end="$1"; shift; left="$(cat)";
  # uppercase () { cat | tr 'a-z' 'A-Z'; }; echo 'Hello [there]!' | multiline_substitute_with_fn '\[' uppercase '\]'

  # make single-line, sanitize input against _SUB(START|END)_, a\ra {{echo "b\rb"}} c {{echo d}} e
  left="$(echo "$left" | tr '\n' '\r' | sed 's/_SUB/_ASUB/g')"

  while [ ! -z "$left" ]; do
    left="$(echo "$left" | sed "s/$sub_start/_SUBSTART_/")" # a\ra _SUBSTART_echo "b\rb"}} c {{echo d}} e
    printf '%s' "$(echo "$left" | sed 's/_SUBSTART_.*//' | sed 's/_ASUB/_SUB/g' | tr '\r' '\n')" # a\na

    lefttmp="$(echo "$left" | sed 's/.*_SUBSTART_//' | sed "s/$sub_end/_SUBEND_/")" # echo "b\rb"_SUBEND_ c {{echo d}} e
    if [ "$lefttmp" = "$left" ]; then left=''; break; fi
    left="$lefttmp"

    middle="$(echo "$left" | sed 's/_SUBEND_.*//' | tr '\r' '\n')" # echo "b\nb"
    [ ! -z "$middle" ] && printf '%s' "$(echo "$middle" | $fn_name | sed 's/_ASUB/_SUB/g')" # b\nb
    left="$(echo "$left" | sed 's/.*_SUBEND_//')" # c {{echo d}} e
  done
}

использование: 

cat file | multiline_substitute_with_fn 'start regex' processingFunction 'end regex'

например. Использование: 

#!/usr/bin/env sh
. ./lib.sh # load lib

uppercase () { cat | tr 'a-z' 'A-Z'; };
echo 'Hello [there]!' | multiline_substitute_with_fn '\[' uppercase '\]'
# -> Hello THERE!

eval_template () { # not "safe" in terms of eval
  # echo 'a\na {{echo "b\nb"}} c {{echo d}} e' | eval_template # -> 'a\na b\nb c d e'
  # hello=hi; echo '{{=$hello}} there' | eval_template # -> {{echo "$hello"}} there -> 'hi there'
  fn () {
    middle="$(cat)"
    case "$middle" in =*) middle="echo \"${middle#=}\"" ;; *);; esac # '=$a' -> 'echo "$a"'
    eval "$middle"
  }
  cat | multiline_substitute_with_fn '{{' fn '}}'
}

eval_template <<-EOF
a
a {{echo "b
b"}} c {{echo d}} e
EOF
# -> a
# a b
# b c d e'

echo '{{=$salut}} {{=$name}}!' > my.template
salut=Hi; name="Leo Name";
cat my.template | eval_template
# Hi Leo Name!
...