Blame view

egs/farsdat/s5/local/score_sclite.sh 2.41 KB
8dcb6dfcb   Yannick Estève   first commit
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
  #!/bin/bash
  # Copyright 2012  Johns Hopkins University (Author: Daniel Povey)
  #           2014  Brno University of Technology (Author: Karel Vesely)
  # Apache 2.0
  
  # begin configuration section.
  cmd=run.pl
  stage=0
  min_lmwt=1
  max_lmwt=10
  #end configuration section.
  
  [ -f ./path.sh ] && . ./path.sh
  . parse_options.sh || exit 1;
  
  if [ $# -ne 3 ]; then
    echo "Usage: local/score.sh [--cmd (run.pl|queue.pl...)] <data-dir> <lang-dir|graph-dir> <decode-dir>"
    echo " Options:"
    echo "    --cmd (run.pl|queue.pl...)      # specify how to run the sub-processes."
    echo "    --stage (0|1|2)                 # start scoring script from part-way through."
    echo "    --min_lmwt <int>                # minumum LM-weight for lattice rescoring "
    echo "    --max_lmwt <int>                # maximum LM-weight for lattice rescoring "
    exit 1;
  fi
  
  data=$1
  lang_or_graph=$2
  dir=$3
  
  model=$dir/../final.mdl # assume model one level up from decoding dir.
  
  hubscr=$KALDI_ROOT/tools/sctk/bin/hubscr.pl
  [ ! -f $hubscr ] && echo "Cannot find scoring program at $hubscr" && exit 1;
  hubdir=`dirname $hubscr`
  
  phonemap="conf/phones.60-48-39.map"
  nj=$(cat $dir/num_jobs)
  
  symtab=$lang_or_graph/words.txt
  
  for f in $symtab $dir/lat.1.gz $data/text; do
    [ ! -f $f ] && echo "score.sh: no such file $f" && exit 1;
  done
  
  mkdir -p $dir/scoring/log
  
  # The silence is optional (.):
  cat $data/stm | sed 's: sil: (sil):g' > $dir/scoring/stm
  cp $data/glm $dir/scoring/glm
  
  if [ $stage -le 0 ]; then
    # Get the phone-sequence on the best-path:
    for LMWT in $(seq $min_lmwt $max_lmwt); do
      $cmd JOB=1:$nj $dir/scoring/log/best_path.$LMWT.JOB.log \
        lattice-align-phones $model "ark:gunzip -c $dir/lat.JOB.gz|" ark:- \| \
        lattice-to-ctm-conf --inv-acoustic-scale=$LMWT ark:- $dir/scoring/$LMWT.JOB.ctm || exit 1;
      cat $dir/scoring/$LMWT.*.ctm | sort > $dir/scoring/$LMWT.ctm.code
      rm $dir/scoring/$LMWT.*.ctm
    done
  fi
  
  if [ $stage -le 1 ]; then
    $cmd LMWT=$min_lmwt:$max_lmwt $dir/scoring/log/map_ctm.LMWT.log \
       mkdir $dir/score_LMWT ';' \
       cat $dir/scoring/LMWT.ctm.code \| \
       utils/int2sym.pl -f 5 $symtab '>' \
       $dir/scoring/LMWT.ctm || exit 1
  fi
  
  # Score the set...
  $cmd LMWT=$min_lmwt:$max_lmwt $dir/scoring/log/score.LMWT.log \
    cp $dir/scoring/stm $dir/score_LMWT '&&' cp $dir/scoring/LMWT.ctm $dir/score_LMWT/ctm '&&' \
     $hubscr -p $hubdir -V -l english -h hub5 -g $dir/scoring/glm -r $dir/score_LMWT/stm $dir/score_LMWT/ctm || exit 1;
  
  exit 0;