50 #pragma warning (disable: 4018)
58 #define MATRIX_FILE_VERSION "0.1"
64 int32 byteswap, chksum_present;
65 uint32 chksum, i, m, n;
66 char **argname, **argval;
69 if (feat->n_stream != 1) {
70 E_ERROR(
"LDA incompatible with multi-stream features (n_stream = %d)\n",
75 if ((fh = fopen(ldafile,
"rb")) == NULL) {
76 E_ERROR_SYSTEM(
"Failed to open transform file '%s' for reading: %s\n", ldafile, strerror(errno));
80 if (
bio_readhdr(fh, &argname, &argval, &byteswap) < 0) {
81 E_ERROR(
"Failed to read header from transform file '%s'\n", ldafile);
87 for (i = 0; argname[i]; i++) {
88 if (strcmp(argname[i],
"version") == 0) {
89 if (strcmp(argval[i], MATRIX_FILE_VERSION) != 0)
90 E_WARN(
"%s: Version mismatch: %s, expecting %s\n",
91 ldafile, argval[i], MATRIX_FILE_VERSION);
93 else if (strcmp(argname[i],
"chksum0") == 0) {
99 argname = argval = NULL;
111 &feat->n_lda, &m, &n,
112 fh, byteswap, &chksum) < 0) {
117 feat->lda = (
void *)outlda;
124 for (i = 0; i < feat->n_lda * m * n; ++i) {
125 feat->lda[0][0][i] = FLOAT2MFCC(((
float *)feat->lda[0][0])[i]);
130 if (n != feat->stream_len[0])
131 E_FATAL(
"LDA matrix dimension %d doesn't match feature stream size %d\n", n, feat->stream_len[0]);
134 if (dim > m || dim <= 0) {
148 tmp =
ckd_calloc(fcb->stream_len[0],
sizeof(mfcc_t));
149 for (i = 0; i < nfr; ++i) {
153 memset(tmp, 0,
sizeof(mfcc_t) * fcb->stream_len[0]);
155 for (k = 0; k < fcb->stream_len[0]; ++k) {
156 tmp[j] += MFCCMUL(inout_feat[i][0][k], fcb->lda[0][j][k]);
159 memcpy(inout_feat[i][0], tmp, fcb->stream_len[0] *
sizeof(mfcc_t));