#!/bin/sh
# 愛
mydir=`dirname $0`
myname=`basename $0`
. $mydir/cgilib2-sh
#. $mydir/cgiauthlib-sh
. $mydir/cards-init.sh
. $mydir/cards-cgi.sh


#while getopts i: f; do
#  case "$f" in
#    i)	cards_initdb "$OPTARG" ;;		# and exit
#  esac
#done
cards_update
shift $((OPTIND-1))
case "$1" in
  view/*)	view=${1#view/} ;;
  cat/*)	cards_cat ${1#cat/} ;;
#  #(1)
#  login)	loginform; echo '</body></html>'; exit
esac
#cgiauth
#rc=$?
#if [ 0 -eq $rc ]; then
  
cards_entry
cards_putform $view
cards_list
#else
#  htmlhead "Cards DB"
#  loginlink                     # loginフォームへのリンク
#  
#fi
cards_footer