]> git.plutz.net Git - confetti/blob - actions/update_card.sh
reduce number of pre filled text fields, show more prescription info in therapy
[confetti] / actions / update_card.sh
1 #!/bin/zsh
2
3 # Copyright 2014, 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 cgi_post
21 cgi_refdata
22
23 filter="&filter=${_REF[filter]}"
24 filtertype="&filtertype=${_REF[filtertype]}"
25 order="&order=${_REF[order]}"
26
27 card="${_POST[card]}"
28 tempfile="$_DATA/temp/$card"
29 cardfile="$_DATA/vcard/$card"
30 attfile="$_DATA/mappings/attendance"
31
32 _POST[0N]="${_POST[0N]//;/,}"
33 _POST[1N]="${_POST[1N]//;/,}"
34 _POST[2N]="${_POST[2N]//;/,}"
35 _POST[3N]="${_POST[3N]//;/,}"
36 _POST[4N]="${_POST[4N]//;/,}"
37
38 [ "$_POST[hi_select]" = "list" ] && hi_company="${_POST[hi_company]}" || hi_company="${_POST[hi_other]}"
39 [ -n "${_POST[hi_company]}${_POST[hi_number]}${_POST[hi_status]}" ] \
40 && _POST[X-HEALTH-INSURANCE]="${hi_company//;/,};${_POST[hi_number]//;/,};${_POST[hi_status]//;/,}"
41
42 sed -r 's;$;\r;' >"$tempfile" <<EOF
43 BEGIN:VCARD
44 VERSION:4.0
45 N:${_POST[0N]};${_POST[1N]};${_POST[2N]};${_POST[3N]};${_POST[4N]}
46 UID:${_POST[UID]}
47 $(
48 for field in $VCF_FIELDS; do
49   for key in $field $field{0..100}; do
50     [ -z "${_POST[$key]+x}" ] && break
51     value="$(printf %s "$_POST[$key]" |sed -r ':a;N;$!ba;s:\n:\\n:g;s:\r:\\r:g')"
52     [ "${key%%[0-9]*}" = TEL ] && tag="TYPE=${_POST[phonetype${key#TEL}]}" || tag=''
53     [ -n "$value" ] && printf '%s:%s\n' "${field}${tag:+;$tag}" "$value"
54   done
55 done
56 [ "${_POST[action]}" = addfield ] && printf '%s:\n' "${_POST[newfield]}"
57 )
58 END:VCARD
59 EOF
60
61 case "${_POST[action]}" in
62   addfield)
63     redirect "?p=cards${filter}${filtertype}${order}&edit=$card"
64     ;;
65   update)
66     attendance=()
67     for att in attendance attendance{0..100}; do
68       [ -n "${_POST[$att]}" ] && attendance+=("${_POST[$att]}")
69     done
70     sed -rn 's:^(.+)'$card'$:\1:p' "$attfile" |while read course; do
71       touch "$_DATA/ical/$course"
72     done
73     sed -i -r '/^(.+)\t'$card'$/d' "$attfile"
74     for each in $attendance; do
75       echo "$each\t$card"
76     done >>"$attfile"
77     sed -rn 's:^(.+)'$card'$:\1:p' "$attfile" |while read course; do
78       touch "$_DATA/ical/$course"
79     done
80
81     mv "$tempfile" "$cardfile"
82     redirect "?p=cards${filter}${filtertype}${order}#$card"
83     ;;
84   cancel)
85     rm "$tempfile"
86     [ -f "$cardfile" ] \
87     && redirect "?p=cards${filter}${filtertype}${order}#$card" \
88     || redirect "?p=cards${filter}${filtertype}${order}"
89     ;;
90   delete)
91     rm "$tempfile" "$cardfile"
92     redirect "?p=cards${filter}${filtertype}${order}"
93     ;;
94 esac