#!/bin/sh

if [ $# -ne 1 ]; then
    echo "Usage: ucs2mb <codeset>"
    exit 1
fi

cmd_path=`dirname $0`
codeset=$1
unset LANG

dropdb UNICODE_DB > /dev/null 2>&1
createdb -E UNICODE UNICODE_DB > /dev/null 2>&1
( perl "${cmd_path}/psql_gen_unicode.pl" | psql -f - UNICODE_DB
) 1> /dev/null

( echo "SET CLIENT_ENCODING TO '${codeset}';" ; \
  echo "SELECT codepoint, to_hex(ascii(character)) FROM charlist WHERE codepoint ~ '^<U00[0-7][0-9A-F]>$' and length(character) > 0;" ; \
  echo "SELECT * FROM charlist WHERE codepoint !~ '^<U00[0-7][0-9A-F]>$' and length(character) > 0;" \
) | psql -f - UNICODE_DB | perl ${cmd_path}/psql_select2dump.pl

exit 0
