1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
|
#include <stdio.h>
#include <string.h>
#include <assert.h>
#include "sample-util.h"
struct pa_sample_spec default_sample_spec = {
.format = PA_SAMPLE_S16NE,
.rate = 44100,
.channels = 2
};
struct memblock *silence_memblock(struct memblock* b, struct pa_sample_spec *spec) {
assert(b && b->data && spec);
memblock_assert_exclusive(b);
silence_memory(b->data, b->length, spec);
return b;
}
void silence_memchunk(struct memchunk *c, struct pa_sample_spec *spec) {
assert(c && c->memblock && c->memblock->data && spec && c->length);
memblock_assert_exclusive(c->memblock);
silence_memory(c->memblock->data+c->index, c->length, spec);
}
void silence_memory(void *p, size_t length, struct pa_sample_spec *spec) {
char c = 0;
assert(p && length && spec);
switch (spec->format) {
case PA_SAMPLE_U8:
c = 127;
break;
case PA_SAMPLE_S16LE:
case PA_SAMPLE_S16BE:
case PA_SAMPLE_FLOAT32:
c = 0;
break;
case PA_SAMPLE_ALAW:
case PA_SAMPLE_ULAW:
c = 80;
break;
default:
assert(0);
}
memset(p, c, length);
}
size_t mix_chunks(struct mix_info channels[], unsigned nchannels, void *data, size_t length, struct pa_sample_spec *spec, uint32_t volume) {
unsigned c, d;
assert(channels && data && length && spec);
assert(spec->format == PA_SAMPLE_S16NE);
for (d = 0;; d += sizeof(int16_t)) {
int32_t sum = 0;
if (d >= length)
return d;
for (c = 0; c < nchannels; c++) {
int32_t v;
uint32_t volume = channels[c].volume;
if (d >= channels[c].chunk.length)
return d;
if (volume == VOLUME_MUTE)
v = 0;
else {
v = *((int16_t*) (channels[c].chunk.memblock->data + channels[c].chunk.index + d));
if (volume != VOLUME_NORM)
v = (int32_t) ((float)v*volume/VOLUME_NORM);
}
sum += v;
}
if (volume == VOLUME_MUTE)
sum = 0;
else if (volume != VOLUME_NORM)
sum = (int32_t) ((float) sum*volume/VOLUME_NORM);
if (sum < -0x8000) sum = -0x8000;
if (sum > 0x7FFF) sum = 0x7FFF;
*((int16_t*) data) = sum;
data += sizeof(int16_t);
}
}
void volume_memchunk(struct memchunk*c, struct pa_sample_spec *spec, uint32_t volume) {
int16_t *d;
size_t n;
assert(c && spec && (c->length % pa_sample_size(spec) == 0));
assert(spec->format == PA_SAMPLE_S16NE);
memblock_assert_exclusive(c->memblock);
if (volume == VOLUME_NORM)
return;
if (volume == VOLUME_MUTE) {
silence_memchunk(c, spec);
return;
}
for (d = (c->memblock->data+c->index), n = c->length/sizeof(int16_t); n > 0; d++, n--) {
int32_t t = (int32_t)(*d);
t *= volume;
t /= VOLUME_NORM;
if (t < -0x8000) t = -0x8000;
if (t > 0x7FFF) t = 0x7FFF;
*d = (int16_t) t;
}
}
uint32_t volume_multiply(uint32_t a, uint32_t b) {
uint64_t p = a;
p *= b;
p /= VOLUME_NORM;
return (uint32_t) p;
}
|
