mirror of
				https://github.com/bolucat/Archive.git
				synced 2025-11-01 04:13:16 +08:00 
			
		
		
		
	
		
			
				
	
	
		
			708 lines
		
	
	
		
			29 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			708 lines
		
	
	
		
			29 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| /* Copyright (c) 2011-2013 Xiph.Org Foundation
 | |
|    Written by Gregory Maxwell */
 | |
| /*
 | |
|    Redistribution and use in source and binary forms, with or without
 | |
|    modification, are permitted provided that the following conditions
 | |
|    are met:
 | |
| 
 | |
|    - Redistributions of source code must retain the above copyright
 | |
|    notice, this list of conditions and the following disclaimer.
 | |
| 
 | |
|    - Redistributions in binary form must reproduce the above copyright
 | |
|    notice, this list of conditions and the following disclaimer in the
 | |
|    documentation and/or other materials provided with the distribution.
 | |
| 
 | |
|    THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 | |
|    ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 | |
|    LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
 | |
|    A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
 | |
|    OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
 | |
|    EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
 | |
|    PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
 | |
|    PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
 | |
|    LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
 | |
|    NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 | |
|    SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 | |
| */
 | |
| 
 | |
| #ifdef HAVE_CONFIG_H
 | |
| #include "config.h"
 | |
| #endif
 | |
| 
 | |
| #include <stdio.h>
 | |
| #include <stdlib.h>
 | |
| #include <limits.h>
 | |
| #include <stdint.h>
 | |
| #include <math.h>
 | |
| #include <string.h>
 | |
| #include <time.h>
 | |
| #if (!defined WIN32 && !defined _WIN32) || defined(__MINGW32__)
 | |
| #include <unistd.h>
 | |
| #else
 | |
| #include <process.h>
 | |
| #define getpid _getpid
 | |
| #endif
 | |
| #include "opus_multistream.h"
 | |
| #include "opus.h"
 | |
| #include "../src/opus_private.h"
 | |
| #include "test_opus_common.h"
 | |
| 
 | |
| #define MAX_PACKET (1500)
 | |
| #define SAMPLES (48000*30)
 | |
| #define SSAMPLES (SAMPLES/3)
 | |
| #define MAX_FRAME_SAMP (5760)
 | |
| #define PI (3.141592653589793238462643f)
 | |
| #define RAND_SAMPLE(a) (a[fast_rand() % sizeof(a)/sizeof(a[0])])
 | |
| 
 | |
| void generate_music(short *buf, opus_int32 len)
 | |
| {
 | |
|    opus_int32 a1,b1,a2,b2;
 | |
|    opus_int32 c1,c2,d1,d2;
 | |
|    opus_int32 i,j;
 | |
|    a1=b1=a2=b2=0;
 | |
|    c1=c2=d1=d2=0;
 | |
|    j=0;
 | |
|    /*60ms silence*/
 | |
|    for(i=0;i<2880;i++)buf[i*2]=buf[i*2+1]=0;
 | |
|    for(i=2880;i<len;i++)
 | |
|    {
 | |
|      opus_uint32 r;
 | |
|      opus_int32 v1,v2;
 | |
|      v1=v2=(((j*((j>>12)^((j>>10|j>>12)&26&j>>7)))&128)+128)<<15;
 | |
|      r=fast_rand();v1+=r&65535;v1-=r>>16;
 | |
|      r=fast_rand();v2+=r&65535;v2-=r>>16;
 | |
|      b1=v1-a1+((b1*61+32)>>6);a1=v1;
 | |
|      b2=v2-a2+((b2*61+32)>>6);a2=v2;
 | |
|      c1=(30*(c1+b1+d1)+32)>>6;d1=b1;
 | |
|      c2=(30*(c2+b2+d2)+32)>>6;d2=b2;
 | |
|      v1=(c1+128)>>8;
 | |
|      v2=(c2+128)>>8;
 | |
|      buf[i*2]=v1>32767?32767:(v1<-32768?-32768:v1);
 | |
|      buf[i*2+1]=v2>32767?32767:(v2<-32768?-32768:v2);
 | |
|      if(i%6==0)j++;
 | |
|    }
 | |
| }
 | |
| 
 | |
| #if 0
 | |
| static int save_ctr = 0;
 | |
| static void int_to_char(opus_uint32 i, unsigned char ch[4])
 | |
| {
 | |
|     ch[0] = i>>24;
 | |
|     ch[1] = (i>>16)&0xFF;
 | |
|     ch[2] = (i>>8)&0xFF;
 | |
|     ch[3] = i&0xFF;
 | |
| }
 | |
| 
 | |
| static OPUS_INLINE void save_packet(unsigned char* p, int len, opus_uint32 rng)
 | |
| {
 | |
|    FILE *fout;
 | |
|    unsigned char int_field[4];
 | |
|    char name[256];
 | |
|    snprintf(name,255,"test_opus_encode.%llu.%d.bit",(unsigned long long)iseed,save_ctr);
 | |
|    fprintf(stdout,"writing %d byte packet to %s\n",len,name);
 | |
|    fout=fopen(name, "wb+");
 | |
|    if(fout==NULL)test_failed();
 | |
|    int_to_char(len, int_field);
 | |
|    fwrite(int_field, 1, 4, fout);
 | |
|    int_to_char(rng, int_field);
 | |
|    fwrite(int_field, 1, 4, fout);
 | |
|    fwrite(p, 1, len, fout);
 | |
|    fclose(fout);
 | |
|    save_ctr++;
 | |
| }
 | |
| #endif
 | |
| 
 | |
| int get_frame_size_enum(int frame_size, int sampling_rate)
 | |
| {
 | |
|    int frame_size_enum;
 | |
| 
 | |
|    if(frame_size==sampling_rate/400)
 | |
|       frame_size_enum = OPUS_FRAMESIZE_2_5_MS;
 | |
|    else if(frame_size==sampling_rate/200)
 | |
|       frame_size_enum = OPUS_FRAMESIZE_5_MS;
 | |
|    else if(frame_size==sampling_rate/100)
 | |
|       frame_size_enum = OPUS_FRAMESIZE_10_MS;
 | |
|    else if(frame_size==sampling_rate/50)
 | |
|       frame_size_enum = OPUS_FRAMESIZE_20_MS;
 | |
|    else if(frame_size==sampling_rate/25)
 | |
|       frame_size_enum = OPUS_FRAMESIZE_40_MS;
 | |
|    else if(frame_size==3*sampling_rate/50)
 | |
|       frame_size_enum = OPUS_FRAMESIZE_60_MS;
 | |
|    else if(frame_size==4*sampling_rate/50)
 | |
|       frame_size_enum = OPUS_FRAMESIZE_80_MS;
 | |
|    else if(frame_size==5*sampling_rate/50)
 | |
|       frame_size_enum = OPUS_FRAMESIZE_100_MS;
 | |
|    else if(frame_size==6*sampling_rate/50)
 | |
|       frame_size_enum = OPUS_FRAMESIZE_120_MS;
 | |
|    else
 | |
|       test_failed();
 | |
| 
 | |
|    return frame_size_enum;
 | |
| }
 | |
| 
 | |
| int test_encode(OpusEncoder *enc, int channels, int frame_size, OpusDecoder *dec)
 | |
| {
 | |
|    int samp_count = 0;
 | |
|    opus_int16 *inbuf;
 | |
|    unsigned char packet[MAX_PACKET+257];
 | |
|    int len;
 | |
|    opus_int16 *outbuf;
 | |
|    int out_samples;
 | |
|    int ret = 0;
 | |
| 
 | |
|    /* Generate input data */
 | |
|    inbuf = (opus_int16*)malloc(sizeof(*inbuf)*SSAMPLES);
 | |
|    generate_music(inbuf, SSAMPLES/2);
 | |
| 
 | |
|    /* Allocate memory for output data */
 | |
|    outbuf = (opus_int16*)malloc(sizeof(*outbuf)*MAX_FRAME_SAMP*3);
 | |
| 
 | |
|    /* Encode data, then decode for sanity check */
 | |
|    do {
 | |
|       len = opus_encode(enc, &inbuf[samp_count*channels], frame_size, packet, MAX_PACKET);
 | |
|       if(len<0 || len>MAX_PACKET) {
 | |
|          fprintf(stderr,"opus_encode() returned %d\n",len);
 | |
|          ret = -1;
 | |
|          break;
 | |
|       }
 | |
| 
 | |
|       out_samples = opus_decode(dec, packet, len, outbuf, MAX_FRAME_SAMP, 0);
 | |
|       if(out_samples!=frame_size) {
 | |
|          fprintf(stderr,"opus_decode() returned %d\n",out_samples);
 | |
|          ret = -1;
 | |
|          break;
 | |
|       }
 | |
| 
 | |
|       samp_count += frame_size;
 | |
|    } while (samp_count < ((SSAMPLES/2)-MAX_FRAME_SAMP));
 | |
| 
 | |
|    /* Clean up */
 | |
|    free(inbuf);
 | |
|    free(outbuf);
 | |
|    return ret;
 | |
| }
 | |
| 
 | |
| void fuzz_encoder_settings(const int num_encoders, const int num_setting_changes)
 | |
| {
 | |
|    OpusEncoder *enc;
 | |
|    OpusDecoder *dec;
 | |
|    int i,j,err;
 | |
| 
 | |
|    /* Parameters to fuzz. Some values are duplicated to increase their probability of being tested. */
 | |
|    int sampling_rates[5] = {8000, 12000, 16000, 24000, 48000};
 | |
|    int channels[2] = {1, 2};
 | |
|    int applications[3] = {OPUS_APPLICATION_AUDIO, OPUS_APPLICATION_VOIP, OPUS_APPLICATION_RESTRICTED_LOWDELAY};
 | |
|    int bitrates[11] = {6000, 12000, 16000, 24000, 32000, 48000, 64000, 96000, 510000, OPUS_AUTO, OPUS_BITRATE_MAX};
 | |
|    int force_channels[4] = {OPUS_AUTO, OPUS_AUTO, 1, 2};
 | |
|    int use_vbr[3] = {0, 1, 1};
 | |
|    int vbr_constraints[3] = {0, 1, 1};
 | |
|    int complexities[11] = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10};
 | |
|    int max_bandwidths[6] = {OPUS_BANDWIDTH_NARROWBAND, OPUS_BANDWIDTH_MEDIUMBAND,
 | |
|                             OPUS_BANDWIDTH_WIDEBAND, OPUS_BANDWIDTH_SUPERWIDEBAND,
 | |
|                             OPUS_BANDWIDTH_FULLBAND, OPUS_BANDWIDTH_FULLBAND};
 | |
|    int signals[4] = {OPUS_AUTO, OPUS_AUTO, OPUS_SIGNAL_VOICE, OPUS_SIGNAL_MUSIC};
 | |
|    int inband_fecs[3] = {0, 0, 1};
 | |
|    int packet_loss_perc[4] = {0, 1, 2, 5};
 | |
|    int lsb_depths[2] = {8, 24};
 | |
|    int prediction_disabled[3] = {0, 0, 1};
 | |
|    int use_dtx[2] = {0, 1};
 | |
|    int frame_sizes_ms_x2[9] = {5, 10, 20, 40, 80, 120, 160, 200, 240};  /* x2 to avoid 2.5 ms */
 | |
| 
 | |
|    for (i=0; i<num_encoders; i++) {
 | |
|       int sampling_rate = RAND_SAMPLE(sampling_rates);
 | |
|       int num_channels = RAND_SAMPLE(channels);
 | |
|       int application = RAND_SAMPLE(applications);
 | |
| 
 | |
|       dec = opus_decoder_create(sampling_rate, num_channels, &err);
 | |
|       if(err!=OPUS_OK || dec==NULL)test_failed();
 | |
| 
 | |
|       enc = opus_encoder_create(sampling_rate, num_channels, application, &err);
 | |
|       if(err!=OPUS_OK || enc==NULL)test_failed();
 | |
| 
 | |
|       for (j=0; j<num_setting_changes; j++) {
 | |
|          int bitrate = RAND_SAMPLE(bitrates);
 | |
|          int force_channel = RAND_SAMPLE(force_channels);
 | |
|          int vbr = RAND_SAMPLE(use_vbr);
 | |
|          int vbr_constraint = RAND_SAMPLE(vbr_constraints);
 | |
|          int complexity = RAND_SAMPLE(complexities);
 | |
|          int max_bw = RAND_SAMPLE(max_bandwidths);
 | |
|          int sig = RAND_SAMPLE(signals);
 | |
|          int inband_fec = RAND_SAMPLE(inband_fecs);
 | |
|          int pkt_loss = RAND_SAMPLE(packet_loss_perc);
 | |
|          int lsb_depth = RAND_SAMPLE(lsb_depths);
 | |
|          int pred_disabled = RAND_SAMPLE(prediction_disabled);
 | |
|          int dtx = RAND_SAMPLE(use_dtx);
 | |
|          int frame_size_ms_x2 = RAND_SAMPLE(frame_sizes_ms_x2);
 | |
|          int frame_size = frame_size_ms_x2*sampling_rate/2000;
 | |
|          int frame_size_enum = get_frame_size_enum(frame_size, sampling_rate);
 | |
|          force_channel = IMIN(force_channel, num_channels);
 | |
| 
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_BITRATE(bitrate)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_FORCE_CHANNELS(force_channel)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_VBR(vbr)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_VBR_CONSTRAINT(vbr_constraint)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_COMPLEXITY(complexity)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_MAX_BANDWIDTH(max_bw)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_SIGNAL(sig)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_INBAND_FEC(inband_fec)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_PACKET_LOSS_PERC(pkt_loss)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_LSB_DEPTH(lsb_depth)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_PREDICTION_DISABLED(pred_disabled)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_DTX(dtx)) != OPUS_OK) test_failed();
 | |
|          if(opus_encoder_ctl(enc, OPUS_SET_EXPERT_FRAME_DURATION(frame_size_enum)) != OPUS_OK) test_failed();
 | |
| 
 | |
|          if(test_encode(enc, num_channels, frame_size, dec)) {
 | |
|             fprintf(stderr,
 | |
|                "fuzz_encoder_settings: %d kHz, %d ch, application: %d, "
 | |
|                "%d bps, force ch: %d, vbr: %d, vbr constraint: %d, complexity: %d, "
 | |
|                "max bw: %d, signal: %d, inband fec: %d, pkt loss: %d%%, lsb depth: %d, "
 | |
|                "pred disabled: %d, dtx: %d, (%d/2) ms\n",
 | |
|                sampling_rate/1000, num_channels, application, bitrate,
 | |
|                force_channel, vbr, vbr_constraint, complexity, max_bw, sig, inband_fec,
 | |
|                pkt_loss, lsb_depth, pred_disabled, dtx, frame_size_ms_x2);
 | |
|             test_failed();
 | |
|          }
 | |
|       }
 | |
| 
 | |
|       opus_encoder_destroy(enc);
 | |
|       opus_decoder_destroy(dec);
 | |
|    }
 | |
| }
 | |
| 
 | |
| int run_test1(int no_fuzz)
 | |
| {
 | |
|    static const int fsizes[6]={960*3,960*2,120,240,480,960};
 | |
|    static const char *mstrings[3] = {"    LP","Hybrid","  MDCT"};
 | |
|    unsigned char mapping[256] = {0,1,255};
 | |
|    unsigned char db62[36];
 | |
|    opus_int32 i,j;
 | |
|    int rc,err;
 | |
|    OpusEncoder *enc;
 | |
|    OpusMSEncoder *MSenc;
 | |
|    OpusDecoder *dec;
 | |
|    OpusMSDecoder *MSdec;
 | |
|    OpusMSDecoder *MSdec_err;
 | |
|    OpusDecoder *dec_err[10];
 | |
|    short *inbuf;
 | |
|    short *outbuf;
 | |
|    short *out2buf;
 | |
|    opus_int32 bitrate_bps;
 | |
|    unsigned char packet[MAX_PACKET+257];
 | |
|    opus_uint32 enc_final_range;
 | |
|    opus_uint32 dec_final_range;
 | |
|    int fswitch;
 | |
|    int fsize;
 | |
|    int count;
 | |
| 
 | |
|   /*FIXME: encoder api tests, fs!=48k, mono, VBR*/
 | |
| 
 | |
|    fprintf(stdout,"  Encode+Decode tests.\n");
 | |
|    fflush(stdout);
 | |
| 
 | |
|    enc = opus_encoder_create(48000, 2, OPUS_APPLICATION_VOIP, &err);
 | |
|    if(err != OPUS_OK || enc==NULL)test_failed();
 | |
| 
 | |
|    for(i=0;i<2;i++)
 | |
|    {
 | |
|       int *ret_err;
 | |
|       ret_err = i?0:&err;
 | |
|       MSenc = opus_multistream_encoder_create(8000, 2, 2, 0, mapping, OPUS_UNIMPLEMENTED, ret_err);
 | |
|       if((ret_err && *ret_err != OPUS_BAD_ARG) || MSenc!=NULL)test_failed();
 | |
| 
 | |
|       MSenc = opus_multistream_encoder_create(8000, 0, 1, 0, mapping, OPUS_APPLICATION_VOIP, ret_err);
 | |
|       if((ret_err && *ret_err != OPUS_BAD_ARG) || MSenc!=NULL)test_failed();
 | |
| 
 | |
|       MSenc = opus_multistream_encoder_create(44100, 2, 2, 0, mapping, OPUS_APPLICATION_VOIP, ret_err);
 | |
|       if((ret_err && *ret_err != OPUS_BAD_ARG) || MSenc!=NULL)test_failed();
 | |
| 
 | |
|       MSenc = opus_multistream_encoder_create(8000, 2, 2, 3, mapping, OPUS_APPLICATION_VOIP, ret_err);
 | |
|       if((ret_err && *ret_err != OPUS_BAD_ARG) || MSenc!=NULL)test_failed();
 | |
| 
 | |
|       MSenc = opus_multistream_encoder_create(8000, 2, -1, 0, mapping, OPUS_APPLICATION_VOIP, ret_err);
 | |
|       if((ret_err && *ret_err != OPUS_BAD_ARG) || MSenc!=NULL)test_failed();
 | |
| 
 | |
|       MSenc = opus_multistream_encoder_create(8000, 256, 2, 0, mapping, OPUS_APPLICATION_VOIP, ret_err);
 | |
|       if((ret_err && *ret_err != OPUS_BAD_ARG) || MSenc!=NULL)test_failed();
 | |
|    }
 | |
| 
 | |
|    MSenc = opus_multistream_encoder_create(8000, 2, 2, 0, mapping, OPUS_APPLICATION_AUDIO, &err);
 | |
|    if(err != OPUS_OK || MSenc==NULL)test_failed();
 | |
| 
 | |
|    /*Some multistream encoder API tests*/
 | |
|    if(opus_multistream_encoder_ctl(MSenc, OPUS_GET_BITRATE(&i))!=OPUS_OK)test_failed();
 | |
|    if(opus_multistream_encoder_ctl(MSenc, OPUS_GET_LSB_DEPTH(&i))!=OPUS_OK)test_failed();
 | |
|    if(i<16)test_failed();
 | |
| 
 | |
|    {
 | |
|       OpusEncoder *tmp_enc;
 | |
|       if(opus_multistream_encoder_ctl(MSenc,  OPUS_MULTISTREAM_GET_ENCODER_STATE(1,&tmp_enc))!=OPUS_OK)test_failed();
 | |
|       if(opus_encoder_ctl(tmp_enc, OPUS_GET_LSB_DEPTH(&j))!=OPUS_OK)test_failed();
 | |
|       if(i!=j)test_failed();
 | |
|       if(opus_multistream_encoder_ctl(MSenc,  OPUS_MULTISTREAM_GET_ENCODER_STATE(2,&tmp_enc))!=OPUS_BAD_ARG)test_failed();
 | |
|    }
 | |
| 
 | |
|    dec = opus_decoder_create(48000, 2, &err);
 | |
|    if(err != OPUS_OK || dec==NULL)test_failed();
 | |
| 
 | |
|    MSdec = opus_multistream_decoder_create(48000, 2, 2, 0, mapping, &err);
 | |
|    if(err != OPUS_OK || MSdec==NULL)test_failed();
 | |
| 
 | |
|    MSdec_err = opus_multistream_decoder_create(48000, 3, 2, 0, mapping, &err);
 | |
|    if(err != OPUS_OK || MSdec_err==NULL)test_failed();
 | |
| 
 | |
|    dec_err[0]=(OpusDecoder *)malloc(opus_decoder_get_size(2));
 | |
|    memcpy(dec_err[0],dec,opus_decoder_get_size(2));
 | |
|    dec_err[1] = opus_decoder_create(48000, 1, &err);
 | |
|    dec_err[2] = opus_decoder_create(24000, 2, &err);
 | |
|    dec_err[3] = opus_decoder_create(24000, 1, &err);
 | |
|    dec_err[4] = opus_decoder_create(16000, 2, &err);
 | |
|    dec_err[5] = opus_decoder_create(16000, 1, &err);
 | |
|    dec_err[6] = opus_decoder_create(12000, 2, &err);
 | |
|    dec_err[7] = opus_decoder_create(12000, 1, &err);
 | |
|    dec_err[8] = opus_decoder_create(8000, 2, &err);
 | |
|    dec_err[9] = opus_decoder_create(8000, 1, &err);
 | |
|    for(i=0;i<10;i++)if(dec_err[i]==NULL)test_failed();
 | |
| 
 | |
|    {
 | |
|       OpusEncoder *enccpy;
 | |
|       /*The opus state structures contain no pointers and can be freely copied*/
 | |
|       enccpy=(OpusEncoder *)malloc(opus_encoder_get_size(2));
 | |
|       memcpy(enccpy,enc,opus_encoder_get_size(2));
 | |
|       memset(enc,255,opus_encoder_get_size(2));
 | |
|       opus_encoder_destroy(enc);
 | |
|       enc=enccpy;
 | |
|    }
 | |
| 
 | |
|    inbuf=(short *)malloc(sizeof(short)*SAMPLES*2);
 | |
|    outbuf=(short *)malloc(sizeof(short)*SAMPLES*2);
 | |
|    out2buf=(short *)malloc(sizeof(short)*MAX_FRAME_SAMP*3);
 | |
|    if(inbuf==NULL || outbuf==NULL || out2buf==NULL)test_failed();
 | |
| 
 | |
|    generate_music(inbuf,SAMPLES);
 | |
| 
 | |
| /*   FILE *foo;
 | |
|    foo = fopen("foo.sw", "wb+");
 | |
|    fwrite(inbuf, 1, SAMPLES*2*2, foo);
 | |
|    fclose(foo);*/
 | |
| 
 | |
|    if(opus_encoder_ctl(enc, OPUS_SET_BANDWIDTH(OPUS_AUTO))!=OPUS_OK)test_failed();
 | |
|    if(opus_encoder_ctl(enc, OPUS_SET_FORCE_MODE(-2))!=OPUS_BAD_ARG)test_failed();
 | |
|    if(opus_encode(enc, inbuf, 500, packet, MAX_PACKET)!=OPUS_BAD_ARG)test_failed();
 | |
| 
 | |
|    for(rc=0;rc<3;rc++)
 | |
|    {
 | |
|       if(opus_encoder_ctl(enc, OPUS_SET_VBR(rc<2))!=OPUS_OK)test_failed();
 | |
|       if(opus_encoder_ctl(enc, OPUS_SET_VBR_CONSTRAINT(rc==1))!=OPUS_OK)test_failed();
 | |
|       if(opus_encoder_ctl(enc, OPUS_SET_VBR_CONSTRAINT(rc==1))!=OPUS_OK)test_failed();
 | |
|       if(opus_encoder_ctl(enc, OPUS_SET_INBAND_FEC(rc==0))!=OPUS_OK)test_failed();
 | |
|       for(j=0;j<13;j++)
 | |
|       {
 | |
|          int rate;
 | |
|          int modes[13]={0,0,0,1,1,1,1,2,2,2,2,2,2};
 | |
|          int rates[13]={6000,12000,48000,16000,32000,48000,64000,512000,13000,24000,48000,64000,96000};
 | |
|          int frame[13]={960*2,960,480,960,960,960,480,960*3,960*3,960,480,240,120};
 | |
|          rate=rates[j]+fast_rand()%rates[j];
 | |
|          count=i=0;
 | |
|          do {
 | |
|             int bw,len,out_samples,frame_size;
 | |
|             frame_size=frame[j];
 | |
|             if((fast_rand()&255)==0)
 | |
|             {
 | |
|                if(opus_encoder_ctl(enc, OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|                if(opus_decoder_ctl(dec, OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|                if((fast_rand()&1)!=0)
 | |
|                {
 | |
|                   if(opus_decoder_ctl(dec_err[fast_rand()&1], OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|                }
 | |
|             }
 | |
|             if((fast_rand()&127)==0)
 | |
|             {
 | |
|                if(opus_decoder_ctl(dec_err[fast_rand()&1], OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|             }
 | |
|             if(fast_rand()%10==0){
 | |
|                int complex=fast_rand()%11;
 | |
|                if(opus_encoder_ctl(enc, OPUS_SET_COMPLEXITY(complex))!=OPUS_OK)test_failed();
 | |
|             }
 | |
|             if(fast_rand()%50==0)opus_decoder_ctl(dec, OPUS_RESET_STATE);
 | |
|             if(opus_encoder_ctl(enc, OPUS_SET_INBAND_FEC(rc==0))!=OPUS_OK)test_failed();
 | |
|             if(opus_encoder_ctl(enc, OPUS_SET_FORCE_MODE(MODE_SILK_ONLY+modes[j]))!=OPUS_OK)test_failed();
 | |
|             if(opus_encoder_ctl(enc, OPUS_SET_DTX(fast_rand()&1))!=OPUS_OK)test_failed();
 | |
|             if(opus_encoder_ctl(enc, OPUS_SET_BITRATE(rate))!=OPUS_OK)test_failed();
 | |
|             if(opus_encoder_ctl(enc, OPUS_SET_FORCE_CHANNELS((rates[j]>=64000?2:1)))!=OPUS_OK)test_failed();
 | |
|             if(opus_encoder_ctl(enc, OPUS_SET_COMPLEXITY((count>>2)%11))!=OPUS_OK)test_failed();
 | |
|             if(opus_encoder_ctl(enc, OPUS_SET_PACKET_LOSS_PERC((fast_rand()&15)&(fast_rand()%15)))!=OPUS_OK)test_failed();
 | |
|             bw=modes[j]==0?OPUS_BANDWIDTH_NARROWBAND+(fast_rand()%3):
 | |
|                modes[j]==1?OPUS_BANDWIDTH_SUPERWIDEBAND+(fast_rand()&1):
 | |
|                            OPUS_BANDWIDTH_NARROWBAND+(fast_rand()%5);
 | |
|             if(modes[j]==2&&bw==OPUS_BANDWIDTH_MEDIUMBAND)bw+=3;
 | |
|             if(opus_encoder_ctl(enc, OPUS_SET_BANDWIDTH(bw))!=OPUS_OK)test_failed();
 | |
|             len = opus_encode(enc, &inbuf[i<<1], frame_size, packet, MAX_PACKET);
 | |
|             if(len<0 || len>MAX_PACKET)test_failed();
 | |
|             if(opus_encoder_ctl(enc, OPUS_GET_FINAL_RANGE(&enc_final_range))!=OPUS_OK)test_failed();
 | |
|             if((fast_rand()&3)==0)
 | |
|             {
 | |
|                if(opus_packet_pad(packet,len,len+1)!=OPUS_OK)test_failed();
 | |
|                len++;
 | |
|             }
 | |
|             if((fast_rand()&7)==0)
 | |
|             {
 | |
|                if(opus_packet_pad(packet,len,len+256)!=OPUS_OK)test_failed();
 | |
|                len+=256;
 | |
|             }
 | |
|             if((fast_rand()&3)==0)
 | |
|             {
 | |
|                len=opus_packet_unpad(packet,len);
 | |
|                if(len<1)test_failed();
 | |
|             }
 | |
|             out_samples = opus_decode(dec, packet, len, &outbuf[i<<1], MAX_FRAME_SAMP, 0);
 | |
|             if(out_samples!=frame_size)test_failed();
 | |
|             if(opus_decoder_ctl(dec, OPUS_GET_FINAL_RANGE(&dec_final_range))!=OPUS_OK)test_failed();
 | |
|             if(enc_final_range!=dec_final_range)test_failed();
 | |
|             /*LBRR decode*/
 | |
|             out_samples = opus_decode(dec_err[0], packet, len, out2buf, frame_size, (fast_rand()&3)!=0);
 | |
|             if(out_samples!=frame_size)test_failed();
 | |
|             out_samples = opus_decode(dec_err[1], packet, (fast_rand()&3)==0?0:len, out2buf, MAX_FRAME_SAMP, (fast_rand()&7)!=0);
 | |
|             if(out_samples<120)test_failed();
 | |
|             i+=frame_size;
 | |
|             count++;
 | |
|          }while(i<(SSAMPLES-MAX_FRAME_SAMP));
 | |
|          fprintf(stdout,"    Mode %s FB encode %s, %6d bps OK.\n",mstrings[modes[j]],rc==0?" VBR":rc==1?"CVBR":" CBR",rate);
 | |
|          fflush(stdout);
 | |
|       }
 | |
|    }
 | |
| 
 | |
|    if(opus_encoder_ctl(enc, OPUS_SET_FORCE_MODE(OPUS_AUTO))!=OPUS_OK)test_failed();
 | |
|    if(opus_encoder_ctl(enc, OPUS_SET_FORCE_CHANNELS(OPUS_AUTO))!=OPUS_OK)test_failed();
 | |
|    if(opus_encoder_ctl(enc, OPUS_SET_INBAND_FEC(0))!=OPUS_OK)test_failed();
 | |
|    if(opus_encoder_ctl(enc, OPUS_SET_DTX(0))!=OPUS_OK)test_failed();
 | |
| 
 | |
|    for(rc=0;rc<3;rc++)
 | |
|    {
 | |
|       if(opus_multistream_encoder_ctl(MSenc, OPUS_SET_VBR(rc<2))!=OPUS_OK)test_failed();
 | |
|       if(opus_multistream_encoder_ctl(MSenc, OPUS_SET_VBR_CONSTRAINT(rc==1))!=OPUS_OK)test_failed();
 | |
|       if(opus_multistream_encoder_ctl(MSenc, OPUS_SET_VBR_CONSTRAINT(rc==1))!=OPUS_OK)test_failed();
 | |
|       if(opus_multistream_encoder_ctl(MSenc, OPUS_SET_INBAND_FEC(rc==0))!=OPUS_OK)test_failed();
 | |
|       for(j=0;j<16;j++)
 | |
|       {
 | |
|          int rate;
 | |
|          int modes[16]={0,0,0,0,0,0,0,0,2,2,2,2,2,2,2,2};
 | |
|          int rates[16]={4000,12000,32000,8000,16000,32000,48000,88000,4000,12000,32000,8000,16000,32000,48000,88000};
 | |
|          int frame[16]={160*1,160,80,160,160,80,40,20,160*1,160,80,160,160,80,40,20};
 | |
|          if(opus_multistream_encoder_ctl(MSenc, OPUS_SET_INBAND_FEC(rc==0&&j==1))!=OPUS_OK)test_failed();
 | |
|          if(opus_multistream_encoder_ctl(MSenc, OPUS_SET_FORCE_MODE(MODE_SILK_ONLY+modes[j]))!=OPUS_OK)test_failed();
 | |
|          rate=rates[j]+fast_rand()%rates[j];
 | |
|          if(opus_multistream_encoder_ctl(MSenc, OPUS_SET_DTX(fast_rand()&1))!=OPUS_OK)test_failed();
 | |
|          if(opus_multistream_encoder_ctl(MSenc, OPUS_SET_BITRATE(rate))!=OPUS_OK)test_failed();
 | |
|          count=i=0;
 | |
|          do {
 | |
|             int len,out_samples,frame_size,loss;
 | |
|             opus_int32 pred;
 | |
|             if(opus_multistream_encoder_ctl(MSenc, OPUS_GET_PREDICTION_DISABLED(&pred))!=OPUS_OK)test_failed();
 | |
|             if(opus_multistream_encoder_ctl(MSenc, OPUS_SET_PREDICTION_DISABLED((int)(fast_rand()&15)<(pred?11:4)))!=OPUS_OK)test_failed();
 | |
|             frame_size=frame[j];
 | |
|             if(opus_multistream_encoder_ctl(MSenc, OPUS_SET_COMPLEXITY((count>>2)%11))!=OPUS_OK)test_failed();
 | |
|             if(opus_multistream_encoder_ctl(MSenc, OPUS_SET_PACKET_LOSS_PERC((fast_rand()&15)&(fast_rand()%15)))!=OPUS_OK)test_failed();
 | |
|             if((fast_rand()&255)==0)
 | |
|             {
 | |
|                if(opus_multistream_encoder_ctl(MSenc, OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|                if(opus_multistream_decoder_ctl(MSdec, OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|                if((fast_rand()&3)!=0)
 | |
|                {
 | |
|                   if(opus_multistream_decoder_ctl(MSdec_err, OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|                }
 | |
|             }
 | |
|             if((fast_rand()&255)==0)
 | |
|             {
 | |
|                if(opus_multistream_decoder_ctl(MSdec_err, OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|             }
 | |
|             len = opus_multistream_encode(MSenc, &inbuf[i<<1], frame_size, packet, MAX_PACKET);
 | |
|             if(len<0 || len>MAX_PACKET)test_failed();
 | |
|             if(opus_multistream_encoder_ctl(MSenc, OPUS_GET_FINAL_RANGE(&enc_final_range))!=OPUS_OK)test_failed();
 | |
|             if((fast_rand()&3)==0)
 | |
|             {
 | |
|                if(opus_multistream_packet_pad(packet,len,len+1,2)!=OPUS_OK)test_failed();
 | |
|                len++;
 | |
|             }
 | |
|             if((fast_rand()&7)==0)
 | |
|             {
 | |
|                if(opus_multistream_packet_pad(packet,len,len+256,2)!=OPUS_OK)test_failed();
 | |
|                len+=256;
 | |
|             }
 | |
|             if((fast_rand()&3)==0)
 | |
|             {
 | |
|                len=opus_multistream_packet_unpad(packet,len,2);
 | |
|                if(len<1)test_failed();
 | |
|             }
 | |
|             out_samples = opus_multistream_decode(MSdec, packet, len, out2buf, MAX_FRAME_SAMP, 0);
 | |
|             if(out_samples!=frame_size*6)test_failed();
 | |
|             if(opus_multistream_decoder_ctl(MSdec, OPUS_GET_FINAL_RANGE(&dec_final_range))!=OPUS_OK)test_failed();
 | |
|             if(enc_final_range!=dec_final_range)test_failed();
 | |
|             /*LBRR decode*/
 | |
|             loss=(fast_rand()&63)==0;
 | |
|             out_samples = opus_multistream_decode(MSdec_err, packet, loss?0:len, out2buf, frame_size*6, (fast_rand()&3)!=0);
 | |
|             if(out_samples!=(frame_size*6))test_failed();
 | |
|             i+=frame_size;
 | |
|             count++;
 | |
|          }while(i<(SSAMPLES/12-MAX_FRAME_SAMP));
 | |
|          fprintf(stdout,"    Mode %s NB dual-mono MS encode %s, %6d bps OK.\n",mstrings[modes[j]],rc==0?" VBR":rc==1?"CVBR":" CBR",rate);
 | |
|          fflush(stdout);
 | |
|       }
 | |
|    }
 | |
| 
 | |
|    bitrate_bps=512000;
 | |
|    fsize=fast_rand()%31;
 | |
|    fswitch=100;
 | |
| 
 | |
|    debruijn2(6,db62);
 | |
|    count=i=0;
 | |
|    do {
 | |
|       unsigned char toc;
 | |
|       const unsigned char *frames[48];
 | |
|       short size[48];
 | |
|       int payload_offset;
 | |
|       opus_uint32 dec_final_range2;
 | |
|       int jj,dec2;
 | |
|       int len,out_samples;
 | |
|       int frame_size=fsizes[db62[fsize]];
 | |
|       opus_int32 offset=i%(SAMPLES-MAX_FRAME_SAMP);
 | |
| 
 | |
|       opus_encoder_ctl(enc, OPUS_SET_BITRATE(bitrate_bps));
 | |
| 
 | |
|       len = opus_encode(enc, &inbuf[offset<<1], frame_size, packet, MAX_PACKET);
 | |
|       if(len<0 || len>MAX_PACKET)test_failed();
 | |
|       count++;
 | |
| 
 | |
|       opus_encoder_ctl(enc, OPUS_GET_FINAL_RANGE(&enc_final_range));
 | |
| 
 | |
|       out_samples = opus_decode(dec, packet, len, &outbuf[offset<<1], MAX_FRAME_SAMP, 0);
 | |
|       if(out_samples!=frame_size)test_failed();
 | |
| 
 | |
|       opus_decoder_ctl(dec, OPUS_GET_FINAL_RANGE(&dec_final_range));
 | |
| 
 | |
|       /* compare final range encoder rng values of encoder and decoder */
 | |
|       if(dec_final_range!=enc_final_range)test_failed();
 | |
| 
 | |
|       /* We fuzz the packet, but take care not to only corrupt the payload
 | |
|          Corrupted headers are tested elsewhere and we need to actually run
 | |
|          the decoders in order to compare them. */
 | |
|       if(opus_packet_parse(packet,len,&toc,frames,size,&payload_offset)<=0)test_failed();
 | |
|       if((fast_rand()&1023)==0)len=0;
 | |
|       for(j=(opus_int32)(frames[0]-packet);j<len;j++)for(jj=0;jj<8;jj++)packet[j]^=((!no_fuzz)&&((fast_rand()&1023)==0))<<jj;
 | |
|       out_samples = opus_decode(dec_err[0], len>0?packet:NULL, len, out2buf, MAX_FRAME_SAMP, 0);
 | |
|       if(out_samples<0||out_samples>MAX_FRAME_SAMP)test_failed();
 | |
|       if((len>0&&out_samples!=frame_size))test_failed(); /*FIXME use lastframe*/
 | |
| 
 | |
|       opus_decoder_ctl(dec_err[0], OPUS_GET_FINAL_RANGE(&dec_final_range));
 | |
| 
 | |
|       /*randomly select one of the decoders to compare with*/
 | |
|       dec2=fast_rand()%9+1;
 | |
|       out_samples = opus_decode(dec_err[dec2], len>0?packet:NULL, len, out2buf, MAX_FRAME_SAMP, 0);
 | |
|       if(out_samples<0||out_samples>MAX_FRAME_SAMP)test_failed(); /*FIXME, use factor, lastframe for loss*/
 | |
| 
 | |
|       opus_decoder_ctl(dec_err[dec2], OPUS_GET_FINAL_RANGE(&dec_final_range2));
 | |
|       if(len>0&&dec_final_range!=dec_final_range2)test_failed();
 | |
| 
 | |
|       fswitch--;
 | |
|       if(fswitch<1)
 | |
|       {
 | |
|         int new_size;
 | |
|         fsize=(fsize+1)%36;
 | |
|         new_size=fsizes[db62[fsize]];
 | |
|         if(new_size==960||new_size==480)fswitch=2880/new_size*(fast_rand()%19+1);
 | |
|         else fswitch=(fast_rand()%(2880/new_size))+1;
 | |
|       }
 | |
|       bitrate_bps=((fast_rand()%508000+4000)+bitrate_bps)>>1;
 | |
|       i+=frame_size;
 | |
|    }while(i<SAMPLES*4);
 | |
|    fprintf(stdout,"    All framesize pairs switching encode, %d frames OK.\n",count);
 | |
|    fflush(stdout);
 | |
| 
 | |
|    if(opus_encoder_ctl(enc, OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|    opus_encoder_destroy(enc);
 | |
|    if(opus_multistream_encoder_ctl(MSenc, OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|    opus_multistream_encoder_destroy(MSenc);
 | |
|    if(opus_decoder_ctl(dec, OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|    opus_decoder_destroy(dec);
 | |
|    if(opus_multistream_decoder_ctl(MSdec, OPUS_RESET_STATE)!=OPUS_OK)test_failed();
 | |
|    opus_multistream_decoder_destroy(MSdec);
 | |
|    opus_multistream_decoder_destroy(MSdec_err);
 | |
|    for(i=0;i<10;i++)opus_decoder_destroy(dec_err[i]);
 | |
|    free(inbuf);
 | |
|    free(outbuf);
 | |
|    free(out2buf);
 | |
|    return 0;
 | |
| }
 | |
| 
 | |
| void print_usage(char* _argv[])
 | |
| {
 | |
|    fprintf(stderr,"Usage: %s [<seed>] [-fuzz <num_encoders> <num_settings_per_encoder>]\n",_argv[0]);
 | |
| }
 | |
| 
 | |
| int main(int _argc, char **_argv)
 | |
| {
 | |
|    int args=1;
 | |
|    char * strtol_str=NULL;
 | |
|    const char * oversion;
 | |
|    const char * env_seed;
 | |
|    int env_used;
 | |
|    int num_encoders_to_fuzz=5;
 | |
|    int num_setting_changes=40;
 | |
| 
 | |
|    env_used=0;
 | |
|    env_seed=getenv("SEED");
 | |
|    if(_argc>1)
 | |
|       iseed=strtol(_argv[1], &strtol_str, 10);  /* the first input argument might be the seed */
 | |
|    if(strtol_str!=NULL && strtol_str[0]=='\0')   /* iseed is a valid number */
 | |
|       args++;
 | |
|    else if(env_seed) {
 | |
|       iseed=atoi(env_seed);
 | |
|       env_used=1;
 | |
|    }
 | |
|    else iseed=(opus_uint32)time(NULL)^(((opus_uint32)getpid()&65535)<<16);
 | |
|    Rw=Rz=iseed;
 | |
| 
 | |
|    while(args<_argc)
 | |
|    {
 | |
|       if(strcmp(_argv[args], "-fuzz")==0 && _argc==(args+3)) {
 | |
|          num_encoders_to_fuzz=strtol(_argv[args+1], &strtol_str, 10);
 | |
|          if(strtol_str[0]!='\0' || num_encoders_to_fuzz<=0) {
 | |
|             print_usage(_argv);
 | |
|             return EXIT_FAILURE;
 | |
|          }
 | |
|          num_setting_changes=strtol(_argv[args+2], &strtol_str, 10);
 | |
|          if(strtol_str[0]!='\0' || num_setting_changes<=0) {
 | |
|             print_usage(_argv);
 | |
|             return EXIT_FAILURE;
 | |
|          }
 | |
|          args+=3;
 | |
|       }
 | |
|       else {
 | |
|         print_usage(_argv);
 | |
|         return EXIT_FAILURE;
 | |
|       }
 | |
|    }
 | |
| 
 | |
|    oversion=opus_get_version_string();
 | |
|    if(!oversion)test_failed();
 | |
|    fprintf(stderr,"Testing %s encoder. Random seed: %u (%.4X)\n", oversion, iseed, fast_rand() % 65535);
 | |
|    if(env_used)fprintf(stderr,"  Random seed set from the environment (SEED=%s).\n", env_seed);
 | |
| 
 | |
|    regression_test();
 | |
| 
 | |
|    /*Setting TEST_OPUS_NOFUZZ tells the tool not to send garbage data
 | |
|      into the decoders. This is helpful because garbage data
 | |
|      may cause the decoders to clip, which angers CLANG IOC.*/
 | |
|    run_test1(getenv("TEST_OPUS_NOFUZZ")!=NULL);
 | |
| 
 | |
|    /* Fuzz encoder settings online */
 | |
|    if(getenv("TEST_OPUS_NOFUZZ")==NULL) {
 | |
|       fprintf(stderr,"Running fuzz_encoder_settings with %d encoder(s) and %d setting change(s) each.\n",
 | |
|               num_encoders_to_fuzz, num_setting_changes);
 | |
|       fuzz_encoder_settings(num_encoders_to_fuzz, num_setting_changes);
 | |
|    }
 | |
| 
 | |
|    fprintf(stderr,"Tests completed successfully.\n");
 | |
| 
 | |
|    return 0;
 | |
| }
 | 
