some minor changes to BNF scripts and adding them back to local directory till May 1st

git-svn-id: https://svn.code.sf.net/p/kaldi/code/trunk@3889 5e6a8d80-dfce-4ca6-a32a-6e07a63d50c8

egs/babel/s5b/local/nnet2/dump_bottleneck_features.sh

+#!/bin/bash
+
+#           2014  Pegah Ghahremani
+# Apache 2.0
+
+
+# Begin configuration section.  
+stage=1
+nj=4
+cmd=run.pl
+
+# Begin configuration.
+transform_dir=
+
+# End configuration options.
+
+echo "$0 $@"  # Print the command line for logging
+
+[ -f path.sh ] && . ./path.sh # source the path.
+. parse_options.sh || exit 1;
+
+if [ $# != 5 ]; then
+   echo "usage: local/nnet2/dump_bottleneck_features.sh <input-data-dir> <output-data-dir> <bnf-nnet-dir> <archive-dir> <log-dir>"
+   echo "e.g.:  local/nnet2/dump_bottleneck_features.sh data/train data/train_bnf exp_bnf/bnf_net exp/tri5_ali mfcc exp_bnf/dump_bnf"
+   echo "main options (for others, see top of script file)"
+   echo "  --config <config-file>                           # config containing options"
+   echo "  --nj <nj>                                        # number of parallel jobs"
+   echo "  --cmd (utils/run.pl|utils/queue.pl <queue opts>) # how to run jobs."
+   exit 1;
+fi
+
+data=$1
+bnf_data=$2
+nnetdir=$3
+archivedir=$4
+dir=$5
+
+# because we [cat trans.*], no need to keep nj consistent with [# of trans]
+nj=`cat $transform_dir/num_jobs` || exit 1;
+
+# Assume that final.mat and final.nnet are at nnetdir
+nnet_lda=$nnetdir/final.mat
+bnf_nnet=$nnetdir/final.raw
+for file in $nnet_lda $bnf_nnet; do
+  if [ ! -f $file ] ; then
+    echo "No such file $file";
+    exit 1;
+  fi
+done
+
+name=`basename $data`
+sdata=$data/split$nj
+
+mkdir -p $dir/log
+mkdir -p $bnf_data
+echo $nj > $nnetdir/num_jobs
+nnet_plice_opts=`cat $nnetdir/nnet_splice_opts 2>/dev/null`
+splice_opts=`cat $nnetdir/splice_opts 2>/dev/null`
+[[ -d $sdata && $data/feats.scp -ot $sdata ]] || split_data.sh $data $nj || exit 1;
+
+## Set up input features of nnet
+if [ -f $nnetdir/final.mat ]; then feat_type=lda; else feat_type=delta; fi
+echo "$0: feature type is $feat_type"
+
+case $feat_type in
+  delta) feats="ark,s,cs:apply-cmvn --norm-vars=false --utt2spk=ark:$sdata/JOB/utt2spk scp:$sdata/JOB/cmvn.scp scp:$sdata/JOB/feats.scp ark:- | add-deltas ark:- ark:- |";;
+  lda) feats="ark,s,cs:apply-cmvn --norm-vars=false --utt2spk=ark:$sdata/JOB/utt2spk scp:$sdata/JOB/cmvn.scp scp:$sdata/JOB/feats.scp ark:- | splice-feats $splice_opts ark:- ark:- | transform-feats $nnetdir/final.mat ark:- ark:- |"
+   ;;
+  *) echo "Invalid feature type $feat_type" && exit 1;
+esac
+
+if [ ! -z "$transform_dir" ]; then
+  echo "Using transforms from $transform_dir"
+  [ ! -f $transform_dir/trans.1 ] && echo "No such file $transform_dir/trans.1" && exit 1;
+#  cat $transform_dir/trans.* > $nnetdir/trans || exit 1;
+  feats="$feats transform-feats --utt2spk=ark:$sdata/JOB/utt2spk ark,s,cs:$transform_dir/trans.JOB ark:- ark:- |"
+fi
+
+if [ $stage -le 1 ]; then
+  echo "Making BNF scp and ark."
+  $cmd JOB=1:$nj $dir/log/make_bnf_$name.JOB.log \
+    nnet-compute $bnf_nnet "$feats" ark:- \| \
+    copy-feats --compress=true ark:- ark,scp:$archivedir/raw_bnfeat_$name.JOB.ark,$archivedir/raw_bnfeat_$name.JOB.scp || exit 1;
+fi
+
+N0=$(cat $data/feats.scp | wc -l) 
+N1=$(cat $archivedir/raw_bnfeat_$name.*.scp | wc -l)
+if [[ "$N0" != "$N1" ]]; then
+  echo "Error happens when generating BNF for $name (Original:$N0  BNF:$N1)"
+  exit 1;
+fi
+
+echo -n >$bnf_data/feats.scp
+# Concatenate feats.scp into bnf_data
+for n in `seq 1 $nj`; do
+  cat $archivedir/raw_bnfeat_$name.$n.scp >> $bnf_data/feats.scp
+done
+
+for f in segments spk2utt text utt2spk wav.scp char.stm glm kws reco2file_and_channel stm; do
+  [ -e $data/$f ] && cp -r $data/$f $bnf_data/$f
+done
+
+steps/compute_cmvn_stats.sh $bnf_data $dir $archivedir
+
+echo "$0: done making BNF feats.scp."
+
+exit 0;