Recursively Ersatz auf eine Variable

Question

Diese assoziative Array Gegeben:

declare -A variables=(
    [prefix]='/usr' 
    [exec_prefix]='@prefix@' 
    [libdir]='@exec_prefix@/lib' 
) 

Ich möchte jedes Auftreten des Musters (wobei die Einfang zB @prefix@ mit prefix) @([^@/]+)@ ersetzen mit dem Wert, der der Erfassung zugeordnet ist (zB /usr für prefix) in allen seinen Werten, so dass die Substitution rekursiv durchgeführt wird, bis keine Vorkommen mehr auftreten. Die Schritte für jeden Schlüssel im Array wären:

1. Rufen Sie den zugehörigen Wert ab und führen Sie (2) darauf aus.
2. Überprüfen Sie, ob das Muster in der angegebenen Zeichenfolge übereinstimmt.
   • Wenn es keine gibt, geben Sie die angegebene Zeichenfolge zurück.
   • Wenn es ein Spiel:
     1. Perform (1) auf der Erfassung und das Ergebnis halten.
     2. Ersetzen Sie die Übereinstimmung durch das Ergebnis.
     3. Führen Sie (2) für die resultierende Zeichenfolge aus.
3. Tropfen der vorherige Wert zugeordnet auf den Schlüssel und Mitarbeiter, um es der letzte String zurückgegeben.

Was auch immer der Ansatz, das gewünschte Ergebnis ist:

prefix=/usr 
exec_prefix=/usr 
libdir=/usr/lib 

---

Zusätzliche Anforderungen:

• Selbstreferenzen (beispielsweise prefix=@prefix@) findet nicht statt.
• Verwenden Sie nach Möglichkeit nur Bash-Dateien.

---

Beispiel in Lua:

local variables={ 
    prefix="/usr", 
    exec_prefix="@prefix@", 
    includedir="@prefix@/include", 
    libdir="@exec_prefix@/lib", 
    random_one_to_show_off_fancy_recursion="@prefix@@libdir@@includedir@" 
} 

function replacer(variable) 
    return compute_value(variables[variable]) 
end 

function compute_value(s) 
    return s:gsub('@([^@/]+)@',replacer) 
end 

local variable, value = next(variables) 
while variable do 
    variables[variable] = compute_value(value) 

    print(string.format('%-39s\t%s', variable, variables[variable])) 

    variable, value = next(variables,variable) 
end 

Answer 1

Die (reine Bash) nachfolgenden Code geht davon aus, dass '@@' bleibt unverändert und '@ xyz @' unverändert gelassen wird, wenn 'xyz' ist keine Variable. Es versucht auch rekursive Variablendefinitionen zu erkennen, einschließlich indirekter (z. B. [a]=@b@ [b]=@c@ [c]=@a@).

# Regular expression for a string with an embedded expansion 
# For a string of the form 'u@v@w', where 'u' and 'v' do not contain '@': 
# u -> BASH_REMATCH[1] 
# v -> BASH_REMATCH[2] 
# w -> BASH_REMATCH[3] 
readonly EXPANSION_RX='^([^@]*)@([^@]*)@(.*)$' 

# First pass tries to expand all variables 
vars_to_expand=("${!variables[@]}") 

while ((${#vars_to_expand[*]} > 0)) ; do 
    old_vars_to_expand=("${vars_to_expand[@]}") 
    vars_to_expand=() 
    for var in "${old_vars_to_expand[@]}" ; do 
     val=${variables[$var]} 
     unexpanded=$val 
     newval= 

     while [[ $unexpanded =~ $EXPANSION_RX ]] ; do 
      newval+=${BASH_REMATCH[1]} 
      v=${BASH_REMATCH[2]} 
      unexpanded=${BASH_REMATCH[3]} 

      if [[ $v == "$var" ]] ; then 
       echo "ERROR - Expanding '@$var@' in '$var'" >&2 
       exit 1 
      elif [[ -z $v ]] ; then 
       # The empty string can not be a hash key (Duh!) 
       newval+=@$v@ 
      else 
       newval+=${variables[$v]-@$v@} 
      fi 
     done 

     newval+=$unexpanded 

     if [[ $newval != "$val" ]] ; then 
      # An expansion has occurred. 

      # Update the variable value 
      variables[$var]=$newval 

      # Further expansions may be possible, so add the variable to the 
      # list of variables to be expanded again 
      vars_to_expand+=("$var") 
     fi 
    done 
done