code.delx.au - pulseaudio/blob - src/pulsecore/svolume_arm.c

   1 /***
   2   This file is part of PulseAudio.
   3
   4   Copyright 2004-2006 Lennart Poettering
   5   Copyright 2009 Wim Taymans <wim.taymans@collabora.co.uk>
   6
   7   PulseAudio is free software; you can redistribute it and/or modify
   8   it under the terms of the GNU Lesser General Public License as published
   9   by the Free Software Foundation; either version 2.1 of the License,
  10   or (at your option) any later version.
  11
  12   PulseAudio is distributed in the hope that it will be useful, but
  13   WITHOUT ANY WARRANTY; without even the implied warranty of
  14   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  15   General Public License for more details.
  16
  17   You should have received a copy of the GNU Lesser General Public License
  18   along with PulseAudio; if not, write to the Free Software
  19   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  20   USA.
  21 ***/
  22
  23 #ifdef HAVE_CONFIG_H
  24 #include <config.h>
  25 #endif
  26
  27 #include <pulse/timeval.h>
  28 #include <pulsecore/random.h>
  29 #include <pulsecore/macro.h>
  30 #include <pulsecore/g711.h>
  31 #include <pulsecore/core-util.h>
  32
  33 #include "cpu-arm.h"
  34
  35 #include "sample-util.h"
  36 #include "endianmacros.h"
  37
  38 #if defined (__arm__) && defined (HAVE_ARMV6)
  39
  40 #define MOD_INC() \
  41     " subs  r0, r6, %2              \n\t" \
  42     " addcs r0, %1                  \n\t" \
  43     " movcs r6, r0                  \n\t"
  44
  45 static void
  46 pa_volume_s16ne_arm (int16_t *samples, int32_t *volumes, unsigned channels, unsigned length)
  47 {
  48     int32_t *ve;
  49
  50     /* Channels must be at least 4, and always a multiple of the original number.
  51      * This is also the max amount we overread the volume array, which should
  52      * have enough padding. */
  53     channels = channels == 3 ? 6 : PA_MAX (4U, channels);
  54     ve = volumes + channels;
  55
  56     __asm__ __volatile__ (
  57         " mov r6, %1                      \n\t"
  58         " mov %3, %3, LSR #1              \n\t" /* length /= sizeof (int16_t) */
  59         " tst %3, #1                      \n\t" /* check for odd samples */
  60         " beq  2f                         \n\t"
  61
  62         "1:                               \n\t"
  63         " ldr  r0, [r6], #4               \n\t" /* odd samples volumes */
  64         " ldrh r2, [%0]                   \n\t"
  65
  66         " smulwb r0, r0, r2               \n\t"
  67         " ssat r0, #16, r0                \n\t"
  68
  69         " strh r0, [%0], #2               \n\t"
  70
  71         MOD_INC()
  72
  73         "2:                               \n\t"
  74         " mov %3, %3, LSR #1              \n\t"
  75         " tst %3, #1                      \n\t" /* check for odd samples */
  76         " beq  4f                         \n\t"
  77
  78         "3:                               \n\t"
  79         " ldrd r2, [r6], #8               \n\t" /* 2 samples at a time */
  80         " ldr  r0, [%0]                   \n\t"
  81
  82         " smulwt r2, r2, r0               \n\t"
  83         " smulwb r3, r3, r0               \n\t"
  84
  85         " ssat r2, #16, r2                \n\t"
  86         " ssat r3, #16, r3                \n\t"
  87
  88         " pkhbt r0, r3, r2, LSL #16       \n\t"
  89         " str  r0, [%0], #4               \n\t"
  90
  91         MOD_INC()
  92
  93         "4:                               \n\t"
  94         " movs %3, %3, LSR #1             \n\t"
  95         " beq  6f                         \n\t"
  96
  97         "5:                               \n\t"
  98         " ldrd r2, [r6], #8               \n\t" /* 4 samples at a time */
  99         " ldrd r4, [r6], #8               \n\t"
 100         " ldrd r0, [%0]                   \n\t"
 101
 102         " smulwt r2, r2, r0               \n\t"
 103         " smulwb r3, r3, r0               \n\t"
 104         " smulwt r4, r4, r1               \n\t"
 105         " smulwb r5, r5, r1               \n\t"
 106
 107         " ssat r2, #16, r2                \n\t"
 108         " ssat r3, #16, r3                \n\t"
 109         " ssat r4, #16, r4                \n\t"
 110         " ssat r5, #16, r5                \n\t"
 111
 112         " pkhbt r0, r3, r2, LSL #16       \n\t"
 113         " pkhbt r1, r5, r4, LSL #16       \n\t"
 114         " strd  r0, [%0], #8              \n\t"
 115
 116         MOD_INC()
 117
 118         " subs %3, %3, #1                 \n\t"
 119         " bne 5b                          \n\t"
 120         "6:                               \n\t"
 121
 122         : "+r" (samples), "+r" (volumes), "+r" (ve), "+r" (length)
 123         :
 124         : "r6", "r5", "r4", "r3", "r2", "r1", "r0", "cc"
 125     );
 126 }
 127
 128 #undef RUN_TEST
 129
 130 #ifdef RUN_TEST
 131 #define CHANNELS 2
 132 #define SAMPLES 1023
 133 #define TIMES 1000
 134 #define PADDING 16
 135
 136 static void run_test (void) {
 137     int16_t samples[SAMPLES];
 138     int16_t samples_ref[SAMPLES];
 139     int16_t samples_orig[SAMPLES];
 140     int32_t volumes[CHANNELS + PADDING];
 141     int i, j, padding;
 142     pa_do_volume_func_t func;
 143     pa_usec_t start, stop;
 144
 145     func = pa_get_volume_func (PA_SAMPLE_S16NE);
 146
 147     printf ("checking ARM %zd\n", sizeof (samples));
 148
 149     pa_random (samples, sizeof (samples));
 150     memcpy (samples_ref, samples, sizeof (samples));
 151     memcpy (samples_orig, samples, sizeof (samples));
 152
 153     for (i = 0; i < CHANNELS; i++)
 154         volumes[i] = rand() >> 1;
 155     for (padding = 0; padding < PADDING; padding++, i++)
 156         volumes[i] = volumes[padding];
 157
 158     func (samples_ref, volumes, CHANNELS, sizeof (samples));
 159     pa_volume_s16ne_arm (samples, volumes, CHANNELS, sizeof (samples));
 160     for (i = 0; i < SAMPLES; i++) {
 161         if (samples[i] != samples_ref[i]) {
 162             printf ("%d: %04x != %04x (%04x * %04x)\n", i, samples[i], samples_ref[i],
 163                   samples_orig[i], volumes[i % CHANNELS]);
 164         }
 165     }
 166
 167     start = pa_rtclock_now();
 168     for (j = 0; j < TIMES; j++) {
 169         memcpy (samples, samples_orig, sizeof (samples));
 170         pa_volume_s16ne_arm (samples, volumes, CHANNELS, sizeof (samples));
 171     }
 172     stop = pa_rtclock_now();
 173     pa_log_info("ARM: %llu usec.", (long long unsigned int) (stop - start));
 174
 175     start = pa_rtclock_now();
 176     for (j = 0; j < TIMES; j++) {
 177         memcpy (samples_ref, samples_orig, sizeof (samples));
 178         func (samples_ref, volumes, CHANNELS, sizeof (samples));
 179     }
 180     stop = pa_rtclock_now();
 181     pa_log_info("ref: %llu usec.", (long long unsigned int) (stop - start));
 182 }
 183 #endif
 184
 185 #endif /* defined (__arm__) && defined (HAVE_ARMV6) */
 186
 187
 188 void pa_volume_func_init_arm (pa_cpu_arm_flag_t flags) {
 189 #if defined (__arm__) && defined (HAVE_ARMV6)
 190     pa_log_info("Initialising ARM optimized functions.");
 191
 192 #ifdef RUN_TEST
 193     run_test ();
 194 #endif
 195
 196     pa_set_volume_func (PA_SAMPLE_S16NE,     (pa_do_volume_func_t) pa_volume_s16ne_arm);
 197 #endif /* defined (__arm__) && defined (HAVE_ARMV6) */
 198 }