git.plutz.net Git - confetti/blob - pages/therapy.sh

   1 #!/bin/zsh
   2
   3 # Copyright 2016 Paul Hänsch
   4 #
   5 # This file is part of Confetti.
   6 #
   7 # Confetti is free software: you can redistribute it and/or modify
   8 # it under the terms of the GNU Affero General Public License as published by
   9 # the Free Software Foundation, either version 3 of the License, or
  10 # (at your option) any later version.
  11 #
  12 # Confetti is distributed in the hope that it will be useful,
  13 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 # GNU Affero General Public License for more details.
  16 #
  17 # You should have received a copy of the GNU Affero General Public License
  18 # along with Confetti.  If not, see <http://www.gnu.org/licenses/>.
  19
  20 declare -A tpy
  21 declare -A mpx
  22
  23 BR='
  24 '
  25
  26 id="$_GET[id]"
  27
  28 tpyfile="$_DATA/therapies/$id"
  29 mpxfile="$_DATA/prescriptions/${id%.tpy}.mpx"
  30 client="$_DATA/vcard/${id%%.*}.vcf"
  31
  32 card_N="$(sed -nr 's:^(N)(;[^"\:]+|;"[^"]+")*\:(.*)$:\3:gp' "$client")"
  33 card_FN="$(sed -nr 's:^(FN)(;[^"\:]+|;"[^"]+")*\:(.*)$:\3:gp' "$client")"
  34 card_NICK="$(sed -nr 's:^(NICKNAME)(;[^"\:]+|;"[^"]+")*\:(.*)$:\3:gp' "$client")"
  35
  36 n=$(printf %s "$card_N" \
  37     | sed -rn 's:^([^;]*)(\;[^;]*)(\;[^;]*)?(\;[^;]*)?(\;[^;]*)?$:\4 \2 \3 \1 \5:gp' \
  38     | sed -r 's:,: :;s:\;: :g;s: +: :g;s:^ $::;'
  39    )
  40 client_name="${n:-${card_FN:-${card_NICK}}}"
  41
  42 mpx=()
  43 cat "$mpxfile" |while read -r line; do
  44   val="${line#*:}"
  45   mpx[${line%%:*}]="${val//\\n/$BR}"
  46 done
  47
  48 tpy=()
  49 cat "$tpyfile" |while read -r line; do
  50   val="${line#*:}"
  51   tpy[${line%%:*}]="${val//\\n/$BR}"
  52 done