code.delx.au - pulseaudio/blob - src/tests/resampler-test.c

   1 /***
   2   This file is part of PulseAudio.
   3
   4   PulseAudio is free software; you can redistribute it and/or modify
   5   it under the terms of the GNU Lesser General Public License as published
   6   by the Free Software Foundation; either version 2.1 of the License,
   7   or (at your option) any later version.
   8
   9   PulseAudio is distributed in the hope that it will be useful, but
  10   WITHOUT ANY WARRANTY; without even the implied warranty of
  11   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  12   General Public License for more details.
  13
  14   You should have received a copy of the GNU Lesser General Public License
  15   along with PulseAudio; if not, write to the Free Software
  16   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  17   USA.
  18 ***/
  19
  20 #ifdef HAVE_CONFIG_H
  21 #include <config.h>
  22 #endif
  23
  24 #include <stdio.h>
  25
  26 #include <pulse/sample.h>
  27 #include <pulse/volume.h>
  28
  29 #include <pulsecore/resampler.h>
  30 #include <pulsecore/macro.h>
  31 #include <pulsecore/endianmacros.h>
  32 #include <pulsecore/memblock.h>
  33 #include <pulsecore/sample-util.h>
  34
  35 #include <liboil/liboil.h>
  36
  37 static void dump_block(const pa_sample_spec *ss, const pa_memchunk *chunk) {
  38     void *d;
  39     unsigned i;
  40
  41     d = pa_memblock_acquire(chunk->memblock);
  42
  43     switch (ss->format) {
  44
  45         case PA_SAMPLE_U8:
  46         case PA_SAMPLE_ULAW:
  47         case PA_SAMPLE_ALAW: {
  48             uint8_t *u = d;
  49
  50             for (i = 0; i < chunk->length / pa_frame_size(ss); i++)
  51                 printf("      0x%02x ", *(u++));
  52
  53             break;
  54         }
  55
  56         case PA_SAMPLE_S16NE:
  57         case PA_SAMPLE_S16RE: {
  58             uint16_t *u = d;
  59
  60             for (i = 0; i < chunk->length / pa_frame_size(ss); i++)
  61                 printf("    0x%04x ", *(u++));
  62
  63             break;
  64         }
  65
  66         case PA_SAMPLE_S32NE:
  67         case PA_SAMPLE_S32RE: {
  68             uint32_t *u = d;
  69
  70             for (i = 0; i < chunk->length / pa_frame_size(ss); i++)
  71                 printf("0x%08x ", *(u++));
  72
  73             break;
  74         }
  75
  76         case PA_SAMPLE_S24_32NE:
  77         case PA_SAMPLE_S24_32RE: {
  78             uint32_t *u = d;
  79
  80             for (i = 0; i < chunk->length / pa_frame_size(ss); i++)
  81                 printf("0x%08x ", *(u++));
  82
  83             break;
  84         }
  85
  86         case PA_SAMPLE_FLOAT32NE:
  87         case PA_SAMPLE_FLOAT32RE: {
  88             float *u = d;
  89
  90             for (i = 0; i < chunk->length / pa_frame_size(ss); i++) {
  91                 printf("%4.3g ", ss->format == PA_SAMPLE_FLOAT32NE ? *u : PA_FLOAT32_SWAP(*u));
  92                 u++;
  93             }
  94
  95             break;
  96         }
  97
  98         case PA_SAMPLE_S24LE:
  99         case PA_SAMPLE_S24BE: {
 100             uint8_t *u = d;
 101
 102             for (i = 0; i < chunk->length / pa_frame_size(ss); i++) {
 103                 printf("  0x%06x ", PA_READ24NE(u));
 104                 u += pa_frame_size(ss);
 105             }
 106
 107             break;
 108         }
 109
 110         default:
 111             pa_assert_not_reached();
 112     }
 113
 114     printf("\n");
 115
 116     pa_memblock_release(chunk->memblock);
 117 }
 118
 119 static pa_memblock* generate_block(pa_mempool *pool, const pa_sample_spec *ss) {
 120     pa_memblock *r;
 121     void *d;
 122     unsigned i;
 123
 124     pa_assert_se(r = pa_memblock_new(pool, pa_frame_size(ss) * 10));
 125     d = pa_memblock_acquire(r);
 126
 127     switch (ss->format) {
 128
 129         case PA_SAMPLE_U8:
 130         case PA_SAMPLE_ULAW:
 131         case PA_SAMPLE_ALAW: {
 132             uint8_t *u = d;
 133
 134             u[0] = 0x00;
 135             u[1] = 0xFF;
 136             u[2] = 0x7F;
 137             u[3] = 0x80;
 138             u[4] = 0x9f;
 139             u[5] = 0x3f;
 140             u[6] = 0x1;
 141             u[7] = 0xF0;
 142             u[8] = 0x20;
 143             u[9] = 0x21;
 144             break;
 145         }
 146
 147         case PA_SAMPLE_S16NE:
 148         case PA_SAMPLE_S16RE: {
 149             uint16_t *u = d;
 150
 151             u[0] = 0x0000;
 152             u[1] = 0xFFFF;
 153             u[2] = 0x7FFF;
 154             u[3] = 0x8000;
 155             u[4] = 0x9fff;
 156             u[5] = 0x3fff;
 157             u[6] = 0x1;
 158             u[7] = 0xF000;
 159             u[8] = 0x20;
 160             u[9] = 0x21;
 161             break;
 162         }
 163
 164         case PA_SAMPLE_S32NE:
 165         case PA_SAMPLE_S32RE: {
 166             uint32_t *u = d;
 167
 168             u[0] = 0x00000001;
 169             u[1] = 0xFFFF0002;
 170             u[2] = 0x7FFF0003;
 171             u[3] = 0x80000004;
 172             u[4] = 0x9fff0005;
 173             u[5] = 0x3fff0006;
 174             u[6] =    0x10007;
 175             u[7] = 0xF0000008;
 176             u[8] =   0x200009;
 177             u[9] =   0x21000A;
 178             break;
 179         }
 180
 181         case PA_SAMPLE_S24_32NE:
 182         case PA_SAMPLE_S24_32RE: {
 183             uint32_t *u = d;
 184
 185             u[0] = 0x000001;
 186             u[1] = 0xFF0002;
 187             u[2] = 0x7F0003;
 188             u[3] = 0x800004;
 189             u[4] = 0x9f0005;
 190             u[5] = 0x3f0006;
 191             u[6] =    0x107;
 192             u[7] = 0xF00008;
 193             u[8] =   0x2009;
 194             u[9] =   0x210A;
 195             break;
 196         }
 197
 198         case PA_SAMPLE_FLOAT32NE:
 199         case PA_SAMPLE_FLOAT32RE: {
 200             float *u = d;
 201
 202             u[0] = 0.0f;
 203             u[1] = -1.0f;
 204             u[2] = 1.0f;
 205             u[3] = 4711.0f;
 206             u[4] = 0.222f;
 207             u[5] = 0.33f;
 208             u[6] = -.3f;
 209             u[7] = 99.0f;
 210             u[8] = -0.555f;
 211             u[9] = -.123f;
 212
 213             if (ss->format == PA_SAMPLE_FLOAT32RE)
 214                 for (i = 0; i < 10; i++)
 215                     u[i] = PA_FLOAT32_SWAP(u[i]);
 216
 217             break;
 218         }
 219
 220         case PA_SAMPLE_S24NE:
 221         case PA_SAMPLE_S24RE: {
 222             uint8_t *u = d;
 223
 224             PA_WRITE24NE(u,    0x000001);
 225             PA_WRITE24NE(u+3,  0xFF0002);
 226             PA_WRITE24NE(u+6,  0x7F0003);
 227             PA_WRITE24NE(u+9,  0x800004);
 228             PA_WRITE24NE(u+12, 0x9f0005);
 229             PA_WRITE24NE(u+15, 0x3f0006);
 230             PA_WRITE24NE(u+18,    0x107);
 231             PA_WRITE24NE(u+21, 0xF00008);
 232             PA_WRITE24NE(u+24,   0x2009);
 233             PA_WRITE24NE(u+27,   0x210A);
 234             break;
 235         }
 236
 237         default:
 238             pa_assert_not_reached();
 239     }
 240
 241     pa_memblock_release(r);
 242
 243     return r;
 244 }
 245
 246 int main(int argc, char *argv[]) {
 247     pa_mempool *pool;
 248     pa_sample_spec a, b;
 249     pa_cvolume v;
 250
 251     oil_init();
 252     pa_log_set_level(PA_LOG_DEBUG);
 253
 254     pa_assert_se(pool = pa_mempool_new(FALSE, 0));
 255
 256     a.channels = b.channels = 1;
 257     a.rate = b.rate = 44100;
 258
 259     v.channels = a.channels;
 260     v.values[0] = pa_sw_volume_from_linear(0.5);
 261
 262     for (a.format = 0; a.format < PA_SAMPLE_MAX; a.format ++) {
 263         for (b.format = 0; b.format < PA_SAMPLE_MAX; b.format ++) {
 264             pa_resampler *forth, *back;
 265             pa_memchunk i, j, k;
 266
 267             printf("=== %s -> %s -> %s -> /2\n",
 268                    pa_sample_format_to_string(a.format),
 269                    pa_sample_format_to_string(b.format),
 270                    pa_sample_format_to_string(a.format));
 271
 272             pa_assert_se(forth = pa_resampler_new(pool, &a, NULL, &b, NULL, PA_RESAMPLER_AUTO, 0));
 273             pa_assert_se(back = pa_resampler_new(pool, &b, NULL, &a, NULL, PA_RESAMPLER_AUTO, 0));
 274
 275             i.memblock = generate_block(pool, &a);
 276             i.length = pa_memblock_get_length(i.memblock);
 277             i.index = 0;
 278             pa_resampler_run(forth, &i, &j);
 279             pa_resampler_run(back, &j, &k);
 280
 281             printf("before:  ");
 282             dump_block(&a, &i);
 283             printf("after :  ");
 284             dump_block(&b, &j);
 285             printf("reverse: ");
 286             dump_block(&a, &k);
 287
 288             pa_memblock_unref(j.memblock);
 289             pa_memblock_unref(k.memblock);
 290
 291             pa_volume_memchunk(&i, &a, &v);
 292             printf("volume:  ");
 293             dump_block(&a, &i);
 294
 295             pa_memblock_unref(i.memblock);
 296
 297             pa_resampler_free(forth);
 298             pa_resampler_free(back);
 299         }
 300     }
 301
 302     pa_mempool_free(pool);
 303
 304     return 0;
 305 }