git.plutz.net Git - confetti/blob - actions/generate_courselist.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 pdflatex="$(where pdflatex |head -n1 || echo false)"
  21 course="${_GET[course]}"
  22 fromdate="${_GET[fromdate]}"
  23 fromdate="$(date -d "$fromdate" +%s)" 2>/dev/null
  24 [ -z "$fromdate" ] && fromdate=$(date +%s)
  25
  26 . ${_EXEC}/pages/courses.sh
  27 . ${_EXEC}/pages/cards.sh
  28
  29 tex_clean() { #in dire need for improvement
  30   echo "$*" |tr -d '{&}\\'
  31 }
  32
  33
  34 list_attendee() {  #Parameter: Cardfile
  35   id="$1"
  36   cardfile="$_DATA/vcard/${id}"
  37
  38   declare -A values
  39
  40   if [ -r "$cardfile" ]; then
  41     vcf_parse "$cardfile"
  42
  43     n=$(printf %s "$values[N]" \
  44         | sed -rn 's:^([^;]*)(;[^;]*)(;[^;]*)?(;[^;]*)?(;[^;]*)?$:\4 \2 \3 \1 \5:gp' \
  45         | sed -r 's:,: :;s:;: :g;s: +: :g;s:^ $::;'
  46        )
  47     fullname="${n:-${values[FN]:-${values[NICKNAME]}}}"
  48
  49     tel=''
  50     for n in TEL TEL{0..10}; do if (echo "$values[$n]" |grep -Eq '[0-9]'); then
  51       [ -n "$tel" ] && tel="$tel\\newline $values[$n]" || tel="$values[$n]"
  52     fi; done
  53
  54     note=''
  55     for n in NOTE NOTE{0..10}; do if [ -n "$values[$n]" ]; then
  56       [ -n "$note" ] && note="$note\\newline $values[$n]" || note="$values[$n]"
  57     fi; done
  58     printf '%s & %s & %s & %s\n' "$fullname" "$values[BDAY]" "$tel" "$note" \
  59     | sed -r ':X;N;$!bX; s;\n;\\newline ;g'
  60   fi
  61 }
  62
  63 get_dates() {  #Parameter: Calendarfile
  64   calendarfile="$_DATA/ical/$course"
  65   unset key
  66
  67   declare -A tags
  68   declare -A values
  69   ics_parse "$calendarfile" |while read -r line; do
  70     declare -A tag
  71     case "$line" in
  72       value*) eval "$line";;
  73       tag*)   eval "$line";;
  74       key*)
  75         if [ -z "$key" ]; then
  76           eval "$line"
  77         else
  78           values[$key]="$(tex_clean "$value")"
  79           for t in ${(k)tag}; do
  80             tags[${key}_$t]="$tag[$t]"
  81           done
  82           eval "$line"
  83           if [ -n "$values[$key]" ]; then
  84             n=0
  85             while [ -n "$values[$key$n]" ]; do n=$(($n + 1)); done
  86             key=$key$n
  87           fi
  88           unset value
  89           unset tag
  90         fi
  91       ;;
  92     esac
  93   done
  94
  95   dtstart="$values[DTSTART]"
  96   [ -z "$dtstart" ] && dtstart=$(date +%Y%m%dT%H%M%S)
  97   echo "$dtstart" |case "$dtstart" in
  98     *Z)    sed -rn 's:^([0-9]{4})([0-9]{2})([0-9]{2})T([0-9]{2})([0-9]{2})([0-9]{2})Z$:\1-\2-\3 \4\:\5\:\6 UTC:p';;
  99     TZID*) sed -rn 's:^TZID=(.+)\:([0-9]{4})([0-9]{2})([0-9]{2})T([0-9]{2})([0-9]{2})([0-9]{2})$:TZ="\1" \2-\3-\4 \5\:\6\:\7:p';;
 100     *)     sed -rn 's:^([0-9]{4})([0-9]{2})([0-9]{2})T([0-9]{2})([0-9]{2})([0-9]{2})$:\1-\2-\3 \4\:\5\:\6:p';;
 101   esac |read dts_date
 102   rrule="$values[RRULE]"
 103   rr_int="$(echo $rrule |sed -rn 's:^.*INTERVAL=([0-9]+)(;.*)?$:\1:p')"
 104   rr_freq="$(echo $rrule |sed -rn 's:^.*FREQ=(YEARLY|MONTHLY|WEEKLY|DAILY)(;.*)?$:\1:p')"
 105   case "$rr_freq" in
 106     YEARLY) rec="$rr_int year";;
 107     MONTHLY) rec="$rr_int month";;
 108     DAILY) rec="$rr_int day";;
 109     *) rec="$rr_int week";;
 110   esac
 111
 112   next_date="$dts_date"
 113   n=10
 114   while [ $n -gt 0 ]; do
 115     if [ "$(date -d "$next_date" +%s)" -gt "$(date +%s)" ]; then
 116       dtlist="$dtlist & $(date -d "$next_date" +"%d. %b.")"
 117       n=$(($n - 1))
 118     fi
 119     next_date="$(date -d "$next_date + $rec" +%Y-%m-%d)"
 120   done
 121
 122   echo "$dtlist"
 123 }
 124
 125 if [ -r "${_DATA}/ical/${course}" ]; then
 126   . ${_EXEC}/templates/course_print.sh >"${_DATA}/temp/courselist_${course}.tex"
 127   [ -e "${_DATA}/temp/courselist_${course}.pdf" ] && rm "${_DATA}/temp/courselist_${course}.pdf"
 128   "$pdflatex" -halt-on-error -output-directory "${_DATA}/temp/" "${_DATA}/temp/courselist_${course}.tex" |debug >/dev/null
 129   "$pdflatex" -halt-on-error -output-directory "${_DATA}/temp/" "${_DATA}/temp/courselist_${course}.tex" |debug >/dev/null
 130 fi
 131 if [ -r "${_DATA}/temp/courselist_${course}.pdf" ]; then
 132   echo 'Content-Type: application/x-pdf\n'
 133   cat "${_DATA}/temp/courselist_${course}.pdf"
 134 fi