git.plutz.net Git - lobster/blob - cards/index.cgi

   1 #!/bin/sh
   2
   3 . $_EXEC/pdiread.sh
   4 . $_EXEC/cards/l10n.sh
   5 . $_EXEC/cards/widgets.sh
   6 . $_EXEC/cards/list.sh
   7
   8 upcase=' y;abcdefghijklmnopqrstuvwxyzäöüé;ABCDEFGHIJKLMNOPQRSTUVWXYZÄÖÜÉ;; '
   9
  10 filter="$(GET f)"
  11 order="$(GET o)"
  12 edit="$(GET e |PATH)"
  13
  14 [ "$order" ] || order=lastname
  15 edit="${edit##*/}"
  16
  17 list_hi_companies(){
  18   sed -rn 's;^X-HEALTH-INSURANCE:([^\;]+)\;.*$;\1;p' ${_DATA}/vcard/*vcf \
  19   | sort -u
  20 }
  21
  22 { w_filter_diag
  23   printf '
  24   [form class="newcard" action="/cards/new_card.sh" method="POST"
  25     [button type="submit" %s]
  26     [a href="#top" . %s]
  27   ]' "$(l10n newcard)" "$(l10n page_top)"
  28   [ "$edit" ] && edit_card "$edit"
  29   list_cards
  30 } | yield_page cards #/cards/cards.css