#!/bin/sh

if [ $# -ne 1 ]; then
    echo "Usage: mb2ucs <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_${codeset}.pl" | psql -f - UNICODE_DB
) 1> /dev/null

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

exit 0
