]> git.plutz.net Git - confetti/blob - cards/new_card.sh
Merge commit 'c16fa9412ca9760759fa0357278c3bf8e065959d'
[confetti] / cards / new_card.sh
1 #!/bin/sh
2
3 # Copyright 2014, 2019 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 filter="$(REF f)"
21 order="$(REF o)"
22
23 uid="$(timeid)$(randomid)"  # 32 Octets UID, starting with timestamp
24 card="${uid}.vcf"
25
26 vcf_escape(){
27   for each in "$@"; do
28     printf %s\\n "$each" \
29     | sed -E ':X;$!{N;bX}; s;\r\n;\n;g; s;([;,\\]);\\\1;g; s;\n;\\n;g;'
30   done \
31   | sed -E ':X;$!{N;bX}; s;\n;\;;g'
32 }
33
34 IFS='|' read -r date fn ln bday bmonth byear tel tcell junk1 email junk2 note <<-EOF
35         $(POST seed |tr \\t \|)
36         EOF
37
38 [ ${#byear} = 1 ] && byear="200$byear"
39 [ ${#byear} = 2 ] && byear="20$byear"
40 [ ${#bmonth} = 1 ] && bmonth="0$bmonth"
41 [ ${#bday} = 1 ] && bday="0$bday"
42
43 mn=""
44 case $fn in
45   *\ *)
46     mn="${fn#* }"
47     fn="${fn%% *}"
48     ;;
49 esac
50
51 mkdir -p "${_DATA}/lock/vcard/"
52 lockdir="${_DATA}/lock/vcard/${card}/"
53 lockfile=${lockdir}/${SESSION_ID}
54
55 if mkdir "$lockdir"; then
56   cat >"$lockfile" <<-EOF
57         BEGIN:VCARD
58         VERSION:4.0
59         N:$(vcf_escape "$ln" "$fn" "$mn" "" "")
60         FN:$(vcf_escape "${fn}${mn:+ }${mn} ${ln}")
61         BDAY:$(parse_date "${byear}-${bmonth}-${bday}")
62         TEL:$(vcf_escape "$tel")
63         TEL;TYPE=CELL:$(vcf_escape "$tcell")
64         EMAIL:$(vcf_escape "$email")
65         X-ZACK-JOINDATE:$(parse_date "$date")
66         ADR:
67         NOTE:$(vcf_escape "$note")
68         UID:${uid}
69         END:VCARD
70         EOF
71   REDIRECT "${_BASE}/cards/?o=${order}&f=${filter}&e=${card}"
72 else
73   SET_COOKIE session message="EDITLOCK"
74   REDIRECT "${_BASE}/cards/?o=${order}&f=${filter}"
75 fi