@scrypted/libav 1.0.170 → 1.0.171

package/opus/celt/opus_custom_demo.c

@@ -1,451 +0,0 @@
-/* Copyright (c) 2007-2008 CSIRO
-   Copyright (c) 2007-2009 Xiph.Org Foundation
-   Written by Jean-Marc Valin */
-/*
-   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 "opus_custom.h"
-#include "arch.h"
-#include <stdio.h>
-#include <stdlib.h>
-#include <math.h>
-#include <string.h>
-
-#define MAX_PACKET 1275
-
-static void print_usage(char **argv) {
-   fprintf (stderr, "Usage: %s [-e | -d] <rate> <channels> <frame size> "
-                  " [<bytes per packet>] [options] "
-                  "<input> <output>\n", argv[0]);
-   fprintf (stderr, "     -e encode only (default is encode and decode)\n");
-   fprintf (stderr, "     -d decode only (default is encode and decode)\n");
-   fprintf (stderr, "     <bytes per packet>: required only when encoding\n");
-   fprintf (stderr, "options:\n");
-   fprintf (stderr, "     -16                      format is 16-bit little-endian (default)\n");
-   fprintf (stderr, "     -24                      format is 24-bit little-endian\n");
-   fprintf (stderr, "     -f32                     format is 32-bit float little-endian\n");
-   fprintf (stderr, "     -complexity <0-10>       optional only when encoding\n");
-   fprintf (stderr, "     -loss <percentage>       encoding (robsutness setting) and decoding (simulating loss)\n");
-}
-
-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_uint32 char_to_int(unsigned char ch[4])
-{
-    return ((opus_uint32)ch[0]<<24) | ((opus_uint32)ch[1]<<16)
-         | ((opus_uint32)ch[2]<< 8) |  (opus_uint32)ch[3];
-}
-
-#define check_encoder_option(decode_only, opt) do {if (decode_only) {fprintf(stderr, "option %s is only for encoding\n", opt); goto failure;}} while(0)
-#define check_decoder_option(encode_only, opt) do {if (encode_only) {fprintf(stderr, "option %s is only for decoding\n", opt); goto failure;}} while(0)
-
-#define FORMAT_S16_LE 0
-#define FORMAT_S24_LE 1
-#define FORMAT_F32_LE 2
-
-static const int format_size[3] = {2, 3, 4};
-
-typedef union {
-    opus_int32 i;
-    float f;
-} float_bits;
-
-
-int main(int argc, char *argv[])
-{
-   int err;
-   int ret=1;
-   int args;
-   opus_uint32 enc_final_range;
-   opus_uint32 dec_final_range;
-   int encode_only=0, decode_only=0;
-   char *inFile, *outFile;
-   FILE *fin=NULL, *fout=NULL;
-   OpusCustomMode *mode=NULL;
-   OpusCustomEncoder *enc=NULL;
-   OpusCustomDecoder *dec=NULL;
-   int len;
-   opus_int32 frame_size, channels, rate;
-   int format=FORMAT_S16_LE;
-   int bytes_per_packet=0;
-   unsigned char data[MAX_PACKET];
-   int complexity=-1;
-   float percent_loss = -1;
-   int i;
-#if !(defined (FIXED_POINT) && !defined(CUSTOM_MODES)) && defined(RESYNTH)
-   double rmsd = 0;
-#endif
-   int count = 0;
-   opus_int32 skip;
-   opus_int32 *in=NULL, *out=NULL;
-   unsigned char *fbytes=NULL;
-   args = 1;
-   if (argc < 7)
-   {
-      print_usage(argv);
-      goto failure;
-   }
-   if (strcmp(argv[args], "-e")==0)
-   {
-      encode_only = 1;
-      args++;
-   } else if (strcmp(argv[args], "-d")==0)
-   {
-      decode_only = 1;
-      args++;
-   }
-
-   rate = (opus_int32)atol(argv[args]);
-   args++;
-
-   if (rate != 8000 && rate != 12000
-    && rate != 16000 && rate != 24000
-    && rate != 48000)
-   {
-       fprintf(stderr, "Supported sampling rates are 8000, 12000, "
-               "16000, 24000 and 48000.\n");
-       goto failure;
-   }
-
-   channels = atoi(argv[args]);
-   args++;
-
-   if (channels < 1 || channels > 2)
-   {
-       fprintf(stderr, "Opus_demo supports only 1 or 2 channels.\n");
-       goto failure;
-   }
-
-   frame_size = atoi(argv[args]);
-   args++;
-
-   if (!decode_only)
-   {
-      bytes_per_packet = (opus_int32)atol(argv[args]);
-      args++;
-      if (bytes_per_packet < 0 || bytes_per_packet > MAX_PACKET)
-      {
-         fprintf (stderr, "bytes per packet must be between 0 and %d\n",
-                           MAX_PACKET);
-         goto failure;
-      }
-   }
-
-   mode = opus_custom_mode_create(rate, frame_size, NULL);
-   if (mode == NULL)
-   {
-      fprintf(stderr, "failed to create a mode\n");
-      goto failure;
-   }
-   while( args < argc - 2 ) {
-       /* process command line options */
-       if( strcmp( argv[ args ], "-complexity" ) == 0 ) {
-           check_encoder_option(decode_only, "-complexity");
-           args++;
-           complexity=atoi(argv[args]);
-           args++;
-       } else if( strcmp( argv[ args ], "-loss" ) == 0 ) {
-          args++;
-          percent_loss = atof(argv[args]);
-          args++;
-       } else if( strcmp( argv[ args ], "-16" ) == 0 ) {
-          format = FORMAT_S16_LE;
-          args++;
-       } else if( strcmp( argv[ args ], "-24" ) == 0 ) {
-          format = FORMAT_S24_LE;
-          args++;
-       } else if( strcmp( argv[ args ], "-f32" ) == 0 ) {
-          format = FORMAT_F32_LE;
-          args++;
-       } else {
-          printf( "Error: unrecognized setting: %s\n\n", argv[ args ] );
-          print_usage( argv );
-          goto failure;
-      }
-   }
-   if (!decode_only) {
-      enc = opus_custom_encoder_create(mode, channels, &err);
-      if (err != 0)
-      {
-         fprintf(stderr, "Failed to create the encoder: %s\n", opus_strerror(err));
-         goto failure;
-      }
-      if (complexity >= 0)
-      {
-         opus_custom_encoder_ctl(enc,OPUS_SET_COMPLEXITY(complexity));
-      }
-      if (percent_loss >= 0) {
-         opus_custom_encoder_ctl(enc, OPUS_SET_PACKET_LOSS_PERC((int)percent_loss));
-      }
-   }
-   if (!encode_only) {
-      dec = opus_custom_decoder_create(mode, channels, &err);
-      if (err != 0)
-      {
-         fprintf(stderr, "Failed to create the decoder: %s\n", opus_strerror(err));
-         goto failure;
-      }
-      opus_custom_decoder_ctl(dec, OPUS_GET_LOOKAHEAD(&skip));
-   }
-   if (argc-args != 2)
-   {
-      print_usage(argv);
-      goto failure;
-   }
-   inFile = argv[argc-2];
-   fin = fopen(inFile, "rb");
-   if (!fin)
-   {
-      fprintf (stderr, "Could not open input file %s\n", argv[argc-2]);
-      goto failure;
-   }
-   outFile = argv[argc-1];
-   fout = fopen(outFile, "wb+");
-   if (!fout)
-   {
-      fprintf (stderr, "Could not open output file %s\n", argv[argc-1]);
-      goto failure;
-   }
-   in = (opus_int32*)malloc(frame_size*channels*sizeof(opus_int32));
-   out = (opus_int32*)malloc(frame_size*channels*sizeof(opus_int32));
-   fbytes = (unsigned char*)malloc(frame_size*channels*4);
-
-   while (!feof(fin))
-   {
-      int lost = 0;
-      if (decode_only)
-      {
-          unsigned char ch[4];
-          size_t num_read = fread(ch, 1, 4, fin);
-          if (num_read!=4)
-              break;
-          len = char_to_int(ch);
-          if (len>MAX_PACKET || len<0)
-          {
-              fprintf(stderr, "Invalid payload length: %d\n",len);
-              break;
-          }
-          num_read = fread(ch, 1, 4, fin);
-          if (num_read!=4)
-              break;
-          enc_final_range = char_to_int(ch);
-          num_read = fread(data, 1, len, fin);
-          if (num_read!=(size_t)len)
-          {
-              fprintf(stderr, "Ran out of input, "
-                              "expecting %d bytes got %d\n",
-                              len,(int)num_read);
-              break;
-          }
-      } else {
-         err = fread(fbytes, format_size[format], frame_size*channels, fin);
-         if (feof(fin))
-            break;
-         if (format == FORMAT_S16_LE) {
-            for(i=0;i<frame_size*channels;i++)
-            {
-               opus_int32 s;
-               s=fbytes[2*i+1]<<8|fbytes[2*i];
-               s=((s&0xFFFF)^0x8000)-0x8000;
-               in[i]=s*256;
-            }
-         } else if (format == FORMAT_S24_LE) {
-            for(i=0;i<frame_size*channels;i++)
-            {
-               opus_int32 s;
-               s=fbytes[3*i+2]<<16|fbytes[3*i+1]<<8|fbytes[3*i];
-               s=((s&0xFFFFFF)^0x800000)-0x800000;
-               in[i]=s;
-            }
-         } else if (format == FORMAT_F32_LE) {
-            for(i=0;i<frame_size*channels;i++)
-            {
-               float_bits s;
-               s.i=fbytes[4*i+3]<<24|fbytes[4*i+2]<<16|fbytes[4*i+1]<<8|fbytes[4*i];
-               in[i]=(int)floor(.5 + s.f*8388608);
-            }
-         }
-         len = opus_custom_encode24(enc, in, frame_size, data, bytes_per_packet);
-         opus_custom_encoder_ctl(enc, OPUS_GET_FINAL_RANGE(&enc_final_range));
-         if (len <= 0)
-            fprintf (stderr, "opus_custom_encode() failed: %s\n", opus_strerror(len));
-      }
-
-      if (encode_only)
-      {
-          unsigned char int_field[4];
-          int_to_char(len, int_field);
-          if (fwrite(int_field, 1, 4, fout) != 4) {
-             fprintf(stderr, "Error writing.\n");
-             goto failure;
-          }
-          int_to_char(enc_final_range, int_field);
-          if (fwrite(int_field, 1, 4, fout) != 4) {
-             fprintf(stderr, "Error writing.\n");
-             goto failure;
-          }
-          if (fwrite(data, 1, len, fout) != (unsigned)len) {
-             fprintf(stderr, "Error writing.\n");
-             goto failure;
-          }
-      } else {
-         /* This is for simulating bit errors */
-#if 0
-         int errors = 0;
-         int eid = 0;
-         /* This simulates random bit error */
-         for (i=0;i<len*8;i++)
-         {
-            if (rand()%atoi(argv[8])==0)
-            {
-               if (i<64)
-               {
-                  errors++;
-                  eid = i;
-               }
-               data[i/8] ^= 1<<(7-(i%8));
-            }
-         }
-         if (errors == 1)
-            data[eid/8] ^= 1<<(7-(eid%8));
-         else if (errors%2 == 1)
-            data[rand()%8] ^= 1<<rand()%8;
-#endif
-
-#if 1 /* Set to zero to use the encoder's output instead */
-         /* This is to simulate packet loss */
-         lost = percent_loss != 0 && (float)rand()/RAND_MAX<.01*percent_loss;
-         if (lost)
-            /*if (errors && (errors%2==0))*/
-            ret = opus_custom_decode24(dec, NULL, len, out, frame_size);
-         else
-            ret = opus_custom_decode24(dec, data, len, out, frame_size);
-         opus_custom_decoder_ctl(dec, OPUS_GET_FINAL_RANGE(&dec_final_range));
-         if (ret < 0)
-            fprintf(stderr, "opus_custom_decode() failed: %s\n", opus_strerror(ret));
-#else
-         for (i=0;i<ret*channels;i++)
-            out[i] = in[i];
-#endif
-#if !(defined (FIXED_POINT) && !defined(CUSTOM_MODES)) && defined(RESYNTH)
-         if (!encode_only && !decode_only)
-         {
-            for (i=0;i<ret*channels;i++)
-            {
-               rmsd += (in[i]-out[i])*1.0*(in[i]-out[i]);
-               /*out[i] -= in[i];*/
-            }
-         }
-#endif
-         if (format == FORMAT_S16_LE) {
-            for(i=0;i<(ret-skip)*channels;i++)
-            {
-               opus_int32 s;
-               s=(out[i+(skip*channels)]+128)>>8;
-               if (s > 32767) s = 32767;
-               if (s < -32767) s = -32767;
-               fbytes[2*i]=s&0xFF;
-               fbytes[2*i+1]=(s>>8)&0xFF;
-            }
-         } else if (format == FORMAT_S24_LE) {
-            for(i=0;i<(ret-skip)*channels;i++)
-            {
-               opus_int32 s;
-               s=out[i+(skip*channels)];
-               if (s > 8388607) s = 8388607;
-               if (s < -8388607) s = -8388607;
-               fbytes[3*i]=s&0xFF;
-               fbytes[3*i+1]=(s>>8)&0xFF;
-               fbytes[3*i+2]=(s>>16)&0xFF;
-            }
-         } else if (format == FORMAT_F32_LE) {
-            for(i=0;i<(ret-skip)*channels;i++)
-            {
-               float_bits s;
-               s.f=out[i+(skip*channels)]*(1.f/8388608.f);
-               fbytes[4*i]=s.i&0xFF;
-               fbytes[4*i+1]=(s.i>>8)&0xFF;
-               fbytes[4*i+2]=(s.i>>16)&0xFF;
-               fbytes[4*i+3]=(s.i>>24)&0xFF;
-            }
-         }
-         fwrite(fbytes, format_size[format], (ret-skip)*channels, fout);
-      }
-
-      /* compare final range encoder rng values of encoder and decoder */
-      if( enc_final_range!=0  && !encode_only
-       && !lost
-       && dec_final_range != enc_final_range ) {
-          fprintf (stderr, "Error: Range coder state mismatch "
-                           "between encoder and decoder "
-                           "in frame %ld: 0x%8lx vs 0x%8lx\n",
-                       (long)count,
-                       (unsigned long)enc_final_range,
-                       (unsigned long)dec_final_range);
-          goto failure;
-      }
-
-      count++;
-      skip = 0;
-   }
-   PRINT_MIPS(stderr);
-   ret = EXIT_SUCCESS;
-#if !(defined (FIXED_POINT) && !defined(CUSTOM_MODES)) && defined(RESYNTH)
-   if (!encode_only && !decode_only)
-   {
-      if (rmsd > 0)
-      {
-         rmsd = sqrt(rmsd/(1.0*frame_size*channels*count));
-         fprintf (stderr, "Error: encoder doesn't match decoder\n");
-         fprintf (stderr, "RMS mismatch is %f\n", rmsd);
-         ret = 1;
-      } else {
-         fprintf (stderr, "Encoder matches decoder!!\n");
-      }
-   }
-#endif
-failure:
-   /* Cleanup after ourselves. */
-   if (enc) opus_custom_encoder_destroy(enc);
-   if (dec) opus_custom_decoder_destroy(dec);
-   if (fin) fclose(fin);
-   if (fout) fclose(fout);
-   if (mode) opus_custom_mode_destroy(mode);
-   if (in) free(in);
-   if (out) free(out);
-   if (fbytes) free(fbytes);
-   return ret;
-}
-

package/opus/celt/os_support.h

@@ -1,99 +0,0 @@
-/* Copyright (C) 2007 Jean-Marc Valin
-
-   File: os_support.h
-   This is the (tiny) OS abstraction layer. Aside from math.h, this is the
-   only place where system headers are allowed.
-
-   Redistribution and use in source and binary forms, with or without
-   modification, are permitted provided that the following conditions are
-   met:
-
-   1. Redistributions of source code must retain the above copyright notice,
-   this list of conditions and the following disclaimer.
-
-   2. 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 AUTHOR ``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 AUTHOR 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.
-*/
-
-#ifndef OS_SUPPORT_H
-#define OS_SUPPORT_H
-
-#ifdef CUSTOM_SUPPORT
-#  include "custom_support.h"
-#endif
-
-#include "opus_types.h"
-#include "opus_defines.h"
-
-#include <string.h>
-#include <stdlib.h>
-
-/** Opus wrapper for malloc(). To do your own dynamic allocation replace this function, opus_realloc, and opus_free */
-#ifndef OVERRIDE_OPUS_ALLOC
-static OPUS_INLINE void *opus_alloc (size_t size)
-{
-   return malloc(size);
-}
-#endif
-
-#ifndef OVERRIDE_OPUS_REALLOC
-static OPUS_INLINE void *opus_realloc (void *ptr, size_t size)
-{
-   return realloc(ptr, size);
-}
-#endif
-
-/** Used only for non-threadsafe pseudostack.
-    If desired, this can always return the same area of memory rather than allocating a new one every time. */
-#ifndef OVERRIDE_OPUS_ALLOC_SCRATCH
-static OPUS_INLINE void *opus_alloc_scratch (size_t size)
-{
-   /* Scratch space doesn't need to be cleared */
-   return opus_alloc(size);
-}
-#endif
-
-/** Opus wrapper for free(). To do your own dynamic allocation replace this function, opus_realloc, and opus_free */
-#ifndef OVERRIDE_OPUS_FREE
-static OPUS_INLINE void opus_free (void *ptr)
-{
-   free(ptr);
-}
-#endif
-
-/** Copy n elements from src to dst. The 0* term provides compile-time type checking  */
-#ifndef OVERRIDE_OPUS_COPY
-#define OPUS_COPY(dst, src, n) (memcpy((dst), (src), (n)*sizeof(*(dst)) + 0*((dst)-(src)) ))
-#endif
-
-/** Copy n elements from src to dst, allowing overlapping regions. The 0* term
-    provides compile-time type checking */
-#ifndef OVERRIDE_OPUS_MOVE
-#define OPUS_MOVE(dst, src, n) (memmove((dst), (src), (n)*sizeof(*(dst)) + 0*((dst)-(src)) ))
-#endif
-
-/** Set n elements of dst to zero */
-#ifndef OVERRIDE_OPUS_CLEAR
-#define OPUS_CLEAR(dst, n) (memset((dst), 0, (n)*sizeof(*(dst))))
-#endif
-
-/*#ifdef __GNUC__
-#pragma GCC poison printf sprintf
-#pragma GCC poison malloc free realloc calloc
-#endif*/
-
-#endif /* OS_SUPPORT_H */
-