annotate src/audio.c @ 24:4c9dbfa30a66

Implemented audio
author Michael Pavone <pavone@retrodev.com>
date Thu, 31 Mar 2016 00:07:37 -0700
parents
children 23bea9b9569f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
24
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
1 #include <stdint.h>
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
2 #include <stdlib.h>
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
3 #include <string.h>
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
4 #include "audio.h"
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
5 #include "system.h"
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
6
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
7 #define BUFFER_INC_RES 1000000000UL
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
8
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
9 audio *alloc_audio(uint32_t master_clock, uint32_t clock_div, int sample_rate, int buffer_size)
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
10 {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
11 size_t alloc_size = sizeof(audio) + buffer_size * sizeof(int16_t) * 2;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
12 audio *context = malloc(alloc_size);
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
13 memset(context, 0, alloc_size);
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
14 context->writebuffer = context->buffer;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
15 context->playbuffer = context->buffer + buffer_size;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
16
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
17 context->buffer_size = buffer_size;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
18 context->clock_inc = clock_div;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
19 context->buffer_inc = ((BUFFER_INC_RES * (uint64_t)sample_rate) / (uint64_t)master_clock) * clock_div;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
20 for (int i = 0; i < NUM_CHANNELS; i++)
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
21 {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
22 context->value[i] = context->volume[i] << 5;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
23 }
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
24 }
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
25
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
26 void audio_run(audio *context, uint32_t target)
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
27 {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
28 while (context->cycles < target)
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
29 {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
30 for (int i = 0; i < 4; i++)
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
31 {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
32 if (context->timer_cur[i]) {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
33 context->timer_cur[i]--;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
34 if (!context->timer_cur[i]) {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
35 context->value[i] = context->value[i] ? 0 : (context->volume[i] << 5);
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
36 }
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
37 } else {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
38 context->timer_cur[i] = context->timer_load[i];
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
39 }
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
40 }
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
41 context->buffer_fraction += context->buffer_inc;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
42 if (context->buffer_fraction >= BUFFER_INC_RES) {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
43 context->buffer_fraction -= BUFFER_INC_RES;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
44 context->writebuffer[context->buffer_pos++] =
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
45 context->value[0] + context->value[1] + context->value[2] + context->value[3];
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
46 if (context->buffer_pos == context->buffer_size) {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
47 int16_t *tmp = context->playbuffer;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
48 context->playbuffer = context->writebuffer;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
49 context->writebuffer = tmp;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
50 system_present_audio(context->playbuffer);
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
51 context->buffer_pos = 0;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
52 }
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
53 }
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
54 context->cycles += context->clock_inc;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
55 }
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
56 }
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
57
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
58 void audio_write_freq(audio *context, int channel, uint16_t value)
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
59 {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
60 context->timer_cur[channel] = context->timer_load[channel] = value;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
61 }
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
62
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
63 void audio_write_vol(audio *context, int pair, uint16_t value)
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
64 {
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
65 int channel = pair * 2;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
66 context->value[channel] = context->volume[channel] = value >> 8;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
67 channel++;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
68 context->value[channel] = context->volume[channel] = value;
4c9dbfa30a66 Implemented audio
Michael Pavone <pavone@retrodev.com>
parents:
diff changeset
69 }