git.plutz.net Git - confetti/blob - 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 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
  42 mkdir -p "${_DATA}/lock/vcard/"
  43 lockdir="${_DATA}/lock/vcard/${card}/"
  44 lockfile=${lockdir}/${SESSION_ID}
  45
  46 if mkdir "$lockdir"; then
  47   cat >"$lockfile" <<-EOF
  48         BEGIN:VCARD
  49         VERSION:4.0
  50         N:$(vcf_escape "$ln");$(vcf_escape "$fn");;;
  51         FN:$(vcf_escape "$fn $ln")
  52         BDAY:$(vcf_escape "${byear}-${bmonth}-01")
  53         TEL:$(vcf_escape "$tel")
  54         TEL;TYPE=CELL:$(vcf_escape "$tcell")
  55         EMAIL:$(vcf_escape "$email")
  56         X-ZACK-JOINDATE:$(vcf_escape "$date")
  57         ADR:
  58         NOTE:$(vcf_escape "$note")
  59         UID:${uid}
  60         END:VCARD
  61         EOF
  62   REDIRECT "/cards/?o=${order}&f=${filter}&e=${card}"
  63 else
  64   SET_COOKIE session message="EDITLOCK"
  65   REDIRECT "/cards/?o=${order}&f=${filter}"
  66 fi