#!/usr/bin/csh -f
#
# Copyright (c) 1994 by Sun Microsystems, Inc.
#
#ident	"@(#)wansungtojohap	1.1 94/10/30 SMI"
#
set pgm=$0
set pgm=$pgm:t
if ( X"$pgm" == X"nbtocomp" ) then
	set _fcode_=ko_KR.nbyte
	set _tcode_=ko_KR.euc
else if ( X"$pgm" == X"comptonb" ) then
	set _fcode_=ko_KR.euc
	set _tcode_=ko_KR.nbyte
else if ( X"$pgm" == X"comptopack" ) then
	set _fcode_=ko_KR.euc
	set _tcode_=ko_KR.johap
else if ( X"$pgm" == X"packtocomp" ) then
	set _fcode_=ko_KR.johap
	set _tcode_=ko_KR.euc
else if ( X"$pgm" == X"wansungtojohap" ) then
	set _fcode_=ko_KR.euc
	set _tcode_=ko_KR.johap92
else if ( X"$pgm" == X"johaptowansung" ) then
	set _fcode_=ko_KR.johap92
	set _tcode_=ko_KR.euc
else
	echo "Conversion failed because of unrecognizable command name '$pgm'"
	exit
endif
if ( X"$*" == X"" ) then
	/usr/bin/iconv -f $_fcode_ -t $_tcode_
else
	foreach i ( $* )
		if ( -f $i ) then
			/usr/bin/iconv -f $_fcode_ -t $_tcode_ $i
		else
			echo "${pgm}: can't open file $i"
		endif
	end
endif
