mirror of
https://github.com/kichikuou/xsystem35-sdl2.git
synced 2026-09-27 01:00:24 +03:00
kichikuou
a627a8ea3d
Define a dedicated `vmvar_t` type for values stored in variable pages and propagate it through interfaces that expose those values. Keep the type as int for now so this commit does not change runtime behavior. This separates VM storage from ordinary int buffers and makes a later conversion to 16-bit storage mechanically checkable.
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();
|
|
vmvar_t *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();
|
|
vmvar_t *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();
|
|
vmvar_t *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)};
|