:       '(c) Copyright  Empress Software Inc.   1983, 2000'

if test "$EMPRESSPATH" = ""
then
	echo "EMPRESSPATH not set"
	exit 1

elif test ! -d $EMPRESSPATH
then
	echo "invalid EMPRESSPATH"
	exit 1
fi


SILENT=

. $EMPRESSPATH/config/options

cnvt_euc2sjis_file ()
{
	EUC_FILE="$1"
	SJIS_FILE="$2"
	NKF="$EMPRESSPATH/common/gnu/nkf"

	DO_CNVT=
	file ${EUC_FILE} | grep text > $MSFILENULL 2>&1 && DO_CNVT=true
	file ${EUC_FILE} | grep "SoftQuad file" > $MSFILENULL 2>&1 && DO_CNVT=true
	# skip export files 
	file ${EUC_FILE} | grep "ASCII text with control characters" $MSFILENULL 2>&1 && DO_CNVT=false
	if test "$DO_CNVT" = "true"
	then
		# convert only text files
		test "$SILENT" = "true" || echo ${EUC_FILE}:
		$NKF -E -s < ${EUC_FILE} > ${SJIS_FILE}
	else
		test "$SILENT" = "true" || echo "${EUC_FILE}:       skiped"
	fi
}

convert_euc2sjis()
{
	USAGE="*** Usage ***  convert_euc2sjis -f[-d] [-s] euc sjis"

	SILENT=

	while :
	do
		case $1 in
		  -s)
			SILENT=true
			shift
			;;
		  -d)
			TYPE_CNVT=dir
			shift
			;;
		  -f)
			TYPE_CNVT=file
			shift
			;;
		  "")
			echo "$USAGE" 
			exit 1
			;;
		  *)	
			case "$#" in
			  2)	break 
				;;
			  *)	echo "$USAGE"
				exit 1
				;;
			esac
		esac
	done

	case "$TYPE_CNVT" in
	  dir)
		EUC_DIR="$1"
		SJIS_DIR="$2"

		if (test ! -d $EUC_DIR)
		then
			echo "ERROR: '$EUC_DIR' dir doesn't exist. Exit..."
			exit 1
		elif (test ! -d $SJIS_DIR)
		then
			echo "ERROR: '$SJIS_DIR' dir doesn't exist. Exit..."
			exit 1
		else
			test "$SILENT" = "true" || \
				echo "*** Start euc2sjis conversion ***"
		fi

		cd  $EUC_DIR 

		LIST=`find . -type f -name "*" -print`
		for I in $LIST
		do
			cnvt_euc2sjis_file ${EUC_DIR}/${I} ${SJIS_DIR}/${I}
		done
		;;
	  file)
		EUC_FILE="$1"
		SJIS_FILE="$2"

		cnvt_euc2sjis_file ${EUC_FILE} ${SJIS_FILE}
		;;
	  *)
		echo "ERROR: Wrong arguments for convert_euc2sjis. Exit..."
		exit 1
		;;
	esac
}
