X-Git-Url: https://git.plutz.net/?p=confetti;a=blobdiff_plain;f=cards%2Findex.cgi;fp=cards%2Findex.cgi;h=6f44168fa0914e239a086a05bf0b9ee26b4481a7;hp=0000000000000000000000000000000000000000;hb=1b5fe5ec8e6ceb580ada4e0ff4fe3955c2457ec0;hpb=11e258b8e6cf832c96b20648aa8c9ca0288c597f

diff --git a/cards/index.cgi b/cards/index.cgi
new file mode 100755
index 0000000..6f44168
--- /dev/null
+++ b/cards/index.cgi
@@ -0,0 +1,31 @@
+#!/bin/sh
+
+if [ "$_PATH" = "/cards/cards.css" ]; then
+  . $_EXEC/cgilite/file.sh
+  FILE $_EXEC/cards/cards.css
+  return 0
+fi
+
+. $_EXEC/pdiread.sh
+. $_EXEC/cards/l10n.sh
+. $_EXEC/cards/widgets.sh
+. $_EXEC/cards/list.sh
+
+unescape() { [ $# = 0 ] && sed -E 's;\\(.);\1;g' || printf %s "$*" |sed -E 's;\\(.);\1;g'; }
+upcase=' y;abcdefghijklmnopqrstuvwxyzäöüé;ABCDEFGHIJKLMNOPQRSTUVWXYZÄÖÜÉ;; '
+
+filter="$(GET f)"
+order="$(GET o)"
+edit="$(GET e)"
+[ "$order" ] || order=firstname
+
+{ w_filter_diag
+
+  printf '
+  [form class="newcard" action="/cards/new_card.sh" method="POST"
+    [button type="submit" %s]
+  ]' "$(l10n newcard)"
+
+  [ "$edit" ] && edit_card "$edit"
+  list_cards
+} | yield_page cards /cards/cards.css