16-bit clean shift in lsp_to_lpc()
[speexdsp.git] / libspeex / testenc.c
1 #ifdef HAVE_CONFIG_H
2 #include "config.h"
3 #endif
4
5 #include <speex/speex.h>
6 #include <stdio.h>
7 #include <stdlib.h>
8 #include <speex/speex_callbacks.h>
9
10 #ifdef FIXED_DEBUG
11 extern long long spx_mips;
12 #endif
13
14 #define FRAME_SIZE 160
15 #include <math.h>
16 int main(int argc, char **argv)
17 {
18    char *inFile, *outFile, *bitsFile;
19    FILE *fin, *fout, *fbits=NULL;
20    short in_short[FRAME_SIZE];
21    short out_short[FRAME_SIZE];
22    float sigpow,errpow,snr, seg_snr=0;
23    int snr_frames = 0;
24    char cbits[200];
25    int nbBits;
26    int i;
27    void *st;
28    void *dec;
29    SpeexBits bits;
30    int tmp;
31    int bitCount=0;
32    int skip_group_delay;
33    SpeexCallback callback;
34
35    sigpow = 0;
36    errpow = 0;
37
38    st = speex_encoder_init(&speex_nb_mode);
39    dec = speex_decoder_init(&speex_nb_mode);
40
41    callback.callback_id = SPEEX_INBAND_CHAR;
42    callback.func = speex_std_char_handler;
43    callback.data = stderr;
44    speex_decoder_ctl(dec, SPEEX_SET_HANDLER, &callback);
45
46    callback.callback_id = SPEEX_INBAND_MODE_REQUEST;
47    callback.func = speex_std_mode_request_handler;
48    callback.data = st;
49    speex_decoder_ctl(dec, SPEEX_SET_HANDLER, &callback);
50
51    tmp=1;
52    speex_decoder_ctl(dec, SPEEX_SET_ENH, &tmp);
53    tmp=0;
54    speex_encoder_ctl(st, SPEEX_SET_VBR, &tmp);
55    tmp=8;
56    speex_encoder_ctl(st, SPEEX_SET_QUALITY, &tmp);
57    tmp=1;
58    speex_encoder_ctl(st, SPEEX_SET_COMPLEXITY, &tmp);
59
60    speex_encoder_ctl(st, SPEEX_GET_LOOKAHEAD, &skip_group_delay);
61    speex_decoder_ctl(dec, SPEEX_GET_LOOKAHEAD, &tmp);
62    skip_group_delay += tmp;
63
64    if (argc != 4 && argc != 3)
65    {
66       fprintf (stderr, "Usage: encode [in file] [out file] [bits file]\nargc = %d", argc);
67       exit(1);
68    }
69    inFile = argv[1];
70    fin = fopen(inFile, "r");
71    outFile = argv[2];
72    fout = fopen(outFile, "w+");
73    if (argc==4)
74    {
75       bitsFile = argv[3];
76       fbits = fopen(bitsFile, "w");
77    }
78    speex_bits_init(&bits);
79    while (!feof(fin))
80    {
81       fread(in_short, sizeof(short), FRAME_SIZE, fin);
82       if (feof(fin))
83          break;
84       speex_bits_reset(&bits);
85
86       speex_encode_int(st, in_short, &bits);
87       nbBits = speex_bits_write(&bits, cbits, 200);
88       bitCount+=bits.nbBits;
89
90       if (argc==4)
91          fwrite(cbits, 1, nbBits, fbits);
92       speex_bits_rewind(&bits);
93
94       speex_decode_int(dec, &bits, out_short);
95       speex_bits_reset(&bits);
96
97       fwrite(&out_short[skip_group_delay], sizeof(short), FRAME_SIZE-skip_group_delay, fout);
98       skip_group_delay = 0;
99    }
100    fprintf (stderr, "Total encoded size: %d bits\n", bitCount);
101    speex_encoder_destroy(st);
102    speex_decoder_destroy(dec);
103    speex_bits_destroy(&bits);
104
105    rewind(fin);
106    rewind(fout);
107
108    while ( FRAME_SIZE == fread(in_short, sizeof(short), FRAME_SIZE, fin) 
109            &&
110            FRAME_SIZE ==  fread(out_short, sizeof(short), FRAME_SIZE,fout) )
111    {
112         float s=0, e=0;
113         for (i=0;i<FRAME_SIZE;++i) {
114             s += (float)in_short[i] * in_short[i];
115             e += ((float)in_short[i]-out_short[i]) * ((float)in_short[i]-out_short[i]);
116         }
117         seg_snr += 10*log10((s+160)/(e+160));
118         sigpow += s;
119         errpow += e;
120         snr_frames++;
121    }
122    fclose(fin);
123    fclose(fout);
124
125    snr = 10 * log10( sigpow / errpow );
126    seg_snr /= snr_frames;
127    fprintf(stderr,"SNR = %f\nsegmental SNR = %f\n",snr, seg_snr);
128
129 #ifdef FIXED_DEBUG
130    printf ("Total: %f MIPS\n", (float)(1e-6*50*spx_mips/snr_frames));
131 #endif
132    
133    return 0;
134 }