2
* audio_amiga.cpp - Audio support, AmigaOS implementation using AHI
4
* Basilisk II (C) 1997-2001 Christian Bauer
6
* This program is free software; you can redistribute it and/or modify
7
* it under the terms of the GNU General Public License as published by
8
* the Free Software Foundation; either version 2 of the License, or
9
* (at your option) any later version.
11
* This program is distributed in the hope that it will be useful,
12
* but WITHOUT ANY WARRANTY; without even the implied warranty of
13
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14
* GNU General Public License for more details.
16
* You should have received a copy of the GNU General Public License
17
* along with this program; if not, write to the Free Software
18
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23
#include <exec/types.h>
24
#include <exec/memory.h>
25
#include <devices/ahi.h>
27
#include <proto/exec.h>
28
#include <proto/ahi.h>
29
#include <inline/exec.h>
30
#include <inline/ahi.h>
32
#include "cpu_emulation.h"
35
#include "user_strings.h"
37
#include "audio_defs.h"
46
static ULONG ahi_id = AHI_DEFAULT_ID; // AHI audio ID
47
static struct AHIAudioCtrl *ahi_ctrl = NULL;
48
static struct AHISampleInfo sample[2]; // Two sample infos for double-buffering
49
static struct Hook sf_hook;
50
static int play_buf = 0; // Number of currently played buffer
51
static long sound_buffer_size; // Size of one audio buffer in bytes
52
static int audio_block_fetched = 0; // Number of audio blocks fetched by interrupt routine
54
static bool main_mute = false;
55
static bool speaker_mute = false;
56
static ULONG supports_volume_changes = false;
57
static ULONG supports_stereo_panning = false;
58
static ULONG current_main_volume;
59
static ULONG current_speaker_volume;
63
static __saveds __attribute__((regparm(3))) ULONG audio_callback(struct Hook *hook /*a0*/, struct AHISoundMessage *msg /*a1*/, struct AHIAudioCtrl *ahi_ctrl /*a2*/);
64
void audio_set_sample_rate_byval(uint32 value);
65
void audio_set_sample_size_byval(uint32 value);
66
void audio_set_channels_byval(uint32 value);
73
// Set AudioStatus to reflect current audio stream format
74
static void set_audio_status_format(int sample_rate_index)
76
AudioStatus.sample_rate = audio_sample_rates[sample_rate_index];
77
AudioStatus.sample_size = audio_sample_sizes[0];
78
AudioStatus.channels = audio_channel_counts[0];
83
sample[0].ahisi_Address = sample[1].ahisi_Address = NULL;
85
// Init audio status and feature flags
86
audio_channel_counts.push_back(2);
87
// set_audio_status_format();
88
AudioStatus.mixer = 0;
89
AudioStatus.num_sources = 0;
90
audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut;
92
// Sound disabled in prefs? Then do nothing
93
if (PrefsFindBool("nosound"))
97
if (AHIBase == NULL) {
98
WarningAlert(GetString(STR_NO_AHI_WARN));
102
// Initialize callback hook
103
sf_hook.h_Entry = (HOOKFUNC)audio_callback;
105
// Read "sound" preferences
106
const char *str = PrefsFindString("sound");
108
sscanf(str, "ahi/%08lx", &ahi_id);
110
// Open audio control structure
111
if ((ahi_ctrl = AHI_AllocAudio(
112
AHIA_AudioID, ahi_id,
113
AHIA_MixFreq, AudioStatus.sample_rate >> 16,
116
AHIA_SoundFunc, (ULONG)&sf_hook,
118
WarningAlert(GetString(STR_NO_AHI_CTRL_WARN));
122
ULONG max_channels, sample_rate, frequencies, sample_rate_index;
124
AHI_GetAudioAttrs(ahi_id, ahi_ctrl,
125
AHIDB_MaxChannels, (ULONG) &max_channels,
126
AHIDB_Frequencies, (ULONG) &frequencies,
129
D(bug("AudioInit: max_channels=%ld frequencies=%ld\n", max_channels, frequencies));
131
for (int n=0; n<frequencies; n++)
133
AHI_GetAudioAttrs(ahi_id, ahi_ctrl,
134
AHIDB_FrequencyArg, n,
135
AHIDB_Frequency, (ULONG) &sample_rate,
138
D(bug("AudioInit: f=%ld Hz\n", sample_rate));
139
audio_sample_rates.push_back(sample_rate << 16);
142
ULONG sample_size_bits = 16;
144
D(bug("AudioInit: sampe_rates=%ld\n", audio_sample_rates.size() ));
146
// get index of sample rate closest to 22050 Hz
147
AHI_GetAudioAttrs(ahi_id, ahi_ctrl,
148
AHIDB_IndexArg, 22050,
149
AHIDB_Bits, (ULONG) &sample_size_bits,
150
AHIDB_Index, (ULONG) &sample_rate_index,
151
AHIDB_Volume, (ULONG) &supports_volume_changes,
152
AHIDB_Panning, (ULONG) &supports_stereo_panning,
155
audio_sample_sizes.push_back(16);
157
set_audio_status_format(sample_rate_index);
159
// 2048 frames per block
160
audio_frames_per_block = 2048;
161
sound_buffer_size = (AudioStatus.sample_size >> 3) * AudioStatus.channels * audio_frames_per_block;
163
// Prepare SampleInfos and load sounds (two sounds for double buffering)
164
sample[0].ahisi_Type = AudioStatus.sample_size == 16 ? AHIST_S16S : AHIST_S8S;
165
sample[0].ahisi_Length = audio_frames_per_block;
166
sample[0].ahisi_Address = AllocVec(sound_buffer_size, MEMF_PUBLIC | MEMF_CLEAR);
167
sample[1].ahisi_Type = AudioStatus.sample_size == 16 ? AHIST_S16S : AHIST_S8S;
168
sample[1].ahisi_Length = audio_frames_per_block;
169
sample[1].ahisi_Address = AllocVec(sound_buffer_size, MEMF_PUBLIC | MEMF_CLEAR);
170
if (sample[0].ahisi_Address == NULL || sample[1].ahisi_Address == NULL)
173
AHI_LoadSound(0, AHIST_DYNAMICSAMPLE, &sample[0], ahi_ctrl);
174
AHI_LoadSound(1, AHIST_DYNAMICSAMPLE, &sample[1], ahi_ctrl);
178
current_main_volume = current_speaker_volume = 0x10000;
179
AHI_SetVol(0, current_speaker_volume, 0x8000, ahi_ctrl, AHISF_IMM);
181
AHI_SetFreq(0, AudioStatus.sample_rate >> 16, ahi_ctrl, AHISF_IMM);
182
AHI_SetSound(0, play_buf, 0, 0, ahi_ctrl, AHISF_IMM);
196
if (ahi_ctrl != NULL) {
197
AHI_ControlAudio(ahi_ctrl, AHIC_Play, FALSE, TAG_END);
198
AHI_FreeAudio(ahi_ctrl);
201
FreeVec(sample[0].ahisi_Address);
202
FreeVec(sample[1].ahisi_Address);
207
* First source added, start audio stream
210
void audio_enter_stream()
212
AHI_ControlAudio(ahi_ctrl, AHIC_Play, TRUE, TAG_END);
217
* Last source removed, stop audio stream
220
void audio_exit_stream()
222
AHI_ControlAudio(ahi_ctrl, AHIC_Play, FALSE, TAG_END);
227
* AHI sound callback, request next buffer
230
static __saveds __attribute__((regparm(3))) ULONG audio_callback(struct Hook *hook /*a0*/, struct AHISoundMessage *msg /*a1*/, struct AHIAudioCtrl *ahi_ctrl /*a2*/)
234
// New buffer available?
235
if (audio_block_fetched)
237
audio_block_fetched--;
239
if (main_mute || speaker_mute)
241
memset(sample[play_buf].ahisi_Address, 0, sound_buffer_size);
245
// Get size of audio data
246
uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo);
247
if (apple_stream_info) {
248
int32 sample_count = ReadMacInt32(apple_stream_info + scd_sampleCount);
250
uint32 num_channels = ReadMacInt16(apple_stream_info + scd_numChannels);
251
uint32 sample_size = ReadMacInt16(apple_stream_info + scd_sampleSize);
252
uint32 sample_rate = ReadMacInt32(apple_stream_info + scd_sampleRate);
254
D(bug("stream: sample_count=%ld num_channels=%ld sample_size=%ld sample_rate=%ld\n", sample_count, num_channels, sample_size, sample_rate >> 16));
256
// Yes, this can happen.
257
if(sample_count != 0) {
258
if(sample_rate != AudioStatus.sample_rate) {
259
audio_set_sample_rate_byval(sample_rate);
261
if(num_channels != AudioStatus.channels) {
262
audio_set_channels_byval(num_channels);
264
if(sample_size != AudioStatus.sample_size) {
265
audio_set_sample_size_byval(sample_size);
269
if (sample_count < 0)
272
int work_size = sample_count * num_channels * (sample_size>>3);
273
D(bug("stream: work_size=%ld sound_buffer_size=%ld\n", work_size, sound_buffer_size));
275
if (work_size > sound_buffer_size)
276
work_size = sound_buffer_size;
278
// Put data into AHI buffer (convert 8-bit data unsigned->signed)
279
if (AudioStatus.sample_size == 16)
280
Mac2Host_memcpy(sample[play_buf].ahisi_Address, ReadMacInt32(apple_stream_info + scd_buffer), work_size);
282
uint32 *p = (uint32 *)Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer));
283
uint32 *q = (uint32 *)sample[play_buf].ahisi_Address;
284
int r = work_size >> 2;
286
*q++ = *p++ ^ 0x80808080;
288
if (work_size != sound_buffer_size)
289
memset((uint8 *)sample[play_buf].ahisi_Address + work_size, 0, sound_buffer_size - work_size);
295
memset(sample[play_buf].ahisi_Address, 0, sound_buffer_size);
298
AHI_SetSound(0, play_buf, 0, 0, ahi_ctrl, 0);
300
// Trigger audio interrupt to get new buffer
301
if (AudioStatus.num_sources) {
302
D1(bug("stream: triggering irq\n"));
303
SetInterruptFlag(INTFLAG_AUDIO);
311
* MacOS audio interrupt, read next data block
314
void AudioInterrupt(void)
316
D1(bug("AudioInterrupt\n"));
318
// Get data from apple mixer
319
if (AudioStatus.mixer) {
321
r.a[0] = audio_data + adatStreamInfo;
322
r.a[1] = AudioStatus.mixer;
323
Execute68k(audio_data + adatGetSourceData, &r);
324
D1(bug(" GetSourceData() returns %08lx\n", r.d[0]));
326
WriteMacInt32(audio_data + adatStreamInfo, 0);
328
// Signal stream function
329
audio_block_fetched++;
330
D1(bug("AudioInterrupt done\n"));
335
* Set sampling parameters
336
* "index" is an index into the audio_sample_rates[] etc. arrays
337
* It is guaranteed that AudioStatus.num_sources == 0
340
void audio_set_sample_rate_byval(uint32 value)
342
bool changed = (AudioStatus.sample_rate != value);
345
ULONG sample_rate_index;
347
// get index of sample rate closest to <value> Hz
348
AHI_GetAudioAttrs(ahi_id, ahi_ctrl,
349
AHIDB_IndexArg, value >> 16,
350
AHIDB_Index, (ULONG) &sample_rate_index,
353
D(bug(" audio_set_sample_rate_byval requested rate=%ld Hz\n", value >> 16));
355
AudioStatus.sample_rate = audio_sample_rates[sample_rate_index];
357
AHI_SetFreq(0, AudioStatus.sample_rate >> 16, ahi_ctrl, 0);
360
D(bug(" audio_set_sample_rate_byval rate=%ld Hz\n", AudioStatus.sample_rate >> 16));
363
void audio_set_sample_size_byval(uint32 value)
365
bool changed = (AudioStatus.sample_size != value);
367
// AudioStatus.sample_size = value;
368
// update_sound_parameters();
369
// WritePrivateProfileInt( "Audio", "SampleSize", AudioStatus.sample_size, ini_file_name );
371
D(bug(" audio_set_sample_size_byval %d\n", AudioStatus.sample_size));
374
void audio_set_channels_byval(uint32 value)
376
bool changed = (AudioStatus.channels != value);
378
// AudioStatus.channels = value;
379
// update_sound_parameters();
380
// WritePrivateProfileInt( "Audio", "Channels", AudioStatus.channels, ini_file_name );
382
D(bug(" audio_set_channels_byval %d\n", AudioStatus.channels));
385
bool audio_set_sample_rate(int index)
387
if(index >= 0 && index < audio_sample_rates.size() ) {
388
audio_set_sample_rate_byval( audio_sample_rates[index] );
389
D(bug(" audio_set_sample_rate index=%ld rate=%ld\n", index, AudioStatus.sample_rate >> 16));
395
bool audio_set_sample_size(int index)
397
if(index >= 0 && index < audio_sample_sizes.size() ) {
398
audio_set_sample_size_byval( audio_sample_sizes[index] );
399
D(bug(" audio_set_sample_size %d,%d\n", index,AudioStatus.sample_size));
405
bool audio_set_channels(int index)
407
if(index >= 0 && index < audio_channel_counts.size() ) {
408
audio_set_channels_byval( audio_channel_counts[index] );
409
D(bug(" audio_set_channels %d,%d\n", index,AudioStatus.channels));
417
* Get/set volume controls (volume values received/returned have the left channel
418
* volume in the upper 16 bits and the right channel volume in the lower 16 bits;
419
* both volumes are 8.8 fixed point values with 0x0100 meaning "maximum volume"))
422
bool audio_get_main_mute(void)
424
D(bug("audio_get_main_mute: mute=%ld\n", main_mute));
429
uint32 audio_get_main_volume(void)
431
D(bug("audio_get_main_volume\n"));
433
ULONG volume = current_main_volume >> 8; // 0x10000 => 0x100
435
D(bug("audio_get_main_volume: volume=%08lx\n", volume));
437
return (volume << 16) + volume;
442
bool audio_get_speaker_mute(void)
444
D(bug("audio_get_speaker_mute: mute=%ld\n", speaker_mute));
449
uint32 audio_get_speaker_volume(void)
451
D(bug("audio_get_speaker_volume: \n"));
455
ULONG volume = current_speaker_volume >> 8; // 0x10000 => 0x100
457
D(bug("audio_get_speaker_volume: volume=%08lx\n", volume));
459
return (volume << 16) + volume;
465
void audio_set_main_mute(bool mute)
467
D(bug("audio_set_main_mute: mute=%ld\n", mute));
469
if (mute != main_mute)
475
void audio_set_main_volume(uint32 vol)
477
D(bug("audio_set_main_volume: vol=%08lx\n", vol));
479
if (audio_open && supports_volume_changes)
481
ULONG volume = 0x80 * ((vol >> 16) + (vol & 0xffff));
483
D(bug("audio_set_main_volume: volume=%08lx\n", volume));
485
current_main_volume = volume;
487
AHI_SetVol(0, volume, 0x8000, ahi_ctrl, AHISF_IMM);
491
void audio_set_speaker_mute(bool mute)
493
D(bug("audio_set_speaker_mute: mute=%ld\n", mute));
495
if (mute != speaker_mute)
501
void audio_set_speaker_volume(uint32 vol)
503
D(bug("audio_set_speaker_volume: vol=%08lx\n", vol));
505
if (audio_open && supports_volume_changes)
507
ULONG volume = 0x80 * ((vol >> 16) + (vol & 0xffff));
509
D(bug("audio_set_speaker_volume: volume=%08lx\n", volume));
511
current_speaker_volume = volume;
513
AHI_SetVol(0, volume, 0x8000, ahi_ctrl, AHISF_IMM);