
echo "yes" > tmp@
texmfcnffile=`kpsexpand -w cnf texmf.cnf`
TEXMFCNF=`
gawk  '
{texmfcnfloc=index(texmfcnffile,"/texmf.cnf")
 print substr(texmfcnffile,1,texmfcnfloc-1)
}' texmfcnffile=$texmfcnffile tmp@ `

echo $TEXMFCNF > tmp@
TEXMF=`
gawk '
{
  inline=$0
  gsub(/web2c/,"",inline)
  inline=substr(inline,1,length(inline)-1)
  print inline
}' tmp@ `


#echo "yes" > tmp@
texmffile=`kpsexpand '$TEXMFDIST' `
if test "$texmffile" != ""; then
TEXMFDIR=` gawk '
   {lbr=index(texmffile,"{")
    sep=index(texmffile,",")
    dash=index(texmffile,"-")
    texmfpre=substr(texmffile,1,dash)
    if (lbr > 0)
       {texlive=substr(texmffile,lbr+1,sep-lbr-1) 
        texmf =texmfpre texlive
       }
    else
       {if (dash > 0)
           {texlive=substr(texmffile,dash+1) 
            texmf =texmfpre texlive
           } 
       }    
    print texmf
   }' texmffile=$texmffile tmp@ `
fi

if test "$TEXMFDIR" != "" -a -d "$TEXMFDIR"; then
   TEXMF=$TEXMFDIR
fi

#TFMFONTS=.:$TEXMF/fonts/tfm//:$VARTEXFONTS/tfm//
#export TFMFONTS

# cp $TEXMF/dvipdfm/config/cid-x.map .

# cp $TEXMF/dvipdfm/CMap/ETen-B5-UCS2 .


 if test "$4" = "-dvipdfm"; then
    chitexx $1 $2
    bname=`basename $2`                    
    filea=`echo $bname|cut -d. -f 1` 
    
  if test -s $filea".dvi"; then
     export LC_ALL=
#  else
     dvipdfmx $filea".dvi"
  fi
#   export LC_CTYPE=zh_TW.Utf8

  if test -s $filea.pdf; then
     evince $filea.pdf
  fi

 else
#   if test "$4" = "-omegadvipdfm"; then
      chitexx $1 $2 $3
      bname=`basename $3`                    
      filea=`echo $bname|cut -d. -f 1` 
      if test -s $filea.dvi; then
         export LC_ALL=
         dvipdfmx $filea.dvi
      fi
#       export LC_CTYPE=zh_TW.Utf8
      if test -s $filea".pdf"; then
        evince $filea.pdf 
      fi
#   fi
 fi

rm -f ch@utf8 tmp@
rm -f tmp@
fileno=
inputno=
labelcount=
bitemcount=
export fileno
export inputno
export labelcount
export bitemcount
rm -f *.sfd newfile@no
rm -f ttfonts.map
rm -f sec*@ ETen-B5-UCS2 cid-x.map
rm -f tex@out UniCNS-UCS2-H 

