src/tests/mcalign-test.c

   1 /* $Id$ */
   2
   3 /***
   4   This file is part of polypaudio.
   5
   6   polypaudio is free software; you can redistribute it and/or modify
   7   it under the terms of the GNU Lesser General Public License as
   8   published by the Free Software Foundation; either version 2.1 of the
   9   License, or (at your option) any later version.
  10
  11   polypaudio is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   Lesser General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public
  17   License along with polypaudio; if not, write to the Free Software
  18   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  19   USA.
  20 ***/
  21
  22 #ifdef HAVE_CONFIG_H
  23 #include <config.h>
  24 #endif
  25
  26 #include <assert.h>
  27 #include <unistd.h>
  28 #include <sys/types.h>
  29 #include <errno.h>
  30 #include <string.h>
  31 #include <stdlib.h>
  32 #include <time.h>
  33
  34 #include <polypcore/util.h>
  35 #include <polypcore/mcalign.h>
  36 #include <polypcore/gccmacro.h>
  37
  38 /* A simple program for testing pa_mcalign */
  39
  40 int main(PA_GCC_UNUSED int argc, PA_GCC_UNUSED char *argv[]) {
  41     pa_mcalign *a = pa_mcalign_new(11, NULL);
  42     pa_memchunk c;
  43
  44     pa_memchunk_reset(&c);
  45
  46     srand(time(NULL));
  47
  48     for (;;) {
  49         ssize_t r;
  50         size_t l;
  51
  52         if (!c.memblock) {
  53             c.memblock = pa_memblock_new(2048, NULL);
  54             c.index = c.length = 0;
  55         }
  56
  57         assert(c.index < c.memblock->length);
  58
  59         l = c.memblock->length - c.index;
  60
  61         l = l <= 1 ? l : rand() % (l-1) +1 ;
  62
  63         if ((r = read(STDIN_FILENO, (uint8_t*) c.memblock->data + c.index, l)) <= 0) {
  64             fprintf(stderr, "read() failed: %s\n", r < 0 ? strerror(errno) : "EOF");
  65             break;
  66         }
  67
  68         c.length = r;
  69         pa_mcalign_push(a, &c);
  70         fprintf(stderr, "Read %ld bytes\n", (long)r);
  71
  72         c.index += r;
  73
  74         if (c.index >= c.memblock->length) {
  75             pa_memblock_unref(c.memblock);
  76             pa_memchunk_reset(&c);
  77         }
  78
  79         for (;;) {
  80             pa_memchunk t;
  81
  82             if (pa_mcalign_pop(a, &t) < 0)
  83                 break;
  84
  85             pa_loop_write(STDOUT_FILENO, (uint8_t*) t.memblock->data + t.index, t.length);
  86             fprintf(stderr, "Wrote %lu bytes.\n", (unsigned long) t.length);
  87
  88             pa_memblock_unref(t.memblock);
  89         }
  90     }
  91
  92     pa_mcalign_free(a);
  93
  94     if (c.memblock)
  95         pa_memblock_unref(c.memblock);
  96
  97     return 0;
  98 }