src/sound.c

   1 /*
   2    Copyright (C) Prikol Software 1996-1997
   3    Copyright (C) Aleksey Volynskov 1996-1997
   4    Copyright (C) <ARembo@gmail.com> 2011
   5
   6    This file is part of the Doom2D:Rembo project.
   7
   8    Doom2D:Rembo is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License version 2 as
  10    published by the Free Software Foundation.
  11
  12    Doom2D:Rembo is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, see <http://www.gnu.org/licenses/> or
  19    write to the Free Software Foundation, Inc.,
  20    51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  21 */
  22
  23 #include "glob.h"
  24 #include "sound.h"
  25 #include "error.h"
  26 #include <SDL.h>
  27 #include <SDL_mixer.h>
  28
  29 #define NUM_CHANNELS 16
  30 #define NUM_CHUNKS 300
  31
  32 short snd_vol = 50;
  33
  34 static int snddisabled = 1;
  35 static struct {
  36     snd_t *s;
  37     Mix_Chunk *c;
  38 } chunks[NUM_CHUNKS];
  39
  40 void S_init (void) {
  41   logo("S_init: настройка звука\n");
  42     if (!SDL_WasInit(SDL_INIT_AUDIO)) {
  43         if (SDL_InitSubSystem(SDL_INIT_AUDIO) < 0) {
  44             fprintf(stderr, "\nUnable to initialize audio:  %s\n", SDL_GetError());
  45             snddisabled=1;
  46             return;
  47         }
  48
  49         if (Mix_OpenAudio(22050, AUDIO_S16, 1, 1000) < 0) {
  50             fprintf(stderr, "Error initializing SDL_mixer: %s\n", Mix_GetError());
  51             snddisabled=1;
  52             return;
  53         }
  54
  55         if (Mix_AllocateChannels(NUM_CHANNELS)!=NUM_CHANNELS) {
  56             fprintf(stderr, "Error allocation channels: %s\n", Mix_GetError());
  57             snddisabled=1;
  58             return;
  59         }
  60     }
  61
  62     int i;
  63     for (i=0; i<NUM_CHUNKS; i++) {
  64         chunks[i].s = NULL;
  65         chunks[i].c = NULL;
  66     }
  67
  68     snddisabled = (snd_vol==0);
  69
  70    S_volume(snd_vol);
  71 }
  72
  73 void S_done (void) {
  74     free_chunks();
  75     if (SDL_WasInit(SDL_INIT_AUDIO)) {
  76         Mix_CloseAudio();
  77         SDL_QuitSubSystem(SDL_INIT_AUDIO);
  78     }
  79 }
  80
  81 static Mix_Chunk *get_chunk (snd_t *s, int r, int v) {
  82     int i, fi = -1;
  83     for(i=0; i<NUM_CHUNKS; i++) {
  84         if (chunks[i].s == s) return chunks[i].c;
  85         if (chunks[i].s == NULL && fi==-1) fi = i;
  86     }
  87
  88     if (fi==-1) return NULL;
  89
  90   Uint8 *data = (Uint8*)s+sizeof(snd_t);
  91   Uint32 dlen = s->len;
  92   SDL_AudioCVT cvt;
  93   SDL_BuildAudioCVT(&cvt, AUDIO_S8, 1, s->rate, AUDIO_S16, 1, 22050);
  94   if (!(cvt.buf = malloc(dlen*cvt.len_mult))) ERR_fatal("Out of memory\n");;
  95   memcpy(cvt.buf, data, dlen);
  96   cvt.len = dlen;
  97   SDL_ConvertAudio(&cvt);
  98
  99     Mix_Chunk *chunk;
 100     if (!(chunk = malloc(sizeof(Mix_Chunk)))) ERR_fatal("Out of memory\n");;
 101     chunk->abuf=cvt.buf;
 102     chunk->alen=cvt.len_cvt;
 103     chunk->allocated=0;
 104     chunk->volume=(float)v/255*SDL_MIX_MAXVOLUME;
 105
 106     chunks[fi].s = s;
 107     chunks[fi].c = chunk;
 108
 109     return chunk;
 110 }
 111
 112 void free_chunks (void) {
 113     if (snddisabled) return;
 114     Mix_HaltChannel(-1);
 115     int i;
 116     for (i=0; i<NUM_CHUNKS; i++) {
 117         if (chunks[i].c) {
 118             free(chunks[i].c->abuf);
 119             free(chunks[i].c);
 120             chunks[i].c = NULL;
 121             chunks[i].s = NULL;
 122         }
 123     }
 124 }
 125
 126 short S_play(snd_t *s, short c, unsigned r, short v) {
 127     if (snddisabled) return 0;
 128     Mix_Chunk *chunk = get_chunk(s,r,v);
 129     if (chunk==NULL) return 0;
 130     return Mix_PlayChannel(c, chunk, 0);
 131 }
 132
 133 void S_stop (short c) {
 134     Mix_HaltChannel(c);
 135 }
 136
 137 void S_volume (int v) {
 138     if (snddisabled) return;
 139     snd_vol=v;
 140     if (snd_vol>128) snd_vol=128;
 141     if (snd_vol<0) snd_vol=0;
 142     Mix_Volume(-1, snd_vol);
 143 }
 144
 145 void S_wait (void) {
 146     if (snddisabled) return;
 147     while (Mix_Playing(-1)) {
 148         SDL_Delay(10);
 149     }
 150 }