mirror of
https://github.com/kichikuou/xsystem35-sdl2.git
synced 2026-09-26 16:38:06 +03:00
373 lines
8.7 KiB
C
373 lines
8.7 KiB
C
/*
|
|
* ShSound.c 音楽関連 module
|
|
*
|
|
* 大悪司
|
|
*
|
|
* Copyright (C) 1997-1998 Masaki Chikama (Wren) <chikama@kasumi.ipl.mech.nagoya-u.ac.jp>
|
|
* 1998- <masaki-c@is.aist-nara.ac.jp>
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*
|
|
*/
|
|
/* $Id: ShSound.c,v 1.13 2003/08/02 13:10:32 chikama Exp $ */
|
|
#include "config.h"
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <SDL.h>
|
|
|
|
#include "portab.h"
|
|
#include "LittleEndian.h"
|
|
#include "xsystem35.h"
|
|
#include "modules.h"
|
|
#include "nact.h"
|
|
#include "dri.h"
|
|
#include "ald_manager.h"
|
|
#include "music.h"
|
|
|
|
static struct {
|
|
SDL_AudioSpec spec; // must be 16-bit, stereo
|
|
uint8_t *buf;
|
|
uint32_t len;
|
|
} memwav;
|
|
|
|
static void free_memory_wav(void) {
|
|
SDL_FreeWAV(memwav.buf);
|
|
memwav.buf = NULL;
|
|
}
|
|
|
|
static void Init() {
|
|
/*
|
|
モジュール初期化
|
|
*/
|
|
int p1 = getCaliValue(); /* ISys3x */
|
|
|
|
TRACE("ShSound.Init %d:", p1);
|
|
}
|
|
|
|
static void wavLoad() {
|
|
/*
|
|
指定のスロットにPCMファイルをロード
|
|
|
|
slot: ロードするスロット(チャンネル)番号
|
|
no : ロードするファイル番号
|
|
*/
|
|
int slot = getCaliValue();
|
|
int no = getCaliValue();
|
|
|
|
TRACE("ShSound.wavLoad %d,%d:", slot, no);
|
|
|
|
mus_wav_load(slot, no);
|
|
}
|
|
|
|
static void wavUnload() {
|
|
/*
|
|
指定のスロットのPCMファイルを削除
|
|
|
|
slot: 削除するスロット番号
|
|
*/
|
|
int slot = getCaliValue();
|
|
|
|
mus_wav_unload(slot);
|
|
|
|
TRACE("ShSound.wavUnload %d:",slot);
|
|
}
|
|
|
|
static void wavUnloadRange() {
|
|
/*
|
|
指定のスロット(複数)のPCMファイルを削除
|
|
|
|
slot: 削除する最初のスロット番号
|
|
range: 削除する個数
|
|
*/
|
|
int slot = getCaliValue();
|
|
int range = getCaliValue();
|
|
int i;
|
|
|
|
for (i = slot; i < (slot + range); i++) {
|
|
mus_wav_unload(i);
|
|
}
|
|
|
|
TRACE("ShSound.wavUnloadRange %d,%d:", slot, range);
|
|
}
|
|
|
|
static void wavUnloadAll() {
|
|
/*
|
|
すべてのスロットのPCMファイルを削除
|
|
*/
|
|
int i;
|
|
|
|
for (i = 0; i < 128; i++) {
|
|
mus_wav_unload(i);
|
|
}
|
|
|
|
TRACE("ShSound.wavUnloadAll:");
|
|
}
|
|
|
|
static void wavLoadMemory() {
|
|
/*
|
|
指定の番号の WAV ファイルをメモリ上に読み込み
|
|
|
|
no: 読み込むファイル番号
|
|
*/
|
|
int no = getCaliValue();
|
|
|
|
if (memwav.buf)
|
|
free_memory_wav();
|
|
|
|
dridata *dfile = ald_getdata(DRIFILE_WAVE, no - 1);
|
|
if (!dfile) {
|
|
WARNING("cannot open WAVE %d", no - 1);
|
|
return;
|
|
}
|
|
if (!SDL_LoadWAV_RW(SDL_RWFromConstMem(dfile->data, dfile->size), 1, &memwav.spec, &memwav.buf, &memwav.len)) {
|
|
WARNING("cannot load WAVE %d", no - 1);
|
|
return;
|
|
}
|
|
if (memwav.spec.channels != 2 || memwav.spec.format != AUDIO_S16LSB) {
|
|
WARNING("unexpected audio format");
|
|
free_memory_wav();
|
|
return;
|
|
}
|
|
|
|
TRACE("ShSound.wavLoadMemory %d:", no);
|
|
}
|
|
|
|
static void wavSendMemory() {
|
|
/*
|
|
wavLoadMemory で読み込んだデータを指定のスロットに投入
|
|
|
|
slot: PCMデータを送るスロット番号
|
|
*/
|
|
int slot = getCaliValue();
|
|
|
|
if (!memwav.buf) {
|
|
WARNING("wave not loaded");
|
|
return;
|
|
}
|
|
const uint8_t wave_header[] = {
|
|
'R', 'I', 'F', 'F',
|
|
0, 0, 0, 0, // filesize - 8 (filled later)
|
|
'W', 'A', 'V', 'E',
|
|
'f', 'm', 't', ' ',
|
|
16, 0, 0, 0, // size of fmt chunk
|
|
1, 0, // PCM format
|
|
2, 0, // stereo
|
|
0, 0, 0, 0, // sampling rate (filled later)
|
|
0, 0, 0, 0, // bytes / sec (filled later)
|
|
4, 0, // block size
|
|
16, 0, // bits / sample
|
|
'd', 'a', 't', 'a',
|
|
0, 0, 0, 0, // size of data chunk (filled later)
|
|
};
|
|
|
|
uint32_t wav_size = sizeof(wave_header) + memwav.len;
|
|
uint8_t *wav_buf = malloc(wav_size);
|
|
memcpy(wav_buf, wave_header, sizeof(wave_header));
|
|
LittleEndian_putDW(wav_size - 8, wav_buf, 4);
|
|
LittleEndian_putDW(memwav.spec.freq, wav_buf, 24);
|
|
LittleEndian_putDW(memwav.spec.freq * 4, wav_buf, 28);
|
|
LittleEndian_putDW(memwav.len, wav_buf, 40);
|
|
memcpy(wav_buf + sizeof(wave_header), memwav.buf, memwav.len);
|
|
|
|
mus_wav_load_data(slot, wav_buf, wav_size);
|
|
free_memory_wav();
|
|
free(wav_buf);
|
|
|
|
TRACE("ShSound.wavSendMemory %d:", slot);
|
|
}
|
|
|
|
static void wavFadeVolumeMemory() {
|
|
/*
|
|
wavLoadMemory で読み込んだデータのボリュームのフェード
|
|
|
|
start: フェード開始時間 (10msec単位)
|
|
range: フェード継続時間 (10msec単位)
|
|
*/
|
|
int start = getCaliValue();
|
|
int range = getCaliValue();
|
|
|
|
if (!memwav.buf)
|
|
return;
|
|
|
|
start *= memwav.spec.freq / 100; // 10ms -> sample
|
|
range *= memwav.spec.freq / 100; // 10ms -> sample
|
|
|
|
if (memwav.len / 4 < start + range)
|
|
return;
|
|
|
|
int16_t *buf = (int16_t*)memwav.buf + start * 2;
|
|
|
|
// 指定の場所から徐々に音量を下げる
|
|
for (int i = range; i > 0; i--) {
|
|
buf[0] = buf[0] * i / range;
|
|
buf[1] = buf[1] * i / range;
|
|
buf += 2;
|
|
}
|
|
|
|
// 残りは無音
|
|
memset(buf, 0, memwav.buf + memwav.len - (uint8_t*)buf);
|
|
|
|
TRACE("ShSound.wavFadeVolumeMemory %d,%d:", start, range);
|
|
}
|
|
|
|
static void wavReversePanMemory() {
|
|
/*
|
|
wavLoadMemoryで読み込んだデータの左右のチャンネルを反転
|
|
*/
|
|
|
|
if (!memwav.buf)
|
|
return;
|
|
|
|
int16_t *buf = (int16_t*)memwav.buf;
|
|
int len = memwav.len / 4;
|
|
for (int i = 0; i < len; i++) {
|
|
int16_t tmp = buf[0];
|
|
buf[0] = buf[1];
|
|
buf[1] = tmp;
|
|
buf += 2;
|
|
}
|
|
|
|
TRACE("ShSound.wavReversePanMemory:");
|
|
}
|
|
|
|
static void wavPlay() {
|
|
/*
|
|
指定のスロットのPCMを再生
|
|
|
|
slot: 再生するスロット番号
|
|
loop: 0なら１回だけ再生、!0なら無限に繰り返し
|
|
*/
|
|
int slot = getCaliValue();
|
|
int loop = getCaliValue();
|
|
|
|
mus_wav_play(slot, loop == 0 ? 1 : -1);
|
|
|
|
TRACE("ShSound.wavPlay %d, %d:", slot, loop);
|
|
}
|
|
|
|
static void wavPlayRing() {
|
|
/*
|
|
指定の範囲のスロットのPCMを呼ばれる毎に繰り返し
|
|
|
|
start: 最初のスロット番号
|
|
cnt: 繰り返すスロットの個数
|
|
*cur: 現在再生しているスロットのインデックス
|
|
*/
|
|
int start = getCaliValue();
|
|
int cnt = getCaliValue();
|
|
int *cur = getCaliVariable();
|
|
|
|
mus_wav_play(start + (*cur % cnt), 1);
|
|
*cur = (*cur + 1) % cnt;
|
|
|
|
TRACE("ShSound.wavPlayRing %d,%d,%d:", start, cnt, *cur);
|
|
}
|
|
|
|
static void wavStop() {
|
|
/*
|
|
指定のスロットの再生を停止
|
|
|
|
slot: 停止するスロット番号
|
|
*/
|
|
int slot = getCaliValue();
|
|
|
|
TRACE("ShSound.wavStop %d:", slot);
|
|
|
|
mus_wav_stop(slot);
|
|
}
|
|
|
|
static void wavStopAll() {
|
|
/*
|
|
全てのスロットの再生を停止
|
|
*/
|
|
int i;
|
|
|
|
for (i = 0; i < 128; i++) {
|
|
mus_wav_stop(i);
|
|
}
|
|
|
|
TRACE("ShSound.wavStopAll:");
|
|
}
|
|
|
|
static void wavPause() {
|
|
/*
|
|
指定のスロットの再生を一時停止
|
|
|
|
slot: 一時停止するスロット番号
|
|
*/
|
|
int slot = getCaliValue();
|
|
|
|
TRACE_UNIMPLEMENTED("ShSound.wavPause %d:", slot);
|
|
}
|
|
|
|
static void wavIsPlay() {
|
|
/*
|
|
指定のスロットが再生中かどうかを調べる
|
|
|
|
slot: 調べるスロット番号
|
|
*result: 0なら停止中、!0なら再生中
|
|
*/
|
|
int slot = getCaliValue();
|
|
int *result = getCaliVariable();
|
|
|
|
*result = mus_wav_get_playposition(slot);
|
|
|
|
TRACE("ShSound.wavIsPlay %d,%p:", slot, result);
|
|
}
|
|
|
|
static void wavIsPlayRange() {
|
|
/*
|
|
指定の範囲のスロットが再生中かどうかを調べる
|
|
|
|
slot: 調べる最初のスロット
|
|
range: 調べるスロットの個数
|
|
*result: 0:すべてのスロットが停止中, 1: どれかのスロットが再生中
|
|
*/
|
|
int slot = getCaliValue();
|
|
int range = getCaliValue();
|
|
int *result = getCaliVariable();
|
|
int i, ret = 0;
|
|
|
|
for (i = slot; i < (slot + range); i++) {
|
|
ret += mus_wav_get_playposition(i);
|
|
}
|
|
|
|
*result = ret;
|
|
|
|
TRACE("ShSound.wavIsPlayRange %d,%d,%p:", slot, range, result);
|
|
}
|
|
|
|
static const ModuleFunc functions[] = {
|
|
{"Init", Init},
|
|
{"wavFadeVolumeMemory", wavFadeVolumeMemory},
|
|
{"wavIsPlay", wavIsPlay},
|
|
{"wavIsPlayRange", wavIsPlayRange},
|
|
{"wavLoad", wavLoad},
|
|
{"wavLoadMemory", wavLoadMemory},
|
|
{"wavPause", wavPause},
|
|
{"wavPlay", wavPlay},
|
|
{"wavPlayRing", wavPlayRing},
|
|
{"wavReversePanMemory", wavReversePanMemory},
|
|
{"wavSendMemory", wavSendMemory},
|
|
{"wavStop", wavStop},
|
|
{"wavStopAll", wavStopAll},
|
|
{"wavUnload", wavUnload},
|
|
{"wavUnloadAll", wavUnloadAll},
|
|
{"wavUnloadRange", wavUnloadRange},
|
|
};
|
|
|
|
const Module module_ShSound = {"ShSound", functions, sizeof(functions) / sizeof(ModuleFunc)};
|